A*%%TS  SD  19970519  153809  MROWE       REL-V3R7M0  5716-PW1
     A*****************************************************************
     A*  DSPF:        ADDDLYDF                                        *
     A*  TITLE:       Add additional days delay                       *
     A*  PROGRAMMER:  MJR   MAY'97                                    *
     A*****************************************************************
     A*%%EC
     A                                      DSPSIZ(24 80 *DS3)
     A                                      PRINT
     A          R SCREEN01
     A*%%TS  SD  19970519  140700  MROWE       REL-V3R7M0  5716-PW1
     A                                      OVERLAY
     A                                      WINDOW(8 22 6 31 *NORSTCSR)
     A                                  1  1'Request delayed until:'
     A            DLYTIM         8   O  1 24
     A                                      DSPATR(HI)
     A                                  2  1'If required, specify additional'
     A                                  3  1'day(s) to delay (0-9):'
     A            ADDDLY         1Y 0B  3 24EDTCDE(3)
     A                                      DSPATR(HI)
     ‚*
     A          R DUMMY                     ASSUME
     A                                 24 79' '