IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Can some give me sample how would you do this Project


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
PLFaBiaN5

New User


Joined: 18 Apr 2006
Posts: 21

PostPosted: Mon May 08, 2006 7:51 pm
Reply with quote

i have to do the following

1.create a dataset member with some data
2.copy the data into another member call it whatever
3.print the first dataset member
4.print the second dataset member

i use the iebgener utility

can some give me sample how would you do this
coping the data to the second member is there a jcl to do that
or u just do it manually
Back to top
View user's profile Send private message
dneufarth

Active User


Joined: 27 Apr 2005
Posts: 419
Location: Inside the SPEW (Southwest Ohio, USA)

PostPosted: Mon May 08, 2006 8:14 pm
Reply with quote

show us the JCL you have created thus far
Back to top
View user's profile Send private message
PLFaBiaN5

New User


Joined: 18 Apr 2006
Posts: 21

PostPosted: Mon May 08, 2006 8:17 pm
Reply with quote

Code:

//***  DATA FROM MYDATA PDS
//***  PROJECT 1 DUE MONDAY
//STEP1 EXEC PGM=IEBGENER
//SYSUT1 DD DSN=MYDATA6,DISP=(SHR)
//SYSUT2 DD DSN=MYDATA,DISP=(SHR)
//SYSPRINT DD SYSOUT=*
//SYSIN    DD DUMMY
GORA PIOTR
1005 45 STREET BROOKLYN NY, 11219
JACK
JOE
ARTHUR
PETER
SYLWIA
ANNA
FIBO
20 FIFI
21 WOJTEK
22 PATRYCJA
23 /*
24 //
Back to top
View user's profile Send private message
dneufarth

Active User


Joined: 27 Apr 2005
Posts: 419
Location: Inside the SPEW (Southwest Ohio, USA)

PostPosted: Mon May 08, 2006 8:29 pm
Reply with quote

you need to review your IEBGENER files and keywords

sysut1 is input data in your case dd *

sysut2 is output usually something like dsn=x.y.z(member),disp=shr for PDS format

run it and see if it creates the PDS member 'mydata'

then manually delete it, add second step and run it

keep repeating this until all steps completed


as this is a classroom exercise, giving you the solution would not effectively teach you what to do
Back to top
View user's profile Send private message
PLFaBiaN5

New User


Joined: 18 Apr 2006
Posts: 21

PostPosted: Mon May 08, 2006 9:34 pm
Reply with quote

is there a utility that copies just the data from one member to another...
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Mon May 08, 2006 9:41 pm
Reply with quote

IEBCOPY, IEBGENER, SORT would all work, but only IEBCOPY lets you select certain members for processing from within the utility.
Back to top
View user's profile Send private message
PLFaBiaN5

New User


Joined: 18 Apr 2006
Posts: 21

PostPosted: Mon May 08, 2006 9:59 pm
Reply with quote

my code
Code:

//S1       EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=*
//SYSIN    DD DUMMY
//SYSUT1   DD DSN=WYL.NY.XDS.MYLIB,DISP=SHR(MYDATA)
//SYSUT2   DD DSN=WYL.NY.XDS.MYLIB,DISP=SHR(MYDATABU)
//SYSIN    DD *
            GENERATE MAXNAME=3, MAXGRPS=3
            MEMBER NAME=MYDATA
            RECORD IDENT=(7, 'MYDATA,1)
            MEMBER NAME=MYDATABU
            RECORD IDENT=(7, 'MYDATABU,1)
//****DATA****
MAX WALLET 1005 55ST BROOKLYN, NY 11228
JOE
MARRY
JACK
MIKE
ARTHUR
ANNA
LUKE
MICHEAL
LINCOLN
PETE
/*
//


this the error i get

12:28:56 IAT4204 JOB FAILED WITH CONVERTER/INTERPRETER JCL ERROR
12:28:56 IAT4801 JOB XDSNY57 (JOB04549) EXPRESS CANCELED BY INTERPRETER DS


thank you any help
Back to top
View user's profile Send private message
vijayamadhuri

Active User


Joined: 06 Apr 2005
Posts: 180

PostPosted: Tue May 09, 2006 2:02 am
Reply with quote

just use option 3.4 .c

specify the from dataset xyzw.jcl.cntl(mem1)

specify the 2 dataset

the job is done
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts Help needed to assemble IMS sample co... ABENDS & Debugging 4
No new posts How to give complex condition in JCL . CLIST & REXX 30
No new posts Can you give me examples of programs ... CLIST & REXX 22
This topic is locked: you cannot edit posts or make replies. Sample CICS Webservices Program CICS 1
No new posts Looking for Mainframe Project Manager Mainframe Jobs 0
Search our Forums:

Back to Top