IPLed Volume

2011-04-07 Thread SAURABH KHANDELWAL

Hello,
If I have two RES volume( example IPE100 and IPE101) in 
my system, then how can I find the detail about


1) from which RES volume my system is currently IPLed.
2) Is there any option in SMPE panel, by which we can come to know about 
volume detail, my target datasets are pointing to. Also in which volume 
my DDDEF are defined ( example SYSUT1 and SYSUT2 etc)


Regards
Saurabh

--
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: ADRDSSU issue

2011-04-07 Thread SAURABH KHANDELWAL
Yes, some of the dataset were copied and the target dataset were not 
cataloged.
In my earlier JCL, I have not specified Process(SYS1), but still I was 
able to copy SYS1 datasets.



Regards
Saurabh Khandelwal






On 4/7/2011 7:24 AM, chen lucky wrote:

I have following question about this ADRDSSU COPY,
1.in original post, there is no 'delete' parameter specified, but even so,
there are still some DataSets had been copied successfully. Do not know why,
may these copied ones are not cataloged? seems not the reason.
2.'PROCESS(SYS1)' is also not specified, but some SYS1.** get copied
successfully, still do not know why, strange……

2011/4/7 Schwarz, Barry Abarry.a.schw...@boeing.com


I had non-managed VSAM datasets (zFS to be exact) on z/OS 1.8.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Lizette Koehler
Sent: Wednesday, April 06, 2011 5:34 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: ADRDSSU issue

I see you are at z/OS V1.9.   VSAM datasets If I remember are always SMS
Managed and it is not until z/OS V1.12 that you can use indirect VSAM
cataloging.  I am not sure you can copy the same name VSAM dataset.  You may
need to copy to a new VSAM dataset name

--
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: IPLed Volume

2011-04-07 Thread גדי בן אבי
Hi,

The Display IPLINFO command will tell you where you IPL's from.

In SMP/E go to option 1, select you zone and then look at DDDEFS.

You can also to a list ddefs command in batch.

Gadi


From: IBM Mainframe Discussion List [IBM-MAIN@bama.ua.edu] On Behalf Of SAURABH 
KHANDELWAL [saurabh.khandel...@oracle.com]
Sent: 07 April 2011 09:36
To: IBM-MAIN@bama.ua.edu
Subject: IPLed Volume

Hello,
 If I have two RES volume( example IPE100 and IPE101) in
my system, then how can I find the detail about

1) from which RES volume my system is currently IPLed.
2) Is there any option in SMPE panel, by which we can come to know about
volume detail, my target datasets are pointing to. Also in which volume
my DDDEF are defined ( example SYSUT1 and SYSUT2 etc)

Regards
Saurabh

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

לשימת לבך, בהתאם לנהלי החברה וזכויות החתימה בה, כל הצעה, התחייבות או מצג מטעם 
החברה, מחייבים מסמך נפרד וחתום על ידי מורשי החתימה של החברה, הנושא את לוגו 
החברה או שמה המודפס ובצירוף חותמת החברה. בהעדר מסמך כאמור (לרבות מסמך סרוק) 
המצורף להודעת דואר אלקטרוני זאת, אין לראות באמור בהודעה אלא משום טיוטה לדיון,
ואין להסתמך עליה לביצוע פעולה עסקית או משפטית כלשהי.


Please note that in accordance with Malam's signatory rights, no offer, 
agreement, concession or representation is binding on the company,
unless accompanied by a duly signed separate document (or a scanned version 
thereof), affixed with the company's seal.

--
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: IPLed Volume- ISMF Panel

2011-04-07 Thread SAURABH KHANDELWAL

Thanks for reply.  Do we have any option is ISMF panel to know

Particular volume is mapped to which storage group.

Regards
Saurabh

On 4/7/2011 12:21 PM, גדי בן אבי wrote:

Hi,

The Display IPLINFO command will tell you where you IPL's from.

In SMP/E go to option 1, select you zone and then look at DDDEFS.

You can also to a list ddefs command in batch.

Gadi


From: IBM Mainframe Discussion List [IBM-MAIN@bama.ua.edu] On Behalf Of SAURABH 
KHANDELWAL [saurabh.khandel...@oracle.com]
Sent: 07 April 2011 09:36
To: IBM-MAIN@bama.ua.edu
Subject: IPLed Volume

Hello,
  If I have two RES volume( example IPE100 and IPE101) in
my system, then how can I find the detail about

1) from which RES volume my system is currently IPLed.
2) Is there any option in SMPE panel, by which we can come to know about
volume detail, my target datasets are pointing to. Also in which volume
my DDDEF are defined ( example SYSUT1 and SYSUT2 etc)

Regards
Saurabh

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

לשימת לבך, בהתאם לנהלי החברה וזכויות החתימה בה, כל הצעה, התחייבות או מצג מטעם 
החברה, מחייבים מסמך נפרד וחתום על ידי מורשי החתימה של החברה, הנושא את לוגו 
החברה או שמה המודפס ובצירוף חותמת החברה. בהעדר מסמך כאמור (לרבות מסמך סרוק) 
המצורף להודעת דואר אלקטרוני זאת, אין לראות באמור בהודעה אלא משום טיוטה לדיון,
ואין להסתמך עליה לביצוע פעולה עסקית או משפטית כלשהי.


Please note that in accordance with Malam's signatory rights, no offer, 
agreement, concession or representation is binding on the company,
unless accompanied by a duly signed separate document (or a scanned version 
thereof), affixed with the company's seal.

--
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: IPLed Volume- ISMF Panel

2011-04-07 Thread jagadishan perumal
IS.6(Option might vary but check it up) would take you to list the storage
groups then you can type LISTVOL beside the storage group to know the
volumes available for a storage group.

2011/4/7 SAURABH KHANDELWAL saurabh.khandel...@oracle.com

 Thanks for reply.  Do we have any option is ISMF panel to know

 Particular volume is mapped to which storage group.

 Regards
 Saurabh

 On 4/7/2011 12:21 PM, גדי בן אבי wrote:

 Hi,

 The Display IPLINFO command will tell you where you IPL's from.

 In SMP/E go to option 1, select you zone and then look at DDDEFS.

 You can also to a list ddefs command in batch.

 Gadi

 
 From: IBM Mainframe Discussion List [IBM-MAIN@bama.ua.edu] On Behalf Of
 SAURABH KHANDELWAL [saurabh.khandel...@oracle.com]
 Sent: 07 April 2011 09:36
 To: IBM-MAIN@bama.ua.edu
 Subject: IPLed Volume

 Hello,
  If I have two RES volume( example IPE100 and IPE101) in
 my system, then how can I find the detail about

 1) from which RES volume my system is currently IPLed.
 2) Is there any option in SMPE panel, by which we can come to know about
 volume detail, my target datasets are pointing to. Also in which volume
 my DDDEF are defined ( example SYSUT1 and SYSUT2 etc)

 Regards
 Saurabh

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

 לשימת לבך, בהתאם לנהלי החברה וזכויות החתימה בה, כל הצעה, התחייבות או מצג
 מטעם החברה, מחייבים מסמך נפרד וחתום על ידי מורשי החתימה של החברה, הנושא את
 לוגו החברה או שמה המודפס ובצירוף חותמת החברה. בהעדר מסמך כאמור (לרבות מסמך
 סרוק) המצורף להודעת דואר אלקטרוני זאת, אין לראות באמור בהודעה אלא משום טיוטה
 לדיון,
 ואין להסתמך עליה לביצוע פעולה עסקית או משפטית כלשהי.


 Please note that in accordance with Malam's signatory rights, no offer,
 agreement, concession or representation is binding on the company,
 unless accompanied by a duly signed separate document (or a scanned
 version thereof), affixed with the company's seal.

 --
 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: IPLed Volume- ISMF Panel

2011-04-07 Thread SAURABH KHANDELWAL

Hello Jags,
 I was aware about this option. But the problem is, 
I have 25 storage group in our system so it is difficult to go into each 
of the storage group and use this listvol option.


 I am looking for the direct option, in which if we 
provide volume serial number, we should be able to get Storage group 
from which it is connected.


Regards
Saurabh Khandelwal

On 4/7/2011 3:00 PM, jagadishan perumal wrote:
IS.6(Option might vary but check it up) would take you to list the 
storage groups then you can type LISTVOL beside the storage group 
to know the volumes available for a storage group.


2011/4/7 SAURABH KHANDELWAL saurabh.khandel...@oracle.com 
mailto:saurabh.khandel...@oracle.com


Thanks for reply.  Do we have any option is ISMF panel to know

Particular volume is mapped to which storage group.

Regards
Saurabh

On 4/7/2011 12:21 PM, גדי בן אבי wrote:

Hi,

The Display IPLINFO command will tell you where you IPL's from.

In SMP/E go to option 1, select you zone and then look at DDDEFS.

You can also to a list ddefs command in batch.

Gadi


From: IBM Mainframe Discussion List [IBM-MAIN@bama.ua.edu
mailto:IBM-MAIN@bama.ua.edu] On Behalf Of SAURABH KHANDELWAL
[saurabh.khandel...@oracle.com
mailto:saurabh.khandel...@oracle.com]
Sent: 07 April 2011 09:36
To: IBM-MAIN@bama.ua.edu mailto:IBM-MAIN@bama.ua.edu
Subject: IPLed Volume

Hello,
 If I have two RES volume( example IPE100 and
IPE101) in
my system, then how can I find the detail about

1) from which RES volume my system is currently IPLed.
2) Is there any option in SMPE panel, by which we can come to
know about
volume detail, my target datasets are pointing to. Also in
which volume
my DDDEF are defined ( example SYSUT1 and SYSUT2 etc)

Regards
Saurabh

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

לשימת לבך, בהתאם לנהלי החברה וזכויות החתימה בה, כל הצעה,
התחייבות או מצג מטעם החברה, מחייבים מסמך נפרד וחתום על ידי
מורשי החתימה של החברה, הנושא את לוגו החברה או שמה המודפס
ובצירוף חותמת החברה. בהעדר מסמך כאמור (לרבות מסמך סרוק) המצורף
להודעת דואר אלקטרוני זאת, אין לראות באמור בהודעה אלא משום
טיוטה לדיון,
ואין להסתמך עליה לביצוע פעולה עסקית או משפטית כלשהי.


Please note that in accordance with Malam's signatory rights,
no offer, agreement, concession or representation is binding
on the company,
unless accompanied by a duly signed separate document (or a
scanned version thereof), affixed with the company's seal.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu
mailto: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 mailto: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: IPLed Volume- ISMF Panel

2011-04-07 Thread jagadishan perumal
Then if your shop has QW chicagosoft product installed then you can query
the volume serial to know the stg group.

Regards,
Jags

On Thu, Apr 7, 2011 at 3:04 PM, SAURABH KHANDELWAL 
saurabh.khandel...@oracle.com wrote:

 Hello Jags,
  I was aware about this option. But the problem is, I
 have 25 storage group in our system so it is difficult to go into each of
 the storage group and use this listvol option.

  I am looking for the direct option, in which if we
 provide volume serial number, we should be able to get Storage group from
 which it is connected.

 Regards
 Saurabh Khandelwal

 On 4/7/2011 3:00 PM, jagadishan perumal wrote:

 IS.6(Option might vary but check it up) would take you to list the storage
 groups then you can type LISTVOL beside the storage group to know the
 volumes available for a storage group.

 2011/4/7 SAURABH KHANDELWAL saurabh.khandel...@oracle.com

 Thanks for reply.  Do we have any option is ISMF panel to know

 Particular volume is mapped to which storage group.

 Regards
 Saurabh

 On 4/7/2011 12:21 PM, גדי בן אבי wrote:

 Hi,

 The Display IPLINFO command will tell you where you IPL's from.

 In SMP/E go to option 1, select you zone and then look at DDDEFS.

 You can also to a list ddefs command in batch.

 Gadi

 
 From: IBM Mainframe Discussion List [IBM-MAIN@bama.ua.edu] On Behalf Of
 SAURABH KHANDELWAL [saurabh.khandel...@oracle.com]
 Sent: 07 April 2011 09:36
 To: IBM-MAIN@bama.ua.edu
 Subject: IPLed Volume

 Hello,
  If I have two RES volume( example IPE100 and IPE101) in
 my system, then how can I find the detail about

 1) from which RES volume my system is currently IPLed.
 2) Is there any option in SMPE panel, by which we can come to know about
 volume detail, my target datasets are pointing to. Also in which volume
 my DDDEF are defined ( example SYSUT1 and SYSUT2 etc)

 Regards
 Saurabh

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

 לשימת לבך, בהתאם לנהלי החברה וזכויות החתימה בה, כל הצעה, התחייבות או מצג
 מטעם החברה, מחייבים מסמך נפרד וחתום על ידי מורשי החתימה של החברה, הנושא את
 לוגו החברה או שמה המודפס ובצירוף חותמת החברה. בהעדר מסמך כאמור (לרבות מסמך
 סרוק) המצורף להודעת דואר אלקטרוני זאת, אין לראות באמור בהודעה אלא משום טיוטה
 לדיון,
 ואין להסתמך עליה לביצוע פעולה עסקית או משפטית כלשהי.


 Please note that in accordance with Malam's signatory rights, no offer,
 agreement, concession or representation is binding on the company,
 unless accompanied by a duly signed separate document (or a scanned
 version thereof), affixed with the company's seal.

 --
 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: IPLed Volume- ISMF Panel

2011-04-07 Thread SAURABH KHANDELWAL

Sorry Jags,
We don't have any other product rather then IBM. 
any other clue.


Regards
Saurabh Khandelwal

On 4/7/2011 3:26 PM, jagadishan perumal wrote:
Then if your shop has QW chicagosoft product installed then you can 
query the volume serial to know the stg group.

Regards,
Jags

On Thu, Apr 7, 2011 at 3:04 PM, SAURABH KHANDELWAL 
saurabh.khandel...@oracle.com mailto:saurabh.khandel...@oracle.com 
wrote:


Hello Jags,
 I was aware about this option. But the
problem is, I have 25 storage group in our system so it is
difficult to go into each of the storage group and use this
listvol option.

 I am looking for the direct option, in which
if we provide volume serial number, we should be able to get
Storage group from which it is connected.

Regards
Saurabh Khandelwal

On 4/7/2011 3:00 PM, jagadishan perumal wrote:

IS.6(Option might vary but check it up) would take you to list
the storage groups then you can type LISTVOL beside the
storage group to know the volumes available for a storage group.

2011/4/7 SAURABH KHANDELWAL saurabh.khandel...@oracle.com
mailto:saurabh.khandel...@oracle.com

Thanks for reply.  Do we have any option is ISMF panel to know

Particular volume is mapped to which storage group.

Regards
Saurabh

On 4/7/2011 12:21 PM, גדי בן אבי wrote:

Hi,

The Display IPLINFO command will tell you where you IPL's
from.

In SMP/E go to option 1, select you zone and then look at
DDDEFS.

You can also to a list ddefs command in batch.

Gadi


From: IBM Mainframe Discussion List [IBM-MAIN@bama.ua.edu
mailto:IBM-MAIN@bama.ua.edu] On Behalf Of SAURABH
KHANDELWAL [saurabh.khandel...@oracle.com
mailto:saurabh.khandel...@oracle.com]
Sent: 07 April 2011 09:36
To: IBM-MAIN@bama.ua.edu mailto:IBM-MAIN@bama.ua.edu
Subject: IPLed Volume

Hello,
 If I have two RES volume( example IPE100
and IPE101) in
my system, then how can I find the detail about

1) from which RES volume my system is currently IPLed.
2) Is there any option in SMPE panel, by which we can
come to know about
volume detail, my target datasets are pointing to. Also
in which volume
my DDDEF are defined ( example SYSUT1 and SYSUT2 etc)

Regards
Saurabh


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

לשימת לבך, בהתאם לנהלי החברה וזכויות החתימה בה, כל הצעה,
התחייבות או מצג מטעם החברה, מחייבים מסמך נפרד וחתום על
ידי מורשי החתימה של החברה, הנושא את לוגו החברה או שמה
המודפס ובצירוף חותמת החברה. בהעדר מסמך כאמור (לרבות מסמך
סרוק) המצורף להודעת דואר אלקטרוני זאת, אין לראות באמור
בהודעה אלא משום טיוטה לדיון,
ואין להסתמך עליה לביצוע פעולה עסקית או משפטית כלשהי.


Please note that in accordance with Malam's signatory
rights, no offer, agreement, concession or representation
is binding on the company,
unless accompanied by a duly signed separate document (or
a scanned version thereof), affixed with the company's seal.


--
For IBM-MAIN subscribe / signoff / archive access
instructions,
send email to lists...@bama.ua.edu
mailto: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
mailto: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: DATACLASS

2011-04-07 Thread Ron Hawkins
Jason,

The DATACLAS ACS is not working for the IEFBR14 because the DSORG is null.
The DASDM routines that can decide the DSORG of a dataset have not been
called at this point, so if it isn't in your JCL this will not work.

The method I've used in the past is to allocate a DCPS (the same name) after
dropping through tests for RECORG and other DSORG. My memory is that VSAM
allocation and directories in JCL will cause DSORG to be completed, so your
test would be something like:

SELECT  
   WHEN (DATACLAS NE '')  SET DATACLAS = DATACLAS
   WHEN (DSN = ABSPPS)   AND
(DSORG NE 'PO')   AND
(DSORG NE 'VS')   AND 
(DSORG NE 'DA')   SET DATACLAS = 'DCPS'  
   OTHERWISE   SET DATACLAS = 'DCSTD'

  END 
END   

Ron



 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of
 ibmnew
 Sent: Wednesday, April 06, 2011 8:26 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: [IBM-MAIN] DATACLASS
 
 Hi
 
 Yes. I am trying to create  a DATACLAS and associated rules that will
 provide a set of default
   characteristics for a DSORG=PS file.
 
   If DSORG=PS must be used in the JCL, We need change a lot of JCL.
 
  Is there other method to do it without using DSORG=PS  in the JCL?
 
 
 Thanks a lot!
 
 Jason Cai
 
 ---
 
 
 
 Hi
  Thanks your answers.
  I am sorry that I just came back by holiday
 Today I submit the following JCL:
 //ALOCHSKP EXEC PGM=IEFBR14
 //MESSAGE  DD DSN=ABSP.CEB.TEST9,DISP=(NEW,CATLG,DELETE),
 //UNIT=3390,SPACE=(4096,(10,10)),
 // DCB=(LRECL=300,BLKSIZE=27900,RECFM=FB)
 
 Below is the output: Data class . . . . . : DCSTD
  Data Set Name . . . . : ABSP.CEB.TEST9
 
  General Data   Current Allocation
   Management class . . : **None**Allocated blocks  . : 2
   Storage class  . . . : SCSTAND Allocated extents . : 1
Volume serial . . . : BD3A20
Device type . . . . : 3390
   Data class . . . . . : DCSTD
Organization  . . . : PS Current Utilization
Record format . . . : FB  Used blocks . . . . : 0
Record length . . . : 300 Used extents  . . . : 0
Block size  . . . . : 27900
1st extent blocks . : 2
Secondary blocks  . : 10 Dates
Data set name type  : Creation date . . . : 2011/04/07
SMS Compressible. . : NO  Referenced date . . : ***None***
  Expiration date . . : ***None***
 Then I submit the other JCL below:
 //ALOCHSKP EXEC PGM=IEFBR14
 //MESSAGE  DD DSN=ABSP.CEB.TEST8,DISP=(NEW,CATLG,DELETE),
 //UNIT=3390,SPACE=(4096,(10,10)),DSORG=PS,
 // DCB=(LRECL=300,BLKSIZE=27900,RECFM=FB)
 The output is below:Data class . . . . . : DCPS
 Data Set Name . . . . : ABSP.CEB.TEST8
 
 General Data   Current Allocation
  Management class . . : **None**Allocated blocks  . : 10
  Storage class  . . . : SCSTAND Allocated extents . : 1
   Volume serial . . . : BD3A31
   Device type . . . . : 3390
  Data class . . . . . : DCPS
   Organization  . . . : PS Current Utilization
   Record format . . . : FB  Used blocks . . . . : 0
   Record length . . . : 300 Used extents  . . . : 0
   Block size  . . . . : 27900
   1st extent blocks . : 10
   Secondary blocks  . : 10 Dates
   Data set name type  : Creation date . . . : 2011/04/07
   SMS Compressible. . : NO  Referenced date . . : ***None***
 Expiration date . . : ***None***
 My question:
  When I allocate a dataset using PGM=IEFBR14  with  SPACE=(4096,(10,10)),
  Could the parm of space ask system to allocate a PS dataset?
 Why do we must use DSORG=PS in the JCL?
 For LRECL=0 and  BLKSIZE=0
 I submit the following JCL
 //ALOCHSKP EXEC PGM=IEFBR14
 //MESSAGE  DD DSN=ABSP.CEB.TEST7,DISP=(NEW,CATLG,DELETE),
 //UNIT=3390,SPACE=(4096,(10,10)),DCB=PATTERN
 the PATTERN is allocted by the jcl below
 
 /D0   DD DSN=PATTERN,DISP=(NEW,CATLG),UNIT=3390,
 //DCB=(LRECL=0,BLKSIZE=0),
 //VOL=SER=BD3WK1,SPACE=(TRK,(0,0,0))
 Thanks a lot!
 Jason Cai
 On 4/1/2011 18:36, Ron Hawkins wrote:
  I am 033x tomorrow!
 
  -Original Message-
  From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
  Behalf Of
  Scott Ford
  Sent: Friday, April 01, 2011 2:35 PM
  To: IBM-MAIN@bama.ua.edu
  Subject: Re: [IBM-MAIN] DATACLASS
 
  NowI get it, thanks my man...btw I was 60 last august
 
  Sco
  Ron,
 
  NowI get it, thanks my man...btw I was 60 last august
 
  Scott J Ford
 
 
 
 
 
  
  From: Ron 

Re: IPLed Volume- ISMF Panel

2011-04-07 Thread Rob Scott
D SMS,VOL(volser)

Rob Scott
Lead Developer
Rocket Software
275 Grove Street · Newton, MA 02466-2272 · USA
Tel: +1.617.614.2305
Email: rsc...@rs.com
Web: www.rocketsoftware.com 


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
SAURABH KHANDELWAL
Sent: 07 April 2011 10:59
To: IBM-MAIN@bama.ua.edu
Subject: Re: IPLed Volume- ISMF Panel

Sorry Jags,
 We don't have any other product rather then IBM. 
any other clue.

Regards
Saurabh Khandelwal

On 4/7/2011 3:26 PM, jagadishan perumal wrote:
 Then if your shop has QW chicagosoft product installed then you can 
 query the volume serial to know the stg group.
 Regards,
 Jags

 On Thu, Apr 7, 2011 at 3:04 PM, SAURABH KHANDELWAL 
 saurabh.khandel...@oracle.com mailto:saurabh.khandel...@oracle.com 
 wrote:

 Hello Jags,
  I was aware about this option. But the
 problem is, I have 25 storage group in our system so it is
 difficult to go into each of the storage group and use this
 listvol option.

  I am looking for the direct option, in which
 if we provide volume serial number, we should be able to get
 Storage group from which it is connected.

 Regards
 Saurabh Khandelwal

 On 4/7/2011 3:00 PM, jagadishan perumal wrote:
 IS.6(Option might vary but check it up) would take you to list
 the storage groups then you can type LISTVOL beside the
 storage group to know the volumes available for a storage group.

 2011/4/7 SAURABH KHANDELWAL saurabh.khandel...@oracle.com
 mailto:saurabh.khandel...@oracle.com

 Thanks for reply.  Do we have any option is ISMF panel to know

 Particular volume is mapped to which storage group.

 Regards
 Saurabh

 On 4/7/2011 12:21 PM, גדי בן אבי wrote:

 Hi,

 The Display IPLINFO command will tell you where you IPL's
 from.

 In SMP/E go to option 1, select you zone and then look at
 DDDEFS.

 You can also to a list ddefs command in batch.

 Gadi

 
 From: IBM Mainframe Discussion List [IBM-MAIN@bama.ua.edu
 mailto:IBM-MAIN@bama.ua.edu] On Behalf Of SAURABH
 KHANDELWAL [saurabh.khandel...@oracle.com
 mailto:saurabh.khandel...@oracle.com]
 Sent: 07 April 2011 09:36
 To: IBM-MAIN@bama.ua.edu mailto:IBM-MAIN@bama.ua.edu
 Subject: IPLed Volume

 Hello,
  If I have two RES volume( example IPE100
 and IPE101) in
 my system, then how can I find the detail about

 1) from which RES volume my system is currently IPLed.
 2) Is there any option in SMPE panel, by which we can
 come to know about
 volume detail, my target datasets are pointing to. Also
 in which volume
 my DDDEF are defined ( example SYSUT1 and SYSUT2 etc)

 Regards
 Saurabh

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

 לשימת לבך, בהתאם לנהלי החברה וזכויות החתימה בה, כל הצעה,
 התחייבות או מצג מטעם החברה, מחייבים מסמך נפרד וחתום על
 ידי מורשי החתימה של החברה, הנושא את לוגו החברה או שמה
 המודפס ובצירוף חותמת החברה. בהעדר מסמך כאמור (לרבות מסמך
 סרוק) המצורף להודעת דואר אלקטרוני זאת, אין לראות באמור
 בהודעה אלא משום טיוטה לדיון,
 ואין להסתמך עליה לביצוע פעולה עסקית או משפטית כלשהי.


 Please note that in accordance with Malam's signatory
 rights, no offer, agreement, concession or representation
 is binding on the company,
 unless accompanied by a duly signed separate document (or
 a scanned version thereof), affixed with the company's seal.

 
 --
 For IBM-MAIN subscribe / signoff / archive access
 instructions,
 send email to lists...@bama.ua.edu
 mailto: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
 mailto:lists...@bama.ua.edu with the message: GET 

Re: IPLed Volume- ISMF Panel

2011-04-07 Thread jagadishan perumal
How about GPMSERVE(IBM product)... its a graphical user interface. you can
query against the volume serial.

On Thu, Apr 7, 2011 at 3:28 PM, SAURABH KHANDELWAL 
saurabh.khandel...@oracle.com wrote:

 Sorry Jags,
 We don't have any other product rather then IBM. any
 other clue.

 Regards
 Saurabh Khandelwal


 On 4/7/2011 3:26 PM, jagadishan perumal wrote:

 Then if your shop has QW chicagosoft product installed then you can query
 the volume serial to know the stg group.

 Regards,
 Jags

 On Thu, Apr 7, 2011 at 3:04 PM, SAURABH KHANDELWAL 
 saurabh.khandel...@oracle.com wrote:

 Hello Jags,
  I was aware about this option. But the problem is, I
 have 25 storage group in our system so it is difficult to go into each of
 the storage group and use this listvol option.

  I am looking for the direct option, in which if we
 provide volume serial number, we should be able to get Storage group from
 which it is connected.

 Regards
 Saurabh Khandelwal

 On 4/7/2011 3:00 PM, jagadishan perumal wrote:

 IS.6(Option might vary but check it up) would take you to list the storage
 groups then you can type LISTVOL beside the storage group to know the
 volumes available for a storage group.

 2011/4/7 SAURABH KHANDELWAL saurabh.khandel...@oracle.com

 Thanks for reply.  Do we have any option is ISMF panel to know

 Particular volume is mapped to which storage group.

 Regards
 Saurabh

 On 4/7/2011 12:21 PM, גדי בן אבי wrote:

 Hi,

 The Display IPLINFO command will tell you where you IPL's from.

 In SMP/E go to option 1, select you zone and then look at DDDEFS.

 You can also to a list ddefs command in batch.

 Gadi

 
 From: IBM Mainframe Discussion List [IBM-MAIN@bama.ua.edu] On Behalf Of
 SAURABH KHANDELWAL [saurabh.khandel...@oracle.com]
 Sent: 07 April 2011 09:36
 To: IBM-MAIN@bama.ua.edu
 Subject: IPLed Volume

 Hello,
  If I have two RES volume( example IPE100 and IPE101) in
 my system, then how can I find the detail about

 1) from which RES volume my system is currently IPLed.
 2) Is there any option in SMPE panel, by which we can come to know about
 volume detail, my target datasets are pointing to. Also in which volume
 my DDDEF are defined ( example SYSUT1 and SYSUT2 etc)

 Regards
 Saurabh

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

 לשימת לבך, בהתאם לנהלי החברה וזכויות החתימה בה, כל הצעה, התחייבות או מצג
 מטעם החברה, מחייבים מסמך נפרד וחתום על ידי מורשי החתימה של החברה, הנושא את
 לוגו החברה או שמה המודפס ובצירוף חותמת החברה. בהעדר מסמך כאמור (לרבות מסמך
 סרוק) המצורף להודעת דואר אלקטרוני זאת, אין לראות באמור בהודעה אלא משום 
 טיוטה
 לדיון,
 ואין להסתמך עליה לביצוע פעולה עסקית או משפטית כלשהי.


 Please note that in accordance with Malam's signatory rights, no offer,
 agreement, concession or representation is binding on the company,
 unless accompanied by a duly signed separate document (or a scanned
 version thereof), affixed with the company's seal.

 --
 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: IPLed Volume- ISMF Panel

2011-04-07 Thread SAURABH KHANDELWAL
Thanks Rob. I am able to see storage group name against volume serial 
number.


Regards
Saurabh Khandelwal

On 4/7/2011 3:46 PM, Rob Scott wrote:

D SMS,VOL(volser)


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


Multople zone in SMPE

2011-04-07 Thread SAURABH KHANDELWAL

Hello,
By the time of server pac installation, we just defined one 
target and one distribution zone. But if we create two RES volume, for 
applying maintenance then in this we case we would require two target 
and distribution zone.


And in this way we always apply maintenance not on running 
RES volume. We always do on another RES volume.


Can anybody help me, how to setup multiple zone to follow 
above concept.



Regards
Saurabh Khandelwal

--
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: RESMIL in a MONOPLEX

2011-04-07 Thread Jim McAlpine
On Thu, Apr 7, 2011 at 3:16 AM, Shane ibm-m...@tpg.com.au wrote:

 I thought we'd been through this before, but can't find it. Strictly
 speaking, this is a one system ring, and therefor you could expect some
 setup costs.
 ISTR Mr Fagen advancing the knowledge that in such a setup GRS has
 the smarts to ignore all the RSA management. But I can't find any
 evidence in the archives. So it probably doesn't matter what you set it
 to, although I've always preferred zero.

 As for the ENQ issues, maybe have a look at the ADRUENQ usermod. Dallas
 were always pretty accommodating when I needed to ask for something.

 Shane ...



Doesn't that exit only apply to full volume dumps and the like.  Our
performance problems are related to logical dataset dumps.

Jim McAlpine

--
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: REXX INCLUDE ?

2011-04-07 Thread Thomas Berg
As we have the IBM rexx compiler I often use the include directive, e g:
/*%INCLUDE ÖSETPARM*/ 
It works like copying the contents of member ÖSETPARM into the same place in 
the code.


 
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
 Sambataro, Anthony (NIH/CIT) [E]
 Skickat: den 6 april 2011 13:01
 Till: IBM-MAIN@bama.ua.edu
 Ämne: Re: REXX INCLUDE ?
 
 The REXX compiler offers an %INCLUDE statement.
 
 You can initialize an entire stem variable quickly, for example:
 
 stem. = 0
 stem.0 = 10
 
 Will create a stem variable of 10 elements all with a value of zero.
 
 -Original Message-
 From: Miklos Szigetvari [mailto:miklos.szigetv...@isis-papyrus.com]
 Sent: Wednesday, April 06, 2011 6:01 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: REXX INCLUDE ?
 
  Hi
 
 Some REXX questions:
 
 Any kind of REXX INCLUDE feature i.e include a REXX copybook  ?
 We need some large initialized data areas,  stems.
 What is the  best or  fastest way to do this?
 
 --
 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: IPLed Volume

2011-04-07 Thread Donald Likens
I just have a suggestion... Create a batch procedure to copy your active 
IPL volume to your target IPL volume. The catalog entries are using 
indirect addressing either using symbolics or vol(**). Make sure all 
datasets that do not support indirect catalog entries are off the sysres 
(As I remember VSAM and zfs datasets do not support indirect catalog 
entries).  In the procedure mass change all the dddefs in you target 
zone to replace the vol to point to your new target volume.

If you have three sysres volumes... Target/backup/active you could 
continue working after a new sysres is implemented and still backoff. 
Also you could copy your target to the staging sysres (the previous 
backoff volume) avoiding mass change of smpe.

--
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: Multople zone in SMPE

2011-04-07 Thread Walter Marguccio
 Can anybody help me, how to setup multiple zone to follow above concept.


Once I receive a new z/OS with the ServerPac or SystemPac, I use this steps 
to clone the delivered target zone:

//COPYSMP EXEC PGM=ADRDSSU   
//SYSPRINT DD SYSOUT=*   
//SYSIN DD * 
  COPY DATASET(  -   
   INCLUDE(  -   
   SMPE11.tgtzone_name.*, -   
 ))-   
  RENUNC(-   
(SMPE11.tgtzone.*,SMPE11.cloned_tgtzone.*) - 
  )-   
  OUTDYNAM(myvol)   -   
  TOL(ENQF) CATALOG  

Above step clones the target zone's CSI, along with its SMPxTS.
The datasets' 2nd qualifier equals to the tgtzone or cloned_tgtzone names.

//ADDZINDX EXEC PGM=GIMSMP  
//SMPCSI   DD DISP=SHR,DSN=my.GLOBAL.CSI
//SYSPRINT DD SYSOUT=*  
//SMPLOG   DD DUMMY 
//SMPOUT   DD SYSOUT=*  
//SMPCNTL DD *  

  SET BDY(GLOBAL) . 
ZREN(tgtzone) TO(cloned_tgtzone) NEWDATASET(SMPE11.cloned_tgtzone.CSI).
 
  SET BDY(cloned_tgtzone) .   
ZEDIT DDDEF .  
 CHANGE VOLUME(sysres,cloned_sysres) .
ENDZEDIT .
 
UCLIN. 
 REP DDDEF(SMPLTS)  DA(SMPE11.cloned_tgtzone.SMPLTS) .
 REP DDDEF(SMPMTS)  DA(SMPE11.cloned_tgtzone.SMPMTS) .
 REP DDDEF(SMPSCDS) DA(SMPE11.cloned_tgtzone.SMPSCDS).
 REP DDDEF(SMPSTS)  DA(SMPE11.cloned_tgtzone.SMPSTS) .
ENDUCL.

The above step adds the cloned_tgtzone' to the GLOBAL zone index, changes the
sysres to every DDDEFs belonging to cloned_tgtzone, and changes the dataset
names of allSMPxTS accordingly.

I don't clone the DLIB zone, nor the DLIB volumes, since I leave one DLIB 
zone/volume(s)
for x Target zones/volume(s) (where 'x' can be 2, 3, or 4) 


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


Re: Multople zone in SMPE

2011-04-07 Thread SAURABH KHANDELWAL
Thanks For help. Now I will try creating multiple target CSI and update 
you, I encountered any error.


Regards
Saurabh Khandelwal

On 4/7/2011 6:50 PM, Walter Marguccio wrote:

Can anybody help me, how to setup multiple zone to follow above concept.


Once I receive a new z/OS with the ServerPac or SystemPac, I use this steps
to clone the delivered target zone:

//COPYSMP EXEC PGM=ADRDSSU
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
   COPY DATASET(  -
INCLUDE(  -
SMPE11.tgtzone_name.*, -
  ))-
   RENUNC(-
 (SMPE11.tgtzone.*,SMPE11.cloned_tgtzone.*) -
   )-
   OUTDYNAM(myvol)   -
   TOL(ENQF) CATALOG

Above step clones the target zone's CSI, along with its SMPxTS.
The datasets' 2nd qualifier equals to the tgtzone or cloned_tgtzone names.

//ADDZINDX EXEC PGM=GIMSMP
//SMPCSI   DD DISP=SHR,DSN=my.GLOBAL.CSI
//SYSPRINT DD SYSOUT=*
//SMPLOG   DD DUMMY
//SMPOUT   DD SYSOUT=*
//SMPCNTL DD *

   SET BDY(GLOBAL) .
 ZREN(tgtzone) TO(cloned_tgtzone) NEWDATASET(SMPE11.cloned_tgtzone.CSI).

   SET BDY(cloned_tgtzone) .
 ZEDIT DDDEF .
  CHANGE VOLUME(sysres,cloned_sysres) .
 ENDZEDIT .

 UCLIN.
  REP DDDEF(SMPLTS)  DA(SMPE11.cloned_tgtzone.SMPLTS) .
  REP DDDEF(SMPMTS)  DA(SMPE11.cloned_tgtzone.SMPMTS) .
  REP DDDEF(SMPSCDS) DA(SMPE11.cloned_tgtzone.SMPSCDS).
  REP DDDEF(SMPSTS)  DA(SMPE11.cloned_tgtzone.SMPSTS) .
 ENDUCL.

The above step adds the cloned_tgtzone' to the GLOBAL zone index, changes the
sysres to every DDDEFs belonging to cloned_tgtzone, and changes the dataset
names of allSMPxTS accordingly.

I don't clone the DLIB zone, nor the DLIB volumes, since I leave one DLIB
zone/volume(s)
for x Target zones/volume(s) (where 'x' can be 2, 3, or 4)


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


Re: Multople zone in SMPE

2011-04-07 Thread Barkow, Eileen
You also need to the new target zone to the global zone :

  SET BDY(GLOBAL)  
/* ADD THE ADDITIONAL ZONE */  
/* TO THE GLOBAL ZONE  */  
  .
  UCLIN .  
  ADD GLOBALZONE   
  ZONEINDEX(   
   (cloned-tgzone,new.taget.zone.dsn)  
   ) . 
  ENDUCL . 
*  

And copy the original zone into the newzone before doing the replace dddefs to 
pick up all the maint:
 
  ZONECOPY (Tgtzone)   
   INTO (cloned-tgzone)
   RELATED (DLIBZONE)   
   OPTIONS(OPTS)  
  .  

When applying maintenance to the new zone, 
The ACCEPT step needs to relate the DLIB with the current target:

//SMPCNTL  DD  *  
SETBDY(Dlibzone).   
 
UCLIN.  000693
REP  DZONE(Dlibzone)   
000693
 RELATED(cloned-tgtzone) SREL()  OPTIONS(optos).
   
 ENDUCL.  
  ACCEPT
  . 
 
  
/*
//

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Walter Marguccio
Sent: Thursday, April 07, 2011 9:21 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Multople zone in SMPE

 Can anybody help me, how to setup multiple zone to follow above concept.


Once I receive a new z/OS with the ServerPac or SystemPac, I use this steps 
to clone the delivered target zone:

//COPYSMP EXEC PGM=ADRDSSU   
//SYSPRINT DD SYSOUT=*   
//SYSIN DD * 
  COPY DATASET(  -   
   INCLUDE(  -   
   SMPE11.tgtzone_name.*, -   
 ))-   
  RENUNC(-   
(SMPE11.tgtzone.*,SMPE11.cloned_tgtzone.*) - 
  )-   
  OUTDYNAM(myvol)   -   
  TOL(ENQF) CATALOG  

Above step clones the target zone's CSI, along with its SMPxTS.
The datasets' 2nd qualifier equals to the tgtzone or cloned_tgtzone names.

//ADDZINDX EXEC PGM=GIMSMP  
//SMPCSI   DD DISP=SHR,DSN=my.GLOBAL.CSI
//SYSPRINT DD SYSOUT=*  
//SMPLOG   DD DUMMY 
//SMPOUT   DD SYSOUT=*  
//SMPCNTL DD *  

  SET BDY(GLOBAL) . 
ZREN(tgtzone) TO(cloned_tgtzone) NEWDATASET(SMPE11.cloned_tgtzone.CSI).
 
  SET BDY(cloned_tgtzone) .   
ZEDIT DDDEF .  
 CHANGE VOLUME(sysres,cloned_sysres) .
ENDZEDIT .
 
UCLIN. 
 REP DDDEF(SMPLTS)  DA(SMPE11.cloned_tgtzone.SMPLTS) .
 REP DDDEF(SMPMTS)  DA(SMPE11.cloned_tgtzone.SMPMTS) .
 REP DDDEF(SMPSCDS) DA(SMPE11.cloned_tgtzone.SMPSCDS).
 REP DDDEF(SMPSTS)  DA(SMPE11.cloned_tgtzone.SMPSTS) .
ENDUCL.

The above step adds the cloned_tgtzone' to the GLOBAL zone index, changes the
sysres to every DDDEFs belonging to cloned_tgtzone, and changes the dataset
names of allSMPxTS accordingly.

I don't clone the DLIB zone, nor the DLIB volumes, since I leave one DLIB 
zone/volume(s)
for x Target zones/volume(s) (where 'x' can be 2, 3, or 4) 


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 

Re: Floating point assembler code

2011-04-07 Thread Don Higgins
All

Here is another alternative for coding and testing all 3 flavors of IBM
mainframe floating point including HFP, BFP, and DFP.  The free open source
zcobol compiler written in structured z390 portable mainframe assembler
supports all the floating point formats using the latest COBOL draft
standard for defining each of the 9 different floating point types in the
data division.  In the procedure division you can code compute statements to
perform any floating point calculations you like mixing and matching any of
the floating point types along with traditional data types.  

You can use if statements to test results, and you can use display
statements to display results of compute statements.  The zcobol compiler
generates HLASM compatible assembler source code with data labels and
paragraph labels so the generated code can be run using z390 emulator on
Windows or Linux or you can take the generated assembler source to mainframe
and assemble and execute it using HLASM.

The zcobol code generator supports the latest z9, z10, and z196 instructions
and uses the very powerful PFPO for conversions between floating point data
types as required.  When you download and install z390 via www.z390.org, it
includes zcobol plus a number of demo and regression test programs such as
the following:

1.  z390\zcobol\test\TESTHFP1.CBL - test hex HFP data type calculations
2.  z390\zcobol\test\TESTBFP1.CBL - test binary BFP data type calculations
3.  z390\zcobol\test\TESTDFP1.CBL - test decimal DFP data type caculations

Once z390 is installed on Windows or Linux, you can run zcobol demos with
the command ZCRT390.BAT from GUI or command line.  You can also run all the
zcobol regression tests including the above 3 with the command ZCRTTEST.BAT.

Note z390 v1.5.03 has new z196 instructions added, but the next release
v1.5.04 will add some missing extended opcodes which are documented in SHARE
presentation but are not in the latest POP.

Don Higgins
d...@higgins.net

--
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: *CNZ4201E OPERLOG HAS FAILED

2011-04-07 Thread Nick Jones
Its a MonoPlex. The Logger storage group volume Loger01 was fully exhausted
and we deleted some orphaned Log datasets and this Error message has 
stopped
popping.
Hi Jags,

For a case of data set storage exhaustion, I would expect to see messages 
IXG310, IXG311, IXG312 highlighting an offload failure. In addition to 
allocating 
more volumes for logger data sets, you can run an IEAMDBLG to move operlog 
data out of the log stream, or set up a retention period/ autodelete policy to 
keep the log stream data from consuming all the data sets.


Hi Nick, in this case If want to access operlog from ZOSA, how to switch?

Hi Chen,

If this hypothetical situation, if you had a two system sysplex with a DASDonly 
Operlog you could do one of two things to allow access on another system.
1) Migrate the logstream to the other system by 
a) disconnecting from operlog on ZOSB (V OPERLOG,HARDCPY,OFF)and 
b) then connect on ZOSA - or
2) 'upgrade' the logstream to a CF by
a) disconnecting from operlog on ZOSB (V OPERLOG,HARDCPY,OFF)and 
b) updating the LOGR policy definition of the log steam to specify a structure 
name, and
c) connecting on ZOSA and ZOSB

-Nick Jones
Logger L3

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


JES3 on a zPDT running zOS 1.12?

2011-04-07 Thread Don Thimsen
We're running two zPDT development systems with the IBM ADCD zOS 1.12 
system. I'd like to convert one to a JES3 system for testing.  I found an older 
webpage that documented the Steps to Configure JES3 on ADCD:

http://dtsc.dfw.ibm.com/MVSDS/'HTTPD2.ADCD.JES3.HTML($README)'

Note: You may need to cut and paste to view the link.

There were several errors in the setup guide, but were not difficult to work 
through.  And all the JES3 data sets are available on the ADCD system -they 
reside on the ZCPRD2 volume.  However, all the datasets were RACF 
protected (according to the VTOC), but there were no entries in the RACF 
DB.  I used the ADDSD command to set UACC(ALTER) for all the JES3 data 
sets.

During the IPL for JES3, the system prompts for the JES3 COLD start, and 
after selecting the cold start member it seems to hang:

09.06.37  *IAT3041 COLD START REQUIRED, ERROR READING JESCKPNT  
 RECORD 
09.06.37   IAT3011 SPECIFY JES3 START TYPE  
09.06.37  *01 IAT3011 (C, L, H, HA, HR, HAR, W, WA, WR, WAR, OR 
 CANCEL)
09.06.37   CMP001I DFSMS COMPRESSION SERVICES AVAILABLE 
09.06.38   IEF404I BLSJPRMI - ENDED - TIME=09.06.38 
09.06.41   CSV210I LIBRARY LOOKASIDE INITIALIZED
09.06.44   IRA600I SRM CHANNEL DATA NOW AVAILABLE FOR ALL SRM   
 FUNCTIONS  
09.07.20   1,c   
09.07.20   IEE600I REPLY TO 01 IS;C  
09.07.20   IAT2063 ADCD UNABLE TO DETERMINE THE STATUS OF
 JESXCF GROUP NAVAIL - NOT PRESENT IN COMPLEX STATUS RECORD
09.07.20  *02 IAT3012 SELECT JES3 INISH ORIGIN (N OR M=), AND
 OPTIONAL EXIT PARM (,P=) OR CANCEL  
09.07.56   2,m=ft 
09.07.56   IEE600I REPLY TO 02 IS;M=FT
09.07.56   IAT6369  JES3 WAITING FOR CHECKPOINT DATA SET 
RESERVE  
 -  CHKPNT ,ZCPRD2,0A86.  
09.07.57   CSV028I ABEND806-04  JOBNAME=IEESYSAS  
STEPNAME=JES3AUX
09.07.57   IEF404I IEESYSAS - ENDED - TIME=09.07.57   
09.08.36   IAT6397   FCT JSS  (NODEVICE) HAS BEEN DISPATCHED
 CONTINUOUSLY FOR:  
09.08.36   IAT6398 0 HOURS  00 MINUTES  30 SECONDS  
09.08.37   IAT6415 at 0002BDE2 in LOADMOD=IATINIC , 
 EPNAME=IATINIC ,EPADDR=00027E70,LEN=004190 
09.08.37  *03 IAT6418 Reply 'JES3' to fail JES3 
 INITIALIZATION or 'nnn' to ask later   


At this point, I'm stuck and have zero JES3 experience to fall back on.  I have 
been reading the RedBook The ABCs of zOS System Programming Volume 13, 
and have successfully run the JES3INFT JES3 parms used for the spool format 
through the JES3 verify utility.

Questions:
  
1) Is the reserve message on the checkpoint normal?

2) JES3AUX used to be optional, but in zOS 1.12, JES3 always attempts the 
start.  Is is required?  And does it have it's own proc??

Any suggestions would be appreciated,
Don

--
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: JES3 on a zPDT running zOS 1.12?

2011-04-07 Thread Mark Regan
In case you are not a member, there is a JES3 mailing list.


Don,

In case you are not a member, there is a JES3 mailing list.

To subscribe, send mail to lists...@listserv.uga.edu with the command:

SUBSCRIBE JES3-L
 
Thanks,

Mark Regan



From: Don Thimsen d...@dtssoftware.com
To: IBM-MAIN@bama.ua.edu
Sent: Thursday, April 7, 2011 10:23 AM
Subject: JES3 on a zPDT running zOS 1.12?

We're running two zPDT development systems with the IBM ADCD zOS 1.12 
system. I'd like to convert one to a JES3 system for testing.  I found an older 
webpage that documented the Steps to Configure JES3 on ADCD:

http://dtsc.dfw.ibm.com/MVSDS/'HTTPD2.ADCD.JES3.HTML($README)'

Note: You may need to cut and paste to view the link.

There were several errors in the setup guide, but were not difficult to work 
through.  And all the JES3 data sets are available on the ADCD system -they 
reside on the ZCPRD2 volume.  However, all the datasets were RACF 
protected (according to the VTOC), but there were no entries in the RACF 
DB.  I used the ADDSD command to set UACC(ALTER) for all the JES3 data 
sets.

During the IPL for JES3, the system prompts for the JES3 COLD start, and 
after selecting the cold start member it seems to hang:

09.06.37          *IAT3041 COLD START REQUIRED, ERROR READING JESCKPNT  
RECORD                                                                
09.06.37           IAT3011 SPECIFY JES3 START TYPE                      
09.06.37          *01 IAT3011 (C, L, H, HA, HR, HAR, W, WA, WR, WAR, OR 
CANCEL)                                                                
09.06.37           CMP001I DFSMS COMPRESSION SERVICES AVAILABLE        
09.06.38           IEF404I BLSJPRMI - ENDED - TIME=09.06.38            
09.06.41           CSV210I LIBRARY LOOKASIDE INITIALIZED                
09.06.44           IRA600I SRM CHANNEL DATA NOW AVAILABLE FOR ALL SRM  
FUNCTIONS                                                              
09.07.20           1,c                                              
09.07.20           IEE600I REPLY TO 01 IS;C                          
09.07.20           IAT2063 ADCD     UNABLE TO DETERMINE THE STATUS OF
JESXCF GROUP NAVAIL - NOT PRESENT IN COMPLEX STATUS RECORD        
09.07.20          *02 IAT3012 SELECT JES3 INISH ORIGIN (N OR M=), AND
OPTIONAL EXIT PARM (,P=) OR CANCEL                                  
09.07.56           2,m=ft                                                
09.07.56           IEE600I REPLY TO 02 IS;M=FT                            
09.07.56           IAT6369  JES3 WAITING FOR CHECKPOINT DATA SET 
RESERVE  
-  CHKPNT ,ZCPRD2,0A86.                                                  
09.07.57           CSV028I ABEND806-04  JOBNAME=IEESYSAS  
STEPNAME=JES3AUX
09.07.57           IEF404I IEESYSAS - ENDED - TIME=09.07.57              
09.08.36           IAT6397   FCT JSS      (NODEVICE) HAS BEEN DISPATCHED
CONTINUOUSLY FOR:                                                      
09.08.36           IAT6398     0 HOURS  00 MINUTES  30 SECONDS      
09.08.37           IAT6415 at 0002BDE2 in LOADMOD=IATINIC ,            
EPNAME=IATINIC ,EPADDR=00027E70,LEN=004190                            
09.08.37          *03 IAT6418 Reply 'JES3    ' to fail JES3            
INITIALIZATION or 'nnn' to ask later                                  


At this point, I'm stuck and have zero JES3 experience to fall back on.  I have 
been reading the RedBook The ABCs of zOS System Programming Volume 13, 
and have successfully run the JES3INFT JES3 parms used for the spool format 
through the JES3 verify utility.

Questions:
  
1) Is the reserve message on the checkpoint normal?

2) JES3AUX used to be optional, but in zOS 1.12, JES3 always attempts the 
start.  Is is required?  And does it have it's own proc??

Any suggestions would be appreciated,
Don

--
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: JES3 on a zPDT running zOS 1.12?

2011-04-07 Thread McKown, John
Can you IPL with JES2 and do some RACF work? If so, then I'd do the following 
RACF commands on JES2 to update RACF. Or, if you have the RACF subsystem active 
on your system, you could possibley LOGON to the z/OS console and issue the 
RACF commands from there using the RACF subsystem command prefix. I can do this 
on our system. The RACF commands would be something like:

ADDUSER JES3 NAME('JES3 STC') OWNER(SYS1) NOPASSWORD DFLTGRP(SYS1) OPERATIONS

RDEF STARTED JES3.* STDATA(USER(JES3) GROUP(SYS1) TRACE(YES) TRUSTED(YES))


You should then be able to S JES3 and it should have all the RACF authority it 
needs. Likely it will have too much, but at this point, I'd not really worry 
about it.

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

 

 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Don Thimsen
 Sent: Thursday, April 07, 2011 9:23 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: JES3 on a zPDT running zOS 1.12?
 
 We're running two zPDT development systems with the IBM ADCD zOS 1.12 
 system. I'd like to convert one to a JES3 system for testing. 
  I found an older 
 webpage that documented the Steps to Configure JES3 on ADCD:
 
 http://dtsc.dfw.ibm.com/MVSDS/'HTTPD2.ADCD.JES3.HTML($README)'
 
 Note: You may need to cut and paste to view the link.
 
 There were several errors in the setup guide, but were not 
 difficult to work 
 through.  And all the JES3 data sets are available on the 
 ADCD system -they 
 reside on the ZCPRD2 volume.  However, all the datasets were RACF 
 protected (according to the VTOC), but there were no entries 
 in the RACF 
 DB.  I used the ADDSD command to set UACC(ALTER) for all the 
 JES3 data 
 sets.
 
 During the IPL for JES3, the system prompts for the JES3 COLD 
 start, and 
 after selecting the cold start member it seems to hang:
 
 09.06.37  *IAT3041 COLD START REQUIRED, ERROR READING 
 JESCKPNT  
  RECORD   
   
 09.06.37   IAT3011 SPECIFY JES3 START TYPE
   
 09.06.37  *01 IAT3011 (C, L, H, HA, HR, HAR, W, WA, 
 WR, WAR, OR 
  CANCEL)  
   
 09.06.37   CMP001I DFSMS COMPRESSION SERVICES 
 AVAILABLE 
 09.06.38   IEF404I BLSJPRMI - ENDED - TIME=09.06.38   
   
 09.06.41   CSV210I LIBRARY LOOKASIDE INITIALIZED  
   
 09.06.44   IRA600I SRM CHANNEL DATA NOW AVAILABLE FOR 
 ALL SRM   
  FUNCTIONS
   
 09.07.20   1,c   
 09.07.20   IEE600I REPLY TO 01 IS;C  
 09.07.20   IAT2063 ADCD UNABLE TO DETERMINE THE STATUS OF
  JESXCF GROUP NAVAIL - NOT PRESENT IN COMPLEX STATUS RECORD
 09.07.20  *02 IAT3012 SELECT JES3 INISH ORIGIN (N OR M=), AND
  OPTIONAL EXIT PARM (,P=) OR CANCEL  
 09.07.56   2,m=ft 
 
 09.07.56   IEE600I REPLY TO 02 IS;M=FT
 
 09.07.56   IAT6369  JES3 WAITING FOR CHECKPOINT DATA SET 
 RESERVE  
  -  CHKPNT ,ZCPRD2,0A86.  
 
 09.07.57   CSV028I ABEND806-04  JOBNAME=IEESYSAS  
 STEPNAME=JES3AUX
 09.07.57   IEF404I IEESYSAS - ENDED - TIME=09.07.57   
 
 09.08.36   IAT6397   FCT JSS  (NODEVICE) HAS BEEN 
 DISPATCHED
  CONTINUOUSLY FOR:
   
 09.08.36   IAT6398 0 HOURS  00 MINUTES  30 
 SECONDS  
 09.08.37   IAT6415 at 0002BDE2 in LOADMOD=IATINIC ,   
   
  EPNAME=IATINIC ,EPADDR=00027E70,LEN=004190   
   
 09.08.37  *03 IAT6418 Reply 'JES3' to fail JES3   
   
  INITIALIZATION or 'nnn' to ask later 
   
 
 
 At this point, I'm stuck and have zero JES3 experience to 
 fall back on.  I have 
 been reading the RedBook The ABCs of zOS System Programming 
 Volume 13, 
 and have successfully run the JES3INFT JES3 parms used for 
 the spool format 
 through the JES3 verify utility.
 
 

Re: JES3 on a zPDT running zOS 1.12?

2011-04-07 Thread McKown, John
Never mind. I totally misread your post. You're not having a RACF problem. the 
S806-4 would likely mean some DSN is not on the LNKLST. I don't know JES3.

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

 

 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of McKown, John
 Sent: Thursday, April 07, 2011 9:57 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: JES3 on a zPDT running zOS 1.12?
 
 Can you IPL with JES2 and do some RACF work? If so, then I'd 
 do the following RACF commands on JES2 to update RACF. Or, if 
 you have the RACF subsystem active on your system, you could 
 possibley LOGON to the z/OS console and issue the RACF 
 commands from there using the RACF subsystem command prefix. 
 I can do this on our system. The RACF commands would be 
 something like:
 
 ADDUSER JES3 NAME('JES3 STC') OWNER(SYS1) NOPASSWORD 
 DFLTGRP(SYS1) OPERATIONS
 
 RDEF STARTED JES3.* STDATA(USER(JES3) GROUP(SYS1) TRACE(YES) 
 TRUSTED(YES))
 
 
 You should then be able to S JES3 and it should have all the 
 RACF authority it needs. Likely it will have too much, but at 
 this point, I'd not really worry about it.
 
 --
 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
 
  
 
  -Original Message-
  From: IBM Mainframe Discussion List 
  [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Don Thimsen
  Sent: Thursday, April 07, 2011 9:23 AM
  To: IBM-MAIN@bama.ua.edu
  Subject: JES3 on a zPDT running zOS 1.12?
  
  We're running two zPDT development systems with the IBM 
 ADCD zOS 1.12 
  system. I'd like to convert one to a JES3 system for testing. 
   I found an older 
  webpage that documented the Steps to Configure JES3 on ADCD:
  
  http://dtsc.dfw.ibm.com/MVSDS/'HTTPD2.ADCD.JES3.HTML($README)'
  
  Note: You may need to cut and paste to view the link.
  
  There were several errors in the setup guide, but were not 
  difficult to work 
  through.  And all the JES3 data sets are available on the 
  ADCD system -they 
  reside on the ZCPRD2 volume.  However, all the datasets were RACF 
  protected (according to the VTOC), but there were no entries 
  in the RACF 
  DB.  I used the ADDSD command to set UACC(ALTER) for all the 
  JES3 data 
  sets.
  
  During the IPL for JES3, the system prompts for the JES3 COLD 
  start, and 
  after selecting the cold start member it seems to hang:
  
  09.06.37  *IAT3041 COLD START REQUIRED, ERROR READING 
  JESCKPNT  
   RECORD   

  09.06.37   IAT3011 SPECIFY JES3 START TYPE

  09.06.37  *01 IAT3011 (C, L, H, HA, HR, HAR, W, WA, 
  WR, WAR, OR 
   CANCEL)  

  09.06.37   CMP001I DFSMS COMPRESSION SERVICES 
  AVAILABLE 
  09.06.38   IEF404I BLSJPRMI - ENDED - TIME=09.06.38   

  09.06.41   CSV210I LIBRARY LOOKASIDE INITIALIZED  

  09.06.44   IRA600I SRM CHANNEL DATA NOW AVAILABLE FOR 
  ALL SRM   
   FUNCTIONS

  09.07.20   1,c  
  
  09.07.20   IEE600I REPLY TO 01 IS;C 
  
  09.07.20   IAT2063 ADCD UNABLE TO DETERMINE THE 
 STATUS OF
   JESXCF GROUP NAVAIL - NOT PRESENT IN COMPLEX STATUS 
 RECORD
  09.07.20  *02 IAT3012 SELECT JES3 INISH ORIGIN (N 
 OR M=), AND
   OPTIONAL EXIT PARM (,P=) OR CANCEL 
  
  09.07.56   2,m=ft   

Re: IPLed Volume- ISMF Panel

2011-04-07 Thread Gates, Guy
Hi All,

 She is asking about her SYSRES volume. Is anyone running with their SYSRES in 
an SMS Pool or Storage Group? 

 Does IBM even support a SYSRES being in a SMS POOL? I was under the impression 
that it is not supported, but I could be wrong. 

Thanks...Guy M. Gates Jr. 
TTI Z/OS Systems Programmer II 
Email: guy.ga...@ttiinc.com 
Mainframe-inspired reliability for optimal system uptime. 

-SNIP -

 
 From: IBM Mainframe Discussion List [IBM-MAIN@bama.ua.edu
 mailto:IBM-MAIN@bama.ua.edu] On Behalf Of SAURABH
 KHANDELWAL [saurabh.khandel...@oracle.com
 mailto:saurabh.khandel...@oracle.com]
 Sent: 07 April 2011 09:36
 To: IBM-MAIN@bama.ua.edu mailto:IBM-MAIN@bama.ua.edu
 Subject: IPLed Volume

 Hello,
  If I have two RES volume( example IPE100
 and IPE101) in
 my system, then how can I find the detail about

 1) from which RES volume my system is currently IPLed.
 2) Is there any option in SMPE panel, by which we can
 come to know about
 volume detail, my target datasets are pointing to. Also
 in which volume
 my DDDEF are defined ( example SYSUT1 and SYSUT2 etc)

 Regards
 Saurabh
-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: How/Why Is This Looping?

2011-04-07 Thread Jan MOEYERSONS
On Tue, 5 Apr 2011 08:06:50 -0500, Paul Gilmartin paulgboul...@aim.com wrote:

Thanks for the research.  The messages indicate that your HLQ is
SMS managed.  Mine isn't.  I suspect that can make the difference.

I did a test with non-SMS managed datasets. The end result is indeed not
quite as expected, and the behaviour is quite surprising...

Pre-SMS, I'd expect allocation to choose a different volume.

It did allocate a new DUP1 on a different volume. This one did not get
catalogued. That is expected. However, it was kept and that, I would not
have expected. Indeed, the allocate statement specifies delete for the
normal disposition, so it should really have deleted the one allocated on
the other volume.

The delete of the catalogued DUP1 failed and I don't quite understand why...

The rename did not take place because the DUP1 already (still) exists, but
that is to be expected when the delete has failed.

The free failed as well, saying the file(atomic) is not allocated. Again,
not what I expect, because the allocate has been successful...

I got 256 times the IEF237I B68F ALLOCATED TO SYS00nnn message. Very
strange, but not looping after all. Notice the first is for another volume
(the one where the other DUP1 got created. All other are for the volume
where the pre-existing DUP1 and DUP2 reside.

I leave it up to you to further investigate. I include the full log of my
job here.

Cheers,

Jantje.



1   J E S 2  J O B  L O G  --  S Y S T E M  T E S T  --  N O
D E  T M M E P R O D
0 
 17.11.43 JOB22420  THURSDAY,  07 APR 2011 
 17.11.43 JOB22420  IRR010I  USERID H3091VA  IS ASSIGNED TO THIS JOB.
 17.11.43 JOB22420  ICH70001I H3091VA  LAST ACCESS AT 17:10:25 ON THURSDAY,
APRIL 7, 2011
 17.11.43 JOB22420  #HASP373 JMO2659M STARTED - WLM INIT  - SRVCLASS SC650 
  - SYS TEST
 17.11.43 JOB22420  IEF403I JMO2659M - STARTED - TIME=17.11.43
 17.11.45 JOB22420  - --TIMINGS
(MINS.)--PAGING COUNTS---
 17.11.45 JOB22420  -JOBNAME  STEPNAME PROCSTEPRC   EXCPCPUSRB 
CLOCK   SERV  PG   PAGE   SWAPVIO SWAPS STEPNO
 17.11.45 JOB22420  -JMO2659M  RENAME  12282.00.00 
  .03   126K   0  0  0  0 0 1
 17.11.45 JOB22420  -JMO2659M  ENQ  FLUSH  0.00.00 
  .00  0   0  0  0  0 0 2
 17.11.45 JOB22420  IEF404I JMO2659M - ENDED - TIME=17.11.45
 17.11.45 JOB22420  -JMO2659M ENDED.  NAME- TOTAL CPU
TIME=   .00  TOTAL ELAPSED TIME=   .03
 17.11.45 JOB22420  #HASP395 JMO2659M ENDED
0-- JES2 JOB STATISTICS -- 
 
-  07 APR 2011 JOB EXECUTION DATE  
 
-   17 CARDS READ  
 
-  837 SYSOUT PRINT RECORDS
 
-0 SYSOUT PUNCH RECORDS
 
-   38 SYSOUT SPOOL KBYTES 
 
- 0.03 MINUTES EXECUTION TIME  
 
 1 //JMO2659M JOB 'NPAA.TMME.BATCH.COMPILE',   
   JOB22420
   // CLASS=N, 
   
   // MSGCLASS=X,MSGLEVEL=(1,1),   
   
   // NOTIFY=SYSUID   
   
   //* 
   
   //* 
   
  
//*.+|+|+|+|+|+|+|+|
   IEFC653I SUBSTITUTION JCL -
'NPAA.TMME.BATCH.COMPILE',CLASS=N,MSGCLASS=X,MSGLEVEL=(1,1),NOTIFY=H3091VA
 2 //RENAME   EXEC  PGM=IKJEFT01   
   
 3 //SYSTSPRT  DD   SYSOUT=(,) 
   
 4 //SYSTSIN   DD   *  
   
   //* 
   
 5 //ENQ  EXEC  PGM=IEFBR14,COND=(0,LE)
   
 6 //X DD   DISP=MOD,DSN='SYS2.BU.DUP1'
   
 ICH70001I H3091VA  LAST ACCESS AT 17:10:25 ON THURSDAY, APRIL 7, 2011
 IEF236I ALLOC. FOR JMO2659M RENAME
 IEF237I JES2 ALLOCATED TO 

Re: ABARS QUESTION

2011-04-07 Thread willie bunter
Hi John,
 
Check if the ABACKUP ACTIVITY log is available if not you could try running an 
ARECOVER with NOREPLACE.  If you have parm FILTEROUTPUTDATASE coded in the 
aggregate set up for the ABACKUP.
Good Luck

--- On Tue, 4/5/11, John Dawes jhn_da...@yahoo.com.au wrote:


From: John Dawes jhn_da...@yahoo.com.au
Subject: ABARS QUESTION
To: IBM-MAIN@bama.ua.edu
Received: Tuesday, April 5, 2011, 10:18 AM


G'Day To All,
 
I would like to know if there is something similar to the TTOC function in 
ABARS?  The reason I ask is that the tape is badly damaged and I would like to 
know what dsns are on the tape.  This application hasn't been run for over 1 
year.
 
Cheers
 
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

--
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: ABARS QUESTION

2011-04-07 Thread John Dawes
Willie,
 
Thanks for the suggestions.  I am unable to execute the ARECOVER because the 
tape is damaged. The ACTIVITY log is no longer available.   I checked the 
criteria in the ABACKUP and lo and behold their is the FILTEROUTPUTDATASET 
parm.  I am presently checking the dsns associated with this aggregate.
 
Thanks for the tip 
 
Cheers 

--- On Fri, 8/4/11, willie bunter williebun...@yahoo.com wrote:


From: willie bunter williebun...@yahoo.com
Subject: Re: ABARS QUESTION
To: IBM-MAIN@bama.ua.edu
Received: Friday, 8 April, 2011, 1:47 AM


Hi John,
 
Check if the ABACKUP ACTIVITY log is available if not you could try running an 
ARECOVER with NOREPLACE.  If you have parm FILTEROUTPUTDATASE coded in the 
aggregate set up for the ABACKUP.
Good Luck

--- On Tue, 4/5/11, John Dawes jhn_da...@yahoo.com.au wrote:


From: John Dawes jhn_da...@yahoo.com.au
Subject: ABARS QUESTION
To: IBM-MAIN@bama.ua.edu
Received: Tuesday, April 5, 2011, 10:18 AM


G'Day To All,
 
I would like to know if there is something similar to the TTOC function in 
ABARS?  The reason I ask is that the tape is badly damaged and I would like to 
know what dsns are on the tape.  This application hasn't been run for over 1 
year.
 
Cheers
 
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

--
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: JES3 on a zPDT running zOS 1.12?

2011-04-07 Thread Norbert Friemel
On Thu, 7 Apr 2011 09:23:22 -0500, Don Thimsen wrote:

09.07.57   CSV028I ABEND806-04  JOBNAME=IEESYSAS
STEPNAME=JES3AUX


Questions:

1) Is the reserve message on the checkpoint normal?


Yes

2) JES3AUX used to be optional, but in zOS 1.12, JES3 always attempts the
start.  Is is required?  And does it have it's own proc??

Yes. No.
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/iat2a690/2.7?DN=SA22-7549-09DT=20100701105608SHELF=ez2zo210CASE=PATH=/bookmgr/


Any suggestions would be appreciated,

JES3AUX must be defined to RACF with the trusted attribute
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/iat2a690/3.4?SHELF=ez2zo210DT=20100701105608#HDRJESSTRT

Check (again) LNKLST, LPALST, APF (SYS1.SIATxxx-Libs). IPL with CLPA is
required (LPALST change)

Norbert Friemel 

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


Re: How to start RMF Monitor III automatically after IPL the system.

2011-04-07 Thread Mark Zelden
On Thu, 7 Apr 2011 10:24:23 +0800, ibmnew ibm...@163.com wrote:

Hi all

 We don't have SA.

 How to start RMF Monitor III automatically after IPL the system?

Any suggestions is apprecited!


So many ways.   Long ago in our sandbox LPARs we just
used a home grown program that issued a command after a delay
time that was set in a parm.  Those commands were all part of
COMMNDxx in the parmlib concatenation.   Long ago, I got rid
of all that and use the COMMAND package from CBT file 19.  
Using that, there is a script started at IPL time with built in
delays.  After RMF is started, it delays 20 seconds and
does the F RMF,START III command.  

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/

*** Please note the new URL for Mark's MVS Utilities ***  

--
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: IPLed Volume- ISMF Panel

2011-04-07 Thread Ron Hawkins
Saurabh,

You can see the storage group for a given volser in RMFPP reports and RMF II 
online displays. RMF II would be DEV V(smsvol).

Ron

 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of
 SAURABH KHANDELWAL
 Sent: Thursday, April 07, 2011 3:25 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: [IBM-MAIN] IPLed Volume- ISMF Panel
 
 Thanks Rob. I am able to see storage group name against volume serial
 number.
 
 Regards
 Saurabh Khandelwal
 
 On 4/7/2011 3:46 PM, Rob Scott wrote:
  D SMS,VOL(volser)
 
 --
 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: IPLed Volume- ISMF Panel

2011-04-07 Thread SAURABH KHANDELWAL

Thanks alot. I am able to see volume detail with storage group.

Regards
Saurabh Khandelwal

On 4/7/2011 10:32 PM, Ron Hawkins wrote:

Saurabh,

You can see the storage group for a given volser in RMFPP reports and RMF II 
online displays. RMF II would be DEV V(smsvol).

Ron


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of
SAURABH KHANDELWAL
Sent: Thursday, April 07, 2011 3:25 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: [IBM-MAIN] IPLed Volume- ISMF Panel

Thanks Rob. I am able to see storage group name against volume serial
number.

Regards
Saurabh Khandelwal

On 4/7/2011 3:46 PM, Rob Scott wrote:

D SMS,VOL(volser)

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


RSU Receive Error

2011-04-07 Thread SAURABH KHANDELWAL

Hello,
   I am trying receiving RSU in to system. My unzip step 
completed successfully, but in REC step I am getting below error for the 
insufficient space.
  But I am able to know, where exactly the system is getting 
insufficient space.


Error :
IEW4000I FETCH FOR MODULE IDCAMS   FROM DDNAME -LNKLST- FAILED BECAUSE 
INSUFFICFFICIENT STORAGE WAS AVAILABLE.
CSV031I LIBRARY ACCESS FAILED FOR MODULE IDCAMS  , RETURN CODE 24, 
REASON CODE 26080021, DDNAME *LNKLST*



JCL used

//RSU1008C JOB (3623),'Saurabh',MSGCLASS=X,CLASS=A,
// NOTIFY=SYSUID
//UNZIPEXEC PGM=GIMUNZIP,PARM='HASH=NO'
//SYSUT3   DD UNIT=3390,SPACE=(CYL,(100,50))
//SYSUT4   DD UNIT=3390,SPACE=(CYL,(100,50))
//SMPOUT   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SMPDIR   DD PATH='/u/zos18',
//PATHDISP=KEEP
//SYSINDD DATA,DLM=$$
GIMUNZIP
ARCHDEF
name=SMPPTFIN/S0001.SHOPZ.S5192595.SMPMCS.pax.Z
volume=SPACD9
newname=SMPE.TEC1008.S5192595.SMPMCS
/ARCHDEF
ARCHDEF
name=SMPHOLD/S0002.SHOPZ.S5192595.SMPHOLD.pax.Z
volume=SPACD9
newname=SMPE.TEC1008.S5192595.SMPHOLD
/ARCHDEF
/GIMUNZIP
$$
//REC  EXEC PGM=IKJEFT01,COND=(4,LT,UNZIP)
//SMPCSI   DD DISP=SHR,
//DSN=SMPE.BIN8.GLOBAL.CSI
//SMPPTS   DD DISP=OLD,
//DSN=SMPE.BIN8.SMPPTS
//SMPOUT   DD SYSOUT=*
//SMPRPT   DD SYSOUT=*
//SMPLIST  DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SMPLOG   DD SYSOUT=*
//SMPLOGA  DD DUMMY
//SYSUT1   DD UNIT=3390,SPACE=(CYL,(100,50)),DISP=(,DELETE)
//SYSUT2   DD UNIT=3390,SPACE=(CYL,(100,50)),DISP=(,DELETE)
//SYSUT3   DD UNIT=3390,SPACE=(CYL,(100,50)),DISP=(,DELETE)
//SYSUT4   DD UNIT=3390,SPACE=(CYL,(100,50)),DISP=(,DELETE)
//SMPCNTL  DD DATA,DLM=$$
SETBOUNDARY (GLOBAL)
  .
RECEIVE
  .
$$
//SYSTSPRT DD SYSOUT=*
//SYSTSIN  DD DATA,DLM=$$
ALLOC FI(SMPPTFIN) SHR DA('SMPE.TEC1008.S5192595.SMPMCS')
ALLOC FI(SMPHOLD)  SHR DA('SMPE.TEC1008.S5192595.SMPHOLD')
CALL *(GIMSMP)
$$

--
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: RSU Receive Error

2011-04-07 Thread Barkow, Eileen
Specify a region size on the job card ..eg: REGION=8M

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
SAURABH KHANDELWAL
Sent: Thursday, April 07, 2011 1:14 PM
To: IBM-MAIN@bama.ua.edu
Subject: RSU Receive Error

Hello,
I am trying receiving RSU in to system. My unzip step 
completed successfully, but in REC step I am getting below error for the 
insufficient space.
   But I am able to know, where exactly the system is getting 
insufficient space.

Error :
IEW4000I FETCH FOR MODULE IDCAMS   FROM DDNAME -LNKLST- FAILED BECAUSE 
INSUFFICFFICIENT STORAGE WAS AVAILABLE.
CSV031I LIBRARY ACCESS FAILED FOR MODULE IDCAMS  , RETURN CODE 24, 
REASON CODE 26080021, DDNAME *LNKLST*


JCL used

//RSU1008C JOB (3623),'Saurabh',MSGCLASS=X,CLASS=A,
// NOTIFY=SYSUID
//UNZIPEXEC PGM=GIMUNZIP,PARM='HASH=NO'
//SYSUT3   DD UNIT=3390,SPACE=(CYL,(100,50))
//SYSUT4   DD UNIT=3390,SPACE=(CYL,(100,50))
//SMPOUT   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SMPDIR   DD PATH='/u/zos18',
//PATHDISP=KEEP
//SYSINDD DATA,DLM=$$
GIMUNZIP
ARCHDEF
name=SMPPTFIN/S0001.SHOPZ.S5192595.SMPMCS.pax.Z
volume=SPACD9
newname=SMPE.TEC1008.S5192595.SMPMCS
/ARCHDEF
ARCHDEF
name=SMPHOLD/S0002.SHOPZ.S5192595.SMPHOLD.pax.Z
volume=SPACD9
newname=SMPE.TEC1008.S5192595.SMPHOLD
/ARCHDEF
/GIMUNZIP
$$
//REC  EXEC PGM=IKJEFT01,COND=(4,LT,UNZIP)
//SMPCSI   DD DISP=SHR,
//DSN=SMPE.BIN8.GLOBAL.CSI
//SMPPTS   DD DISP=OLD,
//DSN=SMPE.BIN8.SMPPTS
//SMPOUT   DD SYSOUT=*
//SMPRPT   DD SYSOUT=*
//SMPLIST  DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SMPLOG   DD SYSOUT=*
//SMPLOGA  DD DUMMY
//SYSUT1   DD UNIT=3390,SPACE=(CYL,(100,50)),DISP=(,DELETE)
//SYSUT2   DD UNIT=3390,SPACE=(CYL,(100,50)),DISP=(,DELETE)
//SYSUT3   DD UNIT=3390,SPACE=(CYL,(100,50)),DISP=(,DELETE)
//SYSUT4   DD UNIT=3390,SPACE=(CYL,(100,50)),DISP=(,DELETE)
//SMPCNTL  DD DATA,DLM=$$
SETBOUNDARY (GLOBAL)
   .
RECEIVE
   .
$$
//SYSTSPRT DD SYSOUT=*
//SYSTSIN  DD DATA,DLM=$$
ALLOC FI(SMPPTFIN) SHR DA('SMPE.TEC1008.S5192595.SMPMCS')
ALLOC FI(SMPHOLD)  SHR DA('SMPE.TEC1008.S5192595.SMPHOLD')
CALL *(GIMSMP)
$$

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


April 7, 1964 IBM Announces System 360 Computer Family

2011-04-07 Thread Knutson, Sam
From http://www.computerhistory.org/tdih/ 


April 7, 1964

IBM Announces System 360 Computer Family

IBM announces the release of its System 360 mainframe computer
architecture--embodied in five new models--launching its most successful
computer system of all time. Called the 360 because it was meant to
address all possible sizes and types of customer with one unified
software-compatible architecture, the 360 family of machines generated
in excess of $100 billion in revenue for IBM.
After five years of turbulent development, the Models 30, 40, 50, 60/62,
and 70 were introduced along with 150 new supporting products, with IBM
proudly claiming that software written for one model of System/360 could
run on any other. This allowed customers to add or remove computing
capacity without losing their investment in software. This had been a
serious problem before the 360 with IBM alone having seven different,
mutually-incompatible mainframe computer systems.
The 360 architecture was the basis for all subsequent mainframe
architectures developed at IBM, as well as at IBM's many
plug-compatible imitators. Its standardization of interfaces and
methods allowed other companies to carve out a niche in the
360-dominated computer ecosystem. Throughout most of the 1960s, the
System/360's success gave IBM a 65% market share, prompting observers to
term the industry Snow White (IBM) and the Seven Dwarfs. In 1965, the
relative market shares were: 

1. IBM: 65.3%
2. Sperry Rand (formerly Remington Rand): 12.1% 
3. Control Data Corp.: 5.4%
4. Honeywell (formerly a division of Raytheon): 3.8%
5. Burroughs: 3.5% 
6. General Electric: 3.4%
7. RCA: 2.9% 
8. NCR (National Cash Register): 2.9% 
9. The oft-forgotten eighth dwarf, Philco: 0.7%








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

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


Re: ADRDSSU issue

2011-04-07 Thread Justin Eastman
VSAM data sets are required to be cataloged.  If you look up the ADR468E
message is says:
If the REPLACE or REPLACEUNCONDITIONAL keyword was not specified, one of the
following conditions applies:

* If DELETE is specified and the entry name is a SYS1., page, or swap
data set, the RENAMEUNCONDITIONAL or PROCESS(SYS1) subparameter was not
specified.

* If the entry name is a cluster name and DELETE was not specified: (1)
the RENAMEUNCONDITIONAL subparameter was not specified or (2) the RECAT
subparameter was not specified.

* If the entry name is an alternate index or a user catalog name: (1)
the DELETE subparameter was not specified or (2) the RENAMEUNCONDITIONAL
subparameter was specified.

* If the entry name is a user catalog name, INDDNAME or INDYNAM was
specified. 

So you either need to specify the DELETE keyword if you are trying to move
the data sets.  If you are not trying to move the data sets and just want
another copy then you need to specify the RECAT(catalogname) where the
catalog catalogname is not in the standard order of search (no alias defined
to the master catalog).  Or if you are trying to just have a copy with a new
name then you need to specify the RENAMEU(high_level_qualifier) to rename
the data set's high level qualifier to which will then catalog the target
VSAM data sets with the new name (other renaming options are available, look
up the RENAMEU keyword in the DSS Storage Admin Guide).  

Some of your non-VSAM data sets may have been copied because they do not
have the requirement to be cataloged.  So then there is no conflict because
they can be copied and leave the target data set uncataloged. 

BYPASSACS(**) and NSC will bypass the ACS routines and allow you to direct
the datasets to a non-SMS volume.  Keep in mind though that some data set
types require SMS management.

Hope that helps.  

Justin Eastman 
IBM DFSMSdss Development

--
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: Accessing MF Data From Distributed Systems

2011-04-07 Thread Hal Merritt
I was looking only at your past point: .. convert each field to ASCII and 
appropriate
numeric formats. 

How would you know where each field was and what it was? Without the orignal 
programs, I'd say just about impossible.  



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Ron Hawkins
Sent: Wednesday, April 06, 2011 9:31 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Accessing MF Data From Distributed Systems

Hal I have to agree.

The data written to the ATL on FICON channels will be CKD structure which is
encapsulated into SCSI FBA at some point between the FICON interface and
disk buffer. It's all SCSI after that.

To read the data on the mainframe tapes from Fibre Channel the ATL vendor
would likely have to provide an API that understands the proprietary
encapsulation process in order to read the SCSI blocks, strip of the
wrappers and reassemble the CKD blocks. Once the block is assembled it would
have to be passed to another procedure to process the block based on its
format (FB, VB, VBS. Etc), and convert each field to ASCII and appropriate
numeric formats.

The short answer is I think they are screwed unless they export the tapes to
another compatible ATL and read them with FICON.

Ron

 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of
 Hal Merritt
 Sent: Wednesday, April 06, 2011 1:14 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: [IBM-MAIN] Accessing MF Data From Distributed Systems
 
 Short answer: most likely no.
 
 You might could 'access' the data, but would have little hope of making
any
 sense of it. I'd take a look at a contingency contract with a service
 provider.
 
 And test the service, of course.
 
 
 
 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of
 Dazzo, Matt
 Sent: Wednesday, April 06, 2011 2:08 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: Accessing MF Data From Distributed Systems
 
 Luckily this required info is not for our shop,  another MF is biting the
dust
 here in the north east. The powers that be are concerned about accessing
data
 that resides in a VTS/ATL device once the plug is pulled on the MF, should
 there be a need to. Is there any software/hardware product that provides
the
 capability to access data in that device from a distributed platform, most
 likely HP or Linux. That's all the info I have for now.
 
 Anybody been there, done that?
 
 Thanks Matt
 
 --
 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
 NOTICE: This electronic mail message and any files transmitted with it are
 intended
 exclusively for the individual or entity to which it is addressed. The
 message,
 together with any attachment, may contain confidential and/or privileged
 information.
 Any unauthorized review, use, printing, saving, copying, disclosure or
 distribution
 is strictly prohibited. If you have received this message in error, please
 immediately advise the sender by reply email and delete all copies.
 
 --
 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
NOTICE: This electronic mail message and any files transmitted with it are 
intended
exclusively for the individual or entity to which it is addressed. The message, 
together with any attachment, may contain confidential and/or privileged 
information.
Any unauthorized review, use, printing, saving, copying, disclosure or 
distribution 
is strictly prohibited. If you have received this message in error, please 
immediately advise the sender by reply email and delete all copies.

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


Identifying Latest zOS Fixes

2011-04-07 Thread Tony Lessells
Hi all,

our management have asked us to do a weekly review of new PTFs to ensure 
we apply any that are relevant. I realise there are flaws to this but who am I 
to argue.
However I don't really know where to start - we've a mixture of zOS 1.9 
(under extended support) and 1.11 systems - is there somewhere on IBM 
support that simply lists all the latest PTFs? I have tried using the My 
Notifications under Electronic Support but wasn't convinced this gave me a 
definitive list.

Any advice on where to start on this would be appreciated. 
Thanks. Tony.

--
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: Identifying Latest zOS Fixes

2011-04-07 Thread Mark Jacobs
Does the phrase 'Labors of Hercules' ring a bell with you? Seriously 
though, I'd just utilize the report missing fix functionally of SMP/E 
and use that information as the focus of your maintenance processes.


Mark Jacobs

On 04/07/11 13:42, Tony Lessells wrote:

Hi all,

our management have asked us to do a weekly review of new PTFs to ensure
we apply any that are relevant. I realise there are flaws to this but who am I
to argue.
However I don't really know where to start - we've a mixture of zOS 1.9
(under extended support) and 1.11 systems - is there somewhere on IBM
support that simply lists all the latest PTFs? I have tried using the My
Notifications under Electronic Support but wasn't convinced this gave me a
definitive list.

Any advice on where to start on this would be appreciated.
Thanks. Tony.

   

--

Mark Jacobs
Time Customer Service
Tampa, FL


A schlemiel is a waiter who spills hot soup, and
the schlimazel is the one who gets it in his lap.

--
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: Identifying Latest zOS Fixes

2011-04-07 Thread Barkow, Eileen
Look at preventive service planning on ibmlink-

Select maint search on left, then z/os, fill in system (z/os from menu) and 
year and put level



https://www-304.ibm.com/ibmlink/psp/submit.wss



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Tony Lessells
Sent: Thursday, April 07, 2011 1:43 PM
To: IBM-MAIN@bama.ua.edu
Subject: Identifying Latest zOS Fixes



Hi all,



our management have asked us to do a weekly review of new PTFs to ensure

we apply any that are relevant. I realise there are flaws to this but who am I

to argue.

However I don't really know where to start - we've a mixture of zOS 1.9

(under extended support) and 1.11 systems - is there somewhere on IBM

support that simply lists all the latest PTFs? I have tried using the My

Notifications under Electronic Support but wasn't convinced this gave me a

definitive list.



Any advice on where to start on this would be appreciated.

Thanks. Tony.



--

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

2011-04-07 Thread Schwarz, Barry A
No, the space parameter cannot tell the system the DSORG is PS.  At best, it 
tells the system the DSORG is not PO.  That still leaves PS, VS, IS, DA, etc.

You have to use DSORG=PS because you wrote the ACS routine to check for that 
particular attribute.  If you want to eliminate the need for the extra JCL, 
there are some options that you might be able to implement:

Can you assign the data class to every dataset that matches the naming 
convention, regardless of DSORG?  If so, simply remove the unnecessary check in 
the ACS routine.

If not, change the check in the ACS routine from DSORG EQ PS to DSORG 
NE (PO, VS, IS, DA, etc)

Barry Schwarz
OS/390 System Programmer
M/S 80-JE
Phone: 253-657-5262
Fax: 253-657-8574

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
ibmnew
Sent: Wednesday, April 06, 2011 8:11 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: DATACLASS

Hi

 Thanks your answers.

 I am sorry that I just came back by holiday

Today I submit the following JCL:
//ALOCHSKP EXEC PGM=IEFBR14
//MESSAGE  DD DSN=ABSP.CEB.TEST9,DISP=(NEW,CATLG,DELETE),
//UNIT=3390,SPACE=(4096,(10,10)),
// DCB=(LRECL=300,BLKSIZE=27900,RECFM=FB)

Below is the output: Data class . . . . . : DCSTD

snip

Then I submit the other JCL below:
//ALOCHSKP EXEC PGM=IEFBR14
//MESSAGE  DD DSN=ABSP.CEB.TEST8,DISP=(NEW,CATLG,DELETE),
//UNIT=3390,SPACE=(4096,(10,10)),DSORG=PS,
// DCB=(LRECL=300,BLKSIZE=27900,RECFM=FB)

The output is below:Data class . . . . . : DCPS

snip

My question:

 When I allocate a dataset using PGM=IEFBR14  with  SPACE=(4096,(10,10)),
 Could the parm of space ask system to allocate a PS dataset?

Why do we must use DSORG=PS in the JCL?

--
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: RSU Receive Error

2011-04-07 Thread R.S.

W dniu 2011-04-07 19:14, SAURABH KHANDELWAL pisze:

Hello,
I am trying receiving RSU in to system. My unzip step completed
successfully, but in REC step I am getting below error for the
insufficient space.
But I am able to know, where exactly the system is getting insufficient
space.

Error :
IEW4000I FETCH FOR MODULE IDCAMS FROM DDNAME -LNKLST- FAILED BECAUSE
INSUFFICFFICIENT STORAGE WAS AVAILABLE.
CSV031I LIBRARY ACCESS FAILED FOR MODULE IDCAMS , RETURN CODE 24, REASON
CODE 26080021, DDNAME *LNKLST*


JCL used

//RSU1008C JOB (3623),'Saurabh',MSGCLASS=X,CLASS=A,
// NOTIFY=SYSUID
//UNZIP EXEC PGM=GIMUNZIP,PARM='HASH=NO'
//SYSUT3 DD UNIT=3390,SPACE=(CYL,(100,50))
//SYSUT4 DD UNIT=3390,SPACE=(CYL,(100,50))
//SMPOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SMPDIR DD PATH='/u/zos18',
// PATHDISP=KEEP
//SYSIN DD DATA,DLM=$$
GIMUNZIP
ARCHDEF
name=SMPPTFIN/S0001.SHOPZ.S5192595.SMPMCS.pax.Z
volume=SPACD9
newname=SMPE.TEC1008.S5192595.SMPMCS
/ARCHDEF
ARCHDEF
name=SMPHOLD/S0002.SHOPZ.S5192595.SMPHOLD.pax.Z
volume=SPACD9
newname=SMPE.TEC1008.S5192595.SMPHOLD
/ARCHDEF
/GIMUNZIP
$$
//REC EXEC PGM=IKJEFT01,COND=(4,LT,UNZIP)
//SMPCSI DD DISP=SHR,
// DSN=SMPE.BIN8.GLOBAL.CSI
//SMPPTS DD DISP=OLD,
// DSN=SMPE.BIN8.SMPPTS
//SMPOUT DD SYSOUT=*
//SMPRPT DD SYSOUT=*
//SMPLIST DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SMPLOG DD SYSOUT=*
//SMPLOGA DD DUMMY
//SYSUT1 DD UNIT=3390,SPACE=(CYL,(100,50)),DISP=(,DELETE)
//SYSUT2 DD UNIT=3390,SPACE=(CYL,(100,50)),DISP=(,DELETE)
//SYSUT3 DD UNIT=3390,SPACE=(CYL,(100,50)),DISP=(,DELETE)
//SYSUT4 DD UNIT=3390,SPACE=(CYL,(100,50)),DISP=(,DELETE)
//SMPCNTL DD DATA,DLM=$$
SET BOUNDARY (GLOBAL)
.
RECEIVE
.
$$
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD DATA,DLM=$$
ALLOC FI(SMPPTFIN) SHR DA('SMPE.TEC1008.S5192595.SMPMCS')
ALLOC FI(SMPHOLD) SHR DA('SMPE.TEC1008.S5192595.SMPHOLD')
CALL *(GIMSMP)
$$


Don't confuse space on disk with space in main memory (RAM).
The meesages above regard memory (RAM), not disk.
You should increase REGION for the step, i.e. by REGION=xxM to the UNZIP 
EXEC statement. I would suggest you to be generous, i.e. specify 48M.


--
Radoslaw Skorupka
Lodz, Poland


--
Treść tej wiadomości może zawierać informacje prawnie chronione Banku 
przeznaczone wyłącznie do użytku służbowego adresata. Odbiorcą może być jedynie 
jej adresat z wyłączeniem dostępu osób trzecich. Jeżeli nie jesteś adresatem 
niniejszej wiadomości lub pracownikiem upoważnionym do jej przekazania 
adresatowi, informujemy, że jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne działanie o podobnym charakterze jest prawnie zabronione i może być 
karalne. Jeżeli otrzymałeś tę wiadomość omyłkowo, prosimy niezwłocznie 
zawiadomić nadawcę wysyłając odpowiedź oraz trwale usunąć tę wiadomość 
włączając w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorised to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. 


BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00, fax 
+48 (22) 829 00 33, e-mail: i...@brebank.pl
Sąd Rejonowy dla m. st. Warszawy XII Wydział Gospodarczy Krajowego Rejestru Sądowego, nr rejestru przedsiębiorców KRS 025237, NIP: 526-021-50-88. 
Według stanu na dzień 01.01.2011 r. kapitał zakładowy BRE Banku SA (w całości wpłacony) wynosi 168.346.696 złotych.


--
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: Accessing MF Data From Distributed Systems

2011-04-07 Thread R.S.

W dniu 2011-04-07 19:38, Hal Merritt pisze:

I was looking only at your past point: .. convert each field to ASCII and 
appropriate
numeric formats.

How would you know where each field was and what it was? Without the orignal 
programs, I'd say just about impossible.



IMHO the problem is upside down. Author started from hardware, but he 
should start from application data.


The goal is to have old application data available. Available means able 
to read *by existing* tools, with known format and content.


Connecting hardware or interpreting CKD (it's tape, I know) data on PC 
could be a method. Much easier method is to export (ftp with 
EBCDIC-ASCII conversion) data to PC side. I bet that few commodity 
disks 2TB each would be enough to store the data. Last, but not least - 
the real issue is to identify relevant, or maybe_relevant or 
I_don't_think_so,_but_who_knows data. It should be subset of mainframe 
data, IMHO quite small one.


Data selection require application knowledge... but even still having 
mainframe up and ready requires that! In other words, NO NEW KNOWLEDGE 
IS REQUIRED for the process.


My €0.02
--
Radoslaw Skorupka
Lodz, Poland


--
Tre tej wiadomoci moe zawiera informacje prawnie chronione Banku 
przeznaczone wycznie do uytku subowego adresata. Odbiorc moe by jedynie 
jej adresat z wyczeniem dostpu osób trzecich. Jeeli nie jeste adresatem 
niniejszej wiadomoci lub pracownikiem upowanionym do jej przekazania 
adresatowi, informujemy, e jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne dziaanie o podobnym charakterze jest prawnie zabronione i moe by 
karalne. Jeeli otrzymae t wiadomo omykowo, prosimy niezwocznie 
zawiadomi nadawc wysyajc odpowied oraz trwale usun t wiadomo 
wczajc w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorised to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. 


BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00, fax 
+48 (22) 829 00 33, e-mail: i...@brebank.pl
Sd Rejonowy dla m. st. Warszawy XII Wydzia Gospodarczy Krajowego Rejestru Sdowego, nr rejestru przedsibiorców KRS 025237, NIP: 526-021-50-88. 
Wedug stanu na dzie 01.01.2011 r. kapita zakadowy BRE Banku SA (w caoci wpacony) wynosi 168.346.696 zotych.


--
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: Identifying Latest zOS Fixes

2011-04-07 Thread Skip Robinson
First off, you don't want to track 'PTFs' so much as APARs. Often a single 
APAR applies to multiple release levels, each of which will have its own 
unique PTF. If you track and order by APAR, you can submit essentially the 
same order for each level (CSI) that you support. 

As far as knowing what to track, I use...

-- ASAP, a function of ServiceLink. Unfortunately I have not found a slick 
way to tell ASAP about the FMIDs I want to track, but once you get them 
all defined, you will get notified of important APARs for each tracked 
FMID. 'Important' generally means PE, HIPER, or ATTENTION. There are 
frequent, more or less daily, updates, but the number is not overwhelming. 


-- FIXCAT (fix category). This info comes along with HOLDDATA when you 
download 'ALL' data. A FIXCAT report tells you what important PTFs you're 
missing. 'Important' here is defined by each support organization, which 
supplies the HOLDDATA. 

If you report the results of these tracking mechanisms, you should satisfy 
this rather onerous demand. (Think pointy haired boss.) BTW any tracking 
method may have trouble with z/OS 1.9, which despite your contract is 
technically 'unsupported'. 

.
.
JO.Skip Robinson
SCE Infrastructure Technology Services
Electric Dragon Team Paddler 
SHARE MVS Program Co-Manager
626-302-7535 Office
323-715-0595 Mobile
jo.skip.robin...@sce.com



From:   Barkow, Eileen ebar...@doitt.nyc.gov
To: IBM-MAIN@bama.ua.edu
Date:   04/07/2011 11:16 AM
Subject:Re: Identifying Latest zOS Fixes
Sent by:IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu



Look at preventive service planning on ibmlink-

Select maint search on left, then z/os, fill in system (z/os from menu) 
and year and put level



https://www-304.ibm.com/ibmlink/psp/submit.wss



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On 
Behalf Of Tony Lessells
Sent: Thursday, April 07, 2011 1:43 PM
To: IBM-MAIN@bama.ua.edu
Subject: Identifying Latest zOS Fixes



Hi all,



our management have asked us to do a weekly review of new PTFs to ensure

we apply any that are relevant. I realise there are flaws to this but who 
am I

to argue.

However I don't really know where to start - we've a mixture of zOS 1.9

(under extended support) and 1.11 systems - is there somewhere on IBM

support that simply lists all the latest PTFs? I have tried using the My

Notifications under Electronic Support but wasn't convinced this gave me a

definitive list.



Any advice on where to start on this would be appreciated.

Thanks. Tony.


--
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: JES3 on a zPDT running zOS 1.12?

2011-04-07 Thread Don Thimsen
Many Thanks.  

The problem turned out to be a LNKLST error.  I've now IPL'd the system and 
performed a cold start with JES3.  

Don

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Norbert Friemel
Sent: Thursday, April 07, 2011 12:34 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: JES3 on a zPDT running zOS 1.12?

On Thu, 7 Apr 2011 09:23:22 -0500, Don Thimsen wrote:

09.07.57   CSV028I ABEND806-04  JOBNAME=IEESYSAS
STEPNAME=JES3AUX


Questions:

1) Is the reserve message on the checkpoint normal?


Yes

2) JES3AUX used to be optional, but in zOS 1.12, JES3 always attempts 
the start.  Is is required?  And does it have it's own proc??

Yes. No.
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/iat2a690/2.7?DN=SA22-7549-09DT=20100701105608SHELF=ez2zo210CASE=PATH=/bookmgr/


Any suggestions would be appreciated,

JES3AUX must be defined to RACF with the trusted attribute 
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/iat2a690/3.4?SHELF=ez2zo210DT=20100701105608#HDRJESSTRT

Check (again) LNKLST, LPALST, APF (SYS1.SIATxxx-Libs). IPL with CLPA is 
required (LPALST change)

Norbert Friemel 

--
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: Identifying Latest zOS Fixes

2011-04-07 Thread Craig Pace
One way to accomplish this would be to order, using ShopzSeries, all new 
PTFs based off of a Service report of your SMP/E environment.  You can 
find information on the ShopzSeries web-site about information on ordering 
using the report and how to create these reports.  This will order the new 
PTFs based off your current SMP/E environment which can then be manually 
review for system impact and/or relavenance.

As am sure you have already noted:  The man power for this, depending on 
your shop's size, could be a full-time FTE or more.
 
Craig

 



Skip Robinson jo.skip.robin...@sce.com 
Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu
04/07/2011 03:10 PM
Please respond to
IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu


To
IBM-MAIN@bama.ua.edu
cc

Subject
Re: Identifying Latest zOS Fixes






First off, you don't want to track 'PTFs' so much as APARs. Often a single 

APAR applies to multiple release levels, each of which will have its own 
unique PTF. If you track and order by APAR, you can submit essentially the 

same order for each level (CSI) that you support. 

As far as knowing what to track, I use...

-- ASAP, a function of ServiceLink. Unfortunately I have not found a slick 

way to tell ASAP about the FMIDs I want to track, but once you get them 
all defined, you will get notified of important APARs for each tracked 
FMID. 'Important' generally means PE, HIPER, or ATTENTION. There are 
frequent, more or less daily, updates, but the number is not overwhelming. 



-- FIXCAT (fix category). This info comes along with HOLDDATA when you 
download 'ALL' data. A FIXCAT report tells you what important PTFs you're 
missing. 'Important' here is defined by each support organization, which 
supplies the HOLDDATA. 

If you report the results of these tracking mechanisms, you should satisfy 

this rather onerous demand. (Think pointy haired boss.) BTW any tracking 
method may have trouble with z/OS 1.9, which despite your contract is 
technically 'unsupported'. 

.
.
JO.Skip Robinson
SCE Infrastructure Technology Services
Electric Dragon Team Paddler 
SHARE MVS Program Co-Manager
626-302-7535 Office
323-715-0595 Mobile
jo.skip.robin...@sce.com



From:   Barkow, Eileen ebar...@doitt.nyc.gov
To: IBM-MAIN@bama.ua.edu
Date:   04/07/2011 11:16 AM
Subject:Re: Identifying Latest zOS Fixes
Sent by:IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu



Look at preventive service planning on ibmlink-

Select maint search on left, then z/os, fill in system (z/os from menu) 
and year and put level



https://www-304.ibm.com/ibmlink/psp/submit.wss



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On 
Behalf Of Tony Lessells
Sent: Thursday, April 07, 2011 1:43 PM
To: IBM-MAIN@bama.ua.edu
Subject: Identifying Latest zOS Fixes



Hi all,



our management have asked us to do a weekly review of new PTFs to ensure

we apply any that are relevant. I realise there are flaws to this but who 
am I

to argue.

However I don't really know where to start - we've a mixture of zOS 1.9

(under extended support) and 1.11 systems - is there somewhere on IBM

support that simply lists all the latest PTFs? I have tried using the My

Notifications under Electronic Support but wasn't convinced this gave me a

definitive list.



Any advice on where to start on this would be appreciated.

Thanks. Tony.


--
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 communication contains information which is confidential and
may also be privileged. It is for the exclusive use of the intended
recipient(s). If you are not the intended recipient(s), please note
that any distribution, copying or use of this communication or the
information in it is strictly prohibited. If you have received this
communication in error, please notify the sender immediately and
then destroy any copies of it.
**

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


Re: Identifying Latest zOS Fixes

2011-04-07 Thread Gibney, Dave
I run a:
RECEIVE SYSMODS HOLDDATA  
ORDER(ORDERSERVER(ORDSRVR)
CONTENT(ALL)) 
DELETEPKG.

And :
REPORT ERRSYSMODS ZONES(IFCHECK) .
REPORT MISSINGFIX FIXCAT(*) ZONES(IFCHECK) .

Generally every day. That way I have all the fixes here. I don't
review it everyday. I run an APPLY CHECK often enough that I know what
needs to be held if I want to apply anything in response to a problem.

As needed or a couple three times a year, I APPLY SOURCEID ( RSU* HIPER
PRP   IBM*  ) 

I'm rethinking HIPER and maybe RSU*. Last time I ran this, I seem to
have put a IOSAS real storage leak (or more likely invalid reporting of
such) on.   It was RSU and not HELD.

Still, with this procedure, I rarely have a problem that causes
difficulty.
   
Dave Gibney
Information Technology Services
Washington State University


 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
 Behalf Of Craig Pace
 Sent: Thursday, April 07, 2011 2:35 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: Identifying Latest zOS Fixes
 
 One way to accomplish this would be to order, using ShopzSeries, all
new
 PTFs based off of a Service report of your SMP/E environment.  You can
find
 information on the ShopzSeries web-site about information on ordering
 using the report and how to create these reports.  This will order the
new
 PTFs based off your current SMP/E environment which can then be
manually
 review for system impact and/or relavenance.
 
 As am sure you have already noted:  The man power for this, depending
on
 your shop's size, could be a full-time FTE or more.
 
 Craig
 
 
 
 
 
 Skip Robinson jo.skip.robin...@sce.com Sent by: IBM Mainframe
 Discussion List IBM-MAIN@bama.ua.edu
 04/07/2011 03:10 PM
 Please respond to
 IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu
 
 
 To
 IBM-MAIN@bama.ua.edu
 cc
 
 Subject
 Re: Identifying Latest zOS Fixes
 
 
 
 
 
 
 First off, you don't want to track 'PTFs' so much as APARs. Often a
single
 
 APAR applies to multiple release levels, each of which will have its
own
 unique PTF. If you track and order by APAR, you can submit essentially
the
 
 same order for each level (CSI) that you support.
 
 As far as knowing what to track, I use...
 
 -- ASAP, a function of ServiceLink. Unfortunately I have not found a
slick
 
 way to tell ASAP about the FMIDs I want to track, but once you get
them
 all defined, you will get notified of important APARs for each tracked
 FMID. 'Important' generally means PE, HIPER, or ATTENTION. There are
 frequent, more or less daily, updates, but the number is not
overwhelming.
 
 
 
 -- FIXCAT (fix category). This info comes along with HOLDDATA when you
 download 'ALL' data. A FIXCAT report tells you what important PTFs
you're
 missing. 'Important' here is defined by each support organization,
which
 supplies the HOLDDATA.
 
 If you report the results of these tracking mechanisms, you should
satisfy
 
 this rather onerous demand. (Think pointy haired boss.) BTW any
tracking
 method may have trouble with z/OS 1.9, which despite your contract is
 technically 'unsupported'.
 
 .
 .
 JO.Skip Robinson
 SCE Infrastructure Technology Services
 Electric Dragon Team Paddler
 SHARE MVS Program Co-Manager
 626-302-7535 Office
 323-715-0595 Mobile
 jo.skip.robin...@sce.com
 
 
 
 From:   Barkow, Eileen ebar...@doitt.nyc.gov
 To: IBM-MAIN@bama.ua.edu
 Date:   04/07/2011 11:16 AM
 Subject:Re: Identifying Latest zOS Fixes
 Sent by:IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu
 
 
 
 Look at preventive service planning on ibmlink-
 
 Select maint search on left, then z/os, fill in system (z/os from
menu)
 and year and put level
 
 
 
 https://www-304.ibm.com/ibmlink/psp/submit.wss
 
 
 
 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
 Behalf Of Tony Lessells
 Sent: Thursday, April 07, 2011 1:43 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: Identifying Latest zOS Fixes
 
 
 
 Hi all,
 
 
 
 our management have asked us to do a weekly review of new PTFs to
 ensure
 
 we apply any that are relevant. I realise there are flaws to this but
who
 am I
 
 to argue.
 
 However I don't really know where to start - we've a mixture of zOS
1.9
 
 (under extended support) and 1.11 systems - is there somewhere on IBM
 
 support that simply lists all the latest PTFs? I have tried using the
My
 
 Notifications under Electronic Support but wasn't convinced this gave
me a
 
 definitive list.
 
 
 
 Any advice on where to start on this would be appreciated.
 
 Thanks. Tony.
 
 
 --
 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 communication 

Re: Accessing MF Data From Distributed Systems

2011-04-07 Thread Ron Hawkins
Radoslaw,

Nice catch. I was reading ATL and thinking TMM.

Ron

 
 Connecting hardware or interpreting CKD (it's tape, I know) data on PC
 could be a method. 
 

--
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: EMail attachments stopped working

2011-04-07 Thread John Mattson
Just to add to the fun:  CSSMTP has a LRECL limit of 512   We went to zOS 
1.11 and started using CSSMTP and after my programmers adjusted to the 
previous limit, they got hit with the new limit.  No good deed goes 
unpunished.  Now, really, I like the idea of CSSMTP, but if it is going to 
replace something, it should not change such things. 



From:   Bryan Klimek klimek.br...@mayo.edu
To: IBM-MAIN@bama.ua.edu
Date:   01/18/2011 06:22 PM
Subject:Re: EMail attachments stopped working
Sent by:IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu



I know the original poster said they were using z/OS 1.8 and this does not
address the original problem. But IBM now has a replacement SMTP client 
for
z/OS.

http://publib.boulder.ibm.com/infocenter/ieduasst/stgv1r0/topic/com.ibm.iea.commserv_v1/commserv/1.11z/appl/cssmtp.pdf


We made the switch a couple months ago with very little effort.

Bryan Klimek
Mayo Clinic

--
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: RSU Receive Error

2011-04-07 Thread Anthony Thompson
Space referred to is virtual storage. The explanation for message IEW4000I 
makes that quite plain. Run the receive job with a larger region size. I 
typically use REGION=0M for SMP/e jobs.

Ant.
Northern Territory Govt., Australia

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
SAURABH KHANDELWAL
Sent: Friday, 8 April 2011 2:44 AM
To: IBM-MAIN@bama.ua.edu
Subject: RSU Receive Error

Hello,
I am trying receiving RSU in to system. My unzip step 
completed successfully, but in REC step I am getting below error for the 
insufficient space.
   But I am able to know, where exactly the system is getting 
insufficient space.

Error :
IEW4000I FETCH FOR MODULE IDCAMS   FROM DDNAME -LNKLST- FAILED BECAUSE 
INSUFFICFFICIENT STORAGE WAS AVAILABLE.
CSV031I LIBRARY ACCESS FAILED FOR MODULE IDCAMS  , RETURN CODE 24, 
REASON CODE 26080021, DDNAME *LNKLST*


JCL used

//RSU1008C JOB (3623),'Saurabh',MSGCLASS=X,CLASS=A,
// NOTIFY=SYSUID
//UNZIPEXEC PGM=GIMUNZIP,PARM='HASH=NO'
//SYSUT3   DD UNIT=3390,SPACE=(CYL,(100,50))
//SYSUT4   DD UNIT=3390,SPACE=(CYL,(100,50))
//SMPOUT   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SMPDIR   DD PATH='/u/zos18',
//PATHDISP=KEEP
//SYSINDD DATA,DLM=$$
GIMUNZIP
ARCHDEF
name=SMPPTFIN/S0001.SHOPZ.S5192595.SMPMCS.pax.Z
volume=SPACD9
newname=SMPE.TEC1008.S5192595.SMPMCS
/ARCHDEF
ARCHDEF
name=SMPHOLD/S0002.SHOPZ.S5192595.SMPHOLD.pax.Z
volume=SPACD9
newname=SMPE.TEC1008.S5192595.SMPHOLD
/ARCHDEF
/GIMUNZIP
$$
//REC  EXEC PGM=IKJEFT01,COND=(4,LT,UNZIP)
//SMPCSI   DD DISP=SHR,
//DSN=SMPE.BIN8.GLOBAL.CSI
//SMPPTS   DD DISP=OLD,
//DSN=SMPE.BIN8.SMPPTS
//SMPOUT   DD SYSOUT=*
//SMPRPT   DD SYSOUT=*
//SMPLIST  DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SMPLOG   DD SYSOUT=*
//SMPLOGA  DD DUMMY
//SYSUT1   DD UNIT=3390,SPACE=(CYL,(100,50)),DISP=(,DELETE)
//SYSUT2   DD UNIT=3390,SPACE=(CYL,(100,50)),DISP=(,DELETE)
//SYSUT3   DD UNIT=3390,SPACE=(CYL,(100,50)),DISP=(,DELETE)
//SYSUT4   DD UNIT=3390,SPACE=(CYL,(100,50)),DISP=(,DELETE)
//SMPCNTL  DD DATA,DLM=$$
SETBOUNDARY (GLOBAL)
   .
RECEIVE
   .
$$
//SYSTSPRT DD SYSOUT=*
//SYSTSIN  DD DATA,DLM=$$
ALLOC FI(SMPPTFIN) SHR DA('SMPE.TEC1008.S5192595.SMPMCS')
ALLOC FI(SMPHOLD)  SHR DA('SMPE.TEC1008.S5192595.SMPHOLD')
CALL *(GIMSMP)
$$

--
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: IPLed Volume

2011-04-07 Thread Gibney, Dave
I never IPL from the SMP/E target. I always clone to ZOSRx1 or ZOSRx2
where x is P for production and D for development (but is really the
sandbox(s)).

 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
 Behalf Of Donald Likens
 Sent: Thursday, April 07, 2011 6:19 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: IPLed Volume
 
 I just have a suggestion... Create a batch procedure to copy your
 active
 IPL volume to your target IPL volume. The catalog entries are using
 indirect addressing either using symbolics or vol(**). Make sure
 all
 datasets that do not support indirect catalog entries are off the
 sysres
 (As I remember VSAM and zfs datasets do not support indirect catalog
 entries).  In the procedure mass change all the dddefs in you target
 zone to replace the vol to point to your new target volume.
 
 If you have three sysres volumes... Target/backup/active you could
 continue working after a new sysres is implemented and still backoff.
 Also you could copy your target to the staging sysres (the previous
 backoff volume) avoiding mass change of smpe.
 
 --
 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: Multople zone in SMPE

2011-04-07 Thread Rick Fochtman

-snip---
Can anybody help me, how to setup multiple zone to follow above concept.
-unsnip
What I always did was this:

1. Target zones was named to reflect the IPL folume set that it 
represented. For example, if my IPL volume was IPL001, that was the name 
of the target zone.


2. DLIB zones were named to reflect the first volume of the DLIB set.

3. The DLIB set for the IPL volumes were related in SMP/E.

4. ONLY one DLIB set was maintained. Once a new release appeared in 
shop, the old DLIB set was replaced and the new IPL set was defined. At 
that point, maintenance, other that critical stuff, was ceased on the 
existing IPL set.


5. The IPL set was defined using actual VOL-SER information, whereas the 
DLIB set was defined using a separate UCAT; HLQ's were changed such that 
the UCAT was used, rather than the MCAT.


6. In most cases, though not always, IPL set vol-ser information was 
altered to the new set using a ZONEEDIT under SMP/E.


It may sound complicated but in our shop, no VOLSER is used twice in a 
release or between releases for an IPL set. Releawse 1.10 was named 
IP110a, IPL110B and IPL11C, and release 12 is being named IPL12A, IPL12B 
and IPL12C. VOLSER substitutions in PARMLIB and cataloging with 
VOL(**) DEVT(3390) save a LOT of pain. If a DSNAME is changed or 
added, we include both the new and old names in the catalog during the 
transition and our users are ABSOLUTELY FORBIDDEN from referring to 
datasets on the IPL volumes except by name. On rare occaissions, we'll 
install an alias for a dataset to make the transition between releases 
but since SYSTEMS controls the compile/link procs, we get those updated 
as soon as possible to reflect any changes and the dsname aliases go away.


Our management is very inflexible; we are not allowed to make changes 
that require the applications staff to change anything. When System 
Determined Blocksize became availabe, the SYSTEMS staff had to update 
all the procs, both ours and applications', to take advantage of this.


I know, parts of this are short-sighted and overly stupid, but that's 
the way it works here.


Rick

--
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: REXX INCLUDE ?

2011-04-07 Thread Charles Mills
But only the *compiler*. If you don't have the compiler, or you prefer to
test interpreted and then compile, you will need to write your own program
to process a Rexx member and expand the %INCLUDEs. Grr.

Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf
Of Sambataro, Anthony (NIH/CIT) [E]
Sent: Wednesday, April 06, 2011 4:01 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: REXX INCLUDE ?

The REXX compiler offers an %INCLUDE statement. 

--
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: Multople zone in SMPE

2011-04-07 Thread Anthony Thompson
Assuming your target/dlib zones are in a separate VSAM datasets:

1) Copy/rename them using DF/DSS. You'll also need to make copies of the 
related SMP/E datasets (ie, SMPLTS, SMPMTS, SMPSCDS, SMPSTS, maybe SMPLOG and 
SMPLOGA depending on how you are set up) and the target and distribution 
libraries.

2) Rename the new zones using SMP/e:
SET BDY(GLOBAL).
ZONERENAME (old target zone name) TO(new target zone name)
 NEWDATASET(new target zone VSAM dataset name).
ZONERENAME (old dlib zone name) TO(new dlib zone name)
 NEWDATASET(new dlib zone VSAM dataset name).

3) Link the new target/dlib zones 
SET BDY(new target zone name). 
UCLIN. 
REP TZONE(new target zone name) 
RELATED(new dlib zone name)
ZDESC(new description if needed). 
ENDUCL. 
SET BDY(new dlib zone name). 
UCLIN. 
REP DZONE(new dlib zone name) 
RELATED(new target zone name)
ZDESC(new description if needed). 
ENDUCL.

4) Update the DDDEFs in the new zones to point to the new datasets that the 
copied SMP/e environment reflects. Use SMP/e ZONEEDIT DDDEF. Don't forget the 
new SMP* files.
SET BDY(new target zone name).
/* For IPL-resident files */
ZONEEDIT DDDEF.
IF (VOLUME=old IPL volser).
CHANGE VOLUME(*,new IPL volser).
ENDZONEEDIT.
/* For other (non-IPL volume files */
ZONEEDIT DDDEF.
CHANGE DATASET(old dsn prefix*,new dsn prefix*).
ENDZONEEDIT.

SET BDY(new dlib zone name).
ZONEEDIT DDDEF.
CHANGE DATASET(old dsn prefix*,new DSN prefix*).
ENDZONEEDIT.

For a simple example, if you copied you dlib's from, say,
SYS1.A* to SYS1.MAINT.A*
and copied the SMPLTS, SMPMTS etc. from
SMPE.SMP* to SMPE.MAINT.SMP*
then above for the dlib zone would look like:

SET BDY(new dlib zone name).
ZONEEDIT DDDEF.
CHANGE DATASET(SYS1.A*,SYS1.MAINT.A*).
CHANGE DATASET(SMPE.SMP*,SMPE.MAINT.SMP*).
ENDZONEEDIT.



You'll also need to cater for OMVS pathnames. The root filesystem for the 
maintenance system (and any ancilliary filesystems) would be mounted under a 
'service' mountpoint on the system installing maintenance, usually called 
/service. So you'll need to ZONEEDIT DDDEF PATH as well:

ZONEEDIT DDDEF.
CHANGE PATH(*,'/service'*).
ENDZONEEDIT.


Cheers, Ant.
Northern Territory Govt., Australia
 

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
SAURABH KHANDELWAL
Sent: Thursday, 7 April 2011 7:59 PM
To: IBM-MAIN@bama.ua.edu
Subject: Multople zone in SMPE

Hello,
 By the time of server pac installation, we just defined one 
target and one distribution zone. But if we create two RES volume, for 
applying maintenance then in this we case we would require two target 
and distribution zone.

 And in this way we always apply maintenance not on running 
RES volume. We always do on another RES volume.

 Can anybody help me, how to setup multiple zone to follow 
above concept.


Regards
Saurabh Khandelwal

--
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: REXX INCLUDE ?

2011-04-07 Thread Paul Gilmartin
On Thu, 7 Apr 2011 16:58:40 -0700, Charles Mills wrote:

But only the *compiler*. If you don't have the compiler, or you prefer to
test interpreted and then compile, you will need to write your own program
to process a Rexx member and expand the %INCLUDEs. Grr.

Grr (in harmony).

Sometimes, when I'm testing an EXEC in instream data in a
batch job, I concatenate my subroutine menbers in DD statements
after the main code.

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