Example illustrating output with macros

The program in this example outputs the data of one or more installation units in the SCI to SYSOUT. The products for which the data is output can be selected in an interactive dialog.

The corresponding examples using the FHS and SDF interfaces begin on chapter “Installation sequences under BS2000”, respectively.

         ICTL 1,71,18

TCASM    CSECT

         PRINT GEN,NOREF

         ...

*

*  //show-installation-units unit-name=*by-dialog, -

*  //    information=*par(installation-items=*yes,report-level=*minimum), -

*  //    output=test.ff(write-mode=*replace)

*

         IMOSHIU MF=E,PARAM=SHIUPL       call IMOSHIU

*

*  //show-installation-items item-name=*from-formatted-file( -

*  //    file-name=test.ff,information=*par(report-level=*all-attributes), -

*  //    output=*input-formatted-file

*

         IMOSHII MF=E,PARAM=SHIIPL       call IMOSHII

*

*  //show-formatted-file from-file=test.ff,output=*syslst

*

         IMOSHFF MF=E,PARAM=SHFFPL       call IMOSHFF

*

         ...

*

         DS   0F

*

SHIUPL   IMOSHIU MF=L,UTYPE=*DIALOG,INSITEM=*YES,REPLEV=*MINIMUM,     

                 OUTTYPE=*FILE,OUTNAME=TEST.FF,WRMODE=*REPLACE

*

SHIIPL   IMOSHII MF=L,ITYPE=*FILE,INFF=TEST.FF,REPLEV=*ALL,         

                 OUTTYPE=*INFILE

*

SHFFPL   IMOSHFF MF=L,INFF=TEST.FF,SYSLST#=0

*

         END   TCASM