|
Ash, In the C-specs, use the format name for the subfile. It doesn't know which format to update, even though you probably only have one. See if that makes it work better. --------------------------------------------------------- Booth Martin http://www.MartinVT.com Booth@xxxxxxxxxxxx --------------------------------------------------------- -------Original Message------- From: RPG programming on the AS400 / iSeries Date: Tuesday, March 04, 2003 10:09:44 To: rpg400-l@xxxxxxxxxxxx Subject: Re: Can anyone help with this message? Here is the "F" spec: FFilename++IPEASF.....L.....A.Device+.Keywords+++++++++++++++++++ FTA1070FM CF E WORKSTN MAXDEV(*FILE) F SFILE(SUBFILE1:W@xxx) FMENUCTL IF E DISK USROPN Here is the code from the "C" spec: * Check for selections, only if SFL has records CL0N01Factor1+++++++Opcode&ExtExtended-factor2+++++++++++++++++++++++++ C IF *IN51 * Check for selection C READC SUBFILE1 91 C DOW NOT *IN91 * Display Detail screen for selected EE C IF SELECT = 'X' C CALLB 'TA1075' C PARM DEMPCMPNY C PARM DEMPEMPLY C PARM ADPNBR C PARM *BLANKS P@xxxxxx C MOVEL *BLANKS SELECT C UPDATE SUBFILE1 C LEAVE C END Thanks, Ash.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.