What speed are my channels actually running at?

2009-07-01 Thread Vince Getgood
Hi all,
I've just been making a Visio diagram of out I/O config on some old 
hardware (z800), which runs two z/OS guests under VM (5.4)

I dicovered that, although the VM IOCP has channels to my DASD system as 

FC (FICON) the z/OS IOCP has them defined as CNC (ESCON).

So what speed am I going to get on a z/OS I/O, ESCON or FICON? 

I'm assuming VM does something clever, like ignore what z/OS says?

TIA


Re: What speed are my channels actually running at?

2009-07-01 Thread Brian Nielsen
What's important is what is in the active IOCDS on your z800.  Assuming 

that your z/OS guests do not have permissions to update the real IOCDS 

then it doesn't matter to you what is in their z/OS HCD config (all 
they'll really care about is that it agrees with what's in their virtual 

machine definition).

Brian Nielsen


On Wed, 1 Jul 2009 08:47:05 -0500, Vince Getgood 
vincent.getg...@xchanging.com wrote:

Hi all,
I've just been making a Visio diagram of out I/O config on some old 
hardware (z800), which runs two z/OS guests under VM (5.4)

I dicovered that, although the VM IOCP has channels to my DASD system as
 
FC (FICON) the z/OS IOCP has them defined as CNC (ESCON).

So what speed am I going to get on a z/OS I/O, ESCON or FICON? 

I'm assuming VM does something clever, like ignore what z/OS says?

TIA


CP Query wildcards

2009-07-01 Thread Dean, David (I/S)
Why won't my wildcard work?

 

 

q dasd l53701

DASD C018 CP SYSTEM L53701   1

DASD C0CE CP SYSTEM L53701   1

DASD C0CF CP SYSTEM L53701   1

 

CP

q dasd l53*

DASD L53* was not found.

 

 

Thanks

 

David Dean

Information Systems

*bcbstauthorized*

 


-
Please see the following link for the BlueCross BlueShield of Tennessee E-mail 
disclaimer:  http://www.bcbst.com/email_disclaimer.shtm


Re: My presentation

2009-07-01 Thread McKown, John
Neat presentation!

John McKown
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone * (817)-961-6183 cell
john.mck...@healthmarkets.com * www.HealthMarkets.com

Confidentiality Notice: This e-mail message may contain confidential or 
proprietary information. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the original message. 
HealthMarkets(r) is the brand name for products underwritten and issued by the 
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance 
Company(r), Mid-West National Life Insurance Company of TennesseeSM and The 
MEGA Life and Health Insurance Company.SM



From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On Behalf 
Of Michael MacIsaac
Sent: Wednesday, July 01, 2009 7:50 AM
To: IBMVM@LISTSERV.UARK.EDU
Subject: My presentation


Bill,

Here is my presentation:

Mike MacIsaac mike...@us.ibm.com   (845) 433-7061


Re: CP Query wildcards

2009-07-01 Thread Wakser, David
Because the command syntax requires a DASD pack name. I once wrote an
EXEC to perform what you are attempting to do.
 
David Wakser



From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On
Behalf Of Dean, David (I/S)
Sent: Wednesday, July 01, 2009 11:59 AM
To: IBMVM@LISTSERV.UARK.EDU
Subject: CP Query wildcards



Why won't my wildcard work?

 

 

q dasd l53701

DASD C018 CP SYSTEM L53701   1

DASD C0CE CP SYSTEM L53701   1

DASD C0CF CP SYSTEM L53701   1

 

CP

q dasd l53*

DASD L53* was not found.

 

 

Thanks

 

David Dean

Information Systems

*bcbstauthorized*

 

-
Please see the following link for the BlueCross BlueShield of Tennessee
E-mail disclaimer:  http://www.bcbst.com/email_disclaimer.shtm


Confidentiality Note: This e-mail, including any attachment to it, may contain 
material that is confidential, proprietary, privileged and/or Protected Health 
Information, within the meaning of the regulations under the Health Insurance 
Portability  Accountability Act as amended.  If it is not clear that you are 
the intended recipient, you are hereby notified that you have received this 
transmittal in error, and any review, dissemination, distribution or copying of 
this e-mail, including any attachment to it, is strictly prohibited. If you 
have received this e-mail in error, please immediately return it to the sender 
and delete it from your system. Thank you.


Re: My presentation

2009-07-01 Thread Michael MacIsaac
Hi list,

I wrote:
 Bill, 

 Here is my presentation: 

Whoops sorry. This was not supposed to go to the list of course, it was 
supposed to go to Bill Munson.

(Bill, you can get it here :))

Mike MacIsaac mike...@us.ibm.com   (845) 433-7061

Re: CP Query wildcards

2009-07-01 Thread Dean, David (I/S)
Can I have it?

 

David Dean

Information Systems

*bcbstauthorized*



From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On
Behalf Of Wakser, David
Sent: Wednesday, July 01, 2009 12:14 PM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: CP Query wildcards

 

Because the command syntax requires a DASD pack name. I once wrote an
EXEC to perform what you are attempting to do.

 

David Wakser

 



From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On
Behalf Of Dean, David (I/S)
Sent: Wednesday, July 01, 2009 11:59 AM
To: IBMVM@LISTSERV.UARK.EDU
Subject: CP Query wildcards

Why won't my wildcard work?

 

 

q dasd l53701

DASD C018 CP SYSTEM L53701   1

DASD C0CE CP SYSTEM L53701   1

DASD C0CF CP SYSTEM L53701   1

 

CP

q dasd l53*

DASD L53* was not found.

 

 

Thanks

 

David Dean

Information Systems

*bcbstauthorized*

 

-
Please see the following link for the BlueCross BlueShield of Tennessee
E-mail disclaimer:  http://www.bcbst.com/email_disclaimer.shtm

Confidentiality Note: This e-mail, including any attachment to it, may
contain material that is confidential, proprietary, privileged and/or
Protected Health Information, within the meaning of the regulations
under the Health Insurance Portability  Accountability Act as amended.
If it is not clear that you are the intended recipient, you are hereby
notified that you have received this transmittal in error, and any
review, dissemination, distribution or copying of this e-mail, including
any attachment to it, is strictly prohibited. If you have received this
e-mail in error, please immediately return it to the sender and delete
it from your system. Thank you. 


-
Please see the following link for the BlueCross BlueShield of Tennessee E-mail 
disclaimer:  http://www.bcbst.com/email_disclaimer.shtm


Re: CP Query wildcards

2009-07-01 Thread Bob Bates
Because the wildcard isn't accepted there.

Maybe a quick PIPE:

PIPE CP Q DASD ALL | split , | locate /L53/ | console

Unless you are only concerned with DASD attached to the system, then you don't 
need the split or the ALL on the Q DASD.


Bob Bates
Enterprise Hosting Services

w. (469)892-6660
c. (214) 907-5071

This message may contain confidential and/or privileged information.  If you 
are not the addressee or authorized to receive this for the addressee, you must 
not use, copy, disclose, or take any action based on this message or any 
information herein.  If you have received this message in error, please advise 
the sender immediately by reply e-mail and delete this message.  Thank you for 
your cooperation.




From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On Behalf 
Of Dean, David (I/S)
Sent: Wednesday, July 01, 2009 10:59 AM
To: IBMVM@LISTSERV.UARK.EDU
Subject: CP Query wildcards

Why won't my wildcard work?


q dasd l53701
DASD C018 CP SYSTEM L53701   1
DASD C0CE CP SYSTEM L53701   1
DASD C0CF CP SYSTEM L53701   1

CP
q dasd l53*
DASD L53* was not found.


Thanks

David Dean
Information Systems
*bcbstauthorized*


-
Please see the following link for the BlueCross BlueShield of Tennessee E-mail 
disclaimer:  http://www.bcbst.com/email_disclaimer.shtm



Re: CP Query wildcards

2009-07-01 Thread Wakser, David
You're assuming that I have kept it for the past 15 years! I will look
around, but I don't believe I still have it. But I recall I used PIPEs
to choose whose entries I wanted to display. Let's see if someone else
comes up with something. If not, maybe I can rewrite it.
 
David Wakser



From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On
Behalf Of Dean, David (I/S)
Sent: Wednesday, July 01, 2009 12:39 PM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: CP Query wildcards



Can I have it?

 

David Dean

Information Systems

*bcbstauthorized*



From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On
Behalf Of Wakser, David
Sent: Wednesday, July 01, 2009 12:14 PM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: CP Query wildcards

 

Because the command syntax requires a DASD pack name. I once wrote an
EXEC to perform what you are attempting to do.

 

David Wakser

 



From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On
Behalf Of Dean, David (I/S)
Sent: Wednesday, July 01, 2009 11:59 AM
To: IBMVM@LISTSERV.UARK.EDU
Subject: CP Query wildcards

Why won't my wildcard work?

 

 

q dasd l53701

DASD C018 CP SYSTEM L53701   1

DASD C0CE CP SYSTEM L53701   1

DASD C0CF CP SYSTEM L53701   1

 

CP

q dasd l53*

DASD L53* was not found.

 

 

Thanks

 

David Dean

Information Systems

*bcbstauthorized*

 

-
Please see the following link for the BlueCross BlueShield of Tennessee
E-mail disclaimer:  http://www.bcbst.com/email_disclaimer.shtm

Confidentiality Note: This e-mail, including any attachment to it, may
contain material that is confidential, proprietary, privileged and/or
Protected Health Information, within the meaning of the regulations
under the Health Insurance Portability  Accountability Act as amended.
If it is not clear that you are the intended recipient, you are hereby
notified that you have received this transmittal in error, and any
review, dissemination, distribution or copying of this e-mail, including
any attachment to it, is strictly prohibited. If you have received this
e-mail in error, please immediately return it to the sender and delete
it from your system. Thank you. 

-
Please see the following link for the BlueCross BlueShield of Tennessee
E-mail disclaimer:  http://www.bcbst.com/email_disclaimer.shtm


Confidentiality Note: This e-mail, including any attachment to it, may contain 
material that is confidential, proprietary, privileged and/or Protected Health 
Information, within the meaning of the regulations under the Health Insurance 
Portability  Accountability Act as amended.  If it is not clear that you are 
the intended recipient, you are hereby notified that you have received this 
transmittal in error, and any review, dissemination, distribution or copying of 
this e-mail, including any attachment to it, is strictly prohibited. If you 
have received this e-mail in error, please immediately return it to the sender 
and delete it from your system. Thank you.


Re: CP Query wildcards

2009-07-01 Thread Feller, Paul
 Here is part of some code I wrote to query DASD by VOLSER.  Part of the code 
ask if you want to sort the output by VOLSER.

If SORTYN = 'Y' then do
  'pipe cp query dasd',
  '| locate /'VOLSER'/',
  '| sort 21.6 ascending',
  '| pad 35',
  '| chop 35',
  '| stem DASDX1.'
  end
else do
  'pipe cp query dasd',
  '| locate /'VOLSER'/',
  '| pad 35',
  '| chop 35',
  '| stem DASDX1.'
  end


Paul Feller
AIT Mainframe Technical Support

From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On Behalf 
Of Dean, David (I/S)
Sent: Wednesday, July 01, 2009 10:59 AM
To: IBMVM@LISTSERV.UARK.EDU
Subject: CP Query wildcards

Why won't my wildcard work?


q dasd l53701
DASD C018 CP SYSTEM L53701   1
DASD C0CE CP SYSTEM L53701   1
DASD C0CF CP SYSTEM L53701   1

CP
q dasd l53*
DASD L53* was not found.


Thanks

David Dean
Information Systems
*bcbstauthorized*




-

Please see the following link for the BlueCross BlueShield of Tennessee E-mail 
disclaimer:  http://www.bcbst.com/email_disclaimer.shtm


Updated paper available - Sharing and maintaining SLES 10 SP2 Linux under z/VM

2009-07-01 Thread Michael MacIsaac
Hello everyone,

I am please to announce an updated paper Sharing and maintaining SLES 10 
SP2 Linux under z/VM, and an associated tar file with scripts and 
configuration files. 

The paper is available on the Web at:
http://linuxvm.org/present/misc/ro-root-S10.pdf
The tar file is available at:
http://linuxvm.org/present/misc/ro-root-S10.tgz 

The other authors are Steve Womer, Rick Troth and Kyle Black. 

This is an update to the IBM Redpaper published in 2/08 with a similar 
title. The updates in this paper are as follow:
-) Based on z/VM 5.4 (previously 5.3)
-) Based on SLES 10 SP2 (previously SLES 10)
-) Linux scripts and z/VM REXX EXECs added/updated 
-) Linux script to create read-only system now named mnt2rogld.sh 
-) Disk space of each Linux system increased
-) /var/lib/rpm/ is bind-mounted read-only over read-write /var/ file 
system
-) More detailed section on maintaining Linux

There is a counterpart paper based on RHEL coming in hopefully about a 
month. Watch this space. 

Thanks to many people who made this possible - just to name a few: Brian 
France, Dom Depasquale, Carlos Ordonez, Brad Hinson, Mark Post, David 
Boyes, Ernie Horn, Steve Shultz and Hongjie Yang. 

We had hoped to also add a section on DCSSs and NSSs but ran out of time. 
Maybe it can still be added.

Enjoy!  Feedback is welcome.

Mike MacIsaac mike...@us.ibm.com   (845) 433-7061

Re: What speed are my channels actually running at?

2009-07-01 Thread Alan Altmark
On Wednesday, 07/01/2009 at 09:48 EDT, Vince Getgood 
vincent.getg...@xchanging.com wrote:

 I've just been making a Visio diagram of out I/O config on some old
 hardware (z800), which runs two z/OS guests under VM (5.4)
 
 I dicovered that, although the VM IOCP has channels to my DASD system as
 FC (FICON) the z/OS IOCP has them defined as CNC (ESCON).
 
 So what speed am I going to get on a z/OS I/O, ESCON or FICON?
 
 I'm assuming VM does something clever, like ignore what z/OS says?

FICON, since CP doesn't care what the guest thinks about the subchannel, 
and all FICON/ESCON-style I/O is virtual.

Alan Altmark
z/VM Development
IBM Endicott


AUTO: Edi Lopes Alves is out of the office. (returning 14/07/2009)

2009-07-01 Thread Edi Lopes Alves


I am out of the office until 14/07/2009.

I will be out of the office during this period. I'll try to check my
e-mails time to time. If you need VMBASE assistance sooner, please send an
e-mail to mfzvm...@br.ibm.com (our VM Dispatcher).


Note: This is an automated response to your message  PAV and minidisks...
sent on 30/6/09 15:52:47.

This is the only notification you will receive while this person is away.

Re: CP Query wildcards

2009-07-01 Thread Richard Troth
By the way ... Unix cheats.
The shell expands all wildcards, which I have always said is a mistake
because it presumes on the context.  The shell can only expand
wildcards that are filenames.  Not everything you might want to
wildcard is a file.  Wouldn't it be nice if you could  'ifconfig
eth*'?


It's just an observation, not a rant against Unix.
Actually, I LIKE Unix and wish we all made more use of OpenVM.


So ... to make 'q dasd' work the way David expresses, that function
would need to call some kind of globbing subfunction.  Same thing for
'ifconfig' in Linux and Unix.  We need normalized namespace globbing,
something which can be used by commands which don't necessarily do
files, commands which are part of non-Unix stuff (like the CP Nuc).
This stuff has been implemented in C time and again.  Too bad CP
doesn't have a C runtime instantiated.  Oh ... wait ... It does!   :-)


And now back to your regularly scheduled list traffic.


-- R;   





On Wed, Jul 1, 2009 at 11:58, Dean, David (I/S)david_d...@bcbst.com wrote:
 Why won’t my wildcard work?





 q dasd l53701

 DASD C018 CP SYSTEM L53701   1

 DASD C0CE CP SYSTEM L53701   1

 DASD C0CF CP SYSTEM L53701   1



 CP

 q dasd l53*

 DASD L53* was not found.





 Thanks



 David Dean

 Information Systems

 *bcbstauthorized*



 -
 Please see the following link for the BlueCross BlueShield of Tennessee
 E-mail disclaimer:  http://www.bcbst.com/email_disclaimer.shtm



Re: CP Query wildcards

2009-07-01 Thread Hughes, Jim
The VOLUME operand doesn't support wildcards.

 

 

 



Jim Hughes

603-271-5586

It is fun to do the impossible.



From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On
Behalf Of Dean, David (I/S)
Sent: Wednesday, July 01, 2009 11:59 AM
To: IBMVM@LISTSERV.UARK.EDU
Subject: CP Query wildcards

 

Why won't my wildcard work?

 

 

q dasd l53701

DASD C018 CP SYSTEM L53701   1

DASD C0CE CP SYSTEM L53701   1

DASD C0CF CP SYSTEM L53701   1

 

CP

q dasd l53*

DASD L53* was not found.

 

 

Thanks

 

David Dean

Information Systems

*bcbstauthorized*

 

 
-
Please see the following link for the BlueCross BlueShield of Tennessee
E-mail disclaimer:  http://www.bcbst.com/email_disclaimer.shtm


Network Problem?

2009-07-01 Thread Schuh, Richard
At 9:57 local time, I sent a reply to something on the list. I just received, 
at 13:50, a notice that said Delivery delayed for the note. Is anybody else 
getting this kind of response? Assuming that this note reaches its destination, 
which may be a bad assumption.


Regards,
Richard Schuh





Re: CP Query wildcards

2009-07-01 Thread Mike Walter
I sent an offline reply to David with the following, but it seems the 
needs may be wider.  It has the pre-req of the CMS Pipelines Runtime 
Library (Pipes RTL, available at:   http://vm.marist.edu/~pipeline/ 

Mike Walter
Hewitt Associates
Any opinions expressed herein are mine alone and do not necessarily 
represent the opinions or policies of Hewitt Associates.



/* Prolog; See Epilog for additional information 
 * Exec Name - QDASDEXEC*
 * Unit Support  - Information Systems  *
 * Status- Version 2, Release 1.0   *
 /

   address 'COMMAND'
   parse source xos xct xfn xft xfm xcmd xenvir .
   parse upper arg parms 1 operands '(' options ')' parmrest

   parse upper arg operands '(' options ')' .
   If operands='?' then Signal Explain

   parse var operands op1 .
   If op1='' then operands='*'  /* Default to 'all' volumes */

   ?file=wordpos('FILE',options)0
   ?path=wordpos('PATH',options)0 | ,
 wordpos('PATHS',options)0
   ?count=   wordpos('COUNT',options)0
   ?offline= wordpos('OFFLINE',options)0

   cmd='CP QUERY DASD ALL'
   If length(op1)1  op1'*' then
 'PIPE (END ? NAME QDASD1)' ,
'|' cmd ,
'| SPLIT AT /,/' ,
'| STRIP BOTH' ,
'| nm: WILDCARD ANYCASE 21.6 /'op1'/' , /*Volser pattern*/
'| fany: FANINANY' ,
'| STEM dasd.' ,
'? nm:' ,
  '| NLOCATE 11.6 / /' ,  /* DASD 0Cuu CP SYSTEM */
  '| WILDCARD ANYCASE 11.6 /'op1'/' , /* DASD ccuu volser*/
  '| fany:'
   Else
 'PIPE (NAME QDASD2)' ,
'|' cmd ,
'| SPLIT AT /,/' ,
'| STEM dasd.'
   If rc0 then say xfn';' cmd', rc='rc


BuildALLstem:  /* All DASD, one address per stem entry */

   ax=0
   ?rtnoffline=0/* Return to offline state? */
   Do dx=1 to dasd.0
  parse var dasd.dx begin ',' remains   0   dev rdev w3 .
  If w3='OFFLINE'  ?offline  , /* Include offline DASD, too   */
 \?rtnoffline then   /* Don't VARY ON or loop again */
 Do  /* Bring online long enough to report on it */
   ?rtnoffline=1
  'PIPE CP VARY ON' rdev
   Call WaitForOnline 10
  'PIPE CP QUERY' rdev ,
 '| VAR updt'
   dasd.dx=updt
   dx=dx-1/* Back up to retry this rdev */
   Iterate dx /* And do so...   */
 End
  If wordpos(w3,'OFFLINE FREE CP')=0 then
 begin = dev rdev '^ mounted' w3||'   .'

 'PIPE (NAME GetRdevCyls)' ,
'| CP QUERY DASD DETAILS' rdev ,
'| TAKE 1' ,
'| SPECS WORD -1;-1 1' , /* Cyls = last word */
'| VAR rdevcyls'
  begin=left(strip(begin,'B'),35) right(strip(rdevcyls,'B'),6)
  ax=ax+1
  If ?path then
 Do
  'PIPE CP QUERY PATHS' rdev ,
 '| DROP LAST 1' ,
 '| TAKE LAST 1' ,
 '| SPECS 30-* 1' ,  /* Keep online/offline */
 '| VAR status'
   begin = left(strip(begin),50) status
 End
  Else begin=strip(begin,l)
  all.ax=begin

  If remains='' then
 Do
   If ?rtnoffline then
  Do
   'PIPE CP VARY OFF' rdev
?rtnoffline=0
  End
   Iterate
 End

  Do until remains=''
 parse var remains begin ',' remains   0   dev rdev w3 ',' .
 If wordpos(w3,'OFFLINE FREE CP')=0 then
begin = dev rdev '^ mounted' w3
 ax=ax+1
 If ?path then
Do
 'PIPE CP QUERY PATHS' rdev ,
'| DROP LAST 1' ,
'| TAKE LAST 1' ,
'| SPECS 30-* 1' ,  /* Keep online/offline */
'| VAR status'
  begin = left(strip(begin),41) status
   End
 Else begin=strip(begin,l)
 all.ax=begin
  End

  If ?rtnoffline then
 Do
  'PIPE CP VARY OFF' rdev
   ?rtnoffline=0
 End
   End dx
   all.0=ax

PotentialSort:
   If find(options,'SORT')0 | find(options,'BYVOLSER')0 then
 'PIPE STEM all.' ,
'| SORT 21.6 A' ,
'| STEM all.'
   Else
 'PIPE STEM all.' ,
'| REXX HEXSORT W2' ,
'| STEM all.'


ProcessStem:
   If ?file then
  'PIPE STEM all.' ,
  '| APPEND STRLITERAL /* /' ,
  '| APPEND STRLITERAL /* Prepared' date('S') 'at' time() ,
   'by command:' xfn parms'/' ,
  '|  QDASD FILE A'
   Else
 Do
  'PIPE STEM all. | CONSOLE'
   If ?count then say 'Total matching volumes:' all.0
 End

   Call Exit 0

/* *** */
/* *** S U B R O U T I N E S * */

Re: CP Query wildcards

2009-07-01 Thread Adam Thornton

On Jul 1, 2009, at 2:33 PM, Richard Troth wrote:


By the way ... Unix cheats.
The shell expands all wildcards, which I have always said is a mistake
because it presumes on the context.  The shell can only expand
wildcards that are filenames.  Not everything you might want to
wildcard is a file.  Wouldn't it be nice if you could  'ifconfig
eth*'?


Wouldn't it be nice if Unix worked like Unix was supposed to work, and  
everything *WERE* a file?


Yeah, yeah, I know, Plan 9 is right over there if I want it.

Adam


Re: Network Problem?

2009-07-01 Thread Wakser, David
No, no such problems here.



From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On
Behalf Of Schuh, Richard
Sent: Wednesday, July 01, 2009 4:55 PM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Network Problem?


At 9:57 local time, I sent a reply to something on the list. I just
received, at 13:50, a notice that said Delivery delayed for the note.
Is anybody else getting this kind of response? Assuming that this note
reaches its destination, which may be a bad assumption.
 
Regards, 
Richard Schuh 
 
 
 


Confidentiality Note: This e-mail, including any attachment to it, may contain 
material that is confidential, proprietary, privileged and/or Protected Health 
Information, within the meaning of the regulations under the Health Insurance 
Portability  Accountability Act as amended.  If it is not clear that you are 
the intended recipient, you are hereby notified that you have received this 
transmittal in error, and any review, dissemination, distribution or copying of 
this e-mail, including any attachment to it, is strictly prohibited. If you 
have received this e-mail in error, please immediately return it to the sender 
and delete it from your system. Thank you.


Re: CP Query wildcards

2009-07-01 Thread Brian Nielsen
Try this QDASD EXEC:

/* Query DASD by pattern */

arg dasd_info

'PIPE (ENDCHAR ?)',
   'cp q dasd all',
   ' | SPLIT STR /, /',
   ' | l: LOCATE W3 /CP/',
   ' | SPECS W2 1 W5 NW / / N',
   ' | f: FANINANY',
   ' | LOCATE /'dasd_info'/',
   ' |  qdasd output a',
   '?',
   'l:',
   ' | SPECS W2 1 W3 NW / / N',
   ' | f:'

'X qdasd output a'



Here are some sample calls, surrounded by quotes so extra blanks are 
obvious:

'QDASD RES '  -- will show volids that end in RES
'QDASD  VM'   -- will show volids that begin with VM
'QDASD PG'-- will show volids containing PG
'QDASD 54'-- will show volids or addresses containing 54

'QDASD FF'-- same as above for FF, but also shows OFFLIN
E

Brian Nielsen

On Wed, 1 Jul 2009 12:39:05 -0400, Dean, David (I/S) 
david_d...@bcbst.com wrote:

Can I have it?

 

David Dean

Information Systems

*bcbstauthorized*



From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On
Behalf Of Wakser, David
Sent: Wednesday, July 01, 2009 12:14 PM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: CP Query wildcards

 

Because the command syntax requires a DASD pack name. I once wrote an
EXEC to perform what you are attempting to do.

 

David Wakser

 



From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On
Behalf Of Dean, David (I/S)
Sent: Wednesday, July 01, 2009 11:59 AM
To: IBMVM@LISTSERV.UARK.EDU
Subject: CP Query wildcards

Why won't my wildcard work?

 

 

q dasd l53701

DASD C018 CP SYSTEM L53701   1

DASD C0CE CP SYSTEM L53701   1

DASD C0CF CP SYSTEM L53701   1

 

CP

q dasd l53*

DASD L53* was not found.

 

 

Thanks

 

David Dean

Information Systems

*bcbstauthorized*

 

-


Re: CP Query wildcards

2009-07-01 Thread Schuh, Richard
What about devices attached to users?

Regards, 
Richard Schuh 

 

 -Original Message-
 From: The IBM z/VM Operating System 
 [mailto:ib...@listserv.uark.edu] On Behalf Of Brian Nielsen
 Sent: Wednesday, July 01, 2009 2:42 PM
 To: IBMVM@LISTSERV.UARK.EDU
 Subject: Re: CP Query wildcards
 
 Try this QDASD EXEC:
 
 /* Query DASD by pattern */
 
 arg dasd_info
 
 'PIPE (ENDCHAR ?)',
'cp q dasd all',
' | SPLIT STR /, /',
' | l: LOCATE W3 /CP/',
' | SPECS W2 1 W5 NW / / N',
' | f: FANINANY',
' | LOCATE /'dasd_info'/',
' |  qdasd output a',
'?',
'l:',
' | SPECS W2 1 W3 NW / / N',
' | f:'
 
 'X qdasd output a'
 
 
 
 Here are some sample calls, surrounded by quotes so extra blanks are
 obvious:
 
 'QDASD RES '  -- will show volids that end in RES
 'QDASD  VM'   -- will show volids that begin with VM
 'QDASD PG'-- will show volids containing PG
 'QDASD 54'-- will show volids or addresses 
 containing 54=
 
 'QDASD FF'-- same as above for FF, but also 
 shows OFFLIN=
 E
 
 Brian Nielsen
 
 On Wed, 1 Jul 2009 12:39:05 -0400, Dean, David (I/S) 
 david_d...@bcbst.com wrote:
 
 Can I have it?
 
  
 
 David Dean
 
 Information Systems
 
 *bcbstauthorized*
 
 
 
 From: The IBM z/VM Operating System 
 [mailto:ib...@listserv.uark.edu] On 
 Behalf Of Wakser, David
 Sent: Wednesday, July 01, 2009 12:14 PM
 To: IBMVM@LISTSERV.UARK.EDU
 Subject: Re: CP Query wildcards
 
  
 
 Because the command syntax requires a DASD pack name. I once 
 wrote an 
 EXEC to perform what you are attempting to do.
 
  
 
 David Wakser
 
  
 
 
 
 From: The IBM z/VM Operating System 
 [mailto:ib...@listserv.uark.edu] On 
 Behalf Of Dean, David (I/S)
 Sent: Wednesday, July 01, 2009 11:59 AM
 To: IBMVM@LISTSERV.UARK.EDU
 Subject: CP Query wildcards
 
 Why won't my wildcard work?
 
  
 
  
 
 q dasd l53701
 
 DASD C018 CP SYSTEM L53701   1
 
 DASD C0CE CP SYSTEM L53701   1
 
 DASD C0CF CP SYSTEM L53701   1
 
  
 
 CP
 
 q dasd l53*
 
 DASD L53* was not found.
 
  
 
  
 
 Thanks
 
  
 
 David Dean
 
 Information Systems
 
 *bcbstauthorized*
 
  
 
 -
 

Re: CP Query wildcards

2009-07-01 Thread Rob van der Heij
or   PIPE cp q dasd | zone w5 wildcard /VMA*/ | cons;-)


Re: CP Query wildcards

2009-07-01 Thread Dean, David (I/S)
Wow, thanks to all for the help!!

David Dean
Information Systems
*bcbstauthorized*

-Original Message-
From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On
Behalf Of Richard Troth
Sent: Wednesday, July 01, 2009 3:33 PM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: CP Query wildcards

By the way ... Unix cheats.
The shell expands all wildcards, which I have always said is a mistake
because it presumes on the context.  The shell can only expand
wildcards that are filenames.  Not everything you might want to
wildcard is a file.  Wouldn't it be nice if you could  'ifconfig
eth*'?


It's just an observation, not a rant against Unix.
Actually, I LIKE Unix and wish we all made more use of OpenVM.


So ... to make 'q dasd' work the way David expresses, that function
would need to call some kind of globbing subfunction.  Same thing for
'ifconfig' in Linux and Unix.  We need normalized namespace globbing,
something which can be used by commands which don't necessarily do
files, commands which are part of non-Unix stuff (like the CP Nuc).
This stuff has been implemented in C time and again.  Too bad CP
doesn't have a C runtime instantiated.  Oh ... wait ... It does!   :-)


And now back to your regularly scheduled list traffic.


-- R;   





On Wed, Jul 1, 2009 at 11:58, Dean, David (I/S)david_d...@bcbst.com
wrote:
 Why won't my wildcard work?





 q dasd l53701

 DASD C018 CP SYSTEM L53701   1

 DASD C0CE CP SYSTEM L53701   1

 DASD C0CF CP SYSTEM L53701   1



 CP

 q dasd l53*

 DASD L53* was not found.





 Thanks



 David Dean

 Information Systems

 *bcbstauthorized*



 -
 Please see the following link for the BlueCross BlueShield of
Tennessee
 E-mail disclaimer:  http://www.bcbst.com/email_disclaimer.shtm


-
Please see the following link for the BlueCross BlueShield of Tennessee E-mail 
disclaimer:  http://www.bcbst.com/email_disclaimer.shtm


Re: Network Problem?

2009-07-01 Thread Stephen Frazier

Schuh, Richard wrote:
At 9:57 local time, I sent a reply to something on the list. I just 
received, at 13:50, a notice that said Delivery delayed for the 
note. Is anybody else getting this kind of response? Assuming that 
this note reaches its destination, which may be a bad assumption.
 
Regards,

Richard Schuh
 
 
 
I noticed some messages arriving out of order today. Replies that came 
before the message they replied to. The list must be in some kind of a 
time warp today.


--
Stephen Frazier
Information Technology Unit
Oklahoma Department of Corrections
3400 Martin Luther King
Oklahoma City, Ok, 73111-4298
Tel.: (405) 425-2549
Fax: (405) 425-2554
Pager: (405) 690-1828
email:  stevef%doc.state.ok.us


Re: Network Problem?

2009-07-01 Thread Schuh, Richard
A time warp it might be. The fact that it took nearly 4 hours to get a message 
saying that delivery of a message was delayed seems sort of ironic.

Regards, 
Richard Schuh 

 

 -Original Message-
 From: The IBM z/VM Operating System 
 [mailto:ib...@listserv.uark.edu] On Behalf Of Stephen Frazier
 Sent: Wednesday, July 01, 2009 3:02 PM
 To: IBMVM@LISTSERV.UARK.EDU
 Subject: Re: Network Problem?
 
 Schuh, Richard wrote:
  At 9:57 local time, I sent a reply to something on the list. I just 
  received, at 13:50, a notice that said Delivery delayed for the 
  note. Is anybody else getting this kind of response? Assuming that 
  this note reaches its destination, which may be a bad assumption.
   
  Regards,
  Richard Schuh
   
   
   
 I noticed some messages arriving out of order today. Replies 
 that came before the message they replied to. The list must 
 be in some kind of a time warp today.
 
 --
 Stephen Frazier
 Information Technology Unit
 Oklahoma Department of Corrections
 3400 Martin Luther King
 Oklahoma City, Ok, 73111-4298
 Tel.: (405) 425-2549
 Fax: (405) 425-2554
 Pager: (405) 690-1828
 email:  stevef%doc.state.ok.us
 

Re: CP Query wildcards

2009-07-01 Thread Patrick Spinler
-BEGIN PGP SIGNED MESSAGE-
Hash: SHA1

Adam Thornton wrote:
 Wouldn't it be nice if Unix worked like Unix was supposed to work, and
 everything *WERE* a file?

Well, for what it's worth, and by fits and starts and with no real plan,
Linux is actually working it's way slowly in that general direction.  A
few examples which I couldn't do 10 years ago:

$ ls /sys/class/net/
eth0  eth1  lo  sit0

$ ls /sys/module/
autofs4   dm_zero  ip6t_REJECT  md_mod  pci_hotplug
psmouse usbhid
(...snippage...)

And then there's the interesting stuff one can do with FUSE
(http://sourceforge.net/apps/mediawiki/fuse/index.php?title=FileSystems),
like like the database filesystems
(http://sourceforge.net/apps/mediawiki/fuse/index.php?title=DatabaseFileSystems),
httpfs (http://httpfs.sourceforge.net/) or bloggerfs
(http://mundau.blogspot.com/2006/12/bloggerfs-last-night-i-was-playing.html)
.

I can only hope the trend continues.  I'd much prefer that some overall
plan or thought was given toward this, though.

- -- Pat



-BEGIN PGP SIGNATURE-
Version: GnuPG v1.4.9 (Darwin)
Comment: Using GnuPG with Mozilla - http://enigmail.mozdev.org

iEYEARECAAYFAkpL+QYACgkQNObCqA8uBsxiegCdEDj2T/uoVq7kPVSytN1tnxAl
KpcAn0MAW3gFvbqbw63oOIeKbdKG9jKw
=wuHg
-END PGP SIGNATURE-


Re: Network Problem?

2009-07-01 Thread McBride, Catherine
Just received a similar notice here, on a reply to a different mailing list.
Also hosted at UARK.EDU.



-Original Message-
From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu]on Behalf 
Of Schuh, Richard
Sent: Wednesday, July 01, 2009 3:55 PM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Network Problem?



At 9:57 local time, I sent a reply to something on the list. I just received, 
at 13:50, a notice that said Delivery delayed for the note. Is anybody else 
getting this kind of response? Assuming that this note reaches its destination, 
which may be a bad assumption.

Regards,
Richard Schuh






Re: CP Query wildcards

2009-07-01 Thread Wakser, David
David:

OK, here it is; it's not pretty (I wrote the code as one of my first 
PIPES experiments many years ago), but it does exactly what you want it to do. 
The syntax is: QDA DA *  where  is from 1 to 6 characters of the 
volumes you are looking for (generic) followed by a *.

The reason that I used files instead of stems is because, way back 
then, many users didn't have enough CMS storage to handle large stems in Rexx.

Try it out, do with it what you desire, and enjoy. BTW, make certain 
the vertical bars  the logical not sign translate correctly when you cut  
paste.

David Wakser


/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
/* */
/* This EXEC was designed to replace the normal QUERY  */
/* NAMES function to suppress the display of the VM*/
/* MAGIC dummy entries shown. It looks for ¢ as the  */
/* first character and suppresses the display of that  */
/* name; all other invocations of the QUERY command are*/
/* passed right on to CP/CMS.  */
/* */
/*DMW   08/03/94   */
/* */
/* Modified May 3, 1998 to process a generic Q DA*/
/*  command. Format QDA DA SYS*  */
/*  will show all DASD beginning   */
/*  with SYS - even if FREE*/
/*DMW   08/03/94   */
/* */
/* Modified July 1 2009 to process DASD names more proper- */
/*  ly and to remove the Q NAMES part  */
/*  since is was only valuable */
/*  when VM Magic was used.dmw */
/* */
/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
a1  = 
a2  = 
a3  = 
a4  = 
a5  = 
a6  = 
a7  = 
a8  = 
a9  = 
a10 = 
a11 = 
arg a1 a2 a3 a4 a5 a6 a7 a8 a9 a10 a11 .
if a1 ¬= DA then
do
   QUERY a1 a2 a3 a4 a5 a6 a7 a8 a9 a10 a11
   exit
end
if a1 = DA then
   do
  found = 0
  found = pos(*,a2)
  if found ¬= 0 then signal LIST_DISKS
/* Otherwise pass command directly to QUERY  */
  QUERY a1 a2 a3 a4 a5 a6 a7 a8 a9 a10 a11
  exit
   end
LIST_DISKS:

pipe CP Q DA,
   | specs 21.6 1,
   |  AA1 AA1 A

disk_packs = translate(a2,' ','*')
disk_packs = strip(disk_packs,'B',' ')
search_size = length(disk_packs)
start_col = 
if search_size = 1 then start_col = 1
if substr(a2,1,1) ¬= * then start_col = 1- || search_size
pipe  AA1 AA1 A,
   | locate  || start_col ||  / || disk_packs || / | specs 1-6 |  AA2 AA2 
A

pipe CP Q DA FREE |  AA3 AA3 A
pipe  AA3 AA3 A,
   | specs 11.6 1 write 31.6 1 write 51.6 1 write 71.6 1 write |  AA4 AA4 A

pipe  AA4 AA4 A,
   | locate  || start_col ||   / || disk_packs || /,
   |  AA2 AA2 A

ERASE AA1 AA1 A
ERASE AA3 AA3 A
ERASE AA4 AA4 A

pipe  AA2 AA2 A | specs 1.6 | stem xx.
CLRSCRN
if xx.0 = XX.0 | xx.0 =  then
   do
  say  
  say   No DASD with characters  disk_packs exists.
  say  
  exit
   end

say  
say  A total of xx.0 disks will be displayed.
say  
do i = 1 to xx.0
  pipe CP Q DA xx.i | CONSOLE
end
say  
say A total of xx.0 disks were displayed.
say  
ERASE AA2 AA2 A
Exit


**


-Original Message-
From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On Behalf 
Of Dean, David (I/S)
Sent: Wednesday, July 01, 2009 5:07 PM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: CP Query wildcards

Wow, thanks to all for the help!!

David Dean
Information Systems
*bcbstauthorized*

-Original Message-
From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On Behalf 
Of Richard Troth
Sent: Wednesday, July 01, 2009 3:33 PM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: CP Query wildcards

By the way ... Unix cheats.
The shell expands all wildcards, which I have always said is a mistake because 
it presumes on the context.  The shell can only expand wildcards that are 
filenames.  Not everything you might want to wildcard is a file.  Wouldn't it 
be nice if you could  'ifconfig eth*'?


It's just an observation, not a rant against Unix.
Actually, I LIKE Unix and wish we all made more use of OpenVM.


So ... to make 'q dasd' work the way David expresses, that function would need 
to call some kind of globbing subfunction.  Same thing for 'ifconfig' in Linux 
and Unix.  We need normalized namespace globbing, something which can be used 
by commands which don't necessarily do files, commands which are part of 
non-Unix stuff (like the CP Nuc).
This 

Re: CP Query wildcards

2009-07-01 Thread Alan Ackerman
On Wed, 1 Jul 2009 16:09:46 -0500, Adam Thornton athorn...@sinenomine.ne
t wrote:

On Jul 1, 2009, at 2:33 PM, Richard Troth wrote:

 By the way ... Unix cheats.
 The shell expands all wildcards, which I have always said is a mistake

 because it presumes on the context.  The shell can only expand
 wildcards that are filenames.  Not everything you might want to
 wildcard is a file.  Wouldn't it be nice if you could  'ifconfig
 eth*'?

Wouldn't it be nice if Unix worked like Unix was supposed to work, and
everything *WERE* a file?

Yeah, yeah, I know, Plan 9 is right over there if I want it.

Adam

=
==
==

I think CP doesn't do wildcards because we didn't ask for it. We didn't a
sk for it because we could 
throw together a QD EXEC to do what we needed, a lot quicker than wa
iting for IBM to deliver a 
new release or two. Many CP commands do allow a range of (hex) device num
bers dev1-dev2.

I remember Unix globbing having problems if there were too many files tha
t met the pattern. Is 
there a restriction on the length of a command in Posix? 

Since many people have naming standards for volsers, support for wildcard
s on volsers in CP 
would be useful. Someone want to write a requirement?

Alan Ackerman
Alan (dot) Ackerman (at) Bank of America (dot) com 


Re: CP Query wildcards

2009-07-01 Thread David Boyes
 Wouldn't it be nice if you could  'ifconfig
 eth*'?

You can in Plan 9. 8-)


Re: CP Query wildcards

2009-07-01 Thread Scott Rohling
re: CP requirement to accept wildcards for query commands

Playing devil's advocate:

Since the guest OS (CMS, Linux, whatever)  can readily solve the requirement
(especially when you guys start talking about shells, etc), why put it on
the hypervisor?

That's why IBM wrote CMS..  then REXX..  then PIPE ..

Playing devil's nemesis:

Hmmm...   look at USER_VOLUME_INCLUDE in SYSTEM CONFIG.  is IBM gonna
support wild cards for volume labels or not?  Consistency, consistency..

I guess I didn't really help much..  hey - I'm a Gemini - I'm divided by
nature..

Scott

On Wed, Jul 1, 2009 at 7:36 PM, Alan Ackerman
alan.acker...@earthlink.netwrote:

 On Wed, 1 Jul 2009 16:09:46 -0500, Adam Thornton athorn...@sinenomine.net
 wrote:

 On Jul 1, 2009, at 2:33 PM, Richard Troth wrote:
 
  By the way ... Unix cheats.
  The shell expands all wildcards, which I have always said is a mistake
  because it presumes on the context.  The shell can only expand
  wildcards that are filenames.  Not everything you might want to
  wildcard is a file.  Wouldn't it be nice if you could  'ifconfig
  eth*'?
 
 Wouldn't it be nice if Unix worked like Unix was supposed to work, and
 everything *WERE* a file?
 
 Yeah, yeah, I know, Plan 9 is right over there if I want it.
 
 Adam
 ===
 ==

 I think CP doesn't do wildcards because we didn't ask for it. We didn't ask
 for it because we could
 throw together a QD EXEC to do what we needed, a lot quicker than waiting
 for IBM to deliver a
 new release or two. Many CP commands do allow a range of (hex) device
 numbers dev1-dev2.

 I remember Unix globbing having problems if there were too many files that
 met the pattern. Is
 there a restriction on the length of a command in Posix?

 Since many people have naming standards for volsers, support for wildcards
 on volsers in CP
 would be useful. Someone want to write a requirement?

 Alan Ackerman
 Alan (dot) Ackerman (at) Bank of America (dot) com