RE: Wrap calc line

["Mike Tobey" <Mike.Tobey@xxxxxxxxxxxxxxxxx>]

Don't use the + on line one, lines 2 and three look correct.

Mike

-----Original Message-----
From: Tim Kredlo [mailto:TKredlo@xxxxxxxxxxxxxxxx]
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.