IBM Version 4 Crtdspf ABC/ABCDSPF ABCDEV/QDDSSRC +, Crtpf ABC/ABCPF ABCDEV/QDDSSRC +, Fqprint O

Models: Version 4

1 505
Download 505 pages 30.92 Kb
Page 259
Image 259

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, produc￿t loads, \/ /\ and gives all the objects associated with the product th￿e correct\/

/\ product information. It packages the product, which enables

\/

/\ you to use the SAVLICPGM, RSTLICPGM, and DLTLICPGM comman￿ds.

\/

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

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 pr￿ogram I\ so that the variable length field can be defined as a fix￿ed 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—ExamplesA-3

Page 259
Image 259
IBM Version 4 manual Crtdspf ABC/ABCDSPF ABCDEV/QDDSSRC +, Crtpf ABC/ABCPF ABCDEV/QDDSSRC +, Call ABCDEV/SFTWPRDEX Endpgm