RE: Question on using QZDFMDB2 to run SQL interactively in a CL program

I've used this in the past:

/*******************************************************************/
/* Don't present a Qshell terminal session, keep a log of all
*/
/* activity.
*/
/*******************************************************************/

ADDENVVAR ENVVAR(QIBM_QSH_CMD_OUTPUT) +
VALUE('FILEAPPEND=/tmp/program.shell.log')
MONMSG CPFA980 /* Error adding value */
ADDENVVAR ENVVAR(QIBM_QSH_CMD_ESCAPE_MSG) +
REPLACE(*YES) +
VALUE(Y)
MONMSG CPFA980 /* Error adding value */



But another question: Why not just use RUNSQL? It's an IBM command and
does inserts with no muss or fuss.

--
Jim Oberholtzer
Agile Technology Architects


-----Original Message-----
From: MIDRANGE-L [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of
Richard Schoen
Sent: Wednesday, July 20, 2016 5:32 PM
To: midrange-l@xxxxxxxxxxxx
Subject: Question on using QZDFMDB2 to run SQL interactively in a CL program

Using the following call in a CL works fine and allows me to use current job
QTEMP library to insert a record to a file in QTEMP.

However the call prompts at the end to "Press Enter to end terminal
session."

CALL PGM(QZDFMDB2) PARM('INSERT INTO QTEMP.JUNK (JUNK) VALUES(''This is a
test 2'')')

Any ideas what I might need to override to get rid of the prompt in an
interactive job ?

I can use the Pase equivalent below if needed, but can't access files in
current job QTEMP library:

QSH('Db2 "INSERT INTO QTEMP.JUNK (JUNK) VALUES(''This is a test 2'')" ')

Any thoughts appreciated.

Regards,

[http://static.helpsystems.com/hs/email/templates/signatures-final/images/hs
-logo2.png]

Richard Schoen
Director of Document Management

e. richard.schoen@xxxxxxxxxxxxxxx<mailto:richard.schoen@xxxxxxxxxxxxxxx>
p. 952.486.6802
w. helpsystems.com<http://www.helpsystems.com/>
[cid:image002.jpg@01D1E2AC.AC74C0C0]<http://www.linkedin.com/in/richardschoe
n>[cid:image003.jpg@01D1E2AC.AC74C0C0]<http://www.twitter.com/richardschoen>




--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe, unsubscribe,
or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a
moment to review the archives at http://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxx for any subscription related questions.