Steve,
We use LASTING GLOBALV with a DEFSTOR EXEC and our PROFILE EXECs. An
extract of DEFSTOR has:
Arg size CMDLINE
-------------------- 73 line(s) not displayed --------------------
'GLOBALV SELECT DEFSTOR SETLP CMDLINE' cmdline
'FINIS * * *'
parse value diagrc(8,"DEFINE STOR" size "15"x "IPL" system "PARM" ,
"AUTOCR") with rc . the_rest
/* Following line will only be executed if the above commands fail */
say the_rest
Exit RC
Then in the PROFILE EXEC:
"GLOBALV SELECT DEFSTOR GET CMDLINE"
if cmdline ^= "" then do
"GLOBALV SELECT DEFSTOR SETLP CMDLINE"
queue cmdline
end
exit 0
Therefore, you can do:
DEFSTOR 50M srgmod
Jim
-----Original Message-----
From: The IBM z/VM Operating System
[mailto:[EMAIL PROTECTED] On Behalf Of Steve Gentry
Sent: Wednesday, January 10, 2007 4:14 PM
To: IBMVM@LISTSERV.UARK.EDU
Subject: PIPE, CMS kind of question.
I have an EXEC I want to run but I need to be sure the user has
a certain amount of virtual storage before it can run.
I can get this information with PIPE and a Q V STOR.
If the storage is less than 50M then I want to increase the
storage to 50M. Then I want the EXEC to continue on.
Here is the code snippet.
'cp define stor 50m' || '15'x || 'I CMS' || '15'x || 'srgmod'
mod_name
The define stor works ok, the I CMS works ok but it won't run
the srgmod EXEC (mod_name is an arg I supply)
Is this because when the I CMS runs it clears storage, resets
pointers or something?
If so, is there a way I can accomplish this?
Thanks,
Steve G.
--------------------------------------------------------
If you are not an intended recipient of this e-mail, please notify the sender,
delete it and do not read, act upon, print, disclose, copy, retain or
redistribute it. Click here for important additional terms relating to this
e-mail. http://www.ml.com/email_terms/
--------------------------------------------------------
