can I get the record from NO. 800 to 1800

Compuware's data management products: File-AID for IMS, File-AID/MVS, File-AID for DB2 and DBA-XPERT for DB2
lxw039
Posts: 47
Joined: Tue Oct 07, 2008 11:49 pm
Skillset: cobol, jcl
Referer: internet

can I get the record from NO. 800 to 1800

Postby lxw039 » Fri Dec 12, 2008 3:02 am

hi, there

I need check some records stored in tape file, but I just want get the records from No.800 to 1800 in File-aid, how to do that, thank you.

Nigel
Posts: 1
Joined: Tue Dec 30, 2008 12:14 am
Skillset: DB2, filaid,rexx, jcl,
Referer: from IBM Forum

Re: can I get the record from NO. 800 to 1800

Postby Nigel » Tue Dec 30, 2008 12:18 am

Check out the IN= parameter to position yourself, then the OUT= to limit the number of records

Something like this
$$dd01 in=800
$$dd01 list out=1000

Note the two $dd01. the first "positions" you in the file, the second one processes the LIST function from the current position.

ranga_subham
Posts: 279
Joined: Fri Jul 18, 2008 7:46 pm
Skillset: JCL,COBOL,DB2,IMS/DB,CICS,VSAM
Referer: I was banned by superk in main forum so I am here

Re: can I get the record from NO. 800 to 1800

Postby ranga_subham » Sat Jan 31, 2009 12:14 am

Hello, This is what you should try out........

Code: Select all

//STEP0001 EXEC PGM=FILEAID                             
//SYSPRINT DD SYSOUT=*                                   
//SYSOUT   DD SYSOUT=*                                   
//DD01     DD DSN=INPUT.FILE.NAME,
//            DISP=SHR                                   
//DD01O    DD DSN=OUTPUT.FILE.NAME,                 
//            DISP=SHR                             
//SYSIN    DD *                                         
$$DD01 SPACE IN=800                                       
$$DD01 COPY OUT=1000                                     
END                                                     
//*                                                     


HTH.


  • Similar Topics
    Replies
    Views
    Last post