Dear Listers,
I used PGM=IKJEFT01 to successfully unload data from a DB2 table. However,
when I browse the dataset, the column value is not readable (it shows up as
binary). This caused the LRECL to be less than the expected record length. I
need to be able to see the data in the dataset (External format ?) as the binary
data is causing an ABEND in the downstream COBOL program
How do I modify the SYSIN cards to achive the above? The SYSIN currently has the
following SELECT statement:
=======================================================================
SELECT T1.C1, C1 defined as INTEGER
T1.C2, C2 defined as SMALLINT
T1.C3, C3 defined as INTEGER
T2.C5 C5 defined as DATE
FROM T1, T2
WHERE T1.C1 = T2.C1
AND T1.C4 = 'A'
=========================================================================
I had tried with following CARDS but got a SQLCODE a -104
SELECT T1.C1,
T1.C2,
T1.C3,
T2.C5
INTO col1 INTEGER EXTERNAL(9),
col2 SMALLINT EXTERNAL(4),
col3 INTEGER EXTERNAL(9),
col4 CHAR(10)
FROM T1, T2
WHERE T1.C1 = T2.C1
AND T1.C4 = 'A'
Looking for any pointers