Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

BPXWDYN Help needed

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
Narender Sajnani

New User


Joined: 28 Jul 2012
Posts: 11
Location: India

PostPosted: Fri Sep 14, 2012 12:04 am    Post subject: BPXWDYN Help needed
Reply with quote

Hi, I am using the BPXWDYN utility to allocate a PS dataset with the following arguments -

alloc fi(SYS00006) da('DUMMY.TEST.PS') new reuse recfm(fb) lrecl(80) dsorg(ps) space(10,5) cyl

All goes fine - but the default allocation is always LRECL=1028, RECFM=VB and BLKSIZE=6144

How can I get allocated a PS file of lrecl 80 bytes? Pleas advise.

I have tried combination of parameters in every order from this documentation
http://publib.boulder.ibm.com/infocenter/zos/v1r12/index.jsp?topic=%2Fcom.ibm.zos.r12.bpxb600%2Fwdyn.htm
icon_sad.gif
Back to top
View user's profile Send private message

Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7904
Location: Bellevue, IA

PostPosted: Fri Sep 14, 2012 12:14 am    Post subject:
Reply with quote

Have you takled to your site support group to ensure that there's no system overrides changing your default allocation parameters, and that DUMMY is a valid high level qualifier for your site? I just tested this BPXWDYN allocation and it worked fine (<hlq> changed from the actual value but all other parameters are exactly as coded and passed to BPXWDYN):
Code:
ALLOC FI(OUTFILE) DA(<hlq>.IBMMF.GDG(+1))  NEW CATALOG SPACE(1,1) CYL LRECL(50) BLKSIZE(0) RECFM(FB) UNIT(SYSDA) GDGNT
and the GDG generation cataloged by the job has LRECL of 50.
Back to top
View user's profile Send private message
Narender Sajnani

New User


Joined: 28 Jul 2012
Posts: 11
Location: India

PostPosted: Fri Sep 14, 2012 12:27 am    Post subject: Reply to: BPXWDYN Help needed
Reply with quote

Hi Bob,

Thanks for replying. I just tried back in the same order of keywords - we are using BPXWDYN using a Java program -

DEBUG com.ca.mfui.config.util.DatasetUtils - alloc fi(SYS00006) da('<hlq>.TEST.PS') new catalog space(1,1) cyl Lrecl(50) blksize
0) recfm(fb) unit(sysda)
DEBUG com.ca.mfui.config.util.DatasetUtils - BPXWDYN failed; S99ERROR/S99INFO = 0x410/0x0 RC=68157440 (0x4100000)

Using REUSE keyword - the CC=0 however LRECL and RECFM are overidden to 1028 AND VB respectively.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7904
Location: Bellevue, IA

PostPosted: Fri Sep 14, 2012 12:43 am    Post subject:
Reply with quote

The REUSE option is used to deallocate a file already allocated -- hence the LRECL and RECFM are being picked up from the file allocated to DDNAME SYS00006 before your code runs.

If you allocate to a unique DDNAME (try SXDUMMY9, for example) then the LRECL and RECFM should be set correctly, and the REUSE will not be necessary.
Back to top
View user's profile Send private message
Narender Sajnani

New User


Joined: 28 Jul 2012
Posts: 11
Location: India

PostPosted: Fri Sep 14, 2012 6:45 pm    Post subject:
Reply with quote

Hi Bob,

We tried a unique DDNAME as well but still bumping upon LRECL=1028 and RECFM=VB.

Doing the same through REXX and TSO ALLOCATE command results in accurate results.

Could this be because we are using JZos launcher (JVMLDM76) to run a Java program (jar file) and that invokes a BPXWDYN call? I wouldn't think it is enforced by site's support group else the below REXX call would have failed too

/* rexx */
allocstr = "alloc dd(userdd01) dsn('<hlq>.test.ps')",
"new catalog reuse release",
"recfm(f,b) unit(sysda) dsorg(ps) lrecl(80) blksize(500)"
call bpxwdyn(allocstr)
------------------

This is what we are issuing in the Java program -

String totalArgs = "alloc fi(" + targetDD + ") da('" + targetDSN + "') reuse new " +
"dsorg(ps) lrecl(80) recfm(f,b) tracks space(100,50) blksize(800) catalog msg(wtp)";

// allocate the output dataset using BPXWDYN
ZFile.bpxwdyn(totalArgs);
// free the ddname associated with the dataset
ZFile.bpxwdyn("free fi(" + targetDD + ") msg(wtp)");
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10201
Location: italy

PostPosted: Fri Sep 14, 2012 6:50 pm    Post subject: Reply to: BPXWDYN Help needed
Reply with quote

do not post the same question on multiple forums

duplicate of
http://ibmmainframeforum.com/viewtopic.php?f=14&t=8158

a moderator will please lock the topic...

my profile says <super moderator> ... looks like I got promoted icon_wink.gif ,
but seems also that my profile is clobbered, so I cannot do any <moderators> task icon_biggrin.gif
( McMillan already knows about it )
Back to top
View user's profile Send private message
Narender Sajnani

New User


Joined: 28 Jul 2012
Posts: 11
Location: India

PostPosted: Fri Sep 14, 2012 6:53 pm    Post subject:
Reply with quote

Hi Enrico - please close the other topic as Bob and I are already in conversation on this since yesterday.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7904
Location: Bellevue, IA

PostPosted: Fri Sep 14, 2012 8:01 pm    Post subject:
Reply with quote

Use MSG(WTP) to output the messages from the dynamic allocation to see if they provide a clue about what is going on.

The only other thing I can suggest is to open a PMR with IBM.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Fri Sep 14, 2012 8:50 pm    Post subject:
Reply with quote

Hello and welcome to the forum,

Please refer to Mr. Sample as Robert - Not Bob.
Back to top
View user's profile Send private message
Narender Sajnani

New User


Joined: 28 Jul 2012
Posts: 11
Location: India

PostPosted: Mon Sep 17, 2012 8:41 pm    Post subject:
Reply with quote

Thanks Robert. We actually found that there were no issues with respect to BPXWDYN dynamic allocation of this dataset. We were using Buffered read and write to copy contents into this created dataset and that is when default attributes were getting applied. We are now using ZFile class and with recommended DCB options.

Thanks all for your suggestions.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Help Needed with View Direct shailesh_do CA Products 2 Wed Jul 13, 2016 10:39 am
No new posts Information needed on using the COBAN... venugopal.dondla COBOL Programming 5 Thu Oct 08, 2015 3:34 pm
No new posts Help needed in Conditional statement ... vinu78 DB2 5 Tue Sep 15, 2015 10:14 am
No new posts Help needed to locate the changes wh... thesumitk TSO/ISPF 6 Fri Jun 12, 2015 6:21 pm
No new posts Sort help needed guptae DFSORT/ICETOOL 5 Tue Jul 01, 2014 11:34 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us