|
Not sure if it matters, but I'd put the hidden fields at the top of the subfile record. Thanks, Mark Mark D. Walter Senior Programmer/Analyst CCX, Inc. mwalter@xxxxxxxxxx http://www.ccxinc.com "Jim Hawkins" <jim.hawkins@foxc onn.com> To Sent by: "rpg400-l" <rpg400-l@xxxxxxxxxxxx> rpg400-l-bounces@ cc midrange.com Subject Subfile compile problem 04/19/2005 11:19 AM Please respond to RPG programming on the AS400 / iSeries <rpg400-l@midrang e.com> I am reworking an old subfile program. I am getting errors when I compile the display file that indicates that the position (78) is not valid. Segment of code and error are attached. This is probably something very simple that I'm overlooking-but it is totally escaping me. If I change the position to 77, it will compile, but naturally it overlaps the previous field and doesn't show. Anyone see what I'm missing? (And the dspsize is defined as 80 wide.) A* SUBFILE SCREEN 1 * A******************** A R SFL71S3 SFL A SFOPTN 1A B 9 2VALUES(' ' '2' '4' '5') A CHECK(ER) A 49 DSPATR(PC) A SHTYPE R O 9 4REFFLD(ZZR47/TYPE47 ZZP47) A SFACCN R 12 O 9 9REFFLD(ACCN47 ZZP47) A SFDESC 35A O 9 22 A 68 DSPATR(HI) A SFAMT R O 9 58REFFLD(AMT47 ZZP47) A EDTCDE(J) A SFDBIT 2A O 9 72 A SFCRDT 2A O 9 75 A* HIDDEN FIELDS A SHDESC R H REFFLD(ACDESC FLP003) A SHCDXT R H REFFLD(CDXT47 ZZP47) A SFACCF 1A O 9 78 * CPD7840-****** ************************************************************************** ID Severity Number * CPD7840 30 1 Message . . . . : Position number for field not valid. +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Thank in advance Jim Hawkins -- This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options, visit: http://lists.midrange.com/mailman/listinfo/rpg400-l or email: RPG400-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at http://archive.midrange.com/rpg400-l.
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.