My 2nd apology. The main reason for using this IDCAMS method is to reduce wasted disk space for empty files. Sometimes empty files are Updated with data after they are created and sometimes they just remain empty. One user created a few hundred of these each month with SPACE=(CYL,(500,200),RLSE) . So IDCAMS creating them saved 1000's of CYLs of DISK.
-----Original Message----- From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of Paul Gilmartin Sent: Wednesday, May 11, 2022 4:21 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Potential Resource Savings Techniques On Wed, 11 May 2022 15:36:01 -0400, wrote: >I apologize to all. The Correct JCL is below. It must use INFILE of DD DUMMY. > How do IEFBR14, IEBGENER, and IDCAMS compare in behavior and performance? I'd expect: IEFBR14 fails to RLSE. IEBGENER is simplest to code for a single data set. IDCAMS has best performance for multiple data sets because it minimizes job step overhead. Is there any purpose in allocating a primary with multiple storage units then immediately RLSE, other than demonstration? I recall I was told that the EOF is written automatically if the SMS address space is active, regardless whether the data set is SMS managed. How does this play with data recovery by allocating with ABSTRK? I prefer BLKSIZE=0. SDB knows best. >IDCAMS TO ALLOCATE EMPTY FILE VS USING IEFBR14 AS BR14 DOES NOT USE SDB >or RLSE SPACE >//STEP010 EXEC PGM=IDCAMS >//DD1 DD DUMMY CAN USE DD DUMMY OR DD * WITH NO DATA >//DD2 DD DSN=GRT.GIOIDXM.TEST.BLK1(+1), >// DISP=(NEW,CATLG,DELETE), >// DCB=(BLKSIZE=0,DSORG=PS,LRECL=80,RECFM=FB), >// SPACE=(CYL,(100,200),RLSE),UNIT=DISK >//DD3 DD DSN=GRT.GIOIDXM.TEST.BLK2, >// DISP=(NEW,CATLG,DELETE), >// DCB=(BLKSIZE=0,DSORG=PS,LRECL=80,RECFM=FB), >// SPACE=(TRK,(180,180),RLSE),UNIT=DISK >//SYSPRINT DD SYSOUT=* >//SYSIN DD * > REPRO INFILE(DD1) OUTFILE(DD2) > REPRO INFILE(DD1) OUTFILE(DD3) >/* -- gil ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
