|
I think we have finally found a solution to this problem. The CEETSTA prototype must include the feedback code parameter. It needs to specify OPTIONS(*OMIT). Specifying OPTIONS(*NOPASS) and not passing the parameter appears to have contributed to this problem. Since the original post this problem has shown up in 2 more modules. The ILE RPG reference manual example for V3R7 does not pass this parameter or declare it on the prototype. This will cause problems such as variables in previously called and active programs being updated when CEETSTA is called. David Morris >>> David Morris <dmorris@plumcreek.com> 02/10 10:02 AM >>> We have over 100 programs RPGIV programs that use the CEETSTA API. In two of those programs CEETSTA wipes out unrelated variables. In this latest case we call a subprocedure that is in a service program and a global variable is set to zero when the procedure calls CEETSTA to see if a parameter was omitted. Because the parameter specifies CONST we cannot test the address to see if it is null (this makes no sense). Removing the CONST and testing the address fixes the problem. Who knows what other variables are corrupted in our other 100 programs. If this is happening at least 2% of the time it must be fairly prevalent. We have also had some problems using the CEEDOD API. On occasion it says operational descriptors were not passed when OPDESC was specified on a prototype. Has anyone else reported a problems with these APIs? It is a real pain to report problems like this because if it has been reported we get billed. If it hasn't they usually ask us to reduce our code to the bare minimum that can duplicate the error. In this case that could easily take a day. Several years back we implemented a reporting system that used SQL extensively. We reported 5 or 6 problems that required APARs to be opened. We spent over 100 hours documenting and reporting these errors. Then we had to agree to test the fixes. It seems like IBM should offer a reward to the customer to compensate for the time that goes into reporting these types of errors. Netscape does. David Morris ! * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * This is the RPG/400 Discussion Mailing List! To submit a new * * message, send your mail to "RPG400-L@midrange.com". To unsubscribe * * from this list send email to MAJORDOMO@midrange.com and specify * * 'unsubscribe RPG400-L' in the body of your message. Questions should * * be directed to the list owner / operator: david@midrange.com * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * This is the RPG/400 Discussion Mailing List! To submit a new * * message, send your mail to "RPG400-L@midrange.com". To unsubscribe * * from this list send email to MAJORDOMO@midrange.com and specify * * 'unsubscribe RPG400-L' in the body of your message. Questions should * * be directed to the list owner / operator: david@midrange.com * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
As an Amazon Associate we earn from qualifying purchases.
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.