SDSF Rexx and Output queue

2009-04-16 Thread Lizette Koehler
I am writing my first SDSF REXX program.  The process is suppose to go to 
specific output queues and get the tot-recs for each job.  If I find a job is 
GT 500,000 lines, then I will need to modify the printer to accept it, then put 
the printer back.

While reading the documentation I did not see that there was the total record 
count that I could retrieve.  Perhaps I am being to narrow in my understanding 
in SDSF/REXX.

Is it possible to do what I want?  Or do I need to use the batch SDSF job and 
then just parse the information that way?

Thanks

Lizette

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Validating existance of a Volume from REXX

2009-04-17 Thread Lizette Koehler
How to deal with a volume that is valid but offline?  The D U fail because the 
volume is offline.  This is one issue I have been struggling with.

How can I see the volumes when they are offline in REXX or through a Batch 
interface?  I know that ISMF can see volumes offline, but I have not found a 
way to emulate that outside of ISMF yet.

Lizette



I don't believe there is a VVDS on a volume if there is no VSAM, and if
the volume is non-SMS.  So a sysres volume probably might not have a
VVDS on it, and most non-SMS volumes would not as well, unless there is
VSAM.  

You could probably check for a VTOCIX if you make all of your volumes
have an index?   

I do these checks in the following REXX code using the console command:

 CONSOLE DEACTIVATE 
CONSPROF SOLDISPLAY(NO) UNSOLNUM(NM) SOLNUM(NM) UNSOLDISPLAY(NO)
 CONSOLE ACTIVATE CART(TOKEN) NAME(NAME)
 VOLA=GDGX  
 ADDRESS CONSOLE 'D U,VOL='VOLA''   
 ER = GETMSG(DMSG.,SOL,TOKEN,MASK,5)
 MSGCHECK=SUBSTR(DMSG.1,2,7)  
 IF MSGCHECK='IEE455I' THEN   
   DO 
LINE.J= 'THE VOLSER FOR GDG: 'GDGX' DOES NOT EXIST'   
J=J+1 
   END 


If you look into the CONSOLE command you can do the D U,VOL=xx
command and interogate the output.  This works for a weekly job where I
check for the existence of all of our dump datasets for actual online
volumes.  

Hope this helps.  

C. Todd Burrell, PMP, MCP
Lead z/OS Systems Programmer
ITSO
(404) 723-2017 (Cell)
 

I have written a REXX exec with an ISPF dialog that will allow a user to
copy and rename a cataloged dataset to another volume.  The user will
rename the dataset, and has the option to  catalog, or not, the new
dataset.  Also, the user has the option to delete the existing
cataloged-or-not dataset on the target volume.  

 

I've been using LISTDSI on SYS1.VVDS.Vvolume_name to validate the
existence of the target volume since the user can type in the volume
name.
However today, on the target volume, the SYS1.VVDS.Vvolume_name entry
does not exist, so LISTDSI fails with RC=16, REASON=0024 - dataset does
not exist.  

 

I'm a novice to this area, and my existing logic is probably pretty
hackish, at best.  

 

Two questions-

 

1)   Why might the SYS1.VVDS dataset not exist for the volume today?


2)   What is a better approach to volume validation?  

 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Validating existance of a Volume from REXX

2009-04-17 Thread Lizette Koehler
I guess I am just confused because ISMF can do it.  But there does not seem to 
be a batch process to do the same thing.

I know that Bill cannot see me kneeling and saying I AM NOT WORTHY.  But, it 
might be nice if someone decided to build a nice batch interface for us to use.

My philosophy is - if you do in one place why not the other?

So, is that a challenge to write a user friendly assembler program that could 
be called by ANYTHING that will return the volser based on a UCB address, or 
return a UCB address based on a volser?


Lizette




z/OS deliberately obscures the volser in the UCB when it is offline - and the 
only way to read it is to construct your own low level I/O program to read the 
device label - the sort of thing that Bill Fairchild does 5 times before 
breakfast.  





How to deal with a volume that is valid but offline?  The D U fail because the 
volume is offline.  This is one issue I have been struggling with.

How can I see the volumes when they are offline in REXX or through a Batch 
interface?  I know that ISMF can see volumes offline, but I have not found a 
way to emulate that outside of ISMF yet.

Lizette



I don't believe there is a VVDS on a volume if there is no VSAM, and if 
the volume is non-SMS.  So a sysres volume probably might not have a 
VVDS on it, and most non-SMS volumes would not as well, unless there is 
VSAM.

You could probably check for a VTOCIX if you make all of your volumes
have an index?   

I do these checks in the following REXX code using the console command:

 CONSOLE DEACTIVATE 
CONSPROF SOLDISPLAY(NO) UNSOLNUM(NM) SOLNUM(NM) UNSOLDISPLAY(NO)
 CONSOLE ACTIVATE CART(TOKEN) NAME(NAME)
 VOLA=GDGX  
 ADDRESS CONSOLE 'D U,VOL='VOLA''   
 ER = GETMSG(DMSG.,SOL,TOKEN,MASK,5)
 MSGCHECK=SUBSTR(DMSG.1,2,7)  
 IF MSGCHECK='IEE455I' THEN   
   DO 
LINE.J= 'THE VOLSER FOR GDG: 'GDGX' DOES NOT EXIST'   
J=J+1 
   END 


If you look into the CONSOLE command you can do the D U,VOL=xx 
command and interogate the output.  This works for a weekly job where I 
check for the existence of all of our dump datasets for actual online 
volumes.

Hope this helps.  

C. Todd Burrell, PMP, MCP
Lead z/OS Systems Programmer
ITSO
(404) 723-2017 (Cell)
 

I have written a REXX exec with an ISPF dialog that will allow a user 
to copy and rename a cataloged dataset to another volume.  The user 
will rename the dataset, and has the option to  catalog, or not, the 
new dataset.  Also, the user has the option to delete the existing 
cataloged-or-not dataset on the target volume.

 

I've been using LISTDSI on SYS1.VVDS.Vvolume_name to validate the 
existence of the target volume since the user can type in the volume 
name.
However today, on the target volume, the SYS1.VVDS.Vvolume_name entry 
does not exist, so LISTDSI fails with RC=16, REASON=0024 - dataset does 
not exist.

 

I'm a novice to this area, and my existing logic is probably pretty 
hackish, at best.

 

Two questions-

 

1)   Why might the SYS1.VVDS dataset not exist for the volume today?


2)   What is a better approach to volume validation?  

 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Moving Prod VSAM dataset to TEST lpar

2009-04-17 Thread Lizette Koehler
What version of the operating system?
What security is in place to touch the production VSAM dataset?
Are these systems connected?  Or are they totally separate (Dasd, Channels, 
etc...)

If the dasd can be seen by both systems and you have the security, then the 
following will work

DFDSS Backup / Restore with new name
FDR Backup / Restore with new name

Vsam REPRO out and REPRO into a new name.

Probably lots of other tools.
Then there are other tools like XCOM, NDM, etc...

Lizette






What needs to be done to move a VSAM dataset from Prod lpar to Test lpar.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Interval Migration in DFHSM and SETSYS parm

2009-04-18 Thread Lizette Koehler
I had 3 storage groups that had INTERVALMIGRATION indicated.  However, in
the DFHSM parms I have NOINTERVALMIGRATION specified.  And yet, I had IM
running like it was indicated on  these 3 storage groups.

I thought only if I had INTERVALMIGRATION turned on in the ARCCMDxx member
would it run.  That if a Q SETSYS showed NOINTERVALMIGRATION then even if it
was specified, it would not commence.

I did not issue any F DFHSM, commands to turn on INTERVALMIGRATION.  So I do
not think it should have been running to start with.


What am I missing here?

Lizette

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Interval Migration in DFHSM and SETSYS parm

2009-04-18 Thread Lizette Koehler
z/os 1.9 at rsu 0901 and z/os v1.9 at rsu 0808.  We share everything!

These versions all use the same SCDS/ACDS files and BCDS/MCDS/OCDS/Journal
files

Lizette

 
 Lizzette,
 
 I would take this up with IBM. If Q Setsys shows Nointervalmigration
 but Q Autoprogress (or HSM Joblog)  shows Interval Migration then
something is
 wrong.
 What software level are you running?
 
 Dave O'Brien
 NIH Contractor
 
 From: IBM Mainframe Discussion List [ibm-m...@bama.ua.edu] On Behalf Of
Lizette
 Koehler [stars...@mindspring.com]
 Sent: Saturday, April 18, 2009 9:38 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: Interval Migration in DFHSM and SETSYS parm
 
 I had 3 storage groups that had INTERVALMIGRATION indicated.  However, in
 the DFHSM parms I have NOINTERVALMIGRATION specified.  And yet, I had IM
 running like it was indicated on  these 3 storage groups.
 
 I thought only if I had INTERVALMIGRATION turned on in the ARCCMDxx member
 would it run.  That if a Q SETSYS showed NOINTERVALMIGRATION then even if
it
 was specified, it would not commence.
 
 I did not issue any F DFHSM, commands to turn on INTERVALMIGRATION.  So I
do
 not think it should have been running to start with.
 
 
 What am I missing here?

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Interval Migration in DFHSM and SETSYS parm

2009-04-18 Thread Lizette Koehler
Dave,
I am going to open an issue with HSM.  They do not have anything specific to
intervalmigration since 1997.  But they may have something else that affects
it under a different name.

I will let you know what happens.

Lizette


 
 We are also at 1.9 and Nointervalmigration means no intervalmigration
here. Our
 maintenance is most likely not on a par with yours. I'd have to ask.
 Like you we have multiple Lpars and share SMS and HSM control datasets.
 
 
 z/os 1.9 at rsu 0901 and z/os v1.9 at rsu 0808.  We share everything!
 
 These versions all use the same SCDS/ACDS files and BCDS/MCDS/OCDS/Journal
 files
 
 Lizette
 
 
  Lizzette,
 
  I would take this up with IBM. If Q Setsys shows Nointervalmigration
  but Q Autoprogress (or HSM Joblog)  shows Interval Migration then
 something is
  wrong.
  What software level are you running?
 
  Dave O'Brien
  NIH Contractor
  
 
  I had 3 storage groups that had INTERVALMIGRATION indicated.  However,
in
  the DFHSM parms I have NOINTERVALMIGRATION specified.  And yet, I had IM
  running like it was indicated on  these 3 storage groups.
 
  I thought only if I had INTERVALMIGRATION turned on in the ARCCMDxx
member
  would it run.  That if a Q SETSYS showed NOINTERVALMIGRATION then even
if
 it
  was specified, it would not commence.
 
  I did not issue any F DFHSM, commands to turn on INTERVALMIGRATION.  So
I
 do
  not think it should have been running to start with.
 
 
  What am I missing here?
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Interval Migration in DFHSM and SETSYS parm

2009-04-18 Thread Lizette Koehler
I guess that is why I cannot use my logic with DFHSM.  To me if the parm is
set to NOAUTOMIGRATION, then it should not do it until I change it.

I get so confused sometimes with SMS.  ;-D

Lizette

 
 Thanks Brian, I missed the Automigrate=I in Lizette's original post.
 Lizette, Here's the quote from the manual:
 
 I specifies that data sets are eligible for primary space
 management and specifies that DFSMShsm is to perform automatic
 interval migration independent of the DFSMShsm Setsys
 Intervalmigration option.  I also causes DFSMShsm to perform the
 same functions as if Y had been specified. Interval migration is
 performed on only those volumes whose occupancy is at or above
 their high threshold. The most frequent DFSMShsm can do interval
 migration is hourly. If you select I with a low threshold value
 of 0, DFSMShsm migrates all the eligible data sets in the
 selected storage group. I is most useful for storage groups used
 with tape mount management.
 
 Brian's right, you want Automigrate=Y
 
 
 Interval migration depends on the value specified AUTO MIGRATE Value for
the
 storage group.
 
 If AUTOMIGRATE=I then interval migration will run even if SETSYS
 NOINTERVALMIGRATION and INTERVALMIGRATIONTASKS(0) is in place.
 
 If you want/need these parameters to be used then you need to use
 AUTOMIGRATE=Y.
 
 Brian
 
 On Sat, Apr 18, 2009 at 10:00 PM, Lizette Koehler
 stars...@mindspring.comwrote:
 
  Dave,
  I am going to open an issue with HSM.  They do not have anything
specific
  to
  intervalmigration since 1997.  But they may have something else that
  affects
  it under a different name.
 
  I will let you know what happens.
 
  Lizette
 
 
  
   We are also at 1.9 and Nointervalmigration means no intervalmigration
  here. Our
   maintenance is most likely not on a par with yours. I'd have to ask.
   Like you we have multiple Lpars and share SMS and HSM control
datasets.
  
  
   z/os 1.9 at rsu 0901 and z/os v1.9 at rsu 0808.  We share everything!
  
   These versions all use the same SCDS/ACDS files and
  BCDS/MCDS/OCDS/Journal
   files
  
   Lizette
  
   
Lizzette,
   
I would take this up with IBM. If Q Setsys shows Nointervalmigration
but Q Autoprogress (or HSM Joblog)  shows Interval Migration then
   something is
wrong.
What software level are you running?
   
Dave O'Brien
NIH Contractor

   
I had 3 storage groups that had INTERVALMIGRATION indicated.
However,
  in
the DFHSM parms I have NOINTERVALMIGRATION specified.  And yet, I
had
  IM
running like it was indicated on  these 3 storage groups.
   
I thought only if I had INTERVALMIGRATION turned on in the ARCCMDxx
  member
would it run.  That if a Q SETSYS showed NOINTERVALMIGRATION then
even
  if
   it
was specified, it would not commence.
   
I did not issue any F DFHSM, commands to turn on INTERVALMIGRATION.
So
  I
   do
not think it should have been running to start with.
   
   
What am I missing here?
  

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: VSAM extended allocation

2009-04-20 Thread Lizette Koehler
What is the details of  your dataclas - VSAMEXT?

Lizette

  We have a VSAM extended dataset that have filled a 3390-9 volume and we need 
  to
 reallocate it.
  
 But……
  I’m not sure I understand how it was allocated the way it is.
  Currently:
  The dataset is on one volume and is 149.700 tracks (data), 308 tracks 
  (index). Data
 and index are on same volume.
  The dataclass has a blank volume count.
  The IDCAMS input used to allocate with is:
DEFINE-
CLUSTER-
(NAME(PROD.AMB.AMBARKIV)-
FREESPACE(0,0)-
VOLUME(* *)   -
CYL(12000 50)-
SUBAL SPEED NWCK-
RECORDSIZE(150,1582)-
TO(2049365)-
SHR(2)-
IXD-
DATACLASS(VSAMEXT) -
KEYS(14,0))-
DATA-
(NAME(PROD.AMB.AMBARKIV.DATA)-
CISZ(8192))-
INDEX-
(NAME(PROD.AMB.AMBARKIV.INDX)-
CISZ(1024))
What I do not understand is why the dataset do not allocate a secondary 
extend on a
 new volume in the storagegroup – there is free space in the storagegroup.
The ‘VOLUME(* *)’ parameter should overwrite the volume count attribute in 
the
 dataclass or….?
I would like to avoid a similar allocation and have the new version 
allocated on at least 2
 volumes.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: DFHSM QUESTION - REORG OF MCDS

2009-04-20 Thread Lizette Koehler
And select a time when you can take down all of the DFHSM STCs that share the 
datasets.

I would not run the backup part until DFHSM was down in all places it needs to 
be.  I usually wait until my xCDS dataset is closer to 98% full to reorg.  One 
reorg usually last me a year or so.  We are not heavy in HSM usage.

Lizette




Perhaps the better question is - At what rate is John losing available space 
in his MCDS?
Has it been 93% full for the past 6 months or was it 75% full last week and he 
can expect a phone call from OPs in the near future to the effect that HSM is 
inoperative?
IBM answer 3# - It depends.

If it needs to be re-org'd then do as Walter suggests and modify the supplied 
jcl in Samplib.


Good Day,
 
We have a new client on board.  I have noticed that the MCDS is at 93%.  I
have never reorged the HSM cds's (for this client).  I would like to know if
my reorg job is okay.  Please let me know if I am missing anything or spot
something irregular?
/*

Are you sure you want to reorg your CDS ?
I thought good practice was not to do that because you 'll end up splitting
ci/ca for inserts for few weeks, thus having performance impact.
It used to be a recomendation not to do it. Has it changed?


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: SMF 60 records Extract

2009-04-21 Thread Lizette Koehler
You might want to look at the utility DAF on the cbt tape (www.cbttape.org).
It should be able to do this for you.  It already has the format of the SMF
records handled and will produce reports based on many many items (dsn,
date, time, etc...)

Or you can look at the System Management Facility manual (SMF) for the
IFASMFDP program.

Lizette


 
 I want to find the number of inserts, updates against a file in MVS.
Though
 it worked through CICS and Batch, and running 110 records against it is
not
 giving me much of it.
 I have always worked with CICS 110 records only. Can someone here providw
me
 the JCL for extractin 60 records for a ESDS file.
 
 Thanks in Advance
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: ISPF Question

2009-04-27 Thread Lizette Koehler
To go to any function in ISPF you usually issue =2  or =3.4  and so forth.

Lizette




I think it was on IBM-MAIN I saw this fairly recently. I have been in
the archive and can't find the reference.

 

A command to put the screen names along the bottom of the screen so that
you could position the cursor and jump directly to that screen.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: DFHSM QUESTION - HRECOVER

2009-04-28 Thread Lizette Koehler
A couple of steps I take

1)  HLIST DSN(dsname here) BOTH
This shows me if it has both and MCDS and BCDS entry.

2)  My ACS code will produce WRITE statements when things don't work.  

3)  Under TSO issue TSO PROF and see if you have INTERCOM WTPMSG and MSGID (if 
any of them are NO - NOINTERCOM, NOWTPMSG, NOMSGID) then turn them on:  TSO 
PROF MSGID WTPMSG INTERCOM 

4)  See if there are any message in the DFHSM log for this file.  Perhaps DFDSS 
(ADR messages) are there to explain more why it could not recall the dataset.

5)  See if SYSLOG shows any security errors when DFHSM tried to recover the 
file.


Most likely cause could be that the ACS code cannot put the file on the volume 
for some reason.

The ARC1170I messages for RC02 states

 02An error occurred while attempting to allocate space on the
   target volume for the recall or recovery of a non-VSAM data set.   
   Either DFSMShsm encountered an error attempting to invoke the  
   VTOC/Data Set Services' (VDSS) create space function or VDSS had   
   a failure creating the space. If the storage class assigned by 
   your ACS routines is using guaranteed space, ensure that the   
   assigned storage class has the original volume serials that the
   data set was created with, otherwise allocation fails. Check the   
   command activity log for messages indicating the actual failure
   reason. Look for ARC0935I for a failure reason and SMS message 
   IGD306I. If you received SMS IGD306I-UNEXPECTED ERROR DURING   
   INTEXPDT PROCESSING, RETURN CODE 8, REASON CODE 1017, the  
   problem may be the data set expiration date in the DFSMShsm MCC
   record for a recover function. 
  

Lizette


-Original Message-
From: esmie moo esmie_...@yahoo.ca
Sent: Apr 28, 2009 1:35 PM
To: IBM-MAIN@bama.ua.edu
Subject: DFHSM QUESTION - HRECOVER

Good Morning Gentle Readers,
 
I am trying to recover a dsn that was migrated by DFHSM.  The original dataset 
was deleted today (15 minutes ago).  My problem is that when I submit the 
HRECOVER I get the following error.  I looked up the error message and it 
points to an SMS problem.  Since this dsn was created in 1996 and the storage 
class no longer exists how can I bypass SMS ?
ARC1001I SML.THH.LIB RECOVER FAILED, RC=0070, REAS=0002 
ARC1170I DFSMSHSM ENCOUNTERED AN SMS-RELATED ERROR WHILE PROCESSING A DATA SET 
 
I tried the  BYPASSACS(**) -  but the command was rejected. 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Who to report TESTCASE.BOULDER.IBM.COM Issues

2009-04-28 Thread Lizette Koehler
How do I report a problem connecting to TESTCASE.BOULDER.IBM.COM to in IBM?

I keep getting a  EDC8118I Network is unreachable.  when trying to FTP doc to 
IBM.

Lizette

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Who to report TESTCASE.BOULDER.IBM.COM Issues

2009-04-28 Thread Lizette Koehler
I touched nothing and it is now working.

Must have been a temporary glich in IBM land.

Lizette




Lizette,

I would start with your internal network support team.

I just connected to testcase.boulder.ibm.com and logged in using anonymous 
with no problems.

John P. Baker

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Lizette Koehler
Sent: Tuesday, April 28, 2009 3:50 PM
To: IBM-MAIN@bama.ua.edu
Subject: Who to report TESTCASE.BOULDER.IBM.COM Issues

How do I report a problem connecting to TESTCASE.BOULDER.IBM.COM to in IBM?

I keep getting a  EDC8118I Network is unreachable.  when trying to FTP doc to 
IBM.

Lizette


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: relationship between directory blocks and the number of members in a PDS ?

2009-04-30 Thread Lizette Koehler
That will depend on a couple of things.

A rule of thumb I have used is 

Loadlib 4 members per DIR Blk
Source 7 member per Dir Blk if ISPF Statistics are OFF
Source 4 member per Dir Blk if ISPF Statistics are ON

I do not have numbers for PDS/E datasets and Directory Blocks.

I have not looked at this in a while.  But this usually works for me.

Lizette


 
 Hi all,
 Can somebody tell me what is the relationship between
 directory blocks and the number of members in a PDS ?
 
 
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: replacement for proc pds rename function...

2009-04-30 Thread Lizette Koehler
Yes, that and TSO RENAME also works, but I think the OP is looking for
something with wildcard capabilities.
For example rather than code PROC1 PROC2 PROC3 and ignore TPROC1 APROC1 etc,
the OP has coded

PROC PDS DDNAME=RENLIB01;
 CHANGE YYY:=XXX:;

Which is SAS-speak for Change all PROCs that being with YYY to XXX and the
trailing characters should be left as is.  

If you want to rename a member or members of the PDS, use the CHANGE
statement. Specify the old name on the left side of the equal sign, and
specify the new name on the right. 

Both of these tools require specific names.

Lizette


 
 Don and responding contributors
 
 Maybe I'm being grossly old-fashioned - and I am certainly grossly
out-of-date
 regarding MVS Utilities - but I believe when I wanted to create a batch
job[1]
 in order to rename the member of a partitioned data set, procedure members
 in procedure libraries included, I used the entirely free - sorry, at no
extra
 cost from IBM - utility IEHPROGM. The appropriate example - found quickly
by
 searching for rename on the Contents web page of the z/OS DFSMSdfp
 Utilities (SC26-7414-04) manual (to be found in the z/OS V1R10 DFSMS
 bookshelf):
 
 http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2U130
 
 Specifically 14.5.7 Example 7: Rename a Partitioned Data Set Member.
 
 quote
 
//REN  JOB  ...
//STEP1EXEC PGM=IEHPROGM
//SYSPRINT DD  SYSOUT=A
//DD1  DD  VOL=SER=22,DISP=OLD,UNIT=disk
//SYSINDD  *
   RENAME
 VOL=disk=22,DSNAME=DATASET,NEWNAME=BC,MEMBER=ABC
/*
 
 
 /quote
 
 In effect, all the suggestions would appear to be *replacements* for the
 original IBM IEHPROGM utility which I am prepared to bet predates the
 programs named in these suggestions - and SAS - by many blue moons.
 
 Is there some subtlety I missed here caused by my long neglect of the use
of
 MVS Utilities - or have so many alternatives cropped up in the good
times
 packaged with must-have products that folk have forgotten about the
 original at no extra cost utilities?
 
 Chris Mason
 
 [1] With the aid of a little program which converted PARM field data into
utility
 input control data sets - among other uses - and a little program which
 displayed the contents of the utility output print data set on the console
 wrapped up in handy started task procedures, I set up many frequently used
 functions - even incorporating some into automation - which relied on
 absolutely standard MVS utilities such as IEHPROGM. This was for use -
long
 ago now - with test/education systems where the only significant MVS
 console was the 3270 where the VM userid for the MVS guest was logged on.
 
 On Thu, 30 Apr 2009 04:01:09 -0500, don isenstadt
 don.isenst...@gmail.com wrote:
 
 Well times are tough so we are dropping sas .. is there a shareware
function
 that will do this??
 
 PROC PDS DDNAME=RENLIB01;
  CHANGE YYY:=XXX:;
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


JES2 Command to display JNUM usage

2009-04-30 Thread Lizette Koehler
We are running z/OS V1.9

I need to be able to display all JES2 queues with the number of jobs in
each.  I will be adding this to our OPS/MVS process when $HASP050 for JNUM
occurs.

Currently we have run successfully with JNUM set to 10,000; normally we use
5,000 per day.  Our purge processes are working.  What I need to do is get
better doc at the time of the HASP050 message.  I will add a $DJOBDEF and
$DSPOOLDEF.  Just trying to find some more to get a better idea of what is
going on.

Is there a way in JES2 to issue a command to say 
Input QUEUE A 100 Jobs
OUTPUT QUEUE A 20 Jobs, etc?  

If not, I will look at the SDSF In batch and have OPS submit a batch job to
collect the info.


Lizette

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: IBM SCRT Reports Cobol Usage

2009-05-06 Thread Lizette Koehler
One ramification is that IBM can bill you big time.  We made an error like this 
(NO89 DDs issue) in our SCRT and it was going to cost us several 100,000 of 
dollars.  However, we reran our SCRT process to correct the numbers and IBM 
gave us a Credit.  Apparently they don't do refunds.

Lizette




Should only this LPAR be specified in our monthly IBM SCRT reports or the
names of all LPAR's in which Cobol programs run?

When I set up SCRT, I was told (by IBM), that they needed (wanted?) all LPARs.
Not just the ones running products under sub-capacity licences.


The *SMF data* from all LPARs is required.  But each customer has to manually
code NO89 DDs for products that don't cut SMF89 records in order to show
IBM where the product is used so they can bill you based on the max 4 hr
rolling average.  You are on the honor system to do this (I don't sign 
contracts so I don't know what the ramifications are if you screw up).

I would suggest that you ask your IBM rep this question, since IBM may have
different terms in your country, than they have in Canada.


The OP doesn't need to ask his IBM rep.  All the information is publicly 
available from this web site:

http://www-03.ibm.com/servers/eserver/zseries/swprice/index.html
http://www-03.ibm.com/servers/eserver/zseries/swprice/wlc/


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Something Strange

2009-05-07 Thread Lizette Koehler
Has someone FORCED this ID out of the system earlier?  If so, then an IPL may 
be the solution.
Could you do a D A,userid and provide the display?

Lizette




Greetings.

I have a tso id with no stepname, job id or owner and I can't get it out of 
the system  This an ADCD system at 1.7 and upon an ipl, the id come back.

Any attempt to cancel/purge gets No JCT available.  How do I get it out of 
the system.  The tso id is un-usable as it comes back and says already logged 
on.

What am I missing?



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Something Strange

2009-05-08 Thread Lizette Koehler
Fred,

Depending on if you are using JES2 and the level, there is a command to
remove a job from JES2, 

To remove all traces of a job structure from the JES2 job queue. WARNING: If
improperly used, the ZAPJOB command can cause JES2 ABENDs, including ABENDs
on multiple systems. Be sure to review the entire documentation before you
use this command. ZAPJOB can be used to remove all traces of a job structure
from the JES2 job queue. It is intended to be used in situations where a job
cannot be removed using normal JES2 commands or by a JES2 restart. You must
take special care to ensure that the job and any output it may have created
are not active in any JES2 process and not active on a device. Zapping a job
that is active can lead to ABENDs and the loss of a PCE until JES2 is
restarted. ZAPJOB will not correct queue errors. If the JOB or output queue
has an error, a JES2 restart is needed to rebuild the job queue. When
specifying a job to zap, IBM recommends that you specify as many operands as
are known for the job being zapped. This reduces the possibility of
accidentally zapping the wrong job because of a typing error.

This can avoid the use of a COLD START.  However, you may have to cold start
if the job is still somewhat alive if you use this.

Lizette


 
 with the previous posts, I am unclear on *what* you actually did. To me it
 sounded as if you only see this address space in SDSF, not via normal MVS
 system commands. Meaning that there is no address space by that name, it
 is 'just' a bad entry left somewhere in JES2. This would explain why a
JES2
 warmstart still shows it when a cold start does get rid of it.
 
 So, not having seen the actual MVS command response to a D A,SPRTREB, did
 you ever try the MVS command
 c LCL709?
 
 Did you try any MVS commands other than line commands from SDSF?
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: How to display Stars for Password in ISPF

2009-05-08 Thread Lizette Koehler
I kinda thought that might be the answer.  Maybe I will put in a Share Request 
for ISPF to do this.

Hum

Lizette

-Original Message-
From: McKown, John jmck...@healthmarkets.com
Sent: May 8, 2009 1:36 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: How to display Stars for Password in ISPF

 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:ibm-m...@bama.ua.edu] On Behalf Of Lizette Koehler
 Sent: Friday, May 08, 2009 12:25 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: How to display Stars for Password in ISPF
 
 I am trying to create a panel that has something like a 
 password field.  When you enter the password, it replaces the 
 characters as they are typed from source to stars.
 
 Is this possible?  Or is INTENS(NON) my only option?
 
 Lizette

INTENS(NON) is basically your only option. Remember that 3270 protocol is 
block oriented and so it cannot respond to each individual keystroke the way 
that the PC or UNIX terminal can. What would be interesting would be an 
enhancement to the 3270 protocol to specify what the replacement characters 
is for a non-display field.

--
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

 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


EKM and Hash Keys

2009-05-11 Thread Lizette Koehler
I have not worked with this yet.  My 3rd party wants me to use HASH instead of 
Dataclas for encrypting a tape. (I think I understood that correctly???)

So what is the difference between using a HASH KEY and a DATACLAS with EKM?

I am reading the books, but I still get lost in them.

Lizette

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: EKM and Hash Keys

2009-05-11 Thread Lizette Koehler
Okay, so if I understand.

I get the public key from the 3rd party client.
I import the key into my environment.
I code my JCL to use 
  // KEYLABL1=’MyEKMServerJCEKS’, 
  // KEYENCD1=L, 
  // KEYLABL2=’CompanyXPublicKeyJCEKS’,  
  // KEYENCD2=H,

Where my public key is called MyEKMServerJCEKS and the 3rd party's public key 
is called CompayXPublicKeyJCEKS that I had imported into my system.

My system is setup to use the JCERACFKS keystore for encryption with E05 Tape 
Drives in a TS3500.

The KEYENCD2=H is where the HASH is handled?

Lizette
 




I have not worked with this yet.  My 3rd party wants me to use HASH 
instead of Dataclas for encrypting a tape. (I think I understood that 
correctly???)

So what is the difference between using a HASH KEY and a DATACLAS with 
EKM?

I am reading the books, but I still get lost in them. 

Lizette, 

maybe there's been some sort of misunderstanding HASH is a MODE of 
using a KEY to encrypt data on tape; the other one is LABEL. 
Usually you use HASH when are encrypting data using a PUBLIC certificate 
coming from a partner 

You can declare HASH mode in SMS dataclas or in DD JCL. 

Hope this helps.



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


DFHSM and WLM Settings

2009-05-11 Thread Lizette Koehler
I ran into a small issue where when using Interval Migration DFHSM took all the 
resources on my small LPAR.  Even on my largest LPAR it still consumes a lot of 
resources.

IBM Suggested I set DFHSM to STCMED.  My concern is that since we have a lot of 
tasks in WLM at SYSSTC (not my choice) that if a recall or migrate was 
requested, that DFHSM might be impacted by the other high runnings tasks.

Has anyone delt with Interval Migration and controlling it via WLM?

Does anyone else have DFHSM in STCMED and if so, how is that working for DFHSM.

Lizette

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: GDG tool?

2009-05-18 Thread Lizette Koehler
For these types of issues, I usually do a 3.4 list with SAVE to a dataset, then 
create the ALTER control cards en-masse.

Once the ISPF LIST dataset has been altered, I then just EX it.


Or sometimes I would write a rexx to create the ALTER control cards.

Lizette




   Does anyone out there have anything that will 'mass-change' GDGs from
NOSCRATCH to SCRATCH?

 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


SMPE Rename of Module and Alias

2009-05-18 Thread Lizette Koehler
I am getting ready to write a usermod to rename a module that has an alias.

Do you have to do a ++RENAME to both the module and then for its alias?  The 
manual is not helping me understand that.

Lizette

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: System data sets and 3390-27

2009-05-18 Thread Lizette Koehler
One thing I would look at is which datasets might run into conentions when on 
the same Mod27.  I am not sure if this still holds true, but I would hesitate 
to put the JES2 Checkpoint, SPool and CA1 TMC all on the same volume.  Nor 
would I want to put page datasets with other datasets on the same volume.

I believe you might see some poorer performace from doing this.

I think there are still system datasets that need to be kept on separate 
volumes to prevent poor performance.

However, if you are going to put on RACF Data Base  on one Mod27 - nothing else 
on that volume, then some might question the waste of space.  I am sure there 
is a balance to those issues.

Lizette




We are moving from a Shark with no PAV's to a EMC SAN with PAV's.  We are 
going to use 3390-27's.  I have read most of the archives on 3390-27's but I 
did not see anything on running your sysres or system data sets from a 27?  
We are thinking about going totally with 3390-27's, which means we must run 
with the sysres, jes checkpoint and spool, catalogues, RACF database, etc on 
the 27's.  Is anyone doing that?  What do we need to watch out for?


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: System data sets and 3390-27

2009-05-19 Thread Lizette Koehler
If I understand DASD correctly, our mainframe dasd is carved out of the EMC
storage (or whomever) array.  This dasd lays virtually across multiple disks
in the storage array depending on its RAID configuration.  And you may or
may not use BCV or PAV.

I am currently working with a DMX4500 storage array running 73GB disks at
15,000RPM.  It is transparent to me what it does with the definitions that
are my 3390 dasd farm.

Once the dasd is carved as a 3390 type device it is still a full volume as
far as the mainframe is concerned.  The storage array might be doing
something with virtualization, I am not sure.  But once you make it a 3390-3
or 3390-9 or 3390-27 and so forth it is a full volume of that size to the
mainframe.  The storage array will select the storage on its disk where that
will be setting (hence virtual dasd).  Does the storage array actually have
that storage all tied up for that device?  I am not sure, but on the
mainframe side it will look like that type of disk.

So we no longer have the old cabinets spinning the round brown disks with
3390 technology.  We now have a storage array that pretends to be 3390 dasd
but the storage array deals with how the data lays across its disks internal
in the device.

But for me - I still see it as a 3390-xx.  I clip it, format it, move
datasets to it just like I use to.

I would think that there are still performance issues for these virtual
disks so that we should consider keeping certain dataset types on their own
individual dasd.  Which is where storage arrays are great.  You can create a
3390-1 which I will define as so many cylinders.  It can contain my
individual datasets, like RACF DB, JES Ckpt, or others.  So now I can have a
10 cyl, 1000 cyl, or any size I like and call it a 3390-1 which I can put
those types of dataset upon.

I am still learning about this storage array environment.  And I always
learn something new whenever I work with them.  It's a new frontier for me.

Lizette

 
 On Mon, 18 May 2009 16:02:56 -0400, Lizette Koehler
 stars...@mindspring.com wrote:
 
 However, if you are going to put on RACF Data Base  on one Mod27 -
nothing
  else on that volume, then some might question the waste of space.  I am
  sure there is a balance to those issues.
 
 
 Not knowing the internals of that SAN thing... But still... I was
convinced that
 all that is virtualized in such a way that waste of space is actually not
an
 issue anymore. As the actual physical spinning platters are only used when
 there is actual data to store, allocating a big 3390 and not writing
anything on
 it should not consume much capacity, no?
 
 Mind commenting, those who know (not me...).
 
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Migrate at close

2009-05-20 Thread Lizette Koehler
Just so I have a clearer understanding -
  Is this to create a backup or DR file for offsite?
  Could you use a management class that would move it to ML2 a little later?
Does it need to be immediate?
Could you have a second management class that you could use occasionally
that would migrate to ML2?
  Is this because you do not always want to migrate to ML2 but only
occasionally?
  
Thanks.

Lizette


 
 In some cases ,  it would be nice to migrate a dataset to ML2,  as soon
 as it has been writen and closed.
 Can I achive this ?
 
 Search the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


EKM and Public Keys

2009-05-20 Thread Lizette Koehler
I have added the public key from our partner into our Top Secret envrionment.  
Now I need to see if it actually encrypted with that public key.  Here I am 
still not understanding this process of public keys so well.

IEC205I SYSUT2,LK41591T,COPYIT1,FILESEQ=1, COMPLETE VOLUME LIST,  
DSN=STORAGE.ENCRYPT$.TEST.VOL4R,VOLS=300027, 
LISTED VOL(S) HAVE BEEN DATA ENCRYPTED,KL1CD:L,KL2CD:H,  
KL1=rsaceru,KL2=EMKLOWES,TOTALBLOCKS=1   

I then took the tape and wrote back out the file.  Which was successful.  I 
thought if I used a public key I would not be able to read the tape again.  Yet 
my test did not support that thought.

So my questions
1)  When you encrypt a tape with a public key, can you still read it?
2)  How can you verify that the tape is actually setup to use the public key 
and not my private key?
3)  We are using EKM software from IBM, are there any displays that will help 
me verify that my partner will be able to read the tape?
Anything in ISMF, or CA1?

Thanks

Lizette

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: EKM and Public Keys

2009-05-20 Thread Lizette Koehler
Mark,

I have tried it with both the KEYLABL1 and KEYLABL2 parms.  They both fail the 
same way - I am not able to encrpyt the key that way.


//SYSUT1  DD DISP=SHR,DSN=TSO.LK41591.PDF.CNTL(IDCAMS)  
//SYSUT2  DD DISP=(,CATLG,DELETE),UNIT=CART,DATACLAS=ENCRYPT,   
//   RETPD=1,   
//   KEYLABL1='EMKLOWES',   
//   KEYENCD1=H,
//   DSN=STORAGE.ENCRYPT$.TEST.VOL4V
IOS000I 0A0C,10,IOE,01,0E00,,**,300113,LK41591T  584
  
 804C08C022402751 0001FF00 0005EE310092 2004E8205D6F2011
  
 ENCRYPTION FAILURE 
  
 CU = 00 DRIVE = 00 EKM = 05EE31
  
IEC512I I/O ERR 0A0C,300113,SL,LK41591T,COPYIT1,STORAGE.ENCRYPT$.TEST.VOL4V 
  
IEC518I SOFTWARE ERRSTAT: INTLABEL 0A0C,300113,SL,LK41591T,COPYIT1  
  


Lizette


-
Lizette Koehler wrote:
 I have added the public key from our partner into our Top Secret 
 envrionment.  Now I need to see if it actually encrypted with that public 
 key.  Here I am still not understanding this process of public keys so well.

 IEC205I SYSUT2,LK41591T,COPYIT1,FILESEQ=1, COMPLETE VOLUME LIST,  
 DSN=STORAGE.ENCRYPT$.TEST.VOL4R,VOLS=300027, 
 LISTED VOL(S) HAVE BEEN DATA ENCRYPTED,KL1CD:L,KL2CD:H,  
 KL1=rsaceru,KL2=EMKLOWES,TOTALBLOCKS=1   

 I then took the tape and wrote back out the file.  Which was successful.  I 
 thought if I used a public key I would not be able to read the tape again.  
 Yet my test did not support that thought.

 So my questions
 1)  When you encrypt a tape with a public key, can you still read it?
 2)  How can you verify that the tape is actually setup to use the public key 
 and not my private key?
 3)  We are using EKM software from IBM, are there any displays that will 
 help me verify that my partner will be able to read the tape?
 Anything in ISMF, or CA1?

 Thanks

 Lizette

   
If you encrypted the tape with two keylabels, one from your generated
keypair and the other one from your partner then yes you should be able
to read it. Try encrypting the tape with only their key. Your attempt to
read the tape should fail since you don't have the associated private
key in your environment.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: EKM and Public Keys

2009-05-20 Thread Lizette Koehler
According to metadata it says 

keyalias1=rsaceru
keyalias2=EMKLOWES

Does this mean it is okay? that my partner will be able to decrypt the tape?

Lizette


IF you look in the metadata.xml, or use the utility to format it, it
tells which key was used to encrypt the tape.


Lizette Koehler wrote:
 Mark,

 I have tried it with both the KEYLABL1 and KEYLABL2 parms.  They both
fail the same way - I am not able to encrpyt the key that way.


 //SYSUT1  DD DISP=SHR,DSN=TSO.LK41591.PDF.CNTL(IDCAMS)  
 //SYSUT2  DD DISP=(,CATLG,DELETE),UNIT=CART,DATACLAS=ENCRYPT,   
 //   RETPD=1,   
 //   KEYLABL1='EMKLOWES',   
 //   KEYENCD1=H,
 //   DSN=STORAGE.ENCRYPT$.TEST.VOL4V
 IOS000I 0A0C,10,IOE,01,0E00,,**,300113,LK41591T  584

  804C08C022402751 0001FF00 0005EE310092 2004E8205D6F2011

  ENCRYPTION FAILURE

  CU = 00 DRIVE = 00 EKM = 05EE31

 IEC512I I/O ERR
0A0C,300113,SL,LK41591T,COPYIT1,STORAGE.ENCRYPT$.TEST.VOL4V   
 IEC518I SOFTWARE ERRSTAT: INTLABEL 0A0C,300113,SL,LK41591T,COPYIT1



 Lizette


   

Look in the EKM audit log. You might get some additional error
information there. I tend to find the real reason for encryption
failures there not in the joblog.

snip

This e-mail transmission contains information that is confidential and may be 
privileged.   It is intended only for the addressee(s) named above. If you 
receive this e-mail in error, please do not read, copy or disseminate it in 
any manner. If you are not the intended recipient, any disclosure, copying, 
distribution or use of the contents of this information is prohibited. Please 
reply to the message immediately by informing the sender that the message was 
misdirected. After replying, please erase it from your computer system. Your 
assistance in correcting this error is appreciated.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


How do you handle SMS Pools out of space

2009-05-21 Thread Lizette Koehler
We have a couple of SMS pools that are usually 80% free all the time.  However, 
occasionally they do fill up and I need to manually do ML2 migrations so the 
appls can continue to work.

I am considering creating a rexx that gets kicked off by OPS/MVS to do the 
migration for me.   I would probably monitor for IGD17216I and IGD17272I.

I was just wondering what other options might be available (other than interval 
migration in DFHSM).

How do you handle the need to migrate datasets out of a pool when it gets too 
full.  What type of automation or manual process to you have available to you.

Thanks 

Lizette

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: How do you handle SMS Pools out of space

2009-05-22 Thread Lizette Koehler
Just to provide a little more detail.

The pool is dedicated to DB2 Archive Logs.  Normally our process of a low 
threshold and migrating every night works fine.  The pool stays about 80% free, 
 However, when there is a runaway DB2 function or a large purge, it can fill up 
quite quickly.  It is these emergencies I am working on.  The speed at which 
the archive logs are written can overwhelm a spill group or extend pool.  

I will probably go ahead and develop the REXX for an automated migration on the 
pool.  I have a utility from the CBT to collect the dataset names I need to 
issue the migrate against.  By the way, my DBAs are quite happy with dasd 
archives and do not want to use tape for their archives.

Thanks for all the suggestions.

Lizette


 
 There are many ways.  Creating overflow groups generally get messy over time 
 because
 of the nature of the allocations.  There is also Extended Storage Groups that 
 can be
 defined in the DFSMS Constructs.  Again, this can become messy over time.
 Doing aggressive migration, whether through interval migration or lower 
 thresholds of
 the storage groups can create serious thrashing problems within DFHSM.
 Creating the REXX based on IGD messages is an option.  In order to perform the
 migration on the correct data sets to prevent problems, you will need to 
 access the
 VTOC and determine based on days unreferenced, size, and data type what to 
 migrate,
 and how many.  Do you migrate everything based on 14 days unreferenced, 
 greater
 than 300 cylinders, and only PS data sets, or do you pick some other 
 criteria?  Do you
 do something additional to move more data if the first migration did not 
 create enough
 free space?
 Also using SAS and DCOLLECT is an option, which is what I used before I got 
 gray
 hair.  :-)  I finally got tired of maintaining the code and bought a solution 
 from a
 vendor.  That was almost 15 years ago.
 
 
 
 We have a couple of SMS pools that are usually 80% free all the time.  
 However,
 occasionally they do fill up and I need to manually do ML2 migrations so the 
 appls can
 continue to work.
 
 I am considering creating a rexx that gets kicked off by OPS/MVS to do the 
 migration
 for me.   I would probably monitor for IGD17216I and IGD17272I.
 
 I was just wondering what other options might be available (other than 
 interval
 migration in DFHSM).
 
 How do you handle the need to migrate datasets out of a pool when it gets too 
 full.
 What type of automation or manual process to you have available to you.
 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: DFHSM QUESTION - UNABLE TO BACKUP DSN

2009-05-28 Thread Lizette Koehler
Willie,

When you issue a manual HBACK it should be immediate.  You should have some
messages in your DFHSM task or logs and if done through TSO a message should
come back to that session with more information.  The messages should tell
you why the HBACK did not work.

I have seen it not work due to a migrate not having been done first.

Lizette


 
 Good Morn,
 
 Could somedbody advise as to how I can trigger the backup of a dsn.  I
issued the
 command HBACK FE2.FOCUS.MONTHLY.RESULTS.  The command was accepted
 however nothing happens.  I checked the DFHSM parm and I noticed that the
 autobackup start is as follows:
 SETSYS AUTOBACKUPSTART(0100 0300 0530)
 
 Could that be the reason why?  If so, to fix the problem, if I issue
 SETSYS AUTOBACKUPSTART(0700 0800 0830) would that be a work around?  I
also
 noticed that there are BACKUP=1740 waiting when I did the HSEND Q AC
W.
 How can I just run my backup and nothing else?
 
 Thanks.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: DFHSM QUESTION - UNABLE TO BACKUP DSN

2009-05-29 Thread Lizette Koehler
Willie,

In your listing it shows
DATA SET BACKUP=DASD HELD,

Do you want this held?

Lizette




Here it is:
ARC0101I QUERY ACTIVE COMMAND STARTING ON HOST=G   
ARC0144I AUDIT=NOT HELD AND INACTIVE, LIST=NOT HELD AND INACTIVE, RECYCLE=NOT  
ARC0144I (CONT.) HELD AND ACTIVE, REPORT=NOT HELD AND INACTIVE 
ARC0160I MIGRATION=NOT HELD, AUTOMIGRATION=NOT HELD, RECALL=NOT HELD,  
ARC0160I (CONT.) TAPERECALL=NOT HELD, DATA SET MIGRATION=INACTIVE, VOLUME  
ARC0160I (CONT.) MIGRATION=INACTIVE, DATA SET RECALL=INACTIVE  
ARC0163I BACKUP=NOT HELD, AUTOBACKUP=NOT HELD, RECOVERY=NOT HELD,  
ARC0163I (CONT.) TAPEDATASETRECOVERY=NOT HELD, DATA SET BACKUP=DASD HELD,  
ARC0163I (CONT.) VOLUME BACKUP=INACTIVE, DATA SET RECOVERY=INACTIVE, VOLUME    
ARC0163I (CONT.) RECOVERY=INACTIVE 
ARC0276I DATA SET BACKUP=INACTIVE, DATA SET BACKUP ACTUAL IDLETASKS=(ALLOC=00, 
ARC0276I (CONT.) MAX=00)   
ARC1826I FRBACKUP=NOT HELD AND INACTIVE,FRRECOV=NOT HELD AND INACTIVE,FRBACKUP 
ARC1826I (CONT.) DUMP=NOT HELD AND INACTIVE,FRRECOV(TAPE)=NOT HELD AND INACTIVE


--- On Fri, 5/29/09, O'Brien, David W. (NIH/CIT) [C] obrie...@mail.nih.gov 
wrote:


From: O'Brien, David W. (NIH/CIT) [C] obrie...@mail.nih.gov
Subject: Re: DFHSM QUESTION - UNABLE TO BACKUP DSN
To: IBM-MAIN@bama.ua.edu
Received: Friday, May 29, 2009, 6:58 AM


Willie,

Kindly post the following from your Q AC

ARC0163I BACKUP=NOT HELD, AUTOBACKUP=NOT HELD, RECOVERY=NOT HELD,              
ARC0163I (CONT.) TAPEDATASETRECOVERY=NOT HELD, DATA SET BACKUP=NOT HELD, VOLUME
ARC0163I (CONT.) BACKUP=INACTIVE, DATA SET RECOVERY=INACTIVE, VOLUME           
ARC0163I (CONT.) RECOVERY=INACTIVE                                             
ARC0276I DATA SET BACKUP=INACTIVE, DATA SET BACKUP ACTUAL IDLETASKS=(ALLOC=00,
ARC0276I (CONT.) MAX=00) 

It is the value of the second line above that controls Dataset Backup, namely  
DATA SET BACKUP=NOT HELD.
                                                      
Dave O'Brien
NIH Contractor

From: IBM Mainframe Discussion List [ibm-m...@bama.ua.edu] On Behalf Of willie 
bunter [williebun...@yahoo.com]
Sent: Friday, May 29, 2009 9:55 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: DFHSM QUESTION - UNABLE TO BACKUP DSN

I verfied the STC.  The CDS backups were successfully executed at 05:01 a.m.:

ARC0741I CDS BACKUP ENDING AT 05:01:18 ON 2009/05/29,
ARC0741I (CONT.) STATUS=SUCCESSFUL

I checked the status - HSEND Q AC W  it displays the following:
BACKUP=1895.  Of note the backup is not held - BACKUP=NOT HELD.  At 
present 2 recall tasks are executing, 1 migrate task is underway.

I displayed the CDS and it shows the MCDS at 92% the journal is as follows:
JOURNAL TOTAL SPACE=215280 K-BYTES, CURRENTLY ABOUT 006% FULL,


--- On Thu, 5/28/09, Gibney, Dave gib...@wsu.edu wrote:


From: Gibney, Dave gib...@wsu.edu
Subject: Re: DFHSM QUESTION - UNABLE TO BACKUP DSN
To: IBM-MAIN@bama.ua.edu
Received: Thursday, May 28, 2009, 9:44 AM


   You've got a CDS Back-up in progress, or more likely failed. Or your JRNL 
is full and you need to issue a BACKVOL CDS command.

Dave Gibney
Information Technology Services
Washington State University


 -Original Message-
 From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
 Behalf Of willie bunter
 Sent: Thursday, May 28, 2009 7:15 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: DFHSM QUESTION - UNABLE TO BACKUP DSN

 Thanks Bill.  I have a sneaky suspicion that this has to do with the
 AUTOBACKSTART time.  I will keep on digging and let the LIST know if I
 find anything.

 --- On Thu, 5/28/09, Big Iron billlalo...@rocketmail.com wrote:


 From: Big Iron billlalo...@rocketmail.com
 Subject: Re: DFHSM QUESTION - UNABLE TO BACKUP DSN
 To: IBM-MAIN@bama.ua.edu
 Received: Thursday, May 28, 2009, 7:06 AM


 If I understand correctly, you are saying that there were 1740 backup
 requests waiting. Your request would normally go to the back of the
 queue. If there are active backup requests, then DFHSM will get around
 to yours. If there aren't any active backup requests, then there may be
 a
 problem, possibly related to processing the backup request(s) at the
 front
 of the queue. I think that it is now possible to adjust the priority of
 DFHSM requests but I haven't experimented with that feature myself.

 Bill

 On Thu, 28 May 2009 19:49:12 +0800, Brian Fraser
 brianmfra...@gmail.com wrote:

 My guess would be that the MGMTCLAS doesn't allow backup.
 
 On Thu, May 28, 2009 at 7:27 PM, willie bunter
 williebun...@yahoo.comwrote:
 
  Good Morn,
 
  Could somedbody advise as to how I can trigger the backup of a dsn.
 I
  issued the command HBACK FE2.FOCUS.MONTHLY.RESULTS.  The command was
  accepted however nothing happens.  I checked the DFHSM parm and I
 noticed
  that the autobackup start is as 

IEC161I message when reading HSM MCDS

2009-05-29 Thread Lizette Koehler
List -

When I run a DCOLLECT using the MCDS and BCDS dataset in my JCL I get the 
following error message

IEC161I 009-0663,LK41591B,DCOLLECT,MCDS,,,SYS1.DFSMSHSM.MCDS 

This is not making sense.  I am reading the IEC161I and I am not clear on what 
it is trying to say.

Any ideas?

Lizette

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: IEC161I message when reading HSM MCDS

2009-05-29 Thread Lizette Koehler
Scott - Somehow I missed that when I searched.


Lizette

 
 List -
 
 When I run a DCOLLECT using the MCDS and BCDS dataset in my JCL I get the
 following error message
 
 IEC161I 009-0663,LK41591B,DCOLLECT,MCDS,,,SYS1.DFSMSHSM.MCDS
 
 This is not making sense.  I am reading the IEC161I and I am not clear on
 what it is trying to say.
 
 Any ideas?
 
 Lizette
 
 A Google search on argument IEC161I 009-0663 yielded this match:
 
 http://ibm.com/support/docview.wss?uid=isg3T1010320
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


GRS and Generic vs Specific

2009-06-01 Thread Lizette Koehler
If I have the following in my GRS member of parmlib


RNLDEF RNL(CON)  TYPE(GENERIC)  QNAME(SYSVTOC)
RNLDEF RNL(CON)  TYPE(SPECIFIC) QNAME(SYSVTOC) RNAME(DCXCF1)
 
RNLDEF RNL(CON)  TYPE(SPECIFIC) QNAME(SYSVTOC) RNAME(DCXCF2)
 
RNLDEF RNL(CON)  TYPE(SPECIFIC) QNAME(SYSVTOC) RNAME(DCXCF3)
 

Does not the GENERIC for SYSVTOC do the same thing as the three specific 
definitions?

I am thinking I do not need the three specific ones so long as I have the 
GENERIC for SYSVTOC.

Lizette

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: SYSLOG-Routing codes

2009-06-01 Thread Lizette Koehler
Yes there is information.

In section  4.1.15 SYSLOG records

in the manual:   z/OS V1R9.0 MVS Planning: Operations
Document Number: SA22-7601-08

should help you here.

Lizette



Trying to interp routing code(s) on left side of syslog.

Is there a break down of the codes that are displayed and meanings??

example below

N C00 XA91 09152 14:33:02.95  0281  $HASP309 INIT 15 
INACT


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Question concerning pre-mature uncatalog/delete of a tape file.

2009-06-02 Thread Lizette Koehler
Does this job RGWOPMSC have EXPDT coded in the JCL?  Is there something in the 
CA1 exit to change EXPDT in certain conditions?  

Do you use the following exits:  CL05228  CL05232  CL05245 
How is TMOOPT00  coded?  

MG3480  YES   ISSUE NOT SCRATCH MSGS TO 3480 DISPLAY  
SCRTCH  NOTMSCLEAN SCRATCH EXTERNAL SECURITY  
SCRCAT  YES   SCRATCH EVEN IF CATALOG'ED  



Lizette




  Yes I recalled the default 5 day default retention as well.

Here are the DAF records for the file:
2009142 20.18.01.43 4090 RGWOPMSC
SDC=28 NUC=1 SUC=24 VOL=522187 DD=M4OLD OPE=20.16.48.80 CRTDT=09135 EXPDT=99000
DISP=Old BUFNO=2 DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=3914  
LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3913 DSSNO=522187 

2009142 20.18.36.15 4090 RGWOPMSC
SDC=28 NUC=1 SUC=24 VOL=522187 DD=SYSUT2 OPE=20.18.24.31 CRTDT=09142   
EXPDT=0 DISP=Old DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=42
LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187  

2009142 20.36.54.65 4090 RGWOPDOF   
SDC=28 NUC=1 SUC=24 VOL=522187 DD=M4OLD OPE=20.36.41.28 CRTDT=09142 EXPDT=0
DISP=OldShr BUFNO=5 DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 
EXCP=3916 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187 
   
2009144 22.00.24.19 4090 RGWOPMHF   
SDC=28 NUC=1 SUC=24 VOL=522187 DD=SYSUT1 OPE=22.00.14.36 CRTDT=09142   
EXPDT=0 DISP=OldShr DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 
EXCP=83 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187 

2009149 00.05.19.80 4090 STGTMSSC
SUB=Delete FNC=Uncatalog CAT=SYSICF.USERCAT.UCAT05 TYP=NonVSAM_Dataset 

Here is the alleged JCL that referenced the file before it went scratch 5 days 
later.
//COPY.SYSUT1 DD DSN=APA3JLC.PUBLIC.MASTER,DISP=SHR,
// UNIT=ETAPE

Not sure why they specify UNIT=ETAPE for a cataloged input file. But they 
claim to have been doing this for years.
And before I forget, we are at Zos 1.9 with Jes2. File is not SMS managed.

Something else I find strange is the DISP=Oldshr in jobs RGWOPDOF and 
RGWOPMHF. I checked the JCL and DISP=SHR is specified.

e.

IIRC 5 days is the default hold before scratch for a catalog controlled
tape in order to prevent a catalog issue causing tapes to go scratch.
Look at catalog records (60-69) and see if the data set was uncataloged
prior to that date.



All opinions expressed by me are mine and may not agree with my employer
or any person, company, or thing, living or dead, on or near this or any
other planet, moon, asteroid, or other spatial object, natural or
manufactured, since the beginning of time.


 -Original Message-
 From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
 Behalf Of O'Brien, David W. (NIH/CIT) [C]
 Sent: Tuesday, June 02, 2009 1:26 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: Question concerning pre-mature uncatalog/delete of a tape
 file.

 User complained the other day that we had destroyed one of their
tapes.

 I ran a DAF report and sure enough TMS had scratched the tape and
 uncataloged the file.

 When the tape was originally created it was under catalog control so
 that TMS should not have trashed it.
 But as I look at the DAFRPT I see the EXPDT change from 99000 to 0
 and back again.
 The last entry 5 days before TMS scratched showed Expdt=0.
 I would have thought that once a tape was created with Expdt=99000,
 then that field should have remained 99000. Or does 99000 have to be
 coded in the JCL each time the tape is used?

 Dave O'Brien
 NIH Contractor

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Question concerning pre-mature uncatalog/delete of a tape file.

2009-06-02 Thread Lizette Koehler
I forgot one more field.  The OCTLG.  What is that set to.

And that job that uses DISP=OLD has EXPDT=99000 coded?  Amazing.

Lizette



Lizzette,

Sorry, I mis-typed. There are no CA1 exits in use.



Hi Lizzette,

Thanks for chiming in.

Yes, RGWOPMSC has Expdt=99000
No, CA1 exits are in use.

MG3480  YES
SCRTCH  NO
SCRCAT  YES

Dave O'Brien
NIH Contractor

From: IBM Mainframe Discussion List [ibm-m...@bama.ua.edu] On Behalf Of 
Lizette Koehler [stars...@mindspring.com]
Sent: Tuesday, June 02, 2009 3:22 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Question concerning pre-mature uncatalog/delete of a tape file.

Does this job RGWOPMSC have EXPDT coded in the JCL?  Is there something in the 
CA1 exit to change EXPDT in certain conditions?

Do you use the following exits:  CL05228  CL05232  CL05245
How is TMOOPT00  coded?

MG3480  YES   ISSUE NOT SCRATCH MSGS TO 3480 DISPLAY
SCRTCH  NOTMSCLEAN SCRATCH EXTERNAL SECURITY
SCRCAT  YES   SCRATCH EVEN IF CATALOG'ED



Lizette




  Yes I recalled the default 5 day default retention as well.

Here are the DAF records for the file:
2009142 20.18.01.43 4090 RGWOPMSC
SDC=28 NUC=1 SUC=24 VOL=522187 DD=M4OLD OPE=20.16.48.80 CRTDT=09135 
EXPDT=99000
DISP=Old BUFNO=2 DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=3914
LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3913 DSSNO=522187

2009142 20.18.36.15 4090 RGWOPMSC
SDC=28 NUC=1 SUC=24 VOL=522187 DD=SYSUT2 OPE=20.18.24.31 CRTDT=09142
EXPDT=0 DISP=Old DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 
EXCP=42
LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187

2009142 20.36.54.65 4090 RGWOPDOF
SDC=28 NUC=1 SUC=24 VOL=522187 DD=M4OLD OPE=20.36.41.28 CRTDT=09142 
EXPDT=0
DISP=OldShr BUFNO=5 DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1
EXCP=3916 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187

2009144 22.00.24.19 4090 RGWOPMHF
SDC=28 NUC=1 SUC=24 VOL=522187 DD=SYSUT1 OPE=22.00.14.36 CRTDT=09142
EXPDT=0 DISP=OldShr DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1
EXCP=83 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187

2009149 00.05.19.80 4090 STGTMSSC
SUB=Delete FNC=Uncatalog CAT=SYSICF.USERCAT.UCAT05 TYP=NonVSAM_Dataset

Here is the alleged JCL that referenced the file before it went scratch 5 
days later.
//COPY.SYSUT1 DD DSN=APA3JLC.PUBLIC.MASTER,DISP=SHR,
// UNIT=ETAPE

Not sure why they specify UNIT=ETAPE for a cataloged input file. But they 
claim to have been doing this for years.
And before I forget, we are at Zos 1.9 with Jes2. File is not SMS managed.

Something else I find strange is the DISP=Oldshr in jobs RGWOPDOF and 
RGWOPMHF. I checked the JCL and DISP=SHR is specified.

e.

IIRC 5 days is the default hold before scratch for a catalog controlled
tape in order to prevent a catalog issue causing tapes to go scratch.
Look at catalog records (60-69) and see if the data set was uncataloged
prior to that date.



All opinions expressed by me are mine and may not agree with my employer
or any person, company, or thing, living or dead, on or near this or any
other planet, moon, asteroid, or other spatial object, natural or
manufactured, since the beginning of time.


 -Original Message-
 From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
 Behalf Of O'Brien, David W. (NIH/CIT) [C]
 Sent: Tuesday, June 02, 2009 1:26 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: Question concerning pre-mature uncatalog/delete of a tape
 file.

 User complained the other day that we had destroyed one of their
tapes.

 I ran a DAF report and sure enough TMS had scratched the tape and
 uncataloged the file.

 When the tape was originally created it was under catalog control so
 that TMS should not have trashed it.
 But as I look at the DAFRPT I see the EXPDT change from 99000 to 0
 and back again.
 The last entry 5 days before TMS scratched showed Expdt=0.
 I would have thought that once a tape was created with Expdt=99000,
 then that field should have remained 99000. Or does 99000 have to be
 coded in the JCL each time the tape is used?

 Dave O'Brien
 NIH Contractor


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Question concerning pre-mature uncatalog/delete of a tape file.

2009-06-02 Thread Lizette Koehler
David,

I might run the TMSAUDIT report on the volser and see what it says.  I do not 
know at this point why CA1 might have changed the EXPDT from 99000 to 0 
unless something told it to (TMSCLEAN, or TMSCRATCH) 

See if the AUDIT shows anything.

VOLSER=?? 
TYPE=0,1,2,3,4 
FORMAT=LONG

Lizette



-Original Message-
From: O'Brien, David W. (NIH/CIT) [C] obrie...@mail.nih.gov
Sent: Jun 2, 2009 3:46 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Question concerning pre-mature uncatalog/delete of a tape file.

OCTLG   YES

DISP=(OLD,PASS,CATLG), with EXPDT=99000

Dave O'Brien
NIH Contractor

From: IBM Mainframe Discussion List [ibm-m...@bama.ua.edu] On Behalf Of 
Lizette Koehler [stars...@mindspring.com]
Sent: Tuesday, June 02, 2009 3:36 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Question concerning pre-mature uncatalog/delete of a tape file.

I forgot one more field.  The OCTLG.  What is that set to.

And that job that uses DISP=OLD has EXPDT=99000 coded?  Amazing.

Lizette



Lizzette,

Sorry, I mis-typed. There are no CA1 exits in use.



Hi Lizzette,

Thanks for chiming in.

Yes, RGWOPMSC has Expdt=99000
No, CA1 exits are in use.

MG3480  YES
SCRTCH  NO
SCRCAT  YES

Dave O'Brien
NIH Contractor

From: IBM Mainframe Discussion List [ibm-m...@bama.ua.edu] On Behalf Of 
Lizette Koehler [stars...@mindspring.com]
Sent: Tuesday, June 02, 2009 3:22 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Question concerning pre-mature uncatalog/delete of a tape file.

Does this job RGWOPMSC have EXPDT coded in the JCL?  Is there something in 
the CA1 exit to change EXPDT in certain conditions?

Do you use the following exits:  CL05228  CL05232  CL05245
How is TMOOPT00  coded?

MG3480  YES   ISSUE NOT SCRATCH MSGS TO 3480 DISPLAY
SCRTCH  NOTMSCLEAN SCRATCH EXTERNAL SECURITY
SCRCAT  YES   SCRATCH EVEN IF CATALOG'ED



Lizette




  Yes I recalled the default 5 day default retention as well.

Here are the DAF records for the file:
2009142 20.18.01.43 4090 RGWOPMSC
SDC=28 NUC=1 SUC=24 VOL=522187 DD=M4OLD OPE=20.16.48.80 CRTDT=09135 
EXPDT=99000
DISP=Old BUFNO=2 DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 EXCP=3914
LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3913 DSSNO=522187

2009142 20.18.36.15 4090 RGWOPMSC
SDC=28 NUC=1 SUC=24 VOL=522187 DD=SYSUT2 OPE=20.18.24.31 CRTDT=09142
EXPDT=0 DISP=Old DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1 
EXCP=42
LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187

2009142 20.36.54.65 4090 RGWOPDOF
SDC=28 NUC=1 SUC=24 VOL=522187 DD=M4OLD OPE=20.36.41.28 CRTDT=09142 
EXPDT=0
DISP=OldShr BUFNO=5 DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1
EXCP=3916 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187

2009144 22.00.24.19 4090 RGWOPMHF
SDC=28 NUC=1 SUC=24 VOL=522187 DD=SYSUT1 OPE=22.00.14.36 CRTDT=09142
EXPDT=0 DISP=OldShr DSORG=PS RECFM=VB BLKSIZE=32760 LRECL=32420 NVOL=1
EXCP=83 LTYP=SL FLSQ=1 DEBVL=1 DCBBL=3915 DSSNO=522187

2009149 00.05.19.80 4090 STGTMSSC
SUB=Delete FNC=Uncatalog CAT=SYSICF.USERCAT.UCAT05 TYP=NonVSAM_Dataset

Here is the alleged JCL that referenced the file before it went scratch 5 
days later.
//COPY.SYSUT1 DD DSN=APA3JLC.PUBLIC.MASTER,DISP=SHR,
// UNIT=ETAPE

Not sure why they specify UNIT=ETAPE for a cataloged input file. But they 
claim to have been doing this for years.
And before I forget, we are at Zos 1.9 with Jes2. File is not SMS managed.

Something else I find strange is the DISP=Oldshr in jobs RGWOPDOF and 
RGWOPMHF. I checked the JCL and DISP=SHR is specified.

e.

IIRC 5 days is the default hold before scratch for a catalog controlled
tape in order to prevent a catalog issue causing tapes to go scratch.
Look at catalog records (60-69) and see if the data set was uncataloged
prior to that date.



All opinions expressed by me are mine and may not agree with my employer
or any person, company, or thing, living or dead, on or near this or any
other planet, moon, asteroid, or other spatial object, natural or
manufactured, since the beginning of time.


 -Original Message-
 From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
 Behalf Of O'Brien, David W. (NIH/CIT) [C]
 Sent: Tuesday, June 02, 2009 1:26 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: Question concerning pre-mature uncatalog/delete of a tape
 file.

 User complained the other day that we had destroyed one of their
tapes.

 I ran a DAF report and sure enough TMS had scratched the tape and
 uncataloged the file.

 When the tape was originally created it was under catalog control so
 that TMS should not have trashed it.
 But as I look at the DAFRPT I see the EXPDT change from 99000 to 0
 and back again.
 The last entry 5 days before TMS scratched showed Expdt=0.
 I would have thought that once a tape was created with Expdt=99000,
 then that field should have remained 99000. Or does 99000 have to be
 coded in the JCL each time

Re: Question concerning pre-mature uncatalog/delete of a tape file.

2009-06-03 Thread Lizette Koehler
David, 

The second step seems to be a proc over ride statement.  What does the
SYSUT2 DD statement look like in the COPY Proc?

I would think that if there were an issue with CA1 then you would have more
than one tape dataset getting expired and scratched like this.  It is more
likely that the way the job ran caused the tape to be scratched.  The
original output from the job would be so helpful in resolving this issue.
However, since you no longer have that output, I am not sure what other
steps could help identify the issue.

Did you run the TMS AUDIT?  If so, what did it show?



Lizette


 
 Yes, I did notice that.
 
 Checking the jcl the first reference to the dataset in question is
 
 //M4OLD  DD  DSN=HLQ.PUBLIC.MASTER,DISP=(OLD,PASS,CATLG),
 //   UNIT=ETAPE,EXPDT=99000
 
 The second reference is a Icegener
 
 //COPY.SYSUT2  DD  DSN=HLQ.PUBLIC.MASTER,DISP=(OLD,KEEP)
 
 One would think Expdt=99000 should have been coded here but that is not
the case.
 
 I'm sure that you noticed but the CRTDT changed with RGWOPMSC @ 2009142
 20.18.36.15. It went from
 CRTDT=09135 EXPDT=99000 at 20.18.01.43 to CRTDT=09142 EXPDT=0 at
 20.18.36.15. And it looks like the same job? I don't know how to read DAF
 but could a step in the job (SYSUT2) opened the tape for output and
 changed TMS?
 Just a thought
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: HSM: Recall uncataloged data set

2009-06-03 Thread Lizette Koehler
I think you use RECOVER rather than RECALL when it is not cataloged.

Lizette




Hello everyone.  I have some datasets on ML2 that have long since been
uncataloged that I need to recall. I've loked for ways to either recatalog
then recall them or recall and recatalog them, but no luckthere yet.  


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: HSM: Recall uncataloged data set

2009-06-03 Thread Lizette Koehler
Howard,

I am not sure how you would catalog  a volser of MIGRAT2 which is 7 chars.  The 
VSAM Define seems to only allow for 6 chars.

Maybe somebody on the list can figure this out.

Lizette




The onl copy I have is the tape ML2.  As far as I can tell,  my MCDS data is
good, it's just that the data set has been uncataloged for a very long time
so HSM on't allow the recall.  I'm trying to research recating to MIGRAT2
but so far I'm strikin' out.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: ENQMAXU/ENQMAXA

2009-06-03 Thread Lizette Koehler
Have you issued a D GRS,A command and reviewed that.

Lizette



We have intermittently began seeing these messages in the log, followed by
the 'all clear now' one.

*ISG368E THE CONCURRENT UNAUTHORIZED REQUEST COUNT FOR ASID 0122 44
 HAS EXCEEDED THE 80 PERCENT THRESHOLD OF THE SYSTEM-WIDE MAXIMUM, 
 16384

I have spent some time sifting thru enque reports and haven't been able to
correlate any Total Events counts to any number even approaching 16K, the
address space in the message is the ESP aux a/s and ESP is just coming live
in this 2 system plex (running STAR mode).

Is there anywhere to look or some D GRS command to be issued at the time of
the message to see what qname/rname is being used, OR, short of dumping the
A/S to see whats foing on inside of it from a grs view ?


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: ENQMAXU/ENQMAXA

2009-06-03 Thread Lizette Koehler
Oops,  I meant a D GRS,RES=(*,*) and see what all you have out there?

Probably could use ENQ in ISRDDN as well.

Lizette




Have you issued a D GRS,A command and reviewed that.

Lizette



We have intermittently began seeing these messages in the log, followed by
the 'all clear now' one.

*ISG368E THE CONCURRENT UNAUTHORIZED REQUEST COUNT FOR ASID 0122 44
 HAS EXCEEDED THE 80 PERCENT THRESHOLD OF THE SYSTEM-WIDE MAXIMUM, 
 16384

I have spent some time sifting thru enque reports and haven't been able to
correlate any Total Events counts to any number even approaching 16K, the
address space in the message is the ESP aux a/s and ESP is just coming live
in this 2 system plex (running STAR mode).

Is there anywhere to look or some D GRS command to be issued at the time of
the message to see what qname/rname is being used, OR, short of dumping the
A/S to see whats foing on inside of it from a grs view ?



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Smpe batch jcl question about a job to apply _all_ service from a cbpdo

2009-06-03 Thread Lizette Koehler
What is the GIM message that produces the RC04?

Lizette



Does this look right? The check gets a rc 4. I combined the KDSJ1APP job
from the tape (line 340002) and the sourceids from the memo to users
extension (lines 345102-346202) and the smppunch output from a report
errorsysmods (lines 348902-350702). 


//KQKTEMPS  JOB (3356,277),'KLEIN, KEN',MSGLEVEL=(1,1),
00010001
//  CLASS=L,MSGCLASS=X,NOTIFY=SYSUID,REGION=0M
00020001
//* JOBCARD CREATED AT 12:32:42 ON  3 JUN 2009
00030002
//* JES NODE=EREPNODE SYSTEM=TESTT1 LEVEL=JES2 Z/OS 1.9
00040002
//* JCL TO RUN THIS JOB: KQKTEMP.$TSO.WORK(SMPAPPLY)
00050002
/*JOBPARM LINES=99,CARDS=99
00060001
//*=+1+2+3+4+5+6+7==
00070002
//SMP   EXEC PGM=GIMSMP,
00080001
//  REGION=4096K,PARM='CSI=SVS.IBMOM.GLOBAL.CSI'
00090001
//SYSLIBDD   DSN=SYS1.MACLIB,DISP=SHR
0011
//SMPLOGDD   SYSOUT=*
00110002
//SMPLOGA   DD   SYSOUT=*
00120002
//SMPCNTL   DD   *
00230001
SET BOUNDARY ( OMTZN  ) .
00240002
APPLY SELECT( HKDS621HKLV621 )
00340002
SOURCEID(
00345002
HIPER PUT0507 PUT0510
00345102
PUT0601 PUT0604 PUT0606
00345202
PUT0607 PUT0609 PUT0611
00345302
PUT0612 PUT0701 PUT0703
00345402
PUT0704 PUT0706 PUT0710
00345502
PUT0802 PUT0805 PUT0808
00345602
PUT0809 PUT0812 PUT0901
00345702
PUT0902 PUT0904 RSU0508
00345802
RSU0603 RSU0606 RSU0609
00345902
RSU0612 RSU0703 RSU0706
00346002
RSU0709 RSU0803 RSU0809
00346102
RSU0812 RSU0903
00346202
UA45246  /* RESOLVES AA27365 FOR UA43385 FMID(HKC5410) */
00348902
UK41992  /* RESOLVES AK76361 FOR HKDB410 FMID(HKDB410) */
00349002
UK43610  /* RESOLVES AK77345 FOR HKDB410 FMID(HKDB410) */
00349102
UK44062  /* RESOLVES AK77532 FOR HKDB410 FMID(HKDB410) */
00349202
UK43916  /* RESOLVES AK79736 FOR HKDB410 FMID(HKDB410) */
00349302
UK43934  /* RESOLVES AK80329 FOR HKDB410 FMID(HKDB410) */
00349402
UK44097  /* RESOLVES AK80459 FOR HKDB410 FMID(HKDB410) */
00349502
UK44771  /* RESOLVES AK81520 FOR HKDB410 FMID(HKDB410) */
00349602
UK44995  /* RESOLVES AK82448 FOR HKDB410 FMID(HKDB410) */
00349702
UA45957  /* RESOLVES AA27811 FOR HKM2550 FMID(HKM2550) */
00349802
UA46559  /* RESOLVES AA28367 FOR UA44538 FMID(HKM2550) */
00350002
UA45277  /* RESOLVES AA26814 FOR HKM5410 FMID(HKM5410) */
00350102
UA46208  /* RESOLVES AA28056 FOR HKM5410 FMID(HKM5410) */
00350202
UA45034  /* RESOLVES AA27272 FOR HKOB550 FMID(HKOB550) */
00350302
UA44056  /* RESOLVES AA26495 FOR HKSB550 FMID(HKSB550) */
00350402
UA45746  /* RESOLVES AA27060 FOR HKS3410 FMID(HKS3410) */
00350602
UA45521  /* RESOLVES AA27668 FOR HKS3410 FMID(HKS3410) */
00350702
)
00351102
GROUPEXTEND
00351402
REDO
00351502
BYPASS(HOLDSYSTEM(ACTION))
00351602
CHECK
00351701
.
00352001
/*


Ken Klein
Sr. Systems Programmer
kenneth.kl...@kyfb.com
502-495-5000 x7011



On Wed, 3 Jun 2009 12:34:52 -0500, Kirk Wolf k...@dovetail.com wrote:

FWIW, if you run java via the JZOS Batch launcher with the LOGLVL='+D'
option, it will print out the requested vs actual 
below-line/above-line/above-bar storage from the LDA.

Kirk Wolf
Dovetailed Technologies

In which case IEFUSI (SYS.IEFUSI) will still be in effect, but you can
easily add MEMLIMIT= to your JCL (but IEFUSI can still override it).



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: ENQMAXU/ENQMAXA

2009-06-03 Thread Lizette Koehler
Have you considered raising the ENQMAXU and ENQMAXA numbers to eliminate the 
message?

Lizette

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Question concerning pre-mature uncatalog/delete of a tape file.

2009-06-06 Thread Lizette Koehler
You are welcome.

Sometimes we forget the simplest things and that is what we are here for.
To help us remember the stuff we forget.  :-D 

Lizette


Lizette,

  A belated Thank You is in order for suggesting TMSAUDIT and then gently
reminding me when I didn't run it when you first suggested.

  The volume which was scratched had Expdt=LDATE/005 from 2008/323 until
2009/144. On 2009/149 it was picked up by TMSCLEAN and scratched.

  File now is under Catalog control.
 


.

David,

The second step seems to be a proc over ride statement.  What does the
SYSUT2 DD statement look like in the COPY Proc?

I would think that if there were an issue with CA1 then you would have more
than one tape dataset getting expired and scratched like this.  It is more
likely that the way the job ran caused the tape to be scratched.  The
original output from the job would be so helpful in resolving this issue.
However, since you no longer have that output, I am not sure what other
steps could help identify the issue.

Did you run the TMS AUDIT?  If so, what did it show?



Lizette



 Yes, I did notice that.

 Checking the jcl the first reference to the dataset in question is

 //M4OLD  DD  DSN=HLQ.PUBLIC.MASTER,DISP=(OLD,PASS,CATLG),
 //   UNIT=ETAPE,EXPDT=99000

 The second reference is a Icegener

 //COPY.SYSUT2  DD  DSN=HLQ.PUBLIC.MASTER,DISP=(OLD,KEEP)

 One would think Expdt=99000 should have been coded here but that is not
the case.

 I'm sure that you noticed but the CRTDT changed with RGWOPMSC @ 2009142
 20.18.36.15. It went from
 CRTDT=09135 EXPDT=99000 at 20.18.01.43 to CRTDT=09142 EXPDT=0 at
 20.18.36.15. And it looks like the same job? I don't know how to read DAF
 but could a step in the job (SYSUT2) opened the tape for output and
 changed TMS?
 Just a thought


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Supersession to CA-TPX

2009-06-11 Thread Lizette Koehler
Bill -

I converted our Super Session to TPX in 2007.  There is no utility.
However, if you are not too heavy in the panels with SS it is not too bad.

So you know, I know no VTAM, I know not about communication software.  And
yet, I was able to do this conversion.

If you need help, write me offlist.  I can share what I know about ACLE
(Which you WILL need and it is an add on product $$).  We are next door
neighbors and so will be glad to lend a hand.

And you will be going from a Cadillac to a Hugo with this process.  TPX does
not handle everything that SS does nor in the same manner.  It is simple,
efficient and lacking in a lot of bells and whistles.

Lizette



 
 This may be a bit off topic, but, does anyone know if a utility exists
 to convert session manager Supersession ids and profiles to CA-TPX?
 
 Last time I checked with CA they said I was on my own.
 
 
 
 Bill Widmayer
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Language Environment runtime options and system dumps

2009-06-16 Thread Lizette Koehler
I apologize for not keeping up with this thread.  If the intent is to use
IPCS to debug an LE SVC Dump, then you need to use VERBX LEDATA and get hold
of the DSA and one other control block.

The LE DSA will point you to the regs at time of abend.  I think you always
get the U40xx abend out of LE.  The IPCS VERBX LEDATA will take you to the
info you are looking for in the SVC Dump.

If this is already known, I apologize for repeating this.

From the Language Environment Debugging Guide  GA22-7560-09
Understanding the Language Environment IPCS Verbexit LEDATA output The
Language Environment IPCS Verbexit LEDATA generates formatted output of the
Language Environment run-time environment control blocks from a system dump.
Figure 14 on page 89 illustrates the output produced when the LEDATA
Verbexit is invoked with the ALL parameter. The system dump being formatted
was obtained by specifying the TERMTHDACT(UADUMP) run-time option when
running the program CELSAMP in Figure 5 on page 44. Sections of the
Language Environment LEDATA Verbexit formatted output on page 100 describes
the information contained in the formatted output. Ellipses are used to
summarize some sections of the dump. For easy reference, the sections of the
following dump are numbered to correspond with the descriptions in Sections
of the Language Environment LEDATA Verbexit formatted output on page 100.
88 z/


Lizette


 
 This is from the LE Debugging Guide, which seems pretty clear to me -
 
  *TRAP(ON,NOSPIE)* *TERMTHDACT(UAIMM)* TRAP(ON,NOSPIE)
 TERMTHDACT(UAIMM)
 generates a system dump of the user address space of the original abend or
 program interrupt prior to the Language Environment condition manager
 processing the condition.
 
 except that I still get a u4039 abend and the psw points to the LE abend
 svc.
 
 g !
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: What to use to find tape utilization?

2009-06-16 Thread Lizette Koehler
There are a nice set of STORAGE TOOLS on IBM website.  They are free and do
a good job at identifying tape stuff, like BLKSIZE under utilization, Tape
Length, etc...

ftp://ftp.software.ibm.com/storage/tapetool/

Lizette

 Subject: What to use to find tape utilization?
 
 We need to determine the utilization of a 3592 tape.  What program or
utility
 do people use to determine tape utilization?

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


What's Needed in Linklst?

2009-06-22 Thread Lizette Koehler
I am running into a documentation issue.

Apparently we have not kept up on what IBM has added to the LINKLST over the 
years.  Is there a doc somewhere that states all the libraries that IBM wants 
in the LINKLST as of z/OS V1.9?  I have been reviewing the REDBOOKs and other 
manuals, but do not find a current list.

What I am missing todate I think are

SYS1.SIEALNKE
SYS1.SIEAMIGE

Not sure if there are others.

The CPAC PROG00 member did not show it included.  However, some of my research 
seems to show it should be.


Lizette

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Looking for an MVS Wizard ICON (not what you think)

2009-06-22 Thread Lizette Koehler
I am working on a web page and thought it would be fun to put a figure of a 
Wizard preforming MVS Magic.  I would like it animated if possible.  You know a 
little guy/gal that has a wand making magical motions over a CPU or MVS 
Operating system.

The web searches I have done have billions and billons for WIZARD but not what 
I am looking for.

Does anyone know where I can find animated (or not) images to put on webpages 
related to MVS???

Lizette

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Looking for an MVS Wizard ICON (not what you think)

2009-06-22 Thread Lizette Koehler
YES - either is fine

Lizette



I am working on a web page and thought it would be fun to put a 
figure of a Wizard preforming MVS Magic.  I would like it animated 
if possible.  You know a little guy/gal that has a wand making 
magical motions over a CPU or MVS Operating system.

A wand or a paddle?


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Looking for an MVS Wizard ICON (not what you think)

2009-06-22 Thread Lizette Koehler
Would that not be copyright infringement???

Along that style would be nice.


Lizette


Mickey from Fantasia? 


I am working on a web page and thought it would be fun to put a figure 
of a Wizard preforming MVS Magic.  I would like it animated if 
possible.  You know a little guy/gal that has a wand making magical 
motions over a CPU or MVS Operating system.

A wand or a paddle?

-

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: SMS Dataset Allocation Problem

2009-06-23 Thread Lizette Koehler
A B37-04 says you did not successfully get all the space needed for the primary 
allocation on the 1st volumes.  Products like DTS Software, STOPX37, etc can 
also help prevent these types of failures.

When SPACE= is coded you have 5 extents to get the primary allocation on the 
volume.  The secondary space allocation has upto (I think) 123 extents to get 
it.  But when you go after the primary allocation, you need to do it in 5 
extents.  This can be avoided by codind VOLUME COUNT in Data class, or using a 
software product like STOPX37.

When the pack or pool is fragmented, small chunks of storage is available, then 
it is possible you can not get 2000 cylinders in 5 extents. Hence the SB37-04

To correct this you can code your Data Class to allow more volumes (canidates) 
to be available to your files.

In one of my Data Class definitions I have

Data Class Name : DB2VOLS
 
Description : MULTI VOLUMES FOR DB2 LINEAR DATA SETS 
 
Recfm  . . . . . . . . . :   
Lrecl  . . . . . . . . . :   
Space Avgrec . . . . . . :   
  Avg Value  . . . . :   
  Primary  . . . . . :   
  Secondary  . . . . :   
  Directory  . . . . :   
Retpd Or Expdt . . . . . :   
Volume Count . . . . . . : 50
Add'l Volume Amount  . . :   

The VOLUME COUNT tells SMS to use upto 50 more volumes before failure.

Hope this helps.

Lizette



Hi Kees,
Thanks for this. But what is meant by  Your ACS routines appanrently don't
provide you with a multivolume dataset

John


  We have IBMUSER.NDSP.** defined as SMS Managed datasets.
 
  My DBA trying to allocate SMS Managed dataset with space as
  //SYSREC01 DD DSN=IBMUSER.NDSP.DATA,
  //  DISP=(NEW,CATLG,DELETE),
  //  SPACE=(CYL,(2000,1800),RLSE)
 
  The job is failing with error
  IEC030I
 
 B37-04,IFG0554A,IBMUSE1,S02,SYSREC01,9D96,ND0016,E6002130,IBMUSER.NDSP.D
 ATA
 
  But if DBA submit the same job with space parameters as
 
  //SYSREC01 DD DSN=IBMUSER.NDSP.DATA,
  //  DISP=(NEW,CATLG,DELETE),
  //  SPACE=(CYL,(2000,1800),RLSE),
  //  UNIT=(DISK,40)
 
  Then the JOB completes with RC 00.
 
  Please note that the only diff is of UNIT parameter. Can anyone
 explain me
  why this happens ?
 
  John

 Yes, the difference is not the DISK, but the 40. Your ACS routines
 appanrently don't provide you with a multivolume dataset.

 Kees.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: SMS Dataset Allocation Problem

2009-06-23 Thread Lizette Koehler
The other option might be the SPACE CONSTRAINT Parameter within the DATA CLASS.


Spreading the requested quantity over multiple volumes
Allocating a percentage of the requested quantity
Using more than 5 extents

Space Constraint Relief specifies whether or not to retry an allocation that 
was unsuccessful due to space constraints on the volume. Note that allocation 
is attempted on all candidate volumes before it is retried. This attribute 
applies only to system- managed data sets, and is limited to new data set 
allocations, and while extending the data set on new volumes.

Y specifies that SMS retry the allocation.

N specifies that SMS does not retry the allocation, so that allocation is not 
attempted on multiple volumes. This is the default.
Reduce Space Up to (%) specifies the amount by which you want to reduce the 
requested space quantity when the allocation is retried. You must specify Y for 
the Space Constraint Relief attribute. Valid values are 0 to 99.

If you request space constraint relief but do not specify a percentage value 
(either 0 or blank), SMS does not reduce the requested space quantity. This 
implies your application cannot tolerate a reduction in the space to be 
allocated, so only the 5 extent limit is relieve

Data Class Name . . : DB2VOLS 
  
Data Set Name Type  . . . . . :   
  If Extended . . . . . . . . :   
  Extended Addressability . . : NO
  Record Access Bias  . . . . :   
Space Constraint Relief . . . : YES   
  Reduce Space Up To (%)  . . : 20
  Dynamic Volume Count  . . . :   
Compaction  . . . . . . . . . :   
Spanned / Nonspanned  . . . . :   
Media Interchange 
  Media Type  . . . . . . . . :   
  Recording Technology  . . . :   
  Performance Scaling . . . . :   
  Performance Segmentation  . :   

And the last area you might look at is EXTENT CONSTRAINT REMOVAL
Data Class Name : DB2VOLS   

Reuse  . . . . . . . . . . . : NO   
Initial Load . . . . . . . . : RECOVERY 
BWO  . . . . . . . . . . . . :  
Log  . . . . . . . . . . . . :  
Logstream Id . . . . . . . . :  
FRlog  . . . . . . . . . . . :  
RLS CF Cache Value . . . . . : ALL  
RLS Above the 2-GB Bar . . . : NO   
Extent Constraint Removal  . : NO   




Lizette

 A B37-04 says you did not successfully get all the space needed for
the primary allocation on the 1st volumes.  Products like DTS Software,
STOPX37, etc can also help prevent these types of failures.
 
 When SPACE= is coded you have 5 extents to get the primary allocation
on the volume.  The secondary space allocation has upto (I think) 123
extents to get it.  But when you go after the primary allocation, you
need to do it in 5 extents.  This can be avoided by codind VOLUME COUNT
in Data class, or using a software product like STOPX37.
 
 When the pack or pool is fragmented, small chunks of storage is
available, then it is possible you can not get 2000 cylinders in 5
extents. Hence the SB37-04
 
 To correct this you can code your Data Class to allow more volumes
(canidates) to be available to your files.
 

Correction: this cannot be corrected with multivolume datasets. A next
volume will be taken when a *secondary* extent does not fit anymore.



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Security -- STGADMIN

2009-06-24 Thread Lizette Koehler
DTS Software has a pocket reference guide on their website that is available to 
anyone.  It contains a lot of the Security stuff.

http://www.dtssoftware.com/Ref%20Guide9.01.pdf

I have tried downloading it and the website seems to have a problem.  I have 
contacted DTS to see what is wrong.  But when it is available, it is well worth 
downloading.


Lizette


:

Is there any ONE place where ALL of the possible facility class profiles 
for STGADMIN might be listed/found?

All of the possible ones?  No, but you can come close to finding all of them
that are actually used by z/OS if you search the z/OS library on the web for
STGADMIN. without the quotes.

For example, try
http://publib.boulder.ibm.com/cgi-bin/bookmgr_OS390/Shelves/EZ2ZBK0G?searchRequest=STGADMIN.SEARCH=SearchType=FUZZYSearchTopic=TOPICsearchText=TEXTsearchIndex=INDEXrank=RANK
or http://preview.tinyurl.com/mhwru6 to see the search results I just got.

One of the consultants who provides RACF services, Robert Hansel, probably
has a presentation at his web site that lists all the ones he's found.
-- 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: SDSF Batch command size limit

2009-06-25 Thread Lizette Koehler
You can enter the command (if you are authorized) through pure JCL.  Look at 
the //  COMMAND JCL statement.

Lizette




I have a simple SVC34 program that we use to issue console commands.
Contact me offline if you would like a copy.



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: UNABLE TO DOWNLOAD/SAVE IBM MANUAL - NO PDF

2009-06-26 Thread Lizette Koehler
Unfortunately, if the PDF icon is grey then you can only access it via Bookmgr.

The file can be downloaded as a .boo and then you would need to have Softcopy 
Librarian from IBM to read it.



Lizette




I am attempting to download the following manual: 
 
DFHSM V2R6.0 Messages ARC6MS02 01/31/95 10:42:49 SH35-0094-08
 
However, there is NO PDF associated with it.  Is there a way around this?  
Could I try something else.
 
Thanks.

 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: sms overriding my specification of target volume

2009-06-29 Thread Lizette Koehler
Do you want to view the ACS? (ISMF) or do you want a way to see what ACS is 
using for your allocation? 

ISMF can let you view/update your ACS routines and SC, SG, etc...  

However, if you want to see how it is allocating the file, then I think you 
need to setup a test case.

Lizette




 
Done all that. No joy.
How I can I view the acs routines, and display the attributes of these
classes??

Ken Klein
Sr. Systems Programmer
Kentucky Farm Bureau Insurance - Louisville
kenneth.kl...@kyfb.com
502-495-5000 x7011

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
Behalf Of Natarajan Mohan
Sent: Monday, June 29, 2009 1:07 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: sms overriding my specification of target volume

Kenneth,

The key is NSC (null storage class) and NMC (null management class). I
would take out the STORCLAS(SCNONSMS) and code NSC NMC.

Thanks
Natarajan 

 Klein, Kenneth kenneth.kl...@kyfb.com 6/29/2009 9:45 AM 


IGD17223I JOBNAME jobname PROGRAM NAME progname STEPNAME stepname DDNAME

   ddname DATA SET dsn WAS ALLOCATED TO AN OVERFLOW STORAGE GROUP

   ofsg.

 

Explanation:  This message is issued when the volume selection
algorithms resulted in the selection of one or more volumes that belong
to an

overflow storage group.


I'm a real rookie with SMS. I'm getting this message when I try to
allocate a dataset on a specific target volume with dfdss using 

//OMVSS3DD   UNIT=SYSDA,DISP=SHR,VOL=SER=OMVSS3
//SYSIN DD   * 
 COPY   DATASET( INCL(SMPE.Z19.RESZP1.SMPTLOG  )) -
CONCURRENT NOTIFYCONCURRENT -  
CATALOG TOL(ENQF) WAIT(2,30) - 
BYPASSACS(**)  -   
STORCLAS(SCNONSMS) OUTDDNAME(OMVSS3) - 
  RENUNC( (SMPE.Z19.RESZP1.SMPTLOG , - 
   SMPE.Z19.RESZS3.SMPTLOG  ) -
 ) 

I've got to ge able to specify a volume so my DDDef's will point to the
right one. 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Offload work to ziip

2009-07-01 Thread Lizette Koehler
Bruno,

My understanding is if the software is using pre-emptable SRBs then the work 
can be moved to a zIIP engine.  We have Shadow Direct and it is using zIIPs.  

I am not sure how much technical specs you are looking for on zIIP.  The 
Vendor may not tell you all of his/her secrets in using zIIP engines.  :-D

Lizette



Hello Listers
I recently read some press releases talking about Neon Zprime
http://www.neonesoft.com/solutions/zprime.shtm
From what i understand, they claim that they can move some of the workload
to ziip thus reducing some of the software costs
Although i understand the idea, i do not understand the technical part of it.
That would mean moving some of the enclaves to a ziip on the fly ?
Does anybody has an idea?
Did anybody tried this product ?
TIA


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Offload work to ziip

2009-07-01 Thread Lizette Koehler
Bruno,

I think that Bob Shannon's comments are very interesting in relationship to 
this.  That vendors were told the API could not be used to redirect work.  So 
is it possible the Neon is using another process to relocate work?  Or are they 
using a grey area to use the API?  I am not sure and I think only the vendor's 
developers could answer that (but I don't think they should answer.  I think 
this would be considered proprietary  or intellectual work).

And I just pulled up the zPRIME doc.  It does have some interesting claims. But 
until I see it working in my shop, I rarely believe them.

Lizette



I basically know how it works in a standard way, when the code is written to
branch and run on zIIP or zAAP
But what is claimed here is they can move existing workload to run on a zIIP 
CP.
And of course you may save millions ( that's what they claim )
That would be a pretty interesting novelty 
It is so amazing that it is difficult to wait for the 15/07 to hear a bit more 
  

it 
On Wed, 1 Jul 2009 12:20:05 -0400, Lizette Koehler stars...@mindspring.com
wrote:

Bruno,

My understanding is if the software is using pre-emptable SRBs then the
work can be moved to a zIIP engine.  We have Shadow Direct and it is using
zIIPs.

I am not sure how much technical specs you are looking for on zIIP.  The
Vendor may not tell you all of his/her secrets in using zIIP engines.  :-D

Lizette


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


S222 abends and Reason Codes

2009-07-02 Thread Lizette Koehler
Someone asked this and I did not know where to look.

They are researching an internal S222 abend.  It came with a reason code.

Now, I have seen S222 due to OPER Cancel commands, but I am not familiar with 
S222 abends that are issued internally and with a reason code.

Would I be correct in assuming that I need the person that wrote that code to 
tell me why they did an internal S222 abend and what their reason code means?  
This is not something I would think would be an IBM process.

Lizette

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


IBM Presenation on IPL Process

2009-07-06 Thread Lizette Koehler
I got this off of another list.  This is a nice presentation on how the IPL 
process works.  Since we do have some new  sysprogs on this list, I thought I 
would pass it along.

Abstract: This presentation describes general processing involved initializing 
z/OS System from the IPL process until the system is ready to start JES2 or 
JES3.


http://www-03.ibm.com/support/techdocs/atsmastr.nsf/WebIndex/PRS3699

Lizette

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Forced Offload of non ZIIP eligable workloads ????????

2009-07-06 Thread Lizette Koehler
If you look in the archives from last week, you will see the discussion on this 
topic.  Look for zIIP threads.

Apparently NEON Software has found a way to move more work to zXXPs than IBM 
may have intended.  Not sure how much they maybe asking for their product.

Lizette




FYI - 
 
We have not gone ZIIP as if yet, is this in addition to normal IBM
offloaded workload ?
 
 
http://www.neon.com/neon/news_063009.shtm
 
 
Kevin  ( intrigued ) Clark



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Symbolic parameters inside SYSIN

2009-07-06 Thread Lizette Koehler
The best option is to create an ISPF Skel process or REXX or Clist to do the 
substitution, create the batch job and Control Cards, and then submit the job.  
There is nothing currently in TSO or JCL that will do the kind of  process you 
need that I know of.

Lizette




Hello,

I am trying to optimize some tasks I perform with my MQ Series. My idea is to 
delete a bunch of MQ objects just passing am unique number reference that 
identifies our partners.

The JCL would look like this:

//DLPARTNR  PROC REF=   
//CSQUTIL1 EXEC PGM=CSQUTIL,REGION=0M,  
//PARM='BCMH'   
//STEPLIB  DD DISP=SHR,DSN=SSTP.HZ19.MQS600.SCSQANLE
// DD DISP=SHR,DSN=SSTP.HZ19.MQS600.SCSQAUTH
//SYSPRINT DD SYSOUT=*  
//SYSINDD DISP=SHR,DSN=SSTP.SYSIN(DEL1)   
//CSQUCMD  DD DISP=SHR,DSN=SSTP.SYSIN(DEL2) 

So I have several MQ-delete commands contained inside of the DEL1 and DEL2 
SYSIN datasets, somewhat like this:
 DELETE CHANNEL(MYCOMPANY.TO.REF)

I ended up discovering that symbols parameters I submit do not replace the 
ones contained on SYSIN data, is this true? Is there any workaround? 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Articles Mainframe Proponents caution Big Iron Defectors and zPRIM from Neon

2009-07-08 Thread Lizette Koehler
There are a couple of interesting articles in Enterprise Systems update

http://tinyurl.com/nkptlb


Mainframe Proponents caution Big Iron Defectors
While mainframe defectors like the TTX Co., the New York Stock Exchange and
Meritz Financial Information Services tout their reasons for migrating off
big iron onto x86 servers, mainframe proponents say there are plenty of
reasons not to. 
Joe Clabby, who leads the analyst firm Clabby Analytics, said the trend off
mainframes and onto x86 servers running virtualization is actually a step
backward.
PCs are not mainframes, and VMware is nowhere near mainframes from an
advanced virtualization and provisioning perspective, he said. Mainframes
are so much more advanced than VMware that it may take that customer 10
years to get what they have now in virtualization, automatic provisioning
and workload management.



Move CICS, DB2, IMS, TSO/ISPF and batch to specialty processors
According to a recent analyst report on Neon Software's zPrime, mainframe
users may soon be able to run traditional mainframe workloads on the IBM
mainframe zIIP and zAAP specialty processors, lowering billable MIPs on the
central processor.


Lizette

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Delete Tape Datasets

2009-07-13 Thread Lizette Koehler
Could you use the ACS routines to set the TAPE to a different retention period 
and leave the dasd part alone?

I am sure you can use 
IF ((DSN = db2_log_dsn )  (UNIT=TAPE) ) then MGMTCLAS=   to do something 
like that.  Do you have a storage admin person you can ask?

Lizette



For some reason, the tape(s) on which these datasets reside have an
expiration date of 4 days. The owner of these datasets does not want to 
change that, but he does want the day old datasets deleted.


Why should you have to go and manually (or automatically) delete tapes
after one day, just because the owner doesn't want to change the expiry date?
It's your shop, but that is the purpose of an expiry date, especially with
a tape management system.

Once you do something like that, you'll open the doors to even more complex
solutions for simple problems.
-
Too busy driving to stop for gas


Yes, but according to our DB2 DBA... we use dual logging, one set to tape,
one set to DASD. He wants to keep the ones going to DASD for 4 days, but
delete the tape ones after one day. There's a zparm... DSN6ARVP ARCRETN set
to 4, which sets the retention to 4 days, but (excuse me for being a DB2
novice...) did not see anything in the DB2 manuals about setting retention
for tape to 1 day andkeeping the DASD retention period to 4 days


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: AMBLIST Funny

2009-07-13 Thread Lizette Koehler
I think you will find it in the MVS Diagnostic Tools and Services Aids 
GA22-7589-12


Lizette


When did this get removed from the Service Aids manual?  QuickRef still has
it documented.

http://tinyurl.com/n8rxl2



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


TAPE Encryption

2009-07-14 Thread Lizette Koehler
When you run tape Encryption on a stacked tape do you encrypt all files that 
are stacked on a tape or just one file on the stacked tape?

For example, I have a batch backup job that places 35 dumped volumes on one 
tape.  I have looked at the doc and it seems I could place the encryption on 
the first file only and the whole tape will be encrypted.  

Or does it not take any more time or resources to have encryption happen for 
each volume on the stacked tape?

I have been asked to place encrption on each file via Dataclas/ACS routines on 
a stacked tape.  I am just trying to get a handle of what the performance trade 
offs are.

Lizette

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: TAPE Encryption

2009-07-14 Thread Lizette Koehler
Mark,

I agree with your statement.  My concern is that some want to set up the ACS 
code to be generic, 

IF (DSN=PROD.**) Then DATACLAS=ENCRYPT.

I want to update the JCL on just the first file to include the DATACLAS=ENCRYPT.

So I am trying to figure it out the price of doing all the files individually 
on a stacked tape.  Would iit slow down the process, and if it does, how can I 
calculate it?  I know there is a some XX seconds it takes to do the encryption. 
 If I have 35 files being encrypted on the tape, then I expect the answer 
should be 35 times XX seconds in delay of the job finishing.

I am also told that if I use OPENTECH or COPYCAT to copy these stacked volumes 
to an offsite tape, then I do not need to encrypt the offsite tape as the files 
being copied are encrypted to start with.  So the offsite tape becomes 
encrypted by default.  Or did I get that wrong?

Lizette




Lizette Koehler wrote:
 When you run tape Encryption on a stacked tape do you encrypt all files that 
 are stacked on a tape or just one file on the stacked tape?

 For example, I have a batch backup job that places 35 dumped volumes on one 
 tape.  I have looked at the doc and it seems I could place the encryption on 
 the first file only and the whole tape will be encrypted.  

 Or does it not take any more time or resources to have encryption happen for 
 each volume on the stacked tape?

 I have been asked to place encrption on each file via Dataclas/ACS routines 
 on a stacked tape.  I am just trying to get a handle of what the performance 
 trade offs are.


   
AFAIK, once a tape has been written in EEFMT2 format the entire tape is
encrypted, In other words it isn't on a file by file basis.

-- 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: TAPE Encryption

2009-07-14 Thread Lizette Koehler
We are fairly basic.  A TS3500 Library with TS1120 E05 drives.  It is ficon
attached.

Lizette

 
 Lizette, To get a correct answer you need to provide details of what kind
of
 encryption you are doing.
 Are you using encryption in the tape hardware (for example IBM TS1120
which
 are encryption enabled), or are you encrypting using s/w on the host
system?
 
 Outboard encryption in the IBM tape hardware is complete volume and is
 almost no different performance than not encrypting. Using s/w - well that
is
 a different story and would depen d on the s/w you are using.
 
 Mike Wood   RMM Development
 
 On Tue, 14 Jul 2009 12:33:04 -0400, Lizette Koehler
 stars...@mindspring.com wrote:
 
 When you run tape Encryption on a stacked tape do you encrypt all files
 that are stacked on a tape or just one file on the stacked tape?
 
 For example, I have a batch backup job that places 35 dumped volumes on
 one tape.  I have looked at the doc and it seems I could place the
encryption
 on the first file only and the whole tape will be encrypted.
 
 Or does it not take any more time or resources to have encryption happen
 for each volume on the stacked tape?
 
 I have been asked to place encrption on each file via Dataclas/ACS
routines
 on a stacked tape.  I am just trying to get a handle of what the
performance
 trade offs are.
 
 Lizette

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Article Mainframe Stolen

2009-07-15 Thread Lizette Koehler
From the Palistine Herold in Palestine TX.  This was repeated in the 
Enterprise e-Mag.

Apparently when you steal the MAINFRAME the data is on it.


Lizette



Mainframe computer stolen from local TVCC campus

By PAUL STONE
The Palestine Herald

PALESTINE — A “mainframe computer” containing confidential student information 
was stolen over the weekend from the Palestine campus of Trinity Valley 
Community College, according to local authorities.

Anderson County Sheriff Greg Taylor told the Herald-Press Monday that the 
computer was stolen from an office inside the Anderson Building at the rear of 
the campus which is located on Texas 19, north of the Palestine city limits. 
The building houses the college’s EMT, cosmotology and nursing classes, he 
added.

The sheriff said the break-in apparently occurred sometime between 10 a.m. 
Friday and 8 a.m. Monday when it was discovered by a school employee.

Taylor said the computer included student and class information, including 
grades.

“Unfortunately, there’s personal information on there,” the sheriff said.

Also reported stolen from a separate office in the same building was $30 cash 
and a $200 check, according to Taylor.

Additionally, a glass container filled with urine was discovered in the office 
where the money was stolen, according to the sheriff.

The suspect(s) gained entry into the Anderson Building by prying open a back 
door, according to Taylor.

“There was some evidence removed at the scene,” Taylor said. “We don’t have any 
named suspects at this time.”

Estimated amount of damage was unknown as of mid-afternoon Monday.

“Of course, they cut a lot of wires (to take the mainframe computer),” the 
sheriff said. “There will be a lot of damage.”

--- 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: ZSYSID In Panel

2009-07-16 Thread Lizette Koehler
A simple question.  Do you have more than the 2 LPARS?  If so, the the ZSYSID 
will probably be different for each LPAR.

If that is not what you want, You may need to create a LOGON process to set a 
var that is used by your ISPF Prim panel.  That way all LPARS except SYSTS1 
will get the same library, and SYSTS1 will get the unique one.

Lizette




That should work (with the extra period after ZSYSID).

  9,'CMD(EX ''SVS.IBMOM.ZSYSID..SCKMPARM(CKMISPF)'')'.

Regards,
John K

Kenneth.Klein of the IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu
wrote on 07/16/2009 07:37:35 AM:

 I want to change this line in a panel definition in our main ispplib:

 9,'CMD(EX ''SVS.IBMOM.SYSTS1.SCKMPARM(CKMISPF)'')'

 to one like this:

 9,'CMD(EX ''SVS.IBMOM.ZSYSID.SCKMPARM(CKMISPF)'')'

 SYSTS1 is the name of our sandbox lpar. I want to use this panel
 unchanged on the other lpars.
 Is that how this system variable is used or do I have to use a vget into
 my own variable.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: ZSYSID In Panel

2009-07-16 Thread Lizette Koehler
John

For clarification, would that be added to the )INIT section or the )PROC  or 
the )REINIT

Lizette


-Original Message-
From: John P Kalinich jkali...@csc.com
Sent: Jul 16, 2009 10:22 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: ZSYSID In Panel

Add this code to the panel.

Regards,
John K

DOT = '.'
IF (ZSYSID = 'SYSTS1')
  SID = 'ZSYSID.DOT'
ELSE
  SID = ''

ZSEL = TRANS (TRUNC (ZCMD,'.')
. . .
9,'CMD(EX ''SVS.IBMOM.SID.SCKMPARM(CKMISPF)'')'


Lizette Koehler of the IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu
wrote on 07/16/2009 09:06:25 AM:

 Lizette Koehler stars...@mindspring.com
 Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu

 07/16/2009 09:06 AM

 Please respond to
 IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu

 To

 IBM-MAIN@bama.ua.edu

 cc

 Subject

 Re: ZSYSID In Panel

 A simple question.  Do you have more than the 2 LPARS?  If so, the
 the ZSYSID will probably be different for each LPAR.

 If that is not what you want, You may need to create a LOGON process
 to set a var that is used by your ISPF Prim panel.  That way all
 LPARS except SYSTS1 will get the same library, and SYSTS1 will get
 the unique one.

 Lizette



 
 That should work (with the extra period after ZSYSID).
 
   9,'CMD(EX ''SVS.IBMOM.ZSYSID..SCKMPARM(CKMISPF)'')'.
 
 Regards,
 John K
 
 Kenneth.Klein of the IBM Mainframe Discussion List
IBM-MAIN@bama.ua.edu
 wrote on 07/16/2009 07:37:35 AM:
 
  I want to change this line in a panel definition in our main ispplib:
 
  9,'CMD(EX ''SVS.IBMOM.SYSTS1.SCKMPARM(CKMISPF)'')'
 
  to one like this:
 
  9,'CMD(EX ''SVS.IBMOM.ZSYSID.SCKMPARM(CKMISPF)'')'
 
  SYSTS1 is the name of our sandbox lpar. I want to use this panel
  unchanged on the other lpars.
  Is that how this system variable is used or do I have to use a vget
into
  my own variable.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Offload work to zIIP with zPRIME

2009-07-16 Thread Lizette Koehler
I have a concern about the zPRIME product.  If the zXXP engines are for SRB 
(pre-emptible) work, then my understanding is that the SRB cannot have any SVCs 
save for OPEN.  So I am wondering how the process could work when normal TCB 
work would have SVCs it executes.  Is there a way to determine that this UOW 
has no SVC so therefore I can make it look like an SRB and have it move the 
zXXP engine?  Or can I blindly move a UOW to the zXXP engine and if it has an 
SVC - fail, and then the system would dispatch back to the CP?


Am I missing something here?

Lizette

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: LE options

2009-07-17 Thread Lizette Koehler
Don't forget that there is also a JCL over ride now at z/OS V1.9 (IIRC) that
allows your programmers to put in the LE Parms there was well.

So many choices, so little time.

Lizette


 
 There appears to be (at least) two ways to change LE runtime options
system wide.
 There's the assember macro table way (CEEDOPT for batch and CEECOPT for
CICS)
 and there's the PARMLIB(CEEPRM00) way.
 Is one preferred over the other?  Does one offer something the other does
not?  I am
 thinking that the PARMLIB way allows for multiple systems to share the
same LE
 libraries and still have different LE options, if desired.  Is this the
reason for is its
 existence?  If we use the PARMLIB way is there anything that has to be
done with
 the macros and can't be done with the PARMLIB?
 
 Honestly, there are so many ways to change LE options that it's hard to
keep them all
 straight!
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: LE options

2009-07-17 Thread Lizette Koehler
Actually I was talking about the //CEEOPT DD statement that can be added to
JCL rather than the PARM.



Lizette


 
 Don't forget that there is also a JCL over ride now at z/OS V1.9 (IIRC)
that allows
 your programmers to put in the LE Parms there was well.
 
 That's been around a lot longer than 1.9!
 
 IIRC, it was around during OS/390.
 
 The option(s) are specified by:
 
 //STEP EXEC PGM=appl,PARM='appl/LE'
 
 Or vice versa:
 
 //STEP EXEC PGM=appl,PARM='LE/appl'
 
 I don't remember which way it's specified, but I also think that's an
installation
 option.
 
 And, it was way back!

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: ALLOCATION OF USERCAT MYSTERY - URGENT

2009-07-21 Thread Lizette Koehler
Esmie,

See if the D M=DEV() helps.  When I display mine I get the following 
information.  The SCP CU ND line may help.  If these are real 3380s I think it 
will say that there, unless they are emulated 3380s.  My 2107 is an EMC DMX4500 
Box emulating 3390s.  If you could do the some displays for us, I think it may 
help.  If these are not the correct commands, I am sure someone on the list may 
be able to provide others.



DS P,,1
 IEE459I 12.53.32 DEVSERV PATHS 426 
 UNIT DTYPE  M CNT VOLSER  CHPID=PATH STATUS
  RTYPE   SSID CFW TC   DFW   PIN  DC-STATE CCA  DDC   ALT  CU-TYPE 
 8000,33903 ,F,000,  ,10=I 11=I 12=I 13=I 20=I 21=I 84=I 85=I   
  21078000  N  YY.  YY.N   SIMPLEX   00   002107
  SYMBOL DEFINITIONS    
 F = OFFLINEI = INTERVENTION REQUIRED   


D M=DEV()



IEE174I 12.49.34 DISPLAY M 334
DEVICE 8000   STATUS=OFFLINE  
CHP   10   11   12   13   20   21   84   85   
ENTRY LINK ADDRESS0381 0481 0385 0485 0389 0489 038D 048D 
DEST LINK ADDRESS 03C3 04C3 03C9 04C9 03CF 04CF 03D5 04D5 
PATH ONLINE   YYYYYYYY
CHP PHYSICALLY ONLINE YYYYYYYY
PATH OPERATIONAL  YYYYYYYY
MANAGED   NNNNNNNN
CU NUMBER 8000 8000 8000 8000 8000 8000 8000 8000 
MAXIMUM MANAGED CHPID(S) ALLOWED:  0  
DESTINATION CU LOGICAL ADDRESS = 30   
SCP CU ND = 002107.921.EMC.07.2645.0028   
SCP TOKEN NED = 002107.900.EMC.07.2645.3000   
SCP DEVICE NED= 002107.900.EMC.07.2645.3000   

tt.mmm.nnn.pp..   
These descriptors are made up of the following:   
  
tt
Type number of the device.
  
mmm   
Model number of the device.   
  
nnn   
Manufacturer identification code. 
  
pp
Plant of manufacture number.  

Lizette



 
I was told that the volumes are real 3380.  However, since I don't have access 
to the DATACENTER I cannot be 100% sure.

--- On Tue, 7/21/09, Eric Bielefeld eric-ibmm...@wi.rr.com wrote:


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: cbttape #737

2009-07-22 Thread Lizette Koehler
On the CBT Website look to the Left and select the 

XMIT MANAGER link.  This will allow you to view it on the PC.

These are TSO XMIT files that can be uploaded to the MAINFRAME and then a TSO 
RECEIVE command can then put them back the way there were.

Lizette




Found this on cbttape site:

 

File # 737 Package to clear all DASD to X'00' after D/R Test
http://www.cbttape.org/ftp/cbt/CBT737.zip 

 

Clicked on it and it downloaded a .XMI file and now I can't open it.  I
guess I need to download some kind of package to view this type of file?
Can anyone tell me what exactly is in there?

 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: ALLOCATION OF USERCAT MYSTERY - URGENT

2009-07-22 Thread Lizette Koehler
Willie,

If you look at the display it shows 2107 under RTYPE.  This would appear to be 
a storage array that emulates the 3380 technology.  I think if it was a real 
3380, then it would have said 3380 where the 2107 is located in the display 
under RTYPE.

Lizette




Here is the display of 1 of the addresses.  It shows a 3380 device. 
 
DS P,9C00,1 
IEE459I 12.49.19 DEVSERV PATHS 972  
UNIT DTYPE  M CNT VOLSER  CHPID=PATH STATUS 
 RTYPE   SSID CFW TC   DFW   PIN  DC-STATE CCA  DDC   ALT  CU-TYPE  
9C00,3380K ,O,000,PLN901,40=+ 43=+ 50=+ A1=+ A0=+ D0=+ 52=+ B9=+    
 2107    09C0  Y  YY.  YY.    N   SIMPLEX   00   00    2107 
 SYMBOL DEFINITIONS     
O = ONLINE + = PATH AVAILABLE   


--- On Tue, 7/21/09, Lizette Koehler stars...@mindspring.com wrote:


From: Lizette Koehler stars...@mindspring.com
Subject: Re: ALLOCATION OF USERCAT MYSTERY - URGENT
To: IBM-MAIN@bama.ua.edu
Received: Tuesday, July 21, 2009, 9:55 AM


Esmie,

See if the D M=DEV() helps.  When I display mine I get the following 
information.  The SCP CU ND line may help.  If these are real 3380s I think it 
will say that there, unless they are emulated 3380s.  My 2107 is an EMC 
DMX4500 Box emulating 3390s.  If you could do the some displays for us, I 
think it may help.  If these are not the correct commands, I am sure someone 
on the list may be able to provide others.



DS P,,1
IEE459I 12.53.32 DEVSERV PATHS 426                                             
UNIT DTYPE  M CNT VOLSER  CHPID=PATH STATUS                                    
      RTYPE   SSID CFW TC   DFW   PIN  DC-STATE CCA  DDC   ALT  CU-TYPE        
 
8000,33903 ,F,000,      ,10=I 11=I 12=I 13=I 20=I 21=I 84=I 85=I               
      2107    8000  N  YY.  YY.    N   SIMPLEX   00   00        2107           
 
 SYMBOL DEFINITIONS            
F = OFFLINE                        I = INTERVENTION REQUIRED                   
                                                                               
 

D M=DEV()



IEE174I 12.49.34 DISPLAY M 334                                            
DEVICE 8000   STATUS=OFFLINE                                              
CHP                   10   11   12   13   20   21   84   85               
ENTRY LINK ADDRESS    0381 0481 0385 0485 0389 0489 038D 048D             
DEST LINK ADDRESS     03C3 04C3 03C9 04C9 03CF 04CF 03D5 04D5             
PATH ONLINE           Y    Y    Y    Y    Y    Y    Y    Y                
CHP PHYSICALLY ONLINE Y    Y    Y    Y    Y    Y    Y    Y                
PATH OPERATIONAL      Y    Y    Y    Y    Y    Y    Y    Y                
MANAGED               N    N    N    N    N    N    N    N                
CU NUMBER             8000 8000 8000 8000 8000 8000 8000 8000             
MAXIMUM MANAGED CHPID(S) ALLOWED:  0                                      
DESTINATION CU LOGICAL ADDRESS = 30                                       
SCP CU ND         = 002107.921.EMC.07.2645.0028                   
SCP TOKEN NED     = 002107.900.EMC.07.2645.3000                   
SCP DEVICE NED    = 002107.900.EMC.07.2645.3000                   

tt.mmm.nnn.pp..                           
    These descriptors are made up of the following:           
                                                              
    tt                                                    
        Type number of the device.                            
                                                              
    mmm                                                       
        Model number of the device.                           
                                                              
    nnn                                                       
        Manufacturer identification code.                     
                                                              
    pp                                                        
        Plant of manufacture number.                          

Lizette



 
I was told that the volumes are real 3380.  However, since I don't have 
access to the DATACENTER I cannot be 100% sure.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: ALLOCATION OF USERCAT MYSTERY - URGENT

2009-07-22 Thread Lizette Koehler
Esmie,

From your display the RTYPE shows 3380.  Therefore you are running real 3380 
DISK volumes.

If you look at Willie's display - it shows 2107 where you have 3380.  That 
means you have real 3380 DASD and Willie has Emulated 3380 Dasd.

Lizette




Thanks Willie for the example.
 
Here is what I have.
 
IEE459I 13.04.27 DEVSERV PATHS 125  
 UNIT DTYPE  M CNT VOLSER  CHPID=PATH STATUS    
  RTYPE  SSID CFW TC   DFW PIN DC-STATE CCA DDC   CYL CU-TYPE   
 A0EC,3380K ,O,000,ZO6WK3,63=+ E2=+ F2=+ F3=+ 64=+ E3=+ FC=+    
  3380   A000  Y  YY.  YY.  N  SIMPLEX   EC  EC  2655 3990-3    
 SYMBOL DEFINITIONS     
O = ONLINE + = PATH AVAILABLE   


--- On Thu, 7/23/09, willie bunter williebun...@yahoo.com wrote:




Here is the display of 1 of the addresses.  It shows a 3380 device. 
 
DS P,9C00,1 
IEE459I 12.49.19 DEVSERV PATHS 972  
UNIT DTYPE  M CNT VOLSER  CHPID=PATH STATUS 
 RTYPE   SSID CFW TC   DFW   PIN  DC-STATE CCA  DDC   ALT  CU-TYPE  
9C00,3380K ,O,000,PLN901,40=+ 43=+ 50=+ A1=+ A0=+ D0=+ 52=+ B9=+    
 2107    09C0  Y  YY.  YY.    N   SIMPLEX   00   00    2107 
 SYMBOL DEFINITIONS     
O = ONLINE + = PATH AVAILABLE   


--- On Tue, 7/21/09, Lizette Koehler stars...@mindspring.com wrote:




Esmie,

See if the D M=DEV() helps.  When I display mine I get the following 
information.  The SCP CU ND line may help.  If these are real 3380s I think it 
will say that there, unless they are emulated 3380s.  My 2107 is an EMC 
DMX4500 Box emulating 3390s.  If you could do the some displays for us, I 
think it may help.  If these are not the correct commands, I am sure someone 
on the list may be able to provide others.



DS P,,1
IEE459I 12.53.32 DEVSERV PATHS 426                                             
UNIT DTYPE  M CNT VOLSER  CHPID=PATH STATUS                                    
      RTYPE   SSID CFW TC   DFW   PIN  DC-STATE CCA  DDC   ALT  CU-TYPE        
 
8000,33903 ,F,000,      ,10=I 11=I 12=I 13=I 20=I 21=I 84=I 85=I               
      2107    8000  N  YY.  YY.    N   SIMPLEX   00   00        2107           
 
 SYMBOL DEFINITIONS            
F = OFFLINE                        I = INTERVENTION REQUIRED                   
                                                                               
 

D M=DEV()



IEE174I 12.49.34 DISPLAY M 334                                            
DEVICE 8000   STATUS=OFFLINE                                              
CHP                   10   11   12   13   20   21   84   85               
ENTRY LINK ADDRESS    0381 0481 0385 0485 0389 0489 038D 048D             
DEST LINK ADDRESS     03C3 04C3 03C9 04C9 03CF 04CF 03D5 04D5             
PATH ONLINE           Y    Y    Y    Y    Y    Y    Y    Y                
CHP PHYSICALLY ONLINE Y    Y    Y    Y    Y    Y    Y    Y                
PATH OPERATIONAL      Y    Y    Y    Y    Y    Y    Y    Y                
MANAGED               N    N    N    N    N    N    N    N                
CU NUMBER             8000 8000 8000 8000 8000 8000 8000 8000             
MAXIMUM MANAGED CHPID(S) ALLOWED:  0                                      
DESTINATION CU LOGICAL ADDRESS = 30                                       
SCP CU ND         = 002107.921.EMC.07.2645.0028                   
SCP TOKEN NED     = 002107.900.EMC.07.2645.3000                   
SCP DEVICE NED    = 002107.900.EMC.07.2645.3000                   

tt.mmm.nnn.pp..                           
    These descriptors are made up of the following:           
                                                              
    tt                                                    
        Type number of the device.                            
                                                              
    mmm                                                       
        Model number of the device.                           
                                                              
    nnn                                                       
        Manufacturer identification code.                     
                                                              
    pp                                                        
        Plant of manufacture number.                          

Lizette



 
I was told that the volumes are real 3380.  However, since I don't have 
access to the DATACENTER I cannot be 100% sure.


--
For IBM-MAIN subscribe / signoff / archive access

Re: How do I reallocate a sysplex dump directory SYSDDIR

2009-07-27 Thread Lizette Koehler
I think this may work.

Have you tried stopping the DAE process?  If ADYSET01 has DAE=STOP,GLOBALSTOP 
in it, try issuing T DAE=01.  Then see if you can work with your SYSDDIR.  You 
can always restart DAE with T DAE=00 if you have it setup according to the MVS 
Init and Tuning Ref.

Lizette




I have a sysplex dump directory that I would like to delete/reallocate
(keeping the same name) but I can't seem to find a way to free it from
DUMPSRV.

Has anyone done this?

I hit the archives and RTFM but I can't find anything.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: address space creation

2009-07-27 Thread Lizette Koehler
What is the maximum number of TSO users you can have on at one time?  Does this 
3rd party app ever logoff?  

If you could catch a moment when it gets that message, can you do a D TS,L and 
see how many TSO users are logged on?  You may be able to do this periodically 
with an automation process so you could do a point in time check.  

Have you checked with the 3rd party vendor on this issue, and what do they say? 
 If not, do you have the ability to alter the REXX to find out how many TSO 
users are logged on at the time of the message?

What level of z/OS or OS/390 are you running?

Lizette




Have an 3rd party application that interfaces with TSO. It signs on 
periodically,
and runs a rexx exec. Ocassionally in its log file it gets a message MAXIMUM 
USERS LOGGED

There is never any messages at the same time in the syslog. Other normal TSO
users never have an issue.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: address space creation

2009-07-28 Thread Lizette Koehler
Since this is a 3rd party vendor, I am not sure you could convert to SYSTEM 
REXX which was implemented in z/OS V1.9.  AXR is the prefix for SYSTEM Rexx.  I 
am guessing that the vendor has you running a PROC for this process using 
IRXJCL?  Or is it a IKJEFTxx program?

Currently if your normal TSO users are fine, then it is a problem within this 
Vendor's Process.  I do not know of any function that could cause this, and not 
having seen the REXX code or this product, cannot give much more thoughts on 
this issue.

If the vendor states that they have not coded for this type of error, then they 
need to assist you with analysis.  If you have the source, you could see if it 
is modifiable.  If not, then have the vendor work with you to resolve this 
issue.  The vendor should be able to put some additional code in this REXX for 
you to provide more details.  If you see MAX USERS, it maybe a message produced 
by the vendor code, if so, they could add some displays to explain why they are 
seeing this issue.

Lizette


 
 Max TSO users 60, we never reach that.
 It does timeout and logoffs and logs back on when needed.
 
 If you could catch a moment when it gets that message (I cant, never know 
 when,
 I could issue d ts,l periodically)
 
 3rd party says they never coded for this error. It never came up when we were
 implmenting the product.
 
 z/os 1.9
 
 
 What is the maximum number of TSO users you can have on at one time?  Does 
 this
 3rd party app ever logoff?
 
 If you could catch a moment when it gets that message, can you do a D TS,L 
 and see
 how many TSO users are logged on?  You may be able to do this periodically 
 with an
 automation process so you could do a point in time check.
 
 Have you checked with the 3rd party vendor on this issue, and what do they 
 say?  If
 not, do you have the ability to alter the REXX to find out how many TSO users 
 are
 logged on at the time of the message?
 
 What level of z/OS or OS/390 are you running?
 
 Lizette
 
 
 
 
 Have an 3rd party application that interfaces with TSO. It signs on 
 periodically,
 and runs a rexx exec. Ocassionally in its log file it gets a message MAXIMUM 
 USERS
 LOGGED
 
 There is never any messages at the same time in the syslog. Other normal TSO
 users never have an issue.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


CA1 Service Pack Level display

2009-07-28 Thread Lizette Koehler
I have forgotten.  How do I determine the service level of maint for CA1 (NOT 
SMP/E).

Is there a CA1 command or report tht will tell me?  All I see in my listings is 
11.5  but not which SPxx level I am at.

Lizette

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: CA1 Service Pack Level display

2009-07-28 Thread Lizette Koehler
CA1 one tells me that when you do a TMSSTATS report with PARM=OPT, the GEN 0904 
is for SP05.  Makes sense???

Lizette


Lizette, I just did an upgrade, and I don't see it anywhere either.
Fortunately, we keep it
in the dataset name, but if you don't, you can at least look in the SMPMCS
dataset,
where I find the following comments:
/***/
/*   CA 1 TAPE MANAGEMENT BASE */
/*  Release 11.5  Service Pack 5   */
/*Copyright © 1996, 2009 CA.  All rights reserved. */
/***/.
Hope that helps.
Mary Anne
On Tue, Jul 28, 2009 at 3:07 PM, Lizette Koehler 
stars...@mindspring.comwrote:

 I have forgotten.  How do I determine the service level of maint for CA1
 (NOT SMP/E).

 Is there a CA1 command or report tht will tell me?  All I see in my
 listings is 11.5  but not which SPxx level I am at.

 Lizette



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: CA1 Service Pack Level display

2009-07-28 Thread Lizette Koehler
Only messages I have show 11.5 but no SPxx level in them or GENLEVEL.  I think 
because CA1 is s stable, it did not have the nice little feature.  I have 
heard R12 should be out in the near future.  If so, maybe Russ has had that 
added to the improvements

Lizette




Lizette,

Doesn't CA1 list the level when it starts?  It should be in the syslog then, 
or you can try displaying it from the DA screen, although that may be 
something that comes up with no displayable data.  I can't look since I 
don't have a system available.


- Original Message - 
From: Lizette Koehler stars...@mindspring.com

 CA1 one tells me that when you do a TMSSTATS report with PARM=OPT, the GEN 
 0904 is for SP05.  Makes sense???

 Lizette 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: IEFU29 and Automation

2009-08-02 Thread Lizette Koehler
When you used Mark's solution, how did you code //SMFDUMP PROC
MAN='X',ALL=FALSE
The X= part?  This process requires the fully qualified MAN file to be
dumped.

You should have started the ALL process something like

S SMFDUMP,MAN='SYS1.MANx',ALL=TRUE
Where MAN is your fully qualified man file.

Is that what you did?  If it is, please show us the JCL output from the
failed process.

Lizette


 
 I am having a discussion with a coworker about whether or not we need to
 run IEFU29.  We have OPS/MVS in house.  I say that we do not need IEFU29
 because OPS/MVS can trap on the IEE388I SMF NOW RECORDING ON VOLSER
 DCSMF3,
 DSN=SYS1.SPG7.MAN3 TIME=10.30.00 message, display the man files at that
 point and the issue the Dump command for the correct MAN file.
 
 My coworker says we have to run the IEFU29 exit to do this.
 
 I know we could put the IEFU29 in place, but I think the less exits to
 maintain the better.
 
 
 
 I've done it both ways.  Here, we use IEFU29 but used to use automation
on
 a few of monoplex LPARs.  I standardized on IEFU29 sometime after
 I started working here.
 
 One advantage that the automation had was that when shutting down LPARs
 you can leave a MANx file that still needs to be dumped (too late in the
 shutdown process for it to be started), then the next time you IPL it
will
 start recording on the first one which leaves a MANx file that needs to
 be dumped.  The old automation used to include a  D SMF at IPL time
 and dump those MANx files that required it.
 
 There were 2 solutions I had for that.
 
 1) Ignore it.  As long as there were enough MANx data sets to handle
 the load, the SMFDUMP program that runs after midnight dumps them
 all anyway (in addition to doing a switch).  MXG doesn't care if the SMF
 data is out of order anyway.
 
 2)  Use a proc like the following at IPL time and S SMFDUMP,ALL=TRUE
 (I only use this in my sandbox LPARs that don't have automation nor
 SMF daily processing):
 
 
 //SMFDUMP PROC MAN='X',ALL=FALSE
 //*
 //* THIS PROC IS NORMALLY STARTED VIA IEFU29 SMF EXIT WHEN AN
 //* SMF DATA SET SWITCH OCCURS (ONLY THE FIRST STEP RUNS):
 //*S SMFDUMP,MAN=SMF.DATA.SET.NAME
 //*
 //* AT IPL TIME IS IS STARTED AS FOLLOWS TO RUN THE SMFDUMP
 //* PROGRAM TO ENSURE ALL FULL SYS1.MANX DATA SETS ARE DUMPED:
 //*S SMFDUMP,ALL=TRUE
 //*
 //* IT IS ALSO STARTED THIS WAY AT MIDNIGHT TO USE THE SMFDUMP
 //* PROGRAM WHICH FORCES AN SMF SWITCH IN ORDER TO CAPTURE ALL
 //* THE SMF DATA UP TO THAT POINT FOR DAILY PROCESSING.
 //*
 //TESTEXEC EXEC PGM=IEFBR14
 //*
 //
 
 //TESTONE  IF (TESTEXEC.RUN NE ALL) THEN
 //
 
 //DUMPONE  EXEC PGM=IFASMFDP,TIME=1440
 //SYSPRINT DD SYSOUT=*
 //DUMPIN   DD DSN=MAN,DISP=SHR
 //DUMPOUT  DD DSN=hlq.SYSNAME..SMF(+1),DISP=(,CATLG),
 // DCB=(SYS1.MODEL,LRECL=X,BLKSIZE=32756,RECFM=VBS),UNIT=SYSDA,
 // SPACE=(CYL,(100,100),RLSE)
 //SYSINDD DUMMY
 // ENDIF
 //
 
 //TESTALL  IF (TESTEXEC.RUN EQ ALL) THEN
 //
 
 //DUMPALL  EXEC PGM=SMFDUMP,TIME=1440
 //SYSPRINT DD SYSOUT=*
 //DUMPOUT  DD DSN=hlq.SYSNAME..SMF(+1),DISP=(,CATLG),
 // DCB=(SYS1.MODEL,LRECL=X,BLKSIZE=32756,RECFM=VBS),UNIT=SYSDA,
 // SPACE=(CYL,(100,100),RLSE)
 //SYSINDD DUMMY
 // ENDIF
 
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html
 
 I have tried to implement this sample. But when I started the procedure
with
 ALL=TRUE the following messages were issued:
 
 IFA010I SMF DUMP PARAMETERS
 IFA010I END(2400) -- DEFAULT
 IFA010I START() -- DEFAULT
 IFA010I DATE(190,2099366) -- DEFAULT
 IFA010I OUTDD(DUMPOUT,TYPE(0:255)) -- DEFAULT
 IFA010I INDD(DUMPIN,OPTIONS(ALL)) -- DEFAULT
 IFA012I DSORG OF DUMPIN   CANNOT BE DETERMINED
 IFA012INO FURTHER PROCESSING OF THIS DATASET
 IFA011I SMF DUMPOUT  DATASET CANNOT BE OPENED
 IFA011INO FURTHER PROCESSING OF THIS DATASET
 
 Can IFASMFDP work without the DUMPIN dd card?
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: IEFU29 and Automation

2009-08-02 Thread Lizette Koehler
Please post your JCL for this process. The ALL step uses SMFDUMP and the
FALSE step uses IFASMFDP.

Lizette

 Lizette,
 
 The problem occured when ALL=TRUE was specified. In this case the
 DUMPONE step is not executed . The step that is executed is DUMPALL. In
 this step there is no reference to the MAN variable, so that specifying
MAN in
 calling the procedure would not help.
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: IEFU29 and Automation

2009-08-03 Thread Lizette Koehler
I would look on the CBT TAPE under UPDATEs on the left hand side of the page.  
It should be file 686.

Lizette




Lizette is correct.  The example I posted requires the use of the CBIPO
SMFDUMP program for the ALL step.   Search the archives if you want
to know more about the SMFDUMP program.




On Sun, 2 Aug 2009 10:46:47 -0400, Lizette Koehler 
stars...@mindspring.com
wrote:

Please post your JCL for this process. The ALL step uses SMFDUMP and the
FALSE step uses IFASMFDP.

Lizette

 Lizette,

 The problem occured when ALL=TRUE was specified. In this case the
 DUMPONE step is not executed . The step that is executed is DUMPALL. In
 this step there is no reference to the MAN variable, so that specifying
MAN in
 calling the procedure would not help.


--

I have failed to notice that the ALL step uses  SMFDUMP .
I have found  a 1996 version of this program in one of our linklist libraries. 
   
Where can I find a current version ?  


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


How to encrpyt DFHSM Tapes

2009-08-03 Thread Lizette Koehler
I am struggeling through the 2000 page hsm,dss, and ...   manual.
 
Is there a parm in DFHSM to tell him we will be using encryption on his tapes?
 
I have an acs routine currently that says if the DSN = HSM.HMIG.* then 
Dataclas=ENCRYPT
 
Lizette

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: How to encrpyt DFHSM Tapes

2009-08-03 Thread Lizette Koehler
Sorry, I should have included

z/OS V1.9 RSU0902
Using TS3500 with 1120 E05 tape drives.

We would like to be able to encrypt the DFHSM Mig tapes.  We prefer using our 
DATACLAS but I am not sure DFHSM is letting it happen.

We are using this ACS code for all of our customer backup tape data so it can 
be sent offsite incase of a DR.  However, we want to include the DFHSM tapes as 
well in the encryption process.

Lizette



Depends on who(m) you want to do the encryption. DFHSM or the Tape Drives.

See the ENCRYPT keyword on the DUMPCLASS definitions.

BTW, AFAIK, this is not available for DFHSM BACKUP or MIGRATION.
IIRC, this came in about the z/OS 1.7 time  frame via an APAR ( I wasn't able 
to locate it w/a quick search).

HTH,

snip
I am struggeling through the 2000 page hsm,dss, and ...   manual.
 
Is there a parm in DFHSM to tell him we will be using encryption on his tapes?
 
I have an acs routine currently that says if the DSN = HSM.HMIG.* then 
Dataclas=ENCRYPT
/snip


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: How to encrpyt DFHSM Tapes

2009-08-04 Thread Lizette Koehler
It was what I was told.  I have not confirmed or verified my colleagues'
statement.

If the DFHSM tape is actually EFMT2 then I will believe that it is being
encrypted but not by DFHSM.  The thought was there might be a DFHSM parm
that did this rather than the hardware.

Lizette


 
 Why do you think HSM is not letting your tapes use the hardware
 encryption?
 dd keller
 
 
 
 
 
 
 
 
 Sorry, I should have included
 
 z/OS V1.9 RSU0902
 Using TS3500 with 1120 E05 tape drives.
 
 We would like to be able to encrypt the DFHSM Mig tapes.  We prefer using
 our DATACLAS but I am not sure DFHSM is letting it happen.
 
 We are using this ACS code for all of our customer backup tape data so it
 can be sent offsite incase of a DR.  However, we want to include the DFHSM
 tapes as well in the encryption process.
 
 Lizette
 
 
 
 Depends on who(m) you want to do the encryption. DFHSM or the Tape
 Drives.
 
 See the ENCRYPT keyword on the DUMPCLASS definitions.
 
 BTW, AFAIK, this is not available for DFHSM BACKUP or MIGRATION.
 IIRC, this came in about the z/OS 1.7 time  frame via an APAR ( I wasn't
 able to locate it w/a quick search).
 
 HTH,
 
 snip
 I am struggeling through the 2000 page hsm,dss, and ...   manual.
 
 Is there a parm in DFHSM to tell him we will be using encryption on his
 tapes?
 
 I have an acs routine currently that says if the DSN = HSM.HMIG.* then
 Dataclas=ENCRYPT
 /snip
 
 
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: How to encrypt DFHSM Tapes

2009-08-04 Thread Lizette Koehler
Thanks for the correction.  I should not respond from the top of the head.  It 
never works for me.

Anyway I have a clearer description of the issue.

Apparently DFHSM is using ESOTERICS, and we will need to create a new esoteric 
(including a change to the IODF) for it to use for the E05 drives.  I am not 
sure why since we only have one type of tape drive.  We have DFHSM currently 
set to use the esoteric for 3590-1.  I am still researching this because I 
believe we should be able to do this with a more general esoteric inside DFHSM.

Lizette




Lizette,

EFMT2 does not mean the tape is encrypted.  In fact, it means it isn't.
EFMT simply means Enterprise Format.  EEFMT2 is the encrypted version.
EEFMT means Enterprise Encrypted Format.

EFMT1 was the tape format of the original 3592 tape drives (the J1A
models), EFMT2 is the TS1120 tape drives, and EFMT3 is the TS1130 drive
native format which is related to the density and capacity of the tapes.


It was what I was told.  I have not confirmed or verified my colleagues'
statement.

If the DFHSM tape is actually EFMT2 then I will believe that it is being
encrypted but not by DFHSM.  The thought was there might be a DFHSM parm
that did this rather than the hardware.

Lizette


 
 Why do you think HSM is not letting your tapes use the hardware
 encryption?
 dd keller
 
 
 
 
 
 
 
 
 Sorry, I should have included
 
 z/OS V1.9 RSU0902
 Using TS3500 with 1120 E05 tape drives.
 
 We would like to be able to encrypt the DFHSM Mig tapes.  We prefer
using
 our DATACLAS but I am not sure DFHSM is letting it happen.
 
 We are using this ACS code for all of our customer backup tape data so
it
 can be sent offsite incase of a DR.  However, we want to include the
DFHSM
 tapes as well in the encryption process.
 
 Lizette
 
 
 
 Depends on who(m) you want to do the encryption. DFHSM or the Tape
 Drives.
 
 See the ENCRYPT keyword on the DUMPCLASS definitions.
 
 BTW, AFAIK, this is not available for DFHSM BACKUP or MIGRATION.
 IIRC, this came in about the z/OS 1.7 time  frame via an APAR ( I
wasn't
 able to locate it w/a quick search).
 
 HTH,
 
 snip
 I am struggeling through the 2000 page hsm,dss, and ...   manual.
 
 Is there a parm in DFHSM to tell him we will be using encryption on
his
 tapes?
 
 I have an acs routine currently that says if the DSN = HSM.HMIG.*
then
 Dataclas=ENCRYPT
 /snip
 
 
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


<    4   5   6   7   8   9   10   11   12   13   >