IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

REXX LISTDSI () SMSINFO is not working


IBM Mainframe Forums -> CLIST & REXX
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
upendrasri

Active User


Joined: 28 Sep 2017
Posts: 106
Location: India

PostPosted: Fri Nov 17, 2017 11:33 am
Reply with quote

Hi,

/* rexx */
DSINFO = LISTDSI(T99UXS.TEST) SMSINFO
SAY 'DATASET STORAGE CLASS :' SYSSTORCLASS

Above Rexx output
DATASET STORAGE CLASS :
***
But When I execute the belwo LISTCAT Job
//T99UXS1 JOB CLASS=P,MSGCLASS=H,NOTIFY=T99UXS
//* NOTIFY=&SYSUID
//STEP01 EXEC PGM=IDCAMS
//SYSPRINT DD DSN=T99UXS.TEST.SYSPRINT,DISP=SHR
//SYSIN DD *
LISTCAT ENTRIES(T99UXS.TEST) HISTORY
/*

Above Job output

1IDCAMS SYSTEM SERVICES TIME:
000002 0
000003 LISTCAT ENTRIES(PGSY.B.LLA.UPDATE) HISTORY
000004 0NONVSAM ------- PGSY.B.LLA.UPDATE
000005 IN-CAT --- USER.S1PG001.CATALOG
000006 HISTORY
000007 DATASET-OWNER-----(NULL) CREATION--------2016.323
000008 RELEASE----------------2 EXPIRATION------0000.000
000009 ACCOUNT-INFO-----------------------------------(NULL)
000010 SMSDATA
000011 STORAGECLASS ---STANDARD MANAGEMENTCLASS----NOMIG
000012 DATACLASS ------PDSNCOMP LBACKUP ---0000.000.0000


STORAGECLASS is STANDARD.

Any suggestions why SMSINFO in Rexx is not working?
Back to top
View user's profile Send private message
enrico-sorichetti

Senior Moderator


Joined: 14 Mar 2007
Posts: 10714
Location: italy

PostPosted: Fri Nov 17, 2017 11:52 am
Reply with quote

if You had cared to research the manual (*)
www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.ikja300/ldsi.htm

You would have found the answer Yourself.
Blaming Rexx for Your mistakes will not help to solve Your issues

(*) a plain simple google search for "REXX LISTDSI SMSINFO" would have taken You to the link I posted

NOTICE ...
before posting You should check that
the syntax is correct
the input and the results are coherent

why post the jcl for
T99UXS.TEST
and the results for
PGSY.B.LLA.UPDATE
??? icon_evil.gif
Back to top
View user's profile Send private message
upendrasri

Active User


Joined: 28 Sep 2017
Posts: 106
Location: India

PostPosted: Fri Nov 17, 2017 12:01 pm
Reply with quote

Hi Enrico,

My apologies for wrong copy paste

why post the jcl for
T99UXS.TEST
and the results for
PGSY.B.LLA.UPDATE

But for both cases am not getting SMS Information. My rexx is not showing any syntax errors. I have gone through the manual which you have posted and successfully getting all other dataset details like below

SAY ' DATASET NAME :' SYSDSNAME
SAY ' DATASET VOLUME :' SYSVOLUME
SAY ' DATASET UNIT :' SYSUNIT
SAY 'DATASET CREATION DATE :' SYSCREATE
SAY 'DATASET REFERECE DATE :' SYSREFDATE

But am not getting SMS Information.
Back to top
View user's profile Send private message
enrico-sorichetti

Senior Moderator


Joined: 14 Mar 2007
Posts: 10714
Location: italy

PostPosted: Fri Nov 17, 2017 12:34 pm
Reply with quote

You used
DSINFO = LISTDSI(T99UXS.TEST) SMSINFO

I would have written
DSINFO= LISTDSI("'T99UXS.TEST'" "SMSINFO" )

put the dataset between ' not to get burned by the tso prefix/noprefix stuff
and consider SMSINFO as a function argument

You should have got an error running the script as posted
Back to top
View user's profile Send private message
upendrasri

Active User


Joined: 28 Sep 2017
Posts: 106
Location: India

PostPosted: Fri Nov 17, 2017 12:43 pm
Reply with quote

Hi Enrico,

The below code working fine.

DSINFO= LISTDSI("'T99UXS.TEST'" "SMSINFO" )

Thanks alot for your help.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CLIST & REXX

 


Similar Topics
Topic Forum Replies
No new posts Any examples of calling FTP from REXX? CLIST & REXX 1
No new posts SummeRx: a new framework for REXX z/OS CLIST & REXX 6
No new posts A command to change LRECL of an exist... JCL & VSAM 7
No new posts Using REXX to access SDSF; What am I ... CLIST & REXX 38
No new posts Calling Assembler from REXX PL/I & Assembler 5
Search our Forums:

Back to Top