[[{“value”:”I followed the IBMi 7.5 “Example in ILE COBOL: Using data queues” https://www.ibm.com/docs/en/i/7.5?topic=eudquq-example-in-cobol-opm-ile-using-data-queues (Last Updated: 2024-10-07).
Compilation issues The version of QUSEC OF QSYSINC-QLBLSRC at my site contains two structures, both with BYTES-PROVIDED fields. So you have to specify MOVE 16 TO BYTES-PROVIDED OF QUS-EC to get it to compile. Similarly BYTES-AVAILABLE OF QUS-EC.
CALL QCAPCMD gave Error CPF0008 (Value in option control block not valid). IBM copybook structure QCA-PCMD-CPOP0100 at my site contained CCSID-COMMAND-STRING. This is not initialized in the IBM example. MOVE 0 TO CCSID-COMMAND-STRING OF QCA-PCMD-CPOP0100. This should fix the CPF0008 error from QCAPCMD.
submitted by /u/Fit_Reference_7165[link][comments]”}]] Read More
