dinesh_mf
New User
Joined: 26 May 2005 Posts: 15 Location: maharashtra
|
|
|
|
Hello folks,
I am working on a dynamic allocation routine. i have a requirement wherein my program has to allocate a dataset dynamically for deletion. For this I am allocating it with DISP=(OLD,DELETE).
This works if the data set to be allocated is not in use otherwise it fails.
i have a requirement wherein I dont want my pgm to fail. i want it to wait for DSN until it gets free.
For this i have updated macro IEFZB4D0 to set a few ALLOC bits. The change I made is
" S99FLG21 DC B'11011111' " instead of
" S99FLG21 DS CL1" so that I can get the following bits set i.e S99WTVOL, S99WTDSN , S99NORES , S99WTUNT , S99OFFLN , S99TIONQ, S99CATLG and S99MOUNT.
I have linked-edited my pgm with AC=1 and the LMOD resides in APF authorized library as well.
My pgm is not waiting for dataset nor it is getting serialized to SYSDSN.
Pls help. pls let me have alternate solution to this.
Thanks,
Dinesh |
|