GIZMO DB2 extract in a JCL

jruiza · New User Joined: 31 Aug 2005 Posts: 23

I am using a GIZMO proc to extract data from Db2 tables in a JCL. I would like to include SQL query in a SYSIN.
Please, any help.

jruiza · New User Joined: 31 Aug 2005 Posts: 23

I tried this. It does not work

//SQLIN DD Dsn= datasetname,disp=shr

datasetname..
//
FORMAT=EXTERNAL
SELECT B.CVDB_CLNT_CD,
B.VEND_CD,
C.ENTPR_CD,
C.VEND_LINE_1_NM,
C.VEND_LINE_2_NM,
A.CNTC_NM,
A.ALTER_DATE,
B.LOG_ACTN_CD
FROM CV.CV2VEND A,CV.CV2CLNT B,CV.CV2VADDR C
WHERE B.CVDB_CLNT_CD = 'BCF'
AND A.VEND_CD = B.VEND_CD
AND A.ALTER_DATE = C.ALTER_DATE
ORDER BY A.VEND_CD
//*

Anbudan · New User Joined: 07 Sep 2005 Posts: 26 Location: Germany

Hi jruiza

If Ur question is to Unload from the DB2 table, then see below:
This will retreive records from the DB2 table and put it into ur output file.

Here is the easy way:

//UNLOAD EXEC PGM=IKJEFT01,DYNAMNBR=20
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD *
DSN SYSTEM()
RUN PROGRAM(DSNTIAUL) PARM('SQL')
//SYSUDUMP DD SYSOUT=*
//SYSPUNCH DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSREC00 DD DSN=JRUIZA.TEST.OUTFILE,
// UNIT=SYSDA,SPACE=(CYL,(10,10),RLSE),
// DCB=(BLKSIZE=0,LRECL=10,RECFM=FB),
// DISP=(NEW,CATLG,DELETE)
//SYSIN DD *
SELECT "NAME"
, SUBSTR(' ',1,1)
FROM X
WITH UR
;
//*

If you have any doubt,

Contact me

Anbudan