Like this, I'd say.

...
         MVC   ISITM_W(ISITM_L),ISITM_C
         ISITMGD DCB=DCB1,MF=(E,ISITM_W)
         USING ISM,R1
         ST    R15,ISIT_RC             SAVE RETURN CODE
         ST    R0,ISIT_RSN             SAVE REASON CODE
         LTR   R15,R15                 ISTSMGD OK?
         BNZ   ...                     NO
         TM    ISMOFLG2,ISMPDSE        PDSE?
         BNO   ...                     NO
...
ISITM_C  ISITMGD MF=L   
ISITM_L  EQU   *-ISITM_C
...
*                         
ISITM_W  DS    XL(ISITM_L)
...                         
         IGWCISM ,
...

Regards

Karl

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf 
Of Savor, Thomas (Norcross)
Sent: Monday, October 05, 2015 9:04 PM
To: [email protected]
Subject: Re: How the determine dataset is PDSE

>Looks like the ISITMGD macro/system service can ascertain if a dataset is a 
>PDSE.
Humm....looks very interesting.
Hate to admit it, but I never heard of this macro...but I'm going to try it out 
and see.

Thanks,
Tom

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
[email protected] with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to