zOs/REXX.O08/DBXCDL
dsn = dsn.dbx.cdl
id = lmmBegin(dsn)
list = ''
i2 = 9999
len = 0
do forever
m = lmmNext(id)
say m
if m = test1 then
iterate
if m = '' then
leave
call readDsn dsn'('m')', i.
do x = 1 to i.0
w1 = word(i.x, 1)
if wordPos(w1, list) < 1 then do
list = list w1
$£ list 'in' x m':' strip(i.x)
end
ii = wordIndex(i.x, 2)
if ii > 0 & ii < max(i2, 11) then do
i2 = ii
$£ 'i2' i2 'in' x m':' strip(i.x)
end
if len < length(i.x) then do
len = length(i.x)
$£ 'len' len 'in' x m':' strip(i.x)
end
end
end
$***out 20080909 18:07:27
SQLID in 1 AAAAAAA1: SQLID SET CURRENT SQLID = 'S100447' ;
i2 11 in 1 AAAAAAA1: SQLID SET CURRENT SQLID = 'S100447' ;
len 80 in 1 AAAAAAA1: SQLID SET CURRENT SQLID = 'S100447' ;
SQLID CREATE in 2 AAAAAAA1: CREATE CREATE TABLESPACE A401A
SQLID CREATE ALTER in 2 AAAAAAA3: ALTER ADMIN ALTER TABLE A540769.TWK401A
SQLID CREATE ALTER DROP in 2 AU020010: DROP ADMIN DROP TABLESPACE AU02A1A.
i2 9 in 83 AU020010: CREATE TH DEFAULT BEFORE AU180020;
i2 9 in 86 AU020010: CREATE TH DEFAULT BEFORE AU180020;
i2 9 in 89 AU020010: CREATE U180020;
i2 9 in 107 AU020010: CREATE TH DEFAULT BEFORE AU181020;
i2 9 in 110 AU020010: CREATE TH DEFAULT BEFORE AU181020;
i2 9 in 113 AU020010: CREATE U181020;
i2 9 in 131 AU020010: CREATE TH DEFAULT BEFORE AU190020;
i2 9 in 134 AU020010: CREATE TH DEFAULT BEFORE AU190020;
i2 9 in 137 AU020010: CREATE U190020;
i2 9 in 155 AU020010: CREATE TH DEFAULT BEFORE AU191020;
i2 9 in 158 AU020010: CREATE TH DEFAULT BEFORE AU191020;
i2 9 in 161 AU020010: CREATE U191020;
SQLID CREATE ALTER DROP SQL in 2 AV050020: SQL ALTER TABLE "OA1A"."TAV503A1" AD
i2 5 in 2 AV050020: SQL ALTER TABLE "OA1A"."TAV503A1" ADD "AV503102"
i2 5 in 3 AV050020: SQL DATE WITH DEFAULT NULL;
i2 9 in 4 LERZ0002: ALTER TH DEFAULT BEFORE FELD4;
i2 9 in 4 NI021060: CREATE --#SET TERMINATOR ?
i2 9 in 40 NI021060: CREATE --#SET TERMINATOR ;
i2 9 in 43 NI021060: CREATE --#SET TERMINATOR ?
i2 9 in 78 NI021060: CREATE --#SET TERMINATOR ;
i2 9 in 81 NI021060: CREATE --#SET TERMINATOR ?
i2 9 in 162 NI021060: CREATE --#SET TERMINATOR ;
i2 9 in 885 NI021120: CREATE --#SET TERMINATOR ?
i2 9 in 921 NI021120: CREATE --#SET TERMINATOR ;
i2 9 in 924 NI021120: CREATE --#SET TERMINATOR ?
i2 9 in 959 NI021120: CREATE --#SET TERMINATOR ;
i2 9 in 653 NI021130: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 655 NI021130: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 813 NI021130: CREATE ;
i2 9 in 4 PK000010: ALTER TH DEFAULT BEFORE FELD4;
i2 9 in 4 PK010023: ALTER "
i2 9 in 6 PK010023: ALTER ";
i2 9 in 4 PK010030: ALTER "
i2 9 in 6 PK010030: ALTER ";
i2 9 in 4 PK010041: ALTER ";
i2 9 in 4 PK010042: ALTER TH DEFAULT BEFORE " ";
i2 9 in 4 PK020020: ALTER TH DEFAULT BEFORE DI040_STATUS;
i2 9 in 2 PK020030: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 6 PK020030: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 2 PK020042: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 4 PK030020: ALTER TH DEFAULT BEFORE FELD4
i2 9 in 6 PK030020: ALTER TH DEFAULT BEFORE FELD4;
i2 9 in 4 PK030021: ALTER TH DEFAULT BEFORE FELD4
i2 9 in 6 PK030021: ALTER TH DEFAULT BEFORE FELD4
i2 9 in 8 PK030021: ALTER ELD4;
i2 9 in 4 PK030022: ALTER TH DEFAULT BEFORE FELD4
i2 9 in 6 PK030022: ALTER TH DEFAULT BEFORE FELD4
i2 9 in 8 PK030022: ALTER ELD4
i2 9 in 10 PK030022: ALTER TH DEFAULT BEFORE " "
i2 9 in 4 PK030030: ALTER TH DEFAULT BEFORE FELD4
i2 9 in 6 PK030030: ALTER TH DEFAULT BEFORE FELD4
i2 9 in 8 PK030030: ALTER ELD4
i2 9 in 10 PK030030: ALTER TH DEFAULT BEFORE " "
i2 9 in 4 PK030100: ALTER TH DEFAULT BEFORE " ";
i2 9 in 12 PK030110: ALTER TH DEFAULT BEFORE " "
i2 9 in 2 PK030130: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 2 PK030140: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 6 PK030140: DROP --#SET ACCEPT_RC 0 -204
SQLID CREATE ALTER DROP SQL -- in 7 PK030140: -- DROP DROP ALIAS GDB9998
i2 6 in 7 PK030140: -- DROP DROP ALIAS GDB9998.AWK408A1 ;
i2 9 in 2 PK030150: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 6 PK030150: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 14 SD010011: ALTER FAULT NULL BEFORE FILLER
SQLID CREATE ALTER DROP SQL -- in 1 SV500010:
i2 9 in 4 VDPS0251: ALTER 1_PHNE,CUST_CONTACT1_EML,CUST_CONTACT2_NAME,CUST_CON
i2 9 in 5 VDPS0251: ALTER ACT2_EML,CREATETIMESTAMP,UPDATETIMESTAMP);
i2 9 in 29 VDPS0251: ALTER S_ACTIVE,DB_COLUMN,TABLE_NAME,DESCRIPTION,CREATETIM
i2 9 in 30 VDPS0251: ALTER P);
i2 9 in 33 VDPS0251: ALTER RIPTION,CREATETIMESTAMP,UPDATETIMESTAMP);
i2 9 in 36 VDPS0251: ALTER D,IS_ACTIVE,RECORD_ID,CREATETIMESTAMP,UPDATETIMESTA
i2 9 in 42 VDPS0251: ALTER TETIMESTAMP,UPDATETIMESTAMP);
i2 9 in 48 VDPS0251: ALTER L_STMT,DESCRIPTION,CREATETIMESTAMP,UPDATETIMESTAMP)
i2 9 in 51 VDPS0251: ALTER _STMT,DESCRIPTION,CREATETIMESTAMP,UPDATETIMESTAMP);
i2 9 in 54 VDPS0251: ALTER TETIMESTAMP,UPDATETIMESTAMP);
i2 9 in 85 VDPS0251: ALTER S_ACTIVE,CREATETIMESTAMP,UPDATETIMESTAMP);
i2 9 in 7 WB110090: CREATE .speichern. Die werden bei der Verknuepfung wieder b
i2 9 in 47 WB120160: CREATE FTEN ZU BESTIMMENDEN GEGENPARTEIEN MIT DEN DAZUGEHO
i2 9 in 24 WI020062: ALTER I11802
i2 9 in 32 WI020062: ALTER WI11805
i2 9 in 34 WI020062: ALTER WI11805
i2 9 in 36 WI020062: ALTER WI11805
i2 9 in 38 WI020062: ALTER WI11805
i2 9 in 24 WK402AA0: ALTER K40202
i2 9 in 32 WK402AA0: ALTER WK40205
i2 9 in 34 WK402AA0: ALTER WK40205
i2 9 in 36 WK402AA0: ALTER WK40205
i2 9 in 38 WK402AA0: ALTER WK40205
i2 9 in 24 WK402AB0: ALTER K40202
i2 9 in 32 WK402AB0: ALTER WK40205
i2 9 in 34 WK402AB0: ALTER WK40205
i2 9 in 36 WK402AB0: ALTER WK40205
i2 9 in 38 WK402AB0: ALTER WK40205
len 99 in 8 WK402AC0: CREATE TRACKMOD YES
i2 9 in 2 WK405AB0: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 2 WK406AA2: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 2 WK408BB0: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 6 WK408BB0: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 6 WQ010200: ALTER "
i2 9 in 8 WQ010200: ALTER "
i2 9 in 10 WQ010200: ALTER ";
i2 9 in 4 XR01003A: ALTER ITH DEFAULT BEFORE XR103_UPDATE_PID
i2 9 in 6 XR01003A: ALTER ITH DEFAULT BEFORE XR103_UPDATE_PID;
i2 9 in 8 XXWK0120: CREATE --#SET TERMINATOR ?
i2 9 in 15 XXWK0120: CREATE --#SET TERMINATOR ;
i2 9 in 4 XXWK0121: CREATE --#SET TERMINATOR ?
i2 9 in 12 XXWK0121: CREATE --#SET TERMINATOR ;
i2 9 in 49 XXWK0752: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 49 XXWK2100: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 49 XXWK2101: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 49 XXWK2102: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 49 XXWK2103: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 49 XXWK2105: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 864 XXWK2230: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 866 XXWK2230: DROP --#SET ACCEPT_RC 0 -204
$***out 20080909 17:59:41
SQLID in 1 AAAAAAA1: SQLID SET CURRENT SQLID = 'S100447' ;
i2 11 in 1 AAAAAAA1: SQLID SET CURRENT SQLID = 'S100447' ;
len 80 in 1 AAAAAAA1: SQLID SET CURRENT SQLID = 'S100447' ;
SQLID CREATE in 2 AAAAAAA1: CREATE CREATE TABLESPACE A401A
SQLID CREATE ALTER in 2 AAAAAAA3: ALTER ADMIN ALTER TABLE A540769.TWK401A
SQLID CREATE ALTER DROP in 2 AU020010: DROP ADMIN DROP TABLESPACE AU02A1A.
i2 9 in 83 AU020010: CREATE TH DEFAULT BEFORE AU180020;
i2 9 in 86 AU020010: CREATE TH DEFAULT BEFORE AU180020;
i2 9 in 89 AU020010: CREATE U180020;
i2 9 in 107 AU020010: CREATE TH DEFAULT BEFORE AU181020;
i2 9 in 110 AU020010: CREATE TH DEFAULT BEFORE AU181020;
i2 9 in 113 AU020010: CREATE U181020;
i2 9 in 131 AU020010: CREATE TH DEFAULT BEFORE AU190020;
i2 9 in 134 AU020010: CREATE TH DEFAULT BEFORE AU190020;
i2 9 in 137 AU020010: CREATE U190020;
i2 9 in 155 AU020010: CREATE TH DEFAULT BEFORE AU191020;
i2 9 in 158 AU020010: CREATE TH DEFAULT BEFORE AU191020;
i2 9 in 161 AU020010: CREATE U191020;
SQLID CREATE ALTER DROP SQL in 2 AV050020: SQL ALTER TABLE "OA1A"."TAV503A1" AD
i2 5 in 2 AV050020: SQL ALTER TABLE "OA1A"."TAV503A1" ADD "AV503102"
i2 5 in 3 AV050020: SQL DATE WITH DEFAULT NULL;
i2 9 in 4 LERZ0002: ALTER TH DEFAULT BEFORE FELD4;
i2 9 in 4 NI021060: CREATE --#SET TERMINATOR ?
i2 9 in 40 NI021060: CREATE --#SET TERMINATOR ;
i2 9 in 43 NI021060: CREATE --#SET TERMINATOR ?
i2 9 in 78 NI021060: CREATE --#SET TERMINATOR ;
i2 9 in 81 NI021060: CREATE --#SET TERMINATOR ?
i2 9 in 162 NI021060: CREATE --#SET TERMINATOR ;
i2 9 in 885 NI021120: CREATE --#SET TERMINATOR ?
i2 9 in 921 NI021120: CREATE --#SET TERMINATOR ;
i2 9 in 924 NI021120: CREATE --#SET TERMINATOR ?
i2 9 in 959 NI021120: CREATE --#SET TERMINATOR ;
i2 9 in 653 NI021130: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 655 NI021130: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 813 NI021130: CREATE ;
i2 9 in 4 PK000010: ALTER TH DEFAULT BEFORE FELD4;
i2 9 in 4 PK010023: ALTER "
i2 9 in 6 PK010023: ALTER ";
i2 9 in 4 PK010030: ALTER "
i2 9 in 6 PK010030: ALTER ";
i2 9 in 4 PK010041: ALTER ";
i2 9 in 4 PK010042: ALTER TH DEFAULT BEFORE " ";
i2 9 in 4 PK020020: ALTER TH DEFAULT BEFORE DI040_STATUS;
i2 9 in 2 PK020030: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 6 PK020030: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 2 PK020042: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 4 PK030020: ALTER TH DEFAULT BEFORE FELD4
i2 9 in 6 PK030020: ALTER TH DEFAULT BEFORE FELD4;
i2 9 in 4 PK030021: ALTER TH DEFAULT BEFORE FELD4
i2 9 in 6 PK030021: ALTER TH DEFAULT BEFORE FELD4
i2 9 in 8 PK030021: ALTER ELD4;
i2 9 in 4 PK030022: ALTER TH DEFAULT BEFORE FELD4
i2 9 in 6 PK030022: ALTER TH DEFAULT BEFORE FELD4
i2 9 in 8 PK030022: ALTER ELD4
i2 9 in 10 PK030022: ALTER TH DEFAULT BEFORE " "
i2 9 in 4 PK030030: ALTER TH DEFAULT BEFORE FELD4
i2 9 in 6 PK030030: ALTER TH DEFAULT BEFORE FELD4
i2 9 in 8 PK030030: ALTER ELD4
i2 9 in 10 PK030030: ALTER TH DEFAULT BEFORE " "
i2 9 in 4 PK030100: ALTER TH DEFAULT BEFORE " ";
i2 9 in 12 PK030110: ALTER TH DEFAULT BEFORE " "
i2 9 in 2 PK030130: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 2 PK030140: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 6 PK030140: DROP --#SET ACCEPT_RC 0 -204
SQLID CREATE ALTER DROP SQL -- in 7 PK030140: -- DROP DROP ALIAS GDB9998
i2 6 in 7 PK030140: -- DROP DROP ALIAS GDB9998.AWK408A1 ;
i2 9 in 2 PK030150: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 6 PK030150: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 14 SD010011: ALTER FAULT NULL BEFORE FILLER
SQLID CREATE ALTER DROP SQL -- in 1 SV500010:
SQLID CREATE ALTER DROP SQL -- HIER in 1 TEST1: HIER IST MEIN TEST1 CHANGE
i2 6 in 1 TEST1: HIER IST MEIN TEST1 CHANGE
SQLID CREATE ALTER DROP SQL -- HIER DELTA in 2 TEST1: DELTA
i2 9 in 4 VDPS0251: ALTER 1_PHNE,CUST_CONTACT1_EML,CUST_CONTACT2_NAME,CUST_CON
i2 9 in 5 VDPS0251: ALTER ACT2_EML,CREATETIMESTAMP,UPDATETIMESTAMP);
i2 9 in 29 VDPS0251: ALTER S_ACTIVE,DB_COLUMN,TABLE_NAME,DESCRIPTION,CREATETIM
i2 9 in 30 VDPS0251: ALTER P);
i2 9 in 33 VDPS0251: ALTER RIPTION,CREATETIMESTAMP,UPDATETIMESTAMP);
i2 9 in 36 VDPS0251: ALTER D,IS_ACTIVE,RECORD_ID,CREATETIMESTAMP,UPDATETIMESTA
i2 9 in 42 VDPS0251: ALTER TETIMESTAMP,UPDATETIMESTAMP);
i2 9 in 48 VDPS0251: ALTER L_STMT,DESCRIPTION,CREATETIMESTAMP,UPDATETIMESTAMP)
i2 9 in 51 VDPS0251: ALTER _STMT,DESCRIPTION,CREATETIMESTAMP,UPDATETIMESTAMP);
i2 9 in 54 VDPS0251: ALTER TETIMESTAMP,UPDATETIMESTAMP);
i2 9 in 85 VDPS0251: ALTER S_ACTIVE,CREATETIMESTAMP,UPDATETIMESTAMP);
i2 9 in 7 WB110090: CREATE .speichern. Die werden bei der Verknuepfung wieder b
i2 9 in 47 WB120160: CREATE FTEN ZU BESTIMMENDEN GEGENPARTEIEN MIT DEN DAZUGEHO
i2 9 in 24 WI020062: ALTER I11802
i2 9 in 32 WI020062: ALTER WI11805
i2 9 in 34 WI020062: ALTER WI11805
i2 9 in 36 WI020062: ALTER WI11805
i2 9 in 38 WI020062: ALTER WI11805
i2 9 in 24 WK402AA0: ALTER K40202
i2 9 in 32 WK402AA0: ALTER WK40205
i2 9 in 34 WK402AA0: ALTER WK40205
i2 9 in 36 WK402AA0: ALTER WK40205
i2 9 in 38 WK402AA0: ALTER WK40205
i2 9 in 24 WK402AB0: ALTER K40202
i2 9 in 32 WK402AB0: ALTER WK40205
i2 9 in 34 WK402AB0: ALTER WK40205
i2 9 in 36 WK402AB0: ALTER WK40205
i2 9 in 38 WK402AB0: ALTER WK40205
len 99 in 8 WK402AC0: CREATE TRACKMOD YES
i2 9 in 2 WK405AB0: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 2 WK406AA2: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 2 WK408BB0: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 6 WK408BB0: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 6 WQ010200: ALTER "
i2 9 in 8 WQ010200: ALTER "
i2 9 in 10 WQ010200: ALTER ";
i2 9 in 4 XR01003A: ALTER ITH DEFAULT BEFORE XR103_UPDATE_PID
i2 9 in 6 XR01003A: ALTER ITH DEFAULT BEFORE XR103_UPDATE_PID;
i2 9 in 8 XXWK0120: CREATE --#SET TERMINATOR ?
i2 9 in 15 XXWK0120: CREATE --#SET TERMINATOR ;
i2 9 in 4 XXWK0121: CREATE --#SET TERMINATOR ?
i2 9 in 12 XXWK0121: CREATE --#SET TERMINATOR ;
i2 9 in 49 XXWK0752: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 49 XXWK2100: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 49 XXWK2101: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 49 XXWK2102: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 49 XXWK2103: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 49 XXWK2105: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 864 XXWK2230: DROP --#SET ACCEPT_RC 0 -204
i2 9 in 866 XXWK2230: DROP --#SET ACCEPT_RC 0 -204
$***out 20080909 17:58:14
$***out 20080909 17:55:55
$***out 20080909 17:54:39
$***out 20080909 17:37:41
$***out 20080909 17:36:43
$***out 20080909 17:36:02
$***out 20080909 17:31:45
$***out