|
There is a problem with your idea of, for example, if indicator 1 needs to be switched on, the code would be eval FunctionKey = '1000000000000000000' Now what do you do to switch indicator 3 on eval FunctionKey = '1010000000000000000' but what happens if indicator 1 does NOT need to be switched on prior to indicator 3. Like I said, the permutations and combinations of what is to be swithced on with what is already set, it can become ridiculous. e.g. if FunctionKey = '1000000000000000000' eval FunctionKey = '1010000000000000000' else if FunctionKey = '0000000000000000000' eval FunctionKey = '0010000000000000000' else etc. etc. Alan Shore NBTY, Inc (631) 244-2000 ext. 5019 AShore@xxxxxxxx "Weber, Richard" <Weberr@xxxxxxxxx om> To Sent by: "'RPG programming on the AS400 / rpg400-l-bounces@ iSeries'" <rpg400-l@xxxxxxxxxxxx> midrange.com cc Subject 01/12/2006 02:46 RE: Indicator Coding Technique PM Please respond to RPG programming on the AS400 / iSeries <rpg400-l@midrang e.com> Replies are inline. <Do you mean that any changes to the indicators will NOT be at the individual level, but on the field FunctionKey?> Yes <If this is true, what a terrible idea. How are you going to change/check indicator 03, with all the myriad of permutations and combinations? What do you gain from using this method?> Changing indicator would be by eval to the string '0010000000000000000'. Checking for tie function key on is through a different DS written over the INFDS. It was stated that the gain is that all these indicators can be set at the same time. Rick Weber | TOYS 'Я' US International -----Original Message----- From: Alan Shore [mailto:AlanShore@xxxxxxxx] Sent: Thursday, January 12, 2006 2:37 PM To: RPG programming on the AS400 / iSeries Subject: Re: Indicator Coding Technique -- 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. ======================================================================== This email message is for the sole use of the intended recipient (s) and may contain confidential and privileged information. Any unauthorized review, use, disclosure or distribution is prohibited. If you are not the intended recipient, please contact the sender by reply email and destroy all copies of the original message. To reply to our email administrator directly, send an email to EmailAdmin@xxxxxxxxxxxx Toys "R" Us, Inc. -- 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.