Re: VMLINK behavior

2011-04-19 Thread Doug Breneman

Hi Alain,
Please XEDIT the VMLINK SEXEC S that you have and change:

minidisklist = ''

to

minidisklist = 'S'

and then file it on your A-disk as VMLINK EXEC. Then repeat the failing
scenario. This might patch the problem for you. This is not an official fix
from IBM. I am just trying to help get you past this problem. I agree with
Bruce that this might be a bug and will need to go through the normal
problem reporting process.
pdb (Doug Breneman)
z/VM System Test   IBM   Endicott, NY



From:   Alain Benvéniste 
To: IBMVM@LISTSERV.UARK.EDU
Date:   04/19/2011 04:50 PM
Subject:Re: VMLINK behavior
Sent by:The IBM z/VM Operating System 



Bruce

This ptf was for the case where the 190 was detached by vmlink... In my
case
i still have it...

Alain


Le 19/04/11 22:40, « Bruce Hayden »  a écrit :

> VMLINK shouldn't try to access a disk at filemode S, since the access
> command doesn't allow you to access anything at filemode S.  You may
> have found a bug.  What level and service level of z/VM are you
> running?  Maybe you need APAR VM64870 "VMLINK INCORRECTLY DETACHES THE
> SYSTEM DISK"?  The description doesn't sound correct, but the text
> talks about special handling for the S disk.
>
> On Tue, Apr 19, 2011 at 4:08 PM, Alain Benveniste 
> wrote:
>> I executed this exec :
>> /**/
>> "VMLINK 5VMDIR40 0491"
>> "VMLINK 5VMDIR40 0492"
>> "VMLINK 5VMDIR40 011F"
>> "VMLINK 5VMDIR40 041F"
>> "VMLINK DIRMAINT 01AA"
>> "VMLINK DIRMAINT 01FA"
>> "VMLINK DIRMAINT 02AA"
>> "VMLINK DIRMAINT 0155"
>> "VMLINK DIRMAINT 01DF"
>>
>>
>> DMSACC048E Invalid filemode S
>> Ready(02024); T=0.01/0.01 16:05:35
>>
>> I received DMSACC048E Invalid filemode S for the VMLINK DIRMAINT 01DF
>>
>> q disk
>> LABEL  VDEV M  STAT   CYL TYPE BLKSZ   FILES  BLKS USED-(%) BLKS LEFT
BLK
>> TOTAL
>> MNT191 191  A   R/W   175 3390 4096      121       1459-05      30041

>>  31500
>> MNT190 190  S   R/O   100 3390 4096      704      15293-85       2707

>>  18000
>> DIR155 127  T   R/O     9 3390 4096       10         23-01       1597

>> 1620
>> DIR1AA 126  U   R/O     9 3390 4096        6         13-01       1607

>> 1620
>> DRM41F 125  V   R/O     8 3390 4096       50        642-45        798

>> 1440
>> DIR11F 124  W   R/O    15 3390 4096       49        629-23       2071

>> 2700
>> DRM492 121  X   R/O    15 3390 4096      269       1490-55       1210

>> 2700
>> MNT19E 19E  Y/S R/O   250 3390 4096     1779      38956-87       6044

>>  45000
>> DRM491 120  Z   R/O    15 3390 4096      259       1410-52       1290

>> 2700
>> Ready; T=0.01/0.01 16:05:41
>>
>> I used the version of vmlink created in september 2010
>>
>> Alain Benveniste
>>
>
>


Re: Running REXX compiled in z/OS in CMS

2011-04-13 Thread Doug Breneman

Mark,
Many VM releases ago, VM Development wanted to have all customers benefit
from performance improvements for some of the items that were written in
REXX. You know about these parts like VMLINK, NOTE, SENDFILE, FILELIST and
many others. However, we could not assume that all customers would install
the REXX Alternate Library and customers would want to use these parts even
before they got around to installing the REXX Alternate Library. So VM
Development created a DMSRTPRC which is a library which is sufficient for
the compiled REXX parts that are shipped with the VM product. It is not to
be used by our customers for their own use because it is not supported for
general use. There is no guarantee that your compiled part will run if you
edit it to use DMSRTPRC. VM Development will not service DMSRTPRC if it
does not work with your compiled part. We will service it if it fails with
one of the parts that are compiled and shipped as part of VM.
pdb (Doug Breneman)
z/VM System Test   IBM   Endicott, NY



From:   "Gillis, Mark" 
To: IBMVM@LISTSERV.UARK.EDU
Date:   04/13/2011 04:26 PM
Subject:Re: Running REXX compiled in z/OS in CMS
Sent by:The IBM z/VM Operating System 



Thanks, Tracy. It sounds like we'll just need to require our customers
to install the alternate library as a pre-req to our product. I'm a bit
confused by all this though - IBM provide compiled REXX that has
DMSRTPRC in the header and this doesn't seem to require the alternate
library. If I edit a compiled REXX program and change EAGRTPRC to
DMSRTPRC it works fine. If either works, why do we have an alternate
library?

Mark Gillis.

-Original Message-
From: The IBM z/VM Operating System [mailto:IBMVM@LISTSERV.UARK.EDU] On
Behalf Of Tracy Dean
Sent: Wednesday, 13 April 2011 7:13 PM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: Running REXX compiled in z/OS in CMS

On Wed, 13 Apr 2011 18:37:51 +1000, Gillis, Mark 
wro=
te:

>Hi,
>
>Here's a question that's half way between z/OS and CMS:
>
>I would like to compile some REXX in z/OS in such a way that it can be
>run in CMS by people who don't have the REXX compiler. From reading the
>manual, I thought that just specifying options of ALTLIB and SLINE
would=

>be sufficient, but this doesn't seem to be the case. I can make it work
>by XEDITing the compiled exec and changing the processor name in the
>header from EAGRTPRC to DMSRTPRC, but that surely isn't what IBM intend
>us to do. Does anyone know the legitimate way of doing this?
>
>

Mark,
I can't comment on whether there are any other issues with taking REXX
co=
de
written and compiled on z/OS and running it on z/VM, but I can tell you
t=
hat
in order to run code in CMS that has EAGRTPRC in the header, you need to
install the free REXX Alternate Library on z/VM.  You can get it here:
http://www.ibm.com/software/awdtools/rexx/rexxzseries/altlibrary.html

Just click on "Alternate Library for REXX on z/VM" in the 2nd paragraph.

Tracy Dean
IBM


Re: APARs and PTFs for the z196

2010-11-20 Thread Doug Breneman
The Migration Guide is also your friend:

[V5.2] High Level Assembler No Longer Required for Stand-Alone Dump Utility
The IBM High Level Assembler is no longer required to build the Stand-Alone
Dump Utility. This has resulted in incompatible changes to a number of
macros. Customers who have saved their HCPSDC ASSEMBLE source from previous
releases must recreate it on z/VM V5.2 when prompted by the HCPSADMP EXEC.

pdb (Doug Breneman)
z/VM System Test   IBM   Endicott, NY



From:   David Boyes 
To: IBMVM@LISTSERV.UARK.EDU
Date:   11/16/2010 08:31 AM
Subject:Re: APARs and PTFs for the z196
Sent by:The IBM z/VM Operating System 




 Secondly, you do not need HLASM to create/maintain the standalone dump
 program. HCPSADMP checks for HLASM, HASM, and ASSEMBLE (FASM). It can use
 any of them.



Really? That’s cool.  I’ve been continuing to order HLASM on systems that
don’t need it, then.


Any idea when that change went in?


Re: A how to ?...

2010-11-17 Thread Doug Breneman

Brian,
You might also want to run CPFMTXA against the volume and check its
allocation map to see if there is anything other than PERM space on it. You
already have good suggestions from others to read the data from the volume.
pdb (Doug Breneman)
z/VM System Test   IBM   Endicott, NY



From:   Brian France 
To: IBMVM@LISTSERV.UARK.EDU
Date:   11/17/2010 03:33 PM
Subject:A how to ?...
Sent by:The IBM z/VM Operating System 



Folks,
 Our storage folks have come across a dasd volume that apparently by
it's name was one of our VM volumes. Now, none of my 3 vm's have this
volume on line and I would like to just have a look see as to what was on
the volume. Is there a utility to do this? We have Vmdirect but I don't
believe by adding this volume into the pool a map is going to give me
anything since no users have it. IF this was z/OS, I would simply use ISPF
3.4 to list the contents of the volume and this is what I was wondering
about, it something like that existed in z/VM. Maybe this is something that
can't be done due to the nature of it all. Thanx in advance...
--

--

Brian W. France
Systems Administrator (Mainframe)
Pennsylvania State University
Administrative Information Services - Infrastructure/SYSARC
Rm 25 Shields Bldg., University Park, Pa. 16802
814-863-4739
b...@psu.edu

"To make an apple pie from scratch, you must first invent the universe."

Carl Sagan

Re: APARs and PTFs for the z196

2010-11-15 Thread Doug Breneman
Firstly, please note that the information that I provided is extracted from
the z/VM General Information manual. I cannot take credit for it. This is
important so that all customers can look at the General Information manual
for their level of z/VM to find the appropriate list. The list does change
periodically from release to release..

Secondly, you do not need HLASM to create/maintain the standalone dump
program. HCPSADMP checks for HLASM, HASM, and ASSEMBLE (FASM). It can use
any of them.
pdb (Doug Breneman)
z/VM System Test   IBM   Endicott, NY



From:   David Boyes 
To: IBMVM@LISTSERV.UARK.EDU
Date:   11/15/2010 10:28 AM
Subject:Re: APARs and PTFs for the z196
Sent by:The IBM z/VM Operating System 



One other thing Doug didn’t mention: creating/maintaining the
standalone-dump program.

Re: APARs and PTFs for the z196

2010-11-13 Thread Doug Breneman

In chapter 4 of the z/VM General Information Manual, there is a list of
tasks that requires the use of HLASM in z/VM:

High Level Assembler
Although not a prerequisite for z/VM, the IBM High Level Assembler, V1.6
(5696-234) or later, or an equivalent product, is required for several
tasks, such as:
v Creating a new DMSTRT for system languages (NLS)
v Creating image libraries for system printers (FCBs)
v Creating GCS application segments (CONTENTS macro)
v Accessing major CMS application interfaces (CMSCALL)
v Accessing most CP application interfaces (DIAGNOSE)
v Modifying the AVS tuning control module (AGWTUN)
v Using RAS tools (such as MDCHECK, FS2SFSER, AFTCHAIN, PRINTBLK, and
PRINTFST)
v Using the API for data compression
v Using the CMS Pipelines assembler macro interface
v Customizing Language Environment or compiling assembler routines used in
mixed-language user applications
v Creating applications that exploit the IEEE Floating Point hardware
facility
v Adding devices that cannot be sensed without using SET RDEVICE (that is,
by updating HCPRIO ASSEMBLE)
v Applying local modifications to modules written in assembler
v Servicing the CP Loader (HCPLDR)
v Assembling any CP modules
v Assembling exit routines for CP, DirMaint, or RSCS
v Reassembling CP replacement parts for the RACF Security Server for z/VM
v Migrating (converting) a file containing I/O Configuration Program (IOCP)
statements into an existing HCD I/O Definition File (IODF)

If you do not do any of these things or have plans to do any of them, then
you might not need to purchase HLASM or an equivalent product.
pdb (Doug Breneman)
z/VM System Test   IBM   Endicott, NY



From:   George Henke/NYLIC 
To: IBMVM@LISTSERV.UARK.EDU
Date:   11/12/2010 06:48 PM
Subject:Re: APARs and PTFs for the z196
Sent by:The IBM z/VM Operating System 




Thank you, Clovis, I was wondering why?

I do not know that and it did not leave me with a "warm and fuzzy" feeling.


But thank you for letting me know.

Now I will be able to sleep at night.





   
 gclo...@br.ibm.com
 Sent by: The IBM z/VM Operating System
   To
 ib...@listserv.ua
 RK.EDU
 11/12/2010 06:40 PMcc
   
   Subject
Please respond toRe: APARs and 
  The IBM z/VM Operating System  PTFs for the z196
  
   
   
   
   
   
   





Sorry, George.
My mistake.
HLASM isn't imbedded into z/VM. If needed, must be acquired separately.
__
Clovis
   
 From:George Henke/NYLIC 
   
 To:  IBMVM@LISTSERV.UARK.EDU  
   
 Date:12/11/2010 18:30 
   
 Subject: Re: APARs and PTFs for the z196  
   
   
 Sent by: The IBM z/VM Operating System   
   
   








ty, Clovis, but PK97799 is not an EREP APAR.

VM64807 (#3 below) is the Non-SES EREP APAR to which I believe you refer.

I was able to apply VM64807 following the instructions in the EREP PGMDIR
which were quite good.

PK97799 (#1 below), however,  is an HLASM SES APAR which I have been told
did not go on because I probably do not have HLASM on z/VM.

This screen shot from:
http://www-01.ibm.com/support/docview.wss?rs=1209&dc=DB540&q1=z196&uid=isg1_2817DEVICE_2

Re: Spool File Backup (SFB) BCHTIMER Files

2010-10-25 Thread Doug Breneman
Sorry Frank,
I meant PIPE AHELP SPEC without the final 'S'. This gives the SPEC
Reference Manual.
pdb (Doug Breneman)
z/VM System Test   IBM   Endicott, NY



From:   "Frank M. Ramaekers" 
To: IBMVM@LISTSERV.UARK.EDU
Date:   10/25/2010 03:28 PM
Subject:Re: Spool File Backup (SFB) BCHTIMER Files
Sent by:The IBM z/VM Operating System 



My “PIPE AHELP SPECS” doesn’t look much different than the “HELP PIPE
SPECS”.   I did find some examples in “PIPE AHELP SPECTUT”.





 
 Frank M. Ramaekers Jr. 
 

 




From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On
Behalf Of Doug Breneman
Sent: Monday, October 25, 2010 2:16 PM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: Spool File Backup (SFB) BCHTIMER Files



PIPE AHELP SPECS or check out SL26-0018 CMS/TSO Pipelines: Author's Edition
pdb (Doug Breneman)
z/VM System Test IBM Endicott, NY

"Frank M. Ramaekers" ---10/25/2010 03:06:27 PM---Where can I find the
reference material for this aspect of the SPECS stage?

From: "Frank M. Ramaekers" 
To: IBMVM@LISTSERV.UARK.EDU
Date: 10/25/2010 03:06 PM
Subject: Re: Spool File Backup (SFB) BCHTIMER Files
Sent by: The IBM z/VM Operating System 




Where can I find the reference material for this aspect of the SPECS
stage?

'| SPECS' , /* Just the size   */
 'PRINTONLY EOF' ,  /* Prt only total  */
 't: 77.4 .' ,  /* Just SIZE value */
 'n: 77.3 .' ,  /* Just nnn value  */
 'm: 80.1 .' ,  /* Just nnn value  */
 'IF m=="K" THEN' ,
 '   SET #0+=(n*1000)' ,/* Multiply nK * 1K*/
 'ELSEIF m=="M" THEN' ,
 '   SET #0+=(n*100)' , /* Multiple nK * 1M*/
 'ELSE' ,
 'SET #0+=t' ,  /* Add all numeric */
 'ENDIF' ,
 'EOF' ,/* Mark EOF*/
 'PRINT #0 1' , /* Print total */


Frank M. Ramaekers Jr.


-Original Message-
From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On
Behalf Of Mike Walter
Sent: Friday, October 22, 2010 3:38 PM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: Spool File Backup (SFB) BCHTIMER Files

Excellent point, Harry!  It had only been an example, but even examples
should be reliable.

I'm pretty sure the following should work, and be as reliable as the 4K
block total supplied by 'CP QUERY queue EXP'

Mike Walter
Aon Hewitt
The opinions expressed herein are mine alone, not my employer's.

/* Prolog; See Epilog for additional information 
* Exec Name - SPOOLBLK EXEC*
* Unit Support  -  *
* Status- Version 1, Release 1.2   *
/

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

  hi='1DE8'x   /* 3270 Hilite Char */
  lo='1D60'x   /* 3270 Default Char*/
  Signal ON Syntax
  Signal ON NoValue
/* Signal ON ERROR */
  If parms='?' then Signal Explain

  parse upper arg queue .

  If queue='' then queue='ALL'
  SumTotal=0

  If queue='' | queue='ALL' then
 Do
   Call SumQueue 'READER'
   Call SumQueue 'PRINTER'
   Call SumQueue 'PUNCH'
 End
  Else Call SumQueue queue

  say queue 'queue 4K SPOOL block total=' SumTotal
Call Exit rc


//
/*   Sub-Routines below this point  */
//

Exit:
  parse arg exitrc todo
  If todo='?' then say 'For more help, enter:' xfn '?'
  If verify(exitrc,'-0123456789')>0 then Exit 99
Exit exitrc


Error:
  etxt.1='+++ "ERROR:" error rtn entered in:' xfn xft xfm', rc='rc
  etxt.2='+++ from line:' sigl', which reads:'
  etxt.3='+++'sourceline(sigl)
  cmdline=strip(sourceline(sigl),'B')
  If symbol(value('CMDLINE'))='VAR'  /* e.g cmd

Re: Spool File Backup (SFB) BCHTIMER Files

2010-10-25 Thread Doug Breneman
Please accept my apology. I meant PIPE AHELP SPEC without the 'S' at the
end. It yields the Specs Reference Manual as mentioned by Mike.
pdb (Doug Breneman)
z/VM System Test   IBM   Endicott, NY



From:   "Frank M. Ramaekers" 
To: IBMVM@LISTSERV.UARK.EDU
Date:   10/25/2010 03:28 PM
Subject:Re: Spool File Backup (SFB) BCHTIMER Files
Sent by:The IBM z/VM Operating System 



My “PIPE AHELP SPECS” doesn’t look much different than the “HELP PIPE
SPECS”.   I did find some examples in “PIPE AHELP SPECTUT”.





 
 Frank M. Ramaekers Jr. 
 

 




From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On
Behalf Of Doug Breneman
Sent: Monday, October 25, 2010 2:16 PM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: Spool File Backup (SFB) BCHTIMER Files



PIPE AHELP SPECS or check out SL26-0018 CMS/TSO Pipelines: Author's Edition
pdb (Doug Breneman)
z/VM System Test IBM Endicott, NY

"Frank M. Ramaekers" ---10/25/2010 03:06:27 PM---Where can I find the
reference material for this aspect of the SPECS stage?

From: "Frank M. Ramaekers" 
To: IBMVM@LISTSERV.UARK.EDU
Date: 10/25/2010 03:06 PM
Subject: Re: Spool File Backup (SFB) BCHTIMER Files
Sent by: The IBM z/VM Operating System 




Where can I find the reference material for this aspect of the SPECS
stage?

'| SPECS' , /* Just the size   */
 'PRINTONLY EOF' ,  /* Prt only total  */
 't: 77.4 .' ,  /* Just SIZE value */
 'n: 77.3 .' ,  /* Just nnn value  */
 'm: 80.1 .' ,  /* Just nnn value  */
 'IF m=="K" THEN' ,
 '   SET #0+=(n*1000)' ,/* Multiply nK * 1K*/
 'ELSEIF m=="M" THEN' ,
 '   SET #0+=(n*100)' , /* Multiple nK * 1M*/
 'ELSE' ,
 'SET #0+=t' ,  /* Add all numeric */
 'ENDIF' ,
 'EOF' ,/* Mark EOF*/
 'PRINT #0 1' , /* Print total */


Frank M. Ramaekers Jr.


-Original Message-
From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On
Behalf Of Mike Walter
Sent: Friday, October 22, 2010 3:38 PM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: Spool File Backup (SFB) BCHTIMER Files

Excellent point, Harry!  It had only been an example, but even examples
should be reliable.

I'm pretty sure the following should work, and be as reliable as the 4K
block total supplied by 'CP QUERY queue EXP'

Mike Walter
Aon Hewitt
The opinions expressed herein are mine alone, not my employer's.

/* Prolog; See Epilog for additional information 
* Exec Name - SPOOLBLK EXEC*
* Unit Support  -  *
* Status- Version 1, Release 1.2   *
/

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

  hi='1DE8'x   /* 3270 Hilite Char */
  lo='1D60'x   /* 3270 Default Char*/
  Signal ON Syntax
  Signal ON NoValue
/* Signal ON ERROR */
  If parms='?' then Signal Explain

  parse upper arg queue .

  If queue='' then queue='ALL'
  SumTotal=0

  If queue='' | queue='ALL' then
 Do
   Call SumQueue 'READER'
   Call SumQueue 'PRINTER'
   Call SumQueue 'PUNCH'
 End
  Else Call SumQueue queue

  say queue 'queue 4K SPOOL block total=' SumTotal
Call Exit rc


//
/*   Sub-Routines below this point  */
//

Exit:
  parse arg exitrc todo
  If todo='?' then say 'For more help, enter:' xfn '?'
  If verify(exitrc,'-0123456789')>0 then Exit 99
Exit exitrc


Error:
  etxt.1='+++ "ERROR:" error rtn entered in:' xfn xft xfm', rc='rc
  etxt.2='+++ from line:' sigl', which reads:'
  etxt.3='+++'sourceline(sigl)
  cmdline=strip(sourceline(sigl),'B')
  If symbol(value('CMDLI

Re: Spool File Backup (SFB) BCHTIMER Files

2010-10-25 Thread Doug Breneman

PIPE AHELP SPECS or check out SL26-0018 CMS/TSO Pipelines: Author's Edition
pdb (Doug Breneman)
z/VM System Test   IBM   Endicott, NY



From:   "Frank M. Ramaekers" 
To: IBMVM@LISTSERV.UARK.EDU
Date:   10/25/2010 03:06 PM
Subject:Re: Spool File Backup (SFB) BCHTIMER Files
Sent by:The IBM z/VM Operating System 



Where can I find the reference material for this aspect of the SPECS
stage?

 '| SPECS' , /* Just the size   */
  'PRINTONLY EOF' ,  /* Prt only total  */
  't: 77.4 .' ,  /* Just SIZE value */
  'n: 77.3 .' ,  /* Just nnn value  */
  'm: 80.1 .' ,  /* Just nnn value  */
  'IF m=="K" THEN' ,
  '   SET #0+=(n*1000)' ,/* Multiply nK * 1K*/
  'ELSEIF m=="M" THEN' ,
  '   SET #0+=(n*100)' , /* Multiple nK * 1M*/
  'ELSE' ,
  'SET #0+=t' ,  /* Add all numeric */
  'ENDIF' ,
  'EOF' ,/* Mark EOF*/
  'PRINT #0 1' , /* Print total */


Frank M. Ramaekers Jr.


-Original Message-
From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On
Behalf Of Mike Walter
Sent: Friday, October 22, 2010 3:38 PM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: Spool File Backup (SFB) BCHTIMER Files

Excellent point, Harry!  It had only been an example, but even examples
should be reliable.

I'm pretty sure the following should work, and be as reliable as the 4K
block total supplied by 'CP QUERY queue EXP'

Mike Walter
Aon Hewitt
The opinions expressed herein are mine alone, not my employer's.

/* Prolog; See Epilog for additional information 
 * Exec Name - SPOOLBLK EXEC*
 * Unit Support  -  *
 * Status- Version 1, Release 1.2   *
 /

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

   hi='1DE8'x   /* 3270 Hilite Char */
   lo='1D60'x   /* 3270 Default Char*/
   Signal ON Syntax
   Signal ON NoValue
/* Signal ON ERROR */
   If parms='?' then Signal Explain

   parse upper arg queue .

   If queue='' then queue='ALL'
   SumTotal=0

   If queue='' | queue='ALL' then
  Do
Call SumQueue 'READER'
Call SumQueue 'PRINTER'
Call SumQueue 'PUNCH'
  End
   Else Call SumQueue queue

   say queue 'queue 4K SPOOL block total=' SumTotal
Call Exit rc


//
/*   Sub-Routines below this point  */
//

Exit:
   parse arg exitrc todo
   If todo='?' then say 'For more help, enter:' xfn '?'
   If verify(exitrc,'-0123456789')>0 then Exit 99
Exit exitrc


Error:
   etxt.1='+++ "ERROR:" error rtn entered in:' xfn xft xfm', rc='rc
   etxt.2='+++ from line:' sigl', which reads:'
   etxt.3='+++'sourceline(sigl)
   cmdline=strip(sourceline(sigl),'B')
   If symbol(value('CMDLINE'))='VAR'  /* e.g cmd='CP FAIL'; cmd */
  then cmdline=value( value('CMDLINE') )
  else cmdline=value('CMDLINE')   /* e.g.'CP FAIL'  */
   etxt.4='+++ which translates to:' cmdline
   etxt.0=4
  'PIPE STEM etxt. | CONS'
Call Exit 20


Syntax:
   etxt.1='+++ "SYNTAX:" error rtn entered in:' xfn xft xfm', rc='rc
   etxt.2='+++ from line:' sigl', which reads:'
   etxt.3='+++'sourceline(sigl)
   cmdline=strip(sourceline(sigl),'B')
   cmdline=value('CMDLINE')
   etxt.4='+++ which translates to:' cmdline
   etxt.0=4
  'PIPE STEM etxt. | CONS'
Call Exit 20


NoValue:
   etxt.1='+++ "NoValue:" error rtn entered in:' xfn xft xfm', rc='rc
   etxt.2='+++ from line:' sigl', which reads:'
   etxt.3='+++'sourceline(sigl)
   etxt.4='+++ Variable with no value is:' condition('Description')
   etxt.0=4
  'PIPE STEM etx

Re: REXX that verify what MINIDISK is a file

2010-10-14 Thread Doug Breneman

You might consider using MAKEBUF and DROPBUF around your code. You are
stacking two lines of output when the file is on the A and the X disk. You
pull one of them and leave the other on the stack. Since the second line is
CATA EXEC X2, it will execute the CATA EXEC again, which will stack two
lines, etc. Yes you have an infinite loop.

If you want to execute the EXEC only from the X disk regardless of its
possible existence on another filemode, you can EXECLOAD the copy from the
X disk and then execute it since execs in storage get priority over execs
on disk. EXECLOAD allows you to specify the filemode. EXECLOAD fn ft fm.
You can even EXECLOAD the exec as a different name. HELP EXECLOAD can help
you if you choose to use it.
pdb (Doug Breneman)
z/VM System Test   IBM   Endicott, NY



From:   Sergio Lima 
To: IBMVM@LISTSERV.UARK.EDU
Date:   10/14/2010 03:20 PM
Subject:REXX that verify what MINIDISK is a file
Sent by:The IBM z/VM Operating System 



Hello List,

We are changing a REXX here for that this EXEC execute only if reside on X
acessed minidisk.
So, try with STATE command without succesfull  and now try  with LISTFILE
command.
If execute like this :

 9 *-* 'LISTFILE  cataa exec x (DATE STACK LIFO'
   >>>   "LISTFILE  cataa exec x (DATE STACK LIFO"
10 *-* if rc = 0
   >>>   "1"
   *-*  then
   *-*  do
11 *-*   pull x1 x2 x3 .
   >>> "CATAA"
   >>> "EXEC"
   >>> "X2"
   >.> "V 83506  4 10/14/10 15:03:32"
12 *-*   say x1
   >>> "CATAA"
CATAA
13 *-*   say x2
   >>> "EXEC"
EXEC
14 *-*   say x3
   >>> "X2"
X2
15 *-*   exit

But, when try execute with filemode *, lookslike the program go to a
LOOPING :

 9 *-* 'LISTFILE  cataa exec * (DATE STACK LIFO'
   >>>   "LISTFILE  cataa exec * (DATE STACK LIFO"
10 *-* if rc = 0
   >>>   "1"
   *-*  then
   *-*  do
11 *-*   pull x1 x2 x3 .
   >>> "CATAA"
   >>> "EXEC"
   >>> "X2"
   >.> "V 83506  4 10/14/10 15:03:32"
12 *-*   say x1
   >>> "CATAA"
CATAA
13 *-*   say x2
   >>> "EXEC"
EXEC
14 *-*   say x3
   >>> "X2"
X2
15 *-*   exit
 9 *-* 'LISTFILE  cataa exec * (DATE STACK LIFO'
   >>>   "LISTFILE  cataa exec * (DATE STACK LIFO"
10 *-* if rc = 0
   >>>   "1"
   *-*  then
   *-*  do
11 *-*   pull x1 x2 x3 .
   >>> "CATAA"
   >>> "EXEC"

The command in the line show this :

listfile cataa exec *
CATAAEXEC A2
CATAAEXEC X2
Ready; T=0.01/0.01 16:17:00

Someone can help, how can verify if this EXEC is not running from X disk ?

Thanks very much,

Sergio Lima Costa
Sao Paulo - Brazil

Re: PIPE question about RC

2009-11-04 Thread Doug Breneman

Alain,
You can use another stream and put a label on the CP stage. The return
codes will go to the secondary stream. The following is just an example and
not really useful:

 pipe (end ?) LITERAL QUERY TIME|DUP 3|A:CP|CONS?A:|SPEC /RC=/ 1 1-* NW|
CONS
TIME IS 14:24:24 EST WEDNESDAY 11/04/09
CONNECT= 05:46:41 VIRTCPU= 000:01.24 TOTCPU= 000:04.53
RC= 0
TIME IS 14:24:24 EST WEDNESDAY 11/04/09
CONNECT= 05:46:41 VIRTCPU= 000:01.24 TOTCPU= 000:04.53
RC= 0
TIME IS 14:24:24 EST WEDNESDAY 11/04/09
CONNECT= 05:46:41 VIRTCPU= 000:01.24 TOTCPU= 000:04.53
RC= 0
TIME IS 14:24:24 EST WEDNESDAY 11/04/09
CONNECT= 05:46:41 VIRTCPU= 000:01.24 TOTCPU= 000:04.53
RC= 0
Ready;

You can see that the secondary output stream contains all of the return
codes from the CP commands. I hope this helps.
Doug Breneman  z/VM Development IBM Endicott


   
  From:   Alain Benveniste   
   
  To: IBMVM@LISTSERV.UARK.EDU  
   
  Date:   11/04/2009 02:15 PM  
   
  Subject:PIPE question about RC   
   
  Sent by:The IBM z/VM Operating System   
   





Is it possible to test the return code for EACH CP command as partially
shown above :

"PIPE LITERAL C000 c001 c002 c003 ! split ! specs /vary off/ 1 W1 NW ! CP
 !
LITERAL RC ! CONSOLE"

and if a RC/=0 straight to execute a PIPMOD STOP to live the PIPE ?


I have the default PIPE environment.

Alain Benveniste



Re: Pass Phrases

2009-11-02 Thread Doug Breneman

Richard,
The General Information Manual for z/VM 5.3 has passphrase support in the
base. I looked in the Security section, page 16.

Enhanced System Security with Longer Passwords
Working together, z/VM V5.3 and the RACF Security Server for z/VM FL530
feature support the use of passwords that are longer than eight characters,
called password phrases (also known as passphrases). A password phrase may
contain mixed-case letters, numbers, blanks, and special characters,
allowing for an exponentially greater number of possible combinations of
characters than traditional passwords. To utilize password phrases, an
external security manager (ESM) that supports password phrases, such as
RACF, is required. To ease migration from passwords to password phrases,
the RACF Security Server for z/VM continues to support traditional
8-character passwords. A new callable services library (CSL) routine,
DMSPASS, allows authorized CMS applications to authenticate passwords or
password phrases. The z/VM LOGON command, the z/VM TCP/IP File Transfer
Protocol (FTP), Systems Management API, Remote Execution Protocol (REXEC),
and Internet Message Access Protocol (IMAP) servers, and the Performance
Toolkit for VM have been updated to support password phrases. For
environments in which password phrases cannot be used, but where additional
password complexity is required, the RACF Security Server for z/VM also
provides support for mixed-case 8-character passwords. Support for password
phrases and mixed-case passwords enables a z/VM system to meet the
enterprise password requirements imposed by many companies, governments,
and institutions.

Doug Breneman  z/VM Development  IBM Endicott


   
  From:   "Schuh, Richard"
   
  To: IBMVM@LISTSERV.UARK.EDU  
   
  Date:   11/02/2009 04:38 PM  
   
  Subject:Pass Phrases 
   
  Sent by:The IBM z/VM Operating System   
   





When were pass phrases first supported by VM? Was it the base z/VM 5.3 or
were they introduced to 5.3 via the service stream?

Regards,
Richard Schuh





Re: Delete cms file record using PIPE

2009-10-22 Thread Doug Breneman

Gonen,
Please consider using the NLOCATE or the PICK stages.
Doug Breneman   Z/VM Development  IBM Endicott


   
  From:   Gonen Shoham
   
  To: IBMVM@LISTSERV.UARK.EDU  
   
  Date:   10/22/2009 05:23 PM  
   
  Subject:Delete cms file record using PIPE
   
  Sent by:The IBM z/VM Operating System   
   





I have a CMS file in which I need to delete lines that meet specific
criteria.

For example -

Delete all line where (word,1) = 'XX' and (word,2) = 'YY'


Can someone suggest a way to perform this task using PIPES  ?


Thanks



Re: output of dfsmsrm query lib invent all

2009-08-05 Thread Doug Breneman

Tom,
The help file for this message shows:

 MSG FSMBCJ2181I   All Help Informationline 1
of 26
(c) Copyright IBM Corporation 1993
(adapted from IBM Form SC26-4707)
FSM2181I  Category NameVolume PI MQ EP EJ MP UL MM
  ME CLASS TYPE
Explanation:  This message is the second line of the report header for
the QUERY LIBRARY INVENTORY command.  The column headers are defined
as follows:
PIVolume is present in library, but is inaccessible.
MQVolume is mounted or queued for mount.
EPVolume is eject pending.
EJVolume is in the process of being ejected.
MPVolume is misplaced.
ULVolume has an unreadable label or is unlabeled.
MMVolume has been used during manual mode.
MEVolume has been manually ejected.
Class Class of volume.
Type  Type of media.
System Action:  DFSMS continues operation.

Doug Breneman  IBM Endicott


   
  From:   "Gimblet, Tom"  
   
  To: IBMVM@LISTSERV.UARK.EDU  
   
  Date:   08/05/2009 01:46 PM  
   
  Subject:output of dfsmsrm query lib invent all   
   





Folks,

   When I issue the command dfsmsrm query lib invent all the second line of
the output reads

FSMBCJ2181I Category NameVolume PI MQ EP EJ MP UL MM ME
Class type


  What does the PI MQ EP EJ MP UL MM and ME  mean?



 Thanks
Thomas Gimblet
347 643 3194



Re: PIPE SPEC TOD

2009-08-03 Thread Doug Breneman

Hi Frank,
Use the TIMEOUT operand. from HELP PIPE DATECONV:

TIMEOUT
specifies the time will be part of the output.

 pipe literal  | spec tod 1 1-* n | dateconv 1.8 todabs fulldate  timeout |
cons
08/03/2009 11:32:47.243895

Doug Breneman IBM Endicott


   
  From:   "Frank M. Ramaekers"  
   
  To: IBMVM@LISTSERV.UARK.EDU  
   
  Date:   08/03/2009 11:29 AM  
   
  Subject:Re: PIPE SPEC TOD
   





Ah, it doesn't need to be converted from binary.   Okay, how do I get
the time as well?

PS Hinquiring minds want to know!

Frank M. Ramaekers Jr.
Systems Programmer   MCP, MCP+I, MCSE & RHCE
American Income Life Insurance Co.   Phone: (254)761-6649
1200 Wooded Acres Dr.Fax:   (254)741-5777
Waco, Texas  76710

-Original Message-
From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On
Behalf Of Rob van der Heij
Sent: Monday, August 03, 2009 10:07 AM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: PIPE SPEC TOD

On Mon, Aug 3, 2009 at 4:10 PM, Frank M.
Ramaekers wrote:

> I'm missing something because the TOD into DATECONVERT doesn't seem to
> be working for me:
>
> pipe literal Hi | spec tod c2x 1 1-* n | dateconv 1.16 todabs fulldate
|
> cons
> 03/29/2009Hi

You're not missing something, you have something too much ;-)

pipe literal | spec tod 1 | dateconvert 1.8 todabs fulldate | cons
08/03/2009

Rob

PS This makes a great trivia question for birthday parties: at what
days is the TOD clock the same as its first 4 byte in hex :-)

_

This message contains information which is privileged and confidential and
is solely for the use of the

intended recipient. If you are not the intended recipient, be aware that
any review, disclosure,

copying, distribution, or use of the contents of this message is strictly
prohibited. If you have

received this in error, please destroy it immediately and notify us at
privacy...@ailife.com.



Re: File System - If you had everything, where would you put it?

2009-04-06 Thread Doug Breneman

Hi Gary,

Dave Jones wrote:
Note that in z/VM 5.4, a DCSS can live above the 31 bit bar, but it is
still limited to the 2GB size.

The DCSS above 2G support that went into z/VM 5.4 not only allowed them
above the 2G line, but also allowed them to be 'concatenated' to appear to
the a SLES guest to be greater than 2G.  For information about what SLES 11
and SLES 10 with patches can do, a customer needs to refer to

Chapter 19. z/VM DCSS device driver

in the Device Drivers, Features, and Commands - November, 2008 book page
215 and can be found at
http://www.ibm.com/developerworks/linux/linux390/development_documentation.html

There it states:

Starting with z/VM 5.4, you can:
v Locate a DCSS above 2047 MB
v Set up DCSS devices with a size above 2047 MB by mapping multiple DCSSs
to
a single DCSS block device

and on page 217, the syntax on the "dcssblk.segments="  statement shows

: the colon (:) separates DCSSs within a set of DCSSs to be mapped to a
single
DCSS device. You can map a set of DCSSs to a single DCSS device if the
DCSSs in the set form a contiguous memory space.

So Dave is correct that z/VM 5.4 still limits the size of a DCSS to 2GB,
but Linux can use a set of them so that multiple DCSSs look like one memory
space that is greater than 2G. I know that this does not help you with
Solaris.

Doug Breneman z/VM Development  IBM  Endicott, NY


Re: CP Entered; Disabled Wait PSW 9025

2008-11-12 Thread Doug Breneman

Mike,
Here is a list of the zSeries processors:

 # Model
2064   z900
2066   z800
2084   z990
2086   z890
2094   z9-EC (enterprise class)
2096   z9-BC (business class)
2097   z10-EC
2098   z10-BC

So a 2084 is a z990 and not a z900.
Doug Breneman  z/VM Development   IBM  Endicott, NY


   
  From:   "Horlick, Michael" <[EMAIL PROTECTED]> 
   
  To: IBMVM@LISTSERV.UARK.EDU  
   
  Date:   11/12/2008 01:36 PM  
   
  Subject:Re: CP Entered; Disabled Wait PSW 9025   
   





Hi Ron,

I think we were on a 2084 (is that a z900?). We also got screwed up a
bit because we had our sysres pack with the same volser (520RES) as the
floor system.

The last time I had problems IPLing a system at Sungard was when we were
at VSE 2.6.1 and I didn't have the fixes in to run on a newer processor.
Luckily they had an older machine to use.

Regards,

Mike (Long live CGI, comrade!)

-Original Message-
From: The IBM z/VM Operating System [mailto:[EMAIL PROTECTED] On
Behalf Of Ron Schmiedge
Sent: November 12, 2008 1:03 PM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: CP Entered; Disabled Wait PSW 9025

Hi Mike,

Perhaps not too strange - what processor were you using at Sungard?
There may have been service required for that particular machine that
came on 0701 you did not have at 0601.

We had that happen to us at Sungard several years back (I can't recall
the error messages anymore, we were getting abends soon after IPL) and
they were able to put us on an older machine which made the abends go
away. We had to put a service pack on our VM before the next test!

Ron

On Wed, Nov 12, 2008 at 10:40 AM, Horlick, Michael
<[EMAIL PROTECTED]> wrote:
> Hello David,
>
> Thanks for the info. Had trouble replying to e-mail when at disaster
> recovery site.
>
> Sungard got it fixed for us when they copied their CPLOAD MODULE to
our
> MAINT CF1 disk. We are at "z/VM Version 5 Release 2.0, service level
> 0601 (64-bit)" and they were at service level 0701.
>
> They said it happened before to another one of their clients.
>
> Strange.
>
> Mike
>
> -Original Message-
> From: The IBM z/VM Operating System [mailto:[EMAIL PROTECTED]
On
> Behalf Of Wakser, David
> Sent: November 10, 2008 3:20 PM
> To: IBMVM@LISTSERV.UARK.EDU
> Subject: Re: CP Entered; Disabled Wait PSW 9025
>
> Here is the output from the manual:
>
> David Wakser
>
>
>
>  MSG HCP9025WAll Help Information
line
> 1 of 38
> (c) Copyright IBM Corporation 1990, 2007
>
>
>
>  HCP9025W  SYSTEM TERMINATION COMPLETE, ENTERING WAIT STATE
>
>
>
>  Explanation:  The system termination process has completed. The
system
> will
>  not restart for one of the following reasons:
>
>
>
>   1.   An error was detected in the error recovery hardware or
> software.
>



Re: COPY HCPXCTBK

2008-11-03 Thread Doug Breneman

Hi Shimon,

I looked up HCPXCTBK in the z/VM 5.4 Data Areas and Control Blocks at:

http://www.vm.ibm.com/pubs/cp540/XCTBK.HTML

Here is the prologue to the control block:

 Name   : HCPXCTBK
 Description: CP Exit Control Block
 DSECT  : XCTBK
 Function   : This control block contains information used to
  control the structure of XITBKs.
 Located by : SYSCM.SYSEXITS
 Created by : HCPZXUIN
 Deleted by : none

Since this refers to XITBK, the prologue for it is:

 Name   : HCPXITBK
 Description: CP Exit Block
 DSECT  : XITBK
 Function   : This control block contains information used to
  authorize user exit routines to find their entry
  points.
 Located by : Radix tTree structure anchored by XCTBK.XCTRADIX.
 Created by : HCPZXUAD
 Deleted by : HCPZXUDL(The deletion is only allowed if the XITBK
  is for a Dynamic Exit that is NOT enabled
  and is NOT associated at delete time)

and can be found at:

http://www.vm.ibm.com/pubs/cp540/XITBK.HTML

All of the fields in these control blocks are documented at the referenced
URLs.

Doug Breneman  z/VM Development  IBM Endicott

   
  From:   Shimon Lebowitz <[EMAIL PROTECTED]>  
   
  To: IBMVM@LISTSERV.UARK.EDU  
   
  Date:   11/02/2008 04:53 AM  
   
  Subject:COPY HCPXCTBK
   





I have a CP exit which has run for years, and I see
in the code that I put a COPY HCPXCTBK statement.

I can find no reference anywhere to why I should need
this line (except that it appears once in a sample).

Does anyone else have it? May I ask what for?
Can I leave it out?

Thanks!
Shimon

--

Shimon Lebowitzmailto:[EMAIL PROTECTED]
VM System Programmer   .
Israel Police National HQ.
Jerusalem, Israel  phone: +972 2 542-9877  fax: 542-9308




Re: Some REXX help

2008-10-21 Thread Doug Breneman

Close.  For EXEC, you could use:

Symbol  Operation
 = or EQequals
¬= or NEnot equal
<  or LTless than
<= or LEless than or equal to (not greater than)
>  or GTgreater than
>= or GEgreater than or equal to (not less than)

For EXEC2, you could use:

-.-=--.-
 |-EQ-|
 |-¬=-|
 |-NE-|
 |-<--|
 |-LT-|
 |-<=-|
 |-¬>-|
 |-LE-|
 |-NG-|
 |->--|
 |-GT-|
 |->=-|
 |-¬<-|
 |-GE-|
 '-NL-'

These can be found by doing HELP EXEC MENU and HELP EXEC2 MENU and then
looking under &IF.

Doug Breneman  z/VM Development  IBM Endicott, NY


   
  From:   "Huegel, Thomas" <[EMAIL PROTECTED]> 
   
  To: IBMVM@LISTSERV.UARK.EDU  
   
  Date:   10/21/2008 01:41 PM  
   
  Subject:Re: Some REXX help   
   





Trying to think back, but didn't EXEC or EXEC(2) take the english word i.e.
&IF &A EQUAL &B 
or am I getting old and confusing it with COBOL?


-Original Message-
From: The IBM z/VM Operating System [?mailto:[EMAIL PROTECTED]
Behalf Of Schuh, Richard
Sent: Tuesday, October 21, 2008 11:58 AM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: Some REXX help


Since Rexx accepts either the not sign or \ as an alternate not sign,
and since the \ was foisted off on us a long time ago because of errors
in sending files with the "real" not sign, I have become accustomed to
seeing "\" and thinking "not". It is no different than accepting "^" as
a not sign, and similar to accepting "don't" or "dont" as meaning "do
not". I am surprised you haven't seen the conversation before.

I am not trying to force other people to conform to what seems natural
to me. I merely pointed out that each has his/her own idea of what is
natural. What seems natural to you may not seem so to others. I had been
programming 22 years before I ran across "\" as an alternate not sign
and did not see the "<>" notation for several years after that. Is it
any wonder that I do not see that "ugly" expression as natural? :-)

Regards,
Richard Schuh



> -Original Message-
> From: The IBM z/VM Operating System
> [?mailto:[EMAIL PROTECTED] On Behalf Of RPN01
> Sent: Tuesday, October 21, 2008 9:00 AM
> To: IBMVM@LISTSERV.UARK.EDU
> Subject: Re: Some REXX help
>
> To me, \= is not "not equal" at all; This conversation was
> the first time I'd ever seen that notation. The not sign is
> specific, but doesn't exist on some character sets. The only
> consistent one would be <>, at least in my experience.
> --
> Bob Nix
>
>
> On 10/21/08 10:56 AM, "Schuh, Richard" <[EMAIL PROTECTED]> wrote:
>
> > Maybe more readable to some but not to others. If you take
> the symbols
> > at face value, \=, not equal to, is more readable than <>,
> is less than
> > or greater than. I guess it depends on whether you first
> encountered the
> > notion in mathematics or programming. To me, the not equal
> too is more
> > natural.
> >
> > Regards,
> > Richard Schuh
> >
> >
> >
> >> -Original Message-
> >> From: The IBM z/VM Operating System
> >> [mailto:[EMAIL PROTECTED] On Behalf Of RPN01
> >> Sent: Tuesday, October 21, 2008 6:48 AM
> >> To: IBMVM@LISTSERV.UARK.EDU
> >> Subject: Re: Some REXX help
> >>
> >> You can also make it a bit more readable, and less character
> >> set dependent, by replacing the \= with <>.
> >>
> >> --
> >> Robert P. Nix  Mayo Foundation.~.
> >> RO-OE-5-55 200 First Street SW/V\
> >> 507-284-0844   Rochester, MN 55905   /( )\
> >> -^^-^^
> >> "In theory, theory and practice are the same, but  in
> >> practice, theory and practice are different."
> >>
> >>
> >>
> >>
> >> On 10/20/08 11:11 PM, "Alan Ackerman"
> >> <[EMAIL PROTECTED]> wrote:
> >>
> >>> On Mon, 20 Oct 2008 16:06:48 -0700, Schuh, Richard
> >> <[EMAIL PROTECTED]>
> >>> wrot
> >>> e:
> >>>
> >>>> Ah, but the semicolon make

Re: Some REXX help

2008-10-20 Thread Doug Breneman

The ¬sym; is supposed be a "not" symbol when it gets printed in the
book.  This means that  this line is supposed to be

If rest is not equal to null then call error...

On my keyboard, this is

If rest ^= '' then call error...

You can also use <> for not equal.

I will contact the z/VM Information developers and have this corrected.
Thank you.

Doug Breneman  z/VM Development  Endicott, NY


   
  From:   "Huegel, Thomas" <[EMAIL PROTECTED]> 
   
  To: IBMVM@LISTSERV.UARK.EDU  
   
  Date:   10/20/2008 06:43 PM  
   
  Subject:Some REXX help   
   





I copied this line from the REXX VM/REFERENCE

It is from a sample SOCKETS SERVER exec (page 16.2).
When I try to execute it I get errors.
I have not seen code like this before, I wonder if anyone can explain the
technique to me?

if rest¬sym;='' then call error 'E', 24, 'Invalid parameters specified'

Its the rest¬sym;=''that I don't understand.


Thanks




Re: WAIT STATE

2008-09-12 Thread Doug Breneman

HCP1010W  NO CONSOLE AVAILABLE.
Explanation:  The indicated disabled wait state PSW is loaded when an
operational primary or alternate operator's console cannot be found.
If you were running in virtual mode, CONMODE was not set to 3270.
System Action:  The system enters a disabled wait state (wait state code =
1010). If using the Stand-Alone Program Loader (SAPL), all registers
contain
the values held at the time the wait state was entered. Register 2 contains
the console device address.
Operator Response:  There is probably a hardware malfunction. Notify your
system support personnel. Verify that the RIOGEN macro instruction properly
defined the primary and alternate system consoles.
If you were running in virtual mode, enter the TERMinal CONMODE 3270
command,
and re-IPL.
If using SAPL, either specify the correct console address on the LOADPARM
parameter of the IPL command or specify the correct console address using
the
'CONS=' IPL parameter on the SAPL menu screen. Refer to Overriding
Stand-Alone
Program Loader Defaults in z/VM: CP Planning and Administration.
If the problem persists, contact your IBM Support Center personnel to
diagnose
and correct the hardware error.
Doug Breneman z/VM Development IBM Endicott


   
  From:   "Martin, Terry R. (CMS/CTR) (CTR)" <[EMAIL PROTECTED]>
   
  To: IBMVM@LISTSERV.UARK.EDU  
   
  Date:   09/12/2008 04:27 PM  
   
  Subject:WAIT STATE   
   





Hi

I am trying to bring up a new VM LPAR and I am receiving a DISABLED WAIT
STATE CODE: 1010.

Any ideas?

Thank You,

Terry Martin
Lockheed Martin - Information Technology
z/OS & z/VM Systems - Performance and Tuning
Cell - 443 632-4191
Work - 410 786-0386
[EMAIL PROTECTED]



Re: CMS file list date

2008-08-27 Thread Doug Breneman

You can use SET DATEFORMAT to specify what date format you want to use for
a userid or you can specify which date format you want to use for just
LISTFILE.

This will set a date format for your virtual machine.

SET DATEFORMAT
 .-USER--.
>>--Set--DATEFormat--.-SHOrtdate--.--+---+--><

 |-FULldate---|  |(1)|
 |-ISOdate|  '-SYSTEM'
 '-SYSdefault-'
Note:
(1)  SYSTEM is valid only for class B


Listfile date format options from HELP LISTFILE will just force a date
format for the LISTFILE command:

  (3)
.--.
 >--+--+-
|   (4)|
|-SHOrtdate|
|  (4) |
|-FULldate-|
| (4)  |
'-ISOdate--'

You can also look at SET DEFAULTS to set defaults for some VM commands like
FILELIST and RDRLIST.  Try HELP DEFAULTS (ALL.

Four character years can be obtained using FULLDATE or ISODATE depending on
which format you want, mm/dd/yyyy or -mm-dd respectively.

Doug Breneman  z/VM Development  IBM Endicott, NY

   
  From:   "Dodds, Jim" <[EMAIL PROTECTED]>
   
  To: IBMVM@LISTSERV.UARK.EDU  
   
  Date:   08/27/2008 10:45 AM  
   
  Subject:CMS file list date   
   





I have a customer that is on z/VM 4.4 and the CMS file dates shown in a
filelist have only 2 digit years. They would like to see the 4 digit years.
I am on VM 2.4 and ours displays a 4 digit year. I know both of these
products are out of service. Would anyone know how to correct this?

Jim Dodds
Systems Programmer
Kentucky State University
400 East Main Street
Frankfort, Ky 40601
502 597 6114



Re: Dirmaint unknown user id

2008-08-01 Thread Doug Breneman

Yes, Thank you.
Doug Breneman  z/VM Development  IBM Endicott, NY


|>
| From:  |
|>
  
>-|
  |Howard Rifkind <[EMAIL PROTECTED]>   
|
  
>-|
|>
| To:|
|>
  
>-|
  |IBMVM@LISTSERV.UARK.EDU  
|
  
>-|
|>
| Date:  |
|>
  
>-|
  |08/01/2008 10:04 AM  
|
  
>-|
|>
| Subject:   |
|>
  
>-|
  |Re: Dirmaint unknown user id 
|
  
>-|





Thanks Doug...

Wouldn't the current PMR be O.K.

>>> Doug Breneman <[EMAIL PROTECTED]> 8/1/2008 9:59 AM >>>


Hi Howard,
While I encourage you to open a PMR, I wanted to let you know that I
forwarded this information to the lead DirMaint developer.
Doug Breneman z/VM Development IBM Endicott, NY

Inactive hide details for Howard Rifkind ---08/01/2008 09:32:55
AM---Thanks, this is exactly what I did. >>> Kris Buelens >>
Kris Buelens <[EMAIL PROTECTED]> 8/1/2008 4:18 AM >>>
   
   
 From: Howard Rifkind <[EMAIL PROTECTED]>  
   
   
 To:   IBMVM@LISTSERV.UARK.EDU 
   
   
 Date: 08/01/2008 09:32 AM 
   
   
 Subject:  Re: Dirmaint unknown user id
   





Thanks, this is exactly what I did.

>>> Kris Buelens <[EMAIL PROTECTED]> 8/1/2008 4:18 AM >>>
I think I have seen something like this too in Dirmaint 5.3, I suppose
Dirmaint (better DATAMOVE) will finally help you when it can't
complete a DMDISK/CMDISK due to existing links.
To me this looks like a not unitialized REXX variable. Maybe the code
contains a PIPE like
PIPE CP Q LINKS | ... | VAR LinkHolders'
and doesn't test: if Symbol('LinkHolders')<>'VAR' 

To be short: open a PMR

2008/7/31 Howard Rifkind <[EMAIL PROTECTED]>:
> Has anyone seen something like this from Dirmaint.
>
> I'm interested where the user LILNKHOLDERS is coming from.
>
> Thanks
>
> DVHDMC6831E active links held by the following users: LINKHOLDERS
>
>
>
>
> _
> LEGAL NOTICE
> Unless expressly stated otherwise, this message is confidential
> and may be privileged. It is intended for the addressee(s) only.
> Access to this E-mail by anyone else is unauthorized.
> If you are not an addressee, any disclosure or copying of the
> contents of this E-mail or any action taken (or not taken) in
> reliance on it is unauthorized and may be unlawful. If you are not an
> addressee, please inform the sender immediately, then delete this
> message and empty from

Re: Dirmaint unknown user id

2008-08-01 Thread Doug Breneman

Hi Howard,
While I encourage you to open a PMR, I wanted to let you know that I
forwarded this information to the lead DirMaint developer.
Doug Breneman  z/VM Development IBM  Endicott, NY


|>
| From:  |
|>
  
>-|
  |Howard Rifkind <[EMAIL PROTECTED]>   
|
  
>-|
|>
| To:|
|>
  
>-|
  |IBMVM@LISTSERV.UARK.EDU  
|
  
>-|
|>
| Date:  |
|>
  
>-|
  |08/01/2008 09:32 AM  
|
  
>-|
|>
| Subject:   |
|>
  
>-|
  |Re: Dirmaint unknown user id 
|
  
>-|





Thanks, this is exactly what I did.

>>> Kris Buelens <[EMAIL PROTECTED]> 8/1/2008 4:18 AM >>>
I think I have seen something like this too in Dirmaint 5.3, I suppose
Dirmaint (better DATAMOVE) will finally help you when it can't
complete a DMDISK/CMDISK due to existing links.
To me this looks like a not unitialized REXX variable.  Maybe the code
contains a PIPE like
   PIPE CP Q LINKS | ... | VAR LinkHolders'
and doesn't test: if Symbol('LinkHolders')<>'VAR' 

To be short: open a PMR

2008/7/31 Howard Rifkind <[EMAIL PROTECTED]>:
> Has anyone seen something like this from Dirmaint.
>
> I'm interested where the user LILNKHOLDERS is coming from.
>
> Thanks
>
> DVHDMC6831E active links held by the following users: LINKHOLDERS
>
>
>
>
> _
> LEGAL NOTICE
> Unless expressly stated otherwise, this message is confidential
> and may be privileged. It is intended for the addressee(s) only.
> Access to this E-mail by anyone else is unauthorized.
> If you are not an addressee, any disclosure or copying of the
> contents of this E-mail or any action taken (or not taken) in
> reliance on it is unauthorized and may be unlawful. If you are not an
> addressee, please inform the sender immediately, then delete this
> message and empty from your trash.
>



--
Kris Buelens,
IBM Belgium, VM customer support




 _
 LEGAL NOTICE
 Unless expressly stated otherwise, this message is
 confidential
 and may be privileged. It is intended for the
 addressee(s) only.
 Access to this E-mail by anyone else is
 unauthorized.
 If you are not an addressee, any disclosure or
 copying of the
 contents of this E-mail or any action taken (or
 not taken) in
 reliance on it is unauthorized and may be
 unlawful. If you are not an
 addressee, please inform the sender immediately,
 then delete this
 message and empty from your trash.






Re: HCPPGT401I 90% of spool

2008-07-09 Thread Doug Breneman

I believe that there is no external to change this.  The message HCPPGT401I
is from HCPPGT which checks for 90%.  In addition, a value of 90 is
hardcoded in the HCPMES message repository.
>From the message repository:
  040102  I 90 percent of all spooling space is in use.
If the value could be changed, then logically, the percent value would be a
variable instead of "90".

Doug Breneman  z/VM Development  IBM Endicott, NY



  
  From:   "Hughes, Jim" <[EMAIL PROTECTED]> 
  

  
  To: IBMVM@LISTSERV.UARK.EDU   
  

  
  Date:   07/09/2008 12:23 PM   
  

  
  Subject:HCPPGT401I 90% of spool   
  

  





Is there a way to change the 90% spool space highwater mark?  If so,
where is it documented?

Thanks.


Jim Hughes
603-271-5586
"Its kind of fun to do the impossible." (Walt Disney)



Re: The Programmable Operator Facility

2008-07-09 Thread Doug Breneman

You might consider using the CP SILENTLY command.  From the help file for
SILENTLY:

Examples
  1.   To attach device 1234 to user MVS and suppress the messages sent to
the
   issuer, to the user who is the object of the ATTACH, and to the
system
   operator:
 a.   Enable the ATTACH command for response suppression:
modify command attach silent
 b.   Issue the SILENTLY command for ATTACH:
silently attach 1234 to mvs as 1234

If you are willing to add a 'NOMSG' option to the ATTACH command, might you
be willing to precede the ATTACH command with 'SILENTLY' instead? I do not
know if this meets your needs or not.  Any ATTACH command that is not
preceded with SILENTLY, will continue to operate as it does now.  For any
ATTACH command that is preceded with SILENTLY, message output is
suppressed. For more information, please see the HELP files for CP SILENTLY
and CP MODIFY COMMAND or get the information from the CP Commands and
Utilities Reference book.

Doug Breneman  z/VM Development  IBM Endicott, NY



  
  From:   "Huegel, Thomas" <[EMAIL PROTECTED]>  
  

  
  To: IBMVM@LISTSERV.UARK.EDU   
  

  
  Date:   07/09/2008 12:05 PM   
  

  
  Subject:Re: The Programmable Operator Facility
  

  





Personally I think ATTACH and DETACH (and others too i.e. DIAL) should have
a NOMSG type option to just eliminate the message alltogether.

-Original Message-
From: The IBM z/VM Operating System [mailto:[EMAIL PROTECTED]
Behalf Of Kris Buelens
Sent: Wednesday, July 09, 2008 11:00 AM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: The Programmable Operator Facility


In PROP, logging is all or nothing.  VM:Operator has a NOLOG option, I
don't know about IBM Operations Manager.

At the other hand: DASD isn't that expensive, incomplete log files
make debugging less easy.  Alternatively, you could postprocess the
log file of the previous day and code a PIPE filter to remove what you
don't want to keep.

2008/7/9 Ray Waters <[EMAIL PROTECTED]>:
>
> We run z/VM 520 and use PROPST to filter messages to the OP1 console. We
filter several commands including ATTACHED and DETACHED commands.
>
>
>
> I would like to filter other messages such as ATTACHED and DETACHED from
going to the LOG FILE (LGYYMMDD XX) on Operator's 191 MDISK. In reading
the CMS Planning and Administration Guide, I don't see how this can be
done. We are a heavy TAPE use shop using DFSMS/RMS and there are just too
many of these messages going to this log file.
>
>
>
> Is there a way to suppress the logging of certain messages?
>
>
>
> Thanks,
>
> Ray Waters
>
> Mainframe Technical Support Analyst
>
> Open Solutions Inc.
> 11 Greenway Plaza, Suite 300
> Houston, TX  77046-1102
>
> Office 713-965-8451
>
> Cell 713-705-5403
>
> Fax713-965-8405
>
> Email [EMAIL PROTECTED]
>
>
>
> www.bank.opensolutions.com
>
> www.opensolutions.com
>
>
>
>
>
> 
> NOTICE:
> This e-mail is intended solely for the use of the individual to whom it
is addressed and may contain information that is privileged, confidential
or otherwise exempt from disclosure. If the reader of this e-mail is not
the intended recipient or the employee or agent responsible for delivering
the message to the intended recipient, you are hereby notified that any
dissemination, distribution, or copying of this communication is strictly
prohibited. If you have received this communication in error, please
immediately notify us by replying to the original message at the listed
email address. Thank You.



--
Kris Buelens,
IBM Belgium, VM customer support



Re: Installation Verification Procedures

2008-02-15 Thread Doug Breneman

Hi All,
Many years ago there was an Installation Verification Procedure for VM.
This was mostly directed toward CMS tasks.  We found that this was not very
useful and removed it from our product documentation.  We have a list of
some items that we use as an IVP when we get a new release of VM.  This is
not an official IBM IVP.  This include things like:

CP IPL (MP) - stop if you cannot do this :-)
CMS IPL (190 and Segment) - needed to do many other things.  190 is needed
if the segment fails
GCS IPL  - needed for RSCS and other applications
RSCS Initializes - needed for sending/receiving files
PVM Initializes  - remote system access
SFS Initializes - file storage
TCP/IP Initializes
Able to logon to the system via telnet - remote system access
Able to FTP to and from VM - needed for sending/receiving files
NETSTAT command functions - needed for our environment
Run test workloads to reach 50-70% CPU load for 4 hours. - load that is
reasonable for us to ensure some stability.  The test workloads vary.
Linux and z/OS each IPL second level. - needed for our environment
 Workloads must run on both of these guest operating systems.

These are some of the things that we do to initially verify the installed
VM.  If all of these work, then we have a good chance that we can continue
to use the new release.  The items that are important to you might vary
from this list. I hope this list might act as one example.

Doug Breneman  z/VM Development  IBM  Endicott, NY



   
 Adam Thornton 
 <[EMAIL PROTECTED] 
 mine.net>  To
 Sent by: The IBM  IBMVM@LISTSERV.UARK.EDU 
 z/VM Operating cc
 System
 <[EMAIL PROTECTED] Subject
 ARK.EDU>  Re: Installation Verification   
   Procedures  
   
 02/15/2008 10:22  
 AM
   
   
 Please respond to 
   The IBM z/VM
 Operating System  
 <[EMAIL PROTECTED] 
 ARK.EDU>  
   
   




On Feb 15, 2008, at 9:07 AM, Alan Altmark wrote:
> Program products have IVPs because  I don't know.  The great thing
> about computers, unlike people, is that they reliably do the same
> thing
> every time.

Here speaks a man who works in Endicott, not in Redmond.

Adam


Re: z/VM 5.3 FLIST

2007-12-13 Thread Doug Breneman

Hi Ron,
You are correct; it is easy to update FLIST $PROFILE for a PF key.  Someone
on the list indicated that it would be useful if he could get a PF key for
BROWSE in FILELIST.  I appended to show how this could be done.  I am not
trying to convert anyone from FLIST to FILELIST.  Both can get the job
done.  There are advantages to each.  If you want fulldate, isodate, or
shortdate, you can get it with FILELIST.  If you want to move the command
line to the top of the file, you can use CMDLINE TOP.  FLIST can also do
good things and the ease in changing the PF keys is just one of them.
Doug Breneman  z/VM Development  IBM Endicott

Re: z/VM 5.3 FLIST

2007-12-13 Thread Doug Breneman

You can use the following macro to set PF10 to BROWSE and even display it
at the bottom of the screen.  I used PF10 just because it was available.
This macro is based on the example shown in the appendix of the CMS Command
and Utilities Reference.

/* MYFLIST XEDIT -- My FILELIST profile to add BROWSE on PF10 */
  Parse Arg filelist_input
  'MACRO PROFFLST' filelist_input
/* Define PF key 10 to be BROWSE */
  "EXTRACT /RESERVED */" /* Get all reserved lines */
/* find the correct line to change by looking for "10=" */
  Do i = 1 To reserved.0 /* get each reserved line */
 Parse Var reserved.i line color ext_high pss high text
 pf10_pos = "POS"("10=",text) /* find position of the change */
 If pf10_pos = 0 Then Iterate
/* change the line */
 newtext = "OVERLAY"("BROWSE",text,pf10_pos+4,10)
/* put new line on screen */
 "SET RESERVED" line color ext_high pss high newtext
 Leave /* found desired line; leave loop */
 End
  "SET PF10 BEFORE MACRO EXECUTE CURSOR BROWSE" /* set PF10 function */
  Exit

You can use this macro by doing FILELIST (PROFILE MYFLIST or you can SET
DEFAULTS FILELIST PROFILE MYFLST.
Doug Breneman  z/VM Development  IBM Endicott

Re: Simple Rexx question

2007-10-04 Thread Doug Breneman
Please change 'MAY' to 'May'. 

 say  DATE('B','27 May 1996',) 
728805 

Doug Breneman z/VM Development  IBM Endicott

Thursday, October 04, 2007 12:01 PM
To: IBMVM@LISTSERV.UARK.EDU
cc: 
From: "Edward M. Martin" <[EMAIL PROTECTED]>
Subject: Simple Rexx question


Hello Everyone,
  
  I have been working with REXX but I am not getting this very simple REXX.
 
  This is TDATE EXEC.
 
/* REXX TDATE EXEC */  
TEMP = DATE('B','27 MAY 1996',)
SAY TEMP   
exit 
 
This is the results.
 
tdate 
 2 +++ TEMP = DATE('B','27 MAY 1996',)
DMSREX475E Error 40 running TDATE EXEC, line 2: Incorrect call to routine 
Ready(20040); T=0.01/0.01 11:50:32
 
  What am I doing wrong?  (it has to be simple!)  
 
Ed Martin
Aultman Health Foundation
330-588-4723
[EMAIL PROTECTED]
ext. 40441
 

Re: Programmable operator working: my bad; next opportunity

2007-04-11 Thread Doug Breneman
PIPE AHELP READER has the following example that might interest you:

Examples:   A  subroutine  pipeline that deblocks a reader file that has been
sent as a note or with the SENDFILE command: 
 
  /* Now get the file */ 
  'callpipe (name READER)',  
 '| reader ',   /* Read cards  */
 '| strfind x41 ',  /* Take only cards */
 '| spec 2-* 1.80 ',/* Remove CCW code */
 '| deblock netdata ',  /* Get logical records */
 '| strfind xc0 ',  /* Take only data  */
 '| spec 2-* 1 ',   /* Remove control byte */
 '| *: '/* Pass on */

Doug Breneman  z/VM Development  IBM Endicott New York 

Wednesday, April 11, 2007 1:55 PM
To: IBMVM@LISTSERV.UARK.EDU
cc: 
From: Steve Gentry <[EMAIL PROTECTED]>
Subject: Re: Programmable operator working:  my bad; next opportunity



I just tried READCARD.  It munges all the lines together, it doesn't respect CR 
and LF.   This is the problem I have with Pipe READER FILE 
I didn't use EXECIO 'cause I thought it was deprecated or something like that. 



"Stracka, James (GTI)" <[EMAIL PROTECTED]> 
Sent by: The IBM z/VM Operating System  
04/11/2007 11:28 AM 
Please respond to The IBM z/VM Operating System 

To:IBMVM@LISTSERV.UARK.EDU 
cc: 
Subject:Re: Programmable operator working:  my bad; next 
opportunity



Try READCARD or EXECIO? 
-Original Message-
From: The IBM z/VM Operating System [mailto:[EMAIL PROTECTED] On Behalf Of 
Steve Gentry
Sent: Wednesday, April 11, 2007 11:23 AM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: Programmable operator working: my bad; next opportunity


I finally got the programmable operator piece working.   I'm a little 
embarrassed by my mistake.  I had a misplaced RETURN  command in the EXEC. 
I looked at the EXEC I don't know how many times and didn't see it.   Do'h! 
Now my next opportunity.  I want to take the file that was placed in the reader 
and  receive it into a file (or a stem). 
To my knowledge there are at least two ways to do this. 
1) the RECEIVE command (issued from an EXEC) 
2) the Pipe READER FILE function 
both work but not the way I want. 
From a REXX EXEC, I issue the RECEIVE command. It brings the RDR file in and 
sticks it in a file called ALL NOTEBOOK even if I specify a file_name, 
file_type, file_mode. 
From a PIPE READER FILE function I am able to stick it in the file name, file 
type that I want but it is not formatted correctly(missing carriage returns and 
line feeds).  I looked at some examples in some IBM manuals, but none touch on 
how to format it. 
Bottom line, I want it to be in the format that the RECEIVE command does but I 
want to give it a unique file name.  The name ALL NOTEBOOK or any derivative 
there of is not an option. 
Any suggestions? 

Again, TIA, 

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/ 

Re: START UR FCB Operand

2007-01-11 Thread Doug Breneman

Hi David,
In the CP Planning and Administration book heading Creating and Modifying
Image Libraries for Printers, you can see the UCS and FCB images used with
a 3211 printer.  You should have a IMG3211 CNTRL file as John indicated.
If it is not found when you do the Q IMG, then you will need to use the
IMAGMOD IMG3211 command.  What are the odds that I just did this yesterday?
Doug Breneman  z/VM Development  IBM Endicott, New York

Thursday, January 11, 2007 12:47 PM
To: IBMVM@LISTSERV.UARK.EDU
cc:
From: "David L. Craig" <[EMAIL PROTECTED]>
Subject: Re: START UR FCB Operand


On Thu, Jan 11, 2007 at 12:19:40PM -0500, John Franciscovich wrote:

> You don't say what kind of printer it is, but if it is an impact printer,
> the FCB you specify must be in the image library (IMG file) for that
> printer. Issue Q IMG to see the image libraries that are defined on your
> system.
>
> There is a control file for each of the image libraries
> (IMAG CNTRL, where  is the printer type). The control file has
> have the names of the FCBs and character sets that are defined in the
> image library for your printer.

Sorry, it's a 3211 as far as CP knows.  It shouldn't be using an
FCB image at all; at least, none of the other printers do.

--

May the LORD God bless you exceedingly abundantly!

Dave Craig

-  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -
"'So the universe is not quite as you thought it was.
 You'd better rearrange your beliefs, then.
 Because you certainly can't rearrange the universe.'"

--from _Nightfall_  by Asimov/Silverberg

Re: runaway exec

2006-11-07 Thread Doug Breneman

HX might work for you.

Tuesday, November 07, 2006 11:55 AM
To: IBMVM@LISTSERV.UARK.EDU
cc: 
From: Bob Forward <[EMAIL PROTECTED]>
Subject: runaway exec


How do I make a runaway exec quit? It is spewing out error messsages in a
loop. I've been pressing [CLEAR] for hours now. Isn't there a way to
interrupt it or cancel it?


Re: I know it's dumb, but.......

2006-10-06 Thread Doug Breneman




I cannot take credit for this information.  It was appended by 
Gerard.  Here is his append:
 
preceeded/followed by (not all of which are recognized by some
countries and some have been depreciated):

   deka or deca D or Dk 10** 1
   hectoH   10** 2
   kilo K   10** 3
   myriaMy  10** 4
   mega M   10** 6
   giga G   10** 9
   tera T   10**12
   peta P   10**15
   exa  E   10**18
   zettaZ   10**21
   yottaY   10**24
   xentaX   10**27
   wektaW   10**30
   vendeka  V   10**33
   ukekta   U   10**36
___Gerard S.
I have searched the rest of the z/VM libray for 'eka' and find 
no occurrences of it except in the CP Plan and Admin book.  I also 
searched the code library and found three occurrences.  I have notified the 
module owners of these parts, but it is relatively low on their list of things 
to do right now.
 
Doug Breneman z/VM Development  Endicott, NY
 
Thursday, October 05, 2006 6:14 PMTo: IBMVM@LISTSERV.UARK.EDUcc: 
From: "Schuh, Richard" <[EMAIL PROTECTED]>Subject: Re: I know it's 
dumb, but...
Whence 
"ukekta"? Google finds lots of references to other prefixes, but only the one 
you mentioned for ukekta.
regards, Richard Schuh 

  -Original Message-From: The IBM z/VM Operating 
  System [mailto:[EMAIL PROTECTED]On Behalf Of Doug 
  BrenemanSent: Thursday, October 05, 2006 2:18 PMTo: 
  IBMVM@LISTSERV.UARK.EDUSubject: Re: I know it's dumb, 
  but...
  I can confirm that eka is a typo in the Planning 
  and Admin book and should be exa. The VM Information Team will be notified, 
  and this book will be corrected. Thank you for bringing this to our 
  attention.In addtion, on February 
  23, 2005, Gerard Schildberger added an append that lists some prefixes from 
  deca 10**1 to ukekta 10**36. BTW, Gerard spelled exa 
  correctly.Doug Breneman IBM 
  Development Endicott, New YorkThursday, 
  October 05, 2006 2:51 PMTo: 
  IBMVM@LISTSERV.UARK.EDUcc: 
  From: "Schuh, Richard" 
  <[EMAIL PROTECTED]>Subject: Re: I 
  know it's dumb, but...I am 
  neither Greek nor a scholar, but your explanation is as described in any 
  reference I have found. Now, what is the origin of the prefix "yotta"? How did 
  "octo" get morphed to "yotta"? At least the derivation of "exa" from "hexa" is 
  fairly easy to see.Regards,Richard 
  Schuh> -Original 
  Message-> From: The IBM z/VM 
  Operating System [mailto:IBMVM@LISTSERV.UARK.EDU]On> Behalf Of Alan Altmark> Sent: Thursday, October 05, 2006 11:20 
  AM> To: 
  IBMVM@LISTSERV.UARK.EDU> Subject: Re: I 
  know it's dumb, but...>>> On Thursday, 
  10/05/2006 at 02:04 AST, "Parmelee, Phil"> <[EMAIL PROTECTED]> 
  wrote:> > I don?t mean to impose on 
  all of the ?work related?> discussions 
  here,> but.> >> > I 
  have this hang up about pronunciation. I know, it?s a personal> thing..> 
  >> > On pg 44 of z/VM CP Planning 
  and Administration> SC24-6083-03, there 
  is a> term> > Ekabytes.> 
  >> > I would like to know how to 
  pronounce it. Is it Eck as in a> short 
  e, or> Eeeeak> > as with a long E> >> > 
  People always like to set me straight, and this time I> would appreciate> it.>> I *think* 
  that's a misspelling. The word is "exabytes".> Given its origin> in the Greek "hexa" (exa is 10^6), the pronounciation 
  should> be "eksa",> not "eka". But I leave it to the Greek scholars among 
  us to confirm.>> Alan Altmark> 
  z/VM Development> IBM 
  Endicott>


Re: I know it's dumb, but.......

2006-10-05 Thread Doug Breneman

I can confirm that eka is a typo in the Planning and Admin book and should be exa.  The VM Information Team will be notified, and this book will be corrected.  Thank you for bringing this to our attention.

In addtion, on February 23, 2005, Gerard Schildberger added an append that lists some prefixes from deca 10**1 to ukekta 10**36. BTW, Gerard spelled exa correctly.

Doug Breneman  IBM Development  Endicott, New York

Thursday, October 05, 2006 2:51 PM
To: IBMVM@LISTSERV.UARK.EDU
cc: 
From: "Schuh, Richard" <[EMAIL PROTECTED]>
Subject: Re: I know it's dumb, but...


I am neither Greek nor a scholar, but your explanation is as described in any reference I have found. Now, what is the origin of the prefix "yotta"? How did "octo" get morphed to "yotta"? At least the derivation of "exa" from "hexa" is fairly easy to see.

Regards,
Richard Schuh


> -Original Message-
> From: The IBM z/VM Operating System [mailto:IBMVM@LISTSERV.UARK.EDU]On
> Behalf Of Alan Altmark
> Sent: Thursday, October 05, 2006 11:20 AM
> To: IBMVM@LISTSERV.UARK.EDU
> Subject: Re: I know it's dumb, but...
>
>
> On Thursday, 10/05/2006 at 02:04 AST, "Parmelee, Phil"
> <[EMAIL PROTECTED]> wrote:
> > I don?t mean to impose on all of the ?work related?
> discussions here,
> but.
> >
> > I have this hang up about pronunciation. I know, it?s a personal
> thing..
> >
> > On pg 44 of z/VM CP Planning and Administration
> SC24-6083-03, there is a
> term
> > Ekabytes.
> >
> > I would like to know how to pronounce it. Is it Eck as in a
> short e,  or
> Eeeeak
> > as with a long E
> >
> > People always like to set me straight, and this time I
> would appreciate
> it.
>
> I *think* that's a misspelling.  The word is "exabytes".
> Given its origin
> in the Greek "hexa" (exa is 10^6), the pronounciation should
> be "eksa",
> not "eka".  But I leave it to the Greek scholars among us to confirm.
>
> Alan Altmark
> z/VM Development
> IBM Endicott
>


Re: FPLINX086I

2006-08-09 Thread Doug Breneman
For 5.2.0, CMS Abend codes can be found in the CMS and REXX Messages and
Codes book in section Conversational Monitor System (CMS) Abend Codes.  The
information found by LookAt and appended by Alan Ackerman is extracted from
this book. The help file for FPL410E points to the CMS and REXX Messages
and Codes book.  Actually it points to z/VM: System Messages and Codes --
CMS, which is the old title for the book.  I am working with the VM
Information Development team to use the correct title for renamed books in
the HELP files.  Thank you for indirectly pointing out this problem to me.
Doug Breneman   VM Development   IBM Endicott


Re: HPC010 Abend

2006-07-10 Thread Doug Breneman
>From HCPHPC:

HPC010 Hard abend - A System-managed space page was
   released while still locked in absolute or
   logical or still being actively translated

This is at least a description of what went wrong in VM.  Jim's response is
much better since it points you to the fix for this problem.
Doug Breneman  z/VM Development  IBM Endicott

Monday, July 10, 2006 9:31 AM
To: IBMVM@LISTSERV.UARK.EDU
cc:
From: "Hughes, Jim - OIT" <[EMAIL PROTECTED]>
Subject: HPC010 Abend


We experienced our first CP abend in 6 years this weekend.  Our 2 month
old ZVM 5.1 system running on a Z890 experienced an HPC010 abend.  It's
not in the manual.

What is the root cause?

Thanks in advance.

___
Jim Hughes
603-271-5586
"Impossible is just an opinion."
"Your career is what you're paid for, your calling is what you're made
for."
"We cannot solve our problems with the same thinking we used when we
created them. Albert Einstein "


Re: VM 5.2 GCS problem (I think)

2006-05-30 Thread Doug Breneman




I have opened a problem report against the help file for GCT230E so that it 
will refer to the book title where more information can be obtained instead of 
'in this publication'.  The book is called:  Other Components 
Messages and Codes.
Thank you for bringing this to our attention.  
 
Doug Breneman   z/VM Development  IBM  Endicott, 
NY
 
Sunday, May 28, 2006 10:11 AMTo: IBMVM@LISTSERV.UARK.EDUcc: 
From: Steve Gentry <[EMAIL PROTECTED]>Subject: VM 
5.2  GCS problem (I think)Hello.  I'm getting the following messages  PDLLIP01:    233 *-* 'APRMTSK'   
                      
               PDLLIP01:        >>> 
  "APRMTSK"                   
                   PDLLIP01: GCTABD230E Command 'EXEC' failed - System 
abend 0C2-    PDLLIP01: 
Ready;                     
                      
          We RSCS and have printers attached via ethernet to our system 
Can anyone tell me where I can find some 
info on the abend code? I use HELP on VM 
for   GCTABD230E   and it says to "Refer to the GCS Abend table in 
this publication . ." What pub? 
 There isn't one listed on the HELP screen. Thanks, Steve 
G. 


Re: FCOPY

2006-04-21 Thread Doug Breneman
Jim,
I suspect it would get fixed if it ever broke; lucky for us it does not
break.  Here is the listfile stats for the FCOPY package that I am using:

$FCOPY$  $PROFILE V2 V 79 43  1 2003-05-06 15:49:38
$FCOPY$  HELPCMS  V2 V 79149  2 1998-02-05 14:07:30
$FCOPY$  XEDITV2 V116911  7 2000-05-18 11:12:25
FCOPYANNOUNCE V1 V 65  5  1 2002-05-02 15:37:51
FCOPYHELPCMS  V2 V 79565  9 2002-05-02 15:37:51
FCOPYINFO V1 V 72 80  1 1998-02-05 14:08:14
FCOPYMODULE   V2 F520  1  1 1998-04-13 08:34:53
FCOPYXMOD V2 V  19552  4 13 1998-08-21 15:35:24
FCOPYE   MODULE   V2 V  13232  3  4 1999-05-18 09:52:27
FCOPYEPI XEDITV2 V 64  7  1 1998-02-05 14:12:41
FCOPYPRO HELPXEDI V2 V 79 34  1 1998-02-05 14:12:51
FCOPYPRO XEDITV2 V 72173  2 1998-02-05 14:08:04
FCOPYTRS MODULE   V2 V  65535  3 17 1989-12-10 15:29:09
FCOPYXA  MODULE   V1 V  11104  3  3 1998-03-31 16:22:05
GARBLE   WARNING  V1 V 72 22  1 2002-05-02 15:37:51


You might want to compare what you are running with the level I am running.
I only used the files listed above.  I do not have access to any other
level of FCOPY.
Doug Breneman  z/VM Development  IBM Endicott, NY

Friday, April 21, 2006 11:56 AM
To: IBMVM@LISTSERV.UARK.EDU
cc:
From: Jim Bohnsack <[EMAIL PROTECTED]>
Subject: Re: FCOPY


Great!!  My guess is that FCOPY is probably still so widely used inside IBM
that it would be fixed if a new CMS broke something.  Right?
Jim

At 11:48 AM 4/21/2006, you wrote:
>Jim,
>I have access to z/VM 5.2.0 and FCOPY.  I have done the following:
>- create a new packlib from a set of files.
>- list the contents of the new packlib.
>- unpack the contents of the new packlib.
>- list a set of files from a packlib created in 2002.
>- unpack a set of files from a packlib created in 2002.
>
>All of these tests were successful.
>Doug Breneman  z/VM development  IBM Endicott, NY

>
>Friday, April 21, 2006 11:18 AM
>To: IBMVM@LISTSERV.UARK.EDU
>cc:
>From: Jim Bohnsack <[EMAIL PROTECTED]>
>Subject: FCOPY
>
>
>A thought that I just had was that if someone who is currently running or
>has access to z/VM 5.1 or 5.2 uses or can try FCOPY, maybe that would be
>good enough.  We are on 4.4 right now but should be on 5.2 or whatever is
>current next winter when we get a z/box.  Supposedly the mainframe will be
>out of here in 3 years or so, so if FCOPY runs on V5, that should be
>OK.  I'll be outta here in 2 1/2 years :-)
>Jim
>
>Jim Bohnsack
>Cornell Univ.
>(607) 255-1760

Jim Bohnsack
Cornell Univ.
(607) 255-1760


Re: FCOPY

2006-04-21 Thread Doug Breneman
Jim,
I have access to z/VM 5.2.0 and FCOPY.  I have done the following:
- create a new packlib from a set of files.
- list the contents of the new packlib.
- unpack the contents of the new packlib.
- list a set of files from a packlib created in 2002.
- unpack a set of files from a packlib created in 2002.

All of these tests were successful.
Doug Breneman  z/VM development  IBM Endicott, NY

Friday, April 21, 2006 11:18 AM
To: IBMVM@LISTSERV.UARK.EDU
cc:
From: Jim Bohnsack <[EMAIL PROTECTED]>
Subject: FCOPY


A thought that I just had was that if someone who is currently running or
has access to z/VM 5.1 or 5.2 uses or can try FCOPY, maybe that would be
good enough.  We are on 4.4 right now but should be on 5.2 or whatever is
current next winter when we get a z/box.  Supposedly the mainframe will be
out of here in 3 years or so, so if FCOPY runs on V5, that should be
OK.  I'll be outta here in 2 1/2 years :-)
Jim

Jim Bohnsack
Cornell Univ.
(607) 255-1760