what is a “-913 error” ?
The previous answer wasn’t much help. On the other hand, the question didn’t give much to go on and what was given was contradictory — tags included “RPG” and “RPGLE” but the question asked about COBOL programs. It also referenced “-913 errors” even though the errors have essentially nothing to do with COBOL (nor RPG).
Because there was also a reference to “*none commitment control”, it seems likely that the error is actually the old SQLCODE -913.
That should translate to SQLSTATE 57033 and also should show message SQL0913. The message text should be “The requested object &1 in &2 type *&3 is either in use by another application process or a row in the object is in use by either another application process or another cursor in this application process.”
Look at the previously listed messages in the job log (DSPJOBLOG command) or from interactive SQL press F10 (Display messages in job log) on this display to determine if this is an object or record lock wait time out. Do one of the following:<ul>
<li>If the object is locked by another application process, try the SQL statement again when the object is not in use. Use the Work with Object Locks (WRKOBJLCK) command to determine who is currently using the object.</li><li>If the object is a schema and an attempt was made to create a table, view, or index into this schema under commitment control, a save-while-active operation may be in progress on the same schema by another job in the system. Try the request again when the save-while-active processing is complete.</li><li>If a record is locked by another application process, try the SQL statement again when the record is not in use. The Display Record Locks (DSPRCDLCK) command will determine who is currently using the record.</li><li>If this is a record lock held by another cursor in the same application process, you must issue a COMMIT, ROLLBACK, or another FETCH statement on the cursor that is holding the lock before issuing this SQL statement. If this error occurs frequently, use the Change Physical File (CHGPF), Change Logical File (CHGLF), or Override Data Base File (OVRDBF) command to change the object or record wait time out.</li>
Without knowing at least a little more about the definition of the tables, there’s not much more that can be said here.