ISREDIT macro

awyn · New User Joined: 11 Feb 2008 Posts: 49 Location: chennai

Hi,
In ISREDIT macro, "PROCESSs range" command process the Line commands in the range specified for eg
ISREDIT "PROCESS RANGE C" .. this will process the user defined operation when cc is given in the line number
000001 IDENTIFICATION DIVISION.
00cc02 PROGRAM-ID. ADDPRG.
000003 ENVIRONMENT DIVISION.
00cc04 DATA DIVISION.
My question is how to give different letter combination in PROCESS RANGE like ISREDIT "PROCESS RANGE TE"

ofer71 · Posted: Thu Aug 07, 2008 12:40 pm

What do you mean by "give different letter combination"? You can put up to 2 commands, each up to 6 characters, as well explained in the fine manual.

O.

awyn · New User Joined: 11 Feb 2008 Posts: 49 Location: chennai

HI,
I'm getting the output when i use same letter combination like CC in the line number but if i use ,for eg CUT in the range ISREDIT "PROCESS RANGE CUt" the program ends in a error.[/img]

chidams78 · New User Joined: 29 May 2006 Posts: 59 Location: India

Hi all,

Using ISREDIT macro, I am searching and replacing the string in PROClibs.

For example, in the below mentioned PROC, I need to change all the occurances of string XYZ to ZPNDVR.ABC and all the occurances of ABC to ZPNDVR.ABC.

//TESTN1 PROC ENVI1='XYZ',GNBO1='XYZ',GNVR2='ABC',JNKQ2='ABC',
// ZERO='(0)',QTRERFG='(+1)',HLQAO='ZPNDVR',

On running the ISREDIT macro,

ISREDIT MACRO (PROCESS)
ISREDIT C "'XYZ'" "'ZPNDVR.XYZ'" ALL
ISREDIT C "'ABC'" "'ZPNDVR.ABC'" ALL

the strings got replaces BUT the line exceeds above 72 bytes.
Could anybody guide me how to get rid of the exceeding lien length issue

Thanks
Chidam