Example of a procedure for starting the independent DBH

The following example shows a procedure for starting the independent DBH. A DBH with the DBH name x and the configuration name z is started as a batch job under the identifier $ID1. During the DBH session, SQL and CALL DML statements are to be executed. The DBH start parameters are entered in an S procedure called STARTP.SESDBH.ENTER.

Example

The command for initializing the batch job is:

/ENTER-PROCEDURE NAME=STARTP.SESDBH.ENTER,-

                                 PROC-PAR=NO,LISTING=YES,LOGGING=YES

The S procedure called STARTP.SESDBH.ENTER has the following structure:

/SET-PROCEDURE-OPTIONS
/ASSIGN-SYSLST TO-FILE=LST.SESDBH.E.DBH.IND
/MODIFY-MSG-ATTRIBUTES TASK-LANGUAGE=D
/MODIFY-TEST-OPTIONS DUMP=YES
/START-SESAM-DBH
//SET-DBH-OPTIONS-
//    DBH-IDENTIFICATION=*PARAMETERS(-
//        CONFIGURATION-NAME=Z -
//        ,DBH-NAME=X -
//    )-
//   ,ADMINISTRATION=*PARAMETERS(-
//       ADMINISTRATOR=*ANY(-
//            PASSWORD=C'XXX'-
//        )-
//    )-
//   ,SYSTEM-LIMITS=*PARAMETERS(-
//       SQL-DATABASE-CATALOG=10-
//      ,OLD-TABLE-CATALOG=5 -
//    )-
//   ,SQL-SUPPORT=*YES(-
//       INTERNAL-SORT-LIMIT=5000 -
//       ,INACTIVITY-TIME=1 -
//    ) 
// ADD-SQL-DATABASE-CATALOG-LIST -
//       ENTRY-1=*CATALOG(CATALOG-NAME=AUFTRAGKUNDEN) -
//       ,ENTRY-2=*CATALOG(CATALOG-NAME=CALLFIRMA)
//END
// ADD-OLD-TABLE-CATALOG-LIST -
//       ENTRY-1=*CALL-DML-TABLE(CALL-DML-TABLE-NAME=VERTRIEB -
//              ,CATALOG-NAME=CALLFIRMA -
//              ,SCHEMA-NAME=VERTRIEBSCH -
//              ,TABLE-NAME=VERTRIEB)- 
//       ,ENTRY-2=*CALL-DML-TABLE(CALL-DML-TABLE-NAME=FIRMA -
//              ,CATALOG-NAME=CALLFIRMA -
//              ,SCHEMA-NAME=FIRMASCH -
//              ,TABLE-NAME=FIRMA)
//END
/ASSIGN-SYSLST TO-FILE=*PRIMARY
/EXIT-PROCEDURE