VVDS with no catalog pointers

2012-02-24 Thread Buckton, T. (Theo)
Hi There,

Please explain why not all VVDSs catalog pointers. When doing a listcat, the 
return is as follows:

IDC3012I ENTRY SYS1.VVDS.VAPBPC7 NOT FOUND+
IDC1566I ** SYS1.VVDS.VAPBPC7 NOT LISTED   
IDC0014I LASTCC=4  
IDC3009I ** VSAM CATALOG RETURN CODE IS 8 - REASON CODE IS IGG0CLEG-42
***
Apparently this is normal.

I want to see the logic here.

BTW, these are sms-managed volumes.


Nedbank Limited Reg No 1951/09/06. The following link displays
the names of the Nedbank Board of Directors and Company Secretary.
[ http://www.nedbank.co.za/terms/DirectorsNedbank.htm ]
This email is confidential and is intended for the addressee only.
The following link will take you to Nedbank's legal notice.
[ http://www.nedbank.co.za/terms/EmailDisclaimer.htm ]


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


HSM Recall Failure

2012-02-24 Thread Buckton, T. (Theo)
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 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
***

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Buckton, T. (Theo)
Sent: 24 February 2012 11:33 AM
To: IBM-MAIN@bama.ua.edu
Subject: VVDS with no catalog pointers

Hi There,

Please explain why not all VVDSs catalog pointers. When doing a listcat, the 
return is as follows:

IDC3012I ENTRY SYS1.VVDS.VAPBPC7 NOT FOUND+
IDC1566I ** SYS1.VVDS.VAPBPC7 NOT LISTED   
IDC0014I LASTCC=4  
IDC3009I ** VSAM CATALOG RETURN CODE IS 8 - REASON CODE IS IGG0CLEG-42
***
Apparently this is normal.

I want to see the logic here.

BTW, these are sms-managed volumes.


Nedbank Limited Reg No 1951/09/06. The following link displays the names of 
the Nedbank Board of Directors and Company Secretary.
[ http://www.nedbank.co.za/terms/DirectorsNedbank.htm ] This email is 
confidential and is intended for the addressee only.
The following link will take you to Nedbank's legal notice.
[ http://www.nedbank.co.za/terms/EmailDisclaimer.htm ]


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


Nedbank Limited Reg No 1951/09/06. The following link displays the names of 
the Nedbank Board of Directors and Company Secretary.
[ http://www.nedbank.co.za/terms/DirectorsNedbank.htm ] This email is 
confidential 

Re: TCP/IP time to indicate error

2012-02-24 Thread Chris Mason
Donald

Since you appear to be writing the TCP client program, one way you can provide 
a connection timeout is to set up a non-blocking connect() call and then 
apply a timeout using the select() call.

Please note that the greater concentration of expertise in matters to do with 
the z/OS Communications Server IP component can be found here:

For IBMTCP-L subscribe / signoff / archive access instructions, send email to 
lists...@vm.marist.edu with the message: INFO IBMTCP-L

Chris Mason

On Thu, 23 Feb 2012 12:29:21 -0600, Donald Likens dlik...@infosecinc.com 
wrote:

I have a TCP/IP Socket client that is talking to a windows (Java) TCP/IP 
socket server. When I subdown the server I detect a problem and close down the 
connection and attempt to connect again. When I attempt to connect it takes 
about 3 minutes for the client to detect that the server is not going to 
respond. Is there a way to reduce the time to wait for the connection? I would 
prefer to not change the whole network but if this what is required so be it.

--
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 Buckton, T. (Theo)
And why would the data set shows as online whilst the HSM recall is still in 
progress?

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Buckton, T. (Theo)
Sent: 24 February 2012 12:20 PM
To: IBM-MAIN@bama.ua.edu
Subject: 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 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
***

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Buckton, T. (Theo)
Sent: 24 February 2012 11:33 AM
To: IBM-MAIN@bama.ua.edu
Subject: VVDS with no catalog pointers

Hi There,

Please explain why not all VVDSs catalog pointers. When doing a listcat, the 
return is as follows:

IDC3012I ENTRY SYS1.VVDS.VAPBPC7 NOT FOUND+
IDC1566I ** SYS1.VVDS.VAPBPC7 NOT LISTED   
IDC0014I LASTCC=4  
IDC3009I ** VSAM CATALOG RETURN CODE IS 8 - REASON CODE IS IGG0CLEG-42
***
Apparently this is normal.

I want to see the logic here.

BTW, these are sms-managed volumes.


Nedbank Limited Reg No 1951/09/06. The following link displays the names of 
the Nedbank Board of Directors and Company Secretary.
[ http://www.nedbank.co.za/terms/DirectorsNedbank.htm ] This email is 
confidential and is intended for the addressee only.
The following link will take you to Nedbank's legal notice.
[ http://www.nedbank.co.za/terms/EmailDisclaimer.htm ]


--
For IBM-MAIN subscribe / signoff / archive access instructions, send 

Re: HSM Recall Failure

2012-02-24 Thread Lizette Koehler
 
 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 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
 ***
 
 
 Hi There,
 
 Please explain why not all VVDSs catalog pointers. When doing a listcat,
the return is as
 follows:
 
 IDC3012I ENTRY SYS1.VVDS.VAPBPC7 NOT FOUND+
 IDC1566I ** SYS1.VVDS.VAPBPC7 NOT LISTED
 IDC0014I LASTCC=4
 IDC3009I ** VSAM CATALOG RETURN CODE IS 8 - REASON CODE IS IGG0CLEG-42
 ***
 Apparently this is normal.
 
 I want to see the logic here.
 
 BTW, these are sms-managed volumes.
 

First look at the ADR477E message. There are actually 3 reasons why it could
happen.

An error was encountered processing a VVR. If there was an I/O error,
message ADR231E precede this message.
An error was encountered on a catalog request. Message ADR497E precede
this message.
There be insufficient storage for internal processing. Messages ADR008E,
ADR018I, or ADR376E precede this message.

Looking at your DFDSS output I did not see any of the targeted messages.
However, this seems to be a huge file 

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

So you need to 
1) make sure there is sufficient space in the SMS Pool
2) make sure the VVDS and VTOC are large enough for the volumes in your pool

I am curious as to why you focused on this one volume and the VVDS.  I did
not see any error messages targeting that volume or a vvds issue.

IIRC - VVDS is done with a DEFINE command so should be cataloged.  However,
if there are a dasd moves or renames (volumes clipped), that might be some
of the issue.  Go to Option 3.4 in ISPF and just list the contents of the
volume.  Also do a VTOC list with 3.4.  Or use ISMF to review the
information about the volume and VTOC, VVDS and VTOCIX sizes.

See if the volume APBPC7 has a large enough VVDS and that the VVDS exists on
the volume.  If so, you may need to recatalog or recover the VVDS

After recovery, a BCS might not contain entries for all the VVDSs on volumes
where the BCS has data sets. In this case, you might want to recatalog the
VVDS so that the BCS contains entries for all connected VVDSs.

If you want to recreate the BCS entry for a VVDS, use the access method
services DEFINE CLUSTER command with the RECATALOG option. Specify the name,
volume of the VVDS, and NONINDEXED. The BCS entry is rebuilt using
information in the VVDS and the command. A VTOC entry for the VVDS must also
exist.

Before recovering a VVDS, decide if the VVDS is systematically damaged, or
if only certain entries in the VVDS are damaged. If you cannot open the
VVDS, for example, when you try to print it or access data sets 

Re: DU-AL in IPCS dump

2012-02-24 Thread Binyamin Dissen
CR2 - DUCT

On Thu, 23 Feb 2012 20:35:52 -0500 Micheal Butz michealb...@optonline.net
wrote:

:In a ipcs dump where can I see a TCBs. DU-AL
:
:Sent from my iPhone
:
:--
:For IBM-MAIN subscribe / signoff / archive access instructions,
:send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN

--
Binyamin Dissen bdis...@dissensoftware.com
http://www.dissensoftware.com

Director, Dissen Software, Bar  Grill - Israel


Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.

I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.

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


Re: VVDS with no catalog pointers

2012-02-24 Thread Mike Schwab
A VSAM dataset was never created on that volume.

On Fri, Feb 24, 2012 at 3:33 AM, Buckton, T. (Theo)
the...@nedbank.co.za wrote:
 Hi There,

 Please explain why not all VVDSs catalog pointers. When doing a listcat, the 
 return is as follows:

 IDC3012I ENTRY SYS1.VVDS.VAPBPC7 NOT FOUND+
 IDC1566I ** SYS1.VVDS.VAPBPC7 NOT LISTED
 IDC0014I LASTCC=4
 IDC3009I ** VSAM CATALOG RETURN CODE IS 8 - REASON CODE IS IGG0CLEG-42
 ***
 Apparently this is normal.

 I want to see the logic here.

 BTW, these are sms-managed volumes.

-- 
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

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


Re: Stupid JCL trick?

2012-02-24 Thread Paul Gilmartin
On Thu, 23 Feb 2012 07:52:38 -0500, Bill Ashton wrote:

I use this sort of trick often for controlling sections of JCL, For
example, I might have a step or two that deletes and allocates files, then
another step that processes data into the new files, and finally a step
that prints report files from the job. Then at the top I would SET ALLOC  =
either 1 to run or 0 to not run, SET PROCESS to 1/0, and SET REPORTS to 1/0.

In the JCL I start with a do-nothing BR14, and then surround each section
with IF ALLOC=1 THEN..ENDIF   If PROCESS=1 THEN.ENDIF and If
REPORTS=1 THEN.ENDIF
 
This would appear to be disallowed by:

   *  z/OS V1R13.0 MVS JCL Reference
   * SA22-7597-15

where I read:

17.1.9 Considerations when Using the IF/THEN/ELSE/ENDIF Construct

Be aware of the following considerations when using the IF/THEN/ELSE/ENDIF 
statement construct:
   ...
   # You can specify symbolic parameters on
 IF/THEN/ELSE/ENDIF statements provided that
 they resolve to one of the supported
 relational-expression keywords listed in the
 preceding topic (that is, RC, ABEND, ...). Any
 other symbolic parameters, even if accepted by
 the system, are not intended or supported.

Would you submit to a code review any code that depends on
behavior which is not intended or supported by the vendor?

Which leaves a question: what about constructs that are not
documented in an earlier topic as supported, but are coded
directly, not involving symbolic parameters?

-- gil

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


Re: VVDS with no catalog pointers

2012-02-24 Thread O'Brien, David W. (NIH/CIT) [C]
As these are SMS managed volumes, a VVDS will be allocated with the first 
dataset allocated to that volume regardless of DSORG. See Defining a VVDS 
(catalog Volume Data Set) in z/OS V1R11.0 DFSMS Managing Catalogs.

Also from the same section:
A VVDS is defined with the name SYS1.VVDS.Vvolser, where volser is the
volume serial number of the volume containing the VVDS.  SYS1.VVDS.Vvolser
does not have to be cataloged in the master catalog.  

Thank You,
Dave O'Brien
NIH Contractor

From: Mike Schwab [mike.a.sch...@gmail.com]
Sent: Friday, February 24, 2012 7:57 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: VVDS with no catalog pointers

A VSAM dataset was never created on that volume.

On Fri, Feb 24, 2012 at 3:33 AM, Buckton, T. (Theo)
the...@nedbank.co.za wrote:
 Hi There,

 Please explain why not all VVDSs catalog pointers. When doing a listcat, the 
 return is as follows:

 IDC3012I ENTRY SYS1.VVDS.VAPBPC7 NOT FOUND+
 IDC1566I ** SYS1.VVDS.VAPBPC7 NOT LISTED
 IDC0014I LASTCC=4
 IDC3009I ** VSAM CATALOG RETURN CODE IS 8 - REASON CODE IS IGG0CLEG-42
 ***
 Apparently this is normal.

 I want to see the logic here.

 BTW, these are sms-managed volumes.

--
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

--
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: VVDS with no catalog pointers

2012-02-24 Thread Lizette Koehler
 
 A VSAM dataset was never created on that volume.
 
 On Fri, Feb 24, 2012 at 3:33 AM, Buckton, T. (Theo) the...@nedbank.co.za
wrote:
  Hi There,
 
  Please explain why not all VVDSs catalog pointers. When doing a listcat,
the return is
 as follows:
 
  IDC3012I ENTRY SYS1.VVDS.VAPBPC7 NOT FOUND+ IDC1566I **
  SYS1.VVDS.VAPBPC7 NOT LISTED IDC0014I LASTCC=4 IDC3009I ** VSAM
  CATALOG RETURN CODE IS 8 - REASON CODE IS IGG0CLEG-42
  ***
  Apparently this is normal.
 
  I want to see the logic here.
 

Mike, 

If you allow the system to allocate/create the VVDS dataset, that is
correct,  The OP did not say how they create volumes so I am not sure if
they let the system allocate the file or if they allocate the file after
INIT a pack.

I prefer to do the DEFINE VVDS after I init a volume.  That way I control
the size of the file.

Lizette

--
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 O'Brien, David W. (NIH/CIT) [C]
As Lizette points out this is a fairly large file, do you have any msgs. in 
Jeslog such as B-37?

What is the value of Volcount?
SETSYS VOLCOUNT(ANY) will allow expansion to a secondary volume.

ANY specifies for DFSMShsm to pass the VOLCOUNT(ANY) parameter to DFSMSdss
during the ARECOVER of data dumped by DFSMSdss (L0 data sets). This   
parameter affects the way SMS-managed data set allocations are performed  
by DFSMSdss for the L0 data sets dumped from primary volumes. Refer to
z/OS DFSMSdss Storage Administration for more specific information about  
the restrictions and limitations of the DFSMSdss VOLCOUNT parameter. The  
result is the allocation of the target data sets on as many volumes as
required, to a maximum of 59.  

Thank You,
Dave O'Brien
NIH Contractor

From: Lizette Koehler [stars...@mindspring.com]
Sent: Friday, February 24, 2012 7:07 AM
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 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
 ***


 Hi There,

 Please explain why not all VVDSs catalog pointers. When doing a listcat,
the return is as
 follows:

 IDC3012I ENTRY SYS1.VVDS.VAPBPC7 NOT FOUND+
 IDC1566I ** SYS1.VVDS.VAPBPC7 NOT LISTED
 IDC0014I LASTCC=4
 IDC3009I ** VSAM CATALOG RETURN CODE IS 8 - REASON CODE IS IGG0CLEG-42
 ***
 Apparently this is normal.

 I want to see the logic here.

 BTW, these are sms-managed volumes.


First look at the ADR477E message. There are actually 3 reasons why it could
happen.

An error was encountered processing a VVR. If there was an I/O error,
message ADR231E precede this message.
An error was encountered on a catalog request. Message ADR497E precede
this message.
There be insufficient storage for internal processing. Messages ADR008E,
ADR018I, or ADR376E precede this message.

Looking at your DFDSS output I did not see any of the targeted messages.
However, this seems to be a huge file

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

So you need to
1) make sure there is sufficient space in the SMS Pool
2) make sure the VVDS and VTOC are large enough for the volumes in your pool

I am curious as to why you focused on this one volume and the VVDS.  I did
not see any error messages targeting that volume or a vvds issue.

IIRC - VVDS is done with a DEFINE command so should be cataloged.  However,
if there are a dasd moves or renames (volumes clipped), that might be some
of the issue.  Go to Option 3.4 in ISPF and just list the 

Re: Mentor for an Assembler User Exit in CA-1

2012-02-24 Thread Alan Schenck
Same here from me Lizette.

--
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: Stupid JCL trick?

2012-02-24 Thread Scott Ford
Hey Gil,

Is the IF/THEN assuming, big word here, that the 1 is a return code, just a 
thought

Sent from my iPad
Scott Ford
Senior Systems Engineer
www.identityforge.com



On Feb 24, 2012, at 8:37 AM, Paul Gilmartin paulgboul...@aim.com wrote:

 On Thu, 23 Feb 2012 07:52:38 -0500, Bill Ashton wrote:
 
 I use this sort of trick often for controlling sections of JCL, For
 example, I might have a step or two that deletes and allocates files, then
 another step that processes data into the new files, and finally a step
 that prints report files from the job. Then at the top I would SET ALLOC  =
 either 1 to run or 0 to not run, SET PROCESS to 1/0, and SET REPORTS to 1/0.
 
 In the JCL I start with a do-nothing BR14, and then surround each section
 with IF ALLOC=1 THEN..ENDIF   If PROCESS=1 THEN.ENDIF and If
 REPORTS=1 THEN.ENDIF
 
 This would appear to be disallowed by:
 
   *  z/OS V1R13.0 MVS JCL Reference
   * SA22-7597-15
 
 where I read:
 
 17.1.9 Considerations when Using the IF/THEN/ELSE/ENDIF Construct
 
 Be aware of the following considerations when using the IF/THEN/ELSE/ENDIF 
 statement construct:
   ...
   # You can specify symbolic parameters on
 IF/THEN/ELSE/ENDIF statements provided that
 they resolve to one of the supported
 relational-expression keywords listed in the
 preceding topic (that is, RC, ABEND, ...). Any
 other symbolic parameters, even if accepted by
 the system, are not intended or supported.
 
 Would you submit to a code review any code that depends on
 behavior which is not intended or supported by the vendor?
 
 Which leaves a question: what about constructs that are not
 documented in an earlier topic as supported, but are coded
 directly, not involving symbolic parameters?
 
 -- gil
 
 --
 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: DU-AL in IPCS dump

2012-02-24 Thread Micheal Butz
Can you please elaborate is this  a parameter on VERBEXIT SUMDUMP 

 

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf
Of Binyamin Dissen
Sent: Friday, February 24, 2012 7:33 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: DU-AL in IPCS dump

CR2 - DUCT

On Thu, 23 Feb 2012 20:35:52 -0500 Micheal Butz michealb...@optonline.net
wrote:

:In a ipcs dump where can I see a TCBs. DU-AL
:
:Sent from my iPhone
:
:--
:For IBM-MAIN subscribe / signoff / archive access instructions,
:send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN

--
Binyamin Dissen bdis...@dissensoftware.com
http://www.dissensoftware.com

Director, Dissen Software, Bar  Grill - Israel


Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.

I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.

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


Hiper Dispatching

2012-02-24 Thread gsg
We have a 2097-504(E12).  Does anyone know if turing on Hiper Dispatching on a 
single book box machine would make a difference in performance?

 

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


Re: DU-AL in IPCS dump

2012-02-24 Thread Edward Jaffe

On 2/24/2012 9:00 AM, Micheal Butz wrote:

Can you please elaborate is this  a parameter on VERBEXIT SUMDUMP


CR2 is a register on the machine.

--
Edward E Jaffe
Phoenix Software International, Inc
831 Parkview Drive North
El Segundo, CA 90245
310-338-0400 x318
edja...@phoenixsoftware.com
http://www.phoenixsoftware.com/

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


Re: Erasing data on disk volumes (2105-F20)

2012-02-24 Thread Shmuel Metz (Seymour J.)
In 003c01ccf1c8$b6b6d390$24247ab0$@net, on 02/22/2012
   at 05:16 PM, Ron Hawkins ronjhawk...@sbcglobal.net said:

Of course, I'd expect any claim to refer to current FBA drives 
and not a RAMAC I.

Why? Or does NSA have a time machine? I would expect them to be more
willing to disclose what they can do with old hardware than with what
they can do with current hardware.

I wonder if the NSA have managed to retrieve Nixon's missing 18.5
minutes of blank tape?

If I knew they'd have to kill me ;-)
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see http://patriot.net/~shmuel/resume/brief.html 
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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


Re: VVDS with no catalog pointers

2012-02-24 Thread retired mainframer
If the VVDS was created automatically by SMS when the first dataset was
created on the volume, then it was catalogued in the same catalog as that
dataset.  Usually, the dataset is a user dataset and the VVDS ends up being
catalogued in the corresponding user catalog.  However, LISTCAT (which
produced the messages you quoted) looks for catalog entries in normal
search order (unless you direct otherwise) and for SYS1 this means master
catalog only.

SYS1 VSAM datasets can be catalogued in multiple catalogs so you could add
the VVDS to the master catalog to eliminate the error messages.  On the
other had, the system is quite capable of finding any VVDS it needs without
resorting to normal search order so there is no need.

:: -Original Message-
:: From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
:: Behalf Of Buckton, T. (Theo)
:: Sent: Friday, February 24, 2012 1:33 AM
:: To: IBM-MAIN@bama.ua.edu
:: Subject: VVDS with no catalog pointers
::
:: Hi There,
::
:: Please explain why not all VVDSs catalog pointers. When doing a listcat,
:: the return is as follows:
::
:: IDC3012I ENTRY SYS1.VVDS.VAPBPC7 NOT FOUND+
:: IDC1566I ** SYS1.VVDS.VAPBPC7 NOT LISTED
:: IDC0014I LASTCC=4
:: IDC3009I ** VSAM CATALOG RETURN CODE IS 8 - REASON CODE IS IGG0CLEG-42
:: ***
:: Apparently this is normal.
::
:: I want to see the logic here.
::
:: BTW, these are sms-managed volumes.

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


Re: VVDS with no catalog pointers

2012-02-24 Thread retired mainframer
An SMS volume with any SMS managed dataset will also have a VVDS.

:: -Original Message-
:: From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
:: Behalf Of Mike Schwab
:: Sent: Friday, February 24, 2012 4:57 AM
:: To: IBM-MAIN@bama.ua.edu
:: Subject: Re: VVDS with no catalog pointers
::
:: A VSAM dataset was never created on that volume.
::
:: On Fri, Feb 24, 2012 at 3:33 AM, Buckton, T. (Theo)
:: the...@nedbank.co.za wrote:
::  Hi There,
:: 
::  Please explain why not all VVDSs catalog pointers. When doing a
:: listcat, the return is as follows:
:: 
::  IDC3012I ENTRY SYS1.VVDS.VAPBPC7 NOT FOUND+
::  IDC1566I ** SYS1.VVDS.VAPBPC7 NOT LISTED
::  IDC0014I LASTCC=4
::  IDC3009I ** VSAM CATALOG RETURN CODE IS 8 - REASON CODE IS IGG0CLEG-42
::  ***
::  Apparently this is normal.
:: 
::  I want to see the logic here.
:: 
::  BTW, these are sms-managed volumes.

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


Re: Hiper Dispatching

2012-02-24 Thread Vernooij, CP - SPLXM
Looking for this information, I found these:

http://www-01.ibm.com/software/tivoli/features/ccr2/ccr2-2008-04/article
3.html
http://www-01.ibm.com/software/tivoli/features/ccr2/ccr2-2008-05/article
5.html

Hope this helps,
Kees.

gsg gsg_...@yahoo.com wrote in message
news:7794429104709271.wa.gsg808yahoo@bama.ua.edu...
 We have a 2097-504(E12).  Does anyone know if turing on Hiper
Dispatching on a single book box machine would make a difference in
performance?
 
  
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN

For information, services and offers, please visit our web site: 
http://www.klm.com. This e-mail and any attachment may contain confidential and 
privileged material intended for the addressee only. If you are not the 
addressee, you are notified that no part of the e-mail or any attachment may be 
disclosed, copied or distributed, and that any other action related to this 
e-mail or attachment is strictly prohibited, and may be unlawful. If you have 
received this e-mail by error, please notify the sender immediately by return 
e-mail, and delete this message. 

Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its 
employees shall not be liable for the incorrect or incomplete transmission of 
this e-mail or any attachments, nor responsible for any delay in receipt. 
Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch 
Airlines) is registered in Amstelveen, The Netherlands, with registered number 
33014286



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


Re: Hiper Dispatching

2012-02-24 Thread Bob Shannon
 Does anyone know if turning on Hiper Dispatching on a single book box machine 
 would make a difference in performance?

The answer is yes, but I believe with your configuration the answer is no. 
Hiper Dispatch tries to dispatch the work on a subset of logical processors. 
Since you only have 4 CPs those are the only ones you can be dispatched on 
anyway so you get the effect of Hiper Dispatch by default.
 
If you had more processors you'd see a benefit in using Hiper Dispatch. OTOH it 
probably won't hurt to turn it on to try it.

Bob Shannon
Rocket Software

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


Re: VARY ON/ VARY OFF COMMAND IN BATCH

2012-02-24 Thread John Dawes
Yes.  I tried Alan Starr's suggestion and it worked.

 


 From: Itschak Mugzach imugz...@gmail.com
To: IBM-MAIN@bama.ua.edu 
Sent: Thursday, 23 February 2012 1:20 PM
Subject: Re: VARY ON/ VARY OFF COMMAND IN BATCH
  
Did you CONSPROFed the console first?

ITschak

On Thu, Feb 23, 2012 at 8:06 PM, Veilleux, Jon L veilleu...@aetna.comwrote:

 Did you check to see if you had console authority?

 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
 Behalf Of John Dawes
 Sent: Wednesday, February 22, 2012 12:23 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: VARY ON/ VARY OFF COMMAND IN BATCH

 G'Day,

 I have several hundred volumes to put online/offline and I thought I could
 try it in batch mode.  I dug up an old JCL which I tried but the job failed
 because of  the following:

 READY
  CONSOLE SYSCMD(V (AA50),ONLINE) IKJ55303I THE CONSOLE COMMAND HAS
 TERMINATED.+ IKJ55303I AN ERROR OCCURRED DURING CONSOLE INITIALIZATION.
 THE MCSOPER RETURN CODE WAS X'0004' AND THE REASON CODE WAS X'00
 00'. READY
 END

 Here is the job which I executed.  :

 //*
 //STEP01   EXEC PGM=IKJEFT01,DYNAMNBR=999 //SYSPRINT DD  SYSOUT=*
 //SYSTSPRT DD  SYSOUT=* //SYSTSIN  DD  *
  CONSOLE SYSCMD(V (AA50),ONLINE)

 Could someone please correct my mistake?

 Thanks in advance.

 --
 For IBM-MAIN subscribe / signoff / archive access instructions, send email
 to lists...@bama.ua.edu with the message: INFO IBM-MAIN
 This e-mail may contain confidential or privileged information. If
 you think you have received this e-mail in error, please advise the
 sender by reply e-mail and then delete this e-mail immediately.
 Thank you. Aetna

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

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


Re: VARY ON/ VARY OFF COMMAND IN BATCH

2012-02-24 Thread John Dawes
Yes.  I have authorization.  

 


 From: Veilleux, Jon L veilleu...@aetna.com
To: IBM-MAIN@bama.ua.edu 
Sent: Thursday, 23 February 2012 1:06 PM
Subject: Re: VARY ON/ VARY OFF COMMAND IN BATCH
  
Did you check to see if you had console authority?

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
John Dawes
Sent: Wednesday, February 22, 2012 12:23 PM
To: IBM-MAIN@bama.ua.edu
Subject: VARY ON/ VARY OFF COMMAND IN BATCH

G'Day,
 
I have several hundred volumes to put online/offline and I thought I could try 
it in batch mode.  I dug up an old JCL which I tried but the job failed because 
of  the following:
 
READY
 CONSOLE SYSCMD(V (AA50),ONLINE) IKJ55303I THE CONSOLE COMMAND HAS TERMINATED.+ 
IKJ55303I AN ERROR OCCURRED DURING CONSOLE INITIALIZATION.  THE MCSOPER RETURN 
CODE WAS X'0004' AND THE REASON CODE WAS X'00 00'. READY 
END 

Here is the job which I executed.  :
 
//*
//STEP01   EXEC PGM=IKJEFT01,DYNAMNBR=999 //SYSPRINT DD  SYSOUT=* //SYSTSPRT 
DD  SYSOUT=* //SYSTSIN  DD  *
 CONSOLE SYSCMD(V (AA50),ONLINE)    

Could someone please correct my mistake?
 
Thanks in advance.

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@bama.ua.edu with the message: INFO IBM-MAIN
This e-mail may contain confidential or privileged information. If
you think you have received this e-mail in error, please advise the
sender by reply e-mail and then delete this e-mail immediately.
Thank you. Aetna  

--
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: Hiper Dispatching

2012-02-24 Thread Vernooij, CP - SPLXM
Bob Shannon bshan...@rocketsoftware.com wrote in message
news:58FC7F986FCB804286E23B59DECF420F334E6230@nwt-s-mbx1.rocketsoftware
.com...
  Does anyone know if turning on Hiper Dispatching on a single book
box machine would make a difference in performance?
 
 The answer is yes, but I believe with your configuration the answer is
no. Hiper Dispatch tries to dispatch the work on a subset of logical
processors. Since you only have 4 CPs those are the only ones you can be
dispatched on anyway so you get the effect of Hiper Dispatch by default.
  
 If you had more processors you'd see a benefit in using Hiper
Dispatch. OTOH it probably won't hurt to turn it on to try it.
 
 Bob Shannon
 Rocket Software

That is also what I concluded from the information I found. I won't get
the big impact from the LP-subset dispatching, but possibly the little
from parking processors, so I noted I will try it later when I have time
to do so.

Kees.

For information, services and offers, please visit our web site: 
http://www.klm.com. This e-mail and any attachment may contain confidential and 
privileged material intended for the addressee only. If you are not the 
addressee, you are notified that no part of the e-mail or any attachment may be 
disclosed, copied or distributed, and that any other action related to this 
e-mail or attachment is strictly prohibited, and may be unlawful. If you have 
received this e-mail by error, please notify the sender immediately by return 
e-mail, and delete this message. 

Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its 
employees shall not be liable for the incorrect or incomplete transmission of 
this e-mail or any attachments, nor responsible for any delay in receipt. 
Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch 
Airlines) is registered in Amstelveen, The Netherlands, with registered number 
33014286



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


Re: Hiper Dispatching

2012-02-24 Thread Martin Packer
I'd've said there was an additional benefit through parking of logical 
engines.

Cheers, Martin

Martin Packer,
Mainframe Performance Consultant, zChampion
Worldwide Banking Center of Excellence, IBM

+44-7802-245-584

email: martin_pac...@uk.ibm.com

Twitter / Facebook IDs: MartinPacker
Blog: 
https://www.ibm.com/developerworks/mydeveloperworks/blogs/MartinPacker



From:
Bob Shannon bshan...@rocketsoftware.com
To:
IBM-MAIN@bama.ua.edu, 
Date:
24/02/2012 20:00
Subject:
Re: Hiper Dispatching
Sent by:
IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu



 Does anyone know if turning on Hiper Dispatching on a single book box 
machine would make a difference in performance?

The answer is yes, but I believe with your configuration the answer is no. 
Hiper Dispatch tries to dispatch the work on a subset of logical 
processors. Since you only have 4 CPs those are the only ones you can be 
dispatched on anyway so you get the effect of Hiper Dispatch by default.
 
If you had more processors you'd see a benefit in using Hiper Dispatch. 
OTOH it probably won't hurt to turn it on to try it.

Bob Shannon
Rocket Software

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








Unless stated otherwise above:
IBM United Kingdom Limited - Registered in England and Wales with number 
741598. 
Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU






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


Re: Hiper Dispatching

2012-02-24 Thread gsg
Parking?

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


Re: Hiper Dispatching

2012-02-24 Thread Vernooij, CP - SPLXM
Yes, like your cars, you put them in the parking place if you don't need
them.
If you have 4 online processors and you have only work for 2 or 3, it is
more efficient to park #4 and dispatch the work to only 3 processors.
That's what hyperdispatch does (amongst others).

Kees.

gsg gsg_...@yahoo.com wrote in message
news:1494057495687016.wa.gsg808yahoo@bama.ua.edu...
 Parking?
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN

For information, services and offers, please visit our web site: 
http://www.klm.com. This e-mail and any attachment may contain confidential and 
privileged material intended for the addressee only. If you are not the 
addressee, you are notified that no part of the e-mail or any attachment may be 
disclosed, copied or distributed, and that any other action related to this 
e-mail or attachment is strictly prohibited, and may be unlawful. If you have 
received this e-mail by error, please notify the sender immediately by return 
e-mail, and delete this message. 

Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its 
employees shall not be liable for the incorrect or incomplete transmission of 
this e-mail or any attachments, nor responsible for any delay in receipt. 
Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch 
Airlines) is registered in Amstelveen, The Netherlands, with registered number 
33014286



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


Re: Hiper Dispatching

2012-02-24 Thread Brian Peterson
 We have a 2097-504(E12).  Does anyone know if turing on Hiper Dispatching 
 on a single book box machine would make a difference in performance?

According to IBM System z10 Business Class Technical Overview
http://www.redbooks.ibm.com/redbooks/pdfs/sg247632.pdf
at page 153-154 in topic 7.3.12 HiperDispatch, 

 On the z10 BC, with its single drawer CPC and L2, 
 the benefits [of HiperDispatch] are minimal, if any.

Contrast the above description of HiperDispatch for z10 BC machines with the 
below description of current-generation z114 machines, where IBM has added 
sensitivity to the underlying quad-code chip architecture of these machines to 
the HiperDispatch function.  Reference IBM zEnterprise 114 Technical Guide 
http://www.redbooks.ibm.com/redbooks/pdfs/sg247954.pdf
page 90 in the topic HiperDispatch:

 z/OS dispatcher manages multiple queues, which are called 
 affinity queues, with a target number of four processors per 
 queue, which fits nicely into a single PU chip. These queues 
 are used to assign work to as few logical processors as are 
 needed for a given logical partition workload. So, even if the 
 logical partition is defined with a large number of logical 
 processors, HiperDispatch optimizes this number of 
 processors nearest to the required capacity. 

Brian

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


Re: Stupid JCL trick?

2012-02-24 Thread Don Leahy
One of my favourite tricks is to use the ISPF editor to Exclude the lines I
don't want, and then issue the SUB NX command.  Only the JCL in the
non-excluded lines will be submitted.

On Fri, Feb 24, 2012 at 10:58, Scott Ford scott_j_f...@yahoo.com wrote:

 Hey Gil,

 Is the IF/THEN assuming, big word here, that the 1 is a return code, just
 a thought

 Sent from my iPad
 Scott Ford
 Senior Systems Engineer
 www.identityforge.com



 On Feb 24, 2012, at 8:37 AM, Paul Gilmartin paulgboul...@aim.com wrote:

  On Thu, 23 Feb 2012 07:52:38 -0500, Bill Ashton wrote:
 
  I use this sort of trick often for controlling sections of JCL, For
  example, I might have a step or two that deletes and allocates files,
 then
  another step that processes data into the new files, and finally a step
  that prints report files from the job. Then at the top I would SET
 ALLOC  =
  either 1 to run or 0 to not run, SET PROCESS to 1/0, and SET REPORTS to
 1/0.
 
  In the JCL I start with a do-nothing BR14, and then surround each
 section
  with IF ALLOC=1 THEN..ENDIF   If PROCESS=1 THEN.ENDIF and If
  REPORTS=1 THEN.ENDIF
 
  This would appear to be disallowed by:
 
*  z/OS V1R13.0 MVS JCL Reference
* SA22-7597-15
 
  where I read:
 
  17.1.9 Considerations when Using the IF/THEN/ELSE/ENDIF Construct
 
  Be aware of the following considerations when using the
 IF/THEN/ELSE/ENDIF statement construct:
...
# You can specify symbolic parameters on
  IF/THEN/ELSE/ENDIF statements provided that
  they resolve to one of the supported
  relational-expression keywords listed in the
  preceding topic (that is, RC, ABEND, ...). Any
  other symbolic parameters, even if accepted by
  the system, are not intended or supported.
 
  Would you submit to a code review any code that depends on
  behavior which is not intended or supported by the vendor?
 
  Which leaves a question: what about constructs that are not
  documented in an earlier topic as supported, but are coded
  directly, not involving symbolic parameters?
 
  -- gil
 
  --
  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


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


Re: Hiper Dispatching

2012-02-24 Thread Knutson, Sam
Current thoughts from IBM ATS which can probably be considered canon on this 

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

My thoughts for what they are worth. You may not see a large amount of benefit 
now with your configuration on a z10 but it is probably the right direction to 
go so yes enable it after doing appropriate planning.  It defaults to being 
enabled at release 1.13.  If you get it enabled now without any problems then 
when you do go to hardware that would allow you to benefit as you go forward 
with confidence and get that out of the box on the new hardware.

I enabled HiperDispatch day one on our z9 to z10 implementations (smallest 
machine for us was a -709) and never looked back still on when we went to z196. 
 It has been a good thing. I would suggest to be reasonably current on 
service at a recommended recent quarterly RSU.   

Ask IBM through the formal support channels directly where you can get service 
recommendation specific to your environment before making changes.   Be 
prepared to monitor and measure the results of that change.

We recently consolidated even more LPARs onto our z196 and found the following 
HiperDispatch APAR's were important (at least to us).  We initially had some 
difficulty with one workload breaching an SLA after consolidation.  We engaged 
with the smart folks in IBM ATS right here in Gaithersburg and they steered us 
to these one of which we had already installed but the other two were added on 
top of RSU.  OA36459 in particular seemed to be important for us to be able 
to get full capacity utilization out of the box.

* OA35989
- On a large CEC with low utilization, except for a small test partition
running with HD=YES, vertical low processors may not be
unparked, even though there is sufficient demand on the small
partition and there is a large amount of free capacity on the CEC
- Routine which calculates free capacity suffered an overflow due to
large amount of unused capacity
* OA35860
- Running with HD=YES, vertical low processors may be unparked
even though there is no unused capacity available on the CEC
- WLM calculations of available capacity did not account for capacity
used by *PHYSCAL partition
* Impact is only when there is high Physical LPAR management time
* OA36459 - Closed 12/1/2011
- Not calculating the capacity used by vertical mediums and vertical
low processors correctly


    Best Regards, 

    Sam Knutson, GEICO 
    System z Team Leader 
    mailto:sknut...@geico.com 
    (office)  301.986.3574 
    (cell) 301.996.1318  
    
Think big, act bold, start simple, grow fast... 


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
gsg
Sent: Friday, February 24, 2012 1:03 PM
To: IBM-MAIN@bama.ua.edu
Subject: Hiper Dispatching

We have a 2097-504(E12).  Does anyone know if turing on Hiper Dispatching on a 
single book box machine would make a difference in performance?

 

This email/fax message is for the sole use of the intended
recipient(s) and may contain confidential and privileged information.
Any unauthorized review, use, disclosure or distribution of this
email/fax is prohibited. If you are not the intended recipient, please
destroy all paper and electronic copies of the original message.

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


Re: What is the justification for not using Trusted Key Entry (TKE) workstation?

2012-02-24 Thread Alan Altmark
On Thu, 23 Feb 2012 20:43:32 +0100, R.S. r.skoru...@bremultibank.com.pl wrote:
Back to the question: Who don't use TKE? I bet (and I'm pretty sure of
that) all the shops in Poland do not use TKE.
Justification: MONEY. No real need to use TKE.

It has been my opinion for several years that entering the master keys is a 
hardware function and should be another (separate) role of the HMC.  (E.g. User 
ALAN has role of Crypto Express Master Key administrator - Part 2 of 3.)

Only inertia keeps things the way they are today. 

Alan Altmark
IBM

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


Re: Thought: new DISP status function

2012-02-24 Thread Frank Swarbrick
I'm not clear on what you are doing here.  Are you saying this is somehow a 
replacement for this?

//REUSE   EXEC PGM=IEFBR14
//MYFILE  DD DSN=MY.FILE,SPACE=(0,0),DISP=(MOD,DELETE)
//MYPGM   EXEC PGM=MYPGM
//MYFILE  DD DSN=MY.FILE,SPACE=(CYL,(100,10),RLSE),DISP=(NEW,CATLG)

How would this look using your method?

Thanks,
Frank





 From: Paul Gilmartin paulgboul...@aim.com
To: IBM-MAIN@bama.ua.edu 
Sent: Friday, February 24, 2012 12:24 AM
Subject: Re: Thought: new DISP status function
 
On Thu, 23 Feb 2012 13:44:18 -0800, Frank Swarbrick wrote:

I'd much prefer the latter, but of course have no idea how much work it would 
be.

What is your 'driver' for wanting this feature?  Mine is to eliminate the 
requirement of the separate IEFBR14 to do a MOD,DELETE prior to doing a NEW.  
Honestly have a hard time understanding how MVS has gone this long with that 
kludgey (IMHO) behavior, but...

You don't need a separate IEFBR14 nor the overhead of DELETE and
re-create.  On occasion, I've done:

        ...
    //REUSE    DD  DISP=(MOD,CATLG),UNIT=SYSALLDA,SPACE=...,...
    //SYSUT2   DD  DISP=OLD,DSN=*.REUSE,VOL=REF=*.REUSE
        ...

-- gil

--
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: Thought: new DISP status function

2012-02-24 Thread Paul Gilmartin
On Fri, 24 Feb 2012 15:48:57 -0800, Frank Swarbrick wrote:

I'm not clear on what you are doing here.  Are you saying this is somehow a 
replacement for this?

//REUSE   EXEC PGM=IEFBR14
//MYFILE  DD DSN=MY.FILE,SPACE=(0,0),DISP=(MOD,DELETE)
//MYPGM   EXEC PGM=MYPGM
//MYFILE  DD DSN=MY.FILE,SPACE=(CYL,(100,10),RLSE),DISP=(NEW,CATLG)

Yes, provided you're willing/intending to reuse the data set if it exists
rather than deleting and reallocating.

How would this look using your method?

//MYPGM   EXEC PGM=MYPGM
//ALLOC   DD DSN=MY.FILE,SPACE=(CYL,(100,10)),DISP=(MOD,CATLG)  /* UNIT= or 
SMS? */
//MYFILE  DD DISP=OLD,DSN=*.ALLOC,VOL=REF=*.ALLOC

(From memory; not lately tested.)

(I don't know how to deal with the RLSE option.)

-- gil

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


Re: Stupid JCL trick?

2012-02-24 Thread Paul Gilmartin
On Fri, 24 Feb 2012 10:58:50 -0500, Scott Ford wrote:

Hey Gil,

Is the IF/THEN assuming, big word here, that the 1 is a return code, just a 
thought

 On Thu, 23 Feb 2012 07:52:38 -0500, Bill Ashton wrote:

 In the JCL I start with a do-nothing BR14, and then surround each section
 with IF ALLOC=1 THEN..ENDIF   If PROCESS=1 THEN.ENDIF and If
 REPORTS=1 THEN.ENDIF

Empirically, it appears to do the intuitively obvious:  treat
the operand as an integer constqnt.  But given the pains that
IBM takes to declare the construct unintended and unsupported,
they appear to be reserving the right to implement whatever
changes in behavior they choose, perhaps making it dependent
on ambient temperature, barometric pressure, relative
humidity, and phase of Moon.

--gil

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


Re: Stupid JCL trick?

2012-02-24 Thread Scott Ford
Gil,

Maybe some mumbo jumbo too...

Sent from my iPad
Scott Ford
Senior Systems Engineer
www.identityforge.com



On Feb 24, 2012, at 10:43 PM, Paul Gilmartin paulgboul...@aim.com wrote:

 On Fri, 24 Feb 2012 10:58:50 -0500, Scott Ford wrote:
 
 Hey Gil,
 
 Is the IF/THEN assuming, big word here, that the 1 is a return code, just a 
 thought
 
 On Thu, 23 Feb 2012 07:52:38 -0500, Bill Ashton wrote:
 
 In the JCL I start with a do-nothing BR14, and then surround each section
 with IF ALLOC=1 THEN..ENDIF   If PROCESS=1 THEN.ENDIF and If
 REPORTS=1 THEN.ENDIF
 
 Empirically, it appears to do the intuitively obvious:  treat
 the operand as an integer constqnt.  But given the pains that
 IBM takes to declare the construct unintended and unsupported,
 they appear to be reserving the right to implement whatever
 changes in behavior they choose, perhaps making it dependent
 on ambient temperature, barometric pressure, relative
 humidity, and phase of Moon.
 
 --gil
 
 --
 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