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


  1.  Home
  2. RPG400-L
  3. February 2003

AW: RPG compiler error

Rick,

after installing kum PTF C2344520 the problem is still pending.
What I have found out now by several test is:
The compiler error occurs always, if you use a keylist with more than 4
keyfields. Check out your example and limit the keylist to 4 by specifying
e.g.   "Chain %kds(KList:4) Recordname;". I tried this on different files,
LFs and PFs, and the problem appeared always in the same manner.
I'll setup an error ticket at our national IBM support center on next
Monday.

I wonder if anybody else in our user group can reproduce this compiler
error. Just make a file operation with %kds and more than 4 keyfields.

Kind Regards,
Werner Noll

-----Ursprüngliche Nachricht-----
Von: Chevalier, Rick [mailto:Rick.Chevalier@xxxxxxxxxxxxxxx]
Gesendet: Freitag, 14. Februar 2003 18:09
An: 'RPG programming on the AS400 / iSeries'
Betreff: RE: RPG compiler error


Werner,

I checked with our operations group and the PTF is loaded but not applied
yet.  They will try to IPL this weekend.

I wonder if it is related somehow to the file.  I used it last week in
another program (also free form) with no issues.  I compared code, and
except for the file name it's identical.

Rick

-----Original Message-----
From: Werner Noll [mailto:werner.noll@xxxxxxxxx]
Sent: Friday, February 14, 2003 11:03 AM
To: 'RPG programming on the AS400 / iSeries'
Subject: AW: RPG compiler error

Rick,

it obviously occurs, if you use 2 files with the same record format, where
one of them is renamed in the file specs.
I keep you informed what will happen after installing the new kum PTF.

Regards,

Werner Noll

-----Ursprüngliche Nachricht-----
Von: Chevalier, Rick [mailto:Rick.Chevalier@xxxxxxxxxxxxxxx]
Gesendet: Freitag, 14. Februar 2003 17:37
An: 'RPG programming on the AS400 / iSeries'
Betreff: RE: RPG compiler error


Werner,

That's it.  I figured it out about the time your message arrived.
Interestingly, this is not the first time I've used %KDS.  This is the first
one not to work though.

Thanks,

Rick

-----Original Message-----
From: Werner Noll [mailto:werner.noll@xxxxxxxxx]
Sent: Friday, February 14, 2003 10:20 AM
To: 'RPG programming on the AS400 / iSeries'
Subject: AW: RPG compiler error

Rick,

I got the same problem when I compile a program in free-format and when I
use for file access the new %KDS function.
I called IBM's service and they have send me the latest kum PTF (C2344520).
I'll install it this weekend.
The actual error is shown in the joblog:
MCH3601    Escape                  40   14.02.03  17:01:08,074224  QRN4MAIN
QRPGLE      *STMT    QRN4MAIN    QRPGLE  
                                     From module . . . . . . . . :
GRPFGCXS                                            
                                     From procedure  . . . . . . :
store_operand                                       
                                     Statement . . . . . . . . . :   15

                                     To module . . . . . . . . . :
GRPFGCXS                                            
                                     To procedure  . . . . . . . :
store_operand                                       
                                     Statement . . . . . . . . . :   15

                                     Message . . . . :   Zeiger für
angegebene Position nicht gesetzt.                   
                                     Ursache  . . . . :   Es wurde ein
Zeiger, entweder direkt oder als ein              
                                       Basiszeiger verwendet, für den keine
Adresse festgelegt worden war.               

If the kum PTF does not fix it, I already ordered additional PTFs for APAR
SE08901. They will be issued about next week.

Regards,
Werner Noll
 

-----Ursprüngliche Nachricht-----
Von: Chevalier, Rick [mailto:Rick.Chevalier@xxxxxxxxxxxxxxx]
Gesendet: Freitag, 14. Februar 2003 16:36
An: RPG400 Mailing List (E-mail)
Betreff: RPG compiler error


Has anyone encountered this error compiling an ILE program?

* * * * *   E N D   O F   A D D I T I O N A L   D I A G N O S T I C   M E S
S A G E S   * * * * *
Compilation stopped. Internal failure occurred. Error code is  1.


There are no other errors in the program.  I don't know where to start with
this one but I'm guessing it's something in the way I put the code together.
I haven't been able to find it yet though.  Any suggestions?

I can send the code if anyone wants to see it.  It's rather long so I didn't
want to include it here.

Rick Chevalier
Sr. Programmer Analyst

(817) 525-7178
rick.chevalier@xxxxxxxxxxxxxxx

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

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

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

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

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