Refer to “Program for Packaging a Product—OPM RPG Example” on page A-3 for
the original example.
F\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
F\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
F\
F\Program Name: SFTWPRDEX
F\
F\Language: ILE RPG
F\
F\Descriptive Name: Software Product Example
F\
F\Description: This example shows you the steps necessary to
F\ package your product like IBM products.
F\
F\Header Files Included: QUSEC - Error Code Parameter
F\ QSZCRTPD - Create Product Definition API
F\ QSZCRTPL - Create Product Load API
F\ QSZPKGPO - Package Product Option API
F\
F\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
F\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
F\
FQPRINT O F 132 PRINTER OFLIND(\INOF) USROPN
D\
D\ Error Code parameter include. As this sample program
D\ uses /COPY to include the error code structure, only the first
D\ 16 bytes of the error code structure are available. If the
D\ application program needs to access the variable length
D\ exception data for the error, the developer should physically
D\ copy the QSYSINC include and modify the copied include to
D\ define additional storage for the exception data.
D\
D/COPY QSYSINC/QRPGLESRC,QUSEC
D\
D\ Create Product Definition API Include
D\
D/COPY QSYSINC/QRPGLESRC,QSZCRTPD
D\
D\ Create Product Load API Include
D\
D/COPY QSYSINC/QRPGLESRC,QSZCRTPL
D\
D\ Package Product Option API Include
D\
D/COPY QSYSINC/QRPGLESRC,QSZPKGPO
D\
D\ Compile Time Array
D\
DOBJ_INFO S 41 DIM(15) CTDATA PERRCD(1)
D\
DOBJ_INFO_I DS BASED(OBJ_PTR)
D OBJ_NAME 1ð
D OBJ_TYPE 1ð
D PRD_OPT_ID 4
D PRD_OPT_LD 4
D LP_ID 13
B-144 System API Programming V4R1