RE: Subfile issue (brain dead)

Probably has warts - but it works:

A* subfile record
A          R SUBFILE                   SFL
A            @SELEC         1Y 0B  9  3EDTCDE(4)
A                                      DSPATR(UL)
A            @NAME          4Y 0O  9  7EDTCDE(4)
A            @DESC         20A  O  9 14

A* control format
A          R SUBCTL                    SFLCTL(SUBFILE)
A                                      SFLSIZ(0065)
A                                      SFLPAG(0013)
A                                      CF03(03)
A                                      OVERLAY
A  51                                  SFLDSP
A  52                                  SFLDSPCTL
A  50                                  SFLCLR
A N80                                  SFLEND(*MORE)

A* cmdkey legend
A          R LEGEND

A            SCLGND        78   O 23  2

A                                      COLOR(GRN)



Good luck.


Tom

 |  -----Original Message-----
 |  From: Mark Allen [mailto:allenmark@nu-z.net]
 |  Sent: Wednesday, April 17, 2002 16:33
 |  To: rpg400-l@midrange.com
 |  Subject: RE: Subfile issue (brain dead)
 |
 |
 |  Added it, no diff
 |
 |  Mark Allen
 |  I.S. Manager
 |  Wilkes Telephone & Electric
 |  A Dycom Company
 |  Phone: (706) 678-9565
 |  Email: allenmark@nu-z.net
 |  http://www.nu-z.net
 |
 |
 |
 |
 |  :-----Original Message-----
 |  :From: rpg400-l-admin@midrange.com
 |  :[mailto:rpg400-l-admin@midrange.com] On Behalf Of Mark Allen
 |  :Sent: Wednesday, April 17, 2002 3:25 PM
 |  :To: rpg400-l@midrange.com
 |  :Subject: RE: Subfile issue (brain dead)
 |  :
 |  :
 |  :No
 |  :
 |  :Mark Allen
 |  :I.S. Manager
 |  :Wilkes Telephone & Electric
 |  :A Dycom Company
 |  :Phone: (706) 678-9565
 |  :Email: allenmark@nu-z.net
 |  :http://www.nu-z.net
 |  :
 |  :
 |  :
 |  :
 |  ::-----Original Message-----
 |  ::From: rpg400-l-admin@midrange.com
 |  ::[mailto:rpg400-l-admin@midrange.com] On Behalf :Of Fisher Don
 |  :
 |  ::Sent: Wednesday, April 17, 2002 2:03 PM
 |  ::To: 'rpg400-lmidrangecom'
 |  ::Subject: RE: Subfile issue (brain dead)
 |  ::
 |  ::
 |  ::Is OVERLAY specified on the SFLCMD format?
 |  ::
 |  ::Donald R. Fisher, III
 |  ::Project Manager
 |  ::The Roomstore Furniture Company
 |  ::(804) 784-7600 extension 2124
 |  ::DFisher@roomstoreeast.com
 |  ::
 |  ::<clip>
 |  ::Everything works but the SFLCMD does not show!!!
 |  ::<clip>
 |  ::_______________________________________________
 |  ::This is the RPG programming on the AS400 / iSeries (RPG400-L)
 |  ::mailing list To post a message email: RPG400-L@midrange.com
 |  :To :subscribe, unsubscribe, or change list options,
 |  ::visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
 |  ::or email: RPG400-L-request@midrange.com
 |  ::Before posting, please take a moment to review the archives
 |  ::at http://archive.midrange.com/rpg400-l.
 |  ::
 |  ::
 |  :
 |  :
 |  :_______________________________________________
 |  :This is the RPG programming on the AS400 / iSeries (RPG400-L)
 |  :mailing list To post a message email: RPG400-L@midrange.com To
 |  :subscribe, unsubscribe, or change list options,
 |  :visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
 |  :or email: RPG400-L-request@midrange.com
 |  :Before posting, please take a moment to review the archives
 |  :at http://archive.midrange.com/rpg400-l.
 |  :
 |  :
 |
 |
 |  _______________________________________________
 |  This is the RPG programming on the AS400 / iSeries
 |  (RPG400-L) mailing list
 |  To post a message email: RPG400-L@midrange.com
 |  To subscribe, unsubscribe, or change list options,
 |  visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
 |  or email: RPG400-L-request@midrange.com
 |  Before posting, please take a moment to review the archives
 |  at http://archive.midrange.com/rpg400-l.
 |