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

Have a file consist records in variable Block length


IBM Mainframe Forums -> COBOL Programming
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
lakshmibala

New User


Joined: 16 Jun 2004
Posts: 47

PostPosted: Wed Aug 25, 2004 8:24 pm
Reply with quote

Hi

This question asked in IBM

Have a file consist records in variable Block length one is 80,40,30,50...like that. i wanna sorted order thru their size. How to sort?
Back to top
View user's profile Send private message
mmwife

Super Moderator


Joined: 30 May 2003
Posts: 1592

PostPosted: Wed Aug 25, 2004 9:57 pm
Reply with quote

If you want to sort by BLOCK size, define the file as RECFM=U and define the sort key as the BDW (i.e. the 1st 4 bytes in the block).

I don't think you can sort by the RDW (rec descriptor word) because the 1st rec of each block looks like:

BDW|RDW|data

and the other recs in each block look like:

RDW|data

So, the sort key you need changes position in the 1st rec of each block.
Back to top
View user's profile Send private message
anuradha

Active User


Joined: 06 Jan 2004
Posts: 247
Location: Hyderabad

PostPosted: Thu Aug 26, 2004 9:58 pm
Reply with quote

Hi Jack,

You rightly added a statement in your signature that too at right place. Now a days we are seeing many questions which are half informative.

Thanks,
Anu
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 -> COBOL Programming

 


Similar Topics
Topic Forum Replies
No new posts Unable to interpret a hex value to De... COBOL Programming 7
No new posts REXX/CMS How to place command console... CLIST & REXX 4
No new posts combine multiple unique records into ... DFSORT/ICETOOL 2
No new posts how to eliminate null indicator value... DB2 7
No new posts CA7 count with DATE variable CA Products 0
Search our Forums:

Back to Top