IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum Index Mainframe: Search Log in to check your private messages Log in
 

OUTREC with ALter Command


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
scorp_rahul23

New User


Joined: 06 May 2008
Posts: 96
Location: Delhi

PostPosted: Wed Nov 22, 2017 3:10 pm
Reply with quote

My Input file is FB 194 REC Length.

I want to create a outrec to alter the file name.

Code:

........[92 Bytes]....A9340G.SHNP01.ABCD.A5.C51.F01.D2171122.RDY....


I have written below code to change one variable

Code:

OPTION COPY                                       
OUTFIL OUTREC=(C' ALTER ''',93,42,C'''- ',/,       
               C' NEWNAME(',93,19,C'V',113,22,C')')


Result of above code is
Code:

ALTER 'A9340G.SHNP01.ABCD.A5.C51.F01.D2171121.RDY'-             
NEWNAME(A9340G.SHNP01.ABCD.V5.C51.F01.D2171121.RDY)                 


I want to modify the OUTREC command to include additional changes for replacing the character "A9340G" to "A9340T"

Can you please suggest
Back to top
View user's profile Send private message
Rohit Umarjikar

Global Moderator


Joined: 21 Sep 2010
Posts: 2508
Location: NY,USA

PostPosted: Wed Nov 22, 2017 8:06 pm
Reply with quote

Use INREC to OVERLAY A9340G to A9340T before passing it to OUTREC.
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 -> DFSORT/ICETOOL

 

Search our Forum:

Similar Topics
Topic Forum Replies
No new posts How to pass arguments in a ISPSTART c... CLIST & REXX 6
No new posts VSAM Alter Command - Cylinder Extent ... JCL & VSAM 3
No new posts Am I missing something on "FREE ... CLIST & REXX 10
No new posts How to use CICS command CEBR on sdsf ... CICS 1
No new posts File transfer to remote system using ... TSO/ISPF 2

Back to Top