Instructions

  1. To create the display file T1520DD0 using the DDS source shown below, enter:
    CRTDSPF FILE(MYLIB/T1520DD0) SRCFILE(QCPPLE/QADDSSRC)
    Figure 1 shows the DDS source.
  2. To create the program T1520ID2, using the source shown in Figure 2, enter:
    CRTBNDC PGM(MYLIB/T1520ID2) SRCFILE(QCPPLE/QACSRC)
  3. To run the program T1520ID2, enter:
    CALL PGM(MYLIB/T1520ID2)
    The output is as follows:
    
                                      PHONE BOOK
                               Name:
                            Address:
                            Phone #:
    
    
    
    
    
                                     F3 - EXIT