Filter
Top Products
MOVE JOBD TO JOB-DESC.
MOVE JOBDL TO JOB-DESC-LIB.
ᑍ
ᑍ Error Code Parameter is set to .
ᑍ
MOVE TO BYTES-PROVIDED. 6
ᑍ
ᑍ Receiver Length Set to 39.
ᑍ
MOVE 39 TO RECEIVER-LENGTH. 3
ᑍ
ᑍ Call the QWDRJOBD API.
ᑍ
CALL QWDRJOBD USING QWD-JOBD1, RECEIVER-LENGTH,
FORMAT-NAME, JOBD-AND-LIB-NAME, QUS-EC.
ᑍ
ᑍ Move HOLD-JOB-QUEUE to HOLD so that we can display the value using
ᑍ the command string.
ᑍ
MOVE HOLD-JOB-QUEUE TO HOLD.
ᑍ
ᑍ Let's tell everyone what the hold value was for this job.
ᑍ
MOVE 51 TO COMMAND-LENGTH.
CALL QCMDEXC USING COMMAND-STRING, COMMAND-LENGTH.
ᑍ
STOP RUN.
Retrieving the Hold Parameter (Exception Message)—ILE RPG
Example
Refer to “Retrieving the Hold Parameter (Exception Message)—OPM RPG
Example” on page 3-6 for the original example.
Dᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍ
Dᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍ
Dᑍ
Dᑍ Program Name: JOBDAPI
Dᑍ
Dᑍ Programming Language: ILE RPG
Dᑍ
Dᑍ Description: This program retrieves the HOLD value from
Dᑍ a job description. It expects errors to be
Dᑍ sent as escape messages.
Dᑍ
Dᑍ Header Files Included: QUSEC - Error Code Parameter
Dᑍ QWDRJOBD - Retrieve Job Description API
Dᑍ
Dᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍ
Dᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍ
Dᑍ
Dᑍ Error Code parameter include
Dᑍ
D/COPY QSYSINC/QRPGLESRC,QUSEC
Dᑍ
Dᑍ Retrieve Job Description API Include
Dᑍ
D/COPY QSYSINC/QRPGLESRC,QWDRJOBD 2
B-6 System API Programming V4R1