Call DB2 user defined function from Cobol

Ziko13 · New User Joined: 19 Jul 2018 Posts: 44 Location: Greece

Hi all,

I am new to DB2 and I have the following question.
We have a requirement to get the result from a DB2 user defined function.
How do you embed the DB2 function into the cobol program?
A small example?

Please get back if my first message is vague.

Thank you in advance.

Rohit Umarjikar · Posted: Thu Mar 14, 2019 6:02 pm

Anything related to DB2 must be wrapped in EXEC SQL.. END-EXEC.
You can query the function on SYSIBM.SYSDUMYY1 or use a SET.

Ziko13 · New User Joined: 19 Jul 2018 Posts: 44 Location: Greece

Thank you for the answer.
I assume the set you mention will be something like :

exec sql set :result = db2function end-exec

Ziko13 · New User Joined: 19 Jul 2018 Posts: 44 Location: Greece

A code example would be very helpful

Rohit Umarjikar · Posted: Fri Mar 15, 2019 6:13 am

Please do the research yourself next time and refer to the manuals if required which makes the learnings mutual.
See if this helps and if not then talk to DBA
ibmmainframes.com/about42391.html#200049

Ziko13 · New User Joined: 19 Jul 2018 Posts: 44 Location: Greece

program ok thank you for the valuable comments.