Hello Steve
Thanks for the suggestion. It worked and we found issue with integration job. The DB2 connector was not configured to use correct port.
Nilesh Butala
-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxxxxxxxx] On Behalf Of Steve Richter
Sent: Thursday, June 11, 2020 4:30 PM
To: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx>
Subject: [EXT] Re: Need assistance with External SQL Proc
CAUTION: EXTERNAL EMAIL
**********************************************************************
is there a joblog in the job which calls the procedure? SQL fails silently, so it can be hard to see where an error has occurred.
Can you call the SQL prosecute from an SQL command line like STRSQL? you should see a message saying the result set returned data.
I would add some code to the procedure that writes messages to a message log file. That way you can start to pin down where the procedure is working and where it fails.
create table qgpl/runlog (
message char(256) not null default ' ',
logDateTime timestamp not null default current timestamp )
insert into qgpl/runlog ( message )
values('received from dtaq ' || char(dqrcdln) || ' ' || LEFT(DQDATA,
INT(DQRCDLN)) ) ;
you can also call QCMDEXC in the SQL procedure and run the DSPJOBLOG
command:
call qcmdexc('dspjoblog output(*print) ', 27) ;
sometimes to track down the actual job in which the procedure is running I will have the procedure send a message to the QSYSOPR message queue:
call qcmdexc('sndmsg msg(hello) tousr(*sysopr) ', 34) ;
-Steve
--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit:
https://urldefense.com/v3/__https://lists.midrange.com/mailman/listinfo/rpg400-l__;!!KLG4ChhCj3v5!LpfpWN66cno8L92ec1hFJctwNkNs6FC274TBMKVL7NUyaT8lizxUiE83TNhmnIk6UFM$
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://urldefense.com/v3/__https://archive.midrange.com/rpg400-l__;!!KLG4ChhCj3v5!LpfpWN66cno8L92ec1hFJctwNkNs6FC274TBMKVL7NUyaT8lizxUiE83TNhm30zDFKU$ .
Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related questions.
Help support midrange.com by shopping at amazon.com with our affiliate link:
https://urldefense.com/v3/__https://amazon.midrange.com__;!!KLG4ChhCj3v5!LpfpWN66cno8L92ec1hFJctwNkNs6FC274TBMKVL7NUyaT8lizxUiE83TNhm5cDLNSw$
midrange.com
