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:
- Select the USERID.RDZDB2.COBOL data
set and click Property Group > Edit Associated Property
Group.
- Open the JCL Job Card and Data Set Properties
page.
- Update the JCL Job Card entry field.
You may need to insert a JOBLIB card.
- Change the JCL Data Set entry field
to point to a valid partitioned data set where your JCL will be written.
- Select the DB2 check box on the Runtime
Environments page of the COBOL Settings tab.
- 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.
- 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.
- 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
//*
- 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
//*
/*
- Open the Link Options properties
page and verify that your load module data set is a valid load module
data set.
- Add the necessary DB2® and Language Environment® (LE)
data sets to your link libraries.
- Open the Runtime Options Properties
page and click the step name RUN. The Step Options area opens.
- Click the Edit button and change
the Procedure Name to ELAXFTSO.
- Select the Run in batch with debugger radio
button.
- 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')
/*
- On the Assembler tab of the property
group editor, expand ELAXFASM and click the ASM step
name.
- Make sure that the data sets specified exist for the Object
Deck Data Set and the Macro Libraries options.
- Close and save the property group.
- Right-click the RDZDB2 program in
the z/OS® Projects view and
select Generate JCL > For Compile Link Go.