home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 10 Tools
/
10-Tools.zip
/
iapp300.zip
/
BIN
/
IAPPSQL.BND
(
.txt
)
< prev
next >
Wrap
DB2 Bind
|
1995-03-01
|
8KB
|
191 lines
IAPPSQL IAPPSQL IAPPSQL
INCLUDE SQLDA
INCLUDE SQLCA
WHENEVER SQLERROR GOTO SqlError
WHENEVER NOT FOUND GOTO SqlNotFound
WHENEVER SQLWARNING GOTO SqlWarning
BEGIN DECLARE SECTION
END DECLARE SECTION
DECLARE SqlCursor1 CURSOR FOR Statement1
DECLARE SqlCursor2 CURSOR FOR Statement2
DECLARE SqlCursor3 CURSOR FOR Statement3
DECLARE SqlCursor4 CURSOR FOR Statement4
DECLARE SqlCursor5 CURSOR FOR Statement5
DECLARE SqlCursor6 CURSOR FOR Statement6
DECLARE SqlCursor7 CURSOR FOR Statement7
DECLARE SqlCursor8 CURSOR FOR Statement8
DECLARE SqlCursor9 CURSOR FOR Statement9
DECLARE SqlCursor10 CURSOR FOR Statement10
DECLARE SqlCursor11 CURSOR FOR Statement11
DECLARE SqlCursor12 CURSOR FOR Statement12
DECLARE SqlCursor13 CURSOR FOR Statement13
DECLARE SqlCursor14 CURSOR FOR Statement14
DECLARE SqlCursor15 CURSOR FOR Statement15
DECLARE SqlCursor16 CURSOR FOR Statement16
DECLARE SqlCursor17 CURSOR FOR Statement17
DECLARE SqlCursor18 CURSOR FOR Statement18
DECLARE SqlCursor19 CURSOR FOR Statement19
DECLARE SqlCursor20 CURSOR WITH HOLD FOR Statement20
DECLARE SqlCursor21 CURSOR WITH HOLD FOR Statement21
DECLARE SqlCursor22 CURSOR WITH HOLD FOR Statement22
DECLARE SqlCursor23 CURSOR WITH HOLD FOR Statement23
DECLARE SqlCursor24 CURSOR WITH HOLD FOR Statement24
DECLARE SqlCursor25 CURSOR WITH HOLD FOR Statement25
DECLARE SqlCursor26 CURSOR WITH HOLD FOR Statement26
PREPARE Statement1 INTO :sqlda FROM :SqlStatement1
PREPARE Statement2 INTO :sqlda FROM :SqlStatement2
PREPARE Statement3 INTO :sqlda FROM :SqlStatement3
PREPARE Statement4 INTO :sqlda FROM :SqlStatement4
PREPARE Statement5 INTO :sqlda FROM :SqlStatement5
PREPARE Statement6 INTO :sqlda FROM :SqlStatement6
PREPARE Statement7 INTO :sqlda FROM :SqlStatement7
PREPARE Statement8 INTO :sqlda FROM :SqlStatement8
PREPARE Statement9 INTO :sqlda FROM :SqlStatement9
PREPARE Statement10 INTO :sqlda FROM :SqlStatement10
PREPARE Statement11 INTO :sqlda FROM :SqlStatement11
PREPARE Statement12 INTO :sqlda FROM :SqlStatement12
PREPARE Statement13 INTO :sqlda FROM :SqlStatement13
PREPARE Statement14 INTO :sqlda FROM :SqlStatement14
PREPARE Statement15 INTO :sqlda FROM :SqlStatement15
PREPARE Statement16 INTO :sqlda FROM :SqlStatement16
PREPARE Statement17 INTO :sqlda FROM :SqlStatement17
PREPARE Statement18 INTO :sqlda FROM :SqlStatement18
PREPARE Statement19 INTO :sqlda FROM :SqlStatement19
PREPARE Statement20 INTO :sqlda FROM :SqlStatement20
PREPARE Statement21 INTO :sqlda FROM :SqlStatement21
PREPARE Statement22 INTO :sqlda FROM :SqlStatement22
PREPARE Statement23 INTO :sqlda FROM :SqlStatement23
PREPARE Statement24 INTO :sqlda FROM :SqlStatement24
PREPARE Statement25 INTO :sqlda FROM :SqlStatement25
PREPARE Statement26 INTO :sqlda FROM :SqlStatement26
EXECUTE Statement1
EXECUTE Statement2
EXECUTE Statement3
EXECUTE Statement4
EXECUTE Statement5
EXECUTE Statement6
EXECUTE Statement7
EXECUTE Statement8
EXECUTE Statement9
EXECUTE Statement10
EXECUTE Statement11
EXECUTE Statement12
EXECUTE Statement13
EXECUTE Statement14
EXECUTE Statement15
EXECUTE Statement16
EXECUTE Statement17
EXECUTE Statement18
EXECUTE Statement19
EXECUTE Statement20
EXECUTE Statement21
EXECUTE Statement22
EXECUTE Statement23
EXECUTE Statement24
EXECUTE Statement25
EXECUTE Statement26
OPEN SqlCursor1
OPEN SqlCursor2
OPEN SqlCursor3
OPEN SqlCursor4
OPEN SqlCursor5
OPEN SqlCursor6
OPEN SqlCursor7
OPEN SqlCursor8
OPEN SqlCursor9
OPEN SqlCursor10
OPEN SqlCursor11
OPEN SqlCursor12
OPEN SqlCursor13
OPEN SqlCursor14
OPEN SqlCursor15
OPEN SqlCursor16
OPEN SqlCursor17
OPEN SqlCursor18
OPEN SqlCursor19
OPEN SqlCursor20
OPEN SqlCursor21
OPEN SqlCursor22
OPEN SqlCursor23
OPEN SqlCursor24
OPEN SqlCursor25
OPEN SqlCursor26
FETCH SqlCursor1 USING DESCRIPTOR :sqlda
FETCH SqlCursor2 USING DESCRIPTOR :sqlda
FETCH SqlCursor3 USING DESCRIPTOR :sqlda
FETCH SqlCursor4 USING DESCRIPTOR :sqlda
FETCH SqlCursor5 USING DESCRIPTOR :sqlda
FETCH SqlCursor6 USING DESCRIPTOR :sqlda
FETCH SqlCursor7 USING DESCRIPTOR :sqlda
FETCH SqlCursor8 USING DESCRIPTOR :sqlda
FETCH SqlCursor9 USING DESCRIPTOR :sqlda
FETCH SqlCursor10 USING DESCRIPTOR :sqlda
FETCH SqlCursor11 USING DESCRIPTOR :sqlda
FETCH SqlCursor12 USING DESCRIPTOR :sqlda
FETCH SqlCursor13 USING DESCRIPTOR :sqlda
FETCH SqlCursor14 USING DESCRIPTOR :sqlda
FETCH SqlCursor15 USING DESCRIPTOR :sqlda
FETCH SqlCursor16 USING DESCRIPTOR :sqlda
FETCH SqlCursor17 USING DESCRIPTOR :sqlda
FETCH SqlCursor18 USING DESCRIPTOR :sqlda
FETCH SqlCursor19 USING DESCRIPTOR :sqlda
FETCH SqlCursor20 USING DESCRIPTOR :sqlda
FETCH SqlCursor21 USING DESCRIPTOR :sqlda
FETCH SqlCursor22 USING DESCRIPTOR :sqlda
FETCH SqlCursor23 USING DESCRIPTOR :sqlda
FETCH SqlCursor24 USING DESCRIPTOR :sqlda
FETCH SqlCursor25 USING DESCRIPTOR :sqlda
FETCH SqlCursor26 USING DESCRIPTOR :sqlda
CLOSE SqlCursor1
CLOSE SqlCursor2
CLOSE SqlCursor3
CLOSE SqlCursor4
CLOSE SqlCursor5
CLOSE SqlCursor6
CLOSE SqlCursor7
CLOSE SqlCursor8
CLOSE SqlCursor9
CLOSE SqlCursor10
CLOSE SqlCursor11
CLOSE SqlCursor12
CLOSE SqlCursor13
CLOSE SqlCursor14
CLOSE SqlCursor15
CLOSE SqlCursor16
CLOSE SqlCursor17
CLOSE SqlCursor18
CLOSE SqlCursor19
CLOSE SqlCursor20
CLOSE SqlCursor21
CLOSE SqlCursor22
CLOSE SqlCursor23
CLOSE SqlCursor24
CLOSE SqlCursor25
CLOSE SqlCursor26
SqlStatement1
SqlStatement2
SqlStatement3
SqlStatement4
SqlStatement5
SqlStatement6
SqlStatement7
SqlStatement8
SqlStatement9
SqlStatement10
SqlStatement11
SqlStatement12
SqlStatement13
SqlStatement14
SqlStatement15
SqlStatement16
SqlStatement17
SqlStatement18
SqlStatement19
SqlStatement20
SqlStatement21
SqlStatement22
SqlStatement23
SqlStatement24
SqlStatement25
SqlStatement26