Re: RPG/RPT Compiler Limitations .. CPF6301

[Jon.Paris@xxxxxx]

 >> I have run into what would appear to be a compiler limitation. and, the
vendor will not accept converting the pgm to ILE <yet>

Bigger fools them - but then we've all had that debate before <grin>



 >> CPF 6301 - Intermediate representation of program (IRP) contains  19
errors

Although there are circumstances when the compiler will "blow" when
handling a program that is too large this is not the normal symptom.  In my
opinion any compiler failure that indicates there are errors in the IRP is
a compiler error not yours and should immediately be reported as an APAR.
Of course you should check that you are up to date on PTFs first but you've
done that right?

That said - you need to get your code running.  Compile the program with
GENOPT *LIST - this will force the compiler to output the (probably
massive) MI listing.  Look at the spool file and attempt to identify the
statement(s) that are causing the error.  Unfortunately the RPG compiler is
not as helpful as the COBOL one in matching the RPG to the MI, but the BRK
instructions are the ones you need to look for - these are the ones used to
set the location of breakpoints when debugging and match the RPG source
sequence numbers.  Once you have identified the Opcode causing the problem
you can attempt to find an alternative coding method until IBM fix the
problem.  Be aware though that if it is a huge program that is causing the
compiler to screw up, that even if they fix the compiler it will probably
result in a "program too big" type message and you'll still have to convert
to RPG IV or split it up to get it to compile.  It's not JDE software is
it?

This example shows the MI for the lines 33 and 34 (as seen in SEU):

0033.00      C                     EXCPTDETAIL
0034.00      C   OF                EXCPTHDG

These generate (some lines removed for brevity):


 BRK '3300    '             <<<<< This is for line 33
 CALLI DETAIL ,*,.LINERTN

 BRK '3400    '   -         <<<<< and this one for 34
 CMPBLA(B) *INOF,*ON/NEQ(.CID0001)
 CALLI HDG ,*,.LINERTN


Hope this helps.

+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---