IEBDG

データ生成。テストデータの作成などに使用できる。

//STEP01  EXEC PGM=IEBDG
//EXDD01    DD DSN=DATASET.NAME,DISP=(NEW,KEEP),
//             UNIT=3390,VOL=SER=VOLSER,
//             SPACE=(TRK,(1,1),RLSE),
//             DCB=(DSORG=PS,RECFM=FB,LRECL=80,BLKSIZE=3120)
//SYSPRINT  DD SYSOUT=*
//SYSIN     DD DATA
  DSD    OUTPUT=(EXDD01)
  FD     NAME=FIELD1,LENGTH=5,STARTLOC=1,FORMAT=AL,ACTION=RP
  FD     NAME=FIELD2,LENGTH=75,STARTLOC=6,FORMAT=RA
  CREATE QUANTITY=20,NAME=(FIELD1,FIELD2)
  END
/*

トップメニューへ