Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
how to save profile changes?

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> All Other Mainframe Topics
View previous topic :: :: View next topic  
Author Message
s.ayodhyawasi

New User


Joined: 16 Sep 2006
Posts: 13

PostPosted: Tue Aug 18, 2009 11:38 am    Post subject: how to save profile changes?
Reply with quote

I am using "CUT" option with some name inside ps file

like -> cut jobcard

this will assign jobcard name to those lines on which the cut option was used. and now when i use "paste jobcard", those lines will be pasted. but when i logoff from my id, this jobcard name get removed from profile and on next lonin i need to assign the block of lines again to jobcard using "cut jobcard" option, before using it for paste.

Is there a way to save it before logoff?
Back to top
View user's profile Send private message

expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8620
Location: Back in jolly old England

PostPosted: Tue Aug 18, 2009 11:47 am    Post subject:
Reply with quote

My first guess is that the contents are saved in a temporary file which gets deleted at logoff time.

Look at the cut macro, and see if it is possible to create your own version - DO NOT change the installed version - to save the cut data.
Back to top
View user's profile Send private message
Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1252
Location: Israel

PostPosted: Tue Aug 18, 2009 6:51 pm    Post subject:
Reply with quote

Create a member with your job card(s) then use:

COPY jobcard
or
COPY hlq.template(jobcard)

instead of using the clipboard
Back to top
View user's profile Send private message
Terry Heinze

JCL Moderator


Joined: 14 Jul 2008
Posts: 1249
Location: Richfield, MN, USA

PostPosted: Tue Aug 18, 2009 7:35 pm    Post subject:
Reply with quote

Or write an edit macro to insert a JOB statement in the file you are editing. That way you don't have to have it stored anywhere except in one of your SYSPROC data sets.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8620
Location: Back in jolly old England

PostPosted: Tue Aug 18, 2009 7:42 pm    Post subject:
Reply with quote

As suggested by Terry, and posted earlier by me .........
Terry, it doesn't have to be in any ISPF defined libraries.

If you do need a macro to insert things into a dataset when not using file tailoring, I find it is far easier to keep the inserts in a seperate library and insert the whole member in one hit. It keeps it a whole lot cleaner than generating the JCL in the REXX code, and means that not only can the same member be used anywhere else that I want, but if it needs to be changed it only needs to be changed once.

This is the macro that I use to insert a jobcard at the top of a JCL stream.
Code:

"ISREDIT MACRO"
"ISREDIT COPY 'My library(JOBCARD)' AFTER "0
"ISREDIT END"
Back to top
View user's profile Send private message
Terry Heinze

JCL Moderator


Joined: 14 Jul 2008
Posts: 1249
Location: Richfield, MN, USA

PostPosted: Tue Aug 18, 2009 7:54 pm    Post subject:
Reply with quote

Never thought of doing it that way, expat. I've been using this really old version for a long time:
Code:
----+----1----+----2----+----3----+----4----+----5----+----6----+----7----+----8
/*                                                                   */
/*  MEMBER       -  USER.CLIST(JC)                                   */
/*  DESCRIPTION  -  INSERT A JOB STATEMENT AT THE BEGINNING OF THE   */
/*                  MEMBER BEING EDITED.                             */
/*  AUTHOR       -  MAINFRAME JOURNAL                                */
/*  CREATED      -  12/07/1989                                       */
/*  MODIFIED     -  10/20/2008 BY THEINZE                            */
/*                                                                   */
ISREDIT MACRO                                                         
SET USER = &&SYSUID                                                   
ISREDIT LINE_AFTER 00 = "+                                             
//&SYSUID.X JOB (XXXXXXXX-XXXX-XXXXX),'YOUR NAME HERE--XXXX'," /* INSERT
ISREDIT LINE_AFTER 01 = "+                                             
//             CLASS=4,                                      " /* JOB
ISREDIT LINE_AFTER 02 = "+                                           
//             COND=(0,NE),                                  " /* STMT
ISREDIT LINE_AFTER 03 = "+                                           
//             MSGCLASS=X,                                   " /* AND
ISREDIT LINE_AFTER 04 = "+                                           
//             MSGLEVEL=(1,1),                               " /* PARMS
ISREDIT LINE_AFTER 05 = "+                                             
//             NOTIFY=&&USER,                                " /*
ISREDIT LINE_AFTER 06 = "+                                       
//             REGION=0M                                     " /*
ISREDIT LINE_AFTER 07 = "+                                       
//*                                                          "
SET &ZEDSMSG = JOB STMT INSERTED                    /* FILL    SHORT MSG
SET &ZEDLMSG = A JOB STATEMENT HAS BEEN INSERTED AT THE BEGINNING +
               OF THIS MEMBER                       /* FILL    LONG  MSG
ISPEXEC SETMSG MSG(ISRZ000)                         /* DISPLAY SHORT MSG
Of course I have to modify it slightly at each site I'm at.
Back to top
View user's profile Send private message
s.ayodhyawasi

New User


Joined: 16 Sep 2006
Posts: 13

PostPosted: Wed Aug 19, 2009 2:35 pm    Post subject:
Reply with quote

Thanks guys
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 -> All Other Mainframe Topics All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Profile changed to NUMBER ON STD (fro... Martylin TSO/ISPF 1 Thu Aug 03, 2017 9:14 am
This topic is locked: you cannot edit posts or make replies. How to save expanded jcl's into one l... enrico-sorichetti CLIST & REXX 13 Thu Jul 27, 2017 2:45 pm
No new posts RACF profile access vasanthz All Other Mainframe Topics 11 Fri Sep 23, 2016 5:51 am
No new posts save SAY var loop. italo_pm CLIST & REXX 3 Sun Sep 04, 2016 3:06 am
No new posts EDIT END(SAVE) or CANCEL? Steve Coalbran TSO/ISPF 9 Sat Feb 06, 2016 7:11 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us