|
-- -- [ Picked text/plain from multipart/alternative ] How will you decide which are not records you want? Typically in that environment you wanted to ignore records marked for delete. The usual way of marking the records for delete was to put a "D" or "X" in the first or last column, then in your I-spec you defined your record as "this is a record if: there is no character "X" in column 1" If that describes your scenario, then the easiest way is to code NCX0001 on the I line above your L1 break. In other words, with this solution the record is read first, then the program decides if the record is eligible to set on the Level-breaks. Records excluded will never set on Level 1-9, so far as Iknow. If this answer heads in the right direction for your problem, but I've messed up the explanation, tell us how you will determine if you want to process the record and we can be more specific. ok? If electricity comes from electrons... does that mean that morality comes from morons? --------------------------------------------------------- Booth Martin http://www.MartinVT.com Booth@MartinVT.com --------------------------------------------------------- -------Original Message------- From: rpg400-l@midrange.com Date: Friday, July 12, 2002 16:04:09 To: rpg400-l@midrange.com Subject: How do you NOT perform level breaks in a program with level breaks? -- [ Picked text/plain from multipart/alternative ] I have an old program that needs to be modified to skip processing of certain records so it does not do any calculations. The program has L1-L3 breaks defined. I know that once a record is read that it will seton these indicators and perform the processes. Is there anyway for me to bypass this on specific records? Do I have to control this with an indicator or is there another way? Bill _______________________________________________ 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. . -- [ Content of type image/gif deleted ] --
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.