IBM Version 4 Universal Remote User Manual


 
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 ABC1 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