Re: free form *inlr

[Jeff Young <cooljeff913@xxxxxxxxx>]

I did not make myself clear.
Yes, the LR indicator CAN be tested at Detail time, *but* it will NEVER be ON.
The LR indicator is *only* ON at TOTAL time, thus testing it a Detail time 
(unless it is set on manualy) will always result in a Not True condition.

Thanks,
 
Jeff Young 
Sr. Programmer Analyst
IBM -e(logo) server Certified Systems Exper - iSeries Technical Solutions V5R2 
IBM  Certified Specialist- e(logo) server i5Series Technical Solutions Designer 
V5R3
IBM  Certified Specialist- e(logo)server i5Series Technical Solutions 
Implementer V5R3 


  
 





----- Original Message ----
From: Peter Dow (ML) <maillist@xxxxxxxxxxxxxxx>
To: RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
Sent: Friday, May 4, 2007 2:19:08 PM
Subject: Re: free form *inlr


Hi Jeff,

Actually, *INLR can be on at Detail time -- it one sense it's just 
another indicator:

/free
    *INLR = *on;
    dsply *INLR;
/end-free
CLR      exsr Whatever
/free

In fact, I think Scott Klement turns it on at the beginning of his 
programs -- check the archives.

*Peter Dow* /
Dow Software Services, Inc.
909 793-9050
pdow@xxxxxxxxxxxxxxx <mailto:pdow@xxxxxxxxxxxxxxx> /

Jeff Young wrote:
> That would not work, as *INLR in NEVER on at Detail time.
> All the free form code after the fixed form CL0    If     *InLR would be at 
> L0 total time for the cycle.
>  
> Jeff Young 
> Sr. Programmer Analyst
> IBM -e(logo) server Certified Systems Exper - iSeries Technical Solutions 
> V5R2 
> IBM  Certified Specialist- e(logo) server i5Series Technical Solutions 
> Designer V5R3
> IBM  Certified Specialist- e(logo)server i5Series Technical Solutions 
> Implementer V5R3 
>
>
>   
>  
>
>
>
>
>
> ----- Original Message ----
> From: "Michael_Schutte@xxxxxxxxxxxx" <Michael_Schutte@xxxxxxxxxxxx>
> To: RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
> Sent: Friday, May 4, 2007 10:29:22 AM
> Subject: Re: free form *inlr
>
>
> Please tell me that you didn't write a cycle program in Free form.   If so,
> how about just...
>
> If *InLR = *On;
>   ExSr TotalTime#;
> EndIf;
>
> At the end of the cycle.
>
> Michael Schutte
> Admin Professional
> Bob Evans Farms, Inc.
> Big Farm Salads - Hurry in to enjoy the newest farm-fresh taste from Bob
> Evans, the "Home of Homestyle."
>
>
> rpg400-l-bounces@xxxxxxxxxxxx wrote on 05/04/2007 10:25:16 AM:
>
>   
> > In free form, how does one specify lr total time?
> >
> > Darrell Lee
> > Information Technology
> > Extension 7127
> > --
> > 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.
> >
> >     
>
>