printing jobs via NER code

[wardj]

We are using One World XE UPDATE 4 SP20

Requirement we have is to automatically trigger printing of report jobs submitted to Ap Server from NER.

We are using a JDE trigger on F986110 table to pick up the job completion. The subsequent "send print request" function works but send the job to the wrong print queue. The value of JCPRTQ (print queue) in F986110 is just a number and appears to be the same for all jobs.

We are tearing our hear out on this one !!!!

Thanks

Jon Ward

 

[Larry_Jones]

Hi Jon,

Could you:

1) Supply more details. Code sample of how you are sumitting 2nd Print Request would be best.

2) Post to the Developer forum - you'll get more response than in the application forum.

Cheers,

 

[wardj]

thanks Larry, I will post on developers forum as well.

code is :-

=======================================================================
NAMED ER: Immediate Print of Specified PDF file
=======================================================================
evt_PhysicalDevice
evt_UserId1
evt_UserId2
evt_UserId3
evt_UserId4
evt_UserId5
evt_UserId6
evt_UserId7
evt_UserId8
evt_UserId9
evt_UserId10
evt_NumOfCopies
evt_OutputTray
evt_UserIdOfServerJob
evt_EnvironmentName
Get PO for P5500011 Immediate Printing
"CDG00001" -> szVersionName
VA evt_UserId1 <- szUserId
VA evt_UserId2 <- szUserId_2
VA evt_UserId3 <- szUserId_3
VA evt_UserId4 <- szUserId_4
VA evt_UserId5 <- szUserId_5
VA evt_UserId6 <- szUserId_6
VA evt_UserId7 <- szUserId_7
VA evt_UserId8 <- szUserId_8
VA evt_UserId9 <- szUserId_9
VA evt_UserId10 <- szUserId_10
F986110.Fetch Single
VA evt_EnvironmentName <- TK Environment Name
VA evt_UserIdOfServerJob <- TK User ID
BF mnServerJobNumber = TK Server Job Number
BF szExecutionHostName = TK Execution Host Name
If VA evt_UserIdOfServerJob is equal to VA evt_UserId1
Or VA evt_UserIdOfServerJob is equal to VA evt_UserId2
Or VA evt_UserIdOfServerJob is equal to VA evt_UserId3
Or VA evt_UserIdOfServerJob is equal to VA evt_UserId4
Or VA evt_UserIdOfServerJob is equal to VA evt_UserId5
Or VA evt_UserIdOfServerJob is equal to VA evt_UserId6
Or VA evt_UserIdOfServerJob is equal to VA evt_UserId7
Or VA evt_UserIdOfServerJob is equal to VA evt_UserId8
Or VA evt_UserIdOfServerJob is equal to VA evt_UserId9
Or VA evt_UserIdOfServerJob is equal to VA evt_UserId10
Get Printer Info From F986110
VA evt_PhysicalDevice <- szPrinterName
VA evt_UserIdOfServerJob X szUserId
BF szExecutionHostName -> szExecutionHostName
UNDEFINED X szEnvironmentName
BF mnServerJobNumber -> mnServerJobNumber
UNDEFINED X cMode
UNDEFINED X szPaperType
UNDEFINED X szPDLProgram
UNDEFINED X cOrientation
UNDEFINED X cSavePDL
UNDEFINED X cExportToCSV
UNDEFINED X cPrintImmediate
UNDEFINED X szPageCount
UNDEFINED X szModel
UNDEFINED X szLocation
UNDEFINED X cCustom
VA evt_NumOfCopies <- nNumOfCopies
VA evt_OutputTray <- nOutputTray
Send Print Request
BF mnServerJobNumber -> mnServerJobNumber
BF szExecutionHostName -> szExecutionHostName
VA evt_PhysicalDevice -> szPrinterName
"D" -> szObjectStatus
VA evt_NumOfCopies -> nNumberOfCopies
VA evt_OutputTray -> nOutputTray
End If