MVSFORUMS.com A Community of and for MVS Professionals
View previous topic :: View next topic
Author
Message
kris_mf Beginner Joined: 07 Feb 2005 Posts: 8 Topics: 6 Location: Chennai
Posted: Mon Feb 14, 2005 2:20 am Post subject: IEBUPDTE Help
Hi,
I 've used the following JOB card to create PDS member from a PS file Code:
//IEBUPDTE JOB (0009500),'UPDTE',CLASS=Q,MSGCLASS=6,
// MSGLEVEL=(1,1),NOTIFY=&SYSUID
//*
//STEP010 EXEC PGM=IEBUPDTE,PARM=NEW
//*
//SYSUT1 DD DSN=TST.CTS.SAMPLE.DATA1,DISP=SHR
//SYSUT2 DD DSN=E2CTSS2.SAMPLE.TEST1,DISP=MOD
//*
//SYSPRINT DD SYSOUT=*
//*
//SYSIN DD *
./ ADD NAME=DAEDIT
./ ENDUP
//*
The job is giving an error message . Please suggest me on how to do this>?
E2CTSS2.SAMPLE.TEST1, is the PDS currently exist
TST.CTS.SAMPLE.DATA1 , is the input sequential file
DAEDIT is the new member
Thanks,
Kris
Back to top
superk Advanced Joined: 19 Dec 2002 Posts: 684 Topics: 5
Posted: Mon Feb 14, 2005 6:05 am Post subject:
Per the Reference Manual:
http://publibfp.boulder.ibm.com/epubs/pdf/dgt1u104.pdf
when PARM=NEW, specifies that the input consists solely of the control dataset. Do NOT code a SYSUT1 DD statement if you specify NEW.
when PARM=MOD, specifies that the input consists of both the control dataset and the input dataset. MOD is the default.
Back to top
kirank Beginner Joined: 21 Apr 2004 Posts: 61 Topics: 33 Location: hyderabad
Posted: Mon Jul 04, 2016 4:13 am Post subject: IEBUPDTE error
Hi,
When im trying to create a new member in a pds, im getting the follwoing error. It is successfully creating the pds but not creating the member in that pds. Could you please help me. Code:
SYSIN NEW MASTER
./ ADD NAME=MEMB1,LEVEL=00,SOURCE=0,LIST=ALL
./ ENDUP
IEB823I SYSIN HAS NO RECORDS.
IEB818I HIGHEST CONDITION CODE WAS 00000004
IEB819I END OF JOB IEBUPDTE.
the jcl which i'v written is as below:
Code:
//STEP001 EXEC PGM=IEBUPDTE,PARM=NEW
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD DUMMY
//SYSUT2 DD DSNAME=TEST.yyyy.RUNJCL2,
// DISP=(NEW,CATLG),
// UNIT=DISK,
// SPACE=(TRK,(50,,10)),
// DCB=(RECFM=F,LRECL=80,BLKSIZE=80)
//SYSIN DD DATA
./ ADD NAME=MEMB1,LEVEL=00,SOURCE=0,LIST=ALL
./ ENDUP
/*
Back to top
kolusu Site Admin Joined: 26 Nov 2002 Posts: 12375 Topics: 75 Location: San Jose
Posted: Mon Jul 04, 2016 11:13 am Post subject: Re: IEBUPDTE error
kirank wrote: Code:
IEB823I SYSIN HAS NO RECORDS.
kirank,
The message is self explanatory. You cannot create empty datasets. So you need to have something between the ADD member and END
something like this
Code:
//SYSIN DD DATA
./ ADD NAME=MEMB1,LEVEL=00,SOURCE=0,LIST=ALL
sample record 1 for the member memb1
./ ENDUP
/*
_________________ Kolusu
www.linkedin.com/in/kolusu
Back to top
kirank Beginner Joined: 21 Apr 2004 Posts: 61 Topics: 33 Location: hyderabad
Posted: Sat Jul 09, 2016 5:37 am Post subject:
Thank you so much.. It's working
Back to top
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum