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
 
Getting Command line data from ISPEXEC EDIT DATASET

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

New User


Joined: 05 May 2010
Posts: 19
Location: USA

PostPosted: Tue May 28, 2013 6:01 am    Post subject: Getting Command line data from ISPEXEC EDIT DATASET
Reply with quote

Hello,

I am invoking a dataset edit from REXX as
ADDRESS ISPEXEC
"EDIT DATASET("D1")"

Once edited, I am typying ;;;; in the command line and then hitting F3. I am trying to capture the ";;;;" in the REXX program once the edit session is complete. But I am not able to get it. I even tried using PROCESS MACRO to capture the command line.
I am wondering how the same thing happens in SPUFI. Can someone help me here?

Basically what I am trying to do is to execute few more code if the user had used ;;;; before doing the F3.
If it was just F3, then do nothing.
Back to top
View user's profile Send private message

expat

Global Moderator


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

PostPosted: Tue May 28, 2013 12:53 pm    Post subject:
Reply with quote

What exactlty is ;;;;; supposed to do ???
Back to top
View user's profile Send private message
Stefan

Active User


Joined: 12 Jan 2006
Posts: 110
Location: Germany

PostPosted: Tue May 28, 2013 1:59 pm    Post subject:
Reply with quote

You should not use a semicolon (;) in this case as this character is the default command delimiter. ISPF reads your input in the command line and separates all commands by splitting the input at the position of the command delimiter. Then these commands are invoked in sequence and the command delimiter is simply dropped. If you really want to perform some special action in the REXX program which invokes the editor based on some command input of the user, here are 2 possible approaches:
1. You might use a customized version of panel ISREDDE2 to provide an additional input field for the user to specify some additional action.
2. You might create an additional edit macro which VPUTs an indicator variable so that the main routine gets aware of the user's request.
Back to top
View user's profile Send private message
Pedro

Senior Member


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

PostPosted: Tue May 28, 2013 9:13 pm    Post subject: Reply to: Getting Command line data from ISPEXEC EDIT DATASE
Reply with quote

Quote:
I am trying to capture the ";;;;" in the REXX program once the edit session is complete.

Do you realize that the editor processes anything in the command line? If it recognizes the command, it will get processed. If it is not recognized, it will try to run a macro, but you will likely get a 'command A not found' message.

Quote:
You might use a customized version of panel ISREDDE2

A variation on Stefan's suggestion: you can add logic to the )PROC section of the panel. Examine &ZCMD and when you find your text, you can save it to the SHARED pool.
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 Where to get sample for processing RM... vice_versa PL/I & Assembler 2 Tue Jan 16, 2018 2:03 pm
No new posts Data security erase on RAID device steve-myers All Other Mainframe Topics 0 Sat Jan 13, 2018 6:41 am
No new posts VSAM dataset not found abdulrafi JCL & VSAM 5 Fri Jan 12, 2018 11:19 am
No new posts Append the milliseconds to the data s... girishb2 DFSORT/ICETOOL 1 Thu Dec 21, 2017 9:07 pm
No new posts Moving a COMP-3 Variable to a Numeric... ajayachander COBOL Programming 2 Thu Dec 14, 2017 5:46 pm

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