IEBDG

This program is used to generate test-data to simplify program testing. It can also be used to create an ISAM file from a sequential file that an IEBISAM, another utility cannot.

The following is the sample of a JCL statement to execute this utility program.

//GP4ABC JOB (RR, 1235,,,,8,,U),’MR. XYZ’,CLASS=S,

// MSGCLASS=G,MSGLEVEL=1,NOTIFY=GP4ABC

//*

//***********************************************************

//* THIS PROGRAM CREATES TEST DATA AS SPECIFIED IN THE //* CONTROL STATEMENT

//***********************************************************

//STEP1 EXEC PGM=IEBDG

//SYSPRINT DD SYSOUT=*

//TSTFILE1 DD DSN=TSGBAXC.SACRED.DATA,

// DISP=(NEW,CATLG),

// UNIT=SYSDA,

// SPACE=(CYL,(20,2),RLSE),

// DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)

//SYSIN DD DUMMY

DSD OUTPUT = (TSTFILE1)

FD NAME=PARTNBR,LENGTH=30,FORMAT=ZD,INDEX=1

FD NAME=REST,LENGTH=50,FORMAT=AN

CREATE QUANTITY=100,NAME=(PARTNBR,REST)

END

TSTFILE - Specifies the test file to be created and the name is specified in

DSN with all the parameters necessary for a new file, such as

DISP, UNIT, SPACE and DCB

In the control statements:

DSD Data Set Description

FD Field Description, where the first field PARTNBR is 30 Bytes long

FD Field Description, where the second field REST is 50 Bytes long

INDEX A number which needs to be included at the end of every field

CREATE QUANTITY = 100 specifies the number of records to be generated by the program and also the associated field names, such as PARTNBR and REST.

This utility has a drawback of not providing a wide variety of field contents, where the same field in two records will have entirely non-related data.

IT IS REALLY OBSOLETE THESE DAYS, SINCE ALL INSTALLATIONS DEPEND ON SOME OTHER WAYS OF CREATING TEST DATA.