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

Do A "Change All" With Batch Insync (Macro4)


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

New User


Joined: 13 Oct 2007
Posts: 19
Location: Fort Worth, Tx USA

PostPosted: Thu Apr 16, 2009 1:51 am
Reply with quote

For a regular sequential file, I need to convert a hex character located anywhere within a column range to spaces using Batch Insync (do not want to have to write a program for that). The field contains free form text so the hex string is not always in the same column of that column range. Some records, of course, will not need changing because the hex string does not always occur in every record.

My question is: how can I do this with Batch Insync. I have tried to use SEARCHDATA to locate the field but SEARCHDATA seems to be looking in only one starting column number.

//STEP1 EXEC PGM=INSYNC,PARM=MVS,REGION=0M,TIME=999
//STEPLIB DD DISP=SHR,DSN=MVS2.INSYNC.LOADLIB
//*
//#ELIBDD DD DISP=SHR,DSN=MVS2.INSYNC.ELIB
//SYSTSPRT DD SYSOUT=*
//#LOG DD SYSOUT=*
//#PRINT DD SYSOUT=*
//#STATS DD SYSOUT=*
//#INDD DD DSN=.... (input file)
//#OUTDD DD DSN=... (output file)
//#PARM DD *
FUNCTION=CHANGE
INDD=#INDD
OUTDD=#OUTDD
RDW=OFF
LINESPERPAGE=065
SEARCHDATA=(00044,001,EQ,X'25')
Back to top
View user's profile Send private message
manihcl85
Warnings : 1

New User


Joined: 11 Jan 2007
Posts: 52
Location: chennai

PostPosted: Thu Apr 16, 2009 3:26 pm
Reply with quote

Hi,

You can use the below commeand to change the occurance between column 10 and column 20

change all x'25' x'40' 10 20

Thanks
Manikandan
Back to top
View user's profile Send private message
luis_pr

New User


Joined: 13 Oct 2007
Posts: 19
Location: Fort Worth, Tx USA

PostPosted: Thu Apr 16, 2009 6:15 pm
Reply with quote

It sounds as if you are thinking along the lines of doing this in SPF Edit Mode, Manikandan. I have to do this using Batch Insync
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Thu Apr 16, 2009 6:17 pm
Reply with quote

Quote:
I have to do this using Batch Insync


Then why don't you look at the documentation?
Back to top
View user's profile Send private message
karupps

New User


Joined: 02 May 2007
Posts: 4
Location: London

PostPosted: Tue Oct 13, 2009 1:04 pm
Reply with quote

Hi,

You can do like this.

FUNCTION=CHANGE
REPLACEDATA=(0,1,EQ,X'00',X'40')
SETRC4=0

k
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 How to get a stack trace on a looping... ABENDS & Debugging 5
No new posts Calling Java method from batch COBOL ... COBOL Programming 5
No new posts PuTTY - "User is not a surrogate... IBM Tools 5
No new posts Help in Automating Batch JCL jobs mon... JCL & VSAM 3
No new posts 3270 personal communications. Can't c... TSO/ISPF 2
Search our Forums:

Back to Top