xxSJFCNT

The DB2 table FORMCONT can be filled using SQL statements. These can be generated with the PRCIFRM batch program. The input data is described with DD EDEFCMDS.

DB2 Structure of FORMCONT

FORMNAME VARCHAR(64) NOT NULL,
    STMT     VARCHAR(16) NOT NULL,
    NAME     VARCHAR(64) NOT NULL,
    LBL      VARCHAR(512) NOT NULL,
    VAL      VARCHAR(1024),
    USR      VARCHAR(32)                             

Job-Control

//S010     EXEC PGM=PRCIFRM, PARM='DO=PM2930.CUSTOM_DATA,MC=500'                                  
//* PROGRAM PARM 1: NAME OF DB2 TABLE                         
//* PROGRAM PARM 2: WRITE COMMIT AFTER EACH XXX SQL STATEMENT 
//CEEOUT   DD  SYSOUT=*                                       
//CEEDUMP  DD  SYSOUT=*                                       
//SYSPRINT DD  SYSOUT=*                                       
//SYSOUT   DD  SYSOUT=*                                       
//HOSOLOAD DD  DSN=&&PMFRMCO,DISP=(NEW,PASS,DELETE),                                      
//             RECFM=FB,LRECL=80,SPACE=(TRK,(100,100),RLSE)                             
//EDEFCMDS DD  *   
. . . . .                                                                                                                                  

The EXEC parameter ‘DO’ is used to specify the target table and the parameter ‘MC’ is used to specify the COMMIT frequency.

EDEFCMDS Example

//EDEFCMDS DD  *                                               
MY.PROCMAN.V5R1.USER.SYSIN; HOSAGB01 ; 80; FB; +               
  JOB;        JOBN1; FRM_JCK_JOB_HO; 1; 3; 1; 3;                  
MY.PROCMAN.V5R1.USER.SYSIN; HOACCT01 ; 80; FB; +               
  JOB;        #PP01; FRM_JCK_JOB_HO; 1; 6; 1; 6;                  
//* PARM 1 : NAME OF PO DATASET                                   
//* PARM 2 : MEMBER NAME                                          
//* PARM 3 : RECORD LENGTH OF PO DATASET 80,100,120 ARE SUPPORTED 
//* PARM 4 : RECORD FORMAT                                        
//* PARM 5 : STATEMENT TYPE LIKE JOB, EXEC OR DD                  
//* PARM 6 : NAME OF WEB FORM FIELD                               
//* PARM 7 : NAME OF WEB FORM                                     
//* PARM 8 : LABEL START DIGIT OF INPUT DATA                      
//* PARM 9 : LABEL LENGTH OF INPUT DATA                           
//* PARM 10: VALUE START DIGIT OF INPUT DATA                      
//* PARM 11: VALUE LENGTH OF INPUT DATA                           
//* PARM 12: (OPTIONAL) USERID START DIGIT OF INPUT DATA          
//* PARM 13: (OPTIONAL) USERID LENGTH OF INPUT DATA                                                                                                                                                                                                         

• Parameter 1 Name of the Input file (Only PO datasets are supported)

• Parameter 2 Name of the Input member name.

• Parameter 3 Record length of Input file. Following LRECL are supported. LRECL 80, 100, 120, 150, 200, 250, 300, 350, 400

• Parameter 4 Record format e.g. FB

• Parameter 5 Statement Typ. E.g. JOB, EXEC or DD

• Parameter 6 Name of the Web Form Field

• Parameter 7 Name of the Web Form

• Parameter 8 Label start position in the input data

• Parameter 9 Label length in the input data

• Parameter 10 Value start position in the input data

• Parameter 11 Value length in the input data

• Parameter 12 User start position in the input data (Optional)

• Parameter 13 User length in the input data (Optional)