View previous topic :: View next topic
|
Author |
Message |
prino
Senior Member
Joined: 07 Feb 2009 Posts: 1306 Location: Vilnius, Lithuania
|
|
|
|
I'd like to add some code to an exec that copies a data set to an identical copy (with or without the original contents). When his is executed on the DSLIST (ISPF option 3.4), I'd like to add a bit of code to refresh the display, so that the copied data set is immediately visible, without me actually having to do a "REF" first.
Obviously, I could screen-scrape the panel, look for "DSLIST - Data Sets Matching" (or "ISRUDSL0 Data Sets Matching") combine that in a belts-and-braces approach with a search for "Command - Enter "/" to select action Message", but can anyone suggest a more sensible approach? |
|
Back to top |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006 Posts: 2547 Location: Silicon Valley
|
|
|
|
I have not tried it, but how about:
Code: |
ZCMD = 'REF'
"VPUT (ZCMD) SHARED"
"CONTROL NONDISPL ENTER"
|
|
|
Back to top |
|
|
jerryte
Active User
Joined: 29 Oct 2010 Posts: 202 Location: Toronto, ON, Canada
|
|
|
|
According to the manual "ISPF User Guide Volume II" (Chapter 5 Dataset List Utility option 3.4) you should be able to use the below code to do a referesh of the dataset display
Code: |
ZDLREF = 'Y'
ADDRESS ISPEXEC "VPUT (ZDLREF) SHARED" |
However I tried it and it doesn't work. Not sure why. Maybe I am misinterpreting the manual. |
|
Back to top |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006 Posts: 2547 Location: Silicon Valley
|
|
|
|
Quote: |
However I tried it and it doesn't work. Not sure why. |
The manual also mentions ZDLNDSN and ZDLMSG which do work.
For ZDLREF, I suspect that you can get the dataset information to be updated. For example, if you DISP(MOD) and write a bunch of records, the update through ZDLREF may show a higher %Used value. I did not try to confirm.
I could not get my earlier suggestion of ZCMD = "REF" to work. |
|
Back to top |
|
|
|