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
 

 

How to Save profile after setting PF keys through Rexx!!!

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

New User


Joined: 03 Jul 2008
Posts: 5
Location: Chennai

PostPosted: Thu Mar 12, 2009 3:45 pm    Post subject: How to Save profile after setting PF keys through Rexx!!!
Reply with quote

Hi,

What exactly is the way to save ISPF profile after setting few ISPF parameters like PF keys. For example following is the script i have which resets the PF1 Key with "ZOOM" command but i want this to be saved to ISPF profile permanently so that i can see the change after executing the rexx script and typing KEYS command.

/*REXX*/
/***************************************************/
/* THIS MACRO IS USED TO SET PF KEYS. */
/***************************************************/
ADDRESS ISPEXEC
"TBOPEN" PROFILE
"VGET (ZPF01) PROFILE"
ZPF01 = "ZOOM"
"VPUT (ZPF18) PROFILE"
/*"SAVE PROFILE "LIBRARY(ISPPROF)"*/
/*"TBSAVE" PROFILE "LIBRARY(ISPPROF)" */
Back to top
View user's profile Send private message

ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2360
Location: Israel

PostPosted: Thu Mar 12, 2009 4:04 pm    Post subject:
Reply with quote

I never tried to mess with ISPPROF directly, but in your example, why did you comment out TBSAVE?

O.
Back to top
View user's profile Send private message
ElamaranS

New User


Joined: 03 Jul 2008
Posts: 5
Location: Chennai

PostPosted: Thu Mar 12, 2009 4:09 pm    Post subject:
Reply with quote

That syntax "TBSAVE" was not working and giving me ISPF error. Thats why i was asking for a syntax or if somebody can correct the syntax for saving the profile, even that should be fine with me.

Regards,
Elamaran S
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2360
Location: Israel

PostPosted: Thu Mar 12, 2009 4:13 pm    Post subject:
Reply with quote

As far as I see it, you can't save your ISPPROF, as it is open the moment you log on to ISPF.

Why can't you change the keys using normal command?

O.
Back to top
View user's profile Send private message
ElamaranS

New User


Joined: 03 Jul 2008
Posts: 5
Location: Chennai

PostPosted: Thu Mar 12, 2009 4:17 pm    Post subject:
Reply with quote

You mean to change the PF key directly without using REXX script.
If yes is your answer, my requirement is to change the PF KEY set up using Rexx script for all the 24 PF keys available with different commands i have.
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2360
Location: Israel

PostPosted: Thu Mar 12, 2009 4:19 pm    Post subject:
Reply with quote

Still, why can't you do that with the KEYS command???

O.
Back to top
View user's profile Send private message
ElamaranS

New User


Joined: 03 Jul 2008
Posts: 5
Location: Chennai

PostPosted: Thu Mar 12, 2009 4:23 pm    Post subject:
Reply with quote

Absolutely it can be done no doubt for me about that.
But i justed wanted know if it is possible to save the profile using rexx script.

Thanks for your Help!!!

Regards,
Elamaran s
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2360
Location: Israel

PostPosted: Thu Mar 12, 2009 4:25 pm    Post subject:
Reply with quote

What is ISPF return code for your TBSAVE? What is in ZERRSM & ZERRLM after you issue TBSAVE?

O.
Back to top
View user's profile Send private message
ElamaranS

New User


Joined: 03 Jul 2008
Posts: 5
Location: Chennai

PostPosted: Thu Mar 12, 2009 4:31 pm    Post subject:
Reply with quote

Below is the received error message:

******************************************************************************
* ISPT034 *
* *
* Table is not open *
* TBSAVE issued for table PROFILE that is not open. *
* *
* *
* *
* *
* *
* *
* Current dialog statement: *
* TBSAVE PROFILE LIBRARY(ISPPROF) *
* *
* Enter HELP command for further information regarding this error. *
* Press ENTER key to terminate the dialog. *
* *
* *
* *
* *
******************************************************************************
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2360
Location: Israel

PostPosted: Thu Mar 12, 2009 4:40 pm    Post subject:
Reply with quote

I believe this message is pretty clear....

O.
Back to top
View user's profile Send private message
Pedro

Senior Member


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

PostPosted: Thu Mar 12, 2009 9:24 pm    Post subject: Reply to: How to Save profile after setting PF keys through
Reply with quote

'PROFILE' is an uninitialized variable.

Why VGET at all?

Why set a value for ZPF01 but VPUT ZPF18 instead?

You can make a copy of your profile, work with the new copy, then rename them to replace the old with the new.

Quote:
Thats why i was asking for a syntax

Your original post did not ask for the syntax... and if that is what you want, then you should please start by looking at the manual.
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 REXX cdoe to purge a JOB from spool a... Sulabh Agrawal CLIST & REXX 11 Thu Mar 09, 2017 11:36 am
No new posts Overriding PS data in rexx Shaheen Shaik CLIST & REXX 8 Fri Mar 03, 2017 5:08 pm
No new posts setting new limit Key values for inde... srilata83 DB2 1 Fri Feb 10, 2017 9:24 pm
No new posts REXX compiled via RXTCOMP sergeyken CLIST & REXX 7 Tue Feb 07, 2017 9:41 pm
This topic is locked: you cannot edit posts or make replies. Calling REXX code from ISPF panel sanchita dey TSO/ISPF 4 Mon Jan 02, 2017 5:13 pm


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