|
In a similar situation Tom I defined a program-to-system field and filled it with a hard coded value at *INZSR time. Then instead of the hard-coded SFLPAG size I could use the defined field. I could also use this value to define the position-to and the page-before requirements. Then of course the DDS says SFLPAG(&PAGESIZE). It was very useful when building the applications in the first place because addind or removing lines otherwise was a real exercise in needle-in-the-haystack programming. --------------------------------------------------------- Booth Martin http://www.MartinVT.com Booth@MartinVT.com --------------------------------------------------------- -------Original Message------- From: RPG programming on the AS400 / iSeries Date: Wednesday, January 15, 2003 08:26:29 PM To: rpg400-l@midrange.com Subject: Re: Determine SFLSIZ/SFLPAG Dan: Yep, you got it it. Although I can handle the API okay, I was just hoping someone knew some details of an INFDS or an obscure DDS or F-spec keyword that would bring the info into the program. It just seems that an external file description should make this available. I'm looking at an existing program that has some 'Position to...' logic for a subfile. It relies on a literal value for subfile lines per page. I made changes to the DDS that reduced the subfile lines by one per page and need to make the corresponding change in the program before recompiling. It shouldn't be necessary. I should be able to recompile with no program code change and 'Position to...' should still work, if the program is written correctly in the first place. It looks like the API is the only choice. Tom Liotta rpg400-l-request@midrange.com wrote: > 5. Re: Determine SFLSIZ/SFLPAG (Dan) > >Oh, I see it's not one of the easier APIs. Is that why you're looking >for something easier, Tom? -- -- Tom Liotta The PowerTech Group, Inc. 19426 68th Avenue South Kent, WA 98032 Phone 253-872-7788 x313 Fax 253-872-7904 http://www.powertechgroup.com __________________________________________________________________ The NEW Netscape 7.0 browser is now available. Upgrade now! http://channels.netscape.com/ns/browsers/download.jsp
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 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.