MVSFORUMS.com

[vinnay]

Hi,

I want to write a stored procedure which resolves the -805 probelm during the DB2 program execution.

i.e My code looks like:

EXEC SQL
SELECT STATEMENT

END-EXEC

EVALUATE SQLCODE
WHEN -805
CALL "STORED-PROC" USING WS-PROG-NAME
WHEN 100
DISPLAY ' NO ROWS'
WHEN OTHERS
CALL 'ABEND-ROUTIN' USING SQLCODE
END-EVALUATE.

----
So whenever -805 occured my stored procedure will REBIND the given program. ( i will use same DBRM library for all programs).

In future i dont want to see my program abended with -805.

Please help me in writing the stored procedure for this request.

[shekar123]

vinnay,

If you do not want to execute the condition for -805 in the Evaluate statement ,can you make use of skipping that statement that is continue further execution .

[vinnay]

Hi Shekar123,

If i continue with -805 sqlcode it will not fetch any data in program. My question is, i want to resolve -805 in my program itself in stead of doing a seperate BIND process thru JCL or Online.

[kolusu]

[vinnay]

Kolusu,

Is there any other way to BIND the program without submitting JCL or thru Interactive panel? It would be a great help for me if you could answer for this .


Thanks in advance.

[kolusu]