|
View previous topic :: View next topic
|
| Author |
Message |
thesumitk
Active User
Joined: 24 May 2013
Posts: 156
Location: INDIA
|
|
|
|
Hi All,
I am a very frequent user of DSLIST Command in mainframe and Now due to my process change I got the Other mainframe which is diff from the one I was using earlier , Here I am not able to use DSLIST Command , Earlier it shows me the list of the dataset whihc I have passed to this , For example from any panel if I pass the command DSLIST XXXX.YYYY.ZZZZ then it will show me all the datasets starting with these 3 qualifiers but in this mainframe When Use DSLIST XXXX.YYYY it takes me to the 3.4 PANEL thats it. I explore many settings and utilities within the ISPF menu but not able to fix this.
Can some one please help if it is known issue.
Please let me know for any questions. Many Thanks in Advance.
Sumit |
|
| Back to top |
|
 |
steve-myers
Active Member
Joined: 30 Nov 2013
Posts: 917
Location: The Universe
|
|
|
|
I recall having something like what you describe. In the basic 3.4 panel, check the options in Data set list options. There are two sets: - Initial View and
- Enter "/" to select option.
I'm guessing, somehow some of the options in Enter "/" to select option have been de selected, if that makes any sense. Select all of them. You can fiddle with them later, and see what happens. |
|
| Back to top |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006
Posts: 2594
Location: Silicon Valley
|
|
|
|
It could be that your new site has a modified command table and fell behind when the real command table was upgraded.
show us the definition of the DSLIST command. Look in option 3.7 - Command table (?) and specify ISR or ISP and prefixes to see the command table definition. |
|
| Back to top |
|
|
thesumitk
Active User
Joined: 24 May 2013
Posts: 156
Location: INDIA
|
|
|
|
| Pedro wrote: |
It could be that your new site has a modified command table and fell behind when the real command table was upgraded.
show us the definition of the DSLIST command. Look in option 3.7 - Command table (?) and specify ISR or ISP and prefixes to see the command table definition. |
Thanks For your reply. I have gone to 3.9 Option for Command Tables and seems it is empty I don't see any command definition there , I tried to insert the DSLIST command but was not sure of the ACTION part to code.
I saw below in the Update ISRCMDS panel.
Verb T Action
Please suggest. Thanks
Sumit |
|
| Back to top |
|
|
thesumitk
Active User
Joined: 24 May 2013
Posts: 156
Location: INDIA
|
|
|
|
| steve-myers wrote: |
I recall having something like what you describe. In the basic 3.4 panel, check the options in Data set list options. There are two sets: - Initial View and
- Enter "/" to select option.
I'm guessing, somehow some of the options in Enter "/" to select option have been de selected, if that makes any sense. Select all of them. You can fiddle with them later, and see what happens. |
Thanks For your reply, I already tried this but was no lock. |
|
| Back to top |
|
|
Willy Jensen
Active Member
Joined: 01 Sep 2015
Posts: 734
Location: Denmark
|
|
|
|
| DSLIST is found in xxxx.SISPTENU(ISPCMDS). I suggest that you run the TSP ISRDDN command and scan the ISPTLIB concatenation for ISPCMDS. There might be a problem with your allocations, or even an empty ISPCMDS before the system member. Check also ISPPROF DD. |
|
| Back to top |
|
|
thesumitk
Active User
Joined: 24 May 2013
Posts: 156
Location: INDIA
|
|
|
|
| Willy Jensen wrote: |
| DSLIST is found in xxxx.SISPTENU(ISPCMDS). I suggest that you run the TSP ISRDDN command and scan the ISPTLIB concatenation for ISPCMDS. There might be a problem with your allocations, or even an empty ISPCMDS before the system member. Check also ISPPROF DD. |
Thanks For your reply. I checked in the ISPCMDS member and found the code for DSLIST
| Code: |
| DSLIST..0..SELECT PGM(ISRDSLST) PARM(DSL &ZPARM) SUSPEND SCRNAME(DSLIST)..DATA SET LIST..... |
Can you please confirm if this is what I need to have , Also I checked in my previous mainframe and found the same code in the ISPCMDS member for DSLIST. Do i Need to insert it in 3.9 (Table entry)? |
|
| Back to top |
|
|
Willy Jensen
Active Member
Joined: 01 Sep 2015
Posts: 734
Location: Denmark
|
|
|
|
On the other hand, if ISPCMDS was bad then a lot of other commands wouldn't work. But at least see if you can find DSLIST in the ISPCMDS member.
By the way, the action is:
SELECT PGM(ISRDSLST) PARM(DSL &ZPARM) SUSPEND SCRNAME(DSLIST) |
|
| Back to top |
|
|
thesumitk
Active User
Joined: 24 May 2013
Posts: 156
Location: INDIA
|
|
|
|
| thesumitk wrote: |
| Willy Jensen wrote: |
| DSLIST is found in xxxx.SISPTENU(ISPCMDS). I suggest that you run the TSP ISRDDN command and scan the ISPTLIB concatenation for ISPCMDS. There might be a problem with your allocations, or even an empty ISPCMDS before the system member. Check also ISPPROF DD. |
Thanks For your reply. I checked in the ISPCMDS member and found the code for DSLIST
| Code: |
| DSLIST..0..SELECT PGM(ISRDSLST) PARM(DSL &ZPARM) SUSPEND SCRNAME(DSLIST)..DATA SET LIST..... |
Can you please confirm if this is what I need to have , Also I checked in my previous mainframe and found the same code in the ISPCMDS member for DSLIST. Do i Need to insert it in 3.9 (Table entry)? |
and in the ISPPROF it is like below
| Code: |
| ISPYFXDP...ZMSFS1 ..DSLIST.ZMSFLIST..'TSOID.SRCHML.LIST'. |
|
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10888
Location: italy
|
|
|
|
why not ask the support people of
| Quote: |
... the Other mainframe which is diff from the one I was using earlier ... |
|
|
| Back to top |
|
|
Willy Jensen
Active Member
Joined: 01 Sep 2015
Posts: 734
Location: Denmark
|
|
|
|
enrico-sorichetti's advise is good.
You may also run the following REXX in each system and try to spot any difference:
| Code: |
/* REXX
List all active ispf in-storage command tables.
by: Willy Jensen, web: http://harders-jensen.com/wjtech/
*/
parse value copies('0 ',30) with $edit $all lst.0 .
parse value '' with tables
address ispexec
"control errors return"
"vget zscrmaxw"
width=zscrmaxw
awidth=(width-19)%2
tliblist=ListTlibs()
"qtabopen list(qtol.)"
do qtoln=1 to qtol.0
tblname=strip(qtol.qtoln)
if right(tblname,4)<>'CMDS' then iterate
tables=tables tblname
Call AddList '-->' tblname LocDsn(tliblist,tblname)
Call AddList ''
'tbquery' tblname 'rownum(rows)'
if rc<>0 then do
Call AddList '*Table is probably libdef''d in another screen'
Call AddList ''
iterate
end
tblid = left(tblname,length(tblname)-4)
zerrlm=''
'tbtop' tblname
do rows
'tbskip' tblname
Call AddList left(zctverb,8) left(tblid,4),
left(zcttrunc,3) left(zctact,awidth) left(zctdesc,awidth)
end
Call AddList ''
end
call Xispmsg 'Tables listed:' space(tables)
address tso
Signal on syntax name AltDisplay
call StemEdit 'VIEW','lst.',,lst.0,cmd,,width+14
exit 0
AltDisplay: /* used if pgm STEMEDIT is not installed */
cc=bpxwdyn('alloc new delete rtddn(lstdd) unit(vio) dsorg(ps)',
'lrecl('width+14') recfm(v,b) blksize(0) tracks space(1,4)')
if cc<>0 then exit xmsg("alloc failed" cc)+12
"execio" lst.0 "diskw" lstdd "(stem lst. finis"
address ispexec "lminit dataid(did1) ddname("lstdd")"
address ispexec "view dataid("did1")"
exit Bpxwdyn("free dd("lstdd")")*0
AddList: Procedure expose lst.
parse value 1+lst.0 1+lst.0 arg(1) with n lst.0 lst.n
return 0
XMsg: if arg(1)<>'' then say arg(1);return word(arg(2) 0,1)
XISPMSG:
parse arg zedlmsg
address ispexec"setmsg msg(isrz000)"
return 0
LocDsn: Procedure
trace off
arg list ,mbr .
do n=1 to words(list)
dsn=word(list,n)
if sysdsn("'"dsn"("mbr")'")='OK' then return 'in' dsn
end
return 'library not located'
ListTlibs: Procedure /* locate mbrname in library */
trace off
parse value '' with qpl qbl qll ltype
address ispexec
"qbaselib ISPPROF id(qpl)"
"qbaselib ISPTLIB id(qbl)"
"qlibdef ISPTLIB id(qll) type(ltype)"
if ltype='LIBRARY' then "qbaselib" qll "id(qll)"
rtn=space(translate(qpl qll qbl," ","',"))
do n=words(rtn) to 1 by -1
w=word(rtn,n)
if left(w,3)='SYS' & substr(w,9,2)='.T' then rtn=delword(rtn,n,1)
end
return rtn |
|
|
| Back to top |
|
|
thesumitk
Active User
Joined: 24 May 2013
Posts: 156
Location: INDIA
|
|
|
|
Thanks Much Enrico-Sorichetti and Willy Jensen for all your inputs and help. Right now I am trying to get in touch with the Mainframe Support Team but not yet get the hold of them . I saw the Tables defined in 3.9 Option and change the application id from ISR to ISP and saw all the tables and there actions DSLIST is there with the action which Willy suggested. I will update you all once i got the hold of Mainframe Admin/Support team with their inputs.
Thanks Again.
Sumit |
|
| Back to top |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006
Posts: 2594
Location: Silicon Valley
|
|
|
|
How are you starting ISPF? It normally starts with ISP applid, so you get the command table that you want, but I have vague memories that you can start it differently and get ISR applid.
fyi. I do not have access to mainframe anymore, so I cannot verify. |
|
| Back to top |
|
|
Willy Jensen
Active Member
Joined: 01 Sep 2015
Posts: 734
Location: Denmark
|
|
|
|
| I just tried, command table ISPCMDS is used even when starting with applid ISR. FYI command PDF will start ISPF with applid ISR. |
|
| Back to top |
|
|
thesumitk
Active User
Joined: 24 May 2013
Posts: 156
Location: INDIA
|
|
|
|
Thanks Much to all for your help and Time , The reason was is that the Mainframe which I am using now is very old one and it has very old ISPFLOGON PROCS , With the help of Mainframe Support , I could use the DSLIST command in this old one as well but with TSO prefixed before it , so when I run TSO XXX.* then it was showing me all the Datasets but as a prompt message , Mainframe Support gave me a ISPF proc whihc I am using when I am login in to Mainframe and it actually overrides the old ISPFPROC with the one we are using . This solves my problem.
Thanks Much to all again .
Sumit |
|
| Back to top |
|
|
|
|
