Edit D:\app\Administrator\product\11.2.0\dbhome_1\precomp\public\bndsel.cob
*************************************************************** * For Sample Program 10: Dynamic SQL Method 4 * * * * bndsel.cob : This file gets included in sample10.pco file. * *************************************************************** 01 BNDDSC. 02 SQLDNUM PIC S9(9) COMP VALUE 20. 02 SQLDFND PIC S9(9) COMP. 02 BNDDVAR OCCURS 20 TIMES. 03 BNDDV PIC S9(18) COMP. 03 BNDDFMT PIC S9(18) COMP. 03 BNDDVLN PIC S9(9) COMP. 03 BNDDFMTL PIC S9(4) COMP. 03 BNDDVTYP PIC S9(4) COMP. 03 BNDDI PIC S9(18) COMP. 03 BNDDH-VNAME PIC S9(18) COMP. 03 BNDDH-MAX-VNAMEL PIC S9(4) COMP. 03 BNDDH-CUR-VNAMEL PIC S9(4) COMP. 03 BNDDFILL1 PIC S9(9) COMP. 03 BNDDI-VNAME PIC S9(18) COMP. 03 BNDDI-MAX-VNAMEL PIC S9(4) COMP. 03 BNDDI-CUR-VNAMEL PIC S9(4) COMP. 03 BNDDFILL2 PIC S9(9) COMP. 03 BNDDFCLP PIC S9(18) COMP. 03 BNDDFCRCP PIC S9(18) COMP. 01 XBNDDI. 03 BND-DI OCCURS 20 TIMES PIC S9(4) COMP. 01 SELDSC. 02 SQLDNUM PIC S9(9) COMP VALUE 20. 02 SQLDFND PIC S9(9) COMP. 02 SELDVAR OCCURS 20 TIMES. 03 SELDV PIC S9(18) COMP. 03 SELDFMT PIC S9(18) COMP. 03 SELDVLN PIC S9(9) COMP. 03 SELDFMTL PIC S9(4) COMP. 03 SELDVTYP PIC S9(4) COMP. 03 SELDI PIC S9(18) COMP. 03 SELDH-VNAME PIC S9(18) COMP. 03 SELDH-MAX-VNAMEL PIC S9(4) COMP. 03 SELDH-CUR-VNAMEL PIC S9(4) COMP. 03 SELDFILL1 PIC S9(9) COMP. 03 SELDI-VNAME PIC S9(18) COMP. 03 SELDI-MAX-VNAMEL PIC S9(4) COMP. 03 SELDI-CUR-VNAMEL PIC S9(4) COMP. 03 SELDFILL2 PIC S9(9) COMP. 03 SELDFCLP PIC S9(18) COMP. 03 SELDFCRCP PIC S9(18) COMP. 01 XSELDI. 03 SEL-DI OCCURS 20 TIMES PIC S9(4) COMP. 01 PRECISION PIC S9(9) COMP. 01 SCALE PIC S9(9) COMP. 01 NULLS-ALLOWED PIC S9(9) COMP. 01 DISPLAY-LENGTH PIC S9(9) COMP. 01 MAX-LENGTH PIC S9(9) COMP VALUE 80.
Ms-Dos/Windows
Unix
Write backup
jsp File Browser version 1.2 by
www.vonloesch.de