Re: Second level VM systems
There also was VM/IS 4. I had the pleasure of supporting VM in a module replacement only environment. IBM had some great System Engineers that helped the customers back then. Please consider the environment before printing this email. Thank you, Dave Hansen Sr. Systems Programmer Hennepin County Information Technology 300 South 6th Street Minneapolis, MN 55487 Ph: 612.596.1283 FAX: 612.348.4663 Tom Duerbusch Sent by: The IBM z/VM Operating System To IBMVM@LISTSERV.UARK.EDU cc 02/24/2009 10:48 AM Subject Re: Second level VM systems Please respond to The IBM z/VM Operating System Was there overlap? I was on VM/370 Release 6 BSE. I left that employer and when I went to another place, a few years later, I installed VM/SP 3. So I want to say that it was: VM/370 Release 1 VM/370 Release 2 VM/370 Release 3 VM/370 Release 4 VM/370 Release 5 VM/370 Release 6 VM/SP 1 VM/SP 2 VM/SP 3 VM/SP 4 VM/SP 5 along with VM/IS 5 and VM/XA Release 1 VM/SP 6 along with VM/IS 6 VM/ESA 370 mode VM/ESA ESA mode I remember BSE (Basic System Extensions), being an option. I don't know if there were other options available or if the option really wasn't optional. Tom Duerbusch THD Consulting >>> "Schuh, Richard" 2/23/2009 6:15 PM >>> The SPs didn't appear until R4. SP1 had a few problems (take that euphemistically). Regards, Richard Schuh > -Original Message- > From: The IBM z/VM Operating System > [mailto:ib...@listserv.uark.edu] On Behalf Of Ivan Warren > Sent: Monday, February 23, 2009 4:11 PM > To: IBMVM@LISTSERV.UARK.EDU > Subject: Re: Second level VM systems > > Schuh, Richard wrote: > > Nope, I really meant R2. The year was 1973. > > > > > David, Richard.. > > Ok.. > > R2 & R3 ! > > --Ivan > Disclaimer: Information in this message or an attachment may be government data and thereby subject to the Minnesota Government Data Practices Act, Minnesota Statutes, Chapter 13, may be subject to attorney-client or work product privilege, may be confidential, privileged, proprietary, or otherwise protected, and the unauthorized review, copying, retransmission, or other use or disclosure of the information is strictly prohibited. If you are not the intended recipient of this message, please immediately notify the sender of the transmission error and then promptly delete this message from your computer system.
Re: Modifying the CMS Ready Message
I must have got this from Kris indirectly: /* This exec changes CMS' READY message by including userid info. +---+ | format: | RDYMSG | +---+ Adapted by: Kris Buelens IBM Belgium; BUELENSC at IECVM 19 Apr 1993 from: David Lybrand & Joachim Becela */ parse upper source . . myname mytype . syn . address command /*-+ | Have a RDYMSG with a highlighted 'USERID at NODE'| +-*/ 'ID (LIFO' pull myid . mynode . rdymsg.1 = '& 3' /* rdymsg.2 = '8116 '||'1DE8'x||myid 'at' mynode||'1D60'x||'is ready' */ rdymsg.2 = '8116 Ready'||'1DE8'x||myid 'at' mynode||'1D60'x 'RENAME DMSUME REPOS A RDYMSG REPOS A' ren_rc = rc if rc*(rc<>28) = 0 then do 'EXECIO 2 DISKW DMSUME REPOS A3 0 F 80 (FINIS STEM RDYMSG.' 'GENMSG DMSUME REPOS A3 DMS (NOLIST MARGIN 63' 'SET LANG (ADD DMS USER' 'ERASE DMSUME TEXT' end if ren_rc = 0 then 'RENAME RDYMSG REPOS A DMSUME REPOS A' Later, Dave H. "Gentry, Stephen" <[EMAIL PROTECTED]> Sent by: The IBM z/VM Operating System To IBMVM@LISTSERV.UARK.EDU cc 09/26/2008 07:46 AM Subject Re: Modifying the CMS Ready Message Please respond to The IBM z/VM Operating System I modify it to help keep track of what userid I'm logged on to. Sometimes, I'll have 2(two) or more sessions going. Steve -Original Message- From: The IBM z/VM Operating System [mailto:[EMAIL PROTECTED] On Behalf Of Buettner, Wolfgang Sent: Friday, September 26, 2008 4:16 AM To: IBMVM@LISTSERV.UARK.EDU Subject: Modifying the CMS Ready Message Mike's respond to "DASD VOLUME SIZES" below pointed me to the obviously modified Ready Messages. What idea is behind and how is it implemented? Thank you, Wolfgang Buettner Software AG - Sitz/Registered office: Uhlandstra?e 12, 64297 Darmstadt, Germany, - Registergericht/Commercial register: Darmstadt HRB 1562 - Vorstand/ Management Board: Karl-Heinz Streibich (Vorsitzender/Chairman), David Broadbent, Mark Edwards, Dr. Peter Kurpick,Arnd Zinnhardt; - Aufsichtsratsvorsitzender/ Chairman of the Supervisory Board: Frank F. Beelitz - http://www.softwareag.com -Original Message- From: The IBM z/VM Operating System [mailto:[EMAIL PROTECTED] On Behalf Of Mike Walter Sent: Thursday, September 25, 2008 8:16 PM To: ibmvm@listserv.uark.edu Subject: Re: DASD VOLUME SIZES You might want to put a 1 cylinder minidisk on the highest real disk cylinder as a 'tail end charley' so that you know not to allocate past that. For each read DASD, I create a userid such as (just added the mdisk as an example): USER -540RES- NOLOG MDISK A00 3390 0 1 540RES R MDISK F00 3390 0 END 540RES R MDISK 3390 10017 1 540RES R This allows authorized automation EXECs to
Re: Trying to Learn z/Linux ISHELL Scripting
Novell has some online education for Novell customers. - Dave Hansen Hennepin County Dave Wade <[EMAIL PROTECTED]> Sent by: The IBM z/VM Operating System To IBMVM@LISTSERV.UARK.EDU cc 05/30/2008 02:19 PM Subject Re: Trying to Learn z/Linux ISHELL Scripting Please respond to The IBM z/VM Operating System Any online resources you would recommend? -Original Message- From: The IBM z/VM Operating System [mailto:[EMAIL PROTECTED] On Behalf Of Jack Woehr Sent: 30 May 2008 19:51 To: IBMVM@LISTSERV.UARK.EDU Subject: Re: Trying to Learn z/Linux ISHELL Scripting McKown, John wrote: The "standard" shell on z/OS UNIX is /bin/sh which is basically the Korn shell. There is a port (old) of Bash which can be downloaded. z/OS also comes with a version of tcsh. There may be other shells as well. Let's have mercy on the poor b** and answer his blessed question. There are a million books on shell scripting. I recommend Classic Shell Scripting. -- Jack J. Woehr# "Self-delusion is http://www.well.com/~jax # half the battle!" http://www.softwoehr.com # - Zippy the Pinhead Disclaimer: Information in this message or an attachment may be government data and thereby subject to the Minnesota Government Data Practices Act, Minnesota Statutes, Chapter 13, may be subject to attorney-client or work product privilege, may be confidential, privileged, proprietary, or otherwise protected, and the unauthorized review, copying, retransmission, or other use or disclosure of the information is strictly prohibited. If you are not the intended recipient of this message, please immediately notify the sender of the transmission error and then promptly delete this message from your computer system.
Re: VTAM R.I.P.
I second that. VM/IS R4 - module replacement only. No service available, a manager was supposed to be able to install it. And I've never seen it on a historical timeline of VM. - Dave Hansen Hennepin County Mark Pace <[EMAIL PROTECTED]> Sent by: The IBM z/VM Operating System To IBMVM@LISTSERV.UARK.EDU cc 04/03/2008 11:49 AM Subject Re: VTAM R.I.P. Please respond to The IBM z/VM Operating System None of those hold a candle to the shortly lived, thank God, VM/IS. What an ill conceived, poorly implemented, piece-o-doodoo that was. On Thu, Apr 3, 2008 at 12:18 PM, Schuh, Richard <[EMAIL PROTECTED]> wrote: VM/SP1 may have it beat. I remember the Vulture with the inscription "VM/SP is waiting for you" that Jim Bergsten created for it. We actually did not have much trouble with HPO4 at Piedmont Airlines. Compared to today's systems, it did have some stability issues; however, it was nowhere near as bad as SP1 or, for that matter, the earlier releases of VM. I remember some of the nightmares of the VM/370 Release 2 days. Regards, Richard Schuh > -Original Message- > From: The IBM z/VM Operating System > [mailto:[EMAIL PROTECTED] On Behalf Of Jim Bohnsack > Sent: Thursday, April 03, 2008 5:13 AM > To: IBMVM@LISTSERV.UARK.EDU > Subject: Re: VTAM R.I.P. > > I was basing that on what an MVS sysprog told me. I will > stand by my stmt, tho, that HPO 4 was the most unstable > operating system release I've seen in 41+ years of working in > this racket. Also that it was one of the shortest lived releases. > Jim > > Alan Altmark wrote: > > On Wednesday, 04/02/2008 at 09:30 EDT, Jim Bohnsack > > <[EMAIL PROTECTED]> > > wrote: > > > >> R4 was the release > >> with "native" VTAM support. VTAM had been supported for a > while with > >> VS/1 or DOS/VS hosting VTAM but someone decided that GCS > was the way > >> to go. They took a gutted MVS/XA and quickly fitted it into VM. > >> > > > > Nonsense. There is no more MVS/XA code in GCS than there is in CMS. > > > > Alan Altmark > > z/VM Development > > IBM Endicott > > > > > > > -- > Jim Bohnsack > Cornell University > (607) 255-1760 > [EMAIL PROTECTED] > -- Mark Pace Mainline Information Systems Disclaimer: Information in this message or an attachment may be government data and thereby subject to the Minnesota Government Data Practices Act, Minnesota Statutes, Chapter 13, may be subject to attorney-client or work product privilege, may be confidential, privileged, proprietary, or otherwise protected, and the unauthorized review, copying, retransmission, or other use or disclosure of the information is strictly prohibited. If you are not the intended recipient of this message, please immediately notify the sender of the transmission error and then promptly delete this message from your computer system.
Re: Logoff vs. Force
Hi, I can find documentation on a CP SEND and a CP FORCE command. Where can I find information on 'CP FOR' command? Thank you, Dave Hansen Hennepin County Phil Smith III <[EMAIL PROTECTED]> Sent by: The IBM z/VM Operating System To IBMVM@LISTSERV.UARK.EDU cc 03/27/2008 08:12 PM Subject Re: Logoff vs. Force Please respond to The IBM z/VM Operating System "Wandschneider, Scott" <[EMAIL PROTECTED]> wrote: >Does anybody have a trick on how to LOGOFF disconnected users like >DISKACNT instead of using FORCE. Sometimes FORCE will cause a user to >hang and it requires the forcing user to have class A. I know that the >FORCE command can be change to another class, but would rather stay away >from FORCE altogether. Notwithstanding the suggestions to use CP SEND or CP FOR, I'd note that I'd be astonished to find a case where CP FORCE was less successful than CP SEND or CP FOR. All FORCE does it set a bit saying "Next time you get around to it, start a LOGOFF for this VMDBK". The only difference I can see is that if the guest is quasi-hung already, CP SEND or CP FOR might fail, leaving you at least no WORST off than FORCE. CLASS A, mind you, is a big deal, so CP SEND/FOR do help with that issue. ...phsiii (Having V/FORCE flashbacks!!!) Disclaimer: Information in this message or an attachment may be government data and thereby subject to the Minnesota Government Data Practices Act, Minnesota Statutes, Chapter 13, may be subject to attorney-client or work product privilege, may be confidential, privileged, proprietary, or otherwise protected, and the unauthorized review, copying, retransmission, or other use or disclosure of the information is strictly prohibited. If you are not the intended recipient of this message, please immediately notify the sender of the transmission error and then promptly delete this message from your computer system.
Re: Performance problem Linux under Zvm
Hi, We found this: http://www-03.ibm.com/systems/z/os/linux/pdf/avmlinux.pdf VM Scheduler Resource Settings Linux is a long-running virtual machine, and VM by default is setup for short-running guests, so the following change to the VM scheduler settings should be made. We recommend setting storbuf=300,200,200 and ldubuf=100,100,100. Linux is a Q3 virtual machine, so changing this third setting is most important. Include these settings in the profile exec for the operator machine or autolog1 machine: “set srm storbuf=300,200,200” and “set srm ldubuf=100,100,100”. We bumped LDUBUF up. q srm IABIAS : INTENSITY=90%; DURATION=2 LDUBUF : Q1=100% Q2=100% Q3=100% STORBUF: Q1=300% Q2=200% Q3=200% DSPBUF : Q1=32767 Q2=32767 Q3=32767 DISPATCHING MINOR TIMESLICE = 5 MS MAXWSS : LIMIT=% .. : PAGES=99 XSTORE : 0% Thank you, Dave H. Barton Robinson <[EMAIL PROTECTED]> Sent by: The IBM z/VM Operating System 03/21/2008 01:33 PM Please respond to The IBM z/VM Operating System To IBMVM@LISTSERV.UARK.EDU cc Subject Re: Performance problem Linux under Zvm The guideline for LDUBUF is to LOWER it from default, NEVER raise it unless you like to re-IPL z/VM. O'Brien, David W. (NIH/CIT) [C] wrote: > I made the mistake of believing what I was told. > > cp q storage > 05:57:21 STORAGE = 2G > Ready; T=0.01/0.01 05:57:21 > cp q virtual storage > 05:57:35 STORAGE = 128M > Ready; T=0.01/0.01 05:57:35 > > cp q srm > 06:01:42 IABIAS : INTENSITY=90%; DURATION=2 > 06:01:42 LDUBUF : Q1=100% Q2=75% Q3=60% > 06:01:42 STORBUF: Q1=300% Q2=300% Q3=300% > 06:01:42 DSPBUF : Q1=32767 Q2=32767 Q3=32767 > 06:01:42 DISPATCHING MINOR TIMESLICE = 5 MS > 06:01:42 MAXWSS : LIMIT=% > 06:01:42 .. : PAGES=99 > 06:01:42 XSTORE : 0% > > Any recommendation for LDUBUF? I just raised it to 100 100 100. Please advise if that change was counter indicated. > > Thank you, > Dave O'Brien > National Institutes of Health > > > > > From: Gentry, Stephen [Sent: Thu 3/20/2008 2:51 PM > Subject: Re: Performance problem Linux under Zvm > > > > What command did you use to determine that you had 768m central storage? > QUERY STOREAGE? > QUERY VIRTUAL STORAGE? > Steve G. > > -Original Message- > Subject: Re: Performance problem Linux under Zvm > > Thanks John > > cp q srm > IABIAS : INTENSITY=90%; DURATION=2 > LDUBUF : Q1=100% Q2=75% Q3=60% > STORBUF: Q1=300% Q2=200% Q3=200% > DSPBUF : Q1=32767 Q2=32767 Q3=32767 > DISPATCHING MINOR TIMESLICE = 5 MS > MAXWSS : LIMIT=% > .. : PAGES=99 > XSTORE : 0% > > Just got the following from one of the other techs (non-VM) > > > We were able to diagnose the problem and make the necessary correction. > > The problem was z/VM has a total 768m of central available. The Linux > guests (3 total) each had 768m of central allocated, therefore > contention. > > The Linux guests are over allocated and are storage constrained with > 768m of central. > > Understanding the Linux guests would be in contention with each other > for this storage VM time sliced what it could for each > > guest, therefore the symptoms we experienced. > > > > My question to this group - Does a Linux quest really require 768MB of > Central? > > Regards, > > Dave O'Brien > > > > > From: Romanowski, John (OFT) > Subject: Re: Performance problem Linux under Zvm > > > > If CP INDICATE QUEUES shows an En (like E3) > in the 2nd column for one or more userids > try CP QUERY SRM (write down response for reviewing ) > and do this quick fix > CP SET SRM STORBUF 300% 300% 300% > > > > This e-mail, including any attachments, may be confidential, privileged > or otherwise legally protected. It is intended only for the addressee. > If you received this e-mail in error or from someone who was not > authorized to send it to you, do not disseminate, copy or otherwise use > this e-mail or its attachments. Please notify the sender immediately by > reply e-mail and delete the e-mail from your system. > > > -Original Message- > > Subject: Performance problem Linux under Zvm > > Our shop is new to Zvm and Linux. We have a very small number of Linux > users who are reporting significant response time problems. It almost > seems as if each stops running for a period of time and is then > re-dispatched. > > Is there a VM parameter that we might have taken the default on that > needs tweaking? > > Any help or advice appreciated as this is a proof of concept endeavour > and we would like not to turn off prospective users from the start. > > Thank you, > Dave O'Brien > National Institutes of Health > > Disclaimer: Information in this message or an attachment may be government data and thereby subject to the Minnesota Government Data Practices Act, Minnesota Statutes, Chapter 13, may be subject to attorney-client or work product pri
Re: The list it to quiet, here's something to work on.
So can you post the QD exec? I also had a few of those that are gone. I think the QH exec I had showed the time in french. Thank you, Dave Hansen Hennepin County Bruce Hayden <[EMAIL PROTECTED]> Sent by: The IBM z/VM Operating System To IBMVM@LISTSERV.UARK.EDU cc 03/06/2008 10:23 AM Subject Re: The list it to quiet, here's something to work on. Please respond to The IBM z/VM Operating System Gee, I have a copy of that exec, with a 1983 date on it. The reference to MFC's birthday is a comment in my version: /* if m d=2*2*2 3*3*3 then do; say "It's Mike Cowlishaw's Birthday!" say;end */ The comment at the top says: /* Type/push today's date and moon phase in English */ I still run it every day as part of my PROFILE EXEC: qd It's Thursday the 6th of March, 2008. There will be a new moon tomorrow. Ready; On Wed, Mar 5, 2008 at 9:18 PM, Jim Bohnsack <[EMAIL PROTECTED]> wrote: > I just happen to have that book on the shelf as well as it's companion, > also written by Mike if I remember correctly. > > I have an old exec that Mike wrote or at least my modification of it. I > don't know if it ever make it to the public domain. The original was > called QD EXEC. It did a calculation among other things, which I have > never been able to understand, that would announce that Mike's birthday > was sometime in January, I think. I had always been intending to put a > note out on the list telling everyone when that was so everyone could > join in on a Happy Birthday or whatever. Now, however, I may not be > working with a VM system next January since I am planning on retiring > sometime this year. I'd be happy to send my version of it, QDJAB, which > just has some code inserted in it to remind me of my next trip to see my > family or whatever. I'm afraid that I've lost the original QD EXEC. > > Jim > -- > Jim Bohnsack > Cornell University > (607) 255-1760 > [EMAIL PROTECTED] > -- Bruce Hayden Linux on System z Advanced Technical Support Endicott, NY Disclaimer: Information in this message or an attachment may be government data and thereby subject to the Minnesota Government Data Practices Act, Minnesota Statutes, Chapter 13, may be subject to attorney-client or work product privilege, may be confidential, privileged, proprietary, or otherwise protected, and the unauthorized review, copying, retransmission, or other use or disclosure of the information is strictly prohibited. If you are not the intended recipient of this message, please immediately notify the sender of the transmission error and then promptly delete this message from your computer system.
Re: Impromptu XEDIT Survey
I used to have an Xedit profile called ICCF. It was on the right. - Dave H. "Dodds, Jim" <[EMAIL PROTECTED]> Sent by: The IBM z/VM Operating System To IBMVM@LISTSERV.UARK.EDU cc 02/20/2008 09:58 AM Subject Re: Impromptu XEDIT Survey Please respond to The IBM z/VM Operating System Depends on what I am doing. If I am entering lots of data I want it on the right, otherwise on the left. Jim Dodds Systems Programmer Kentucky State University 400 East Main Street Frankfort, Ky 40601 502 597 6114 From: The IBM z/VM Operating System [mailto:[EMAIL PROTECTED] On Behalf Of Huegel, Thomas Sent: Wednesday, February 20, 2008 10:06 AM To: IBMVM@LISTSERV.UARK.EDU Subject: Impromptu XEDIT Survey Where does the prefix field belong? On the left? or On the right?
Re: Display Menus without ISPF/VM ?
This is a simple XEDIT: /* REXX */ 'xedit xpanel data a (prof xpanel'<=== The name of your Xedit Profile say 'Your results are:' 'EXECIO * DISKR XPANEL DATA A2 1 (STEM VMFA.' 'EXECIO 0 DISKR XPANEL DATA A2 (FINIS' vmfa = VMFA.0 do x = 1 to vmfa parse var vmfa.x . 'Input:' data data = strip(data) say 'Record' x 'DATA:' data end exit 0 /* Xedit Profile */ /* */ dt = Date(u) tm = Time() strng = dt || ' Data Entry Panel ' || tm hdr0 = ' ' 'set ctlchar ! escape' 'set ctlchar % noprotect green underline' 'set ctlchar " protect nohigh' 'set reserved 1 yellow rev high ' strng 'set reserved 2 turq nohigh' hdr0 field1 = 'field 1' field2 = 'field 2' 'set reserved 3 turq rev high Enter Field 1:' 'set reserved 4 noh One:!% !"' 'set reserved 5 turq rev high Enter Field 2:' 'set reserved 6 noh Two:!% !"' 'set reserved 7 Default None Nohigh' 'set reserved 8 Default None Nohigh' 'set reserved 9 Default None Nohigh' 'set reserved 10 Default None Nohigh' 'set reserved 11 Default None Nohigh' 'set reserved 12 Default None Nohigh' 'set reserved 13 Default None Nohigh' 'set reserved 14 Default None Nohigh' 'set reserved 15 Default None Nohigh' 'set reserved 16 Default None Nohigh' 'set reserved 17 Default None Nohigh' 'set reserved 18 Default None Nohigh' 'set reserved 19 Default None Nohigh' 'set reserved 20 Default None Nohigh' 'set reserved 21 Default None Nohigh' 'set reserved 22 Default None Nohigh' 'command cursor screen 4 6' 'READ All Tag' VMFA = queued() Do x = 1 to VMFA Parse upper pull V1 V2 V3 V4 . Select When x = 1 then do 'ERASE XPANEL DATA A2' 'EXECIO 0 DISKW XPANEL DATA A2 0 F 80' end When x = 2 then do if V2 = 4 then do out = 'Field 1 Input: ' V4 'EXECIO 1 DISKW XPANEL DATA A2 1 ( STRING' OUT end if V2 = 6 then do out = 'Field 2 Input: ' V4 'EXECIO 1 DISKW XPANEL DATA A2 2 ( STRING' OUT end end When x = 3 then do if V2 = 6 then do out = 'Field 2 Input: ' V4 'EXECIO 1 DISKW XPANEL DATA A2 2 ( STRING' OUT end end Otherwise nop /* select */ End 'FINIS XPANEL DATA A2' /* do */ End /* */ 'Quit' HTH - Dave H. "Lionel B. Dyck" <[EMAIL PROTECTED]> Sent by: The IBM z/VM Operating System To IBMVM@LISTSERV.UARK.EDU cc 01/31/2008 11:44 AM Subject Display Menus without ISPF/VM ? Please respond to The IBM z/VM Operating System I don't have ISPF/VM and yet I would like to create simple display pa
Re: z/OS + TSO + ISPF versus z/VM + CMS + ISPF
Hi, I moved an ISPF rexx application I wrote from VM to MVS. It's a manual migration. REXX is what I used to drive to panels. On VM I could pre-process the panels. As far as what's in a panel, (all the definitions), some due point to the source of the panel or the EXEC by PFKey. So your flow will have to be modified to reference MVS datasets. I had some trouble with the colors, but this was many years ago. The reason I don't run much ISPF under VM any more is PROFS went away and so did ISPF for a lot of VM shoppes. Hope that helps, Dave Hansen Sr. Systems Programmer Hennepin County Raymond Noal <[EMAIL PROTECTED]> Sent by: The IBM z/VM Operating System To IBMVM@LISTSERV.UARK.EDU cc 01/03/2008 02:53 PM Subject z/OS + TSO + ISPF versus z/VM + CMS + ISPF Please respond to The IBM z/VM Operating System Dear Lists: I am cross posting this question to the z/OS and z/VM lists due to the nature of my question, which is – Will z/OS, TSO ISPF panels and dialogs work under the z/VM, CMS ISPF program product? Is there any degree of compatibility between the two ISPF products? Is there any migration/conversion effort involved in going from one to the other? (primarily from the TSO to CMS based ISPF platform) I thank you in advance for your time and assistance. HITACHI DATA SYSTEMS Raymond E. Noal Senior Technical Engineer Office: (408) 970 - 7978
Re: How can I find if a user is defined in the directory (without looking!)?
Hello again, OK, I did some pondering. I wanted to suppress the CP command and SETtting CMSTYPE of coarse did suppress it. so I used the PIPE approach. I would hope that userids should not match literals lke DISK or NOLOG, but I liked the 'NOT IN CP DIRECTORY' message from the spool command. I could link a disk, but that assumes a 191 and most service machine do have a 191. I always like it when other post what they have come up with so here goes: /* REXX */ /* GET RDR FILES FOR LAST TWO DAYS FROM DIFFERENT SOURCES */ TRACE N ARG INPUT IW = WORDS(INPUT) TODAY = DATE(J) YESTERDAY = TODAY -1 YESTERDAY = RIGHT(YESTERDAY,5,'0') TODAY = DATE(U,TODAY,J) YESTERDAY = DATE(U,YESTERDAY,J) TODAY = SUBSTR(TODAY,1,5) YESTERDAY = SUBSTR(YESTERDAY,1,5) IF IW = 0 THEN DO SAY 'NO PARAMETERS PASSED' EXIT END ELSE 'CP DEF PUN 01D' DO X=1 TO IW CW = WORD(INPUT,X) CW = STRIP(CW) 'PIPE CP SPOOL 01D TO' CW '| STEM RESP.' IF WORD(RESP.1,1) = 'HCPCSP053E' THEN DO SAY CW 'IS NOT A VALID USERID' ITERATE END 'Q RDR' CW 'ALL (STACK' QR = QUEUED() DO Y=1 TO QR PARSE UPPER PULL RF RF = STRIP(RF) IF (WORD(RF,8) = TODAY) && (WORD(RF,8) = YESTERDAY) THEN 'TRANSFER' CW 'RDR' WORD(RF,2) 'TO * RDR' END /* DO Y */ END /* DO X */ 'CP DET 01D' You may pass multiple service machine names to this, so the CP DEF and CP DET are only done once. I will use it a disaster recovry to collect all the recent consoles. Thanks again, Dave H.
Re: How can I find if a user is defined in the directory (without looking!)?
Hello again, Thank you for all your suggestions. I did like Kens response with the diagrc in it. I did some testing and for simplicity I favor just checking the return code on the CP Q userid. I had forgotten about our friend EXECIO that stacks the output and I liked the PIPE that put the results in a stem variable. Thanks again to all, Dave Hansen
How can I find if a user is defined in the directory (without looking!)?
Hello, I have an EXEC that I wish to use to TRANS the console files from another userid for a given period of time. I would like to check if the userid given the EXEC actually exists. I looked at the CMS QUERY which does stack the results, but userid is not part of the CMS query. The CP Query does let me know about the user, but doesn't stack the results. The CP MSG (and SMSG) & IND USER don't care about the userid, and an invalid userid is always NOT LOGGED ON. It looks like I almost need to spool and close my console to get the results of my CP Query. I suppose I could just issue the TRANS against an invalid userid and let it fail. Any thoughts from the group? Thank you, Dave Hansen Sr. Systems Programmer Hennepin County
Re: z/vm 5.1 to 5.3 question
I have used this approach a few times. q disk a LABEL VDEV M STAT CYL TYPE BLKSZ USR191 191 A R/W50 3390 4096 Ready; T=0.01/0.01 13:05:40 ac 191 a/a DMSACC724I 191 replaces A (191) DMSACP723I A (191) R/O Ready; T=0.01/0.01 13:05:47 q disk a LABEL VDEV M STAT CYL TYPE BLKSZ USR191 191 A/A R/O50 3390 4096 Ready; T=0.01/0.01 13:05:50 ac 191 a DMSACC724I 191 replaces A (191) Ready; T=0.01/0.01 13:05:55 q disk a LABEL VDEV M STAT CYL TYPE BLKSZ USR191 191 A R/W50 3390 4096 Ready; T=0.01/0.01 13:06:00
Re: Historical curiousity question.
Perhaps an FST?
Re: REXX EXEC - Trapping console messages w/SCIF
David and Kris, Thank you for your help. I trap to a stem and I'm back to figuring out my 'logic'. It's been a while since a wrote a pipe. I saw they can still be written in EXEC2. Maybe VMFOPT still works too. Thanks again, Dave H. Hennepin County
Re: REXX EXEC - Trapping console messages w/SCIF
Hello, I am still having trouble with my SCIF exec. Here it is: /* rexx */ trace r 'set msg iucv' 'pipe (endchar \)', '|starmsg CP Q MUDLAKE', '| console', '\', 'literal +2', '| delay', '| pipestop' parse upper pull input '-' var if var = 'dsc' then nop else do say 'mudlake not logged on' exit 1369 end 'set msg on' Here is it in action: 12:46:27 jimmy 12:46:27 3 *-* 'set msg iucv' 12:46:27>>> "set msg iucv" 12:46:27 4 *-* 'pipe (endchar \)','|starmsg CP Q MUDLAKE','| console','\',' literal + 12:46:27 2','| delay','| pipestop' 12:46:27>>> "pipe (endchar \) |starmsg CP Q MUDLAKE | console \ litera l +2 | de 12:46:27 lay | pipestop" 12:46:27 00: MUDLAKE - DSC 12:46:29 11 *-* parse upper pull input '-' var If I change the delay to 4 seconds the DSC message always has the same time as the pipestop. The delay is how long before the parse is executed. The book says when pipestop reads an input record, it ends the stages. Am I ending the stages? It looks like the DSC message isn't PULLable because I get placed in a VM READ. Some SCIF stuff: 12:52:09 cp send cp mudlake q secuser 12:52:09 MUDLAKE : SECONDARY USER LNXADMIN IS LOGGED ON 12:52:09 Ready; T=0.01/0.01 12:52:09 12:52:11 id 12:52:11 LNXADMIN AT ZVM3 VIA *02/28/07 12:52:11 CST WEDNESDAY 12:52:11 Ready; T=0.01/0.01 12:52:11 Thanks in advance, Dave H.
REXX EXEC - Trapping console messages w/SCIF
Hello group, I found out SCIF changes things. I logon and I normally don't get any traffic until I send something to the other virtual machine I am a secondary console for and then I get a response. Without SCIF I can get my message in REXX by issuing a command and then doing a PULL. However with SCIF I get a VM READ as I watch the message being returned while I am tracing the exec. I have used wakeup before and then it captures the 'activity' by return code. I could spool my console and close it, but then I probably won't be able to trap the spoolid. Yes, I could set something unique in the spool name or type. But this probably isn't the best solution. Any ideas? Thank you, Dave H.
