IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum Index Mainframe: Search Log in to check your private messages Log in
 

Mainframe ISPREDIT Macro query


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

Active User


Joined: 28 Sep 2017
Posts: 106
Location: India

PostPosted: Wed May 27, 2020 1:12 pm
Reply with quote

Hi All,

I have coded my own CUT and PASTE Macros using Labels(Learning purpose).

Like cut the code between two Labels and Paste the code based on cursor position or based on Labels(After or before).

But My query is something like Pasting code after enter A in command line

See details:-

After executing my CUT Macro

Like pasting in my below JCL after user enters Character A as below
Code:

000001 //XXXXREST JOB 1,CLASS=P,MSGCLASS=0,NOTIFY=&SYSUID                   
000002 //********************************************************/         
000003 //*UPDATE JOBID,DUMPNAME,DATASETS TO BE RESTORED.        */         
00000A //********************************************************/         
000005 //RESTORE  EXEC PGM=ADRDSSU PARM=('TYPRUN=NORUN')                   
000006 //SYSMDUMP DD SYSOUT=*                                               
000007 //SYSPRINT DD SYSOUT=*                                               
000008 //INPUT    DD DISP=SHR,DSN=<DUMP-DATASET-NAME> /*UPDATE DUMP NAME*/ 
000009 //SYSIN    DD DUMMY                                                 


In the above code if I issue my paste Macro , It suppose to paste code after Line 4.

But how extract user mentioned character 'A' in Macro?

Any suggestions...

Thanks!
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


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

PostPosted: Wed May 27, 2020 1:45 pm
Reply with quote

I think you need to read this section of the manual - "Specifying a destination"
Back to top
View user's profile Send private message
Willy Jensen

Active User


Joined: 01 Sep 2015
Posts: 397
Location: Denmark

PostPosted: Wed May 27, 2020 3:38 pm
Reply with quote

Snippet from one of my macros:
Code:
 Address IsrEdit                       
 "PROCESS DEST"                       
 if rc<8 then "(lnr)= linenum .zdest" 
 else         "(lnr)= linenum .zcsr " 

I agree with Nic, please refer to the manual for details.
Back to top
View user's profile Send private message
upendrasri

Active User


Joined: 28 Sep 2017
Posts: 106
Location: India

PostPosted: Thu May 28, 2020 5:06 pm
Reply with quote

Hi Nic and WJ,

Thanks for your suggestions..

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

 

Search our Forum:

Similar Topics
Topic Forum Replies
No new posts Proc print in Mainframe All Other Mainframe Topics 4
No new posts Need opinion on mainframe to cloud mi... General Talk & Fun Stuff 4
No new posts Looking for Mainframe Project Manager Mainframe Jobs 0
No new posts Mainframe jcl job with href links not... All Other Mainframe Topics 3
No new posts A very ingenious mainframe automation... CA Products 1

Back to Top