Here is an example of using LMMLIST - of course you'll have to configure you
batch TMP to have the correct ISPF DD's:
/* REXX */
arg dsn
/* --------------------------- *
| Using ISPF Library Services |
* --------------------------- */
Address ISPEXEC
"LMINIT DATAID(STATUS) DATASET("dsn")"
"LMOPEN DATAID("STATUS") OPTION(INPUT)"
count = 0
member = ''
do forever
"LMMLIST Dataid("status") OPTION(LIST) MEMBER(MEMBER)" ,
"STATS(YES)"
if rc = 4 then do
say 'no members found matching pattern'
exit
end
if rc > 7 then leave
count = count + 1
ispfmem.count = member ,
zlc4date zlm4date ZLVERS ZLMOD ZLMTIME ZLCNORC ,
ZLINORC ZLMNORC ZLUSER ,
'ext:' zlcnorce zlinorce zlmnorce
end
ispfmem.0 = count
"LMClose Dataid("status")"
"LMFree Dataid("status")"
Lionel B. Dyck <><
Website: https://www.lbdsoftware.com
Github: https://github.com/lbdyck
“Worry more about your character than your reputation. Character is what you
are, reputation merely what others think you are.” - - - John Wooden
-----Original Message-----
From: IBM Mainframe Discussion List <[email protected]> On Behalf Of
David Spiegel
Sent: Thursday, June 15, 2023 10:33 AM
To: [email protected]
Subject: Re: PDS/PDSE Member information
Hi Gil,
LMMSTATS to change the information, LMMDISP to display it.
Regards,
David
On 2023-06-15 11:20, Paul Gilmartin wrote:
> On Thu, 15 Jun 2023 16:10:20 +0100, Jack Zukt wrote:
>
>> Is there a way to get the PDS/PDSE member information, namely,
>> member/userid/last change date in batch? I have not been able to get
>> to it using rexx.
>>
> I've done this by allocating the PDS DSORG=PS,RECFM=F,LRECL=256
> reading the directory with EXECIO and parsing the blocks according to
> the definitions.
>
> PDSE is supposed to provide similar support.
>
> This works only for members created by ISPF and some utilities that
> support the ISPF convention.
>
> PDSE information is also available via FAMS, but IBM won't tell you
> anything about that.
>
> Alternatively, you could use ISPF LM services in batch (LMMSTATS?)
>
----------------------------------------------------------------------
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
