IBM Version 4 Universal Remote User Manual


 
ᑍ Print the error and the API that received the error
MOVE EXCEPTION-ID OF QUS-EC TO EXCEPTION-ID OF BAD-NEWS.
WRITE LIST-LINE FROM BAD-NEWS.
Data Queue—OPM RPG Example
Refer to “Data Queue—ILE C Example” on page A-16 for the original example.
Fᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍ
Fᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍ
F
Fᑍ Program Name: DQUEUEX
F
Fᑍ Programming Language: OPM RPG
F
Fᑍ Description: This program illustrates how to use APIs to
Fᑍ create and manipulate a ᑍDTAQ.
F
Fᑍ Header Files Included: QUSEC - Error Code Parameter
Fᑍ QCAPCMD - Process Command API
F
Fᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍ
F
FQPRINT O F 132 PRINTER UC
Fᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍ
I
Iᑍ Error Code parameter include
I
I/COPY QSYSINC/QRPGSRC,QUSEC
I
Iᑍ Process Command API Include
I
I/COPY QSYSINC/QRPGSRC,QCAPCMD
I
Iᑍ Command strings
I
I DS
I I 'CRTLIB LIB(QUEUELIB)' 1 2 CRTLIB
I I 'DLTLIB LIB(QUEUELIB)' 21 4 DLTLIB
I I 'CRTDTAQ DTAQ(QUEUELI- 41 82 CRTDQ
I 'B/EXAMPLEQ) MAXLEN(1-
I ')'
I I 'DLTDTAQ DTAQ(QUEUELI- 83 113 DLTDQ
I 'B/EXAMPLEQ)'
I
Iᑍ Miscellaneous data structure
I
I DS
I 1 1 CMDSTR
I B 11 14LENSTR
I I 2 B 15 18SIZE
I I B 19112RCVSIZ
I I '' 113 113 FSTERR
I 114 123 APINAM
C
Cᑍ Beginning of mainline
C
Appendix B. Original Examples in Additional Languages B-169