Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Can some give me sample how would you do this Project

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
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    Post subject: Can some give me sample how would you do this Project
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: 247
Location: Cincinnati OH USA

PostPosted: Mon May 08, 2006 8:14 pm    Post subject:
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    Post subject: Re: Project
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: 247
Location: Cincinnati OH USA

PostPosted: Mon May 08, 2006 8:29 pm    Post subject:
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    Post subject:
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

Moderator Team Head


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

PostPosted: Mon May 08, 2006 9:41 pm    Post subject: Re: Project
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    Post subject:
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    Post subject: Re: Can some give me sample how would you do this Project
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    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts scheduling between OPC and TWS give u... nsbl IBM Tools 4 Sun Mar 12, 2017 5:35 pm
No new posts A sample of exit program for exit XMN... lind sh CICS 2 Mon Oct 03, 2016 5:07 pm
No new posts Can I use sort to select sample recor... Steve Ironmonger DFSORT/ICETOOL 3 Tue Nov 10, 2015 10:02 pm
No new posts sample report program kiran_65 COBOL Programming 4 Sat Jun 06, 2015 4:19 pm
No new posts PKZIP Query: How to Give Date and Tim... raj_mainframe08 All Other Mainframe Topics 2 Sun Mar 29, 2015 11:05 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us