Re: subfile question - using windows

[PHarte@xxxxxxxxxx]

Small example of dds for you to take a look at....

     A                                      DSPSIZ(24 80 *DS3)
     A                                      PRINT
 A*---------------------------------------------------------------------
     A* Subfile Record
     A          R SUBFILESF                 SFL
     A*
     A            NAMEA         30A  B  3  5
     A  28                                  DSPATR(PR)
     A            OPTION         1   B  3  2
     A*-------------------------------------------------------------------
     A* Subfile Header
     A          R SUBFILEHD                 SFLCTL(SUBFILESF)
     A                                      CF01
     A                                      CF05
     A                                      OVERLAY
     A  50                                  SFLDSP
     A  50                                  SFLDSPCTL
     A  52                                  SFLCLR
     A  55                                  SFLEND(*MORE)
     A                                      SFLSIZ(0017)
     A                                      SFLPAG(0016)
     A                                      WINDOW(SUBFILEWD)
     A            RRN            4S 0H      SFLRCDNBR(CURSOR)
     A                                  2  2'Active Names'
     A                                      COLOR(WHT)
     A          R SUBFILEWD
     A*
     A                                      WINDOW(1 22 20 35)
     A          R SUBFILEFT
     A*
     A                                 24 13'F1'
     A                                      COLOR(WHT)
     A                                 24 16'- Exit'
     A                                      COLOR(BLU)
     A            ODATE         18A  O 24 41
     A            TIMEFIELD      8A  O 24 61
     A          R SUBFILES1
     A*
     A            NAMEA         30   O 11 26
     A            RRN            4  0O 11 18