× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Did IBM publish any RedBook on "FreeFormat Coding in RPG"? I could not find
the PDF stuffs(Related to V5R2 RPG) in IBM Redbooks site.

Murugesh.

-----Original Message-----
From: Kurt Braman [mailto:kbraman@xxxxxxxxxxxxx]
Sent: Tuesday, July 08, 2003 6:49 PM
To: 'RPG programming on the AS400 / iSeries'
Subject: RE: Free Format Codeing at V5R1


This is what I found in the help of CODE/400.  To begin a free-form
calculation
group, specify /FREE in positions 7 to 11 and leave positions 12 to 80
blank.
The free-form calculation block ends when you specify /END-FREE. 

Kurt J. Braman
Highsmith Inc.
kbraman@xxxxxxxxxxxxx

> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Malchow, Grizzly
> Sent: Tuesday, July 08, 2003 7:59 AM
> To: rpg400-l@xxxxxxxxxxxx
> Subject: RE: Free Format Codeing at V5R1
> 
> 
> 
> The TGTRLS is at *CURRENT, but I'm running into the problem 
> in SEU. I'm
> putting the / in the specification column (F,D,C,E,O). That 
> is the right
> column isn't it? I get the reversed image across the whole line like I
> would when something isn't in the right column. Also, every time I go
> into PDM I get the following message:   
> 
> Message ID . . . . . . :   CPF9E72  
> Message type . . . . . :   Escape   
> -- A user was added, but the usage limit for product 5722WDS, license
> term
> V5R1M0, feature 5050, was exceeded.  
> 
> Did anyone ever encounter that message before? Is there a chance this
> could have anything to do with it? It looks like something to do with
> Websphere Development Studio to me.
> Thanks  
> 
> > What is the TGTRLS() parameter on your CRTBNDRPG command?  If that
> doesn't
> > fix the problem, perhaps you could post an error message and code
> snippet.
> > Are you getting the error at compile time?  In SEU?  Code?
> >  --buck
> 
> 
> 
> _______________________________________________
> 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 thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

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.