Using a single allocate and a single OPEN is far more efficient. Unfortunately, REXX doesn't support that, although you could write a REXX function package for the I/O.
If you're processing all of the members, you can use DESERVE to read the BLDL (SMDE) data for all of the members and avoid the overhead of individual FIND macros. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 ________________________________________ From: IBM Mainframe Discussion List <[email protected]> on behalf of Joseph Reichman <[email protected]> Sent: Monday, April 29, 2019 8:28 AM To: [email protected] Subject: Processing Partition organization type record 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 ---------------------------------------------------------------------- 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
