How to execute tso commands in rexx

Ashok09 · New User Joined: 29 Mar 2009 Posts: 20 Location: Chennai

Hi,

Can you tell me how to execute tso commands in rexx

I want to execute 'Change all' command via rexx

I tried the below code in rexx but not working.
address tso 'c all A B'

If you need more information let me know.

expat · Posted: Thu Apr 30, 2009 6:06 pm

Search the forum for ISPF edit macro, that is one of the most common ways of doing this.

superk · Posted: Thu Apr 30, 2009 6:29 pm

See my response to this topic.

dbzTHEdinosauer · Posted: Thu Apr 30, 2009 7:01 pm

Ashok09,

the change all command is an ISPF command.

on your command line type: tso help
that will list TSO commands.

refer to the op-sys that you run on to find ISPF manuals

this is a list of REXX manuals

Pedro · Posted: Thu Apr 30, 2009 9:04 pm

What you are describing is an ISPF editor macro. Study chapter 5 and chapter 6 of 'Edit and Edit macros' from the ISPF library. Some of the examples there are CLIST, but I recommend you concentrate on the rexx examples.

Douglas Wilder · Posted: Thu Apr 30, 2009 10:43 pm

"Change all" may be done either in TSO Edit or ISPF Edit. If you would like to do it in TSO edit follow the link that Superk gave above. If you would like to use an ISPF edit macro there are many examples on this forum.

dbzTHEdinosauer · Posted: Thu Apr 30, 2009 10:54 pm

Douglas,

Change ALL is an ISPF command.

If you would like to see 'TSO EDIT',
exit from ispf and at the ready prompt of tso enter EDIT.

Ashok09 · New User Joined: 29 Mar 2009 Posts: 20 Location: Chennai

All,

Any method it may like TSO Edit or ISPF Edit..i want to do 'CHANGE ALL' thru REXX....

I referred some of the manuals posted.I wil try superk posted example and let u know...

Thank u all for your kind reply

Ashok09 · New User Joined: 29 Mar 2009 Posts: 20 Location: Chennai

superk,

I executed the code which u posted

Douglas Wilder · Posted: Mon May 04, 2009 8:34 pm

Ashok09 · New User Joined: 29 Mar 2009 Posts: 20 Location: Chennai

The dataset which i gave is in catalog.
/* REXX */
Queue "TOP"
Queue "C A B /OLD/NEW/"
Queue "END SAVE"
"EDIT xxxx.xxxx.xxxx CNTL NONUM OLD"

It showing again the same messages.
DATA SET xxxx.xxxx.xxxx NOT IN CATALOG
COMMAND TOP NOT FOUND
COMMAND C NOT FOUND

expat · Posted: Tue May 05, 2009 11:30 am

Please cut and paste the rror messages complete with the error codes issued.

Ashok09 · New User Joined: 29 Mar 2009 Posts: 20 Location: Chennai

Here it is

********************************* TOP OF DATA **********************************
IKJ52307I DATA SET xxxx.xxxx.xxxx NOT IN CATALOG
IKJ56500I COMMAND TOP NOT FOUND
IKJ56500I COMMAND C NOT FOUND
READY
END
******************************** BOTTOM OF DATA ********************************

Garry Carroll · Posted: Tue May 05, 2009 1:45 pm

Are you really naming your dataset xxxx.xxxx.xxxx ?

Garry.

PeD · Posted: Tue May 05, 2009 1:54 pm

specify data set name between quotes.

Ashok09 · New User Joined: 29 Mar 2009 Posts: 20 Location: Chennai

No.

expat · Posted: Tue May 05, 2009 3:57 pm

And what do the IKJ*** messages tell you from the manual ?

superk · Posted: Tue May 05, 2009 5:03 pm

OK. I tested out the basic process and it works:

Douglas Wilder · Posted: Tue May 05, 2009 8:41 pm

Ashok09 · New User Joined: 29 Mar 2009 Posts: 20 Location: Chennai

superk,
I used the code posted with RECFM=FB, LRECL=80 for input file.

Im changing A to B. Its showing text not found.
********************************* TOP OF DATA **********************************
IKJ52506I TEXT NOT FOUND
READY
END
******************************** BOTTOM OF DATA ********************************

Input Data
A
A
C
D

Douglas Wilder · Posted: Wed May 06, 2009 7:38 pm

What did you change command look like? Was it like this?

Ashok09 · New User Joined: 29 Mar 2009 Posts: 20 Location: Chennai

I changed it like this.