Rational Developer for System z


Build the sample COBOL program

This lesson describes how to set build properties for the sample COBOL program you created in the previous lesson.
To set build properties for the sample COBOL program, do these steps:
  1. Select the USERID.RDZDB2.COBOL data set and click Property Group > Edit Associated Property Group.
  2. Open the JCL Job Card and Data Set Properties page.
  3. Update the JCL Job Card entry field. You may need to insert a JOBLIB card.
  4. Change the JCL Data Set entry field to point to a valid partitioned data set where your JCL will be written.
  5. Select the DB2 check box on the Runtime Environments page of the COBOL Settings tab.
  6. On the Procedures and Steps page of COBOL Settings click the plus sign in the ELAXFCOC procedure to expand it, and click the step name COBOL to open the compiler properties.
  7. Specify valid data set entries for Listing Output Data Set, Debug Data Set, Object Deck Data Set, Database Request Module Location (DBRM), and Data Set Qualifier for Compile Errors.
  8. Select the Support Error Feedback check box. The SYSTSIN Instructions contains the bind instructions for your COBOL application. The initial values in this entry field are JCL comments.
    //*UNCOMMENT AND TAILOR THE FOLLOWING IF YOUR SYSTSIN STATEMENT**
    //*CONTAINS BIND INSTRUCTIONS:                                                  
    //*//SYSTSIN   DD  *                                                            
    //* DSN SYSTEM(YOURSUBSYSTEM)
    //*    BIND PACKAGE(YOURLOCATION.YOURPACKAGE)-
    //*       OWNER(YOURUSERID) -
    //*       MEMBER(YOURMEMBER) -
    //*       LIBRARY('YOUR.DBRM.LIBRARY') -
    //*       ACTION(REP) -
    //*       VALIDATE(BIND)
    //*     BIND PLAN(YOURPLAN) -
    //*       PKLIST(YOURLOCATION.YOURPACKAGENAME.*)
    //* END
    //*    OR
    //*UNCOMMENT AND TAILOR THE FOLLOWING IF YOUR SYSTSIN STATEMENT**
    //*POINTS TO A DATA SET CONTAINING BIND INSTRUCTIONS
    //*//SYSTSIN DD DSN=USERID.BIND(MEMBER),DISP=SHR
    //*
  9. Remove the comments from the //SYSTSIN DD * to the END statement, and fill in the values that start with YOUR, as in the following example.
    //*UNCOMMENT AND TAILOR THE FOLLOWING IF YOUR SYSTSIN STATEMENT**
    //*CONTAINS BIND INSTRUCTIONS:
    //SYSTSIN   DD  *
         DSN SYSTEM(DSN7)
         BIND PACKAGE(STPLEX4A_DSN7.MELPKG1)-
         OWNER(MEL) -
         MEMBER(RDZDB2) -
         LIBRARY('MEL.D2.DB2DBRM') -
         ACTION(REP) -
         VALIDATE(BIND)
         BIND PLAN(MELPLN1) -
         PKLIST(STPLEX4A_DSN7.MELPKG1.*)
         END
    //*    OR
    //*UNCOMMENT AND TAILOR THE FOLLOWING IF YOUR SYSTSIN STATEMENT**
    //*POINTS TO A DATA SET CONTAINING BIND INSTRUCTIONS
    //*//SYSTSIN DD DSN=USERID.BIND(MEMBER),DISP=SHR
    //*
    /*
  10. Open the Link Options properties page and verify that your load module data set is a valid load module data set.
  11. Add the necessary DB2® and Language Environment® (LE) data sets to your link libraries.
  12. Open the Runtime Options Properties page and click the step name RUN. The Step Options area opens.
  13. Click the Edit button and change the Procedure Name to ELAXFTSO.
  14. Select the Run in batch with debugger radio button.
  15. Change the Additional JCL to the following:
    //******* ADDITIONAL RUNTIME JCL HERE ******
    //TSOGO.SYSTSIN   DD  *
    DSN SYSTEM(DB2SUBSYSTEMNAME)
    RUN PROGRAM(RDZDB2) -
    PLAN(PLANNAME) -
    LIB('USERID.LOAD')
    /* 
  16. On the Assembler tab of the property group editor, expand ELAXFASM and click the ASM step name.
  17. Make sure that the data sets specified exist for the Object Deck Data Set and the Macro Libraries options.
  18. Close and save the property group.
  19. Right-click the RDZDB2 program in the z/OS Projects or Enterprise Projects view and select Generate JCL > For Compile Link Go.

Feedback