That's certainly the supported approach. http://mason.gmu.edu/~smetz3/source/STOWBLDL.ASM was my home grown alternative. Others have use EXCP, lthoughI don't know whether they achieved the performance of SAM-E.
-- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 ________________________________________ From: IBM Mainframe Discussion List <[email protected]> on behalf of John McKown <[email protected]> Sent: Monday, April 29, 2019 8:39 AM To: [email protected] Subject: Re: Processing Partition organization type record On Mon, Apr 29, 2019 at 7:28 AM Joseph Reichman <[email protected]> wrote: > Hi > > I have to process a DSORG type dataset processing each member > > I initially do a FIND and go through Each member > > Seems lime with this access method I have to use READ instead of GET > > And thus do my own deb locking processing In Rexx I would do the allocate > and unallocate and this would use QSAM > > In Assembler this more difficult with SVC 99 > > If anybody has any ideas they are willing to share I would appreciate it > > Thanks > > Do efficiently process every member of a PDS or PDSE, you do need to use BPAM, which uses READ & CHECK. Using SVC 99 to allocate each member is possible, but will have horrible overhead. Have you looked at the IBM example code for this? https://secure-web.cisco.com/1ZIa00Aizw3HV2WOQjodZ8IyIbLj6bfPSsUeYfoW4MjEeeZYk6DfwvWRRqC6zZhs-y7PI2jahSQgGhyg_-w-LFPh9wtb6StYIRBqRuoDfcU9Orlh-avCB_WWAZFxlLfqUraxzh7tdS_c8tNhruP39iiFJ-znX5uWcEZ49KOkEoRSz4M1L3RLmbUSnYX6m3Buv-Q1NwR9sy-8WzT2qEPTJkGe4g9hU-t1d7tlkwy8o3JYJgBbsissu7RisaYeJNPQJb48CDrBptyosEGLj_gp-1BrIt3QyuhEnkSJWnDSOKKcxo4xQ7L1RUGsx-gyH0UftQjekMqDA2Mp8cqALxfozSOUs_GNTEyTw9yPFHlFcRVrtavvLrsNvjclR6HL6xLR868JCAFehpBmYrC9V2fSYSrxzhNP3nBFmv0pKdjWdTN57OZXAwuXLcb5rzWHzeCUb/https%3A%2F%2Fwww.ibm.com%2Fsupport%2Fknowledgecenter%2Fen%2FSSLTBW_2.3.0%2Fcom.ibm.zos.v2r3.idad400%2Fretmem99.htm Another way is to write an application which uses the TSO ISPF LM* services. https://secure-web.cisco.com/1BiL9SX_stel94FV8gkGQVl8xvloxmE4ygawTtNsFSzvGr8IcpQmoJi71nTuBmSDM7SA5WGGYKavdh4Syuu2qDSqS-eZdmQrmNJHvOPjsYS44A6GLuKW0PUthyWZTOML-_qxcGMuRKdDaqJfczMshnv3DDVvgSZudhXUCv5YSQFSLj_5Bsj1MyjVhqjqywnOx61WbpM46vfQI0qxtImKJSKHI-xuF3qLUh6YOth0NrfqOOgLHeoL6Vc2sRWDHdugsMMCTiVOSHHgkuDZoCPyFoQRiihHtYkFM9-6nAWudX7YKeFBv4tftFCEPig_bPLjCOdhbci_IW0X4t0G695tqLaQjpZRJVBwHhoeB3LayQBOX_oqd2QCQYC6ekRlr5F9bhyb2WRe84leDm-29VLtMw2zSkUX6v9A3XTK-5kubqJh4eiAbl50wDSPPoLP4ZwNX/https%3A%2F%2Fwww.ibm.com%2Fsupport%2Fknowledgecenter%2Fen%2FSSLTBW_2.3.0%2Fcom.ibm.zos.v2r3.f54sg00%2Flminit.htm -- This is clearly another case of too many mad scientists, and not enough hunchbacks. Maranatha! <>< John McKown ---------------------------------------------------------------------- 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
