Re: DFHSM Secondary Space Management

2012-06-08 Thread Staller, Allan
Verify the actually assigned management class for the datasets in
question. It may not be the one you think it is.
Actually, IIRC, by default, the dataset cannot be deleted from ML2 if
there is no backup. 

There is a patch available in the DFHSM Implementation/Customization
Guide to change this behavior. 

http://publib.boulder.ibm.com/infocenter/zos/v1r11/index.jsp?topic=/com.
ibm.zos.r11.arci000/disdbu.htm



Al Staller | Z Systems Programmer | KBM Group | (Tel) 972 664 3565 |
allan.stal...@kbmg.com


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Phil Kingston
Sent: Friday, June 08, 2012 4:50 AM
To: IBM-MAIN@bama.ua.edu
Subject: DFHSM Secondary Space Management

All,

I have a management class that is supposed to delete selected datasets
after 30days non usage. The datasets end up on either ML1 or ML2. It
appears though that HSM secondary space management is not deleteing
these and were getting a build up of datasets which should have been
deleted. The key parts of management class DEL030 are as follows:

Expire Non-usage  30
Expire date/days   NOLIMIT
Primary Days 5
Level 1 Days  21
ADM/USER Backup BOTH
Auto Backup  NO(was YES. Changed to NO yesterday!) 

The Storage Group has Auto Backup set to yes.

HSM performs NO auto backup though.

Any ideas why my datasets don't get deleted?

Regards,
Phil Kingston

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: JES/2 Proc SYSIN Concat Error??

2012-06-05 Thread Staller, Allan
snip
I only receive the DD * data in SYSUT2, not the copied ISCLG.JCL(SHOWIT)

proc. 
 * -- * 
 * THIS IS THE PROC YOUR EXECUTING* 
 * -- * 
/snip

This is consistent with the provided example.


/snip
If I change the proc so that SYSUT1 is last statement, everything works 
fine (I see the proc as well as the comments). 

 * -- * 
 * THIS IS THE PROC YOUR EXECUTING* 
 * -- * 
//SHOWIT  PROC
...
/snip

Nothing in the provided example would cause the SHOWIT proc to be
displayed.

1) View the output in SDSF via  the ? on the job selection panel
2) check your default MSGLEVEL

If the above does not resolve the issue, provide the full JESLOG, JCL
Listing and JESMSGS

HTH,




snip
I'm wondering if anyone else has seen this phenomenon.  Doesn't seem
right 
to me. 

I have a proc that looks like this

//SHOWIT  PROC 
//STEP010 EXEC PGM=IEBGENER 
//SYSPRINT  DD SYSOUT=* 
//SYSUT1DD DDNAME=INPUT  
//SYSIN DD DUMMY 
//SYSUT2DD SYSOUT=* 
//SHOWIT  PEND 

in the dataset ISCLG.JCL(SHOWIT) 

I execute it with JCL like 
//ISCLGTES JOB 3432000, 
// 'CHIP GRANTHAM X7382', 
// CLASS=S, 
// MSGCLASS=X 
// JCLLIB ORDER=ISCLG.JCL 
//STEP010 EXEC SHOWIT 
//INPUT   DD  *
 * -- * 
 * THIS IS THE PROC YOUR EXECUTING* 
 * -- * 
//DD  DISP=SHR,DSN=ISCLG.JCL(SHOWIT) 

I only receive the DD * data in SYSUT2, not the copied ISCLG.JCL(SHOWIT)

proc. 
 * -- * 
 * THIS IS THE PROC YOUR EXECUTING* 
 * -- * 

If I change the proc so that SYSUT1 is last statement, everything works 
fine (I see the proc as well as the comments). 

 * -- * 
 * THIS IS THE PROC YOUR EXECUTING* 
 * -- * 
//SHOWIT  PROC 
//STEP010 EXEC PGM=IEBGENER 
//SYSPRINT  DD SYSOUT=* 
//SYSIN DD DUMMY 
//SYSUT2DD SYSOUT=* 
//SYSUT1DD DDNAME=INPUT  
//SHOWIT  PEND 

Is this right?
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Anyone using MASH (Multiple Address Space HSM)

2012-05-22 Thread Staller, Allan
Look in the Setting up a SYSPLEX manual. It will talk about HSMplex's
etc. Should  be helpful.
I am running a single HSMplex at this time.

The only gotcha I recall is be careful with any ADDVOL commands for
non-SMS managed volumes.

HTH,

snip
I am working on a conversion document to change our HSM from a single to
multiple address space 

Has anyone done this?
Any concerns or comments?

I have been reading the Share Proceedings and Manuals, but there does
not
appear to be any user experience info on this yet.
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Servicelink, ETR and SR

2012-05-18 Thread Staller, Allan
I will repeat the gist of many previous attempts to get the attention of
IBM.

The next generation tools are inferior to their (IIRC, z/VM based)
predecessors in terms of performance, reliability and functionality.

z/VM, z/OS, and AIX are designed with fault tolerance and hot failover
capabilities. A application outage should not last more time than that
to detect the failure and restart the application, assuming the
application was not designed for hot standby. 54 hours (planned) and
another 8 hrs plus imply the application was not designed in this
manner.

Which begs the question, on which platform are the applications hosted
(MICROSOFT??), and why are the capabilities of the operating systems not
exploited?

IBM should be embarrassed. 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


IBM support Portal

2012-05-17 Thread Staller, Allan
Anybody having trouble getting to actual APAR data?
Searches seem to be OK, but technical difficulties when actually
attempting to access information.
Seems to have been down since 04:00 CST

The new support tools fail again in terms of availability,
reliability, and performance.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: ### of GDG Entries

2012-05-10 Thread Staller, Allan
Short answer... NO. 
The data can be kept after it rolls off the GDG, but it is just a file
at that point and must be referenced by the fully
qualified DSN e.g. x.y.x.gvnn

snip

We have a business application that creates literally 100s of GDGs a
day; please don't ask.
Is there any way to create or pretend to create a GDG base greater than
255...
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: FTP Parameters in Batch

2012-05-08 Thread Staller, Allan
Look at the file pointed to by the //FTPDATA dd statement

snip
Can anyone assist please.

I am looking for the FTP parameters to overwrite the default size of a
Z9 dataset that is created in 'Tracks' and not in 'Cylinders'.

//INPUT DD  *  
ascii  
GET Z9JobsDAY17APR2012.txt 'FASPT01.MXG.EDW.APR12.DAY17.FTP'   
quit   
//*
/snip


Regards


Sarel Swanepoel
Please Note: This email and its contents are subject to our email legal
notice which can be viewed at
http://www.sars.gov.za/Email_Disclaimer.pdf 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: SELECTING SMF RECORDS FOR 1 DAY

2012-05-04 Thread Staller, Allan
Control statements look good to me. 

Change the BLKSIZE on OUTDD1 to 27998
i.e. ...DCB=(recfm=vbs,lrecl=32760,blksize=27998)

Increase the space allocation. There are an awful lot of type14/15 records cut. 
Michael Cleary's DAF (CBT FILE 094) will be helpful here to decode the records.

Don't forget to adjust the blksize in STEP2.

HTH,

Al Staller | Z Systems Programmer | KBM Group | (Tel) 972 664 3565 | 
allan.stal...@kbmg.com

snip
 
I am following up on a problem regarding the corruption of a dsn.  I have the 
SMF records for the day, however since the daily tapes are merged into a weekly 
tape I am having a problem (space issues) trying to extract only the type 14  
15 records for that particular date.  I looked at - OSMVS System Management 
Facilities - the doc for an example but I didn't find any.  Can someone suggest 
what I can try.  Below is my job which I am trying to run.
  //STEP1    EXEC PGM=IFASMFDP   
//INDD1    DD  DSN=SYS2.SMFDATA.WEEK.G1584V00,DISP=SHR   
//OUTDD1   DD  DSN=SM11, 
//    DISP=(,PASS),UNIT=SYSDA,SPACE=(CYL,(150,150),RLSE),  
//    DCB=(RECFM=VBS,LRECL=32760,BLKSIZE=4096) 
//SYSPRINT DD SYSOUT=* 
//SYSIN    DD *    
   INDD(INDD1,OPTIONS(DUMP))   
   OUTDD(OUTDD1,TYPE(14:15))   
/* 
//STEP2   EXEC PGM=IDCAMS,TIME=1440    
//DD1  DD DSN=SM11,  
//    DISP=(OLD,DELETE),   
//    DCB=(RECFM=VBS,LRECL=32760,BLKSIZE=4096) 
//SYSOUT   DD SYSOUT=* 
//SYSPRINT DD SYSOUT=* 
//SYSIN    DD * 
  PRINT INFILE(DD1) DUMP 
/*
// 
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: IBMLink Outage May 4-7

2012-05-03 Thread Staller, Allan
In most (if not all) cases I have found the second generation tools
(SIS, Support Portal, IBM Link, z/OS Internet Library,) to be
inferior to the systems they replaced.

Performance, availability, and ease of use have all suffered. The only
item I can give a passing grade to is content. (and the passing grade is
only a C)

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: WLM : multiple periods not recommended for batch - why?

2012-05-01 Thread Staller, Allan
snip
I have read a few articles that say that multiple periods are not 
recommended for batch service classes. Multiple periods seems to be 
considered a bit old fashioned.

I haven't been able to find anything clearly explaining why. I have 
always felt that they worked well. My best guess is that it is something

to do with the behaviour of WLM managed initiators but I'm not sure.

Can anyone shed any light, or point me to some further reading?
/snip

I can't point to anything specific, but my feeling has always been batch
is batch is batch (possibly with a divide between test/dev/qc and
production).

I can't think of any WLM related reason for this recommendation. 

I can see a techno-political use for a penalty service class. i.e. If
a particular job exceeds the installation defined limits for a
particular type of work, migrate to a service class just barely above
discretionary, as a punishment.

You might check here:

http://www-03.ibm.com/systems/z/os/zos/features/wlm/

for further enlightenment. I myself have not been through all of the
information available there.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Catalog Question

2012-04-30 Thread Staller, Allan
Try here:

http://www-01.ibm.com/support/docview.wss?uid=isg1II13354


snip
I just started receiving the following message on a catalog
IEC361I CATALOG CATLOG.MVS.VGEM913 (DATA) HAS REACHED 82% OF THE MAXIMUM
EXTENTS

The messages are coming out about twice a month.

I am running z/OS 1.9

Can anyone tell me, what is the proper way to go about expanding the
catalog.
I started looking on the internet but unable to find out exactly how to
go about it.
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Catalog IDCAMS Verify - IEC161I 032-015

2012-04-25 Thread Staller, Allan
From :
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA2M6C0/SPTB
B3351

RC148 An unidentified error occurred while VSAM was searching the
catalog.

Is there a FILE01 DD statement in you IDCAMS JCL? Does it point to the
correct volume/dsn?

From :
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/FRAMESET/IEA2M7C0/S
PTDP02801

IEC161I RC32 

Specific information for this return code: The catalog record for the
data set being processed was not found. During end-of-volume (EOV)
processing, the error can also occur if an additional volume is required
for a data set but the catalog contains no more volume records for the
data set. 

For message IEC070I, the subfunction information field, if present,
might contain a decimal problem-determination code (reason code) for use
by the IBM Support Center in case further problem diagnosis is
necessary. The following table lists the reason codes for return code
032. 

Is there a FILE01 DD statement in you IDCAMS JCL? Does it point to the
correct volume/dsn?

Please post the entire job stream


snip

Please advise what this message code means. The manuals are not very
informative. I try to verify a catalog, and this message is generated,
failing with RC=12. The error has something to do with the opening of
the catalog. The reason code is what I need to know.

COMMAND INPUT === 
  VERIFY FILE(FILE01)   
0IDC3300I  ERROR OPENING CATALOG.TSO.USERS  
 IDC3351I ** VSAM OPEN RETURN CODE IS 148   
0IDC3003I FUNCTION TERMINATED. CONDITION CODE IS 12 
0   
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: SDSF JES $JOURNAL Can somebody read this ?

2012-04-24 Thread Staller, Allan
snip
Is there something important in SDSF JES $JOURNAL and $INTTEXT ?
/snip

$INTTEXT is the pseudo-code output from the converter (very similar in
concept to dynamic allocation text units). It may be displayed/not
displayed by use of the SDSF command line entry INPUT OFF/ON. This is
almost invaluable if you are writing an SMF/JES exit that is trying to
enforce some sort of JCL related limitation.

Not sure about $JOURNAL, but I would check JESPARMS for the JRNL(??)
attribute on $JOBCLASS

HTH,

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: PDF vs. Bookie (was: ADATA Exit)

2012-04-23 Thread Staller, Allan
As a general rule, I have found the NEXT GENERATION internet tools to
be a step backwards from their predecessors.
Witness the IBM Support Portal, Internet Library, )

In functionality, data accuracy and performance.

snip
And another disparaging remark against IBMs 'Information Center':   I'm
trying to use two different levels for IBM i  this morning,  both of
them are stuck on 'indexing'  they then eventually fail.
Information center indeed!
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Jes job log unavailable in STC

2012-04-19 Thread Staller, Allan
What does $DOUTCLASS(K) show?

snip
Jon, we've include a job card in IEFJOBS library in MSTJCLxx and it
doesn't work. The job card include MSGLEVEL and MSGCLASS.

//SMFDUMP  JOB MSGLEVEL=(1,1),MSGCLASS=K 
// JCLLIB  ORDER=SYS1.PROCLIB
//SMFDUMP  EXEC  SMFDUMP

/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Trying to capture JES2 Job Log

2012-04-19 Thread Staller, Allan
From Jorge's original post(which also answers my previous question
regarding the output of $DOUTCLASS(K)):

snip
Hello:

 We can't view the STC jes job log when our started tasks ended. When
they are executing we can view the jes job log, but after they ended we
can view only the SYSPRINT. We've reviewed all the JES2PARM parameters
and we don't see anything wrong:

JOBCLASS(STC) TIME=(1440,00),
 COMMAND=EXECUTE,
 BLP=YES,
 AUTH=ALL,   
 MSGLEVEL=(1,1), 
 IEFUJP=YES, 
 IEFUSO=YES, 
 OUTDISP=(HOLD,HOLD),
 LOG=YES,
 OUTPUT=YES, 
 PERFORM=000,
 PROCLIB=00, 
 REGION=0K,  
 
 TYPE6=YES,  
 TYPE26=YES, 
 MSGCLASS=K

OUTCLASS(K) BLNKTRNC=YES,   
 OUTDISP=(HOLD,HOLD)
 OUTPUT=PRINT,  
 TRKCELL=YES  
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: SMS QUESTION

2012-04-17 Thread Staller, Allan
Apparently you have already looked up the relevant return code/reason code 
(IDC3009I RC140 RSN110). Lots of hits in IBM DB, for RC140, but none w/RSN110

0) Was SMS fully activated w/o errors at the time?
1) is the original dataset SMS managed? And Extended format?
2) Are you sure of you SMS routines? What happens does the ACS test facility 
say about your allocation? Is HSM001 a member of the SG? IS HSM001 formatted as 
a mod-9?
3) explicitly specify a DC w/extended attribute in the define.

If all of the above are true, open a PMR.

Al Staller | Z Systems Programmer | KBM Group | (Tel) 972 664 3565 | 
allan.stal...@kbmg.com


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
willie bunter
Sent: Tuesday, April 17, 2012 11:14 AM
To: IBM-MAIN@bama.ua.edu
Subject: SMS QUESTION

I encountered the problem with defining a VSAM EXTENDED dsn at a recent 
disaster recovery.  The SMS rules - ACS or DC, MC ,SC  SG - are the same as in 
our production system.  However I could not understand the reason for this 
problem.  As a work around I defined the MCDS to use 4,000
cylinders on HSM001 which is a MOD-9.  What is also suprising is that the BCDS 
which is also VSAM EXTENDED worked fine.  
 
Below is the output of the failing job.
 
  DEFINE CLUSTER -   
  (NAME(SYS2.MCDS)  -
  VOLUMES(HSM001)  -  
  CYLINDERS(8000)  -  
  RECORDSIZE(435 2040)  FREESPACE(0  0) -     
  INDEXED  KEYS(44  0)   SHAREOPTIONS(3 3) -     
  SPEED BUFFERSPACE(530432) -    
  UNIQUE   NOWRITECHECK)  -   
  DATA  -    
    (NAME(SYS2.MCDS.DATA) -   
  CONTROLINTERVALSIZE(12288)) -      
  INDEX  -    
    (NAME(SYS2.MCDS.INDEX) -     
  CONTROLINTERVALSIZE(2048))  
0IGD17103I CATALOG ERROR WHILE DEFINING VSAM DATA SET
 SYS2.MCDS
 RETURN CODE IS 140 REASON CODE IS 110 IGG0CLEV
 IGD306I UNEXPECTED ERROR DURING IGG0CLEV PROCESSING
 RETURN CODE 140 REASON CODE 110
 THE MODULE THAT DETECTED THE ERROR IS IGDVTSCU
 SMS MODULE TRACE BACK - VTSCU VTSCT VTSCH VTSCG VTSCD VTSCC VTSCR SSIRT
 SYMPTOM RECORD CREATED, PROBLEM ID IS IGD00025
 IGD17219I UNABLE TO CONTINUE DEFINE OF DATA SET
 SYS2.MCDS
0IDC3014I CATALOG ERROR
 IDC3009I ** VSAM CATALOG RETURN CODE IS 140 - REASON CODE IS
 IDC3009I IGG0CLEV-110
1IDCAMS  SYSTEM SERVICES   TIME: 
19:20:13    04/02/12 PAGE  2
0IDC3003I FUNCTION TERMINATED. CONDITION CODE IS 12

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: GO TO cobol

2012-04-16 Thread Staller, Allan
The branch execution logic in modern (s/360 or newer. YES s/360 circa
1963) are among the most efficient in the processor. That still has not
changed.
Forget anyone ever told you that GO TO increases CPU overhead.

snip
.. GO TO was made a pariah by an article by Edgar Dijkstra.

http://en.wikipedia.org/wiki/Considered_harmful

And, of course, management went stupid (again) and came up with you
cannot use the GOTO in any code at all. Which actually makes some
COBOL more complicated due to the requirement of nesting IF statements
within IF statements. 
/snip


Just as in many other things, a good idea can be taken to an illogical
extreme or out of context.

In addition to avoiding GO TO's, Dykstra also proposed limiting each
module to 1 page or less of code, that being the upper limit 
of what could be proven to be correct code. ( I'll bet management
forgot about that one!).

BTW, I agree w/Dykstra. Maintaining a structured program is far easier
than spaghetti code. However, one page of code is a very small routine
and will result in excessive
overhead due to all of the module calls. (BTDTGTTS).

I haven't re-read Dykstra in many years, but I believe that he may have
left some loopholes.

All of that being said, sometimes a plain old GO TO is far easier to
decipher that if/then/else nested ad nauseum.
As with most things in this business, it depends!

Just my $0.02 (USD) worth.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: SSL FTPing via crypto processor

2012-04-12 Thread Staller, Allan
1) If CPACF is available, I believe it will be used
2) IIRC, TLS uses symmetric key
3) Encryption generally incurs fairly significant overhead. IIRC, TCPIP
will offload this work to a  zIIP if available.

HTH, 

snip
as the subject ,  a couple of questions to be clarified .
from z10+ , with z/OS V1.11+
1) I know z/OS FTP client support SSL/TLS ,  But no idea whether the
transferred data encrypted via HW crypto (CPACF) ?
2) If yes , what kind of key , symemtric key ? asymmestric key ?
3) is it signifcant CPU overhead comparing with none SSL ftping ?
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: SMF from critical application

2012-04-11 Thread Staller, Allan
I agree w/Martin. 

At the time of IEFU83, all of the processing has been done, and you are
merely trying to suppress the writing of the record.
The writing of the SMF record is an asynchronous process, handled by the
traditional SMF writer, or the System Logger and does not affect
application performance.
There is, of course, the subsequent processing of the SMF records,
unrelated to application processing.

My understanding of standard SMF processing indicates that the
overhead to create the SMF data is built in to the OS and cannot be
changed. DB2 may have an option (I am not aware of one) to suppress the
data creation.

IOW, given that you are already incurring the overhead to do the data
gathering, what is gained by suppressing the records?

snip
We are thinking about writing a SMF exit (IEFU8x) to not write certain
DB2 IFCIDS of the SMF 102 record. Can anyone direct me to some
documentation that would help me to understand how much processing time
would be saved by doing this?
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Questions regarding SMS compacted dataset

2012-04-11 Thread Staller, Allan
Access method

snip
Other utilities, such as IEBGENER. have to decompress the data set as
they
are doing a record by record, logical, copy (this may not be true for
IDCAMS
when using the compression interface, see II14507).

Is this done by the utility (ugh!) or by the access method?
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Batch utility to show DCB info for files

2012-04-11 Thread Staller, Allan
CLIST function LISTDSI

snip
Is there a standard IBM batch utility that can show the DCB and Space
atributes for a file? I tried LISTCAT, but it didn't give me this data.

I would like to generate a report for a whole list of files, so as we
shift
these to another location, we can have the metadata, too.

Coding a Rexx or other program is not an option...the requirement is to
use
standard, already existing utilities.
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN



Re: Accessing USS on Mainframe thru Telnet

2012-04-06 Thread Staller, Allan
USS plus useful content - Read fully
USS acronym wars --Plonk!

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: LU0, SNA, TCPIP issue

2012-04-06 Thread Staller, Allan
Lots of ways to go here.
Upgrade CICS to use LU2. CICS also (IIRC) speaks TCP directly.
TN3270/TN3270E
Some emulator client on PC (Rumba, VISTA, PCOMM)

HTH,

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: VSAM help wanted for random reads

2012-04-05 Thread Staller, Allan
Last time I looked, AIX with upgrade (required for the OP's described
conditions) was a *VERY POOR* performer.
However, with the small proportion of updates later described, this does
not seem like it would have a disproportionate impact.

snip
Create an AIX pointing at the file with the AIX key being the account 
number followed by the record type. Change the update program's logic 
to access and update the AIX not the BASE File. All other programs 
access the BASE file as at present. Note that this requires you to 
look for ACCOUNT-NUMBER suffixed by 4 and look for equal-to or 
greater (ie: Accept the type 5 if it gets returned due to no type 4). 
Also you need to check the returned account number in case there is 
no 4 or 5 for the account number.
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Trying to capture JES2 Job Log

2012-03-30 Thread Staller, Allan
Check the MSGLEVEL setting in JES2   (JOBCLASS(STC)   or JOBDEF). 

snip
I've been away for a while but ready to revisit this at it's a real
irritant.  It shouldn't be this difficult.

I checked a task I can cycle as needed.  When I view the stc via SDSF
all portions (except internal text) show msgclass of 7 which is what is
desired.

NP   DDNAME   StepName ProcStep DSID OwnerC Dest
Rec-Cnt
 JESJCLIN  1 *BYPASS* 7
2
 JESMSGLG JES2 2 *BYPASS* 7
2
 JESJCL   JES2 3 *BYPASS* 7
34
 JESYSMSG JES2 4 *BYPASS* 7
2
 $INTTEXT JES2 5 *BYPASS* A
9
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Printing limits and userids

2012-03-30 Thread Staller, Allan
I can't think of any way to do this natively with JES, VPS, or other
exits.
The only thing I can think of is to write a batch program to invoke the
SAPI interface and take the appropriate action (run on regular
intervals).

Doc can be found in: z/OS V1R13.0 MVS Using the Subsystem Interface
SA22-7642-11

Located here:

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA2F290/CCON
TENTS?SHELF=iea2bkb3DN=SA22-7642-11DT=20110617222159

or 

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/DOWNLOAD/iea2f290.p
df?DN=SA22-7642-11DT=20110617222159


HTH,

snip
  We have a lot of large reports in our MVS spool.  Any suggestions on
limiting users from printing large reports by their userids, or a way to
differentiate between valid print processing and potentially erroneous
print processing by report name with JES2?  A 50,000 page report may be
valid if coming from a production job but may well be in error if
generated by a user/programmer.  Somehow there would need to be a
reference to valid users (userids), valid production jobs, valid
printers, and number of pages.  The pages may not be correct because the
APF information has not been converted.
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Trying to capture JES2 Job Log

2012-03-30 Thread Staller, Allan
Try changing the MSGLEVEL to (1,1) or make this a started job with the
MSGLEVEL=(1,1) on the job card. Check the fine manuals for info on
STARTED JOBS.

snip

JOBCLASS(STC)   AUTH=(ALL),BLP=YES,COMMAND=IGNORE,  
CONDPURG=NO,IEFUJP=NO,IEFUSO=NO,
JESLOG=(NOSPIN),LOG=NO,MSGLEVEL=(2, 
1),MSGCLASS=7,OUTDISP=(,),  
OUTPUT=YES,PERFORM=000,PROCLIB=00,  
QAFF=(ANY),REGION=0004M,SWA=ABOVE,  
TIME=(30,00),TYPE26=NO, 
TYPE6=NO,XEQCOUNT=()
XEQMEMBER(MVS2)=(MAXIMUM=*, 
CURRENT=283),   
XEQMEMBER(MVS1)=(MAXIMUM=*, 
CURRENT=280),   
XEQMEMBER(MVS3)=(MAXIMUM=*, 
CURRENT=179)
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Trying to capture JES2 Job Log

2012-03-30 Thread Staller, Allan
See my previous comment regarding STARTED JOBS.  This should allow you
to just provide the 1 override. 

The SDSF XDC command can also be used to capture the JESMSGLG prior to
shutdown.

I do not currently use started jobs MSGLEVEL=1  is what comes up in my
case. This may be the default for STARTED JOBS (supplied in the absence
of particular parameter).

A quick search did not turn up where the MSGLEVEL=1 is being specified.

HTH, 
 

snip
I'm getting somewhere.  While the JOBCLASS(STC) clearly shows
MSGLEVEL=(2,1) when I look at an active stc I see
//IFOM JOB MSGLEVEL=1

So now the question is why is the start ignoring the MSGLEVEL from
JOBCLASS(STC)?   We use OPS/MVS for automation and it just uses a normal
S task. I don't want to try and alter all the starts to have
MSGLEVEL=(1,1). That's what JOBCLASS(STC) is supposed to do.  Or so I
thought.
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Relocating files in custompac - Z1.13

2012-03-29 Thread Staller, Allan
Go to the dataset summary and reassign the LVOL of the dataset. Move
that LVOL to the 2nd PVOL

HTH,

snip
I am working in the modify system layout panels. I have a 3390-9 being
used for the dlib libraries and need to relocate some files to a second
volume because the mod-9 is full. According to the good old book you
have to go to the SUMMARY Of Logical Volumes, select the LV and then you
can change the PVOL, the problem is it changes every (411 of them) dsn's
in the LV. I have NOT found a way to change only specific dsn's. Please
tell me there is a simple solution that I missed.
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Malicious Software Protection

2012-03-27 Thread Staller, Allan
Get some new auditors!

snip
z/OS, with proper security controls (and believe me - we have LOTS!)
should not have to worry about such things, at least that's what I've
always heard.

Any input on this topic would be GREATLY appreciated!!
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Leaving IBM

2012-03-26 Thread Staller, Allan
Best wishes and my the fish be biting

Thanks for all of the wonderful contributions to IBM-MAIN and RACF-L
over the years.

You have been appreciated!

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: ACIF in zOS1.12

2012-03-21 Thread Staller, Allan
AFAIK ... NO ACIF is a chargeable item circa z/OS 1.9...

snip
Hi all,

Does ACIF still free in zOS 1.12 ?

We're trying to migrate to zOS1.12 from 1.7 (in which ACIF is Free as
part of PSF).
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Execution Velocity

2012-03-20 Thread Staller, Allan
Try here:

http://www-03.ibm.com/systems/resources/servers_eserver_zseries_zos_wlm_
pdf_velocity_pdf_velocity.pdf

snip
Can someone please explain execution velocity for Workload Manager, I'd
really appreciate it.  

We do not seem to be getting the results we thought we would.  On this
particular LPAR, we we're running with 3CPs, but when we activated a 4th
CP, our critical path ran longer.  Overall we are pushing through more
work, but our critical path window ran longer.  We are stumped on why.
We're starting to look at RMF data, but thought I would throw it out to
see if anyone has any clues.

We have a HOTBATCH service class defined with IMP=1, Execution Velocity
of 90, with the CPU Critical flag turned on.  This service class has a
jobclass assigned to it.  At any given time during our batch window,
there may be up to two of three of these jobs running.  Other service
class we have define for batch are PRDBATHI(IMP=2, Execution Velocity of
30) and PRDBATLO(Discretionary).
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Jes2 checkpoint level/mode

2012-03-19 Thread Staller, Allan
Checkpoint LEVEL and checkpoint MODE are 2 distinct and unrelated
parameters. 

 

Checkpoint LEVEL is a JES level set required for MAS dependencies on
certain functions. If any system in the MAS is not at the required
level, or the checkpoint level is insufficient, the new function
cannot be used until the JES2 checkpoint level is changed with the
$ACTIVATE command. Certain levels of JES require a minimum checkpoint
level before they can join the MAS. This affects the contents of the
checkpoint datasets .

 

$ACTIVATE (with no operands) will show you the current level of the
checkpoint, and whether a $ACTIVATE to the next level will succeed.

 

Checkpoint mode is an operand on the $CKPTDEF JES2 initialization
statement and is either SINGLE, DUPLEX or DUAL (I will let you read up
on the difference). This affects the mode of operation of the datasets,
not the contents of the checkpoint datasets.

 

IOW, a checkpoint may be at level (Z2, Z4, Z11),. and be operating in
(SINGLE, DUAL or DUPLEX) mode at any of the levels.

 

Using my personal way-back machine, ISTR that OS390 2.4 was the level
that Workload Managed initiators were made available and the checkpoint
level z2 (z4?) was required to implement 

WLM inits.

 

This type of information is typically in presentations at z/Expo and
SHARE. I would check the archives of the appropriate organizations at
the appropriate vintage for your current releases of JES.

 

There may also be some information on the Redbooks page
http://www.redbooks.ibm.com/

 

The z/OS library can be found here
http://www-03.ibm.com/systems/z/os/zos/bkserv/index.html with manual
back to z/OS 1.2.

 

HTH,

 

 

snip

I am looking for the difference between the JES2 checkpoint level and
checkpoint mode(w.r.t sysplex environment where there are multiple z/os
lpar's of different versions),more specifically difference between z2,z4
modes and the checkpoint level of z/os 1.2.

 

I have tried to google it and have also checked the z/os manuals but
unable to relate the mode and level in sysplex environment.

/snip


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: HSM Recall Failure

2012-03-09 Thread Staller, Allan
VVDS/VVR/CELL ERRORS ENCOUNTERED FOR CLUSTER
PNGG00.CSPACK.CSDITB.D0.KS250 seems to be the root cause. At others have
suggested run diagnose/examine on the affected vvds's. and catalogs.
Correct any errors found and retry.

It may be that the original backup was invalid. 

You might also check OA38052/OA37221/OA34295 depending on the size of
the dataset.

You could also try pre-allocating the target of the restore and use the
replace keyword on the restore command. 

HTH,

snip
It seems like this is neither a HSM or a VVDS size issue. The space in
the SMS pool is also sufficient to this huge data set. It seems more
like a ADRDSSU issue. A restore with a rename for a similar data set was
attempted, and the results were the same:

RESTORE INDD(TAPEIN) -
  DS(INCL( -
PNGG00.CSPACK.CSDITB.**, -
   )) -
  RENAMEU (  -
(PNGG00.CSPACK.CSDITB.**,QNGG00.WSPACK.CSDITB.**), -
) CATALOG SPHERE
 ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND
'RESTORE '
 ADR109I (R/I)-RI01 (01), 2012.069 14:38:00 INITIAL SCAN OF USER CONTROL
STATEMENTS COMPLETED
 ADR016I (001)-PRIME(01), RACF LOGGING OPTION IN EFFECT FOR THIS TASK
0ADR006I (001)-STEND(01), 2012.069 14:38:00 EXECUTION BEGINS
0ADR780I (001)-TDDS (01), THE INPUT DUMP DATA SET BEING PROCESSED IS IN
LOGICAL DATA SET FORMAT AND WAS CREATED BY DFSMSDSS VERSION 
  1 RELEASE 12 MODIFICATION LEVEL 0 ON 2012.061
14:10:03
0ADR711I (001)-NEWDS(01), DATA SET PNGG00.CSPACK.CSDITB.D0.KS250 HAS
BEEN ALLOCATED WITH NEWNAME QNGG00.WSPACK.CSDITB.D0.KS250 USING 
  STORCLAS B2B26, DATACLAS @KS250, AND MGMTCLAS
@939R
0ADR788I (001)-TDUNL(01), PROCESSING COMPLETED FOR CLUSTER
PNGG00.CSPACK.CSDITB.D0.KS250, 30109794 RECORD(S) PROCESSED
0ADR477E (001)-TDRF1(01), VVDS/VVR/CELL ERRORS ENCOUNTERED FOR CLUSTER
PNGG00.CSPACK.CSDITB.D0.KS250
0ADR417W (001)-TDRF1(05), COPY/RESTORE OF DATA SET
PNGG00.CSPACK.CSDITB.D0.KS250 IS INCOMPLETE, 05
0ADR415W (001)-TDLOG(01), NO DATA SETS WERE COPIED, DUMPED, OR RESTORED
FROM ANY VOLUME
0ADR480W (001)-TDLOG(01), THE FOLLOWING DATA SETS WERE NOT PROCESSED
FROM THE LOGICALLY FORMATTED DUMP TAPE DUE TO ERRORS:
0  PNGG00.CSPACK.CSDITB.D0.KS250
0ADR006I (001)-STEND(02), 2012.069 14:50:23 EXECUTION ENDS
0ADR013I (001)-CLTSK(01), 2012.069 14:50:23 TASK COMPLETED WITH RETURN
CODE 0008
0ADR012I (SCH)-DSSU (01), 2012.069 14:50:23 DFSMSDSS PROCESSING
COMPLETE. HIGHEST RETURN CODE IS 0008 FROM:
  TASK001



Any suggestions... :(
/snip




-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Lizette Koehler
Sent: 24 February 2012 02:07 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: HSM Recall Failure

 
 Hi There,
 
 I'm trying to recall a data set migrated to ML2. The recall fails due 
 to
errors found in
 either the VVDS or VTOC. Is there somebody that would be able to point

 me
in the
 right direction of investigation
 
 PAGE 0001 5695-DF175  DFSMSDSS V1R12.0 DATA SET SERVICES
2012.055
 11:55
 ADR035I (SCH)-PRIME(06), INSTALLATION EXIT ALTERED BYPASS FAC CLASS 
 CHK DEFAULT  TO YES  RESTORE INDDNAME(SYS79943) CAT SPHERE -
  BYPASSACS(PNGG00.IT3PCK.CSDITB.D0.KS250   ) -
  MGMTCLAS(@959  ) -
  STORCLAS(B2B26 ) -
  DATASET(INCLUDE(PNGG00.IT3PCK.CSDITB.D0.KS250   ))
 ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 
 'RESTORE
'
 ADR109I (R/I)-RI01 (01), 2012.055 11:55:12 INITIAL SCAN OF USER 
 CONTROL STATEME NTS COMPLETED ADR050I (001)-PRIME(01), DFSMSDSS 
 INVOKED VIA APPLICATION INTERFACE ADR016I (001)-PRIME(01), RACF 
 LOGGING OPTION IN EFFECT FOR THIS TASK ADR006I (001)-STEND(01), 
 2012.055 11:55:12 EXECUTION BEGINS ADR780I (001)-TDDS (01), THE INPUT 
 DUMP DATA SET BEING PROCESSED IS IN LOGICAL DATA SET FORMAT AND WAS 
 CREATED BY DFSMSDSS VERSION
  1 RELEASE 12 MODIFICATION LEVEL 0 ON 2011.270
06:45:10
 ADR711I (001)-NEWDS(01), DATA SET PNGG00.IT3PCK.CSDITB.D0.KS250 HAS 
 BEEN ALLOCATED USING STORCLAS B2B26, DATACLAS @KS250, AND
  MGMTCLAS @959 ADR788I (001)-TDUNL(01), 
 PROCESSING COMPLETED FOR CLUSTER PNGG00.IT3PCK.CSDITB.
 D0.KS250, 16552872 RECORD(S) PROCESSED ADR477E (001)-TDRF1(01), 
 VVDS/VVR/CELL ERRORS ENCOUNTERED FOR CLUSTER PNGG00.IT
 3PCK.CSDITB.D0.KS250
 ADR417W (001)-TDRF1(05), COPY/RESTORE OF DATA SET
 PNGG00.IT3PCK.CSDITB.D0.KS250
  IS INCOMPLETE, 05
 ADR415W (001)-TDLOG(01), NO DATA SETS WERE COPIED, DUMPED, OR RESTORED

 FROM ANY  VOLUME ADR480W (001)-TDLOG(01), THE FOLLOWING DATA SETS WERE

 NOT PROCESSED FROM THE LO GICALLY FORMATTED DUMP TAPE DUE TO ERRORS:
   PNGG00.IT3PCK.CSDITB.D0.KS250 ADR006I 
 (001)-STEND(02), 2012.055 12:11:00 EXECUTION ENDS ADR013I 
 (001)-CLTSK(01), 2012.055 12:11:00 TASK COMPLETED WITH RETURN CODE
 0008 ADR012I (SCH)-DSSU (01), 2012.055 12:11:00 DFSMSDSS 

Re: JCL example to relink a CSECT into an existing load module

2012-03-08 Thread Staller, Allan
On the basis of the information provided, below, IMO, the only *SAFE*
way to make this change is to recompile the entire application. Perhaps
if you provided some additional  info about BA4C1426, I might have some
additional alternatives.

Since you have go through the pain of a mass compile, I would make
BA4C1426 a stand-alone module and dynamically call it. I understand that
this might take some additional time to recoded for dynamic calls.

As to the original request:
1)  Compile BA4C1976 into a stand-alone csect and link into the
special loadlib of your choice
2)  Execute the following for each LOAD module currently existing
//STEP1 exec pgm=hewl,parm=...
//SYSPRINT  DD SYSOUT=*
//SYSLMOD  DD DSN=(new loadmod library)
//SYSLIB1 DD DSN=(original loadmod library)
//SYSLIB   DD DSN=( special loadmod library)
//SYSIN DD *
 Include syslib(BA4C1426)
 Include syslib1(original loadmod name)
 Name original loadmod name(r)


HTH,

snip
We have 1000's of CICS COBOL programs that COPY in a COBOL source
program called BA4C1426 and then statically call it.  I have given some
code examples of how this works below.   In this example, COBOL program
BA4C1976 does a COPY to bring in the COBOL source of BA4C1426 at compile
time and then statically calls BA4C1426.

Our application team would like to change just the BA4C1426 code and
then relink the change into the existing modules.  So for the example
below, BA4C1976 would not be recompiled, but the binder step would be
run to update the existing BA4C1976 load module with a new CSECT for
BA4C1426.

Would anyone have some examples of existing JCL of how to do the relink
step of swapping in a new CSECT into an existing load module?

I was going to research it, but was thinking someone on this list has
already done it and would have an example already available.  I didn't
find any examples quickly with google searches.


Here is an example of how a module like BA4C1976 references BA4C1426:

 Identification Division.
* Object-Class PrsnDBPmtInstRef.
 Program-Id. BA4C1976.

.
.
.
 Procedure Division using Self
  Client-Variables
  Global-Variables
  Arglist.
.
.
. Call 'BA4C1426'
 Using DfhEiBlk DfhCommArea
   TV-023-PRSNDBPMTINSTRSLT-LS
   Client-Variables
   Global-Variables
   ParmList
.
.
.
 COPY BA4C1426.

 End Program BA4C1976.


The BA4C1426 source that is referenced by the COPY BA4C1426 line is a
COBOL program:

 Identification Division.
* Object-Class PARNLIST.
 Program-Id. BA4C1426.
.
.
.
COBOL source
.
.
.
End Program BA4C1426.

/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Why _TZ put times 7 minutes off?

2012-03-02 Thread Staller, Allan
I would suggest that the HW clock is 7 minutes off of GMT

snip
In accordance with an earlier thread I am setting _TZ to 'EST5EDT'
rather
than the configured null so that strftime(%z) works as expected.

I just discovered that that is throwing my local times off by 7 minutes.
Does that make ANY sense to anyone?

The times in question are coming from the following logic:

tm* tmStruct;
struct timeb timebuffer;
ftime(timebuffer);
   tmStruct = localtime(timebuffer.time);

I use ftime because I am also using the milliseconds. (I have a exactly
the
same problem with times derived from STCK, so the ftime is not the
problem.)

Initially the times are correct. However, after I issue 

int seRes = setenv(_TZ, EST5EDT, 1);

 the times are off by exactly seven minutes. (Result time 7 minutes
later or
greater than actual.)
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: HSM recover backup from an missing tape

2012-03-01 Thread Staller, Allan
There is no easy way to do this short of brute force. However, Brute
force is just what computers were designed for!

Generate a clist/rexx to issue the commad 'HLIST DA('datasetname') BOTH
for each dataset on the TTOC listing. This will tell you if there is a
backup for this dataset.

Use this information to generate HDEL 'datasetname' and HRECOVER
'datasetname' commands.

HTH, 

snip
i've a ttoc list of ml2 tape that i need to check if dsns in it have
backup
and if they have delete migrat2 catalog entry and recover dsn from a
backup. Do you know a expedite way of doing this ??
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: DFHSM QUESTION : EXPIRE NON-USAGE

2012-02-28 Thread Staller, Allan
snip
I have noticed that server dsns are being retained by DFHSM and my
suspicion is that the EXPIRE NON-USAGE and EXPIRE DATE/DAYS are in
conflict in MANAGEMENT class.  For example 
 
MGMTCLAS EXPIRE EXPIRERETPARTIAL
PRIMARY  
NAME NON-USAGE  DATE/DAYSLIMIT   RELEASE  DAYS 

BKMSMF 731 7310
YES   
 
Would the problem be resolved if I changed the EXPIRE NON-USAGE to
NOLIMIT and kept the EXPIRE DATE/DAYS at 731?
/snip

IIRC, 

If you set the expire date/days to 731, that is the upper limit of what
the users can specify (and most likely what will be used). This is an
absolute number. i.e. if the file is referenced on day 730, it will
still expire on day 731.

If you were to reverse the logic (expire non-usage 731, expire date-days
nolimit) the file will be removed 731 days after LAST REFERENCE. i.e. if
the file is referenced on day 730, it will now expire on day 1431.

Please double check me with the online help or the fine manuals. I have
responded without reference to either. The online help has a good
discussion on this.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Duplicating SYSOUT output to another DD/DSN in realtime ? (JCL)

2012-02-27 Thread Staller, Allan
YES!.

Define multiple output statements 
//out1 output.
//out2 output...

And refer to them

//sysprint  dd output=(*.out1,*.out2)

HTH,

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Duplicating SYSOUT output to another DD/DSN in realtime ? (JCL)

2012-02-27 Thread Staller, Allan
AFAIK, this will not work with a dataset. 

snip

 YES!.
 
 Define multiple output statements 
 //out1 output.
 //out2 output...
 
 And refer to them
 
 //sysprint  dd output=(*.out1,*.out2)
 
 HTH,
 

That is what I thought first, but I think he wants it to both sysout and
a dataset.

/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: HSM Recall Failure

2012-02-24 Thread Staller, Allan
Decode the following to find the explanation:

ARC1001I PNGG00.IT3PCK.CSDITB.D0.KS250  RECALL FAILED, RC=0069,
REAS=0477

HTH,

snip
I'm trying to recall a data set migrated to ML2. The recall fails due to
errors found in either the VVDS or VTOC. Is there somebody that would be
able to point me in the right direction of investigation

PAGE 0001 5695-DF175  DFSMSDSS V1R12.0 DATA SET SERVICES
2012.055 11:55
ADR035I (SCH)-PRIME(06), INSTALLATION EXIT ALTERED BYPASS FAC CLASS CHK
DEFAULT
 TO YES

 RESTORE INDDNAME(SYS79943) CAT SPHERE -

 BYPASSACS(PNGG00.IT3PCK.CSDITB.D0.KS250   ) -

 MGMTCLAS(@959  ) -

 STORCLAS(B2B26 ) -

 DATASET(INCLUDE(PNGG00.IT3PCK.CSDITB.D0.KS250   ))

ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND
'RESTORE '
ADR109I (R/I)-RI01 (01), 2012.055 11:55:12 INITIAL SCAN OF USER CONTROL
STATEME
NTS COMPLETED

ADR050I (001)-PRIME(01), DFSMSDSS INVOKED VIA APPLICATION INTERFACE

ADR016I (001)-PRIME(01), RACF LOGGING OPTION IN EFFECT FOR THIS TASK

ADR006I (001)-STEND(01), 2012.055 11:55:12 EXECUTION BEGINS

ADR780I (001)-TDDS (01), THE INPUT DUMP DATA SET BEING PROCESSED IS IN

LOGICAL DATA SET FORMAT AND WAS CREATED BY DFSMSDSS VERSION

 1 RELEASE 12 MODIFICATION LEVEL 0 ON 2011.270
06:45:10
ADR711I (001)-NEWDS(01), DATA SET PNGG00.IT3PCK.CSDITB.D0.KS250 HAS

BEEN ALLOCATED USING STORCLAS B2B26, DATACLAS @KS250, AND

 MGMTCLAS @959

ADR788I (001)-TDUNL(01), PROCESSING COMPLETED FOR CLUSTER
PNGG00.IT3PCK.CSDITB.
D0.KS250, 16552872 RECORD(S) PROCESSED

ADR477E (001)-TDRF1(01), VVDS/VVR/CELL ERRORS ENCOUNTERED FOR CLUSTER
PNGG00.IT
3PCK.CSDITB.D0.KS250

ADR417W (001)-TDRF1(05), COPY/RESTORE OF DATA SET
PNGG00.IT3PCK.CSDITB.D0.KS250
 IS INCOMPLETE, 05

ADR415W (001)-TDLOG(01), NO DATA SETS WERE COPIED, DUMPED, OR RESTORED
FROM ANY
 VOLUME

ADR480W (001)-TDLOG(01), THE FOLLOWING DATA SETS WERE NOT PROCESSED FROM
THE LO
GICALLY FORMATTED DUMP TAPE DUE TO ERRORS:

  PNGG00.IT3PCK.CSDITB.D0.KS250

ADR006I (001)-STEND(02), 2012.055 12:11:00 EXECUTION ENDS

ADR013I (001)-CLTSK(01), 2012.055 12:11:00 TASK COMPLETED WITH RETURN
CODE 0008
ADR012I (SCH)-DSSU (01), 2012.055 12:11:00 DFSMSDSS PROCESSING COMPLETE.
HIGHES
T RETURN CODE IS 0008 FROM:

 TASK001

ARC1001I PNGG00.IT3PCK.CSDITB.D0.KS250  RECALL FAILED, RC=0069,
REAS=0477  
ARC1169I RECALL/RECOVER FAILED DUE TO AN ERROR IN DFDSS

/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: zSeries Manpower Sizing

2012-02-17 Thread Staller, Allan
The largest MF shop I have worked for supported 10 sysplex, 44 lpars, at
least 20 processors, across 3 continents.

The support staff was (as best I can recall) z/OS and program products
including most vendor software (9), CICS/VTAM/TCPIP (6), IMS/DB2/MQ
(sysprog only) (5)

DBA's and other were under another manager.

HTH,

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Does HBDELETE forces tape mount??

2012-02-17 Thread Staller, Allan
HBDELETE does not require a tape mount.

BTW, ,HBDELETE deletes a dataset backup, not the tape. This is handled
by other processes.

HTH,

snip
can you pls tell me if doing hbdelete against a tape volume does it
forces
a tape mount ???
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Does HBDELETE forces tape mount??

2012-02-17 Thread Staller, Allan
HDELETE

snip
and how about ML2 dsns??? If i do HRECALL against MIGRAT2 volume ??? is
there a way of just invalid the entry in MCDS avoiding tape mounting ??
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Z/architecture I/O questions

2012-02-15 Thread Staller, Allan
A lot to go through here, but let's take it one step at a time. Comments
interspersed.

snip
I've got a few questions about How z hardware handles I/Os and LPAR
dispatching.

I've done a fair bit of reading, but still some things I don't
understand.
We are on Z9's We are using shared CPs. We are not using IRD. We have 2
large production LPARs and several smaller LPARs. The 2 prod LPARS have
substantially different weights 1:4, due to the CPU workload spread. We
also use group capacity limits and an individual capacity limit on the
largest LPAR. While the CPU balance is different, the I/O profile is
similar, about 5-6000 IOPS on each LPAR.

We have 11 logical CPs active on each of the 2 LPARS. We expect peak
4hra of 90 and 400 MSUs, and the weights are set to reflect this.

The work between the 2 LPARS is split for licencing. The small LPAR is
mainly batch, the large LPAR is online and batch.

I believe we are seeing I/O elongation on the smaller LPAR at peak
times, particularly when the systems are capped. A batch job I/O bound
may run 2-3 times longer on the small LPAR when the systems are busy.
The I/O response times look slightly worse on the small LPAR, but the
throughput is much worse.
/snip

The first question that comes to mind is the logical to physical CP
ratio (per CEC). You do not give us the number physical processors the
support the 11 logical processors. 
The official recommendation from IBM (and others) is 2:1 logical to
physical. I personally have done 3:1 with no significant impact. If the
3:1 ratio is significantly exceeded, one of the symptoms will be IO
elongation due to context switching and CPU cache flushing. DANGER WILL
ROBINSON. This effect is non-linear and *RAPIDLY* increases.  

From the size of the machines described , it seems  that you have one or
two physical processers in each CEC.  Given 11 logical processors and 4
physical, this is 2.75 to 1 which is reasonable overall. However, the
distribution of the logical processors over the physical engines is
unknown.

snip
So here are my questions.

My understanding of the channel program is that it moves the data into
the page fixed I/O buffer and the interupt a cp to process the I/O. How
is the candidate CP chosen?  I know the z/os system may make some CPUs
uninteruptable for I/Os based on CPENABLE, but of the CPs that are
enabled, how is one chosen? Is it at the physical or logical level and
how is it related to the LPAR which requested the I/O?

We have CPENABLE set to (10,30), RMF shows all 11 logical CPUs are
taking interrupts (and have TPI counts), but CP A (highest number) is
doing by far the most. Could this be a cause of contention between the 2
LPARS, or will they likely be dispatched on separate physical CPs?
snip

IIRC, CPU 0 on a particular CEC is preferred for IO interrupts. If it
is busy, another CPU is enabled for IO interrupts. As Ron Hawkins
related, the current recommendation for CP ENABLE is (0,0)


snip
Next question is about the dispatch time given to a LPAR for a CP by
pr/sm. The pr/sm planning guide says the maximum time may be between
12.5 and 25ms (A lot longer than an I/O). I am thinking that if an LPAR
is constrained by capping, it is more likely to have a queue of ready
work and hold on to a CP towards the maximum when it is given one?

How can I tell for sure if I am on the right track, any metrics that
will prove what is causing the longer elapsed times on one LPAR? 

What is the best way to stop it or reduce it, given that we have to run
capped on peak days, and we have to live with the workload separation,
and we don't have the capacity for dedicated CPUs.
snip

CPU capping and context switching are most likely contributing
significantly to your issue. Also be aware that a low-weighted LPAR will
have normal CPU processes elongated.  e.g. an enqueue that might
complete in 100ms on a normal weighted LPAR might take 500ms on a
capped, low weighted LPAR. Cheryl Watson and others have discussed this
in the past. Check the archives.

snip
Would wlm/ird management of CPUs help?

Would offlining logical CPs help? We have many more CPs online to each
LPAR than it's normal MSU usage, but it give flexibilty for workload
peaks.   

Would offlining specific logical CPs help? Ie if the 2 LPARS had a
different highest logical CP number would this reduce contention, or is
it again likely to use different physical CPs for different LPARs?
/snip

Offlining logical CP's definitely has the potential to help. See the
discussion of the logical to physical CP ratio above.

snip
Would tuning of the LPAR dispatch time help? We do not specify this, and
the recommendation is to let the system choose.
/snip

As far as I know, there are no customer available tools to do this.


HTH and good luck.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Workload Manager Performance

2012-02-14 Thread Staller, Allan
Cheryl Watson's Quick Start policy is a good place to begin for the WLM
policy. 

RMF Mon III (SYSPLEX SUMMARY)  and RMF Mon I (Post Processor)
SYSRPTS(WLMGL(SCLASS,SCPER)) will show you how things are running.

HTH,

snip
Is there any utilities that can be used to monitor WLM?  Also, is there
any utilities that can help you setup your WLM environment?  Just trying
to determine if our WLM is setup correctly for our shop.
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Changing sysplex hardware

2012-02-14 Thread Staller, Allan
It is not clear if you are moving the entire SYSPLEX, or merely one or
more of the members.

It you are moving the entire SYSPLEX, perhaps a SYSPLEX wide restart is
appropriate. However, even if you are moving one or more members of the
SYSPLEX, why not use the standard  SYSPLEX facilities to assist in the
move? (IIRC, a parallel sysplex can communicate over about 20 km(??)
without special accommodations e.g. GDPS).

Your original SYSPELX CDS's will be intact, so no action should be
necessary if you need to revert to the original location, just IPL and
go.
I would create new CDS's/policies for the new location.

HTH,

snip
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Natasa Savinc
Sent: Tuesday, February 14, 2012 4:11 AM
To: IBM-MAIN@bama.ua.edu
Subject: Changing sysplex hardware

Hello,
we are moving data center to another location. The data is already there
on DASD, replicated synchronously. We plan to stop the sysplex and IPL
from the replicated data , on new processor. We pretty much answered all
questions so far, except for the sysplex and CF. On new location we have
one new processor, that will in the end replace one of the existing
processors. The configuration (LPAR names) are the same, including CF.

I would like to verify following scenario:

1. For fall-back purpose: We allocate new CFRM couple data sets and
prepare new set of IPL parameters. Old ones will be used if we have to
IPL at old location.
2. Activate new CDS
3. Change existing policy - define different HW for the existing CF
4. Start new policy - first question is - will it report an error or
will it just have pending changes for CF?
5. Shut down system (sysplex) 
6. IPL on new processor

Would it be better option to define different name for CF on new
processor, and just add a new CF to the active policy, and in all
preference lists? 
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Acceptable paging

2012-02-09 Thread Staller, Allan
ADDRESS SPACE!

snip

From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Shmuel Metz (Seymour J.)
Sent: Wednesday, February 08, 2012 8:44 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Acceptable paging

In
1910aea19cd2554fb59403184ebe4381044b40a...@mmoexchmbs01.jhacorp.com,
on 02/08/2012
   at 04:49 PM, Hal Merritt hmerr...@jackhenry.com said:

A demand page in event can cause a full stop in the requesting
address space

Address space or only task?
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Logical-to-Physical CP ratios, was: Re: Dedicated vs. Shared CPs

2012-02-09 Thread Staller, Allan
Last I heard from IBM and other sources, the official recommendation
was not to exceed 2:1 logical to physical.

I myself, have run with 3:1 logical to physical with similar results to
yours on 9672, z/800, z/9 and z/10(no hiperdispatch). This seems to be a
constant!

No info on z/196 w/hiperdispatch or higher ratios...

snip.

This is a handy question. How is your logical-to-physical CP ratio? And
how high is your 'lpar overhead' (type70 SMF) ?

We run on z196 and have a 18 logicals to 4 physicals ratio (4.5:1), with
lpar overhead on these (slowed down) GCPs reaching 2% at the most. The
other box runs 12:4 (3:1), with lpar overhead around 0.8%. No
Hiperdispatch.

Would Hiperdispatch even run in a 4,5:1 ratio environment? Or would it
throw in the towel and turn itself off?

We also run IFLs, and the picture here is drastically different. On the
IFLs we run 18 logicals on 8 physicals and 20:8 (2,5:1) on the other
box. The IFLs are obviously not slowed down. LPAR overhead for IFLs on
the 20:8 box is near 3% at times, and around 1.5% on the other. Has
anyone else any numbers for a z196 with similar logical-to-physical
ratios? 

I am always surprised about how high lpar overhead on the IFLs is. 

Is VM doing anything extra with regard to lpar overhead that an MVS
wouldn't do? (The linuxes running under each VM are also grossly
overspecified in their 'logical' processor specs, which *should* show up
as overhead within that VM lpar (vm monitor). I have been wondering if
some of that overhead is given out to general lpar overhead. Or is it
just that the high speed of the IFLs (compared to our slowed-down GCPs)
causes this overhead?

Thanks, Barbara NItz

/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: WLM Capping

2012-02-09 Thread Staller, Allan
That is why IBM created the ERV parameter in SYS1.PARMLIB(IEAOPTxx).

This defines a period of time at for which the address space may not be
swapped to allow 
Enques, locks, etc. to be released


snip
...snippage
A second reason was that in several occasions we saw the system allow
itself to be tied up (snookered is a beautiful equivalent term in this
sense) by low importance tasks. One area was the Catalog Address Space:
catalog actions are executed at the priority of the requestor and we had
several occasions where a User Catalog was reserved and the task that
did the Catalog Request was delayed for CPU, followed by CAS complaining
that someone had the Usercat reserved (come on, you did it yourself!). 
We met similar situations in OMVS tasks.
That is why I always had the lowest priority tasks at IMP=5 VEL=2 (or
5), to guarantee at least a little progress in the less (but not
un-)important batch.
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Turning on additional CPs

2012-02-09 Thread Staller, Allan
Yes. Especially if the jobs are CPU bound. Going back to the discussion
of dedicated vs. shared CPs. Etc.

There is a well know impact of additional CP's known as the MP effect.
Going from 1 to 2 engines does not get you twice as much horsepower.
Only 1.9 times as much.
In the early days 360/65 AP  305/65 MP, the effect was only 1.7 times.

Each additional processor increases the accumulated overhead of trying
to keep everything in sync between the members of the group. 3
processors would (for example) (1+(1*.9)+(1*.8))  *.9) =2.7, not 3.0.
This overhead is a non-linear relationship. The more processors, the
greater (relatively speaking) the MP effect. i.e. less horsepower added
per additional engine

This is the reason IBM invented Hiperdispatch. By treating the
processors as members of group (books), the MP effect is reduced and
overhead is reduced..

CMG (www.cmg.org), Cheryl Watson (www.watsonwalker.com), Share
(www.share.org)  and 
IBM Techdocs
(http://www-03.ibm.com/support/techdocs/atsmastr.nsf/Web/Technotes) 
are all good sources for additional information. 

HTH,

snip
We have a z10 with 4 engines.  Since upgrading to this box, we were only
running 3 engines.  However, we recently turned on the 4th engine.  We
noticed that several jobs started running longer, which we didn't
expect.  Could turning on additional engines actually make a job run
longer?
Also, where can I find any read material on the affect of turning on/off
engines.
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Acceptable paging

2012-02-08 Thread Staller, Allan
Demand paging is anathema to multi-user address spaces (e.g. CICS/IMS).
It is somewhat less problematic for single user address spaces. (TSO,
BATCH) and in-between for DB2.
e.g. it may be perfectly acceptable to have a demand paging rate of 100
if CICS/IMS demand paging is zero.

Side trip to the old days. I recall demand paging rates in the
multi-hundreds along with swaps in the 80's.

That being said, much research has already been done in this area. CMG
(www.cmg.org) papers from the 80's and 90's will have a wealth of
information about paging and its impacts on various workloads. SHARE
(www.share.org) papers of the same vintage will also contain much useful
information.

Paging is not, by itself, a bad thing. When it becomes bad, as Mark
said, is when the phone starts ringing or SLA's are not being met.

The answer to your original question  Can someone please help me
determine what the 'acceptable paging should be on a system? is it
depends.

BTW, there are possibly other reasons for poor MQ and WAS performance
unrelated to paging.

HTH,

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: IGD17380I - WARNING MESSAGE

2012-02-07 Thread Staller, Allan
The extract shown does not match the thresholds shown in the message. 
Based on the message in this case, you should consider raising the High 
Allocation/Migration Threshold.

The exact threshold to be chosen is a function of allocation failure (how many 
can you stand) and migration threshold (set in the SG) and honored by dfHSM and 
other storage management products. 

Are you performing dfHSM interval migration?



snip
I noticed the following informational message posted on some of the batch 
jobs.  The jobs terminate successfully.  Is it because of the threshold which 
has been set for the SMS managed storage group? 
 
IGD17380I STORAGE GROUP (PRIMSG01) IS ESTIMATED AT 56% OF CAP
    WHICH EXCEEDS ITS HIGH ALLOCATION THRESHOLD OF 55%   
 
Here is the threshold setup of the storage group:
 
Allocation/migration Threshold : High . . 50  (1-99)  Low  . . 1   
(0-99) 
Alloc/Migr Threshold Track-Managed:  High . . 85  (1-99)  Low  . . 1   (0-99) 
 
Should the problem be because of the threshold setup, what values should I use?
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: IGD17380I - WARNING MESSAGE

2012-02-07 Thread Staller, Allan
snip
Do you see any problems besides the warning messages we could encounter because 
of the High/Low threshold?  
/snip

Nope!

/snip
  Allocation/migration Threshold : High . . 55  (1-99)  Low  . . 
1   (0-99) 
  Alloc/Migr Threshold Track-Managed:  High . . 85  (1-99)  Low  . . 1   (0-99) 
  Guaranteed Backup Frequency  . . . . . . NOLIMIT  (1 to  or NOLIMIT)  
  BreakPointValue  . . . . . . . . . . . .  (0-65520 or blank)  
 
To answer your question about the type of migration being performed we do not 
run INTERVAL migration. Secondary Space management is run instead.
 
The reason why the High/Low value is set is because of several space problems 
were encountered in the past.  The customer did not want extra DASD allocated 
in this pool so a decision was taken to have the dsns in this particular pool 
migrated at a faster pace.  I am not sure if this was the right decision, 
however it could be a co-incidence that ever since the threshold was adjusted 
(2 1/2 years ago) no more space problems were encountered.
/snip

Secondary space management and interval migration both function on the same 
principle. If the SG occupancy is above the high threshold, migration begins, 
and continues until the low threshold is reached (subject to eligibility for 
migration based on the MGMTCLAS). Your low threshold seems good based on what 
you are trying to accomplish. The high threshold *might* need some tweaking.

The only problem being encountered is the warning message, which is just that, 
a warning that the SG occupancy is above the threshold. Given you current 
thresholds, I see very little problem with doing nothing.

After all, there are only three choices: 
1) add space to the pool which seems to have been previously rejected as a 
solution 
2) adjust the threshold to eliminate the message 
3) live with the message

One other thing that *might* bring some relief is to examine the contents of 
the pool for things that shouldn't be there, for whatever reason. E.G. a 
mgmtclas assigned that prevents migration

HTH,

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: DATACLASS NOT BEING RESPECTED

2012-02-07 Thread Staller, Allan
The big question is are your tapes SMS managed? 

If so, is the dataclas being applied to this tape?

Otherwise, check your settings for dynamic volume count. 

I believe that all will be OK if you code the vol count in JCL (last resort).

HTH,

snip
I am trying to solve the following puzzle.  Some batch jobs which execute are 
being directed to a VSM.  However they abend when the default vol count limit 
of  5 have been reached - s837-08.  I added a vol count of 20 in the default 
DATACLAS VIRT however for some reason the DATACLAS value is not being respected.
Is this because the dsns are NOT SMS managed?  Is there a work around it or do 
I need to have the VOL COUNT default values changed at the system level?
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: DATACLASS NOT BEING RESPECTED

2012-02-07 Thread Staller, Allan
This is an SMS setting, and can be changed via the df/SMS panels.
Since your tapes are *NOT* SMS managed, the changing any of the data class 
settings will have no effect.

snip
I verified, the tapes are not SMS managed.  You recommended that I check your 
settings for dynamic volume count.  Would you know what the member in the 
PARMLIB would be?



The big question is are your tapes SMS managed? 

If so, is the dataclas being applied to this tape?

Otherwise, check your settings for dynamic volume count. 

I believe that all will be OK if you code the vol count in JCL (last resort).

HTH,

snip
I am trying to solve the following puzzle.  Some batch jobs which execute are 
being directed to a VSM.  However they abend when the default vol count limit 
of  5 have been reached - s837-08.  I added a vol count of 20 in the default 
DATACLAS VIRT however for some reason the DATACLAS value is not being respected.
Is this because the dsns are NOT SMS managed?  Is there a work around it or do 
I need to have the VOL COUNT default values changed at the system level?
/snip
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Why can't the track format be changed? (was: Physical record size query)

2012-02-07 Thread Staller, Allan
Think of all of the code within z/OS that actually depends upon device
geometry. The C and H in CCHHR, etc. A hallmark of z/OS has been
backward compatibility. If this code were to be changed, all of that
backward compatibility would go poof! For what benefit. Customers have
revolted against making massive changes to support arbitrary hardware
design changes.

Another reason is that back in the SLED days, every new device type had
a different geometry, and caused massive JCL changes to accommodate that
new geometry efficiently in terms of space utilization, and indirectly
$$$. 1/2 track block size (27998) on a 3390 (track length  56664)  will
waste about 40% of the available space if used on a 3380 (track length
47476).

That is the reason a few vendor products are still distributing
source/load modules with a approx. 6k block size, as opposed to 1/2
track blocking.  A 6k block size is fairly efficient (although
sub-optimal) on both 3380 and 3390. 

A secondary effect of the geometry issue is the reason for 3390-9, 27,
54, To get around some of the other limitations imposed by volume
limits arising from the basic 3390-3 configuration.
These other volume sizes are compatible with the CCHHR format of a
3390-3.

IBM has stated that future devices will be compatible with 3390 geometry
to prevent the need for mass JCL changes.

snip
That leads to a question that I've been thinking about for some time.
Since the 3390 geometry is emulated by modern storage control units,
why then are the inefficiencies of small blocks emulated also?  There
are not SLEDs actually storing the data, why are IBG's,  sectors,  and
all the other CKD nastiness emulated that makes 80 byte blocks such a
bad idea?   IOW, why can't the control unit  simply store  708 * 80 byte
blocks on a 56,664 byte 3390 track?   Does zos's calculations take these
inefficiencies into account and only write 78 of these blocks per track?

The C in CKD stands for count and this is some information about the
amount of data following in the next data block (the amount may vary
from block to block). Likewise K in CKD stands for key and some
access methods are using key data that is stored before the actual data.
So, both are bits of information that are used and thus cannot be
dropped.
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Prob with DFHMAPS

2012-02-02 Thread Staller, Allan
The SYSLIB ( concatenation if any)  will be shown by examination of
procedure DFHMAPS in STEP ASSMBL.
Ensure all datasets shown are cataloged and available. 

Post the JESJCL dataset from SDSF for a more precise answer.

HTH,

snip

Trying to assemble a map, my first time but it failed with 'DATA SET NOT
FOUND'. Given the following is there something obvious I've missed?

.. my JCL is ..

//ASSMBL   JOB (ASSEM-1),'GH',   
// CLASS=A,MSGCLASS=0,MSGLEVEL=(1,1) 
//PROCLIB  JCLLIB ORDER=DFH420.CICS.SDFHPROC   == where DFHMAPS is
located
//MFSYHE1  EXEC DFHMAPS, 
//MAPLIB=VENDOR.LINKLIB.SECOND,   == where i want the obj to go

//DSCTLIB=IBMUSE1.MFSY,   == where I want my symbolic map
to go  
//MAPNAME=MFSYHE1
//SYSUT1   DD DSN=IBMUSE1.MFSY.BMS(MFSYHE1),DISP=SHR  == where my BMS
is 
//

.. partial list of SDSF;O shows that only the first step of DFHMAPS
worked as follows ..


IEF142I ASSMBL COPY MFSYHE1 - STEP WAS EXECUTED - COND CODE   
IEF285I   IBMUSE2.ASSMBL.JOB02276.D101.?   SYSOUT

IEF285I   SYS12032.T210345.RA000.ASSMBL.TEMPM.H01  PASSED

IEF285I   IBMUSE1.MFSY.BMS KEPT

IEF285I   VOL SER NOS= VPWRKA.

IEF373I STEP/COPY/START 2012032.2103

IEF032I STEP/COPY/STOP  2012032.2103

 CPU: 0 HR  00 MIN  00.00 SECSRB: 0 HR  00 MIN
00.00 SEC 
 VIRT:   172K  SYS:   256K  EXT:0K  SYS:11132K

IEF212I ASSMBL ASMMAP MFSYHE1 SYSLIB - DATA SET NOT FOUND

IEF272I ASSMBL ASMMAP MFSYHE1 - STEP WAS NOT EXECUTED.   

.. am I supposed to have some reference to SYSLIB somewhere? on the
IEF212I explanation I could see only one thing that might be a prob
being ..
The DD statement requested a data set cataloged in a user catalog. The
JCL did not contain a JOBCAT or STEPCAT DD statement. 

/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: S0C4 in CEE3DMP

2012-02-01 Thread Staller, Allan
In that case , AMBLIST or browse the load modules.

snip
I don't have PDS unfortunately.

/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Is there a no cost replacement for EKM?

2012-01-31 Thread Staller, Allan
Try the ISV COSTS list. Al Sherkow should have some information on it.

snip

I am now wondering what other EKM-like products are out there and what the cost 
comparison is to ISKLM.

/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: S0C4 in CEE3DMP

2012-01-31 Thread Staller, Allan
Are CEE.SCEERUN/CEE.SCEERUN2  available via steplib or LNKLSTxx?

Mixed versions of the above?

snip
I am getting a S0C4 (apparently - assuming I am reading the tea leaves
correctly) calling CEE3DMP from a C linkage signal handler routine in a
C++
program under v1.13. I believe the code used to work under V1.10 but I
am
not absolutely certain that nothing has been changed.

...snippage

What should I be looking for? Any clues?
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: S0C4 in CEE3DMP

2012-01-31 Thread Staller, Allan
I would add the datasets CEE.SCEERUN and CEE.SCEERUN2 via steplib and
see if your S0C4  goes away

snip
I am not using a STEPLIB or JOBLIB. How would I tell if I had mixed
versions?

Charles


Sent: Tuesday, January 31, 2012 1:05 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: S0C4 in CEE3DMP

Are CEE.SCEERUN/CEE.SCEERUN2  available via steplib or LNKLSTxx?

Mixed versions of the above?

/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: different tape media for ML2 copies in HSM

2012-01-30 Thread Staller, Allan
 

 

From:
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2I480/1.10
.5.9?SHELF=DGT2BK90DT=20090605105438 (watch the wrap) Topic 1.10.5.9 

Or

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/DOWNLOAD/dgt2i480.p
df?DN=SC35-0418-10DT=20090605105438  (pp 270) (Acrobat Reader page 292)

 

 

z/OS V1R11.0 DFSMShsm Implementation and Customization Guide

Creating Concurrent Tapes for Onsite and Offsite Storage

 

 

Within an SMS environment, ACS routines can direct the alternate tape
to a different tape library, such as one at an offsite location. Within
a non-SMS environment, the output restricter (for example, SETSYS
UNIT(3590)) is used for both the original and the alternate. If
allocation routing separation is needed, it must be done outside of
DFSMShsm. Alternate tapes must keep the same tape geometry as the
original tape (for example, both must be 3590 standard length tapes).
For those customers who are drive-constrained, DFSMShsm maintains the
existing TAPECOPY creation methods. 

 

 

snip

Just to play Devil's Advocate here - What the OP asked for was a way 

to create two ML2 tapes on different media at the time of the 

creation of the ML2 tapes/files. No one has addressed this 

requirement and said it is not possible. 

/snip


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: different tape media for ML2 copies in HSM

2012-01-27 Thread Staller, Allan
Look up the TAPECOPY command in the dfSMS/hsm Storage Admin Guide..

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2S680/2.40
?SHELF=DGT2BK90DT=20090610113354

HTH,

snip
Currently we are creating duplex tape copies for ML2 in HSM. We are
using logical tape (VTS), and we used to use Export to get the second
copies offsite. However, 2 years ago we stopped all Export/Import
functions, and now have the two copies always in the library(which is
bad). 
My job now, is to find a way to be able to send the second copy offsite
by using native 3590 tape. I was researching, and I am 99% sure that I
cannot use different media - logical tape for onsite and native 3590 for
offsite - for the ML2 tapes. I was told to turn the 99% into 100%. 

So here is my question:
  Is there any way to use different media for the two ML2 tapes? A patch
maybe? 
Logically thinking, since the 3590 is larger we would never have issues
with 
filling up the second tape, but then have partial filled 3590 tapes
offsite. 
I wonder if parameters like the TAPEUTILIZATION and the   
RECYCLEPERCENT are the reason why we can't mix the media. 
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: MCDS Dataset Help

2012-01-27 Thread Staller, Allan
This will not help the MCDS space utilization issue. It will only save
the migration time/CPU. 

snip
If they are recalling and migrating datasets quickly, RECONNECT can
reuse the migrated copy and save writing out that dataset.
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: MCDS Dataset Help

2012-01-27 Thread Staller, Allan
This is set up during HSM initialization(or dynamically).  Check the
fine manuals regarding SETSYS TAPEMIGRATION RECONNECT(ALL)

snip

Okay, I'll bite. Where does one place the RECONNECT parm?
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: MCDS Dataset Help

2012-01-26 Thread Staller, Allan
I submit that you really need to look at the size of the MCDS, or the
free CI/CA freespace percentages.

snip
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of George Rodriguez

I'm running the export/import process almost daily. It used to run once
a
week.
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: change job classes for ones submitted via intrdr

2012-01-24 Thread Staller, Allan
You can provide a default job class for the INTRDR, however, JCL will
override any JES2 specified defaults. If the submitter codes CLASS= on
the job card, that is what will be used.

JES2 Exit 6. Possibly JES2 Exit 2 or 44 can be used to modify the
submitted JCL. 

I do not believe there is a specific exit for the INTRDR (Ed. J. jump in
here!) . You will need some additional criteria to determine which jobs
need to be modified.

HTH,

snip
Is there a way to control job classes that get submitted via intrdr 

If a job comes through say CLASS=A , have it changed to different class
say CLASS=R
/snip

 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Going from mod-3 to mod9

2012-01-23 Thread Staller, Allan
snip
1. We just had 3390-9's configured into our EMC box. This box also
contains 3390-3's. Given that the hardware is the same throughout and
all other things being equal, is there any decrease in response time on
the mod-9's?
/snip

Beware of IOSQ! From the viewpoint of the Operating System, you now have
3 times as much data behind the actuator on Mod-9's as Mod-3's. If the
Operating system *thinks* the device is busy, the IO is queued off the
UCB and never even tried until it comes to head of queue. Multi-system
access will exacerbate this even more.

snip
2. I have a VSAM file (with extended addressability) that currently
spans 27 mod-3's. My plan is to move it to 10 mod-9's using IDCAMS REPRO
to back it up then doing a DELETE/DEFINE, (changing the SPACE parameter
from CYL(2500 150) to CYL(9500 150)), then REPRO from the backup. Am I
setting myself up for a failure?
/snip

I do not believe there will be an issue. Obviously, you already have all
of the SMS stuff in place. I would, however suggest REPRO from
original to original.new and after successful repro operation, alter
original to original.old and then alter original.new to original.
In this way, the original is always available for a momentary recover if
any problems are discovered with the target of the repro.

HTH,

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Going from mod-3 to mod9

2012-01-23 Thread Staller, Allan
*Yes*. Hardware improvements have reduced the impact, but the issue
still exists. Think lots of itty-bitty datasets on a mod 9.

You previously had 3 logical actuators to access 3 units of data .
With mod 9 you have 1 logical actuator to access the same amount of
data.

From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Jousma, David
Sent: Monday, January 23, 2012 9:18 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Going from mod-3 to mod9

Iosq?   Really?   This is raid dasd, isn't slow 3390-9's a thing of
the past?

From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Staller, Allan
Sent: Monday, January 23, 2012 10:09 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Going from mod-3 to mod9

snip
1. We just had 3390-9's configured into our EMC box. This box also
contains 3390-3's. Given that the hardware is the same throughout and
all other things being equal, is there any decrease in response time on
the mod-9's?
/snip

Beware of IOSQ! From the viewpoint of the Operating System, you now have
3 times as much data behind the actuator on Mod-9's as Mod-3's. If the
Operating system *thinks* the device is busy, the IO is queued off the
UCB and never even tried until it comes to head of queue. Multi-system
access will exacerbate this even more.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Going from mod-3 to mod9

2012-01-23 Thread Staller, Allan
snip
Is z/OS unaware of the underlying RAID and designed not to dispatch
concurrent operations to what it sees as a single device?
/snip

Correct! With the exception of PAV (which was invented to address the
IOSQ issue!)
We could get into a long discussion here, but large datasets that take
up most of a mod 9 will be minimally impacted (without PAV). 
Many small datasets will exacerbate the issue (without PAV).

snip
With SLEDs, response time would be more likely to increase than
decrease, because of increased seek lengths and because of
contention.  With RAID, things are less predictable./snip

Agreed! However, the original issue still exists. Accessing 3 times as
much data with a single logical actuator.  
PAV merely addresses the IOSQ problem. Cache, RAID, address the service
time for the device.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Going from mod-3 to mod9

2012-01-23 Thread Staller, Allan
Generally speaking...Yes

snip
IOW, the response time is more likely to increase than to decrease,
and increased response time is a Bad Thing
/snip


PAV, Cache, and RAID all have impacts that mitigate the 1:3 (or worse)
actuator to data ratio on mod 9 vs. 3 mod 3. 
These impacts may not be part of the intended design.

As with most things, YMMV. Few large datasets are less impacted than
many small datasets.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Master Catalog query

2012-01-13 Thread Staller, Allan
NO

snip
My question is to know
whether if we can have possible to have multiple master-catalog with
multiple user catalog running on a single image ? 
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: z/OS Java JVM question

2012-01-12 Thread Staller, Allan
CLASSPATH?

snip

Having successfully created the JVM I can then find my class and run the
main method. However, if I add code the call a JNI routine the class can
no longer be found; the source of my class is shown below with the JNI
call code commented out.  Any idea why the class can't be found?

 /snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Audting PDS Datasets and comparing to find most current member

2012-01-12 Thread Staller, Allan
You have run across Al's fundamental law of Information Technology:

Two of anything that do not agree is worse than not having anything in
the first place!

snip

Subject: Audting PDS Datasets and comparing to find most current member

I have the need to audit many PDS datasets.  I am trying to find the
most
current version of the member. 

...snippage

I will need to 
1)  Get the above info from all 3 datasets
2)  Compare results of DSN1 vs. DSN2, DSN2 vs DSN3 and DSN1 vs DSN3

Not so bad with 2 or 3 but I have around 50.

So before I go and invent a REXX to do this, I thought I would see if
there
were any other recommendations about.  I know about LISTDSI but was not
sure
if there was something else
/snip
.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: ACCOUNT Product

2012-01-11 Thread Staller, Allan
There are several on the market. I also believe there are several on the
CBT Tape.
Roll Your Own is not too difficult, once you can get management to
decide what to charge back for, especially if MXG or MICS is available.
Be sure to include on-line disk storage and tape storage if applicable.

HTH,

snip
Someone know, if have a product to produce account reports from ZOS ?

Our system, is ZOS 1.12.
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: ACCOUNT Product

2012-01-11 Thread Staller, Allan
One among many others...

snip
CA-JARS ?
Regards Lim ML

/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Internal text

2012-01-09 Thread Staller, Allan
Thanks for the ref...

snip
I have been tasked with an update to JES2 exit 6. One of the functions
I
need to implement is to forbid all use of a certain JCL parameter.

See the Philips Lighting mods - File 175 on the CBT tape for an exit 6
that does a fair amount of parsing of the JOB and DD cards to among
other things set the JOBCLASS in the JCT.  While the exit is over 20
years old, it still should be useful as one way to handle parsing.

Clark Morris
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Internal text

2012-01-09 Thread Staller, Allan
No. I have been instructed to remove the parameter form the JCL stream.

I have been tasked with an update to JES2 exit 6. One of the
functions I need to implement is to forbid all use of a certain JCL
parameter.

What do you mean by forbid? The word is not synonymous with
ignore.


***

I would much prefer to input overlay the parameter with a no-op as
opposed to manipulating the buffer.
Much less work and far less prone to error.

What would be preferable is to nullify the parameter in the
internal text string without shifting the string. (i.e. create a
noop) without the character shift.

Why? Assuming that you really aren't supposed to fail the jobs using
the parameters, adjusting the internal text buffer to remove the key
is what you are expected to do.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Error apply ZAP

2012-01-09 Thread Staller, Allan
I believe it replaces the existing IDR record with a empty one 

snip
If you relink as the AMA120I suggests/instructs the Binder adds 
another (empty) IDR record so you can use the IDENTIFY statement 
(think this is automatic although it may be triggered by supplying a 
Binder command to add more IDR Space). As you note, this allows you 
to track what ZAPs have been installed. If I remember IDR is ID 
Record. There are IDR records for each CSECT in the Load Module (they 
come from the Assembler) so you can see what the assembly date of the 
CSECT is (there is only one for the last linkedit).
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: HSM ML1OVERFLOW(DATASETSIZE(301302))

2012-01-09 Thread Staller, Allan
I would look at the doc for the parm list to ARCBDEXT or ARCMDEXT (dataset 
backup and dataset migration exits).

Try 

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2C770/6.10?DT=20090515140011

Topic 6,c and 6.10 

HTH.

snip
Environment:  ZOS 1.12 
The question: 
What does HSM look at to evaluate the DATASETSIZE value?
We have coded the following in our startup parms for hsm (AN EXAMPLE) 
ADDVOL ABC123 UNIT(3390) MIGRATION(ML1 NODRAIN NOOVERFLOW) THRESHOLD(80)
ADDVOL OVR123 UNIT(3390) MIGRATION(ML1 NODRAIN OVERFLOW) THRESHOLD(90) 
SETSYS ML1OVERFLOW(DATASETSIZE(301302)) 
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: 21st Century Migrates Mainframe with Clerity

2012-01-09 Thread Staller, Allan
Can you say 'doctored demo syndrome' a billion times? 

http://www.theregister.co.uk/2012/01/06/fusion_billion_iops/


 The cracking performance needed just eight HP DL370 G6 servers,
running Linux 2.6.35.6-45 on two, 6-core Intel processors, 96GB RAM.
Each server was fitted with eight 2.4TB ioDrive2 Duo PCIE flash drives;
that's 19.2TB of flash per server and 153.6TB of flash in total.

The demo used a custom load-generator that ran at 125 million ops/sec on
each server and transferred 64 byte data packets.


snip
Fusion-io demos billion IOPS server config
http://www.theregister.co.uk/2012/01/06/fusion_billion_iops/

from above:

Fusion has a track record in such demonstrations, starting with the 1
million IOPS Quicksilver demo with IBM's SVC in 2009. It needed a rack
of systems. Two years later it has gone a thousand times faster with far
fewer but more powerful servers.
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Internal text

2012-01-06 Thread Staller, Allan
I have been tasked with an update to JES2 exit 6. One of the functions I
need to implement is to forbid all use of a certain JCL parameter.

 

Initial testing indicates the INTTXT presents the parameter in the order
specified in the JCL. Since the forbidden parameter may be in the
middle of the string, 

I will need to manipulate the INTTXT buffer to eliminate the forbidden
parameter by shifting the characters to the right of the forbidden
parameter, to the left.

 

What would be preferable is to nullify the parameter in the internal
text string without shifting the string. (i.e. create a noop) without
the character shift.

 

Does anyone know if this is possible? If so, what is the INTTXT key? I
have been all over the IEFVKEYS macro, and can't seem to find one.

 

TIA,


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Internal text

2012-01-06 Thread Staller, Allan
snip
Have you looked at z/OS V1R11.0 JES2 Installation Exits z/OS V1R10.0
/snip

Yes. I was unable to find an answer there either, thus the original post.

What would be preferable is to nullify the parameter in the internal
text string without shifting the string. (i.e. create a noop) without
the character shift.

 

Does anyone know if this is possible? If so, what is the INTTXT key? I
have been all over the IEFVKEYS macro, and can't seem to find one.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Internal text

2012-01-06 Thread Staller, Allan
Thanks to all that replied. It looks like I will have to manipulate the
internal text string. 
There does not appear to be any no-op parameter available.


snip
I have been tasked with an update to JES2 exit 6. One of the functions I
need to implement is to forbid all use of a certain JCL parameter.

 

Initial testing indicates the INTTXT presents the parameter in the order
specified in the JCL. Since the forbidden parameter may be in the
middle of the string, 

I will need to manipulate the INTTXT buffer to eliminate the forbidden
parameter by shifting the characters to the right of the forbidden
parameter, to the left.

 

What would be preferable is to nullify the parameter in the internal
text string without shifting the string. (i.e. create a noop) without
the character shift.

 

Does anyone know if this is possible? If so, what is the INTTXT key? I
have been all over the IEFVKEYS macro, and can't seem to find one.
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Error apply ZAP

2012-01-06 Thread Staller, Allan
First the IDR (forget what the acronym stands for) is an optional list
of zaps applied to this module (load module?). Due to the structure of
the directory, IIRC, you are limited to 19 IDR entries 
per module (load module?). The IDR data is set by an AMASPZAP control
statement. IDENTIFY.

The message AMA120I message below may be safely ignored. It is indicated
that there is no space left to record additional IDR information. The
only impact of this is that it will make it difficult to determine which
zaps have already been applied.

To relink:

//step1 exec pgm=iewl,parm=(MUST MATCH CURRENT attributes for this LMOD)
e.g. RENT REUS REFR AC= AMODE RMODE,..
.
. standard lked jcl
.
//SYSLMODDD DSN=target load library, disp=shr 
//SYSIN   DD *
 include SYSLMOD(target lmod)
 alias x(zero or more depending if there are any aliaii
currently assigned, optional)
 alias x
 Name(target lmod(r)
/*

The real problem is the AMA104I message - VERIFY REJECT. The most likely
cause is that this zap has already been applied.
Another possibility that a pre-requisite zap is missing.

The fastest way to determine this is to take a copy SYSIN  and delete
the VER statements. Change the REP statements to VER and run the JCL.
If this zap has already been applied, you should get a return code of
zero.

By all means, if you cannot determine if a particular zap has been
applied or not , contact your vendor for assistance,

HTH,

snip
I'm applying some zaps and getting the following error:

NAME NATURAL  NATRGUI
AMA120I NATURAL  NO IDR SPACE - RE-LINK
AMA128I UPDATES ENABLED BY OVERRIDE PARM
VER 14BE 47F0,B69C,94C2,94C4,94C6,94C8,94CA,94CC
AMA104I VERIFY REJECT - SET NO GO SWITCH

The JCL is

//ZA0JZAP  JOB  F02000,'SUPPORT',CLASS=S,TIME=(0004,00),
// MSGCLASS=X,MSGLEVEL=(1,1),NOTIFY=SYSUID
//STEP01   EXEC PGM=AMASPZAP,REGION=8M,PARM=IGNIDRFULL
//SYSPRINT DD   SYSOUT=*
//SYSLIB   DD   DSN=SAG.NAT426.LOAD,DISP=SHR
//SYSINDD   DSN=NATURAL.ZAPS(NA77047),DISP=SHR
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Internal text

2012-01-06 Thread Staller, Allan
Thanks for the code. I will look at it ...

snip
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Vernooij, CP - SPLXM
Sent: Friday, January 06, 2012 4:07 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Internal text

From my experience with exit 6 from ages ago: there are indicators for
the number of parameters and the length of the values. Take these in
consideration when manipulating text. Below is the subroutine I used to
remove a inttxt key from intxt. I hope this helps. Ik you need more
explanation, I will have to find out myself again what I invented around
1985.

Kees.

...Remainder snipped
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: DFHSM QUESTION : Allocation/migration Threshold

2012-01-05 Thread Staller, Allan
Migration will begin when the SG occupancy exceeds the high threshold and 
continue until less than the SG low threshold, or no additional datasets are 
eligible for migration.
This is subject to additional constraints specified in the MGMTCLAS for 
migration eligibility.

IMO your low thresholds are too low causing thrashing (needless 
migration/recall of dataset due to interval migration), which will compound the 
. Your high thresholds seem pretty good. 

As presented, every migration empties the pool, and dataset reference fills 
it back up.

There is an art to setting thresholds. A thorough analysis, taking into 
consideration the MGMTCLAS(s), STORGRP(s), thresholds, relative data set sizes, 
and reference patterns needs to occur.

HTH,


snip
I have a problem with a SMS managed storage pool which is increasing quite 
rapidly.  In this pool there is no ML2 migration .  We have Auto Migrate  Auto 
Backup turned on and INTERVAL MIGRATION.  
 
Below is the THRESHOLD which we are using for this pool.
 
Allocation/migration Threshold : High . . 75  (1-99)  Low  . . 3   (0-99)
Alloc/Migr Threshold Track-Managed:  High . . 85  (1-99)  Low  . . 1   (0-99)

If I lowered the THRESHOLD would that help and free up some space?
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: DFHSM QUESTION : Allocation/migration Threshold

2012-01-05 Thread Staller, Allan
NO


snip
I should have mentioned that there is no ML0/ML1 migration in this pool as 
well.  PSM is only being run.  I understand that this is not a good thing but 
the client insists upon having NO migration of the dsns from this pool this 
woould explain why the Threshold is low.  Would adjusting the Threshold help 
eventhough there is no migration?
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: 21st Century Migrates Mainframe with Clerity

2012-01-04 Thread Staller, Allan
Last I heard, they were a relatively small Prop/Casualty insurer

Certainly not a State Farm, Prudential, Farmers, Allstate,.


snip
Subject: 21st Century Migrates Mainframe with Clerity

Greetings,
   Here's one I came across a few minutes ago. Not much information as
to the size of the installation,
but it's apparently a successful re-hosting. And it only took a year ???

http://www.insurancetech.com/architecture-infrastructure/232301250?cid=n
l_ins_dailyelq=98a33fd7dd5849f58313c5f02c397bd6

/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: ACCOUNT REPORT

2012-01-02 Thread Staller, Allan
This is trivial if you have SAS/MXG/MICS. There are also several
additional COTS products that will provide this info.
There are most likely some samples on the CBT Tape, but I am unfamiliar
with any specific file.
You can also roll your own with HL/ASM or other HLL using SMF30
subtype 5.



snip
We need made a report, from all Jobs that was executed under ZOS, with
CPU TIME, ELAPSED TIME, I/O COUNT, and other information.
We already have this program, but reading th POWER records, under VSE.
Someone know, IF exist a sample program, that do this ?
Or, IF in CBTTAPE, for example ?
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: IEBCOPY in z/OS 1.13

2011-12-16 Thread Staller, Allan
Back in the day, IEBCOPY used to do a conditional getmain for 1meg (1.5
meg?). 
if it got the storage, SYSUT3 and SYSUT4 were not used, thus reducing
I/O and elapsed time.

Also (at the time) IEBCOPY would run in a region much smaller than 1
meg. ISTR 64K, but am not positive.

I do not know if this is still the case

HTH, 

snip
Way back when and continuing forward I always put on parm=size=1000K  
on all IEBCOPY (especially in SMPE) and got great throughput usually  
50 percent (or more) faster runtimes.  I think I started doing this  
in the 1970's. I know we had to use it when copying the CDS's (when  
they were pds's).
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN


Re: Nice article, high level - homegrown vs. vendor basically

2011-12-14 Thread Staller, Allan
Tim,

Please expound and elucidate, oh wise and wonderful sage G

snip
Great Platform Shakeout of the Naughts
/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: zFS parm sysplex=filesys

2011-12-12 Thread Staller, Allan
snip
Currently studying the migration guide for z/OS 1.13 (we're running 1.11
now), and note that 1.13 delivers zFS with a default of sysplex=filesys.
...snippage

Q1:  Has anyone here IPLed a z/OS 1.13 system into a supported
back-level sysplex WITHOUT shared file systems AND without having
specified sysplex=filesys in the back-level members?

Q2:  What observable effect(s), if any, would occur if we specify
sysplex=filesys in our 1.11 images without sharing file systems?
/snip

Re: Q2 as far as I can tell, absolutely no observable impact. This
assumes, of course, that you have the normal sysplex setup for your
file systems.
i.e. sysplex root, version roots,

Re: Q1. (disclaimer, I haven't tried it). I would think you would
receive the message and the ZFS system will not initialize.

According to my copy of the migration guide, z/OS 1.13 will not even
join the sysplex if FILESYS=NO is specified:
If you try to bring in zFS z/OS 1.13 when sysplex=filesys is not active
on all systems you will receive message IOEZ0072I sysplex 
member sysname is not running sysplex=filesys. ZFS on this initializing
member will terminate...

However under Is the migration action required, the response is Yes,
if you have a shared files system environment with more than one system
in the SYSPLEX
 

TIA,

 

-jc-

 


--
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: Is there an IBM program that will tell me what job created a DASD DSN?

2011-12-12 Thread Staller, Allan
There are probably several on the CBT tape (www.cbttape.org)  

I recommend  the DAF utility on the CBT tape (file094). 

You can look at the SMF 14/15 records using IEHEYEBALL.

AFAIK, there is no supplied program with z/OS.

HTH,

--
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: SMP/E vs. Multi-CSECT MOD Elements?

2011-12-05 Thread Staller, Allan
On 12/2/2011 12:05 PM, Kurt Quackenbush wrote:

quote
 If I APPLY a MOD that has fewer CSECTS than an earlier version,
 are the omitted CSECTs REPLACEd?  The Reference implies that
 this is done (in a warning, as if it were an extraordinary
occurrence).

Yes, the APPLY will generate REPLACE statements so the binder can delete

the omitted CSECTs.
/quote

How will APPLY know to replace (i.e. delete) the unreferenced CSECT's?

--
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: SMP/E vs. Multi-CSECT MOD Elements?

2011-12-02 Thread Staller, Allan
Comments indented. HTH,

I am struggling with an ISV compiler that delights in producing
multi-CSECT MOD elements.  I've never needed to put a CSECT
list in ++MOD MCS previously, but now I see that I need to.  So,
I wonder:

If I APPLY a MOD that has fewer CSECTS than an earlier version,
are the omitted CSECTs REPLACEd?  The Reference implies that
this done (in a warning, as if it were an extraordinary occurrence).

No. The omitted CSECTS are still present. SMP works by including
new CSECTS ahead of the existing LMOD. 
The L-Editor/Binder does the rest. IIRC, first occurrence of X
wins.
You will need to add replace statements for the omitted CSECTS
and specify NCAL for the binder via a JCLIN to eliminate the 
deleted CSECTS..
The JCLIN will need to contain all of the explicit statements to
build the new LMOD.
You could probably accomplish the same thing w/UCLIN, (DEL
MOD(x) LMOD(y). ??) but it seems like it would be harder get this right
than to justreplace the necessary instructions to SMP/E.

If I RESTORE to the earlier version, does SMP/E put such CSECTs
back?  Where does it get them?  The DLIB?

Yes. I believe  it also gets the appropriate JCLIN from the DLIB
version.. I am sure someone will correct me if this is not the case.

If I APPLY a MOD that has more CSECTs than the earlier version,
there should be no problem.  

Correct

When I RESTORE, does it REPLACE
the additional CSECTS?  (I seem to see this happening when I
RESTORE a PTF that introduced an new MOD element; that's
where I went wrong by not supplying a CSECT option -- not all
CSECTS were REPLACEd, and the stragglers caused Binder
errors.)

I do not believe so. See above. IIRC, the RESTORed LMOD will be
built from the appropriate DLIB elements and JCLIN).

In the extreme, what happens if two or more MOD elements
contain an identical CSECT?  I can envision this happening
without being a coding error if multiple assemblies need to
COPY a SYSLIB definition of a data CSECT in order to know
offsets -- when the load module is bound it doesn't matter
which one is INCLUDEd -- all subsequent duplicates will be
eliminated.  (Yah, I know; it might be better to assemble it
as a DSECT and deliver it as a separate MOD element.  But
isn't the rogue behavior endemic in C++ compiler output?)


--
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: JES2 JOBCLASS(TSU)

2011-11-28 Thread Staller, Allan
Yes:

From the JES2 INIT/TUNING Ref:

SWA= Above|Below 
SWA=Above specifies that all eligible schedule work area (SWA) control
blocks created for jobs in this job class will be placed above 16
megabytes in virtual storage. 
This parameter defaults to Below, which specifies that all SWA control
blocks for jobs in this job class will reside below 16 megabytes in
virtual storage. 

Modification: $T JOBCLASS operator command or cold start.

Ref:
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/has2a4a5/3.27
.2?ACTION=MATCHESREQUEST=jes2TYPE=FUZZYSHELF=HAS2BKB0.bksDT=20110617
172450CASE=zos13allsearchTopic=TOPICsearchText=TEXTsearchIndex=INDEX
rank=RANKScrollTOP=FIRSTHIT#FIRSTHIT

Watch the wrap,


HTH,

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


  1   2   3   4   5   6   7   8   9   10   >