View previous topic :: View next topic
|
Author |
Message |
magesh23586
Active User
Joined: 06 Jul 2009 Posts: 213 Location: Chennai
|
|
|
|
I have a macro
Code: |
/* EDIT MACRO */
"ISREDIT MACRO"
"ISREDIT (DataSet) = DATASET"
"ISREDIT (Member) = MEMBER"
DataSet="'"||DataSet||"'"
IF Member = '' THEN
"ISREDIT replace .zf .zl "DataSet
ELSE
"ISREDIT replace .zf .zl "Member
|
How do i make it work in TSO environment, i.e in the command line if i type 'vsave' this macro should be executed.
Regards,
Magesh |
|
Back to top |
|
|
Nic Clouston
Global Moderator
Joined: 10 May 2007 Posts: 2455 Location: Hampshire, UK
|
|
|
|
Do exactly as you describe. And why bother with such a macro? Using the SAVE command is quicker and more efficient. |
|
Back to top |
|
|
magesh23586
Active User
Joined: 06 Jul 2009 Posts: 213 Location: Chennai
|
|
|
|
Incase if i open a file in view mode, i need to type repl .zf .zl filename to save it, I belive this code help me in doing this, i.e If i type VSAVE in command line,it should save it in view mode. But when i try using this VSAVE, it is not working i.e if i open a file in view mode, in the command line if i type VSAVE , it says invalid command. How do i make this VSAVE command valid. in other way VSAVE should save the file in view mode.
Regards,
Magesh |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
Quote: |
it says invalid command. |
your edit macro is not in a designated sysexec library.
also, could use the /*REXX*/ as first line. the comment that you have is really not necessary.
invoke isrddn to determine the library.
or listalc |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
and ispf edit macros run in ispf, not tso.
ispf runs in tso.
get you facts straight, and learn about and understand your environment. |
|
Back to top |
|
|
magesh23586
Active User
Joined: 06 Jul 2009 Posts: 213 Location: Chennai
|
|
|
|
Thanks for kind respond,How do i get SYSEXEC library, where can i find it.
Could to please give me with syntax or an example |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
yes, yes, yes, in VIEW mode you need to use the REPLACE command.
stop trying to sound so technically correct when you have no idea what is really going on.
serves you right for copying something you found
and thinking it is slick to use this,
without knowing enough about your environment to properly implement it.
and in reponse to your last question,
i gave you the answer. listalc or the isrddrn or however it is spelled.
this is your first edit macro, isn't it? |
|
Back to top |
|
|
Nic Clouston
Global Moderator
Joined: 10 May 2007 Posts: 2455 Location: Hampshire, UK
|
|
|
|
You can have the macro in your own PDS library as long as it is concatenated to SYSEXEC. |
|
Back to top |
|
|
magesh23586
Active User
Joined: 06 Jul 2009 Posts: 213 Location: Chennai
|
|
|
|
Thanks to all the kind support, below program I executed in order make my macro work from the command line.
Code: |
/* REXX */
ADDRESS TSO "ALLOCATE FI(SYSUPROC) DA('xxxx.xxxx.REXX5') SHR"
ADDRESS TSO "ALTLIB ACTIVATE USER(CLIST)"
|
Regards,
Magesh |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Good to hear this is working - thank you for posting your soluton
d |
|
Back to top |
|
|
|