AS/400: ODP deleted using CLOSQLCSR=*ENDMOD

munduuu

435 pts.

Tags:

AS/400

I/O

RPG Program

Hi, I have created a module with CLOSQLCSR=*ENDMOD and I'm using a procedure in module from old RPG program which is using native I/O. Now when I use CLOSQLCSR=*ENDACTGPR, the OPD was getting reused but program is throwing error record locked as native I/O reads the same file in next step. Now to release lock I used CLOSQLCSR=*ENDMOD but now OPD is deleted every time. Please let me know how can I make my program reuse the ODP.

Asked: August 8, 2014 5:08 AM Last updated: August 12, 2014 3:44 AM

Answer Wiki

Thanks. We'll let you know when a new response is added.

Send me notifications when members answer or reply to this question.

Discuss This Question: 2 Replies

There was an error processing your information. Please try again later.

Thanks. We'll let you know when a new response is added.

Send me notifications when members answer or reply to this question.

WoodEngineer Aug 8, 2014 3:29 PM GMT

Would your module still do what you need if the record were read in non-update mode?

8,225 pointsBadges:

report
munduuu Aug 12, 2014 3:44 AM GMT

Hi , I didn't get your question :( . I am using update statement in the module and after returning to main program read the same record using native i/o. In this situation it is giving me record lock error under CLOSQLCSR=*ENDACTGPR

435 pointsBadges:

report