Should have noted that I don't use an explicit BUILD. Perhaps this is no help.
Charles -----Original Message----- From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of Charles Mills Sent: Friday, May 31, 2013 7:08 AM To: [email protected] Subject: Re: Examples of getbuf and build usage I do. I would just as soon not send/post the entire module. What is your specific issue? As Binyamin has noted, GETBUF itself is pretty simple. Looks like reentrant code to me: GETBUF PDSDCB,R2 +* +* + LA 1,PDSDCB LOAD PARAM + SLR 14,14 CLEAR REGISTER + ICM 14,7,21(1) LOAD BUFCB ADDRESS + ICM R2,B'1111',0(14) IS A BUFFER AVAILABLE + BZ *+10 NO,RETURN ZERO + MVC 0(4,14),0(R2) YES,UPDATE BUFCB ADDR I do find the following comments in my code: FREEPOOL (R4) NOT NEEDED WITH BUFFS ABOVE LINE ??? * SO DOC CLAIMS BUT I GET GETBUF * FAILURES ON SUBSEQUENT OPENS Charles -----Original Message----- From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of Micheal Butz Sent: Thursday, May 30, 2013 7:13 PM To: [email protected] Subject: Examples of getbuf and build usage Would anyone have examples of Getbuf used with BSAM read I think it might help my problem ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
