home *** CD-ROM | disk | FTP | other *** search
DB2 Bind | 1995-10-24 | 16.5 KB | 343 lines |
- ABTDX30 JA2TLLKLNULLID 3
- INCLUDE SQLCA
- WHENEVER SQLERROR GOTO exiterror
- WHENEVER SQLWARNING CONTINUE
- WHENEVER NOT FOUND CONTINUE
- BEGIN DECLARE SECTION
- END DECLARE SECTION
- BEGIN DECLARE SECTION
- END DECLARE SECTION
- CONNECT TO :hvDbName
- BEGIN DECLARE SECTION
- END DECLARE SECTION
- CONNECT TO :hvDbName2 USER :hvUserid USING :hvPassword
- CONNECT RESET
- PREPARE stmt1_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt2_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt3_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt4_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt5_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt6_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt7_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt8_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt9_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt10_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt11_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt12_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt13_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt14_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt15_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt16_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt17_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt18_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt19_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt20_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt21_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt22_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt23_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt24_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt25_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt26_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt27_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt28_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt29_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt30_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt31_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt32_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt33_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt34_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt35_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt36_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt37_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt38_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt39_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt40_0 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt1_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt2_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt3_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt4_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt5_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt6_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt7_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt8_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt9_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt10_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt11_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt12_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt13_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt14_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt15_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt16_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt17_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt18_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt19_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt20_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt21_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt22_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt23_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt24_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt25_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt26_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt27_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt28_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt29_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt30_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt31_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt32_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt33_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt34_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt35_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt36_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt37_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt38_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt39_1 INTO :inSQLDA FROM :stmtbuf
- PREPARE stmt40_1 INTO :inSQLDA FROM :stmtbuf
- DECLARE cursor1 CURSOR FOR stmt1_0
- DECLARE cursor2 CURSOR FOR stmt2_0
- DECLARE cursor3 CURSOR FOR stmt3_0
- DECLARE cursor4 CURSOR FOR stmt4_0
- DECLARE cursor5 CURSOR FOR stmt5_0
- DECLARE cursor6 CURSOR FOR stmt6_0
- DECLARE cursor7 CURSOR FOR stmt7_0
- DECLARE cursor8 CURSOR FOR stmt8_0
- DECLARE cursor9 CURSOR FOR stmt9_0
- DECLARE cursor10 CURSOR FOR stmt10_0
- DECLARE cursor11 CURSOR FOR stmt11_0
- DECLARE cursor12 CURSOR FOR stmt12_0
- DECLARE cursor13 CURSOR FOR stmt13_0
- DECLARE cursor14 CURSOR FOR stmt14_0
- DECLARE cursor15 CURSOR FOR stmt15_0
- DECLARE cursor16 CURSOR FOR stmt16_0
- DECLARE cursor17 CURSOR FOR stmt17_0
- DECLARE cursor18 CURSOR FOR stmt18_0
- DECLARE cursor19 CURSOR FOR stmt19_0
- DECLARE cursor20 CURSOR FOR stmt20_0
- DECLARE cursor21 CURSOR WITH HOLD FOR stmt21_0
- DECLARE cursor22 CURSOR WITH HOLD FOR stmt22_0
- DECLARE cursor23 CURSOR WITH HOLD FOR stmt23_0
- DECLARE cursor24 CURSOR WITH HOLD FOR stmt24_0
- DECLARE cursor25 CURSOR WITH HOLD FOR stmt25_0
- DECLARE cursor26 CURSOR WITH HOLD FOR stmt26_0
- DECLARE cursor27 CURSOR WITH HOLD FOR stmt27_0
- DECLARE cursor28 CURSOR WITH HOLD FOR stmt28_0
- DECLARE cursor29 CURSOR WITH HOLD FOR stmt29_0
- DECLARE cursor30 CURSOR WITH HOLD FOR stmt30_0
- DECLARE cursor31 CURSOR WITH HOLD FOR stmt31_0
- DECLARE cursor32 CURSOR WITH HOLD FOR stmt32_0
- DECLARE cursor33 CURSOR WITH HOLD FOR stmt33_0
- DECLARE cursor34 CURSOR WITH HOLD FOR stmt34_0
- DECLARE cursor35 CURSOR WITH HOLD FOR stmt35_0
- DECLARE cursor36 CURSOR WITH HOLD FOR stmt36_0
- DECLARE cursor37 CURSOR WITH HOLD FOR stmt37_0
- DECLARE cursor38 CURSOR WITH HOLD FOR stmt38_0
- DECLARE cursor39 CURSOR WITH HOLD FOR stmt39_0
- DECLARE cursor40 CURSOR WITH HOLD FOR stmt40_0
- OPEN cursor1 USING DESCRIPTOR :inSQLDA
- OPEN cursor2 USING DESCRIPTOR :inSQLDA
- OPEN cursor3 USING DESCRIPTOR :inSQLDA
- OPEN cursor4 USING DESCRIPTOR :inSQLDA
- OPEN cursor5 USING DESCRIPTOR :inSQLDA
- OPEN cursor6 USING DESCRIPTOR :inSQLDA
- OPEN cursor7 USING DESCRIPTOR :inSQLDA
- OPEN cursor8 USING DESCRIPTOR :inSQLDA
- OPEN cursor9 USING DESCRIPTOR :inSQLDA
- OPEN cursor10 USING DESCRIPTOR :inSQLDA
- OPEN cursor11 USING DESCRIPTOR :inSQLDA
- OPEN cursor12 USING DESCRIPTOR :inSQLDA
- OPEN cursor13 USING DESCRIPTOR :inSQLDA
- OPEN cursor14 USING DESCRIPTOR :inSQLDA
- OPEN cursor15 USING DESCRIPTOR :inSQLDA
- OPEN cursor16 USING DESCRIPTOR :inSQLDA
- OPEN cursor17 USING DESCRIPTOR :inSQLDA
- OPEN cursor18 USING DESCRIPTOR :inSQLDA
- OPEN cursor19 USING DESCRIPTOR :inSQLDA
- OPEN cursor20 USING DESCRIPTOR :inSQLDA
- OPEN cursor21 USING DESCRIPTOR :inSQLDA
- OPEN cursor22 USING DESCRIPTOR :inSQLDA
- OPEN cursor23 USING DESCRIPTOR :inSQLDA
- OPEN cursor24 USING DESCRIPTOR :inSQLDA
- OPEN cursor25 USING DESCRIPTOR :inSQLDA
- OPEN cursor26 USING DESCRIPTOR :inSQLDA
- OPEN cursor27 USING DESCRIPTOR :inSQLDA
- OPEN cursor28 USING DESCRIPTOR :inSQLDA
- OPEN cursor29 USING DESCRIPTOR :inSQLDA
- OPEN cursor30 USING DESCRIPTOR :inSQLDA
- OPEN cursor31 USING DESCRIPTOR :inSQLDA
- OPEN cursor32 USING DESCRIPTOR :inSQLDA
- OPEN cursor33 USING DESCRIPTOR :inSQLDA
- OPEN cursor34 USING DESCRIPTOR :inSQLDA
- OPEN cursor35 USING DESCRIPTOR :inSQLDA
- OPEN cursor36 USING DESCRIPTOR :inSQLDA
- OPEN cursor37 USING DESCRIPTOR :inSQLDA
- OPEN cursor38 USING DESCRIPTOR :inSQLDA
- OPEN cursor39 USING DESCRIPTOR :inSQLDA
- OPEN cursor40 USING DESCRIPTOR :inSQLDA
- DESCRIBE stmt1_0 INTO :inSQLDA
- DESCRIBE stmt2_0 INTO :inSQLDA
- DESCRIBE stmt3_0 INTO :inSQLDA
- DESCRIBE stmt4_0 INTO :inSQLDA
- DESCRIBE stmt5_0 INTO :inSQLDA
- DESCRIBE stmt6_0 INTO :inSQLDA
- DESCRIBE stmt7_0 INTO :inSQLDA
- DESCRIBE stmt8_0 INTO :inSQLDA
- DESCRIBE stmt9_0 INTO :inSQLDA
- DESCRIBE stmt10_0 INTO :inSQLDA
- DESCRIBE stmt11_0 INTO :inSQLDA
- DESCRIBE stmt12_0 INTO :inSQLDA
- DESCRIBE stmt13_0 INTO :inSQLDA
- DESCRIBE stmt14_0 INTO :inSQLDA
- DESCRIBE stmt15_0 INTO :inSQLDA
- DESCRIBE stmt16_0 INTO :inSQLDA
- DESCRIBE stmt17_0 INTO :inSQLDA
- DESCRIBE stmt18_0 INTO :inSQLDA
- DESCRIBE stmt19_0 INTO :inSQLDA
- DESCRIBE stmt20_0 INTO :inSQLDA
- DESCRIBE stmt21_0 INTO :inSQLDA
- DESCRIBE stmt22_0 INTO :inSQLDA
- DESCRIBE stmt23_0 INTO :inSQLDA
- DESCRIBE stmt24_0 INTO :inSQLDA
- DESCRIBE stmt25_0 INTO :inSQLDA
- DESCRIBE stmt26_0 INTO :inSQLDA
- DESCRIBE stmt27_0 INTO :inSQLDA
- DESCRIBE stmt28_0 INTO :inSQLDA
- DESCRIBE stmt29_0 INTO :inSQLDA
- DESCRIBE stmt30_0 INTO :inSQLDA
- DESCRIBE stmt31_0 INTO :inSQLDA
- DESCRIBE stmt32_0 INTO :inSQLDA
- DESCRIBE stmt33_0 INTO :inSQLDA
- DESCRIBE stmt34_0 INTO :inSQLDA
- DESCRIBE stmt35_0 INTO :inSQLDA
- DESCRIBE stmt36_0 INTO :inSQLDA
- DESCRIBE stmt37_0 INTO :inSQLDA
- DESCRIBE stmt38_0 INTO :inSQLDA
- DESCRIBE stmt39_0 INTO :inSQLDA
- DESCRIBE stmt40_0 INTO :inSQLDA
- FETCH cursor1 USING DESCRIPTOR :inSQLDA
- FETCH cursor2 USING DESCRIPTOR :inSQLDA
- FETCH cursor3 USING DESCRIPTOR :inSQLDA
- FETCH cursor4 USING DESCRIPTOR :inSQLDA
- FETCH cursor5 USING DESCRIPTOR :inSQLDA
- FETCH cursor6 USING DESCRIPTOR :inSQLDA
- FETCH cursor7 USING DESCRIPTOR :inSQLDA
- FETCH cursor8 USING DESCRIPTOR :inSQLDA
- FETCH cursor9 USING DESCRIPTOR :inSQLDA
- FETCH cursor10 USING DESCRIPTOR :inSQLDA
- FETCH cursor11 USING DESCRIPTOR :inSQLDA
- FETCH cursor12 USING DESCRIPTOR :inSQLDA
- FETCH cursor13 USING DESCRIPTOR :inSQLDA
- FETCH cursor14 USING DESCRIPTOR :inSQLDA
- FETCH cursor15 USING DESCRIPTOR :inSQLDA
- FETCH cursor16 USING DESCRIPTOR :inSQLDA
- FETCH cursor17 USING DESCRIPTOR :inSQLDA
- FETCH cursor18 USING DESCRIPTOR :inSQLDA
- FETCH cursor19 USING DESCRIPTOR :inSQLDA
- FETCH cursor20 USING DESCRIPTOR :inSQLDA
- FETCH cursor21 USING DESCRIPTOR :inSQLDA
- FETCH cursor22 USING DESCRIPTOR :inSQLDA
- FETCH cursor23 USING DESCRIPTOR :inSQLDA
- FETCH cursor24 USING DESCRIPTOR :inSQLDA
- FETCH cursor25 USING DESCRIPTOR :inSQLDA
- FETCH cursor26 USING DESCRIPTOR :inSQLDA
- FETCH cursor27 USING DESCRIPTOR :inSQLDA
- FETCH cursor28 USING DESCRIPTOR :inSQLDA
- FETCH cursor29 USING DESCRIPTOR :inSQLDA
- FETCH cursor30 USING DESCRIPTOR :inSQLDA
- FETCH cursor31 USING DESCRIPTOR :inSQLDA
- FETCH cursor32 USING DESCRIPTOR :inSQLDA
- FETCH cursor33 USING DESCRIPTOR :inSQLDA
- FETCH cursor34 USING DESCRIPTOR :inSQLDA
- FETCH cursor35 USING DESCRIPTOR :inSQLDA
- FETCH cursor36 USING DESCRIPTOR :inSQLDA
- FETCH cursor37 USING DESCRIPTOR :inSQLDA
- FETCH cursor38 USING DESCRIPTOR :inSQLDA
- FETCH cursor39 USING DESCRIPTOR :inSQLDA
- FETCH cursor40 USING DESCRIPTOR :inSQLDA
- CLOSE cursor1
- CLOSE cursor2
- CLOSE cursor3
- CLOSE cursor4
- CLOSE cursor5
- CLOSE cursor6
- CLOSE cursor7
- CLOSE cursor8
- CLOSE cursor9
- CLOSE cursor10
- CLOSE cursor11
- CLOSE cursor12
- CLOSE cursor13
- CLOSE cursor14
- CLOSE cursor15
- CLOSE cursor16
- CLOSE cursor17
- CLOSE cursor18
- CLOSE cursor19
- CLOSE cursor20
- CLOSE cursor21
- CLOSE cursor22
- CLOSE cursor23
- CLOSE cursor24
- CLOSE cursor25
- CLOSE cursor26
- CLOSE cursor27
- CLOSE cursor28
- CLOSE cursor29
- CLOSE cursor30
- CLOSE cursor31
- CLOSE cursor32
- CLOSE cursor33
- CLOSE cursor34
- CLOSE cursor35
- CLOSE cursor36
- CLOSE cursor37
- CLOSE cursor38
- CLOSE cursor39
- CLOSE cursor40
- EXECUTE IMMEDIATE :stmtbuf
- EXECUTE stmt1_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt2_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt3_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt4_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt5_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt6_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt7_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt8_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt9_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt10_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt11_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt12_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt13_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt14_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt15_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt16_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt17_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt18_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt19_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt20_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt21_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt22_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt23_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt24_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt25_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt26_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt27_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt28_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt29_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt30_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt31_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt32_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt33_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt34_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt35_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt36_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt37_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt38_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt39_1 USING DESCRIPTOR :inSQLDA
- EXECUTE stmt40_1 USING DESCRIPTOR :inSQLDA
- COMMIT
- ROLLBACK
- stmtbuf
- hvDbName
- hvDbName2
- hvUserid
- hvPassword
-