View previous topic :: View next topic
|
Author |
Message |
kalyan.v
New User
Joined: 04 Feb 2008 Posts: 65 Location: Hyd
|
|
|
|
Refering to post:
ibmmainframes.com/viewtopic.php?t=16319&highlight=
I have a similar requirement. In my case the copy book is very huge and it takes alot of time to save by dragging n selecting screen and cntrl+c and ctrl+v.
Is there any other way of saving? |
|
Back to top |
|
 |
Akatsukami
Global Moderator

Joined: 03 Oct 2009 Posts: 1788 Location: Bloomington, IL
|
|
|
|
kalyan.v wrote: |
I have a similar requirement. In my case the copy book is very huge and it takes alot of time to save by dragging n selecting screen and cntrl+c and ctrl+v.
Is there any other way of saving? |
Five and a half years is certainly enough time to do it by copy and paste. |
|
Back to top |
|
 |
dick scherrer
Moderator Emeritus

Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Hello,
Rather than posting a reply to a multi-year dormant topic, it is best to start a new topic for your question and include the link to the topic you want to reference.
I've split your topic and included the link in your post. |
|
Back to top |
|
 |
Robert Sample
Global Moderator

Joined: 06 Jun 2008 Posts: 8695 Location: Dubuque, Iowa, USA
|
|
|
|
Suggestion: find the File Aid Batch Reference Manual at your site (if your site is licensed for File Aid, then you have access to that manual either as hardcopy or internal website or through the vendor), and read up on RLPRINT batch command. |
|
Back to top |
|
 |
Pete Wilson
Active Member
Joined: 31 Dec 2009 Posts: 564 Location: London
|
|
|
|
Something I have found useful is FileAid 3.6 option Global Browse which creates a flat-file of the contents of PDS members with a separator of the member name.
This example will do that in Batch. You can generate it yourself from the FileAid panel if this doesn't work.
//*
//* THE BELOW STATEMENTS ARE REQUIRED IN THE DD01SC DD SO THAT ALL
//* RECORDS ARE SELECTED AS THE BATCH DEFAULT DOESN'T READ ALL RECORDS.
//* IT HAS TO BE IN A RECFM=VB,LRECL=300 FILE.
//*
//* DEFINE BLOCKS=SELECTION,
//*
//* INITIAL_SKIP=0,
//* THEN_SELECT=0,
//* THEN_SKIP=0,
//*
//* MAXIMUM_TO_SEARCH=ALL,
//* MAXIMUM_TO_SELECT=ALL
//*
//* THIS CREATES A FLAT-FILE LIST OF ALL CONTENTS OF PDS MEMBERS
//*
//FASTEP1 EXEC PGM=FILEAID
//STEPLIB DD DISP=SHR,DSN=FILEAID.LOADLIB
//SYSPRINT DD SYSOUT=*
//SYSLIST DD DSN=OUTPUT.LIST.FLATFILE,DISP=MOD
//DD01SC DD DSN=A.B.C(FASELECT),DISP=SHR
//DD01 DD DSN=INPUT.PDS,DISP=SHR
//SYSIN DD *
££DD01 LIST MEMBER=(X,Y,Z)
//*
//* TO SELECT MEMBER NAMES BY MASK RATHER
//* THAN SPECIFIC MEMBER NAMES USE THE BELOW
££DD01 LIST MEMBERS=MEMNAM* |
|
Back to top |
|
 |
|