Copy first record



JES, JES2, JCL utilities, IDCAMS, Compile & Run JCLs, PROCs etc...

Copy first record

Postby madhavmannem » Mon Dec 24, 2007 1:59 pm

Hou to copy first record ?
madhavmannem
 
Posts: 6
Joined: Wed Dec 19, 2007 12:27 am
Has thanked: 0 time
Been thanked: 0 time

Re: Copy first record

Postby Frank Yaeger » Mon Dec 24, 2007 9:59 pm

You can use a DFSORT job like this to copy the first record:

//S1    EXEC  PGM=ICEMAN
//SYSOUT    DD  SYSOUT=*
//SORTIN DD DSN=...  input file
//SORTOUT DD DSN=...   output file
//SYSIN    DD    *
  OPTION COPY,STOPAFT=1
/*
Frank Yaeger - DFSORT Development Team (IBM) - yaeger@us.ibm.com
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
=> DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort
User avatar
Frank Yaeger
Global moderator
 
Posts: 1079
Joined: Sat Jun 09, 2007 8:44 pm
Has thanked: 0 time
Been thanked: 15 times


Return to JCL

 


  • Related topics
    Replies
    Views
    Last post