|
View previous topic :: View next topic
|
| Author |
Message |
upendrasri
Active User
Joined: 28 Sep 2017
Posts: 124
Location: India
|
|
|
|
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 |
|
 |
Nic Clouston
Global Moderator
Joined: 10 May 2007
Posts: 2454
Location: Hampshire, UK
|
|
|
|
| I think you need to read this section of the manual - "Specifying a destination" |
|
| Back to top |
|
|
Willy Jensen
Active Member
Joined: 01 Sep 2015
Posts: 734
Location: Denmark
|
|
|
|
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 |
|
|
upendrasri
Active User
Joined: 28 Sep 2017
Posts: 124
Location: India
|
|
|
|
Hi Nic and WJ,
Thanks for your suggestions..
Regards.. |
|
| Back to top |
|
|
|
|
