Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

OUTREC OVERLAY for a VB file

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
notonly4u

New User


Joined: 26 Apr 2005
Posts: 87
Location: Hyderabad

PostPosted: Thu Sep 03, 2009 10:15 am    Post subject: OUTREC OVERLAY for a VB file
Reply with quote

Hi Friends,

I have a problem with outrec overlay for a VB file.

I have a file with LRECL=585, REC FMT = VB.
From 147th byte, we have an aray declared. Hence the length of each record depends on the array size.

My requirement is, from 147th byte, until the end of record, if I find '5A'X, I need to change with 'FC'X. I used the following code.

SORT FIELDS=COPY
ALTSEQ CODE=(5AFC)
OUTREC OVERLAY=(151:151,434,TRAN=ALTSEQ)

But the above code actually changes the length of each record by padding spaces at the end of each record.

Can anyone please help me with this?
Thanks for your time.

Regards
Tanden.
Back to top
View user's profile Send private message

Frank Yaeger

DFSORT Moderator


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

PostPosted: Thu Sep 03, 2009 9:45 pm    Post subject:
Reply with quote

You can use these DFSORT control statements to do the change only for the variable part of the record:

Code:

    SORT FIELDS=COPY
    ALTSEQ CODE=(5AFC)
    OUTREC BUILD=(1,150,151,TRAN=ALTSEQ)
Back to top
View user's profile Send private message
notonly4u

New User


Joined: 26 Apr 2005
Posts: 87
Location: Hyderabad

PostPosted: Fri Sep 04, 2009 9:40 am    Post subject:
Reply with quote

Thanks Frank.
It works as desired.
Thanks much for your time.

Regards
Tanden
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
This topic is locked: you cannot edit posts or make replies. Fetching data from BAI File arunsoods JCL & VSAM 1 Wed Jul 19, 2017 4:28 pm
No new posts Write out NODUPS but just from one file Jay Villaverde DFSORT/ICETOOL 8 Fri Jul 14, 2017 12:44 am
No new posts How to add header with Date(YYMMDD) i... Rajan Moorthy DFSORT/ICETOOL 2 Thu Jul 06, 2017 11:44 pm
No new posts How to generate a new unique Input fi... for1ranjith CLIST & REXX 11 Sat Jul 01, 2017 12:09 pm
No new posts Writing a file using online program grvtomar PL/I & Assembler 3 Fri Jun 30, 2017 1:06 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us