IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Edit MACRO- Insert a Label


IBM Mainframe Forums -> TSO/ISPF
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
sudheesh s

New User


Joined: 14 Nov 2013
Posts: 5
Location: India

PostPosted: Thu Nov 14, 2013 1:01 pm
Reply with quote

Hi All
May be its a simple query and i hope i have done this .But unfortunately I don't have the solution of how to do it as of now ..

My requirement is to to put a Label /meg before a line while a particular error is been found .

More precisely.. i wanted to insert a warning message as a label after running my macro .

like

Code:

 .JCPA  //*********************************************************************
 ==MSG> JCP0526E JCL ERROR: 10 UNRECOGNIZED JCL STATEMENT(S) -- (P)7           
 000007 ADDRESS ISPEXEC                                                         


in the above case "==MSG> JCP0526E JCL ERROR: 10 UNRECOGNIZED JCL STATEMENT(S) -- (P)7 " is the one the macro inserted .

Could any one please let me know the syntax of insering a Label -warning like above -
Back to top
View user's profile Send private message
Pandora-Box

Global Moderator


Joined: 07 Sep 2006
Posts: 1592
Location: Andromeda Galaxy

PostPosted: Thu Nov 14, 2013 1:15 pm
Reply with quote

You mean to say you wanted to modify the command and a quick question do you have access to change the Macro?
Back to top
View user's profile Send private message
sudheesh s

New User


Joined: 14 Nov 2013
Posts: 5
Location: India

PostPosted: Thu Nov 14, 2013 1:35 pm
Reply with quote

Hi Pandora

As expected i don't have access to change the existing macro .

Rather i am writing a new macro where i need to insert a Hilighted message through an REXX ISR EDIT MACRO .

The macro will be executed like JCLCHECK/JCK/PREP and where ever a MIGRATED dataset is found in the JCL it need to insert a Hilighted message above the line ..

Here what i don't know is how to insert a hilighted Labeled line as warning ..

Please let me know if i failed to convey the requirement
Back to top
View user's profile Send private message
Pandora-Box

Global Moderator


Joined: 07 Sep 2006
Posts: 1592
Location: Andromeda Galaxy

PostPosted: Thu Nov 14, 2013 2:06 pm
Reply with quote

Just curious to know

What are you trying to achieve by do so?
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 2455
Location: Hampshire, UK

PostPosted: Thu Nov 14, 2013 2:58 pm
Reply with quote

Google came up with this (from the first hit when querying on "inserting note lines by ispf edit macro")
Quote:

•Message lines, note lines, and information lines. These lines are not saved as part of the data set or member unless you use the MD (make dataline) line command to convert them to data lines.

==MSG> Message lines inform you of changes to the edit profile. These changes are caused by inconsistencies between the data to be edited and the edit profile settings. Message lines also warn you that the UNDO command is not available when edit recovery is off.
You can insert message lines manually by using an edit macro that contains the LINE_AFTER and LINE_BEFORE assignment statements.

=NOTE= Note lines display information when you insert edit models. However, these lines do not appear if the edit profile is set to NOTE OFF.
You can insert note lines manually by using an edit macro that contains the LINE_AFTER and LINE_BEFORE assignment statements.

====== Temporary information lines are lines you can add to provide temporary information that is not saved with the data. They can be inserted into an edit session by using an edit macro containing the LINE_AFTER and LINE_BEFORE assignment statements.
Back to top
View user's profile Send private message
sudheesh s

New User


Joined: 14 Nov 2013
Posts: 5
Location: India

PostPosted: Thu Nov 14, 2013 5:15 pm
Reply with quote

HI Pandora-Box

The intension is .. In some of the regions we have we don't have the " DFSMSHSM "Active

So any jobs submitted in these regions will indefinitely wait for the datasets to be recalled .

The solution will the User should recall the datasets through logging another region .

So before submitting any jobs I am planning to have an edit macro executed which will give a warning message above each migrated dataset like "Data set need to be recalled before submission "

This message i literally don't want to be saved in the PDS member . Once the user knows he got some HRECALL need to be done he will PF3 out from the current JCL and do the necessary actions ..

@ Nic Clouston

Thanks for your effort ..let me try googling again ..by the time if you get any idea od how to create notification lines please share ..

i belive LINE_AFTER will inset a permanent line there ..please correct if I am wrong
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 2455
Location: Hampshire, UK

PostPosted: Thu Nov 14, 2013 5:25 pm
Reply with quote

Quote:
i belive LINE_AFTER will inset a permanent line there ..please correct if I am wrong

Why do you not read what I posted? Read the last sentence. What does it say? And that relates to the other 2 methods as well.

And I have my own job to do so I am not going to go reading through manuals to get the exact method.
Back to top
View user's profile Send private message
Akatsukami

Global Moderator


Joined: 03 Oct 2009
Posts: 1788
Location: Bloomington, IL

PostPosted: Thu Nov 14, 2013 5:28 pm
Reply with quote

sudheesh s wrote:
i belive LINE_AFTER will inset a permanent line there ..please correct if I am wrong

The default is for LINE_AFTER (or LINE_BEFORE) to insert a permanent (i.e., data) line; however, you can specify a type of temporary line (info, message, or note) be added instead. All in the fine manual.
Back to top
View user's profile Send private message
sudheesh s

New User


Joined: 14 Nov 2013
Posts: 5
Location: India

PostPosted: Thu Nov 14, 2013 5:32 pm
Reply with quote

Thanks all

Let me try with the inputs ..and will update back soon ..again thanks a lot for all your time
Back to top
View user's profile Send private message
sudheesh s

New User


Joined: 14 Nov 2013
Posts: 5
Location: India

PostPosted: Fri Nov 15, 2013 1:26 pm
Reply with quote

Thanks every one

This was the one i was looking for

Code:
 NEWDAT  = "TEST LINE"                             
 ADDRESS ISREDIT "LINE_BEFORE 4 = MSGLINE (NEWDAT)"


Thanks again
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> TSO/ISPF

 


Similar Topics
Topic Forum Replies
No new posts Query on edit primary command CLIST & REXX 5
No new posts Query on edit primary command CLIST & REXX 1
No new posts PRINTOUT macro PL/I & Assembler 0
No new posts Insert header record with record coun... DFSORT/ICETOOL 14
No new posts Insert system time/date (timestamp) u... DFSORT/ICETOOL 5
Search our Forums:

Back to Top