date:20111027

Got a ECA1004E error message when trying to recall a dataset.
Didn't found it through IBM LookAt and it seems there is no DFHSM message 
manual.

A hint of direction would be grateful.



Regards,
Thomas Berg
_
Thomas Berg   Specialist   A M   SWEDBANK


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

Re: HSM Journal dataset is almost full

2011-10-27 Thread Walter Marguccio

 From: Uriel Carrasquilla uriel.carrasqui...@mail.mcgill.ca

 Subject: Re: HSM Journal dataset is almost full

 If I was to increase the size of the HSM1.JRNL dataset, what would be the 
 best practice?

I would do what the hsm Storage Admin Guide suggest under moving the 
Journal :

1. Put DFSMShsm in emergency mode.     SETSYS EMERGENCY
2. Issue the CONTROLDATASETS parameter of the BACKVOL command to back up the
control and journal data sets.                    BACKVOL CONTROLDATASETS
3. Stop DFSMShsm.                                 F DFSMSHSM,STOP
4. Delete the old journal data set
5. Allocate a new journal data set on a different DASD device.
6. Start DFSMShsm.                                 S DFSMSHSM

Obviously, I'd allocate a much bigger journal at step 5.

HTH
Walter Marguccio
z/OS Systems Programmer
BELENUS LOB Informatic GmbH
Munich - Germany

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

HFS sharing and rolling product upgrades

2011-10-27 Thread Nofar Spalter

Hello,
How do you gradually roll changes to CICS, MQ and DB2 versions that change 
these products' HFS dataset one system at a time?
We currently share our BPXPRMxx member between two LPARs running in Sysplex 
with SYSPLEX(YES). 
Our CICS guys want to upgrade the CICS version one LPAR at a time (a reasonable 
request), and that means that they want to change the CICS HFS pointed to by 
the /usr/lpp/cicsts/cicsts32 mount point, but only on one system.
In other words they want to do something like this:

BPXPRMxx:
MOUNT FILESYSTEM('OMVS.CICSVER.CICS32')  
  MOUNTPOINT('/usr/lpp/cicsts/cicsts32')   
  TYPE(HFS)  MODE(READ) AUTOMOVE(INCLUDE,*)

Where CICSVER resolves to RSU1109 on SY1 LPAR and to RSU1110 on SY2 LPAR.

I don't think this is possible, but I do want to provide them the option to 
roll the change one LPAR at a time, prefferably without making changes to CICS.

Is there a way where we can support that?

Regards,
Nofar Spalter

--
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: Which manual for ECA* messages ?

2011-10-27 Thread jagadishan perumal

Hi,

Is it a error originating from a NON-IBM product ?

Regards,
Jags

On Thu, Oct 27, 2011 at 1:50 PM, Thomas Berg thomas.b...@swedbank.sewrote:

 Got a ECA1004E error message when trying to recall a dataset.
 Didn't found it through IBM LookAt and it seems there is no DFHSM message
 manual.

 A hint of direction would be grateful.



 Regards,
 Thomas Berg
 _
 Thomas Berg   Specialist   A M   SWEDBANK


 --
 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: Which manual for ECA* messages ?

2011-10-27 Thread Walter Marguccio

 From: Thomas Berg thomas.b...@swedbank.se

 Subject: Which manual for ECA* messages ?

 Got a ECA1004E error message when trying to recall a dataset.

DFSMShsm messages begin with ARC... AFAIK.
Are you sure the message comes from the Storage Manager ?

Walter Marguccio
z/OS Systems Programmer
BELENUS LOB Informatic GmbH
Munich - Germany

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

Antwort: Which manual for ECA* messages ?

2011-10-27 Thread Werner Kuehnel

ECA1004E belongs to EMC product HSM Migrator:

ECA1004E Recall of dsn Failed. Return Code: return code.

Regards,
Werner Kuehnel




Von:Thomas Berg thomas.b...@swedbank.se
An: IBM-MAIN@bama.ua.edu
Datum:  27.10.2011 10:43
Betreff:Which manual for ECA* messages ?
Gesendet von:   IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu



Got a ECA1004E error message when trying to recall a dataset.
Didn't found it through IBM LookAt and it seems there is no DFHSM message 
manual.

A hint of direction would be grateful.



Regards,
Thomas Berg
_
Thomas Berg   Specialist   A M   SWEDBANK


--
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: Which manual for ECA* messages ?

2011-10-27 Thread Elardus Engelbrecht

Thomas Berg wrote:

Got a ECA1004E error message when trying to recall a dataset.
Didn't found it through IBM LookAt and it seems there is no DFHSM message 
manual.

ECA stands for Extra Cold Anomaly. uhmmm, no no not that... :-D


Seriously, Google is not helpful here... I tried various different spelling 
etc. No luck.

Please post the FULL message text and any other message(s) too.

Also WHERE do you see that message? On TSO, batch job, etc?

Can you see the job/stc number to the LEFT of that message?

I think it is perhaps something homegrown there...

Groete / Greetings
Elardus Engelbrecht

--
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: Which manual for ECA* messages ?

2011-10-27 Thread Lutz Hamann

Thomas,

looks like it is a HSM-Migrator message from EMC. 

 ECA1004E Recall of dsn Failed. Return Code: return code


   ciao  Lutz

--
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: Which manual for ECA* messages ?

2011-10-27 Thread Elardus Engelbrecht

Thomas Berg wrote:

Got a ECA1004E error message when trying to recall a dataset.

A hint of direction would be grateful.

If you are on z/OS v1.12, it could be this: GRS: Enhanced Contention Analysis 
for GRS latch


Do you have that product?

Groete / Greetings
Elardus Engelbrecht

--
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: HFS sharing and rolling product upgrades

2011-10-27 Thread Mary Anne Matyaz

Nofar, what you want to do is completely possible and in fact we do exactly 
that: 


/* The following file  supports CICS*/
MOUNT FILESYSTEM('CICS.SYSNAME..CICSLVL..ZFS')
  MOUNTPOINT('/$SYSNAME/cicsts')
  TYPE(ZFS) MODE(RDWR) SYSNAME(SYSNAME) UNMOUNT PARM('NORWSHARE')


The only thing you need to change is to add an extra period after CICSVER:
 
BPXPRMxx:
MOUNT FILESYSTEM('OMVS.CICSVER..CICS32')
  MOUNTPOINT('/usr/lpp/cicsts/cicsts32')
  TYPE(HFS) MODE(READ) AUTOMOVE(INCLUDE,*)

Mary Anne

--
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: John McCarthy 1927-2011

2011-10-27 Thread Andrew Armstrong

(cdr (cdr '(John McCarthy)))

--
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: Which manual for ECA* messages ?

2011-10-27 Thread Schumacher, Otto

This message come from HSM. See below
ECA1004E EMC HSM MIGRATOR V1R3   

Regards
Otto Schumacher
 
HP Enterprise Services
Infrastructure Specialist
Ahold Account
CICS  Capacity Technical Support
P.O. Box 6462
2000 Wade Hampton Blvd.
LC1-302
Greenville,  South Carolina, 29606
Cell: 864 569--5338
Tel: 864 987-1417
Fax: 864 987-4500
E-mail: otto.schumac...@hp.com

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Elardus Engelbrecht
Sent: Thursday, October 27, 2011 5:31 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Which manual for ECA* messages ?

Thomas Berg wrote:

Got a ECA1004E error message when trying to recall a dataset.
Didn't found it through IBM LookAt and it seems there is no DFHSM message 
manual.

ECA stands for Extra Cold Anomaly. uhmmm, no no not that... :-D


Seriously, Google is not helpful here... I tried various different spelling 
etc. No luck.

Please post the FULL message text and any other message(s) too.

Also WHERE do you see that message? On TSO, batch job, etc?

Can you see the job/stc number to the LEFT of that message?

I think it is perhaps something homegrown there...

Groete / Greetings
Elardus Engelbrecht

--
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: Which manual for ECA* messages ?

2011-10-27 Thread Elardus Engelbrecht

Schumacher, Otto wrote:

This message come from HSM. See below
ECA1004E EMC HSM MIGRATOR V1R3

Thanks for your (and others too) kind tip. I must be that very ignorant ;)

Groete / Greetings
Elardus Engelbrecht

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

SV: Which manual for ECA* messages ?

As we now have an all IBM policy it didn't occur to me that it could be a 
non-ibm message.
I have looked for the ARC1001I message with the result as below... 

The whole error message (some line cutted at the end):

ARC1020I DFSMSHSM IS RECALLING FROM DASD DSN=P950OBA.A.CNTL, YOU MAY CONTINUE T
SSION BY PRESSING THE ATTENTION KEY 
 11/10/27 10:07:04 ECA1004E RECALL OF P950OBA.A.CNTL FAILED.  RETURN CODE: 4764.
 ARC1010I USER REQUEST FOR A MIGRATED DATA SET FAILED.  
 ARC1001I P950OBA.A.CNTL  RECALL FAILED, RC=0099, REAS=4764 
 ARC1199I ERROR DURING RECALL/RECOVERY  
 ***

Whats more irritating is that when looking at ARC1001I, the reasoncode is not 
found in the manual.
(z/OS V1R1.0 MVS System Messages, Vol 2 (ARC-ASA) - which is where the link 
from z/OS V1R13.0 DFSMShsm Diagnosis is pointing to.)
That is, they say:

2.671 ARC1001I

   ARC1001I {dsname | VOL=volser | command} operation FAILED, RC=retcode
  REAS=reascode

Explanation: A DFSMShsm request has failed. The following describes the message 
variables:

* dsname indicates the name of the data set.
* volser indicates the volume serial number.
* command indicates the command and its associated command parameters.
* operation indicates the requested operation.
* retcode indicates the return code.
* reascode indicates the reason code.

A following related message provides you with further information about the 
failure. The two digits of the message number specified as nn, indicate the 
retcode. The related message number also indicates the DFSMShsm function 
processing when the failure has occurred, as shown on the following table.



 Table 2. Return Code Identifier
   Function  Message Group 
Recovery/Recall   ARC11nns 
   Space Management   ARC12nns 
 Backup   ARC13nns 
  Aggregate Backup/Recovery   ARC6nnns 


For example, if the related message is ARC1131I:

* ARC1131I indicates that the recovery/recall function has failed. The nn 
is 31 which is the retcode. See Table 3 in topic 2.1266 for the meaning of 
retcode 31 or refer to message ARC1131I for expanded information.



- So I look at ARC1199, where I find:

2.787 ARC1199I

   ARC1199I ERROR DURING RECALL/RECOVERY

Explanation: An error was detected while DFSMShsm was performing a recall or 
recovery operation. The return and reason code are given in message ARC1001I. 
The possible values for the reason code are:

Reascode Meaning

4
A data set was requested to be reblocked and the accumulated record length 
was greater than the DCBLRECL.

8
A direct access data set was targeted to a volume with a smaller track 
capacity than the volume where the data set originally resided.

12
The DFSMShsm CDS record that describes the data set indicated a source 
volume device type that is not supported by DFSMShsm.



- Non sequitur AFAICS.  I the look in ARC Return Codes and Reason Codes  
where I finally find:

 99 VBS data set RECOVER/RECALL attempted to incompatible device.

- Which is somewhat unlikely for a JCL dataset. 

- REAS=4764 is nowhere to find  
 

 
Regards, 
Thomas Berg 
_ 
Thomas Berg   Specialist   A M   SWEDBANK 





 -Ursprungligt meddelande-
 Från: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] För Lutz
 Hamann
 Skickat: den 27 oktober 2011 12:05
 Till: IBM-MAIN@bama.ua.edu
 Ämne: Re: Which manual for ECA* messages ?
 
 Thomas,
 
 looks like it is a HSM-Migrator message from EMC.
 
  ECA1004E Recall of dsn Failed. Return Code: return code
 
 
ciao  Lutz
 
 --
 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: GDG

2011-10-27 Thread Tom Marchant

On Wed, 26 Oct 2011 15:41:19 -0700, Ed Gould wrote:

 The member igdms00 must have a specific keyword in order to have the EOF 
occur.

What keyword is that, Ed?  I don't remember that and a quick scan of the 
keywords for IGDSMSxx doesn't reveal anything.

I do see this in DFSMS Implementing System-Managed Storage section  
8.1 Understanding the Benefits of Placing Batch Data under System Management:

quote
For sequential data sets, SMS writes a hardware EOF at the beginning of the 
data 
set at initial allocation. This prevents data integrity problems when 
applications 
try to read the data before data is written in the data set.
/quote

There is nothing there about needing to do anything special to enable the 
function.

-- 
Tom Marchant

--
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: HFS sharing and rolling product upgrades

2011-10-27 Thread McKown, John

 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Nofar Spalter
 Sent: Thursday, October 27, 2011 3:19 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: HFS sharing and rolling product upgrades

 Hello,
 How do you gradually roll changes to CICS, MQ and DB2 
 versions that change these products' HFS dataset one system at a time?
 We currently share our BPXPRMxx member between two LPARs 
 running in Sysplex with SYSPLEX(YES). 
 Our CICS guys want to upgrade the CICS version one LPAR at a 
 time (a reasonable request), and that means that they want to 
 change the CICS HFS pointed to by the 
 /usr/lpp/cicsts/cicsts32 mount point, but only on one system.
 In other words they want to do something like this:

 BPXPRMxx:
 MOUNT FILESYSTEM('OMVS.CICSVER.CICS32')  
   MOUNTPOINT('/usr/lpp/cicsts/cicsts32')   
   TYPE(HFS)  MODE(READ) AUTOMOVE(INCLUDE,*)

 Where CICSVER resolves to RSU1109 on SY1 LPAR and to RSU1110 
 on SY2 LPAR.

 I don't think this is possible, but I do want to provide them 
 the option to roll the change one LPAR at a time, prefferably 
 without making changes to CICS.

 Is there a way where we can support that?

 Regards,
 Nofar Spalter

Have you looked at  considered: Mounting file systems using symbolic links?

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/bpxzb2b0/7.14

The commands to use would be something like:

cd /usr/lpp/cicsts
mkdir RSU1109
mkdir RSU1101
ln -s '$SYSSYMR/CICSVER' cicsts32

Now, I don't use UNIX sysplex filesystem sharing, but I think you could do a 
mount similar to:

 MOUNT FILESYSTEM('OMVS.CICSVER.CICS32')  
   MOUNTPOINT('/usr/lpp/cicsts/CICSVER.')   
   TYPE(HFS)  MODE(READ) AUTOMOVE(INCLUDE,*)

Question: Is a period missing? Wouldn't you need 'OMVS.CICSVER..CICS32'  ??? 
Or was it a typo on your part?

--
John McKown 
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

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

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

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

Re: HFS sharing and rolling product upgrades

2011-10-27 Thread Lizette Koehler

 
 Nofar, what you want to do is completely possible and in fact we do
exactly that:
 
 
 /* The following file  supports CICS*/
 MOUNT FILESYSTEM('CICS.SYSNAME..CICSLVL..ZFS')
   MOUNTPOINT('/$SYSNAME/cicsts')
   TYPE(ZFS) MODE(RDWR) SYSNAME(SYSNAME) UNMOUNT PARM('NORWSHARE')
 
 
 The only thing you need to change is to add an extra period after
CICSVER:

Mary Anne - 

Is this working because you have a SYSPLEX root rather than just general
roots?

In our shop we do not have a SYSPLEX root nor do we have SYSPLEX(YES) coded
in BPXPRMxx, so I am not sure that your process would work for us.  We mount
each set of HFS/zFS files inside the OMVS.ROOT dataset shipped by IBM.  So I
am not sure if the $SYSNAME would be valid for us.

Lizette

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

Re: Which manual for ECA* messages ?

2011-10-27 Thread Mike Schwab

The reason code came from the EMC product.  You will have to look up
that code in the EMC Manual.

  11/10/27 10:07:04 ECA1004E RECALL OF P950OBA.A.CNTL FAILED.  RETURN CODE: 
 4764.
  ARC1001I P950OBA.A.CNTL  RECALL FAILED, RC=0099, REAS=4764

On Thu, Oct 27, 2011 at 6:16 AM, Thomas Berg thomas.b...@swedbank.se wrote:
 As we now have an all IBM policy it didn't occur to me that it could be a 
 non-ibm message.
 I have looked for the ARC1001I message with the result as below...

 The whole error message (some line cutted at the end):

 ARC1020I DFSMSHSM IS RECALLING FROM DASD DSN=P950OBA.A.CNTL, YOU MAY CONTINUE 
 T
 SSION BY PRESSING THE ATTENTION KEY
  11/10/27 10:07:04 ECA1004E RECALL OF P950OBA.A.CNTL FAILED.  RETURN CODE: 
 4764.
  ARC1010I USER REQUEST FOR A MIGRATED DATA SET FAILED.
  ARC1001I P950OBA.A.CNTL  RECALL FAILED, RC=0099, REAS=4764
  ARC1199I ERROR DURING RECALL/RECOVERY
  ***

 Whats more irritating is that when looking at ARC1001I, the reasoncode is not 
 found in the manual.
 (z/OS V1R1.0 MVS System Messages, Vol 2 (ARC-ASA) - which is where the link 
 from z/OS V1R13.0 DFSMShsm Diagnosis is pointing to.)
 That is, they say:

 2.671 ARC1001I

   ARC1001I {dsname | VOL=volser | command} operation FAILED, RC=retcode
          REAS=reascode

 Explanation: A DFSMShsm request has failed. The following describes the 
 message variables:

    * dsname indicates the name of the data set.
    * volser indicates the volume serial number.
    * command indicates the command and its associated command parameters.
    * operation indicates the requested operation.
    * retcode indicates the return code.
    * reascode indicates the reason code.

 A following related message provides you with further information about the 
 failure. The two digits of the message number specified as nn, indicate the 
 retcode. The related message number also indicates the DFSMShsm function 
 processing when the failure has occurred, as shown on the following table.



  Table 2. Return Code Identifier
                           Function                          Message Group
                    Recovery/Recall                               ARC11nns
                   Space Management                               ARC12nns
                             Backup                               ARC13nns
          Aggregate Backup/Recovery                               ARC6nnns


 For example, if the related message is ARC1131I:

    * ARC1131I indicates that the recovery/recall function has failed. The nn 
 is 31 which is the retcode. See Table 3 in topic 2.1266 for the meaning of 
 retcode 31 or refer to message ARC1131I for expanded information.



 - So I look at ARC1199, where I find:

 2.787 ARC1199I

   ARC1199I ERROR DURING RECALL/RECOVERY

 Explanation: An error was detected while DFSMShsm was performing a recall or 
 recovery operation. The return and reason code are given in message ARC1001I. 
 The possible values for the reason code are:

 Reascode Meaning

 4
    A data set was requested to be reblocked and the accumulated record length 
 was greater than the DCBLRECL.

 8
    A direct access data set was targeted to a volume with a smaller track 
 capacity than the volume where the data set originally resided.

 12
    The DFSMShsm CDS record that describes the data set indicated a source 
 volume device type that is not supported by DFSMShsm.



 - Non sequitur AFAICS.  I the look in ARC Return Codes and Reason Codes  
 where I finally find:

  99             VBS data set RECOVER/RECALL attempted to incompatible 
 device.

 - Which is somewhat unlikely for a JCL dataset.

 - REAS=4764 is nowhere to find



 Regards,
 Thomas Berg
 _
 Thomas Berg   Specialist   A M   SWEDBANK

-- 
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: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

SV: Which manual for ECA* messages ?

That's obvious if You think before You write.  An outrageous requirement. 

 
Regards, 
Thomas Berg 
_ 
Thomas Berg   Specialist   A M   SWEDBANK 



 -Ursprungligt meddelande-
 Från: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] För Mike
 Schwab
 Skickat: den 27 oktober 2011 14:28
 Till: IBM-MAIN@bama.ua.edu
 Ämne: Re: Which manual for ECA* messages ?
 
 The reason code came from the EMC product.  You will have to look up
 that code in the EMC Manual.
 
   11/10/27 10:07:04 ECA1004E RECALL OF P950OBA.A.CNTL FAILED.  RETURN
 CODE: 4764.
   ARC1001I P950OBA.A.CNTL  RECALL FAILED, RC=0099, REAS=4764
 
 On Thu, Oct 27, 2011 at 6:16 AM, Thomas Berg thomas.b...@swedbank.se
 wrote:
  As we now have an all IBM policy it didn't occur to me that it could
 be a non-ibm message.
  I have looked for the ARC1001I message with the result as below...
 
  The whole error message (some line cutted at the end):
 
  ARC1020I DFSMSHSM IS RECALLING FROM DASD DSN=P950OBA.A.CNTL, YOU MAY
 CONTINUE T
  SSION BY PRESSING THE ATTENTION KEY
   11/10/27 10:07:04 ECA1004E RECALL OF P950OBA.A.CNTL FAILED.  RETURN
 CODE: 4764.
   ARC1010I USER REQUEST FOR A MIGRATED DATA SET FAILED.
   ARC1001I P950OBA.A.CNTL  RECALL FAILED, RC=0099, REAS=4764
   ARC1199I ERROR DURING RECALL/RECOVERY
   ***
 
  Whats more irritating is that when looking at ARC1001I, the reasoncode
 is not found in the manual.
  (z/OS V1R1.0 MVS System Messages, Vol 2 (ARC-ASA) - which is where the
 link from z/OS V1R13.0 DFSMShsm Diagnosis is pointing to.)
  That is, they say:
 
  2.671 ARC1001I
 
    ARC1001I {dsname | VOL=volser | command} operation FAILED, RC=retcode
           REAS=reascode
 
  Explanation: A DFSMShsm request has failed. The following describes the
 message variables:
 
     * dsname indicates the name of the data set.
     * volser indicates the volume serial number.
     * command indicates the command and its associated command
 parameters.
     * operation indicates the requested operation.
     * retcode indicates the return code.
     * reascode indicates the reason code.
 
  A following related message provides you with further information about
 the failure. The two digits of the message number specified as nn,
 indicate the retcode. The related message number also indicates the
 DFSMShsm function processing when the failure has occurred, as shown on
 the following table.
 
 
 
   Table 2. Return Code Identifier
                            Function                          Message
 Group
                     Recovery/Recall
 ARC11nns
                    Space Management
 ARC12nns
                              Backup
 ARC13nns
           Aggregate Backup/Recovery
 ARC6nnns
 
 
  For example, if the related message is ARC1131I:
 
     * ARC1131I indicates that the recovery/recall function has failed.
 The nn is 31 which is the retcode. See Table 3 in topic 2.1266 for the
 meaning of retcode 31 or refer to message ARC1131I for expanded
 information.
 
 
 
  - So I look at ARC1199, where I find:
 
  2.787 ARC1199I
 
    ARC1199I ERROR DURING RECALL/RECOVERY
 
  Explanation: An error was detected while DFSMShsm was performing a
 recall or recovery operation. The return and reason code are given in
 message ARC1001I. The possible values for the reason code are:
 
  Reascode Meaning
 
  4
     A data set was requested to be reblocked and the accumulated record
 length was greater than the DCBLRECL.
 
  8
     A direct access data set was targeted to a volume with a smaller
 track capacity than the volume where the data set originally resided.
 
  12
     The DFSMShsm CDS record that describes the data set indicated a
 source volume device type that is not supported by DFSMShsm.
 
 
 
  - Non sequitur AFAICS.  I the look in ARC Return Codes and Reason
 Codes  where I finally find:
 
   99             VBS data set RECOVER/RECALL attempted to incompatible
 device.
 
  - Which is somewhat unlikely for a JCL dataset.
 
  - REAS=4764 is nowhere to find
 
 
 
  Regards,
  Thomas Berg
  _
  Thomas Berg   Specialist   A M   SWEDBANK
 
 --
 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: 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: John McCarthy 1927-2011

http://www.latimes.com/news/nationworld/nation/la-me-john-mccarthy-20111
027,0,3450542.story?track=rss

--
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: Which manual for ECA* messages ?

ARC1001I P950OBA.A.CNTL  RECALL FAILED, RC=0099, REAS=4764


It appears you have some sort of DADSM error.  ISPF HELP INDEX topic D1
lists some common DYNALLOC errors.
While the 4764 is not specifically listed, many of the surrounding 47xx
errors are .

HTH,

snip
The whole error message (some line cutted at the end):

ARC1020I DFSMSHSM IS RECALLING FROM DASD DSN=P950OBA.A.CNTL, YOU MAY
CONTINUE T
SSION BY PRESSING THE ATTENTION KEY

 11/10/27 10:07:04 ECA1004E RECALL OF P950OBA.A.CNTL FAILED.  RETURN
CODE: 4764.
 ARC1010I USER REQUEST FOR A MIGRATED DATA SET FAILED.

 ARC1001I P950OBA.A.CNTL  RECALL FAILED, RC=0099, REAS=4764

 ARC1199I ERROR DURING RECALL/RECOVERY

 ***

/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

SV: Which manual for ECA* messages ?

Thanks, it's the space cowboys problem now. 

 
Regards, 
Thomas Berg 
_ 
Thomas Berg   Specialist   A M   SWEDBANK 





 -Ursprungligt meddelande-
 Från: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] För
 Staller, Allan
 Skickat: den 27 oktober 2011 14:36
 Till: IBM-MAIN@bama.ua.edu
 Ämne: Re: Which manual for ECA* messages ?
 
 ARC1001I P950OBA.A.CNTL  RECALL FAILED, RC=0099, REAS=4764
 
 
 It appears you have some sort of DADSM error.  ISPF HELP INDEX topic D1
 lists some common DYNALLOC errors.
 While the 4764 is not specifically listed, many of the surrounding 47xx
 errors are .
 
 HTH,
 
 snip
 The whole error message (some line cutted at the end):
 
 ARC1020I DFSMSHSM IS RECALLING FROM DASD DSN=P950OBA.A.CNTL, YOU MAY
 CONTINUE T
 SSION BY PRESSING THE ATTENTION KEY
 
  11/10/27 10:07:04 ECA1004E RECALL OF P950OBA.A.CNTL FAILED.  RETURN
 CODE: 4764.
  ARC1010I USER REQUEST FOR A MIGRATED DATA SET FAILED.
 
  ARC1001I P950OBA.A.CNTL  RECALL FAILED, RC=0099, REAS=4764
 
  ARC1199I ERROR DURING RECALL/RECOVERY
 
  ***
 
 /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

--
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: HFS sharing and rolling product upgrades

2011-10-27 Thread Veilleux, Jon L

We use symbolic links extensively for this purpose. In the configuration files 
for each platform we put a path statement with the platform name in it:
/CICS/platform1
/CICS/platform2

We create a directory /CICS/ 
Then we create symbolic links in that directory for each platform that points 
to the CICS release to use for that platform
/CICS/platform1  /CICSVxRy
/CICS/platform2  /CICSVqRz

We mount the zFSes for each release on a different directory

/CICSVxRy  has CICS.VxRy.ZFS
/CICSVqRz has CICS.VqRz.ZFS

When we want to change the release we only have to change the directory that 
the symbolic link points to.

If you want to discuss you can contact me off list.
Thanks,
Jon 



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
McKown, John
Sent: Thursday, October 27, 2011 8:24 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: HFS sharing and rolling product upgrades

 -Original Message-
 From: IBM Mainframe Discussion List
 [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Nofar Spalter
 Sent: Thursday, October 27, 2011 3:19 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: HFS sharing and rolling product upgrades
 
 Hello,
 How do you gradually roll changes to CICS, MQ and DB2 versions that 
 change these products' HFS dataset one system at a time?
 We currently share our BPXPRMxx member between two LPARs running in 
 Sysplex with SYSPLEX(YES).
 Our CICS guys want to upgrade the CICS version one LPAR at a time (a 
 reasonable request), and that means that they want to change the CICS 
 HFS pointed to by the
 /usr/lpp/cicsts/cicsts32 mount point, but only on one system.
 In other words they want to do something like this:
 
 BPXPRMxx:
 MOUNT FILESYSTEM('OMVS.CICSVER.CICS32')  
   MOUNTPOINT('/usr/lpp/cicsts/cicsts32')   
   TYPE(HFS)  MODE(READ) AUTOMOVE(INCLUDE,*)
 
 Where CICSVER resolves to RSU1109 on SY1 LPAR and to RSU1110 on SY2 
 LPAR.
 
 I don't think this is possible, but I do want to provide them the 
 option to roll the change one LPAR at a time, prefferably without 
 making changes to CICS.
 
 Is there a way where we can support that?
 
 Regards,
 Nofar Spalter

Have you looked at  considered: Mounting file systems using symbolic links?

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/bpxzb2b0/7.14

The commands to use would be something like:

cd /usr/lpp/cicsts
mkdir RSU1109
mkdir RSU1101
ln -s '$SYSSYMR/CICSVER' cicsts32


Now, I don't use UNIX sysplex filesystem sharing, but I think you could do a 
mount similar to:

 MOUNT FILESYSTEM('OMVS.CICSVER.CICS32')  
   MOUNTPOINT('/usr/lpp/cicsts/CICSVER.')   
   TYPE(HFS)  MODE(READ) AUTOMOVE(INCLUDE,*)

Question: Is a period missing? Wouldn't you need 'OMVS.CICSVER..CICS32'  ??? 
Or was it a typo on your part?

--
John McKown
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

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

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

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

Re: GDG

2011-10-27 Thread John Eells


Ted MacNEIL wrote:

I'm not an SMS guy, but I believe that any data set managed by SMS will get 
created with implicit EOF.


Unless things have changed, yes.


Things have changed (smile).  Now it's not only for SMS-managed data sets:

In z/OS V1.11, DFSMSdfp processing is changed to indicate end-of-file 
(EOF) during the allocation of data sets on DASD that are not 
SMS-managed and have either sequential or an undefined data set 
organization. This makes this processing for both SMS-managed and 
non-SMS-managed data sets consistent, to make it unnecessary to open 
data sets solely to indicate EOF, and to help prevent programs from 
reading old data when a data set is read immediately after being allocated.


--
John Eells
z/OS Technical Marketing
IBM Poughkeepsie
ee...@us.ibm.com

--
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: HFS sharing and rolling product upgrades

2011-10-27 Thread Mary Anne Matyaz

Lizette, I see where that is confusing. I should have taken out the sysname 
stuff and just answered his question with the CICSLVL substitution.  

We do have a sysplex root, but I don't think that is what makes this work. In 
your case, I think it would work if you had 
our symbolic in /SYSR51/usr/lpp/cicsts  which is $SYSNAME/cicsts. 

MA 

--
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: Customization MPFLSTxx

2011-10-27 Thread Jorge Garcia

It's solved.

We executed the rutine AOCFILT in AUTOUSER system automation member when the 
msgid IEF403I comes. This routine blocks the msgid and we can't view the msgid 
in the syslog. We've removed the rutine in AUTOUSER member and works fine.

Thanks 

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

Re: HFS sharing and rolling product upgrades

2011-10-27 Thread McKown, John

If you run multiple releases of CICS on a single image, you might want to 
change that slightly:

cd /usr/lpp/cicsts
mkdir cicsts32-RSU1109
mkdir cicsts32-RSU1110
mkdir cicsts41-RSU1109 #assuming there is an RSU1109 for CICS/TS 4.1
mkdir cicsts41-RSU1110 #similar to above
ln -s '$SYSSYMR/cicsts32-CICSVER.' cicsts32
ln -s '$SYSSYMR/cicsts41-CICSVER.' cicsts41

What might be even more interesting would be if the 
release-to-use-on-this-image of CICS were in CICVER and the RSU for that 
release was in CICSRSU. Now, if you run multiple versions/RSUs on one image, 
make some more static symbols. One for the desired RSU for each CICS release. 
Examples: RSUCV32 and RSUCV41. 

mkdir CICSTS32-RSU1109
mkdir CICSTS32-RSU1110
mkdir CICSTS41-RSU1109
mkdir CICSTS41-RSU1110
ln -s '$SYSSYMR/CICSVER.-CICSRSU.' local
ln -s '$SYSSYMR/CICSTS32-RSUCV32' cicsts32
ln -s '$SYSSYMR/CICSTS41-RSUCV41' cicsts41

and then use /usr/lpp/cicsts/local instead of /usr/lpp/cicsts/cicsts32. That 
gets you the recommended CICS version and RSU for this z/OS image. If you use 
/usr/lpp/cicsts/cicsts32, you get the desired RSU for release 3.2 on this z/OS 
image. If you use /usr/lpp/cicsts/cicsts41, you get the desired RSU for release 
4.1 on this z/OS image.

In BPXPRMxx:

MOUNT FILESYSTEM('OMVS.CICSRSU..CICSVER.')
  MOUNTPOINT('/usr/lpp/cicsts/CICSVER.-CICSRSU.')
  TYPE(HFS)  MODE(READ) AUTOMOVE(INCLUDE,*)

If you wanted to, you could simply have one MOUNT for every existant CICS-RSU 
that you have

MOUNT FILESYSTEM('OMVS.RSU1109.CICSTS32')
  MOUNTPOINT('/usr/lpp/cicsts/CICSTS32-RSU1109')
  TYPE(HFS) MODE(READ) AUTOMOVE(INCLUDE,*)

and duplicate the above for each CICS/RSU combination you have.

In IEASYMxx:

SYMDEF(CICSVER='CICSTS32')
SYMDEF(CICSRSU='RSU1110')
SYMDEF(RSUCV32='RSU1110')
SYMDEF(RSUCV41='RSU1109')

Now, combine this with some nifty catalog SYMBOLICRELATE type ALIASes, you 
could do:

DEFINE ALIAS(NAME('CICSTS.rest.of.dsn') -
   SYMBOLICRELATE('CICSVER..rest.of.dsn'))

But I hear your complaint. Oh, damn! I have to do a LISTCAT and then code up 
all those DEFINEs. What a PITA! I agree. So why bother? Do it the easy way. 
Install Dovetailed Technologies set of free to download and use Co:Z 
products. They are excellent and did I mention you can download and use them 
FOR NO COST or signed license? You don't even need to fill out a form to be 
approved. Did you know that the JZOS currently distributed by IBM with their 
Java was originally from Dovetailed? Brilliant people. Nice people, too! (Hi, 
Kirk!) So, once you've installed at least the dataset pipes portion of Co:Z, 
you can run a simple UNIX shell script to create the DEFINE ALIAS commands for 
you!

catsearch cicsts*.** |\
cut -d '.' -f 2- |\
sort -u |\
while read i;do
echo  DEFINE ALIAS(NAME(CICSTS.$i) -
echoSYMBOLICRELATE(CICSVER..$i));
doneidcams.sysin
cat idcams.jcl EOJ
//JOBNAME JOB (ACCT),PGMR,CLASS=A,MSGCLASS=H
//IDCAMS EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
EOJ
cat null.jcl EOJ
//
EOJ
cat idcams.jcl idcams.sysin null.jcl | submit -j
#end of script

Feel free to use TSO and REXX or ISPF EDIT to do the same. But I doubt that it 
will be quite as easy as I've shown above. That took me about 5 minutes to 
write an debug. Repeat the above script for each CICS release high level 
qualifier, if they don't all start with the characters 'cicsts...' . If you 
repeat the script, you might (most likely will) get some duplicate aliases. But 
that should be OK. You could probably work the RSU into the DSN similar to what 
was done in the UNIX aliases.


  

--
John McKown 
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

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

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

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

Re: GDG

2011-10-27 Thread Mark Zelden

On Thu, 27 Oct 2011 09:09:22 -0400, John Eells ee...@us.ibm.com wrote:

Ted MacNEIL wrote:
 I'm not an SMS guy, but I believe that any data set managed by SMS will get 
 created with implicit EOF.

 Unless things have changed, yes.

Things have changed (smile).  Now it's not only for SMS-managed data sets:

In z/OS V1.11, DFSMSdfp processing is changed to indicate end-of-file
(EOF) during the allocation of data sets on DASD that are not
SMS-managed and have either sequential or an undefined data set
organization. This makes this processing for both SMS-managed and
non-SMS-managed data sets consistent, to make it unnecessary to open
data sets solely to indicate EOF, and to help prevent programs from
reading old data when a data set is read immediately after being allocated.

--

Thanks John!   I was going to post something about that but couldn't remember
if it was z/OS 1.12 or z/OS 1.13 and was checking announcements and 
a couple of your what's new SHARE sessions.  No wonder I couldn't find it
since it was z/OS 1.11.   

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS   
mailto:m...@mzelden.com
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html 
Systems Programming expert at http://expertanswercenter.techtarget.com/

--
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: z/OS Control block question

2011-10-27 Thread Webster, Chris

The tcb-tiot chain has worked well for a long time but GETDSAB may provide a 
longer term solution for new code if the OP is only trying to access the 
current TIOT for the job step they are running under (see XTIOT).

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

...chris.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Walt Farrell
Sent: Monday, October 24, 2011 10:22 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: z/OS Control block question

On Mon, 24 Oct 2011 10:03:58 -0500, Wayne Driscoll wdri...@us.ibm.com wrote:

Walt,
Thanks, I missed an important qualifier what I should have said was all
non-job step TCB's under a given JSTCB will point to the same TIOT.

No, that still doesn't work, Wayne, as it still has that ambiguous ues of 
under. I think you really do need to say 'with the same TCBJSTCB rather than 
under a given JSTCB.

Consider, for example, the case where you have // EXEC PGM=A where A, running 
authorized, attaches B and C both as jobstep TCBs, and with separate TIOTs.

B then attaches non-jobstep TCBs B1 and B2, which share B's TIOT.

C attaches non-jobstep TCBs C1 and C2, which share C's TIOT.

In the sense of subtasking, all of B1, B2, C1, and C2 are under A, but none 
share A's TIOT.

-- 
Walt

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

Re: GDG

On Thu, 27 Oct 2011 09:09:22 -0400, John Eells wrote:

Ted MacNEIL wrote:
 I'm not an SMS guy, but I believe that any data set managed by SMS will get 
 created with implicit EOF.

 Unless things have changed, yes.

Things have changed (smile).  Now it's not only for SMS-managed data sets:

In z/OS V1.11, DFSMSdfp processing is changed to indicate end-of-file
(EOF) during the allocation of data sets on DASD that are not

indicate strikes me as more notionally passive than what I had
understood the operation to be.  I had understood that it actually
writes the EOF record.  (Not, of course, for primary allocation 0
-- or is this why you used indicate rather than write?)

SMS-managed and have either sequential or an undefined data set
organization. This makes this processing for both SMS-managed and

Hooray for undefined.  It rebuts the argument made by those of
limited understanding that so writing an EOF might damage PDS, BDAM,
or VSAM data sets.  In fact the EOF can be written regardless of
DSORG, provided only that the operations were performed in the
correct sequence.  Omitting the EOF for known non-sequential DSORG
seems to be merely a performance consideration.

-- gil

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

DFHSM questions

2011-10-27 Thread Jousma, David

All,

 

Quick question(s).  In a multi-image environment, where all systems are
part of the same sysplex(some systems production, some DEV, but all in
the same sysplex), and all DASD is shared with all systems, is there any
pro's or con's to having one big HSM plex?  Or having multiple HSM plex?
Are there any restrictions?  Can dataset recalls occur across HSMplex's?

 

We currently are not using HSM, and are investigating a conversion.
Sorry for some of these most likely simplistic questions, I do not have
a lot of HSM experience.

 

_

Dave Jousma

Assistant Vice President, Mainframe Services

david.jou...@53.com

1830 East Paris, Grand Rapids, MI  49546 MD RSCB2H

p 616.653.8429

f 616.653.2717

 

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




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

Re: question about tcpip

2011-10-27 Thread Chris Mason

Kurt

As I sent off my previous post, I noticed that I'd overlooked your last 
sentence. But as it was going to need a bit of 
explanation, I had to put it off for a while.

 Can anyone ... ?

I expect many can. Perhaps what you wanted to say was Would anyone (be so kind 
as to / care to) ...?.

 ...  give me a brief explanation when and how this file is used?

-

What I'm about to say isn't necessarily 100% true but it must be close and it's 
my interpretation.

Somewhere back in the days that the sockets API was being designed there was a 
decision that no number need be specified without being obtained by a lookup 
from a token.

This is an obvious provision in the case of the destination IP address since it 
is much better to refer to the name of an IP node rather than always having to 
know the address of at least one interface on the node.

It's now important to know that there is a structure which needs to be 
populated with two key numbers before it is used. This is the structure used by 
the CONNECT() call of a client program when using the client-server concept.

The first number is the destination IP address and the second number is the 
port number which represents the service provided by the server program.

-

You may well be aware that, when using a TELNET or FTP client, you can specify 
either a name, a sequence of tokens separated by dots, or the IP address of an 
interface. Either is valid as a way to specify the destination in the same 
location following the command.

In the case of your browser, you can specify either a name or an IP address 
between the double-slash and the first single-slash, if any, in the URL 
character string.

There is some standard logic wrapped around sockets API calls which takes the 
character string which represents the destination and first tries to treat it 
as a dotted decimal IP address using the INET_ADDR() call. The INET_ADDR() 
call, which is supported purely by logic without any external references, 
either returns an internal version of the IP address or zero for failure.

If failure is noted, the next call is the GETHOSTBYADDR() call which tries to 
convert the character string to, logically, a list of IP addresses. Each of the 
returned IP address - and, of course, there may only be one - is tried in turn 
in order to create the TCP connection.

What happens with the GETHOSTBYADDR() call depends on how the resolver is 
configured. It could be a lookup in data sets available on the node supporting 
the client program or it could involve IP traffic to a name server node.

-

Before any CONNECT() calls can be made by a client program, the port number 
needs to be determined. Also, in the initialisation of the *server* program, 
the port number at which the service is to be provided needs to be determined 
and it is set in an identical structure to the one mentioned above and used in 
a BIND() call. This is where the GETSERVBYNAME() call comes in.

The token which represents the application, the service, is converted to a port 
number. Thus ftp is converted to 21 and telnet is converted to 23 - and 
http is converted to 80 - if the usual transformations are defined in the 
generically named ETC.SERVICES data set, in your case TCPIP.ETC.SERVICES but on 
my PC, and possibly on your PC, in the following:

C:\WINDOWS\system32\drivers\etc\services

Note that the lookup needs to be qualified in the call by the transport 
protocol to be used, tcp or udp.

-

Note also that everything I have explained above is what happens in the case of 
IPv4. One of these days, I'm going to have to work out the IPv6 equivalent - 
or, more precisely, the joint IPv4-IPv6 equivalent.

-

Just to round the topic off, there is the generically named ETC.PROTO data set 
which could be used by a program, client or server, in order to determine the 
protocol number to be used in a SOCKET() call. However, it is usual to specify 
a type code in the SOCKET() call and let the system determine whether, for 
type stream, TCP should be used or, for type datagram, UDP should be used.

Probably you can find this data set on you PC under the following path:

C:\WINDOWS\system32\drivers\etc\protocol

-

Incidentally, if you don't really understand for what your TCPIP.ETC.SERVICES 
file is used, I'm rather surprised you are contemplating changing it!

-

Chris Mason

On Wed, 26 Oct 2011 11:14:53 -0700, Kurt Eastwood kurtms...@yahoo.com wrote:

Hello,

Thanks to any and all who consider my question.

Can  the TCPIP.ETC.SERVICES file be changed at will or are there special 
considerations for changing this file , such as task usage, back up, etc that 
must be taken into account before changing this file?

Can anyone give me a brief explanation when and how this file is used?

Thanks for any help anyone is willing to offer.

Kurt

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

Please Help IBM Fix 'Broken' PDSE Problems

2011-10-27 Thread Edward Jaffe

We have been suffering for a long time with large PDSEs on EAVs spontaneously 
'breaking' every couple/few weeks or months.


In June of last year, I opened PMR 31744,227,000 where I reported S0F4 RC24 
failures in IGWDACND+1AFA at z/OS 1.11 base level. The recommended maintenance 
was to apply the PTF for OA30338. That did not help.


Since then we have been hoping someone else would discover and fix the real, 
underlying problem. [Wishful thinking.] It continued unchanged in z/OS 1.12. 
When we saw the problem again under z/OS 1.13, I opened PMR 57302,227,000 to 
report S0F4 RC24 failures in IGWBITX1+10F8.


This time the service folks pointed me to APAR OA37090. The PDSE development 
team opened this APAR as follow up maintenance to OA30338. The newer APAR, like 
OA30338, is an attempt to addresses errors associated with PDSE VDF index page 
processing. The APAR error description reads:


DIAGNOSTIC CODE TO TRAP WRITING OUT BAD PDSE DIRECTORY ENTRIES

Clearly IBM is attempting to improve PDSE RAS to catch a corruption issue when 
it actually occurs. Without such logic, it's the job that next uses the PDSE 
that gets abended trying to use the broken PDSE. The APAR also resolves a code 
issue that under certain circumstances allowed a page buffer to be discarded twice.


We have not seen more broken PDSEs since applying this service, but it's only 
been two weeks since the IPL that made it active.


In any case, I'd like to suggest people install this service in the hope that it 
will help YOU avoid the hassle of broken PDSEs and/or better enable the z/OS 
community to assist IBM in tracking down some of these nagging PDSE problems.


PDSEs are required more and more every day. The sooner we get these issues 
fixed, the better off we will all be.


--
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: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Delete FMID

2011-10-27 Thread Matthew Stitt

Trying to install a new product and I have run into a situation where another 
FMID provided Linkedit information for a module which is different than the new 
product.  I need to either remove the old FMID (preferable) or have the new 
linkedit information used.  The old FMID is Applied, but not accepted.  I 
probably could modify the new product MCS to have it delete the old stuff, but 
I am confused as what the control statement should look like?

This is on Z/OS V1R12.

Thanks.

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

Re: Delete FMID

2011-10-27 Thread Mark Jacobs


On 10/27/11 12:47, Matthew Stitt wrote:

Trying to install a new product and I have run into a situation where another 
FMID provided Linkedit information for a module which is different than the new 
product.  I need to either remove the old FMID (preferable) or have the new 
linkedit information used.  The old FMID is Applied, but not accepted.  I 
probably could modify the new product MCS to have it delete the old stuff, but 
I am confused as what the control statement should look like?

This is on Z/OS V1R12.

Thanks.

   


Something like this should work.

//STEP1   EXEC ZOS112R
//SMPPTFIN DD *
++FUNCTION(DELFMID) .
++VER(Z038) DELETE(JWRE33I).
/*
//SYSIN   DD *
  SET BDY(GLOBAL).
  RECEIVE SYSMODS.
  SET BDY(MVST100).
 APPLY S(DELFMID) BYPASS(ID) REDO.
  SET BDY(MVSD100).
 ACCEPT S(DELFMID) BYPASS(ID) REDO.


--
Mark Jacobs
Time Customer Service
Tampa, FL


One of life's greatest mysteries is how the boy who
wasn't good enough to marry your daughter can be the
father of the smartest grandchild in the world.

Yiddish Proverb

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

Re: DFHSM questions

I would go with 1 HSMplex unless the technopolitical factors
contraindicate! YMMV.

Short version:
1) Multiple HSMplexes are allowed. Depend's on your needs. (I have no
experience w/multiple HSMPLEX's). Probably also depends on your GRS
configuration, catalog sharing,. If you do run multiple HSMplexes,
each member of the HSMplex must share the associated control datasets.
2) Each image will run a copy of DFHSM. At least 1 image will run
another task (DFHSMP). DFHSM tasks handle command tasks i.e. individual
dataset migration/recall. DFHSMP handles automatic (HSM scheduled)
tasks. i.e. backup, space management, etc

See
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2I480/CCON
TENTS?SHELF=DGT2BK90DN=SC35-0418-10DT=20090605105438

Section 2 Customizing DFHSM
Topic 2.1 HSM in a SYSPLEX environment.

HTH,


snip
Quick question(s).  In a multi-image environment, where all systems are
part of the same sysplex(some systems production, some DEV, but all in
the same sysplex), and all DASD is shared with all systems, is there any
pro's or con's to having one big HSM plex?  Or having multiple HSM plex?
Are there any restrictions?  Can dataset recalls occur across HSMplex's?
/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: DFHSM questions

2011-10-27 Thread Jousma, David

Allan,

technopolitical is the exact reason for asking.   I am trying to take
political out of it, to get down to the technical reasons for single vs
multiple.

Single seems the logical direction to go.  

_
Dave Jousma
Assistant Vice President, Mainframe Services
david.jou...@53.com
1830 East Paris, Grand Rapids, MI  49546 MD RSCB2H
p 616.653.8429
f 616.653.2717


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Staller, Allan
Sent: Thursday, October 27, 2011 1:30 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: DFHSM questions

I would go with 1 HSMplex unless the technopolitical factors
contraindicate! YMMV.

Short version:
1) Multiple HSMplexes are allowed. Depend's on your needs. (I have no
experience w/multiple HSMPLEX's). Probably also depends on your GRS
configuration, catalog sharing,. If you do run multiple HSMplexes,
each member of the HSMplex must share the associated control datasets.
2) Each image will run a copy of DFHSM. At least 1 image will run
another task (DFHSMP). DFHSM tasks handle command tasks i.e. individual
dataset migration/recall. DFHSMP handles automatic (HSM scheduled)
tasks. i.e. backup, space management, etc

See
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2I480/CCON
TENTS?SHELF=DGT2BK90DN=SC35-0418-10DT=20090605105438

Section 2 Customizing DFHSM
Topic 2.1 HSM in a SYSPLEX environment.

HTH,


snip
Quick question(s).  In a multi-image environment, where all systems are
part of the same sysplex(some systems production, some DEV, but all in
the same sysplex), and all DASD is shared with all systems, is there any
pro's or con's to having one big HSM plex?  Or having multiple HSM plex?
Are there any restrictions?  Can dataset recalls occur across HSMplex's?
/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

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

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

Re: DFHSM questions

agreed

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

snip

technopolitical is the exact reason for asking.   I am trying to take
political out of it, to get down to the technical reasons for single vs
multiple.

Single seems the logical direction to go.  
/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

RES: Customization MPFLSTxx

2011-10-27 Thread ITURIEL DO NASCIMENTO NETO

Jorge,

What specification do you have in consolxx ?
You have to specify MN JOBNAME,T

Atenciosamente / Regards / Saludos

Ituriel do Nascimento Neto
BANCO BRADESCO S.A.
4254 / DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: +55 11 4197-2021 R: 22021
Fax: +55 11 4197-2814

-Mensagem original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] Em nome de 
Jorge Garcia
Enviada em: quarta-feira, 26 de outubro de 2011 17:25
Para: IBM-MAIN@bama.ua.edu
Assunto: Customization MPFLSTxx

Hello:

 We have a problem with the MPFLSTxx member customization. We want msgid 
IEF403I appears in SYSLOG. At the moment appears only in Netview log. We add 
these parameters in our MPFLSTxx member:

.DEFAULT,AUTO(YES),SUP(NO),RETAIN(YES)
IEF402I /*JJJ FAILED IN ADDRESS SPACE X
SYSTEM ABEND SXXX REASON - RC
NOTIFY OPER OF FAILURE /*
IEF403I /*JJJ-STARTED */
IEF404I /*JJJ-ENDED */

We enter a SET MPF and then a D MPF command. The new configuration is active:

D MPF
IEE677I 20.40.31 MPF DISPLAY 961
MESSAGE ID -MPF  SUPPRESS RETAIN AUTO  TOKEN  EXIT
.NO_ENTRY  -00   NO   YES  YES
IEF402I   -00   NO   YES  YES
IEF403I   -00   NOYES  YES
IEF404I   -00   NOYES  YES
GENERAL WTO USER EXIT (IEAVMXIT) INACTIVE
SUBSYSTEMS RECEIVING FOREIGN MESSAGES AND DOMS:
*ALL

But the message doesn't appear in SYSLOG:

$HASP373 IEFBR141 STARTED - INIT 8- CLASS E - SYS VSIS
-  --TIMINGS (MINS.)--
  -PAGING COUNTS
-STEPNAME PROCSTEPRC   EXCP   CONNTCBSRB  CLOCK   SERV
WORKLOAD  PAGE  SWAP   VIO SWAPS
-ALLOC1FLUSH  0  0.00.00 .0  0
BATCH0 0 0 0
-IEFBR141 ENDED.  NAME-SISTEMAS TOTAL TCB CPU TIME=.00
TOTAL ELAPSED TIME=.0
$HASP395 IEFBR141 ENDED

If we change SUP(NO)  by SUP(YES) parameter the msgid appears:

D MPF
IEE677I 20.42.03 MPF DISPLAY 981
MESSAGE ID -MPF  SUPPRESS RETAIN AUTO  TOKEN  EXIT
.NO_ENTRY  -00 NO   YESYES
IEF402I  -00  YES  YESYES
IEF403I  -00  YES  YESYES
IEF404I  -00  YES  YESYES

$HASP373 IEFBR141 STARTED - INIT 8- CLASS E - SYS VSIS
IEF403I IEFBR141 - STARTED - TIME=20.42.19
-  --TIMINGS (MINS.)--
  -PAGING COUNTS
-STEPNAME PROCSTEPRC   EXCP   CONNTCBSRB  CLOCK   SERV
WORKLOAD  PAGE  SWAP   VIO SWAPS
-ALLOC1FLUSH  0  0.00.00 .0  0
BATCH0 0 0 0
-IEFBR141 ENDED.  NAME-SISTEMAS TOTAL TCB CPU TIME=.00
TOTAL ELAPSED TIME=.0
$HASP395 IEFBR141 ENDED

We've reviewed the CONSOLxx member too and we don't find anything wrong.

Regards

Jorge García Juanino
Técnico de Sistemas Z/Os
DGTP Departamento de Técnica de Sistemas
MAPFRE
Gobelas 47 - 49 2ª C y D
28023 Madrid
Tfno: 91 581 27 34/ 618 33 35 59
Fax: 91 581 24 01
jgarc...@mapfre.com



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

AVISO LEGAL br...Esta mensagem é destinada exclusivamente para a(s) pessoa(s) 
a quem é dirigida, podendo conter informação confidencial e/ou legalmente 
privilegiada. Se você não for destinatário desta mensagem, desde já fica 
notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de 
qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. 
Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este 
E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de 
dados, registros ou sistema de controle. Fica desprovida de eficácia e validade 
a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha 
poderes de representação. 
LEGAL ADVICEbr...This message is exclusively destined for the people to whom 
it is directed, and it can bear private and/or legally exceptional information. 
If you are not addressee of this message, since now you are advised to not 
release, copy, distribute, check or, otherwise, use the information contained 
in this message, because it is illegal. If you received this message by 
mistake, we ask you to return this email, making possible, as soon as possible, 
the elimination of its contents of your database, registrations or controls 
system. The message that bears any mandatory links, issued by someone who has 
no representation powers, shall be null or void.

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

Re: maxsystem in a sysplex - belated heads-up

2011-10-27 Thread Jerry Whitteridge

Barbara - I've asked our account team to add us as concurring with the 
requirement and to be added to the Interested Parties list.

Jerry Whitteridge
Design Engineer
Safeway Inc.
925 951 4184

If you feel in control
you just aren't going fast enough.


 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
 Behalf Of Barbara Nitz
 Sent: Wednesday, October 26, 2011 9:08 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: maxsystem in a sysplex - belated heads-up
 
 To finish this thread: There is now marketing requirement
 MR1026112735 that describes the need for a cleanup utility and asks
 for a way to really re-initialize the sysplex on the ixc405 message.
 Barbara
 
 
 --
 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


Email Firewall made the following annotations.
--

Warning: 
All e-mail sent to this address will be received by the corporate e-mail 
system, and is subject to archival and review by someone other than the 
recipient.  This e-mail may contain proprietary information and is intended 
only for the use of the intended recipient(s).  If the reader of this message 
is not the intended recipient(s), you are notified that you have received this 
message in error and that any review, dissemination, distribution or copying of 
this message is strictly prohibited.  If you have received this message in 
error, please notify the sender immediately.   
 
==

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

Filling in the holes

2011-10-27 Thread glen herrmannsfeldt

There has been an ongoing discussion on comp.lang.fortran on the
initialization of variables, including questions about OS/360 and
its compilers.

As I understand it, Fortran variables, and DS in assembler, 
generate holes in the object program (no TXT record for that
position), and are filled in either by the linkage editor or
program fetch.

I believe that early OS/360 versions left whatever happened to
be there, either in the linkage editor buffer or, for program
fetch, in that memory location.  At some time later, possibly
for security reasons, this was changed to initialize to zero,
or maybe something else (such as X'81').

The actual question is: when was this change made and which
programs (compilers, linkage editors, program fetch) were
changed?

-- glen

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

Re: HSM Journal dataset is almost full

2011-10-27 Thread Uriel Carrasquilla

Walter,
thank you so much for your help.
Regards,
Uriel

From: IBM Mainframe Discussion List [IBM-MAIN@bama.ua.edu] on behalf of Walter 
Marguccio [walter_marguc...@yahoo.com]
Sent: Thursday, October 27, 2011 4:15 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: HSM Journal dataset is almost full

 From: Uriel Carrasquilla uriel.carrasqui...@mail.mcgill.ca

 Subject: Re: HSM Journal dataset is almost full

 If I was to increase the size of the HSM1.JRNL dataset, what would be the 
 best practice?

I would do what the hsm Storage Admin Guide suggest under moving the 
Journal :

1. Put DFSMShsm in emergency mode. SETSYS EMERGENCY
2. Issue the CONTROLDATASETS parameter of the BACKVOL command to back up the
control and journal data sets.BACKVOL CONTROLDATASETS
3. Stop DFSMShsm. F DFSMSHSM,STOP
4. Delete the old journal data set
5. Allocate a new journal data set on a different DASD device.
6. Start DFSMShsm. S DFSMSHSM

Obviously, I'd allocate a much bigger journal at step 5.

HTH
Walter Marguccio
z/OS Systems Programmer
BELENUS LOB Informatic GmbH
Munich - Germany

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

As IBM CEO, Ginni Rometty will bring some Midwestern charm

2011-10-27 Thread Ed Gould

With Virginia Ginni Rometty, the newly named CEO to succeed Sam Palmisano at
IBM Corp., the business machines company is likely to see a little more in
Midwestern charm.
Ms. Rometty is a Chicago native and graduate of Northwestern University, where
she serves as a trustee.
I wrote about her more than a year ago, when she was named a possible contender
for the top job.
Ms. Rometty, who has been leading IBM's global business services, previously
oversaw the consulting arm of PricewaterhouseCoopers, which was acquired by IBM
in 2002. Her job was to attract big customers as well as redesign and run the
company's human resources and finance businesses — key departments for IBM.
“Ginni Rometty combines performance and charisma,” said George F. Colony,
chairman of Forrester Research, in a New York Times story about her earning the
CEO job. “She orchestrated a massive charm campaign to bring the
PricewaterhouseCoopers people into the fold. That was the trial by fire for
her.”
More recently, Ms. Rometty is credited with leading the growth and development
of IBM's huge services business.
Time magazine noted in 2002 that her vast Rolodex and industry expertise
would make her a force at the company.
And maybe her skills in scuba diving — her favorite sport — came into play,
too, the magazine said, quoting Ms. Rometty as saying, It's 98% calm and 2%
terror.

Read
more: http://www.chicagobusiness.com/article/20111026/BLOGS03/111029828/as-ibm-ceo-ginni-rometty-will-bring-some-midwestern-charm#ixzz1c0tNKjjz

(fluff piece on Rometty)

Re: Filling in the holes

2011-10-27 Thread Ed Gould

Glen:

I vaguely remember in FORTRAN 4 (MFT 19.6?) that it was a DS and not 
initialized.
This was around 1970ish. Fortran G1 AFAIR did so as well. That had to been 
around 1978ish .
Ed



- Original Message -
From: glen herrmannsfeldt g...@ugcs.caltech.edu
To: IBM-MAIN@bama.ua.edu
Cc: 
Sent: Thursday, October 27, 2011 2:20 PM
Subject: Filling in the holes

There has been an ongoing discussion on comp.lang.fortran on the
initialization of variables, including questions about OS/360 and
its compilers.

As I understand it, Fortran variables, and DS in assembler, 
generate holes in the object program (no TXT record for that
position), and are filled in either by the linkage editor or
program fetch.

I believe that early OS/360 versions left whatever happened to
be there, either in the linkage editor buffer or, for program
fetch, in that memory location.  At some time later, possibly
for security reasons, this was changed to initialize to zero,
or maybe something else (such as X'81').

The actual question is: when was this change made and which
programs (compilers, linkage editors, program fetch) were
changed?

-- glen

--
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: Please Help IBM Fix 'Broken' PDSE Problems

2011-10-27 Thread Linda Mooney

Hi Ed, 



Tha nk you for the heads up on this problem.  Has this problem occurred ONLY on 
EAVs? 



I am in the in the Modify activity of the ServerPac install for 1.12  and I 
will look into the APAR you mentioned. 



U p time in gereral  is a huge thing for us.  I am up now for 18 months 
straight on a production monoplex .  Our law enforcement customers really like 
that.  So, considering the issues you have seen with PDSe would you think it 
warranted to, in ServerPac, change those datasets that can be changed back to 
PDS instead of PDSE?  Monoplex LPAR, no PAV or EAV.  



Thanks, 

Linda 

- Original Message -


From: Edward Jaffe edja...@phoenixsoftware.com 
To: IBM-MAIN@bama.ua.edu 
Sent: Thursday, October 27, 2011 9:41:23 AM 
Subject: Please Help IBM Fix 'Broken' PDSE Problems 

We have been suffering for a long time with large PDSEs on EAVs spontaneously 
'breaking' every couple/few weeks or months. 

In June of last year, I opened PMR 31744,227,000 where I reported S0F4 RC24 
failures in IGWDACND+1AFA at z/OS 1.11 base level. The recommended maintenance 
was to apply the PTF for OA30338. That did not help. 

Since then we have been hoping someone else would discover and fix the real, 
underlying problem. [Wishful thinking.] It continued unchanged in z/OS 1.12. 
When we saw the problem again under z/OS 1.13, I opened PMR 57302,227,000 to 
report S0F4 RC24 failures in IGWBITX1+10F8. 

This time the service folks pointed me to APAR OA37090. The PDSE development 
team opened this APAR as follow up maintenance to OA30338. The newer APAR, like 
OA30338, is an attempt to addresses errors associated with PDSE VDF index page 
processing. The APAR error description reads: 

DIAGNOSTIC CODE TO TRAP WRITING OUT BAD PDSE DIRECTORY ENTRIES 

Clearly IBM is attempting to improve PDSE RAS to catch a corruption issue when 
it actually occurs. Without such logic, it's the job that next uses the PDSE 
that gets abended trying to use the broken PDSE. The APAR also resolves a code 
issue that under certain circumstances allowed a page buffer to be discarded 
twice. 

We have not seen more broken PDSEs since applying this service, but it's only 
been two weeks since the IPL that made it active. 

In any case, I'd like to suggest people install this service in the hope that 
it 
will help YOU avoid the hassle of broken PDSEs and/or better enable the z/OS 
community to assist IBM in tracking down some of these nagging PDSE problems. 

PDSEs are required more and more every day. The sooner we get these issues 
fixed, the better off we will all be. 

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

2011-10-27 Thread Ed Gould

Tom:

As John Ells indicated it is no longer an option and all datasets are created 
with a EOF. As he indicated IIRC it was in Z/os 11.
I must admit that it slipped by me when it became a default and is no longer 
needed in IGDSM00

Ed



- Original Message -
From: Tom Marchant m42tom-ibmm...@yahoo.com
To: IBM-MAIN@bama.ua.edu
Cc: 
Sent: Thursday, October 27, 2011 6:43 AM
Subject: Re: GDG

On Wed, 26 Oct 2011 15:41:19 -0700, Ed Gould wrote:

 The member igdms00 must have a specific keyword in order to have the EOF 
occur.

What keyword is that, Ed?  I don't remember that and a quick scan of the 
keywords for IGDSMSxx doesn't reveal anything.

I do see this in DFSMS Implementing System-Managed Storage section  
8.1 Understanding the Benefits of Placing Batch Data under System Management:

quote
For sequential data sets, SMS writes a hardware EOF at the beginning of the 
data 
set at initial allocation. This prevents data integrity problems when 
applications 
try to read the data before data is written in the data set.
/quote

There is nothing there about needing to do anything special to enable the 
function.

-- 
Tom Marchant

--
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: HFS sharing and rolling product upgrades

2011-10-27 Thread Kirk Wolf

John,

Thanks for your kind words.   Much of what we offer owes large success to
pesky users who send us feedback and suggestions :-)

Your example reminds me that eventually we would like to add an idcams
shell command, which would allow:

catsearch cicsts*.** |\
cut -d '.' -f 2- |\
sort -u |\
while read i;do
  echo  DEFINE ALIAS(NAME(CICSTS.$i) -
  echoSYMBOLICRELATE(CICSVER..$i))
done |  idcams


Of course, if you like batch, this would easily run under COZBATCH :-)
FWIW, you may have noticed that there is a com.ibm.jzos.AccessMethodServices
class that provides a callable IDCAMS interface from Java.

Cheers,

Kirk Wolf
Dovetailed Technologies
http://dovetail.com

PS consider using awk to build job to do the whole thing in a pipeline
without temp files.
*Something* like:

catsearch cicsts*.** |\
cut -d '.' -f 2- |\
sort -u |\
awk '
 BEGIN {
   print //JOBNAME JOB (ACCT),PGMR,CLASS=A,MSGCLASS=H;
   print //IDCAMS EXEC PGM=IDCAMS;
   print //SYSPRINT DD SYSOUT=*;
   print //SYSIN DD *;
 } {
   print  DEFINE ALIAS(NAME(CICSTS.,$1,) -;
   printSYMBOLICRELATE(CICSVER..,$1,));
 } END {
   print //
 }' |\
 submit -j


On Thu, Oct 27, 2011 at 9:08 AM, McKown, John john.mck...@healthmarkets.com
 wrote:

 If you run multiple releases of CICS on a single image, you might want to
 change that slightly:

 cd /usr/lpp/cicsts
 mkdir cicsts32-RSU1109
 mkdir cicsts32-RSU1110
 mkdir cicsts41-RSU1109 #assuming there is an RSU1109 for CICS/TS 4.1
 mkdir cicsts41-RSU1110 #similar to above
 ln -s '$SYSSYMR/cicsts32-CICSVER.' cicsts32
 ln -s '$SYSSYMR/cicsts41-CICSVER.' cicsts41

 What might be even more interesting would be if the
 release-to-use-on-this-image of CICS were in CICVER and the RSU for that
 release was in CICSRSU. Now, if you run multiple versions/RSUs on one
 image, make some more static symbols. One for the desired RSU for each CICS
 release. Examples: RSUCV32 and RSUCV41.

 mkdir CICSTS32-RSU1109
 mkdir CICSTS32-RSU1110
 mkdir CICSTS41-RSU1109
 mkdir CICSTS41-RSU1110
 ln -s '$SYSSYMR/CICSVER.-CICSRSU.' local
 ln -s '$SYSSYMR/CICSTS32-RSUCV32' cicsts32
 ln -s '$SYSSYMR/CICSTS41-RSUCV41' cicsts41

 and then use /usr/lpp/cicsts/local instead of /usr/lpp/cicsts/cicsts32.
 That gets you the recommended CICS version and RSU for this z/OS image. If
 you use /usr/lpp/cicsts/cicsts32, you get the desired RSU for release 3.2 on
 this z/OS image. If you use /usr/lpp/cicsts/cicsts41, you get the desired
 RSU for release 4.1 on this z/OS image.

 In BPXPRMxx:

 MOUNT FILESYSTEM('OMVS.CICSRSU..CICSVER.')
  MOUNTPOINT('/usr/lpp/cicsts/CICSVER.-CICSRSU.')
  TYPE(HFS)  MODE(READ) AUTOMOVE(INCLUDE,*)

 If you wanted to, you could simply have one MOUNT for every existant
 CICS-RSU that you have

 MOUNT FILESYSTEM('OMVS.RSU1109.CICSTS32')
  MOUNTPOINT('/usr/lpp/cicsts/CICSTS32-RSU1109')
  TYPE(HFS) MODE(READ) AUTOMOVE(INCLUDE,*)

 and duplicate the above for each CICS/RSU combination you have.

 In IEASYMxx:

 SYMDEF(CICSVER='CICSTS32')
 SYMDEF(CICSRSU='RSU1110')
 SYMDEF(RSUCV32='RSU1110')
 SYMDEF(RSUCV41='RSU1109')

 Now, combine this with some nifty catalog SYMBOLICRELATE type ALIASes, you
 could do:

 DEFINE ALIAS(NAME('CICSTS.rest.of.dsn') -
   SYMBOLICRELATE('CICSVER..rest.of.dsn'))

 But I hear your complaint. Oh, damn! I have to do a LISTCAT and then code
 up all those DEFINEs. What a PITA! I agree. So why bother? Do it the easy
 way. Install Dovetailed Technologies set of free to download and use Co:Z
 products. They are excellent and did I mention you can download and use them
 FOR NO COST or signed license? You don't even need to fill out a form to be
 approved. Did you know that the JZOS currently distributed by IBM with their
 Java was originally from Dovetailed? Brilliant people. Nice people, too!
 (Hi, Kirk!) So, once you've installed at least the dataset pipes portion of
 Co:Z, you can run a simple UNIX shell script to create the DEFINE ALIAS
 commands for you!

 catsearch cicsts*.** |\
 cut -d '.' -f 2- |\
 sort -u |\
 while read i;do
 echo  DEFINE ALIAS(NAME(CICSTS.$i) -
 echoSYMBOLICRELATE(CICSVER..$i));
 doneidcams.sysin
 cat idcams.jcl EOJ
 //JOBNAME JOB (ACCT),PGMR,CLASS=A,MSGCLASS=H
 //IDCAMS EXEC PGM=IDCAMS
 //SYSPRINT DD SYSOUT=*
 //SYSIN DD *
 EOJ
 cat null.jcl EOJ
 //
 EOJ
 cat idcams.jcl idcams.sysin null.jcl | submit -j
 #end of script

 Feel free to use TSO and REXX or ISPF EDIT to do the same. But I doubt that
 it will be quite as easy as I've shown above. That took me about 5 minutes
 to write an debug. Repeat the above script for each CICS release high level
 qualifier, if they don't all start with the characters 'cicsts...' . If you
 repeat the script, you might (most likely will) get some duplicate aliases.
 But that should be OK. You could probably work the RSU into the DSN similar
 to what was done in the UNIX aliases.




 --
 John McKown
 Systems Engineer IV
 IT

 Administrative Services Group

 HealthMarkets(r)

 9151 Boulevard 26 * N. Richland Hills * TX

Re: As IBM CEO, Ginni Rometty will bring some Midwestern charm

2011-10-27 Thread Kirk Talman

I was born and raised in the Midwest but I have never heard the term 
Midwestern charm before

Our greatest danger in life is in permitting the urgent things to crowd 
out the important. - Charles E. Hummel
Efforts and courage are not enough without purpose and direction. - John 
F. Kennedy

IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu wrote on 10/27/2011 
03:50:40 PM:

 From: Ed Gould ps2...@yahoo.com
 To: IBM-MAIN@bama.ua.edu
 Date: 10/27/2011 03:55 PM
 Subject: As IBM CEO, Ginni Rometty will bring some Midwestern charm
 Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu
 
 With Virginia Ginni Rometty, the newly named CEO to succeed Sam 
 Palmisano at IBM Corp., the business machines company is likely to 
 see a little more in Midwestern charm.
 Ms. Rometty is a Chicago native and graduate of Northwestern 
 University, where she serves as a trustee.
 I wrote about her more than a year ago, when she was named a 
 possible contender for the top job.
 Ms. Rometty, who has been leading IBM's global business services, 
 previously oversaw the consulting arm of PricewaterhouseCoopers, 
 which was acquired by IBM in 2002. Her job was to attract big 
 customers as well as redesign and run the company's human resources 
 and finance businesses ? key departments for IBM.
 ?Ginni Rometty combines performance and charisma,? said George F. 
 Colony, chairman of Forrester Research, in a New York Times 
 story about her earning the CEO job. ?She orchestrated a massive 
 charm campaign to bring the PricewaterhouseCoopers people into the 
 fold. That was the trial by fire for her.?
 More recently, Ms. Rometty is credited with leading the growth and 
 development of IBM's huge services business.
 Time magazine noted in 2002 that her vast Rolodex and industry 
 expertise would make her a force at the company.
 And maybe her skills in scuba diving ? her favorite sport ? came 
 into play, too, the magazine said, quoting Ms. Rometty as saying, 
 It's 98% calm and 2% terror.
 
 Read more: http://www.chicagobusiness.com/article/20111026/BLOGS03/
 111029828/as-ibm-ceo-ginni-rometty-will-bring-some-midwestern-
 charm#ixzz1c0tNKjjz 
 
 
 
 (fluff piece on Rometty)
 
 --
 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


-
The information contained in this communication (including any
attachments hereto) is confidential and is intended solely for the
personal and confidential use of the individual or entity to whom
it is addressed. If the reader of this message is not the intended
recipient or an agent responsible for delivering it to the intended
recipient, you are hereby notified that you have received this
communication in error and that any review, dissemination, copying,
or unauthorized use of this information, or the taking of any
action in reliance on the contents of this information is strictly
prohibited. If you have received this communication in error,
please notify us immediately by e-mail, and delete the original
message. Thank you

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

Blanket thanks for Gilbert Saint-Flour condolences

2011-10-27 Thread John Gilmore

Gilbert's family wishes to thank all of you who posted your condolences here.

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

Re: As IBM CEO, Ginni Rometty will bring some Midwestern charm

2011-10-27 Thread Scott Ford

Kirk,
 
I am born and breed Midwesterner also (Indianapolis, Indiana)...
Havent heard the 'term' either...

Scott J Ford
Software Engineer
http://www.identityforge.com
 



From: Kirk Talman rkueb...@tsys.com
To: IBM-MAIN@bama.ua.edu
Sent: Thursday, October 27, 2011 5:09 PM
Subject: Re: As IBM CEO, Ginni Rometty will bring some Midwestern charm

I was born and raised in the Midwest but I have never heard the term 
Midwestern charm before

Our greatest danger in life is in permitting the urgent things to crowd 
out the important. - Charles E. Hummel
Efforts and courage are not enough without purpose and direction. - John 
F. Kennedy

IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu wrote on 10/27/2011 
03:50:40 PM:

 From: Ed Gould ps2...@yahoo.com
 To: IBM-MAIN@bama.ua.edu
 Date: 10/27/2011 03:55 PM
 Subject: As IBM CEO, Ginni Rometty will bring some Midwestern charm
 Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu
 
 With Virginia Ginni Rometty, the newly named CEO to succeed Sam 
 Palmisano at IBM Corp., the business machines company is likely to 
 see a little more in Midwestern charm.
 Ms. Rometty is a Chicago native and graduate of Northwestern 
 University, where she serves as a trustee.
 I wrote about her more than a year ago, when she was named a 
 possible contender for the top job.
 Ms. Rometty, who has been leading IBM's global business services, 
 previously oversaw the consulting arm of PricewaterhouseCoopers, 
 which was acquired by IBM in 2002. Her job was to attract big 
 customers as well as redesign and run the company's human resources 
 and finance businesses ? key departments for IBM.
 ?Ginni Rometty combines performance and charisma,? said George F. 
 Colony, chairman of Forrester Research, in a New York Times 
 story about her earning the CEO job. ?She orchestrated a massive 
 charm campaign to bring the PricewaterhouseCoopers people into the 
 fold. That was the trial by fire for her.?
 More recently, Ms. Rometty is credited with leading the growth and 
 development of IBM's huge services business.
 Time magazine noted in 2002 that her vast Rolodex and industry 
 expertise would make her a force at the company.
 And maybe her skills in scuba diving ? her favorite sport ? came 
 into play, too, the magazine said, quoting Ms. Rometty as saying, 
 It's 98% calm and 2% terror.
 
 Read more: http://www.chicagobusiness.com/article/20111026/BLOGS03/ 
 111029828/as-ibm-ceo-ginni-rometty-will-bring-some-midwestern-
 charm#ixzz1c0tNKjjz 
 
 
 
 (fluff piece on Rometty)
 
 --
 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 


-
The information contained in this communication (including any
attachments hereto) is confidential and is intended solely for the
personal and confidential use of the individual or entity to whom
it is addressed. If the reader of this message is not the intended
recipient or an agent responsible for delivering it to the intended
recipient, you are hereby notified that you have received this
communication in error and that any review, dissemination, copying,
or unauthorized use of this information, or the taking of any
action in reliance on the contents of this information is strictly
prohibited. If you have received this communication in error,
please notify us immediately by e-mail, and delete the original
message. Thank you

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

--
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: Please Help IBM Fix 'Broken' PDSE Problems

2011-10-27 Thread Edward Jaffe


On 10/27/2011 1:02 PM, Linda Mooney wrote:

Has this problem occurred ONLY on EAVs?


It seems that larger PDSEs are most affected. I believe the problem(s) can 
happen on any kind of disk. However, those residing on EAV tend to be larger 
than those on smaller devices. We put all of our large files on EAV.


--
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: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: As IBM CEO, Ginni Rometty will bring some Midwestern charm

2011-10-27 Thread Kirk Wolf

I've heard of southern charm, but many coast-dwellers view all of
fly-over territory as pejoratively charming :-)

Kirk Wolf
Dovetailed Technologies
http://dovetail.com
(a Midwesterner, a Midwest company)

On Thu, Oct 27, 2011 at 4:40 PM, Scott Ford scott_j_f...@yahoo.com wrote:

 Kirk,

 I am born and breed Midwesterner also (Indianapolis, Indiana)...
 Havent heard the 'term' either...

 Scott J Ford
 Software Engineer
 http://www.identityforge.com



 
 From: Kirk Talman rkueb...@tsys.com
 To: IBM-MAIN@bama.ua.edu
 Sent: Thursday, October 27, 2011 5:09 PM
 Subject: Re: As IBM CEO, Ginni Rometty will bring some Midwestern charm

 I was born and raised in the Midwest but I have never heard the term 
 Midwestern charm before

 Our greatest danger in life is in permitting the urgent things to crowd
 out the important. - Charles E. Hummel
 Efforts and courage are not enough without purpose and direction. - John
 F. Kennedy

 IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu wrote on 10/27/2011
 03:50:40 PM:

  From: Ed Gould ps2...@yahoo.com
  To: IBM-MAIN@bama.ua.edu
  Date: 10/27/2011 03:55 PM
  Subject: As IBM CEO, Ginni Rometty will bring some Midwestern charm
  Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu
 
  With Virginia Ginni Rometty, the newly named CEO to succeed Sam
  Palmisano at IBM Corp., the business machines company is likely to
  see a little more in Midwestern charm.
  Ms. Rometty is a Chicago native and graduate of Northwestern
  University, where she serves as a trustee.
  I wrote about her more than a year ago, when she was named a
  possible contender for the top job.
  Ms. Rometty, who has been leading IBM's global business services,
  previously oversaw the consulting arm of PricewaterhouseCoopers,
  which was acquired by IBM in 2002. Her job was to attract big
  customers as well as redesign and run the company's human resources
  and finance businesses ? key departments for IBM.
  ?Ginni Rometty combines performance and charisma,? said George F.
  Colony, chairman of Forrester Research, in a New York Times
  story about her earning the CEO job. ?She orchestrated a massive
  charm campaign to bring the PricewaterhouseCoopers people into the
  fold. That was the trial by fire for her.?
  More recently, Ms. Rometty is credited with leading the growth and
  development of IBM's huge services business.
  Time magazine noted in 2002 that her vast Rolodex and industry
  expertise would make her a force at the company.
  And maybe her skills in scuba diving ? her favorite sport ? came
  into play, too, the magazine said, quoting Ms. Rometty as saying,
  It's 98% calm and 2% terror.
 
  Read more: http://www.chicagobusiness.com/article/20111026/BLOGS03/
  111029828/as-ibm-ceo-ginni-rometty-will-bring-some-midwestern-
  charm#ixzz1c0tNKjjz
 
 
 
  (fluff piece on Rometty)
 
  --
  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


 -
 The information contained in this communication (including any
 attachments hereto) is confidential and is intended solely for the
 personal and confidential use of the individual or entity to whom
 it is addressed. If the reader of this message is not the intended
 recipient or an agent responsible for delivering it to the intended
 recipient, you are hereby notified that you have received this
 communication in error and that any review, dissemination, copying,
 or unauthorized use of this information, or the taking of any
 action in reliance on the contents of this information is strictly
 prohibited. If you have received this communication in error,
 please notify us immediately by e-mail, and delete the original
 message. Thank you

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

 --
 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: Lines per page - IDCAMS output

2011-10-27 Thread Dale Miller

Frank Bonaduce wrote: Another possibility ... is ... IGGCSI00. If you  
are versed in Assembler  I need to point out that Assembler is  
not necessary. REXX will do just fine. I put together a suite of tools  
we used in cloning systems which facilitated catalog  
cloning,synchronizing, etc. No Assembler was needed. Truth be told,  
I'm probably less competent in REXX than in Assembler, but this was  
well-worth doing.
The similar SMP/E tool appears to actually require Assembler, and I  
had plans to do wonderful things with it, but my disgust for corporate  
politics led to my retirement before I got the round tuit.


Dale Miller

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

Re: Delete FMID

2011-10-27 Thread Matthew Stitt

Thanks Mark.  The JCL sample you provided worked quite well.  Now I have some 
residual modules which did not go away.  I'm looking into that issue and will 
probably find a real rats nest.  This could be an issue where the modules have 
link edit information for stuff that does not belong to the software.

Oh well..

On 10/27/11 12:47, Matthew Stitt wrote:
 Trying to install a new product and I have run into a situation where another 
 FMID provided Linkedit information for a module which is different than the 
 new product.  I need to either remove the old FMID (preferable) or have the 
 new linkedit information used.  The old FMID is Applied, but not accepted.  I 
 probably could modify the new product MCS to have it delete the old stuff, 
 but I am confused as what the control statement should look like?

 This is on Z/OS V1R12.

 Thanks.



Something like this should work.

//STEP1   EXEC ZOS112R
//SMPPTFIN DD *
++FUNCTION(DELFMID) .
++VER(Z038) DELETE(JWRE33I).
/*
//SYSIN   DD *
   SET BDY(GLOBAL).
   RECEIVE SYSMODS.
   SET BDY(MVST100).
  APPLY S(DELFMID) BYPASS(ID) REDO.
   SET BDY(MVSD100).
  ACCEPT S(DELFMID) BYPASS(ID) REDO.


-- 
Mark Jacobs
Time Customer Service
Tampa, FL

--
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: Filling in the holes

2011-10-27 Thread John McKown

As I recall the x'81' in the undefined area was a mod by SLAC to the
Linkage Editor. I remember it well. Mainly because IBM had a bunch of DS
instructions in the MVS CVT. When I did a sysgen one time the system
died because the default vol of 0x00 in the DS areas were now x'81'.
The NIP logic apparently had a compare against 0 to see if some field
was initialized and bypassed further initialization if non-zero. When
the slack bytes were x'81', MVS died during NIP.

Long ago. This is my best recollection.

On Thu, 2011-10-27 at 12:20 -0700, glen herrmannsfeldt wrote:
 There has been an ongoing discussion on comp.lang.fortran on the
 initialization of variables, including questions about OS/360 and
 its compilers.
 
 As I understand it, Fortran variables, and DS in assembler, 
 generate holes in the object program (no TXT record for that
 position), and are filled in either by the linkage editor or
 program fetch.
 
 I believe that early OS/360 versions left whatever happened to
 be there, either in the linkage editor buffer or, for program
 fetch, in that memory location.  At some time later, possibly
 for security reasons, this was changed to initialize to zero,
 or maybe something else (such as X'81').
 
 The actual question is: when was this change made and which
 programs (compilers, linkage editors, program fetch) were
 changed?
 
 -- glen
 
 --
 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
-- 
John McKown
Maranatha! 

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

Re: Delete FMID

On Thu, 27 Oct 2011 17:21:31 -0500, Matthew Stitt wrote:

Thanks Mark.  The JCL sample you provided worked quite well.  Now I have some 
residual modules which did not go away.  I'm looking into that issue and will 
probably find a real rats nest.  This could be an issue where the modules have 
link edit information for stuff that does not belong to the software.

Oh well..

Ouch!  It has long been my understanding that SMP/E has an inadequate
understanding of ownership of LMODs by FMIDs.  In particular, when
link edit JCLIN is processed, the INCLUDE statements are reflected in
LMOD subentries of the MOD entries of the referenced MODs.  But looking
at the SMP/E Reference description of the MOD entry, I see no indication
that the LMOD subentries are identified with the SYSMOD that created
them, which may belong to the FMID being deleted.  So, it would seem
that SMP/E has no way to clean up the MOD entries.

(But can JCLIN for one FMID add LMOD subentries referring to an LMOD
introduced in a different FMID?)

On 10/27/11 12:47, Matthew Stitt wrote:
 Trying to install a new product and I have run into a situation where 
 another FMID provided Linkedit information for a module which is different 
 than the new product.  I need to either remove the old FMID (preferable) or 
 have the new linkedit information used.  The old FMID is Applied, but not 
 accepted.  I probably could modify the new product MCS to have it delete the 
 old stuff, but I am confused as what the control statement should look like?

 This is on Z/OS V1R12.

 Thanks.



Something like this should work.

//STEP1   EXEC ZOS112R
//SMPPTFIN DD *
++FUNCTION(DELFMID) .
++VER(Z038) DELETE(JWRE33I).
/*
//SYSIN   DD *
   SET BDY(GLOBAL).
   RECEIVE SYSMODS.
   SET BDY(MVST100).
  APPLY S(DELFMID) BYPASS(ID) REDO.
   SET BDY(MVSD100).
  ACCEPT S(DELFMID) BYPASS(ID) REDO.


--
Mark Jacobs
Time Customer Service
Tampa, FL

--
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: Please Help IBM Fix 'Broken' PDSE Problems

2011-10-27 Thread Linda Mooney

Hi Ed, 



Thanks, I very much appreciate the post and the info.  I'm going to go with 
caution.  We are down to minimal staffing now, running completely unattended 
nights and weekends and no automation due to severe budget and staff cuts - a 
third of our IT staff is gone.  If we did hit this problem, it could be ugly.  
I'll plan on running with PDSE only where required, and I'll pick up the APAR  
service.  


Best Regards, 



Linda 


- Original Message -


From: Edward Jaffe edja...@phoenixsoftware.com 
To: IBM-MAIN@bama.ua.edu 
Sent: Thursday, October 27, 2011 3:00:04 PM 
Subject: Re: Please Help IBM Fix 'Broken' PDSE Problems 

On 10/27/2011 1:02 PM, Linda Mooney wrote: 
 Has this problem occurred ONLY on EAVs? 

It seems that larger PDSEs are most affected. I believe the problem(s) can 
happen on any kind of disk. However, those residing on EAV tend to be larger 
than those on smaller devices. We put all of our large files on EAV. 

-- 
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: 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: Our community strengths

2011-10-27 Thread Dale Miller

Linda Mooney referred to the 'stolen servers' IBM ad, and the lack of  
follow-up. Years ago, IBM did an ad which showed what looked like a  
UAL jet taking off. The caption was How to get to Chicago one year  
earlier - OS/2 Warp. If you don't remember, Chicago was the code  
name for Windows 93, oops Windows 94, oops Windows 95. The ad wasn't  
quite right as the time was more than a year. This was a very  
inventive ad, and as an OS/2 fanatic, I was really disappointed that  
there was no follow-up. However, there was in IBM-internal rumor  
(which may have been an urban legend) that the ad campaign was killed  
by an IBM exec when he was shown the material. Noting that the  
proposal included ads in Dr. Dobb's Journal, he laid down the dictum  
that We don't advertise in medical journals..
It still mystifies me how inferior products win out in the  
marketplace, especially when the losers are the products I prefer  
(lame attempt at humor). I used OS/2 for years, and I could count the  
number of unscheduled reboots on my fingers (without my toes), which  
is a whole lot better than with my wife's Windoze machines, and even  
better than my current Mac machine. I only stopped using Warp when it  
became impossible to get a new printer with Warp support, and my old  
EPSON laser EPL6600 finally died after quite a few years of  
unblemished service.


Dale Miller

--
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: HFS sharing and rolling product upgrades

2011-10-27 Thread John McKown

On Thu, 2011-10-27 at 16:09 -0500, Kirk Wolf wrote:
 John,
 
 Thanks for your kind words.   Much of what we offer owes large success to
 pesky users who send us feedback and suggestions :-)
 
 Your example reminds me that eventually we would like to add an idcams
 shell command, which would allow:
 
 catsearch cicsts*.** |\
 cut -d '.' -f 2- |\
 sort -u |\
 while read i;do
   echo  DEFINE ALIAS(NAME(CICSTS.$i) -
   echoSYMBOLICRELATE(CICSVER..$i))
 done |  idcams
 
 

I would love that! I guess that I could create an idcams UNIX command
using REXX and an ADDRESS TSO to run the actual IDCAMS command. But that
offends my sense of elegance.

 Of course, if you like batch, this would easily run under COZBATCH :-)
 FWIW, you may have noticed that there is a com.ibm.jzos.AccessMethodServices
 class that provides a callable IDCAMS interface from Java.

Nice. But I'd get strung up by my privates if I ran Java on the z at
work (despite this, I have 1.4.0, 1.4.2, 1.5, 1.6, and 1.7 beta
installed). We have reduced our z9BC to use a group capacity of 35 MSUs.
Management wants it down to a max of 30 MSUs by year end to save more on
license fees. I would say more, but it would be unwise. And I'm a techie
who doesn't understand business. 

 
 Cheers,
 
 Kirk Wolf
 Dovetailed Technologies
 http://dovetail.com
 
 PS consider using awk to build job to do the whole thing in a pipeline
 without temp files.

Neat. I use awk a bit, but it's not my language of choice. I'm a Perl
person. But I tend to avoid much beyond simple scripting due to CPU
constraints.

 *Something* like:
 
snip
-- 
John McKown
Maranatha! 

--
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: Filling in the holes

On Thu, 27 Oct 2011 18:38:33 -0500, John McKown wrote:

As I recall the x'81' in the undefined area was a mod by SLAC to the
Linkage Editor. I remember it well. Mainly because IBM had a bunch of DS

Hmmm.  Would that tend to bloat load modules, or does the load
module definition have some sort of RLE compression capability?

instructions in the MVS CVT. When I did a sysgen one time the system
died because the default vol of 0x00 in the DS areas were now x'81'.
The NIP logic apparently had a compare against 0 to see if some field
was initialized and bypassed further initialization if non-zero. When
the slack bytes were x'81', MVS died during NIP.
 
Old stuff.  Nowadays there's the diagnostic Dirty GETMAIN facility to
wring out such oversights.  But is Dirty GETMAIN functional in NIP?

I recall a computer, perhaps pre-360; perhaps non-IBM whose operator's
console had a deeply recessed button that set all central memory to 0.

-- gil

--
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: HFS sharing and rolling product upgrades