Greg,
Thanks for the info.
Kurt
________________________________
From: Greg Shirey <wgshi...@benekeith.com>
To: IBM-MAIN@LISTSERV.UA.EDU
Sent: Monday, June 17, 2013 12:00 PM
Subject: Re: rmm variable
Kurt,
I don't recall hitting this same issue when migrating to 1.12, but we do have
some code that returns a value for the number of files on the tape, if that's
helpful:
sysauth.edgdate = "AMERICAN" /* RMM flag for edg vars*/
"RMM SD DSN('"BDSN"') OWNER(*) LIMIT(*) STATUS(PRIVATE)"
If RC <> 0 Then Do
Say "Data set" BDSN "not found in RMM database"
End
Else Do
Volser = edg@vol.1
Say "Data set" BDSN "on VOLSER" Volser
"RMM LV " edg@vol.1 "STATS"
FS = Edg@dsc /* Get last file seq nbr */
Say "Volume currently contains" FS "data sets"
End
Greg Shirey
Ben E. Keith Company
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf
Of Kurt Eastwood
Sent: Monday, June 17, 2013 10:14 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: rmm variable
Hello,
I am in the process of upgrading to zos 1.12 and running into an issue. We have
a rexx that uses EDG@FILE.0 to determine file placement on a tape for stacking
files on this tape. EDG@FILE.0 no longer provides the Physical File Sequence
Number so I cannot use this to determine how to stack my files on tape.
I was directed to try to use EDG@DSN.0 to get this information but this does
not provide the same information as EDG@FILE.0 used to.
Has anyone run into this issue and if so what are you now using to get the same
info that EDG@FILE.0 provided?
Thanks,
Kurt
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
