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
 

 

Regarding ISREDIT MACRO

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
View previous topic :: :: View next topic  
Author Message
rajesh_m

New User


Joined: 15 Apr 2008
Posts: 39
Location: India

PostPosted: Thu Jun 12, 2008 6:29 pm    Post subject: Regarding ISREDIT MACRO
Reply with quote

Hi All,

By using ISREDIT MACRO i have replaced with one string to another. Is there any possibilty to know how many replacements are done .

For example -> c all 'str1' 'str2'

I want to know how many replacements are done.
Back to top
View user's profile Send private message

dbzTHEdinosauer

Global Moderator


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

PostPosted: Thu Jun 12, 2008 7:11 pm    Post subject:
Reply with quote

CHANGE_COUNTS—Query Change Counts

The CHANGE_COUNTS assignment statement retrieves values set by the most recently processed CHANGE command and places these values in variables.

Syntax Assignment statement syntax

ISREDIT (var1,var2) = CHANGE_COUNTS

var1 The name of a variable to contain the number of strings changed. It must be an 8-character value that is left-padded with zeros.

var2 The name of a variable to contain the number of strings that could not be changed. It also must be an 8-character value that is left-padded with zeros.

Return codes
0 Normal completion
20 Severe error

Examples:

To put the number of changes resulting from the most recent CHANGE command into the variable &CHGED:
ISREDIT (CHGED) = CHANGE_COUNTS

To put the number of change errors into variable &ERRS:
ISREDIT (,ERRS) = CHANGE_COUNTS

To put the number of changes and change errors into variables &CHG and &ERR:
ISREDIT (CHG,ERR) = CHANGE_COUNTS


SC34-4820-05 Edit and Edit Macros z/OS Version 1 Release 8.0
Back to top
View user's profile Send private message
rajesh_m

New User


Joined: 15 Apr 2008
Posts: 39
Location: India

PostPosted: Thu Jun 12, 2008 7:48 pm    Post subject:
Reply with quote

Hi dbzTHEdinosauer,
I am getting
"System abend code 0C4, reason code 00000004.
Abend in external function ISREDIT.
5 +++ ISREDIT(CHGED) = CHANGE_COUNTS "
When i tried to execute.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


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

PostPosted: Thu Jun 12, 2008 8:40 pm    Post subject:
Reply with quote

are you using trace? Is the resolution of the command correct?

Quote:

5 +++ ISREDIT(CHGED) = CHANGE_COUNTS"


from what you have provided, the syntax is incorrect. only one ".
Back to top
View user's profile Send private message
rajesh_m

New User


Joined: 15 Apr 2008
Posts: 39
Location: India

PostPosted: Thu Jun 12, 2008 8:52 pm    Post subject:
Reply with quote

Can you give me small example how to use
"ISREDIT(CHGED) = CHANGE_COUNTS"
Back to top
View user's profile Send private message
Pedro

Senior Member


Joined: 01 Sep 2006
Posts: 2060
Location: Silicon Valley

PostPosted: Thu Jun 12, 2008 9:12 pm    Post subject: Reply to: Regarding ISREDIT MACRO
Reply with quote

Code:
Abend in external function ISREDIT.
5 +++ ISREDIT(CHGED) = CHANGE_COUNTS "


You did not copy the example correctly. It should look something like this:
Code:
Address ISREDIT  "(CHGED) = CHANGE_COUNTS "

whereas, you have ISREDIT abutted with (chged) making it look like a function call. And I recommend using quotes around the macro statement so rexx does not try to resolve it.
Back to top
View user's profile Send private message
rajesh_m

New User


Joined: 15 Apr 2008
Posts: 39
Location: India

PostPosted: Fri Jun 13, 2008 8:30 am    Post subject:
Reply with quote

Thank you dbzTHEdinosauer and Pedro its worked.

Thank you very much for your response..........
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 -> TSO/ISPF All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts RC 20 for Address ISPEXEC "ISRED... pkmurali CLIST & REXX 3 Sun Apr 16, 2017 11:30 pm
No new posts Receive a file using PCOMM macro Harald.v.K IBM Tools 0 Thu Mar 23, 2017 6:50 pm
No new posts PCOMM macro to call another PCOMM macro boyti ko All Other Mainframe Topics 4 Tue Jul 12, 2016 4:30 pm
No new posts Send parameter for macro STIMERM from... Daniel Teolotitla PL/I & Assembler 13 Tue Jul 05, 2016 9:23 pm
No new posts RACF Easytrieve Plus macro Susan Jackson CA Products 0 Fri Jun 03, 2016 8:25 pm


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