MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Search found 10 matches
MVSFORUMS.com Forum Index
Author Message
  Topic: Allocating a VOLUME only using ALLOCATE
BarneyBadass

Replies: 11
Views: 9768

PostForum: TSO and ISPF   Posted: Wed May 09, 2007 5:46 pm   Subject: Allocating a VOLUME only using ALLOCATE
ok so you do it like this:



x=bpxwdyn('alloc dd(' variable ') shr reuse unit(sysda) vol(' variable ')')

  Topic: Allocating a VOLUME only using ALLOCATE
BarneyBadass

Replies: 11
Views: 9768

PostForum: TSO and ISPF   Posted: Mon May 07, 2007 10:43 am   Subject: Allocating a VOLUME only using ALLOCATE
Oh, and if I make the allocate look like:



"ALLOC FI("OLD_VOL") UNIT(/"unit") dummy vol "old_vol") shr"

it gets allocated to null ...
  Topic: Allocating a VOLUME only using ALLOCATE
BarneyBadass

Replies: 11
Views: 9768

PostForum: TSO and ISPF   Posted: Mon May 07, 2007 10:39 am   Subject: Allocating a VOLUME only using ALLOCATE
When I use

ALLOC FI(DASDVOL) DA(*) SHR VOLUME(volser)

the file is of course allocated to termfile;

then when I call ICKDSF I get:

128 *-* "ALLOC FI ...
  Topic: Allocating a VOLUME only using ALLOCATE
BarneyBadass

Replies: 11
Views: 9768

PostForum: TSO and ISPF   Posted: Sun May 06, 2007 4:31 pm   Subject: Allocating a VOLUME only using ALLOCATE
BTW, thanks, Gezzz... I meant to press preview and inadvertently pressed submit....

anyway, I'm doing this under the covers of TSO REXX

The other issue is some volumes don't have a SYS1.VVDS.. ...
  Topic: Allocating a VOLUME only using ALLOCATE
BarneyBadass

Replies: 11
Views: 9768

PostForum: TSO and ISPF   Posted: Sun May 06, 2007 4:28 pm   Subject: Allocating a VOLUME only using ALLOCATE

Just as an extra, what are doing to need to allocate the volume ?


I'm invoking ICKDSF to issue a


REFORMAT DDNAME("OLD_VOL") VERIFY("OLD_VOL") REFVTOC
...
  Topic: Using SYSDSN to check for existance of a PDS member
BarneyBadass

Replies: 6
Views: 4385

PostForum: TSO and ISPF   Posted: Sat May 05, 2007 6:27 am   Subject: Using SYSDSN to check for existance of a PDS member
but I also said it had been a long time since I've used that function....
  Topic: Using SYSDSN to check for existance of a PDS member
BarneyBadass

Replies: 6
Views: 4385

PostForum: TSO and ISPF   Posted: Fri May 04, 2007 3:57 pm   Subject: Using SYSDSN to check for existance of a PDS member
you could do this:


/* REXX */
/*-----------------------------------------------------------------*/
SYSUID = SYSVAR("SYSUID")
BEGIN:
"ISPEXEC DISPLAY PANEL(PRRP ...
  Topic: Allocating a VOLUME only using ALLOCATE
BarneyBadass

Replies: 11
Views: 9768

PostForum: TSO and ISPF   Posted: Fri May 04, 2007 3:44 pm   Subject: Allocating a VOLUME only using ALLOCATE
In JCL I can code:


// XXXXXX DD DISP=SHR,
// UNIT=SYSALLDA,
// VOL=SER=XXXXXX


to allocate a volume.

Is ther ...
  Topic: Total No of records in a Dataset using REXX
BarneyBadass

Replies: 21
Views: 18664

PostForum: TSO and ISPF   Posted: Tue Apr 24, 2007 3:31 pm   Subject: Total No of records in a Dataset using REXX
I agree; it's not perfect; but it did answer the question about how many records are in a dataset ... within reason of course.
  Topic: Total No of records in a Dataset using REXX
BarneyBadass

Replies: 21
Views: 18664

PostForum: TSO and ISPF   Posted: Fri Apr 20, 2007 6:35 pm   Subject: Total No of records in a Dataset using REXX
/*rexx*/
parse arg src_in
if src_in = '' then src_in ='some_dataset''

stem.0 ...
 
Page 1 of 1
All times are GMT - 5 Hours
Jump to:  


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group