MVSFORUMS.com

Phantom · Posted: Mon Jul 26, 2004 9:43 am Post subject: Dynamic File Allocation in COBOL

I am using BPXWDYN to allocate a file in cobol dynamically. My question is - can the program be written generic to accept files with any LRECL as input ?

That is If I allocate a dataset (for use as input) using ALLOC command as shown below

kolusu · Posted: Mon Jul 26, 2004 10:01 am Post subject:

Phantom,

COBOL is not yet there to handle dynamich LRECL Files. However there are other ways to achieve this functionality. If you are willing to change the file to variable block then you can read any LRECL datasets.

Phantom · Posted: Tue Jul 27, 2004 8:13 am Post subject:

Thanks a lot kolusu,

jimmy_augustine · Beginner Joined: 23 Jun 2004 Posts: 32 Topics: 13

Phantom,
This is a wonderful peace of information i was looking for!!. Could you please explanin me how do you do that dynamic file allocation on the fly in a COBOL program?
Thanks
Jimmy

kolusu · Posted: Fri Aug 27, 2004 9:05 am Post subject:

Jimmy,

Please search before posting. There are several examples showing dynamic allocation using BPXWDYN.

Check this link

http://www.mvsforums.com/helpboards/viewtopic.php?t=1905&highlight=bpxwdyn

Hope this helps...

Cheers

kolusu
_________________
Kolusu - DFSORT Development Team (IBM)
DFSORT is on the Web at:
www.ibm.com/storage/dfsort

www.linkedin.com/in/kolusu

Jmoorthy · Beginner Joined: 23 Aug 2007 Posts: 5 Topics: 1

Hi,
Is any one can help give a code of this module (BPXWDYN )and same for allocation and deallocation of datasets. I dont have facility to call The modulle in mainframe .

Thanks in advance

Jmoorthy · Beginner Joined: 23 Aug 2007 Posts: 5 Topics: 1

How to allocate a dynamic tape dataset ?
Please advise in this regard

kolusu · Posted: Fri Aug 24, 2007 7:09 am Post subject:

Jmoorthy · Beginner Joined: 23 Aug 2007 Posts: 5 Topics: 1

Thank you ,

Please suggest me how to deallocate a dataset. I have tried with delete or Removing the catolog in that sequence .But my requirment is only deallocate a particular dataset.

Jmoorthy · Beginner Joined: 23 Aug 2007 Posts: 5 Topics: 1

The above query is for dynamic deallocation .
Also I can allocate only dynamic Disk DATSET , Please suggest in anyother High level assembler language its possible to dynamic allocate or deallocate all type of datset.Please advise in this regard.
Actually my requirment is I want to allocate or deallocate a dynamic datset with high level assembler .I will this as a routine in calling program .Calling program
should give input that for its allocate or deallocate .If allocate ddname and dsnname and status . If status is new user has to mention UNIT,VOLUME,RECFM,LREC,EXPDTall the inputs,Id its a SHR or OLD no problem.
After getting thes inputs from user This above routine will allocate a dataset.
llly , For deallocation get ddname and dsnname .once received deallcoate a dataset
buT For deallocation how to deallocate ,I am not sure about deallocation
Please advise in this regard , Whether this way is correct.

jim haire · Beginner Joined: 30 Dec 2002 Posts: 140 Topics: 40

Kolusu,
I saw you posted back in 2007 that you cannot dynamically allocate a tape dataset. I am wondering if the capability is available for allocating a virtual tape dataset?

I have tried BPXWDYN. I also tried writing ALLOC lines to a dataset that IDCAMS could process. I don't know if I have these formatted incorrectly or it just isn't possible.

My scenario is that I am reading in a dataset which contains the names of a input file and an output file. I read in a record and try to allocate the output dataset like the input dataset, except I want to allocate the output dataset as a VTS, because the file is very large.

I then write a REPRO line to copy the input dataset to the output dataset.
It appears that the only part that does not work is the allocation of the tape dataset. I have used the UNIT() and the RETPD() parameters. I don't want to use the VOLUME() parameter as I don't know the volume number to use. Is there a different parameter I could use?

Thanks for your help!

kolusu · Posted: Tue Nov 23, 2021 3:40 pm Post subject:

haatvedt · Posted: Fri Dec 31, 2021 1:52 am Post subject:

Jim / Kolusu,

years ago I used BPXWDYN to dynamically allocate a tape dataset. However I had to request a security change to allow my userid to dynamically mount tapes.

perhaps this has changed, however you may want to check with you system programmers / security folks.
_________________
Chuck Haatvedt

email --> clastnameatcharterdotnet

(replace lastname, at, dot with appropriate
characters)