RE: rpg style question

["Wintermute, Sharon" <Sharon.Wintermute@xxxxxxxxxxxxxxxx>]

It's the recording in the PF that caught my attention. 

Usually when you are recording to the PF you are calling the modules at very different times.  Say days or weeks apart.  That's why rules based systems record the initial results of the test in a physical.  


Sharon Wintermute


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Charles Wilt
Sent: Thursday, January 14, 2010 9:09 AM
To: RPG programming on the IBM i / System i
Subject: Re: rpg style question

Sharon,

I don't understand what you're trying to say here; nor do I see how it
applies to the original question.

David,

Short answer is you can't do it.  RPG treats 1 character fields
different than indicators and you can't define a indicator field in a
file.



Charles



On Thu, Jan 14, 2010 at 9:47 AM, Wintermute, Sharon
<Sharon.Wintermute@xxxxxxxxxxxxxxxx> wrote:
> This technique may be used if you are using a rules based system that is
> modified without coding.
>
> For example:
>
> Having seen this in several pricing systems, it is useful when at the
> time the order was placed, the order passed the rules then in force.  If
> at a later date when the order is finally processed you do not have to
> try to "back-date" the rules processing.  There are times when some
> rules are at original entry versus at point of use.
>
> HTH,
>
> Sharon Wintermute
>
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of David FOXWELL
> Sent: Thursday, January 14, 2010 8:37 AM
> To: RPG programming on the IBM i / System i
> Subject: rpg style question
>
> Hi,
>
> Having to regularly determine the value of flags as 'Y' or 'N', then
> record it in a PF.
>
> This means having to code
>
> IF rules satisfied;
>    MyFlag = gYES;
>
> ELSE;
>    MyFlag = gNO;
> Endif;
>
>
> Then, maybe in another module,etc
>
> IF MyFlag <> gYES;
>    Don't do stuff;
> ELSE;
>    Do stuff;
> Endif
>
> Comments?
> What's the reasoning behind this method?
>
> I'd <like> to be able to use an indicator :
>
> MyFlag = ( rules satisfied);
>
> Then,
>
> IF MyFlag;
>    do stuff;
> ELSE;
>    Don't Do stuff;
> Endif
>
>
> Thanks.
> --
> This is the RPG programming on the IBM i / System i (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 is the RPG programming on the IBM i / System i (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.