CRTDSPF ABC/ABCDSPF ABCDEV/QDDSSRC +
TEXT('Display File for ABC Product')
CRTPF ABC/ABCPF ABCDEV/QDDSSRC +
TEXT('Physical File for ABC Product')
CRTMSGF ABC/ABCMSG TEXT('Message File')
ADDMSGD ABC1 ABC/ABCMSG MSG('ABC Product')
CRTCMD ABC/ABC ABC/ABCPGM ABCDEV/QCMDSRC +
TEXT('Command for ABC Product')
CRTPNLGRP ABC/ABCPNLGRP ABCDEV/QPNLSRC +
TEXT('Panel for ABC Command')
/ᑍ The next program creates the product definitions, product loads, ᑍ/
/ᑍ and gives all the objects associated with the product the correctᑍ/
/ᑍ product information. It packages the product, which enables ᑍ/
/ᑍ you to use the SAVLICPGM, RSTLICPGM, and DLTLICPGM commands. ᑍ/
CRTRPGPGM ABCDEV/SFTWPRDEX ABCDEV/QRPGSRC
/ᑍ 1 2 3 4 ᑍ/
CALL ABCDEV/SFTWPRDEX
ENDPGM
Program for Packaging a Product—OPM RPG Example
The following program creates objects 12 through 14 in Figure A-1 on page A-1.
Fᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍ
Fᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍ
Fᑍ
FᑍProgram Name: SFTWPRDEX
Fᑍ
FᑍLanguage: OPM RPG
Fᑍ
FᑍDescriptive Name: Software Product Example
Fᑍ
FᑍDescription: This example contains the steps necessary to
Fᑍ package your product like IBM products.
Fᑍ
FᑍHeader Files Included: QUSEC - Error Code Parameter
Fᑍ (Copied into Program)
Fᑍ QSZCRTPD - Create Product Definition API
Fᑍ QSZCRTPL - Create Product Load API
Fᑍ QSZPKGPO - Package Product Option API
Fᑍ
Fᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍ
Fᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍ
FQPRINT O F 132 OF PRINTER
Eᑍ COMPILE TIME ARRAY
E OBJ 1 15 41
Iᑍ
Iᑍ Error Code Parameter Include for the APIs
Iᑍ
Iᑍ The following QUSEC include has been copied into this program
Iᑍ so that the variable length field can be defined as a fixed
Iᑍ length.
Iᑍᑍᑍ START HEADER FILE SPECIFICATIONS ᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍᑍ
Iᑍ
IᑍHeader File Name: H/QUSEC
Iᑍ
IᑍDescriptive Name: Error Code Parameter.
Appendix A. Performing Tasks Using APIs—Examples A-3