home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 10 Tools
/
10-Tools.zip
/
datatl25.zip
/
DCTDSGN.Z
/
ewsddb2x.bnd
(
.txt
)
< prev
next >
Wrap
DB2 Bind
|
1997-09-11
|
30KB
|
477 lines
BIND V02
EWSDDB2XjBYFOKGNATLASRDB0
ATLASRDB
INCLUDE SQLCA
INCLUDE SQLDA
BEGIN DECLARE SECTION
END DECLARE SECTION
DECLARE LISTCUR CURSOR FOR LISTSEL
PREPARE LISTSEL FROM :SQLSEL
OPEN LISTCUR
FETCH LISTCUR INTO :NAMEBUF, :IDBUF
FETCH LISTCUR INTO :NAMEBUF, :IDBUF
CLOSE LISTCUR
COMMIT
COMMIT
BEGIN DECLARE SECTION
END DECLARE SECTION
DECLARE TABSTAT CURSOR FOR TSTATSEL
PREPARE TSTATSEL FROM :SQLSEL
OPEN TABSTAT
FETCH TABSTAT INTO :CARD_GTS, :RECLENGTH_GTS, :NPAGES_GTS, :PCTPAGES_GTS, :PCTROWCOMP_GTS, :STATSTIME_GTS, :STATUS_GTS, :COLCARD_GTS, :HIGH2KEY_GTS, :LOW2KEY_GTS, :COLTYPE_GTS, :LENGTH_GTS, :SCALE_GTS
FETCH TABSTAT INTO :CARD_GTS, :RECLENGTH_GTS, :NPAGES_GTS, :PCTPAGES_GTS, :PCTROWCOMP_GTS, :STATSTIME_GTS, :STATUS_GTS, :COLCARD_GTS, :HIGH2KEY_GTS, :LOW2KEY_GTS
CLOSE TABSTAT
BEGIN DECLARE SECTION
END DECLARE SECTION
DECLARE INDXSTAT CURSOR FOR ISTATSEL
PREPARE ISTATSEL FROM :SQLSEL
OPEN INDXSTAT
FETCH INDXSTAT INTO :CLUSTERED_GIS, :CLUSTERRATIO_GIS, :FIRSTKEYCARD_GIS, :FULLKEYCARD_GIS, :NLEAF_GIS, :NLEVELS_GIS, :SPACE_GIS, :STATSTIME_GIS, :CARD_GIS, :LEAFDIST_GIS, :FAROFFPOS_GIS, :NEAROFFPOS_GIS, :SPACEP_GIS, :STATSTIMEP_GIS, :PARTITION_GIS
FETCH INDXSTAT INTO :CLUSTERED_GIS, :CLUSTERRATIO_GIS, :FIRSTKEYCARD_GIS, :FULLKEYCARD_GIS, :NLEAF_GIS, :NLEVELS_GIS, :SPACE_GIS, :STATSTIME_GIS, :CARD_GIS, :LEAFDIST_GIS, :FAROFFPOS_GIS, :NEAROFFPOS_GIS, :SPACEP_GIS, :STATSTIMEP_GIS, :PARTITION_GIS
CLOSE INDXSTAT
COMMIT
BEGIN DECLARE SECTION
END DECLARE SECTION
DECLARE TSSTAT CURSOR FOR TSSTATSEL
PREPARE TSSTATSEL FROM :SQLSEL
OPEN TSSTAT
FETCH TSSTAT INTO :STATUS_GPS, :NACTIVE_GPS, :SPACE_GPS, :IMPLICIT_GPS, :CARD_GPS, :FARINDREF_GPS, :NEARINDREF_GPS, :PERCACTIVE_GPS, :PERCDROP_GPS, :SPACEP_GPS, :STATSTIME_GPS, :PAGESAVE_GPS, :PARTITION_GPS
FETCH TSSTAT INTO :STATUS_GPS, :NACTIVE_GPS, :SPACE_GPS, :IMPLICIT_GPS, :CARD_GPS, :FARINDREF_GPS, :NEARINDREF_GPS, :PERCACTIVE_GPS, :PERCDROP_GPS, :SPACEP_GPS, :STATSTIME_GPS, :PAGESAVE_GPS, :PARTITION_GPS
CLOSE TSSTAT
BEGIN DECLARE SECTION
END DECLARE SECTION
DECLARE SGSTAT CURSOR FOR SGSTATSEL
PREPARE SGSTATSEL FROM :SQLSEL
OPEN SGSTAT
FETCH SGSTAT INTO :SPACE_GSS
CLOSE SGSTAT
DECLARE FRELCUR CURSOR FOR FRELSEL
PREPARE FRELSEL FROM :SQLSEL
OPEN FRELCUR
FETCH FRELCUR INTO :NAMEBUF, :IDBUF
FETCH FRELCUR INTO :NAMEBUF, :IDBUF
CLOSE FRELCUR
DECLARE FINDEXCUR CURSOR FOR FINDEXSEL
PREPARE FINDEXSEL FROM :SQLSEL
OPEN FINDEXCUR
FETCH FINDEXCUR INTO :NAMEBUF, :IDBUF
FETCH FINDEXCUR INTO :NAMEBUF, :IDBUF
CLOSE FINDEXCUR
DECLARE FVIEWCUR CURSOR FOR FVIEWSEL
PREPARE FVIEWSEL FROM :SQLSEL
OPEN FVIEWCUR
FETCH FVIEWCUR INTO :NAMEBUF, :IDBUF
FETCH FVIEWCUR INTO :NAMEBUF, :IDBUF
CLOSE FVIEWCUR
COMMIT
COMMIT
BEGIN DECLARE SECTION
END DECLARE SECTION
DECLARE GCOLCUR CURSOR FOR GCOLSEL
PREPARE GCOLSEL FROM :SQLSEL
OPEN GCOLCUR
FETCH GCOLCUR INTO :NAME_COL
FETCH GCOLCUR INTO :NAME_COL
CLOSE GCOLCUR
COMMIT
BEGIN DECLARE SECTION
END DECLARE SECTION
DECLARE GT2CUR CURSOR FOR GT2SEL
PREPARE GT2SEL FROM :SQLSEL
OPEN GT2CUR
FETCH GT2CUR INTO :TBLNAME_GT2, :CREATOR_GT2, :TBL_REM_GT2:TBL_REM_IND, :DATACAPTURE_GT2, :COLNAME_GT2, :COL_REM_GT2:COL_REM_IND, :COLTYPE_GT2, :COLSCHEMA_GT2, :NULLS_GT2, :CODEPAGE_GT2, :LOGGED_GT2, :COMPACT_GT2, :COLLGTH_GT2, :SCALE_GT2, :DEFAULTVALUE_GT2:DEFAULT_IND, :COLNO_GT2, :KEYSEQ_GT2:IND, :DATACAPTURE_GT2, :CHECKCOUNT_GT2, :TBSPACE_GT2:TBSPACE_IND, :INDEX_TBSPACE_GT2:INDEX_TBSPACE_IND, :LONG_TBSPACE_GT2:LONG_TBSPACE_IND
DECLARE GDT2CUR CURSOR FOR GDT2SEL
PREPARE GDT2SEL FROM :SQLSEL
OPEN GDT2CUR
FETCH GT2CUR INTO :TYPENAME_GT2, :TYPESCHEMA_GT2, :SOURCESCHEMA_GT2, :SOURCETYPE_GT2, :TYPE_LEN_GT2, :TYPE_SCALE_GT2, :TYPE_CODEPAGE_GT2, :TYPE_REM_GT2:TYPE_REM_IND
FETCH GT2CUR INTO :TBLNAME_GT2, :CREATOR_GT2, :TBL_REM_GT2:TBL_REM_IND, :DATACAPTURE_GT2, :COLNAME_GT2, :COL_REM_GT2:COL_REM_IND, :COLTYPE_GT2, :COLSCHEMA_GT2, :NULLS_GT2, :CODEPAGE_GT2, :LOGGED_GT2, :COMPACT_GT2, :COLLGTH_GT2, :SCALE_GT2, :DEFAULTVALUE_GT2:DEFAULT_IND, :COLNO_GT2, :KEYSEQ_GT2:IND, :DATACAPTURE_GT2, :CHECKCOUNT_GT2, :TBSPACE_GT2:TBSPACE_IND, :INDEX_TBSPACE_GT2:INDEX_TBSPACE_IND, :LONG_TBSPACE_GT2:LONG_TBSPACE_IND
DECLARE PRIM2CUR CURSOR FOR PRIM2SEL
PREPARE PRIM2SEL FROM :SQLSEL
OPEN PRIM2CUR
FETCH PRIM2CUR INTO :PRIM_COL_GT2, :PRIM_NAME_GT2, :KEYTYPE_GT2, :CONSTREMARKS_GT2:IND
FETCH PRIM2CUR INTO :PRIM_COL_GT2, :PRIM_NAME_GT2, :KEYTYPE_GT2, :CONSTREMARKS_GT2:IND
CLOSE PRIM2CUR
DECLARE FOR2CUR CURSOR FOR FOR2SEL
PREPARE FOR2SEL FROM :SQLSEL
OPEN FOR2CUR
FETCH FOR2CUR INTO :REFTBNAME_GT2, :REFTBCREATOR_GT2, :RELNAME_GT2, :DELETERULE_GT2, :UPDATERULE_GT2, :FKCOLNAMES_GT2
FETCH FOR2CUR INTO :REFTBNAME_GT2, :REFTBCREATOR_GT2, :RELNAME_GT2, :DELETERULE_GT2, :UPDATERULE_GT2, :FKCOLNAMES_GT2
CLOSE FOR2CUR
CLOSE GT2CUR
DECLARE CHECKCUR2 CURSOR FOR CHECKSEL2
PREPARE CHECKSEL2 FROM :SQLSEL
OPEN CHECKCUR2
FETCH CHECKCUR2 INTO :CHECKNAME_GT2, :CONSTREMARKS_GT2:IND, :checkText
FETCH CHECKCUR2 INTO :CHECKNAME_GT2, :CONSTREMARKS_GT2:IND, :checkText
CLOSE CHECKCUR2
BEGIN DECLARE SECTION
END DECLARE SECTION
DECLARE GI2CUR CURSOR FOR GI2SEL
PREPARE GI2SEL FROM :SQLSEL
OPEN GI2CUR
FETCH GI2CUR INTO :TBNAME_GI2, :TBCREATOR_GI2, :COLNAMES_GI2, :UNIQUERULE_GI2, :COLCOUNT_GI2, :REMARKS_GI2 :IND
CLOSE GI2CUR
BEGIN DECLARE SECTION
END DECLARE SECTION
DECLARE GV2CUR CURSOR FOR GV2SEL
PREPARE GV2SEL FROM :SQLSEL
OPEN GV2CUR
FETCH GV2CUR INTO :TEXT_GV2, :CHECK_GV2
FETCH GV2CUR INTO :TEXT_GV2, :CHECK_GV2
CLOSE GV2CUR
DECLARE GV2CUR2 CURSOR FOR GV2SEL2
PREPARE GV2SEL2 FROM :SQLSEL
OPEN GV2CUR2
FETCH GV2CUR2 INTO :VIEW_REM_GV2:IND
CLOSE GV2CUR2
BEGIN DECLARE SECTION
END DECLARE SECTION
DECLARE TBSCUR CURSOR FOR TBSSEL
PREPARE TBSSEL FROM :SQLSEL
OPEN TBSCUR
FETCH TBSCUR INTO :TBSPACE_TB2, :TBSPACETYPE_TB2, :DATATYPE_TB2, :REMARKS_TB2 :IND
CLOSE TBSCUR
BEGIN DECLARE SECTION
END DECLARE SECTION
DECLARE GTMCUR CURSOR FOR GTMSEL
PREPARE GTMSEL FROM :SQLSEL
OPEN GTMCUR
FETCH GTMCUR INTO :TBLNAME_GTM, :CREATOR_GTM, :DBNAME_GTM, :TSNAME_GTM, :EDPROC_GTM, :VALPROC_GTM, :AUDITING_GTM, :OBID_GTM, :DATACAP_GTM, :TBL_REM_GTM, :TBL_LABEL_GTM, :COLNAME_GTM, :COLNO_GTM, :COLTYPE_GTM, :COLLGTH_GTM, :NULLS_GTM, :COL_REM_GTM, :COL_LABEL_GTM, :FLDPROC_GTM, :CLUSTERTYPE_GTM, :CHECKS_GTM, :DEFAULTVALUE_GTM, :CCSID_GTM, :FOREIGNKEY_GTM, :KEYSEQ_GTM, :SCALE_GTM, :DEFAULT_GTM
FETCH GTMCUR INTO :TBLNAME_GTM, :CREATOR_GTM, :DBNAME_GTM, :TSNAME_GTM, :EDPROC_GTM, :VALPROC_GTM, :AUDITING_GTM, :OBID_GTM, :DATACAP_GTM, :TBL_REM_GTM, :TBL_LABEL_GTM, :COLNAME_GTM, :COLNO_GTM, :COLTYPE_GTM, :COLLGTH_GTM, :NULLS_GTM, :COL_REM_GTM, :COL_LABEL_GTM, :FLDPROC_GTM, :CLUSTERTYPE_GTM, :CHECKS_GTM, :DEFAULTVALUE_GTM, :FOREIGNKEY_GTM, :KEYSEQ_GTM, :SCALE_GTM, :DEFAULT_GTM
FETCH GTMCUR INTO :TBLNAME_GTM, :CREATOR_GTM, :DBNAME_GTM, :TSNAME_GTM, :EDPROC_GTM, :VALPROC_GTM, :AUDITING_GTM, :OBID_GTM, :DATACAP_GTM, :TBL_REM_GTM, :TBL_LABEL_GTM, :COLNAME_GTM, :COLNO_GTM, :COLTYPE_GTM, :COLLGTH_GTM, :NULLS_GTM, :COL_REM_GTM, :COL_LABEL_GTM, :FLDPROC_GTM, :FOREIGNKEY_GTM, :KEYSEQ_GTM, :SCALE_GTM, :DEFAULT_GTM
DECLARE FIELDCUR CURSOR FOR FIELDSEL
PREPARE FIELDSEL FROM :SQLSEL
OPEN FIELDCUR
FETCH FIELDCUR INTO :FIELDPRC_NAME_GTM, :PARMLIST_GTM
CLOSE FIELDCUR
FETCH GTMCUR INTO :TBLNAME_GTM, :CREATOR_GTM, :DBNAME_GTM, :TSNAME_GTM, :EDPROC_GTM, :VALPROC_GTM, :AUDITING_GTM, :OBID_GTM, :DATACAP_GTM, :TBL_REM_GTM, :TBL_LABEL_GTM, :COLNAME_GTM, :COLNO_GTM, :COLTYPE_GTM, :COLLGTH_GTM, :NULLS_GTM, :COL_REM_GTM, :COL_LABEL_GTM, :FLDPROC_GTM, :CLUSTERTYPE_GTM, :CHECKS_GTM, :DEFAULTVALUE_GTM, :CCSID_GTM, :FOREIGNKEY_GTM, :KEYSEQ_GTM, :SCALE_GTM, :DEFAULT_GTM
FETCH GTMCUR INTO :TBLNAME_GTM, :CREATOR_GTM, :DBNAME_GTM, :TSNAME_GTM, :EDPROC_GTM, :VALPROC_GTM, :AUDITING_GTM, :OBID_GTM, :DATACAP_GTM, :TBL_REM_GTM, :TBL_LABEL_GTM, :COLNAME_GTM, :COLNO_GTM, :COLTYPE_GTM, :COLLGTH_GTM, :NULLS_GTM, :COL_REM_GTM, :COL_LABEL_GTM, :FLDPROC_GTM, :CLUSTERTYPE_GTM, :CHECKS_GTM, :DEFAULTVALUE_GTM, :FOREIGNKEY_GTM, :KEYSEQ_GTM, :SCALE_GTM, :DEFAULT_GTM
FETCH GTMCUR INTO :TBLNAME_GTM, :CREATOR_GTM, :DBNAME_GTM, :TSNAME_GTM, :EDPROC_GTM, :VALPROC_GTM, :AUDITING_GTM, :OBID_GTM, :DATACAP_GTM, :TBL_REM_GTM, :TBL_LABEL_GTM, :COLNAME_GTM, :COLNO_GTM, :COLTYPE_GTM, :COLLGTH_GTM, :NULLS_GTM, :COL_REM_GTM, :COL_LABEL_GTM, :FLDPROC_GTM, :FOREIGNKEY_GTM, :KEYSEQ_GTM, :SCALE_GTM, :DEFAULT_GTM
DECLARE UNIQCUR CURSOR FOR UNIQSEL
PREPARE UNIQSEL FROM :SQLSEL
OPEN UNIQCUR
FETCH UNIQCUR INTO :UNIQ_COL_GTM
FETCH UNIQCUR INTO :UNIQ_COL_GTM
CLOSE UNIQCUR
DECLARE FORMCUR CURSOR FOR FORMSEL
PREPARE FORMSEL FROM :SQLSEL
OPEN FORMCUR
FETCH FORMCUR INTO :REFTBNAME_GTM, :REFTBCREATOR_GTM, :IXNAME_GTM, :IXOWNER_GTM, :RELNAME_GTM, :DELETERULE_GTM
FETCH FORMCUR INTO :REFTBNAME_GTM, :REFTBCREATOR_GTM, :RELNAME_GTM, :DELETERULE_GTM
DECLARE FORMCUR2 CURSOR FOR FORMSEL2
PREPARE FORMSEL2 FROM :SQLSEL
OPEN FORMCUR2
FETCH FORMCUR2 INTO :FOREIGN_COL_GTM
FETCH FORMCUR2 INTO :FOREIGN_COL_GTM
CLOSE FORMCUR2
DECLARE REFCOLCUR CURSOR FOR REFCOLSEL
PREPARE REFCOLSEL FROM :SQLSEL
OPEN REFCOLCUR
FETCH REFCOLCUR INTO :COLNAME_GTM, :COLSEQ_GTM
FETCH REFCOLCUR INTO :COLNAME_GTM, :COLSEQ_GTM
CLOSE REFCOLCUR
FETCH FORMCUR INTO :REFTBNAME_GTM, :REFTBCREATOR_GTM, :IXNAME_GTM, :IXOWNER_GTM, :RELNAME_GTM, :DELETERULE_GTM
FETCH FORMCUR INTO :REFTBNAME_GTM, :REFTBCREATOR_GTM, :RELNAME_GTM, :DELETERULE_GTM
CLOSE FORMCUR
DECLARE CHECKCUR CURSOR FOR CHECKSEL
PREPARE CHECKSEL FROM :SQLSEL
OPEN CHECKCUR
FETCH CHECKCUR INTO :CHECKNAME_GTM, :CHECKCONDITION_GTM
FETCH CHECKCUR INTO :CHECKNAME_GTM, :CHECKCONDITION_GTM
CLOSE CHECKCUR
CLOSE GTMCUR
BEGIN DECLARE SECTION
END DECLARE SECTION
DECLARE GIMCUR CURSOR FOR GIMSEL
PREPARE GIMSEL FROM :SQLSEL
OPEN GIMCUR
FETCH GIMCUR INTO :UNIQRLE_GIM, :CLUSTER_GIM, :BPOOL_GIM, :PGSIZE_GIM, :ERASER_GIM, :DSETPASS_GIM, :CLOSERLE_GIM, :COLNAME_GIM, :COLNO_GIM, :INDEXTYPE_GIM, :PIECESIZE_GIM, :ORDERING_GIM, :TBNAME_GIM, :TBCREATOR_GIM, :COLSEQ_GIM
FETCH GIMCUR INTO :UNIQRLE_GIM, :CLUSTER_GIM, :BPOOL_GIM, :PGSIZE_GIM, :ERASER_GIM, :DSETPASS_GIM, :CLOSERLE_GIM, :COLNAME_GIM, :COLNO_GIM, :INDEXTYPE_GIM, :ORDERING_GIM, :TBNAME_GIM, :TBCREATOR_GIM, :COLSEQ_GIM
FETCH GIMCUR INTO :UNIQRLE_GIM, :CLUSTER_GIM, :BPOOL_GIM, :PGSIZE_GIM, :ERASER_GIM, :DSETPASS_GIM, :CLOSERLE_GIM, :COLNAME_GIM, :COLNO_GIM, :ORDERING_GIM, :TBNAME_GIM, :TBCREATOR_GIM, :COLSEQ_GIM
FETCH GIMCUR INTO :UNIQRLE_GIM, :CLUSTER_GIM, :BPOOL_GIM, :PGSIZE_GIM, :ERASER_GIM, :DSETPASS_GIM, :CLOSERLE_GIM, :COLNAME_GIM, :COLNO_GIM, :INDEXTYPE_GIM, :PIECESIZE_GIM, :ORDERING_GIM, :TBNAME_GIM, :TBCREATOR_GIM, :COLSEQ_GIM
FETCH GIMCUR INTO :UNIQRLE_GIM, :CLUSTER_GIM, :BPOOL_GIM, :PGSIZE_GIM, :ERASER_GIM, :DSETPASS_GIM, :CLOSERLE_GIM, :COLNAME_GIM, :COLNO_GIM, :INDEXTYPE_GIM, :ORDERING_GIM, :TBNAME_GIM, :TBCREATOR_GIM, :COLSEQ_GIM
FETCH GIMCUR INTO :UNIQRLE_GIM, :CLUSTER_GIM, :BPOOL_GIM, :PGSIZE_GIM, :ERASER_GIM, :DSETPASS_GIM, :CLOSERLE_GIM, :COLNAME_GIM, :COLNO_GIM, :ORDERING_GIM, :TBNAME_GIM, :TBCREATOR_GIM, :COLSEQ_GIM
CLOSE GIMCUR
DECLARE GIM2CUR CURSOR FOR GIM2SEL
PREPARE GIM2SEL FROM :SQLSEL
OPEN GIM2CUR
FETCH GIM2CUR INTO :PARTITION_GIM, :PQTY_GIM, :SQTY_GIM, :STORTYPE_GIM, :STORNAME_GIM, :GBPCACHE_GIM, :VCATNAME_GIM, :LIMITKEY_GIM, :FREEPAGE_GIM, :PCTFREE_GIM
FETCH GIM2CUR INTO :PARTITION_GIM, :PQTY_GIM, :SQTY_GIM, :STORTYPE_GIM, :STORNAME_GIM, :VCATNAME_GIM, :LIMITKEY_GIM, :FREEPAGE_GIM, :PCTFREE_GIM
DECLARE GIM3CUR CURSOR FOR GIM3SEL
PREPARE GIM3SEL FROM :SQLSEL
OPEN GIM3CUR
FETCH GIM3CUR INTO :COLTYPE_GIM, :LENGTH_GIM, :SCALE_GIM
CLOSE GIM3CUR
FETCH GIM2CUR INTO :PARTITION_GIM, :PQTY_GIM, :SQTY_GIM, :STORTYPE_GIM, :STORNAME_GIM, :GBPCACHE_GIM, :VCATNAME_GIM, :LIMITKEY_GIM, :FREEPAGE_GIM, :PCTFREE_GIM
FETCH GIM2CUR INTO :PARTITION_GIM, :PQTY_GIM, :SQTY_GIM, :STORTYPE_GIM, :STORNAME_GIM, :VCATNAME_GIM, :LIMITKEY_GIM, :FREEPAGE_GIM, :PCTFREE_GIM
CLOSE GIM2CUR
BEGIN DECLARE SECTION
END DECLARE SECTION
DECLARE GVMCUR CURSOR FOR GVMSEL
PREPARE GVMSEL FROM :SQLSEL
OPEN GVMCUR
FETCH GVMCUR INTO :TEXT_GVM, :CHECK_GVM
FETCH GVMCUR INTO :TEXT_GVM, :CHECK_GVM
CLOSE GVMCUR
DECLARE GVMCUR2 CURSOR FOR GVMSEL2
PREPARE GVMSEL2 FROM :SQLSEL
OPEN GVMCUR2
FETCH GVMCUR2 INTO :VIEW_REM_GVM, :VIEW_LABEL_GVM
CLOSE GVMCUR2
BEGIN DECLARE SECTION
END DECLARE SECTION
DECLARE GDMCUR CURSOR FOR GDMSEL
PREPARE GDMSEL FROM :SQLSEL
OPEN GDMCUR
FETCH GDMCUR INTO :CREATOR_GDM, :STGROUP_GDM, :BPOOL_GDM, :ROSHARE_GDM, :CCSID_GDM
FETCH GDMCUR INTO :CREATOR_GDM, :STGROUP_GDM, :BPOOL_GDM, :ROSHARE_GDM
CLOSE GDMCUR
BEGIN DECLARE SECTION
END DECLARE SECTION
DECLARE GPMCUR CURSOR FOR GPMSEL
PREPARE GPMSEL FROM :SQLSEL
OPEN GPMCUR
FETCH GPMCUR INTO :BPOOL_GPM, :PARTITIONS_GPM, :LOCKRULE_GPM, :LOCKMAX_GPM, :GBPCACHE_GPM, :TYPE_GPM, :CCSID_GPM, :MAXROWS_GPM, :LOCKPART_GPM, :ERASERULE_GPM, :DSETPASS_GPM, :CLOSERULE_GPM, :SEGSIZE_GPM, :PARTITION_GPM, :PQTY_GPM, :SQTY_GPM, :STORTYPE_GPM, :STORNAME_GPM, :VCATNAME_GPM, :FREEPAGE_GPM, :PCTFREE_GPM, :COMPRESS_GPM
FETCH GPMCUR INTO :BPOOL_GPM, :PARTITIONS_GPM, :LOCKRULE_GPM, :LOCKMAX_GPM, :GBPCACHE_GPM, :ERASERULE_GPM, :DSETPASS_GPM, :CLOSERULE_GPM, :SEGSIZE_GPM, :PARTITION_GPM, :PQTY_GPM, :SQTY_GPM, :STORTYPE_GPM, :STORNAME_GPM, :VCATNAME_GPM, :FREEPAGE_GPM, :PCTFREE_GPM, :COMPRESS_GPM
FETCH GPMCUR INTO :BPOOL_GPM, :PARTITIONS_GPM, :LOCKRULE_GPM, :ERASERULE_GPM, :DSETPASS_GPM, :CLOSERULE_GPM, :SEGSIZE_GPM, :PARTITION_GPM, :PQTY_GPM, :SQTY_GPM, :STORTYPE_GPM, :STORNAME_GPM, :VCATNAME_GPM, :FREEPAGE_GPM, :PCTFREE_GPM, :COMPRESS_GPM
FETCH GPMCUR INTO :BPOOL_GPM, :PARTITIONS_GPM, :LOCKRULE_GPM, :LOCKMAX_GPM, :GBPCACHE_GPM, :TYPE_GPM, :CCSID_GPM, :MAXROWS_GPM, :LOCKPART_GPM, :ERASERULE_GPM, :DSETPASS_GPM, :CLOSERULE_GPM, :SEGSIZE_GPM, :PARTITION_GPM, :PQTY_GPM, :SQTY_GPM, :STORTYPE_GPM, :STORNAME_GPM, :VCATNAME_GPM, :FREEPAGE_GPM, :PCTFREE_GPM, :COMPRESS_GPM
FETCH GPMCUR INTO :BPOOL_GPM, :PARTITIONS_GPM, :LOCKRULE_GPM, :LOCKMAX_GPM, :GBPCACHE_GPM, :ERASERULE_GPM, :DSETPASS_GPM, :CLOSERULE_GPM, :SEGSIZE_GPM, :PARTITION_GPM, :PQTY_GPM, :SQTY_GPM, :STORTYPE_GPM, :STORNAME_GPM, :VCATNAME_GPM, :FREEPAGE_GPM, :PCTFREE_GPM, :COMPRESS_GPM
FETCH GPMCUR INTO :BPOOL_GPM, :PARTITIONS_GPM, :LOCKRULE_GPM, :ERASERULE_GPM, :DSETPASS_GPM, :CLOSERULE_GPM, :SEGSIZE_GPM, :PARTITION_GPM, :PQTY_GPM, :SQTY_GPM, :STORTYPE_GPM, :STORNAME_GPM, :VCATNAME_GPM, :FREEPAGE_GPM, :PCTFREE_GPM, :COMPRESS_GPM
CLOSE GPMCUR
BEGIN DECLARE SECTION
END DECLARE SECTION
DECLARE GSMCUR CURSOR FOR GSMSEL
PREPARE GSMSEL FROM :SQLSEL
OPEN GSMCUR
FETCH GSMCUR INTO :CREATOR_GSM, :VCATNAME_GSM, :VPASSWORD_GSM, :VOLID_GSM
FETCH GSMCUR INTO :CREATOR_GSM, :VCATNAME_GSM, :VPASSWORD_GSM, :VOLID_GSM
CLOSE GSMCUR
DECLARE GYMCUR CURSOR FOR GYMSEL
PREPARE GYMSEL FROM :SQLSEL
OPEN GYMCUR
FETCH GYMCUR INTO :NAMEBUF, :IDBUF
FETCH GYMCUR INTO :NAMEBUF, :IDBUF
CLOSE GYMCUR
BEGIN DECLARE SECTION
END DECLARE SECTION
DECLARE GAMCUR CURSOR FOR GAMSEL
PREPARE GAMSEL FROM :SQLSEL
OPEN GAMCUR
FETCH GAMCUR INTO :NAMEBUF, :IDBUF, :REMARKS_GAM, :LABEL_GAM
FETCH GAMCUR INTO :NAMEBUF, :IDBUF, :REMARKS_GAM, :LABEL_GAM
CLOSE GAMCUR
SQLSEL
NAMEBUF
IDBUF
CARD_GTS
RECLENGTH_GTS
NPAGES_GTS
PCTPAGES_GTS
PCTROWCOMP_GTS
STATSTIME_GTS
STATUS_GTS
COLCARD_GTS
HIGH2KEY_GTS
LOW2KEY_GTS
COLTYPE_GTS
LENGTH_GTS
SCALE_GTS
CLUSTERED_GIS
CLUSTERRATIO_GIS
FIRSTKEYCARD_GIS
FULLKEYCARD_GIS
NLEAF_GIS
NLEVELS_GIS
SPACE_GIS
STATSTIME_GIS
CARD_GIS
LEAFDIST_GIS
FAROFFPOS_GIS
NEAROFFPOS_GIS
SPACEP_GIS
STATSTIMEP_GIS
PARTITION_GIS
STATUS_GPS
NACTIVE_GPS
SPACE_GPS
IMPLICIT_GPS
CARD_GPS
FARINDREF_GPS
NEARINDREF_GPS
PERCACTIVE_GPS
PERCDROP_GPS
SPACEP_GPS
STATSTIME_GPS
PAGESAVE_GPS
PARTITION_GPS
SPACE_GSS
NAME_COL
TBLNAME_GT2
CREATOR_GT2
TBL_REM_GT2
TBL_REM_IND
COLNAME_GT2
COL_REM_GT2
COL_REM_IND
COLTYPE_GT2
NULLS_GT2
CODEPAGE_GT2
COLLGTH_GT2
SCALE_GT2
COLNO_GT2
KEYSEQ_GT2
DEFAULTVALUE_GT2
DEFAULT_IND
LOGGED_GT2
COMPACT_GT2
COLSCHEMA_GT2
CHECKCOUNT_GT2
DATACAPTURE_GT2
TBSPACE_GT2
TBSPACE_IND
INDEX_TBSPACE_GT2
INDEX_TBSPACE_IND
LONG_TBSPACE_GT2
LONG_TBSPACE_IND
PRIM_COL_GT2
PRIM_NAME_GT2
CONSTREMARKS_GT2
KEYTYPE_GT2
REFTBNAME_GT2
REFTBCREATOR_GT2
RELNAME_GT2
DELETERULE_GT2
UPDATERULE_GT2
FKCOLNAMES_GT2
CHECKNAME_GT2
checkText
TYPESCHEMA_GT2
TYPENAME_GT2
SOURCESCHEMA_GT2
SOURCETYPE_GT2
TYPE_LEN_GT2
TYPE_SCALE_GT2
TYPE_CODEPAGE_GT2
TYPE_REM_GT2
TYPE_REM_IND
TBNAME_GI2
TBCREATOR_GI2
COLNAMES_GI2
UNIQUERULE_GI2
COLCOUNT_GI2
REMARKS_GI2
TEXT_GV2
CHECK_GV2
VIEW_REM_GV2
TBSPACE_TB2
DEFINER_TB2
TBSPACETYPE_TB2
DATATYPE_TB2
REMARKS_TB2
TBLNAME_GTM
CREATOR_GTM
DBNAME_GTM
TSNAME_GTM
EDPROC_GTM
VALPROC_GTM
CLUSTERTYPE_GTM
AUDITING_GTM
OBID_GTM
DATACAP_GTM
TBL_REM_GTM
TBL_LABEL_GTM
CHECKS_GTM
CCSID_GTM
COLNAME_GTM
COLNO_GTM
COLTYPE_GTM
COLLGTH_GTM
SCALE_GTM
NULLS_GTM
COL_REM_GTM
DEFAULT_GTM
KEYSEQ_GTM
FOREIGNKEY_GTM
FLDPROC_GTM
DEFAULTVALUE_GTM
COL_LABEL_GTM
FIELDPRC_NAME_GTM
PARMLIST_GTM
UNIQ_COL_GTM
REFTBNAME_GTM
REFTBCREATOR_GTM
RELNAME_GTM
DELETERULE_GTM
IXOWNER_GTM
IXNAME_GTM
FOREIGN_COL_GTM
CHECKNAME_GTM
CHECKCONDITION_GTM
COLSEQ_GTM
UNIQRLE_GIM
CLUSTER_GIM
BPOOL_GIM
PGSIZE_GIM
ERASER_GIM
DSETPASS_GIM
CLOSERLE_GIM
INDEXTYPE_GIM
COLNAME_GIM
COLNO_GIM
ORDERING_GIM
TBNAME_GIM
TBCREATOR_GIM
COLSEQ_GIM
PARTITION_GIM
PQTY_GIM
SQTY_GIM
STORTYPE_GIM
STORNAME_GIM
VCATNAME_GIM
LIMITKEY_GIM
FREEPAGE_GIM
PCTFREE_GIM
GBPCACHE_GIM
COLTYPE_GIM
LENGTH_GIM
SCALE_GIM
PIECESIZE_GIM
TEXT_GVM
CHECK_GVM
SEQNO_GVM
VIEW_REM_GVM
VIEW_LABEL_GVM
CREATOR_GDM
STGROUP_GDM
BPOOL_GDM
ROSHARE_GDM
CCSID_GDM
BPOOL_GPM
PARTITIONS_GPM
LOCKRULE_GPM
LOCKMAX_GPM
ERASERULE_GPM
DSETPASS_GPM
CLOSERULE_GPM
SEGSIZE_GPM
PARTITION_GPM
PQTY_GPM
SQTY_GPM
STORTYPE_GPM
STORNAME_GPM
VCATNAME_GPM
FREEPAGE_GPM
PCTFREE_GPM
COMPRESS_GPM
GBPCACHE_GPM
TYPE_GPM
CCSID_GPM
MAXROWS_GPM
LOCKPART_GPM
CREATOR_GSM
VCATNAME_GSM
VPASSWORD_GSM
VOLID_GSM
REMARKS_GAM
LABEL_GAM