Thanks,
Frank
I don't think so... I haven't seen a JCL or console command for
that. Your own assembler program may be able to do that.
Sincerely,
Dave Clark
WinWholesale Group Services
3110 Kettering Boulevard
Dayton, Ohio 45439 USA
(937) 294-5331
This email message and any attachments is for use only by the named
addressee(s) and may contain confidential, privileged and/or proprietary
information. If you have received this message in error, please
immediately notify the sender and delete and destroy the message and all
copies. All unauthorized direct or indirect use or disclosure of this
message is strictly prohibited. No right to confidentiality or privilege
is waived or lost by any error in transmission.
I did not know of one in 2002 either- so I wrote SYSVAR- can be
downloaded from FREEWARE on my site.
Problem (for you): it is free. But hey- It is okay if you declare the
code to be your own (comes with source).
--
Martin
--
XML2PDF - the way to get all features of PDF into your documents
on mainframe or PC systems; more at http://www.pi-sysprog.de
Perfect! That did the trick.
I notice that you used MODESET KEY=ZERO. Interesting...
Here's another thing perhaps of interest. You probably know that there is
now a VSE AR command "QUERY SETPARM,SYSTEM". Before I ran your program I
got this:
QUERY SETPARM,SYSTEM
AR 0015 DBNAME =
AR 0015 1I40I READY
Afterward I get this:
QUERY SETPARM,SYSTEM
AR 0015 BNAME =
AR 0015 1I40I READY
Still, DBNAME no does not exist, so it does what I want.
Thanks!
Frank
>> I notice that you used MODESET KEY=ZERO. Interesting... <<
Is that a question or a remark/reminicense to a recent thread.
If it was a question: I use it because I need key 0 for certain things.
>> ... another thing ... now a VSE AR command "QUERY SETPARM,SYSTEM". <<
Interstingly- I know that they now have implemented part of what SYSVAR
does.... the effect that you see is exactly what I do. I move a low
value to the first byte. This effectly makes it impossible to retrieve
that parm.
The fact that QUERY SYSTEM,SYSPARM shows it, demonstrates IMHO what
happens when one part is written by A and the other part by B. And this
is no reference to qualification! ;-)
Just a remark based on your comment about KEY=ZERO in the "using GETSYMB
macro under CICS" thread. :-)
> >> ... another thing ... now a VSE AR command "QUERY SETPARM,SYSTEM". <<
>
> Interstingly- I know that they now have implemented part of what SYSVAR
> does.... the effect that you see is exactly what I do. I move a low
> value to the first byte. This effectly makes it impossible to retrieve
> that parm.
>
> The fact that QUERY SYSTEM,SYSPARM shows it, demonstrates IMHO what
> happens when one part is written by A and the other part by B. And this
> is no reference to qualification! ;-)
'Tis amusing, yes.
Frank