Pop up Report/UBE after Processed

There are many instances where we do Report Interconnects from Interactive Applications, like print the Order from an order screen, or process something from an interactive application button. But, in all those cases, the report fires on the Server, and you need to go visit the Work Submitted Jobs to check the output. Every User asks for the same convenience, if they can get the output direct on the screen without going to the WSJ.

Here is a crude way of popping up a UBE output onto the screen, without going to the Work Submitted Jobs. This makes life easy for the users.

*Note: I’ve tested this only on OneWorld XE. This is the only Live system I’ve access to as of now.

The basic logic for this is based on getting the Job number for the UBE from the Server.

To get that, we need to get hold of the logged in Environment, Server on which the UBE runs from the OCM mappings, and its corresponding Job Queue Database Path. In most cases the Database Path and the Server are same.

Following is a sample code of how it is accomplished. The Detailed ER is available for download at the end of the Article.

CONTROL: BUTTON &Print Report
EVENT: Button Clicked
-----------------------------------------------------------------------
//
Get Audit Information
//
CALL( UBE:R5542406 , Ver: TEST0001 )
//
// Retrieve the Logged in Envt
Get Current Environment
//
// Get the OCM Mapping Server for the UBE
Fetch UBE Mapping from OCM
//
// Get the Mapping Server on which the Job Queue fires.
F9650.Fetch Single
//
// Change the DatabasePath to the above.
F986110 DS OVERRIDE
//
VA evt_LowerCaseDBServer_SRVR = ltrim(rtrim(lower([VA evt_DatabaseServerName_SRVR]),' '),' ')
//
// Get the Job Queue of the Fired UBE
Get Default Job Queue
//
VA frm_ReportName_FNDFUF2 = "R5542406_TEST0001_"
//
//Wait for some specified secs until the UBE is done.
F986110.Select
F986110.Fetch Next
While VA evt_JobstatusOW_JOBSTS is not equal to "D,E"

Wait x seconds
F986110.Select
F986110.Fetch Next

End While
//
// Reset the DatabasePath Override.
F986110 DS OVERRIDE
//
// ————————-
// Retrieve and Show the PDF
//
If SV Engine_Type is equal to CO WINDOWS_ENGINE

//This is for FAT clients
Print F986110
//

Else

//This is for HTML Engine or Thin clients.
//Build the URL to pick up the UBE output from
VA frm_URL = “/servlet/com.jdedwards.jas.ube?”
…..
Run Executable(, VA frm_URL, “UBE”, , , )
//

End If

Download the Detailed Event Rules of the same here
Please do write comments/vote if this helps.

Related posts:

1. Send Email with PDF Output
2. Launch Batch Application/UBE Dynamically from Interactive Apps
3. BSFN to Get Install Path (for Import/Export)
4. Using BSFN to Delete All Records from a Table
5. Oracle BI Publisher (OBIP)