IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Needs to replace the below FileAid with Sort Card


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Bhuvanakp

New User


Joined: 29 Aug 2007
Posts: 19
Location: Chennai

PostPosted: Fri Sep 19, 2008 2:40 pm
Reply with quote

Hi,


Needs to replace the below FileAid with Sort Card.

$$DD01 DUMP OUT=11
Back to top
View user's profile Send private message
Aaru

Senior Member


Joined: 03 Jul 2007
Posts: 1287
Location: Chennai, India

PostPosted: Fri Sep 19, 2008 2:46 pm
Reply with quote

Bhuvana,

Have seen so many posts on fileaid-sort card converions. It would be great if you can explain as to what this fileaid command does so that it would be easy for others to write a corresponding sort card.
Back to top
View user's profile Send private message
hchinnam

New User


Joined: 18 Oct 2006
Posts: 73

PostPosted: Fri Sep 19, 2008 2:49 pm
Reply with quote

Can you explain your question a bit clearly. how do you want your output should look like.
Back to top
View user's profile Send private message
Bhuvanakp

New User


Joined: 29 Aug 2007
Posts: 19
Location: Chennai

PostPosted: Fri Sep 19, 2008 2:53 pm
Reply with quote

Hi,

When I checked for the explanation of the Dump in FileAid card,
the below explanation I received:

Example 1:

$$DD01 DUMP OUT=5

Example 1 prints the first five records from the input dataset in a format that shows both the character and hexadecimal data. This application of DUMP is useful for packed and other nonprintable data.

Now I need to replace this with Sort Card so that it could prints the first five records from the input dataset in a format that shows both the character and hexadecimal data.
Back to top
View user's profile Send private message
Aaru

Senior Member


Joined: 03 Jul 2007
Posts: 1287
Location: Chennai, India

PostPosted: Fri Sep 19, 2008 2:54 pm
Reply with quote

All,

Got the explanation from a manual.

Quote:
$$DD01 DUMP OUT=11


The above condition does the foll

- Generates a hexadecimal print for the first 11 records in the input file.

Bhuvana wants an equivalent SORT card doing the same.

Hope I am not wrong.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Fri Sep 19, 2008 2:56 pm
Reply with quote

Has Bhuvana shown any evidence of reading his associated sort manuals ? Instead of just asking how rather than "I have tried, but .............."
Back to top
View user's profile Send private message
Bhuvanakp

New User


Joined: 29 Aug 2007
Posts: 19
Location: Chennai

PostPosted: Fri Sep 19, 2008 3:22 pm
Reply with quote

Hi,

I got the following info from the manual:

Example 1 prints the first five records from the input dataset in a format that shows both the character and hexadecimal data. .

I the underlined different from Generating hexadecimal print only for the first 11 records in the input file.


Please clarify.
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Developer


Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA

PostPosted: Fri Sep 19, 2008 9:50 pm
Reply with quote

Bhuvana,

What is the RECFM and LRECL of the input file?

It would help if you (or someone else) showed an example of the output FileAid actually produces for that command.
Back to top
View user's profile Send private message
Arun Raj

Moderator


Joined: 17 Oct 2006
Posts: 2481
Location: @my desk

PostPosted: Fri Sep 19, 2008 10:17 pm
Reply with quote

Hello,

Here's a sample of the DUMP output produced by file-aid.

Input
Code:
//DD01     DD * 
1111             
2222             
3333             
4444             
//SYSIN    DD * 
$$DD01 DUMP OUT=2

Output
Code:
----+----1----+----2----+----3----+----4----+----5----+----6----+----7----+----8----+----9----+----0----+---
F I L E - A I D  V8.9.0  19 - SEP - 2008   09.39.14                     PAGE 1                             
DD01=XXXXXXX.XXXXXXXX.JOB27096.D0000101.?    VOL=SYSOUT                                                     
                                                                                                           
REC        1 DATA   80                                                   
4900-00-000  DATA   80

CHAR 1111                         
ZONE FFFF4444444444444444444444444444444444444444444444444444444444444444444444444444
NUMR 11110000000000000000000000000000000000000000000000000000000000000000000000000000
                              ...1...5...10...15...20...25...30...35...40...45...50...55...60...65...70...75...80
                                                                                                           
REC        2 DATA   80
CHAR 2222
ZONE FFFF4444444444444444444444444444444444444444444444444444444444444444444444444444
NUMR 22220000000000000000000000000000000000000000000000000000000000000000000000000000
                            ...1...5...10...15...20...25...30...35...40...45...50...55...60...65...70...75...80

Thanks,
Arun
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Fri Sep 19, 2008 11:33 pm
Reply with quote

Hello,

Very similar output may be gotten from DITTO as well.
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Developer


Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA

PostPosted: Sat Sep 20, 2008 2:49 am
Reply with quote

I can't match that exact layout, but here's a DFSORT job that will provide similar information using a different layout:

Code:

//DUMP  EXEC  PGM=ICEMAN                               
//SYSOUT    DD  SYSOUT=*                               
//SORTIN DD *                                         
1111                                                   
2222                                                   
3333                                                   
4444
/*                                                   
//SORTOUT DD SYSOUT=*                                 
//SYSIN    DD    *                                     
  OPTION COPY                                         
  OUTFIL BUILD=(8C'-',/,C'RECORD ',SEQNUM,8,ZD,//,     
     C'CHAR ',1,80,//,                                 
     C'HEX  ',1,80,HEX)                               
/*
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts Need to set RC4 through JCL SORT DFSORT/ICETOOL 5
No new posts How to split large record length file... DFSORT/ICETOOL 10
No new posts Replace each space in cobol string wi... COBOL Programming 3
No new posts Search two or more word with FILEAID Compuware & Other Tools 15
No new posts Replace Multiple Field values to Othe... DFSORT/ICETOOL 12
Search our Forums:

Back to Top