Vishwakiran Beginner
Joined: 29 Jun 2004 Posts: 11 Topics: 8 Location: Bangalore
|
Posted: Sat Dec 30, 2006 2:44 pm Post subject: Utility for copying the tape datset to DASD datset |
|
|
Hi,
I want to use a utility(using REXX or CLIST) to copy the tape dataset to DASD dataset. The utility needs to be getting the record length and record format from the tape and automatically assign it to dasd dataset.
This would prevent us from running a JOB for each time when we need to retrieve the tape datset.
Is this possible through CLIST. If possible could you please let me know how to achieve this ? _________________ Regards,
Vishwakiran |
|
kolusu Site Admin
Joined: 26 Nov 2002 Posts: 12375 Topics: 75 Location: San Jose
|
Posted: Sat Dec 30, 2006 7:51 pm Post subject: |
|
|
Vishwakiran,
Sort/File-aid can easily copy the tape dataset to a dasd and the DCB parameters are automatically copied from the input to output.
ex:
Code: |
//STEP0100 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=your tape dataset,
// DISP=SHR
//SORTOUT DD DSN=your dasd dataset,
// DISP=(NEW,CATLG,DELETE),
// UNIT=SYSDA,
// SPACE=(CYL,(X,Y),RLSE)
//SYSIN DD *
SORT FIELDS=COPY
/*
|
Code: |
//STEP0100 EXEC PGM=FILEAID
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//DD01 DD DSN=your tape dataset,
// DISP=SHR
//DD01O DD DSN=your dasd dataset,
// DISP=(NEW,CATLG,DELETE),
// UNIT=SYSDA,
// SPACE=(CYL,(X,Y),RLSE)
//SYSIN DD *
$$DD01 COPY
/*
|
Hope this helps...
Cheers
Kolusu _________________ Kolusu
www.linkedin.com/in/kolusu |
|