× 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.



Oh gosh, are we writing CL?
LOL!  Just kidding

RPG only uses the + and - signs when you break a literal in half and
continue it onto the next line. Otherwise NO continuation symbol is needed.
The only exception is breaking a field name which uses three periods as the
continuation "symbol".
-Bob


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Tim Kredlo
Sent: Tuesday, August 31, 2004 11:09 AM
To: RPG400-L@xxxxxxxxxxxx
Subject: Wrap calc line

List,

The following statement is too long to fit on one line.
When I attempt to split it as follows, 

IpOutPrms.IpRetCod = IpB00ODBF(IpInPrms.File: + 
                                  IpInPrms.Library:
                                  IpInPrms.Member);
I received the following compile error:

*RNF7421 30      1 Operands are not compatible with the type of operator.

I change the line to:
IpOutPrms.IpRetCod = +                                       
   IpB00ODBF(IpInPrms.File:IpInPrms.Library:IpInPrms.Member);
and received the same error.

In order to avoid wrapping (and make sure that was the problem)
I created 'file' using  'Like(IpInPrms.File)',
              'library' using 'Like(IpInPrms.Library)', and
              'member' using 'Like(IpInPrms.Member)'

and changed the calc line to:
IpOutPrms.IpRetCod = IpB00ODBF(File:Library:Member);

The program compiled fine.

I don't want to create fields just because of 'line-wrap' issues.

Does anybody see what I am doing wrong in my 'wrap' attempts?

TIA

Tim Kredlo
Exterior Wood, 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 thread ...

Replies:

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.