The following common keywords may be specified for the ALLOCATE command:
You may specify the DELAY, CMDRESP, and MSG keywords described in Keywords Common to All ADDRESS OPSDYNAM Commands in this chapter.
Examples: ALLOCATE keyword
/* Allocate an existing data set */
"Allocate DD(oldrule) DSN('sys1.old.rules') Shr Reuse"
If rc > 0 Then Signal DYNERROR
Return rc
DYNERROR:
Say Sourceline(sigl-1)
Say "OPSDYNAM error RC="rc "Error code="opsercd,
"Info code="opsifcd
Do While Queued() > 0
Pull errsmg
Say errmsg
End
Return rc
/* Allocate a new rules pds data set */
"Allocate DD(newrule) DSN('sys1.new.rules') New Catlg",
"Like('opsdev.o.rules') Recfm(FB) Block(3120) Space(100,100,40)"
If rc > 0 Then Signal DYNERROR
Return rc
DYNERROR:
Say Sourceline(sigl-1)
Say "OPSDYNAM error RC="rc "Error code="opsercd,
"Info code="opsifcd
Do While Queued() > 0
Pull errsmg
Say errmsg
End
Return rc
| Copyright © 2011 CA. All rights reserved. | Tell Technical Publications how we can improve this information |