Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

LISTDSI is not working for me.

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
View previous topic :: :: View next topic  
Author Message
vasan_4u

New User


Joined: 28 Jun 2005
Posts: 35
Location: chennai

PostPosted: Mon Dec 17, 2007 9:45 pm    Post subject: LISTDSI is not working for me.
Reply with quote

This is the code I have and its giving me RC as 16 could anyone help me out.

Code:
FILE = 'LSV.F.COLLQ'       
ADDRESS TSO                 
RC = LISTDSI("'"FILE"'")   
SAY RC                     
IF RC=0 THEN               
SAY 'ENTER'                 
DO                         
  DSN = SUBSTR(SYSDSORG,1,2)
  SAY DSN                   
END                       
Back to top
View user's profile Send private message

superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4649
Location: Raleigh, NC, USA

PostPosted: Mon Dec 17, 2007 9:54 pm    Post subject: Re: LISTDSI is not working for me.
Reply with quote

vasan_4u wrote:
... its giving me RC as 16 ...


My guess is that the file doesn't exist. What does the SYSREASON variable show?
Back to top
View user's profile Send private message
vasan_4u

New User


Joined: 28 Jun 2005
Posts: 35
Location: chennai

PostPosted: Mon Dec 17, 2007 10:03 pm    Post subject:
Reply with quote

Yes as you said the file was not correct it should be 'LSV.F.COLLQ.CLUSTER'

One more question how do I get to know that if a given Dataset is a VSAM or GDG or PS.

I tried with LISTDS and LISTC command both of them dint work for me could you provide me with a sample code.
Back to top
View user's profile Send private message
superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4649
Location: Raleigh, NC, USA

PostPosted: Mon Dec 17, 2007 10:10 pm    Post subject: Reply to: LISTDSI is not working for me.
Reply with quote

You're on the right track. The SYSDSORG variable will have the value for the dataset organization:

PS - Physical sequential
PO - Partitioned organization
VS - VSAM

The TSO command LISTDS should've worked also.
Back to top
View user's profile Send private message
kiran_chr
Currently Banned

New User


Joined: 02 Aug 2006
Posts: 2

PostPosted: Tue Dec 18, 2007 3:20 am    Post subject: Reply to: LISTDSI is not working for me.
Reply with quote

Give like this it will work
PULL NAME
NAME1=LISTDSI(NAME) ---> dont put any quotes
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2360
Location: Israel

PostPosted: Tue Dec 18, 2007 12:16 pm    Post subject:
Reply with quote

kiran_chr -

Why "dont put any quotes"??? icon_question.gif

O.
Back to top
View user's profile Send private message
vasan_4u

New User


Joined: 28 Jun 2005
Posts: 35
Location: chennai

PostPosted: Wed Dec 19, 2007 9:51 pm    Post subject:
Reply with quote

thanks for the help ..

this is how i used it and it worked for me

Code:
X = OUTTRAP("MSG.");                     
"LISTDS '"PDSN"' MEMBERS"               
X = OUTTRAP("OFF.");                     
PARSE VAR MSG.3 RECFM LRECL BLKSIZE DSORG
SAY RC                                   
SAY LRECL                               
SAY DSORG
Back to top
View user's profile Send private message
Ganesh.Deokar

New User


Joined: 30 Sep 2005
Posts: 26
Location: Buffalo,NY

PostPosted: Fri Dec 21, 2007 1:21 am    Post subject:
Reply with quote

Try these links:

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IKJ2A304/4.4.2?DT=19951106081441#FIGLSTCDES


http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IKJ2A304/4.4.2.2?SHELF=&DT=19951106081441&CASE=


Regards,
Ganesh
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 -> CLIST & REXX All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Restart=Step not working ALAK SAHA JCL & VSAM 6 Fri Jun 30, 2017 6:28 pm
No new posts SQL query not working in Cobol program. CuriousMainframer COBOL Programming 14 Wed Feb 22, 2017 5:56 pm
No new posts SCRNAME not working on my mainframe? mrsidhu12 TSO/ISPF 7 Thu Sep 01, 2016 2:17 pm
No new posts 2 same CLIST pgm but with different n... boyti ko CLIST & REXX 5 Fri Jun 03, 2016 4:55 pm
No new posts REXX Screen not working due to LINKED... sundarkudos CLIST & REXX 1 Mon May 09, 2016 1:44 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us