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://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.3.0/com.ibm.zos.v2r3.idad400/retmem99.htm Another way is to write an application which uses the TSO ISPF LM* services. https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.3.0/com.ibm.zos.v2r3.f54sg00/lminit.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
