IKJ139I   BROADCAST DATA SET NOT USABLE, I/O SYNAD ERROR

2011-11-20 Thread ibmnew
Hi all 

 In the syslog,there is the following message:

IKJ139I   BROADCAST DATA SET NOT USABLE, I/O SYNAD ERROR 

 My question :

 1. Do it mean sys1.broadcast is broken?
 
 2. How to verify sys1.broadcast DATSET?

 3. How to solve this problem?


Thanks a lot!

Jason Cai

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


How to make console alert with sound

2011-10-27 Thread ibmnew
hi all

We want  to use MPFLSTxx for the messages which we want them sound when issued 


A display console can have the following feature: 
An audible alarm is available on display consoles. The system sounds
this alarm when certain changes in conditions occur, such as when you 
enter an invalid CONTROL command. WTO macros with descriptor codes of 
1, 2, or 11, and all WTOR macros will cause the audible alarm to sound 
on operator consoles so-equipped. 


Could you tell us how to do it?  Thanks a lot!


Best Regards,


Jason Cai




- 

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


How to dumps all the SMF datasets automagically evertime

2011-09-21 Thread ibmnew
Hi all
  When we shutdown our z/OS 1.11 everytime,we will issue 'Z EOD' command.
  
After we IPL the system again,we find  that SMF dataset was switched .
P-SYS1.BDZ1.MAN1  BD1SF1600300 1  ACTIVE
S-SYS1.BDZ1.MAN2  BD1SF2600300 2  DUMP REQUIRED 
S-SYS1.BDZ1.MAN3  BD1SF3600300 0  ALTERNATE 
When we issue 'I SMF' command,It's written to only dump P-SYS1.BDZ1.MAN1.
How to dumps all the SMF datasets automagically evertime when we issue 'I SMF' 
command
Thanks a lot !
Best Regards,
Jason Cai 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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 release PDS by Partial Release = YI

2011-05-11 Thread ibmnew
 1. How many times can  PSM be run in one
 day?

 Running Automatic Primary Space Management Multiple Times a Day   
 
  Issue one or both of the following PATCH commands: 

 PATCH  .MCVT.+414 X'' 


 2.Why  wasn't IBMUSER.PDS2 released?

 The following msg is in the log of HSM

ARC0734I ACTION=REDUCED FRVOL=BD3TS3 TOVOL=BD3M00 
 TRACKS= 3 
  RC=8, REASON=41, AGE=0,DSN=IBMUSER.PDS2  

If the PDS is small 300 CYLS,it can be released.

If the PDS is big  1000 CYLS,it cann't be released.the error msg is above.


Could you help me?


Thanks a lot!

Jason Cai




  



   



 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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 release PDS by Partial Release = YI

2011-05-10 Thread ibmnew
Dear 

Yes. You are right. Thanks a lot!

I started DFHSM up in our shop today.

I want to Release unused and  overallocated space by HSM 

I defined a MC(MCTSO) in which the  Partial Release is YI  .

I assigned prefix ibmuser as MCTSO in ACS routing.

I allocated a PDS (IBMUSER.PDS) which space is cyl(200,200,50)

IBMUSER.PDS is in the SG :SGTSO

Below is the definition of the SGTSO :

Auto Migrate . . N (Y, N, I or P) Migrate Sys/Sys Group Name . .
Auto Backup . . N (Y or N) Backup Sys/Sys Group Name . .
Auto Dump . . . N (Y or N) Dump Sys/Sys Group Name . . .

During PSM,IBMUSER.PDS wasn't released.

I changed  Auto Migrate from N to Y.

After I  issue HSEND SETSYS PRIMARYSPMGMTSTART

(1800 1830) command at 18:00 o'clock,IBMUSER.PDS was released.

Then,I I allocated a new PDS (IBMUSER.PDS1) which space is cyl(500,200,50)

After I  issue HSEND SETSYS PRIMARYSPMGMTSTART

(1820 1845) command at 18:20 o'clock,IBMUSER.PS1 wasn't released

My questios:

1.If I want to use Partial Release (Y) to release unused and  overallocated 
space, Must Auto Migrate be Y in SG?

2.Why  wasn't IBMUSER.PS1  released? How many times can  PSM be run in one day?

Thanks a lot!

Best Regards,

Jason Cai 




发件人: Ron Hawkins 
发送时间: 2011-05-09  23:11:00 
收件人: IBM-MAIN 
抄送: 
主题: Re: How to release PDS by Partial Release = YI 
 
Jason,
I suspect that when you add a member to a PDS using ISPF that you are not
satisfying all of the conditions described in USING DATASETS 3.2.5.4
Releasing Space. I leave to other to define which one it may be, or
disagree. 
My guess is that when you use ISPF, the last operation before closing the
PDS is to read the directory, which means the last operation before close is
not write, stow, or put.
I also found that Yes Immediate does not work if you update a PDS in batch
with DISP=SHR. Use IEBGENER to copy in a member with DISP=SHR does not
release space, but simply changing the JCL to DISP=OLD causes unused space
to be released.
Ron
 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of
 ibmnew
 Sent: Sunday, May 08, 2011 9:17 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: [IBM-MAIN] How to release PDS by Partial Release = YI
 
 Dear all
 
 In manual:
 
 YI:Yes Immediate. Release unused space at Space Management cycle time and
   also when close is issued for a data set that was open for
output.
 
   I define a MC(MCTSO) in which the  Partial Release is YI  .
 
   I assign prefix ibmuser as MCTSO in ACS routing.
 
   I allocate a PS (IBMUSER.PS) which space is cyl(200,200),I insert space
into
 th PS by p.3.4;
 
 Then ,I qiut the PS pressing F3.The PS is released  immediately.
 
  Note:   I allocate a PDS (IBMUSER.PDS) which space is cyl(200,200,50).
 
  I insert many members into th PDS by p.3.4 and update the member .Then ,I
 qiut the PDS pressing
 
 F3.The PDS isn't released  immediately.
 
  Could you tell me what' s wrong with me?  How to release PDS by  Partial
 Release = YI
 
 Thanks a lot!
 
 Best Regads,
 
 Jason Cai
 
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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 monitor unused and overallocated space for PS,VSAM and PO

2011-05-08 Thread ibmnew
Dear 

DCOLLECT provides a wealth of information of the type you seek.

Could you give me any samples(JCLREXX) which you are using for 

monitoring  unused and overallocated space 


Thanks a lot!

Best Regards,

Jason Cai 

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


How to release PDS by Partial Release = YI

2011-05-08 Thread ibmnew
Dear all 

In manual:

YI:Yes Immediate. Release unused space at Space Management cycle time and 
  also when close is issued for a data set that was open for output.

  I define a MC(MCTSO) in which the  Partial Release is YI  .

  I assign prefix ibmuser as MCTSO in ACS routing.

  I allocate a PS (IBMUSER.PS) which space is cyl(200,200),I insert space into 
th PS by p.3.4;

Then ,I qiut the PS pressing F3.The PS is released  immediately.

 Note:   I allocate a PDS (IBMUSER.PDS) which space is cyl(200,200,50).

 I insert many members into th PDS by p.3.4 and update the member .Then ,I qiut 
the PDS pressing 

F3.The PDS isn't released  immediately.

 Could you tell me what' s wrong with me?  How to release PDS by  Partial 
Release = YI  

Thanks a lot!

Best Regads,

Jason Cai 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Do we need to implement HSM

2011-05-05 Thread ibmnew
 
Releasing space at close can be handled in the management class by 
specifying Partial release with Yes Immediate (YI) or Conditional Immediate 
(CI) if you want to ensure that data sets have secondary allocation before 
the space is released. This does not require the space management function 
of HSM to be active whereas Y or C would typically release space during 
primary space management. 
If you are licensed for DFSMSdss, you can also release space and perform 
extent reduction. Since you are using extended format datasets, DSS will 
release space against VSAM as well as sequential. Extent reduction can be 
performed using the CONSOLIDATE function. CONSOLIDATE used to be 
specified as a keyword of DEFRAG but is now its own command as of z/OS 
1.10. 

This is very very helpful for me.


Thanks all of you!

Best Regards,

Jason Cai

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


How to monitor unused and overallocated space for PS,VSAM and PO

2011-05-05 Thread ibmnew
Dear all

 Is there any ways to  monitor unused ,overallocated space and extents  for 
PS,VSAM and PO  by JCL or Tools?

Thanks a lot!

Best Regards,

Jason Cai 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Do we need to implement HSM

2011-05-05 Thread ibmnew
---SNIP
 
Suggestion:
1. It depends on PS datasets, IMO. If you do MOD then do not release space. If 
mod is not used then sure why not release space (for ps). I was at a shop that 
was infamous for being tight with the $$ and we ran a release job everynight 
after production bacups were done. We did not allow MOD period.
2. During the mass release everynight we also released extents. 
We did this using DMS. It did a credible job for releasing space. We were in 
the 
middle of replacing DMS with DFHSM and we had decided to run DFDSS to release 
the space instead of keeping DMS around. We did have issues with how DFDSS 
worked. DMS just spit out an error message and continued on but DFDSS stopped 
and wait until it could get exclusive control of the dataset.
I honestly do not remember the space we got back but it wasn't all that much 
IIRC. Maybe a half 3380-3 pack out of say 20 mod 3's .
DMS did have a report mode that was fairly acurate as to numbers. We also had 
standards that all space requests had to specify rlse.
We also had pretty tight control on our DASD (production wise), test was 
scrutinized by other criteria and was reasonably stable.
VSAM was a ball of wax. We did not have a way on reporting VSAM (if memory 
serves me).
At another shop I was at the DASD was a mess. I was called in and found 40 
volumes that were there but not being used and I cleaned it up and I got yelled 
at by several managers. I welcomed the chance to go into the meeting to have 
the 
manager talk to my manager and she backed up everything I did. I just archived 
(with DFHSM) all the old datasets. The data was there for recall. Although I 
did 
find a VSAM data set that was empty and it spanned 5 volumes and haddn't been 
referenced in many many months. I archived it and clipped the volumes and out 
them in another pool. That was a scream fest as well.
My boss loved these arguments as she liked to play the hard nose. 
Ed
--end---

Dear Ed

 What is DMS?  Thanks a lot!

Best Regards,

Jason Cai

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


Do we need to implement HSM

2011-05-04 Thread ibmnew
Dear all 

   In our shop we don't have any tapelib.

 Do you need to implement HSM ?

Any suggestions is greatly appreciated!

Thanks a lot!

Jason Cai 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Do we need to implement HSM

2011-05-04 Thread ibmnew
Dear all

 
proper use of mgmtclas/storclas can save a whole lot of dasd and prevents the 
need to clean up garbage on a regular basis.  


  Our Situation :Our shop don't have DASD enough(no tapelib) and the 
application programer always allocate very bigger datasets.
 PS and VSAM are almost extended format data sets. 
 We want to 
1.Release unused and  overallocated space for PS,VSAM and PO by HSM 
or BATCH JCL 
2.Reduce fewer extents for  PS,VSAM and PO by HSM or BATCH JCL
 What can we do?
 Thanks a lot!

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


Add'l Volume Amount

2011-05-03 Thread ibmnew
Hi all

' Add'l Volume Amount ' which decides if Primary or Secondary space is first 
taken on additional volume extends. 

My english is poor.I don't understand it. Could you give me a sample how to use 
it?


Thanks a lot!

Best Regards,

Jason Cai 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Add'l Volume Amount

2011-05-03 Thread ibmnew
Dear


It means that if the dataset is multivolume, when it expands to another
volume you can decide wether you want to use the amount of the primary
allocation or the amount of the secondary allocation to expand.
Suppose you have a dataset created with SPACE=10,5 cylinders

 What situation do dataset expands to another volume ?

 If the dataset is full, it will extent 5 cylinders.

 When it extent 5 cylinders,the volume is full. In this situation,does dataset 
expand to another volume?

Then it will :

If you filled with primary value the dataset wil try allocations in new
volumes with 10 cylinders
If you filled with Secondary value the dataset will try allocations in new
volumes with 5 cylinders


does it mean that if volume isn't full,dataset always extent 5 cylinders and if 
volume is full,dataset always extent 10 cylinders?


What is benefit of  Add'l Volume Amount ?

Thanks again!

Best Regards,

Jason Cai

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Add'l Volume Amount

2011-05-03 Thread ibmnew

Dear Gonzalo and Mike 

 I understand it.Thanks a lot for your help!

 CC Gonzalo: Your english is very good. Could you also share your experience in 
learning english?

Best Regards,

Jason Cai 




发件人: Gonzalo Cengotita 
发送时间: 2011-05-03  19:25:48 
收件人: IBM-MAIN 
抄送: 
主题: Re: Add'l Volume Amount 
 
On Tue, May 3, 2011 at 12:57 PM, ibmnew ibm...@163.com wrote:
 Dear


 It means that if the dataset is multivolume, when it expands to another
 volume you can decide wether you want to use the amount of the primary
 allocation or the amount of the secondary allocation to expand.
 Suppose you have a dataset created with SPACE=10,5 cylinders

  What situation do dataset expands to another volume ?

 If the dataset is full, it will extent 5 cylinders.

  When it extent 5 cylinders,the volume is full. In this situation,does
 dataset expand to another volume?

Yes, if the dataset is multivolume
 Then it will :

 If you filled with primary value the dataset wil try allocations in new
 volumes with 10 cylinders
 If you filled with Secondary value the dataset will try allocations in
 new
 volumes with 5 cylinders


 does it mean that if volume isn't full,dataset always extent 5 cylinders
 and if volume is full,dataset always extent 10 cylinders?

 Yes, if you fill this field with Primary

 What is benefit of  Add'l Volume Amount ?

You could have a large pool of many disks with a lot of fragmentation and in
this situation, you will prefer secondary amount wich is usually less than
primary.
Keep in mind that the quantity of the allocation must be found all in one
piece, no fragmentation is allowed, so you will get less errors if the
allocation in a new volume try with the lesser value.
(The example would be better if the dataset would have SPACE=2000,50
cylinders)
Of course all of it depends on the size of the dataset, and the number of
disks, etc
I hope it is clear enough, English is not my mother tongue, too!
Regards
Gonzalo Cengotita
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html

-- 
  Gonzalo Cengotita Quirce
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Add'l Volume Amount

2011-05-03 Thread ibmnew

Dear
 


Add'l Volume Amount, This  attribute is used during VSAM EOV processing, and is 
only applicable to any VSAM multivolume data sets
allocated in the extended format.

 Is it only  used for any VSAM multivolume data sets? 

Thanks a lot!

Best Regards,

Jason Cai
 



发件人: Gonzalo Cengotita 
发送时间: 2011-05-03  19:25:48 
收件人: IBM-MAIN 
抄送: 
主题: Re: Add'l Volume Amount 
 
On Tue, May 3, 2011 at 12:57 PM, ibmnew ibm...@163.com wrote:
 Dear


 It means that if the dataset is multivolume, when it expands to another
 volume you can decide wether you want to use the amount of the primary
 allocation or the amount of the secondary allocation to expand.
 Suppose you have a dataset created with SPACE=10,5 cylinders

  What situation do dataset expands to another volume ?

 If the dataset is full, it will extent 5 cylinders.

  When it extent 5 cylinders,the volume is full. In this situation,does
 dataset expand to another volume?

Yes, if the dataset is multivolume
 Then it will :

 If you filled with primary value the dataset wil try allocations in new
 volumes with 10 cylinders
 If you filled with Secondary value the dataset will try allocations in
 new
 volumes with 5 cylinders


 does it mean that if volume isn't full,dataset always extent 5 cylinders
 and if volume is full,dataset always extent 10 cylinders?

 Yes, if you fill this field with Primary

 What is benefit of  Add'l Volume Amount ?

You could have a large pool of many disks with a lot of fragmentation and in
this situation, you will prefer secondary amount wich is usually less than
primary.
Keep in mind that the quantity of the allocation must be found all in one
piece, no fragmentation is allowed, so you will get less errors if the
allocation in a new volume try with the lesser value.
(The example would be better if the dataset would have SPACE=2000,50
cylinders)
Of course all of it depends on the size of the dataset, and the number of
disks, etc
I hope it is clear enough, English is not my mother tongue, too!
Regards
Gonzalo Cengotita
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html

-- 
  Gonzalo Cengotita Quirce
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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-27 Thread ibmnew
Dear Mark

 I got it. Thanks a lot!

Best Regards,

Jason Cai 




发件人: Mark Zelden 
发送时间: 2011-04-26  21:10:01 
收件人: IBM-MAIN 
抄送: 
主题: Re: How to start RMF Monitor III automatically after IPL the system. 
 

 Coulf you send me the examples of sandbox.parmlib(SHUTSYSNAME.) and 
sandbox.parmlib(SHUTSYSCLONE.REIPL.)  ? 
 
I wonder why SHUTSYSNAME. and SHUTSYSCLONE.REIPL are needed.For
STARTSYS PROC,there is only one member (sandbox.parmlib(STRTSYSNAME.)) 
I thought I explained that, but perhaps not well.  After REIPL became an
option, I split the shutdown member into two members.   All the the commands
except the last few to shutdown JES2 and VARY XCF offline are in one member
and the JES2 shutdown, Z EOD and VARY XCF commands are in separate 
members.  The Y member has ,REIPL added to the VARY XCF command.
Here is an example of SHUTxxN  (xx = sysclone).  I've changed the 
sysname to IPO1 for this post:
*
*  THIS MEMBER IS CONCATENATED WTH SHUTIPO1 
*  TO SHUTDOWN WITHOUT A REIPL   
*
$DJES2   
DELAY=3  
$PJES2   
DELAY=5  
Z EOD
DELAY=5  
V XCF,IPO1,OFFLINE  
DELAY=3  
D A,L   
REPLY * 'IXC371D' 'SYSNAME=IPO1'
 
Here is an example of SHUTxxY  (xx = sysclone).  I've changed the 
sysname to IPO1 for this post:
*
*  THIS MEMBER IS CONCATENATED WTH SHUTIPO1 
*  TO SHUTDOWN WITH A REIPL   
*
$DJES2   
DELAY=3  
$PJES2   
DELAY=5  
Z EOD
DELAY=5  
V XCF,IPO1,OFFLINE,REIPL 
DELAY=3  
D A,L
REPLY * 'IXC371D' 'SYSNAME=IPO1' 
If you are looking for more samples on how to use command, please
refer to CBT file 19.  The source for the program - member COMMAND, 
has sample JCL and control statements within the source code as well
as a $COMMAND member that documents all the statements.
As I mentioned in my last post, if I just want to shutdown and REIPL my 
sandbox with the same sysres / loadparm, I issue this command:
 S SHUTSYS.SHUTSYS,SUB=MSTR,REIPL=Y 
   
Hope this helps,
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: How to start RMF Monitor III automatically after IPL the system.

2011-04-26 Thread ibmnew
Dear Mark  
  
 
 Coulf you send me the examples of sandbox.parmlib(SHUTSYSNAME.) and  
sandbox.parmlib(SHUTSYSCLONE.REIPL.)  ?

I wonder why SHUTSYSNAME. and SHUTSYSCLONE.REIPL are needed.For STARTSYS 
PROC,there is only one member (sandbox.parmlib(STRTSYSNAME.))

Thanks a lot!

Best Regards,

Jason Cai  



 




发件人: Mark Zelden 
发送时间: 2011-04-11  23:06:56 
收件人: IBM-MAIN 
抄送: 
主题: Re: How to start RMF Monitor III automatically after IPL the system. 
 
On Mon, 11 Apr 2011 11:53:27 +0800, ibmnew ibm...@163.com wrote:
 Thanks for your help. 
You're welcome
Could you share your SHUTSYS STC to me? 
It is basically the same thing, but in z/OS 1.10 I split out the shutdown
PDS member at the end so I can have a REIPL option.
//SHUTSYS  PROC REIPL=N 
//**
//* COMMAND IS FROM CBT FILE 019 - HTTP://WWW.CBTTAPE.ORG   
//* INSTALL PDS AND DOC IS IN MTSYS2.COMMAND.CBT.FILE019
//**
//SHUTSYS  EXEC PGM=COMMAND,TIME=1439   
//STEPLIB  DD  DISP=SHR,DSN=authorized.loadlib  
//IEFRDER  DD  DISP=SHR,DSN=sandbox.parmlib(SHUTSYSNAME.)  
// DD  DISP=SHR,DSN=sandbox.parmlib(SHUTSYSCLONE.REIPL.)  
As mentioned in an earlier post, I start it with SUB=MSTR so it can shut
down JES2 and then issues the V XCF command prior to stopping itself. 
I start it as  S SHUTSYS.SHUTSYS,SUB=MSTR,REIPL=Y  when I want
to REIPL with the previous load address / parms. AUTOIPL must be
configured (and supported by the HW) in DIAGxx for this.   I had 
our automation team set up something similar in our automation product
for production.   
If you can shut your system down manually, you can script it with
the COMMAND program. 
Regards,
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: Could I use Dynamic volume count(DVC) replace the volume count parameter

2011-04-26 Thread ibmnew
Dear  Radoslaw

  Thanks for your help! it is very clear

I am sorry! I have other questions:


 Below is our allocxx

---
CATLG_ERR FAILJOB(YES) /*FAIL THE JOB*/
  ERRORMSG(YES)/*ISSUE THE WTO*/   
VOLUME_ENQPOLICY(WAIT) 
SPEC_WAIT POLICY(WAITNOH)  
  MAXNWAIT(255)
  POLICYNW(CANCEL) 
ALLC_OFFLNPOLICY(WAITNOH)  
  MAXNWAIT(255)
  POLICYNW(CANCEL) 
TIOT   SIZE(64)   /* SIZE OF THE TASK I/O TABLE   */   
-

Q1 Is this ALLOCXX correct or not? 

Q2 How to display TIOT size in a existing system?

   Could I use Dynamic volume count(DVC) replace the volume count parameter?
In most cases  YES.

 assign DVC to every PS dataset 

Q3. Could DVC be used for VSAM? 

Q4 Do sytem assign DVC to every VSAM dataset ?

Q5.What situation cann't we use DVC replace the volume count parameter?

 
Thanks again!


Jason Cai




发件人: R.S. 
发送时间: 2011-04-25  19:42:54 
收件人: IBM-MAIN 
抄送: 
主题: Re: Could I use Dynamic volume count(DVC) replace the volume count 
parameter 
 
W dniu 2011-04-25 09:44, ibmnew pisze:
 Hi all

   Volume count unconditionally puts that number of entries in the catalog 
 for a new data
 set. Dynamic volume count only puts in the volumes that actually get
 extended to and have data on them.  This cuts down on the space taken up
 in the catalog.

   Q1 Could I use Dynamic volume count(DVC) replace the volume count parameter?
In most cases  YES.
   Q2 Is there any other advantage for DVC?
IMHO the most important advantage of DVC is dynamic character - you can 
change already existing datasets by changing DATACLASS they have 
assigned. No need to ALTER existing datasets file by file. Regular 
volume count in dataclass is taken only during creation of new dataset.
   Q3 Is there any disadvantage for DVC?
Yes, TIOT size. First idea is to assign DVC to every PS dataset and set 
number of volumes to 59. Why not?
However you can reach JCL limit for number of datasets in single step. 
For TIOT set to default 32k it is apporx. 1635 datasets.
A lot, but every volume is counted! So if you use DVC 59, then your 
limit is 1635/59 = 27 datasets only!
Solution:
1. Increase TIOT size to maximum, which is 64k
2. Reduce number of volumes in DVC
3. Use DVC only where really needed.
HTH
-- 
Radoslaw Skorupka
Lodz, Poland


Could I use Dynamic volume count(DVC) replace the volume count parameter

2011-04-25 Thread ibmnew
Hi all 

 Volume count unconditionally puts that number of entries in the catalog for 
a new data
set. Dynamic volume count only puts in the volumes that actually get
extended to and have data on them.  This cuts down on the space taken up 
in the catalog.
 
 Q1 Could I use Dynamic volume count(DVC) replace the volume count parameter? 

 Q2 Is there any other advantage for DVC?

 Q3 Is there any disadvantage for DVC?


Any suggestions is greatly appreciated!

Best Regards,

Jason Cai 

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


Re: Is DSNTYPE=EXT parameter only used for VSAM

2011-04-21 Thread ibmnew

Dear R.S.

 Thanks for your answers!



 I defined a DC(PSMED) as below:

Recfm . . . . . . . . . . (any valid RECFM combination or blank)
Lrecl . . . . . . . . . . (1 to 32761 or blank) 
Override Space  . . . . . N   (Y or N)  
Space Avgrec  . . . . . . M   (U, K, M or blank)
  Avg Value . . . . . (0 to 65535 or blank) 
  Primary . . . . . . 10  (0 to 99 or blank)
  Secondary . . . . . 10  (0 to 99 or blank)
  Directory . . . . . (0 to 99 or blank)
Retpd or Expdt  . . . . . (0 to , /MM/DD or blank)  
Volume Count  . . . . . . 5   (1 to 255 or blank)   
Add'l Volume Amount . . . (P=Primary, S=Secondary or blank) 
Data Set Name Type  . . . . . EXT(EXT, HFS, LIB, PDS, Large or blank)  
   If Ext  . . . . . . . . . . P  (P=Preferred, R=Required or blank)
   Extended Addressability . . N  (Y or N)  
   Record Access Bias  . . . . U  (S=System, U=User or blank)   
 Space Constraint Relief . . . N  (Y or N)  
   Reduce Space Up To (%)  . .(0 to 99 or blank)
   Dynamic Volume Count  . . .(1 to 59 or blank)
 Compaction  . . . . . . . . . Y  (Y, N, T, G or blank) 
 Spanned / Nonspanned  . . . .(S=Spanned, N=Nonspanned or blank)
 System Managed Buffering  . . (1K to 2048M or blank)   
 System Determined Blocksize   N  (Y or N)  
 EATTR . . . . . . . . . . . .(O=Opt, N=No or blank)


I allocated a dataset using the DC(PSMED).

When I want to release the unused space of the EF dataset by issue 'free' line 
command before the dataset name in p.3.4,

The system tell me that 'free' command is Invalid multivolume cmd .

Q:How to release unused space of PS EF

Thanks a lot!

Best Regards,

Jason Cai 






发件人: R.S. 
发送时间: 2011-04-21  15:24:14 
收件人: IBM-MAIN 
抄送: 
主题: Re: Is DSNTYPE=EXT parameter only used for VSAM 
 
W dniu 2011-04-21 05:49, ibmnew pisze:
 Dear all

The summary is very very clear. Thanks you all for your help!

   I want to ask you other questions:

 when considering DFSMS compression , one should take into account that
   it comes with a CPU price tag, so I would not compress everything
   indiscriminately (unless CPU is cheaper than DASD for me).


 Q1.  How to determine  whether  ext-PS((small and large) and VSAM need be 
 compressed or not? how to balance DASD with CPU?
 Is there any tools to analyse and monitor it?
It depends on the data, performance requirement, etc. Usually text 
reports are good candidates.
   Q2.What situations is that the necessary system resources
are not available to allocate them?
SMS-managed volume, conteporary DASD unit - that's all you need. The 
rest is prehistory.
   Q3. Is EXTENDED ADDRESSABILITY only used for VSAM?
Yes. Other datasets have no addressability to be extended
   Q4. Could I assign all VSAM for applications including  4G and  4G to use 
 EXTENDED ADDRESSABILITY = yes?
Yes.
   Q5  Is there any disadvantage for ADDRESSABILITY = yes?
There are few restrictions, i.e. lack of AIX for ESDS.
-- 
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

Re: Is DSNTYPE=EXT parameter only used for VSAM

2011-04-21 Thread ibmnew
Dear




You have the answer above!
This is not related to EF, it is related to multi-volume allocation. In 
fact you can release unused space of multi-vol PS, but with serious 
limitations, and NOT by using ISPF.

Could you send me a sample JCL to release unused space of multi-vol PS?


Thanks a lot!

Best Regards,

Jason Cai 

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


Re: Is DSNTYPE=EXT parameter only used for VSAM

2011-04-20 Thread ibmnew
Dear

   DSNTYPE=LARGE: The data sets are large format sequential data sets  

   DSNTYPE=EXT:no track limitation 

 Q1:What's the differences between DSNTYPE=EXT and  DSNTYPE=LARGE for large PS?

 Q2:Could  DSNTYPE=EXT replace  DSNTYPE=LARGE ?

 Q3:Ours shop is z/OS 1.11, Every PS should now benefits from EF,Could I assign 
every PS to use EF including small and large PS?

 Q4 Is there any disadvantage for EF?

Thanks a lot!

Best Regards,

Jason Cai 



   




64k TRACK limitation, striping, maximum number of extents per volumes 
(16 vs 123), compression.
The above are visible differences.
Peter mentioned assembler macros. (Thank you for the clarification!)
Depending on your z/OS release EF-PS can reside in EAS (big part of 
EAV), but AFAIK in 1.12 non-EF PS is also allowed for it.
There are also differences on very low-level operations, which are 
usually invisible and unavailable for regular application user.
-- 
Radoslaw Skorupka
Lodz, Poland
--

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


Re: Is DSNTYPE=EXT parameter only used for VSAM

2011-04-20 Thread ibmnew
Dear all 

  The summary is very very clear. Thanks you all for your help!

 I want to ask you other questions:

  when considering DFSMS compression , one should take into account that
 it comes with a CPU price tag, so I would not compress everything
 indiscriminately (unless CPU is cheaper than DASD for me).  


Q1.  How to determine  whether  ext-PS((small and large) and VSAM need be 
compressed or not? how to balance DASD with CPU?
   Is there any tools to analyse and monitor it?

  If Ext  P:  Preferred.  The system attempts to allocate the data sets in

extended sequential format.  If the necessary system resources
   are not available to allocate them as such, the system allocates  
  them as non-extended sequential.  

 Q2.What situations is that the necessary system resources 
  are not available to allocate them?

 Use the EXTENDED ADDRESSABILITY field to provide data sets with
 addressability of more than 4 gigabytes.   
 
 Q3. Is EXTENDED ADDRESSABILITY only used for VSAM?

 Q4. Could I assign all VSAM for applications including  4G and  4G to use 
EXTENDED ADDRESSABILITY = yes? 

 Q5  Is there any disadvantage for ADDRESSABILITY = yes? 

Thanks a lot!

Best Regards,

Jason Cai 





发件人: R.S. 
发送时间: 2011-04-21  03:31:38 
收件人: IBM-MAIN 
抄送: 
主题: Re: Is DSNTYPE=EXT parameter only used for VSAM 
 
Gentlemen,
Please, re-read carefully, all of us are right here :-)
1. I was right saying that dss output cannot be ext-PS. This restriction 
is removed in z/OS 1.12 - but still true in older versions of z/OS, not 
to mention that at least one of them is still supported. So, the 
restriction is, not was ;-)))
2. Ifrat was right, because he mentioned about the restriction relief.
3. Frank is also right, because he mentioned still valid restriction.
4. Jonh is right, because he mentioned other ised of dss - ability to 
dump/restore EF datasets, not the dump dataset characteristics.
5. Frank is right again, beacuse his z/OS is 1.10, so the restriction is 
still valid.
And all of us (but not Yifrat) is a little bit not right...
Here in Poland we call it Czech movie, but the meaning is close to 
Comedy of Errors (as far as I remember the author wasn't Czech).
To summarize:
Dss *output* file can be ext-PS in z/OS 1.12, but it couldn't be in 
previous releases of z/OS.
Dss intput files can be extented format, it have been able to for many 
years and z/OS releases.
Regards
-- 
Radoslaw Skorupka
Lodz, Poland
--


PARTIAL RELEASE and Space Constraint Relief

2011-04-20 Thread ibmnew
Dear all

  The application programmers in  our shop always  allocate many  big 
datesets(PS,PDS,VSAM),but they only use 10% space  oF the datasets.

  I want to release the spaces that aren't used by SMS .
 
  Could you tell me how to do it? 

  I wonder what situations we need to use Space Constraint Relief  in DC and 
PARTIAL RELEASE in MC?
  
Any suggestions is greatly appreicated!

Thanks a lot!

Best Regards,

Jason Cai

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


Re: Is DSNTYPE=EXT parameter only used for VSAM

2011-04-18 Thread ibmnew
It's not. non-EF PS can be multi-volume.

  Yes.

 What's differences between non-EF PS with EF PS?

Below is the differences?

 1.EF PS can be compressed 

 2. no track limitation for EF PS ( Is EXTENDED ADDRESSABILITY parameter only 
used for VSAM ?)

Thanks a lot!

Best Regards,

Jason Cai 

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


JNUM and JQES are full

2011-04-18 Thread ibmnew
Dear all 

 JNUM and JQES are full in our shop

*$HASP050 JES2 RESOURCE SHORTAGE OF JNUM - 100% UTILIZATION REACHED
*$HASP050 JES2 RESOURCE SHORTAGE OF JQES - 100% UTILIZATION REACHED 


My questions:

1 What made JNUM and JQES full?

2.JOENUM=161314,JOBNUM=65534 AND  CKPTSPACE BERTNUM=9000 in the jes2parm,
 
  but I saw BERT=66884 in Resource monitor. 

   What cause BERT=66884? 

3. Below is the output of RM 

RESOURCE SysId Status Limit  InUse  InUse% Warn% IntAvg IntHigh IntLow
 BERT BDZ3  66884242   0.3680242 244242
 BSCB BDZ3  0  0   0.00 0  0   0  0
 BUFX BDZ3126  0   0.0080  0   0  0
 CKVR BDZ3 50  1   2.0080  1   1  1
 CMBS BDZ3  10011  0   0.0080  0   0  0
 CMDS BDZ3999  0   0.0080  0   0  0
 ICES  BDZ3  4  0   0.0080  0   0  0
 JNUM BDZ3  65534  35317  53.8980  35315   35317  35313
 JOES BDZ3 161314  39973  24.7785  39971   39973  39969
 JQES BDZ3  65534  35317  53.8980  35315   35317  35313
 LBUF BDZ3 23  0   0.0080  0   0  0
 NHBS BDZ3100  0   0.0080  0   0  0
 SMFB BDZ3  8  0   0.0080  0   0  0
 TBUF BDZ3104  0   0.00 0  0   0  0
 TGS  BDZ3  99400  42363  42.6180  42358   42363  42352
 TTAB BDZ3  3  0   0.0080  0   0  0

Are there any relations between the resource above?


4.How to optimize  the JES2 resource?

Any suggestions is greatly appreciated!

Best Regards,

Jason Cai

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


Is DSNTYPE=EXT parameter only used for VSAM

2011-04-17 Thread ibmnew
Dear all

 Using an EF data set enables you to use VSAM functions such as multivolume 
allocation, compression, or striping. 


Q1. Is DSNTYPE=EXT parameter only used for VSAM ? Could it be used for PS,PDS 
and etc?

Q2. PS and PDS could be allocated across multivolume ?


Any ideas is greatly appreciated!


Best Regards,

Jason Cai 

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


Jobname colums was lost in the sdsf joblog on ZOS1.11.

2011-04-13 Thread ibmnew
Dear all  

One system has been migrated from z/OS 1.9 to z/OS 1.11  

in ZOS 1.9 sdsf joblog,the information of a job will be like:

JOB61899  -JOBNAME  STEPNAME PROCSTEPRC   EXCP   CONNTCBSRB  

JOB61899  -NBJRDBH  DEL531   00246442 551177.00  

JOB61899  -NBJRDBH  NBPO531  00   1015479 551177.00  

but in ZOS 1.11,it will be like: 

JOB13600  -STEPNAME PROCSTEPRC   EXCP   CONN   TCB   

JOB13600  -STEP100  7  1   .00   

We could see that jobname colums lost in the sdsf joblog of ZOS1.11.

When we migrated the system,we copy IEEACTRT from the sys1.samplib of z/OS 1.11

We don't change it and reassemble it to sys1.linklib.

Could you help us? 

Any suggestions is higly appreciated!

Thanks a lot!

Best Regards,

Jason Cai 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Jobname colums was lost in the sdsf joblog on ZOS1.11.

2011-04-13 Thread ibmnew
Dear all

 I checked the  PMR and found the following result:



  I have checked several of our systems and the default, at z/OS 1.11
1.10 and 1.8 does not show JOBNAME.   
   We have other systems at 1.10 and 1.11 which have local modifications  
which do show the JOBNAME.
   You will need to look at modifying this to include JOBNAME.  
-

My question:

How to  modifying IEEACTRT to include JOBNAME?


Thanks a lot!

Begards,

Jason Cai






发件人: ibmnew 
发送时间: 2011-04-13  14:08:58 
收件人: IBM-MAIN 
抄送: 
主题: Jobname colums was lost in the sdsf joblog on ZOS1.11. 
 
Dear all  
One system has been migrated from z/OS 1.9 to z/OS 1.11  
in ZOS 1.9 sdsf joblog,the information of a job will be like:
JOB61899  -JOBNAME  STEPNAME PROCSTEPRC   EXCP   CONNTCBSRB  
JOB61899  -NBJRDBH  DEL531   00246442 551177.00  
JOB61899  -NBJRDBH  NBPO531  00   1015479 551177.00  
but in ZOS 1.11,it will be like: 
JOB13600  -STEPNAME PROCSTEPRC   EXCP   CONN   TCB   
JOB13600  -STEP100  7  1   .00   
We could see that jobname colums lost in the sdsf joblog of ZOS1.11.
When we migrated the system,we copy IEEACTRT from the sys1.samplib of z/OS 1.11
We don't change it and reassemble it to sys1.linklib.
Could you help us? 
Any suggestions is higly appreciated!
Thanks a lot!
Best Regards,
Jason Cai 
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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-12 Thread ibmnew

Dear all 

 Thanks all for your help!

I could understand more about your relpy.

Best Regards,

Jason Cai 





发件人: Darth Keller 
发送时间: 2011-04-12  03:38:27 
收件人: IBM-MAIN 
抄送: 
主题: Re: DATACLASS 
 
Q2 What's wrong of the ACS routing below:
SELECT
   WHEN ((DSN = ABSPPS)   AND
   (DSORG NE 'PO')   AND
   (DSORG NE 'VS')   AND
   (DSORG NE 'IS')   AND
   (DSORG NE 'DA'))   SET DATACLAS = 'DCPS'
///
In the stub you gave above, I don't see an exit statement which means your 
allocation could fall into a later code segment  and have the DATACLAS 
value re-assigned.  Unless you've got a very good reason not to, I'd 
recommend you Always pair your SET statements with a WRITE  and EXIT 
statement.
I know I've said this before, but here goes again - use WRITE statements 
to help in your Debug process -
 DO 
   SET DATACLAS = 'DCPS' 
   WRITE 'DCD0300' DSN '   ' PGM '   ' DSORG '   ' DATACLAS 
   EXIT 
 END 
The DCD0300 merely gives you a unique identifier for your exit point - 
this will tell you exactly what SMS is seeing at this point.  If you 
decide not to pair the SET statement with an EXIT having a WRITE statement 
for each SET statement will also show you when you are assigning the 
DATACLAS more than 1 time. 
Two pretty simple ROT's that can save you a lot of time  pain down the 
road.
my 2 cents worth 
ddk
This e-mail message and all attachments transmitted with it may
contain legally privileged and/or confidential information intended
solely for the use of the addressee(s). If the reader of this
message is not the intended recipient, you are hereby notified that
any reading, dissemination, distribution, copying, forwarding or
other use of this message or its attachments is strictly
prohibited. If you have received this message in error, please
notify the sender immediately and delete this message and all
copies and backups thereof. Thank you.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


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

2011-04-10 Thread ibmnew
Dear Mark 

 Thanks for your help.

 I got it. 

 Could you share your SHUTSYS STC to me?

 As you said that someone else mentioned an MPF exit.

 Could you tell me how to mention an MPF exit and the STC  triggered by the 
message?

 Thanks a lot!

Best Regards,

Jason Cai 





发件人: Mark Zelden 
发送时间: 2011-04-08  22:10:10 
收件人: IBM-MAIN 
抄送: 
主题: Re: How to start RMF Monitor III automatically after IPL the system. 
 
On Fri, 8 Apr 2011 16:46:11 +0800, ibmnew ibm...@163.com wrote:

 do  I prepare a proc and   put  COM='S RMFIII' statement in the COMMND00
after COM='S RMF.RMF,,,MEMBER(00)' statement 
 
  //RMFIIIPROC  
  //COMMAND  EXEC PGM=COMMAND  
  //IEFRDER  DD  *
D R,R   
DELAY 10
F RMF,START II 
In my sandbox LPARs I have 2 STCs - STARTSYS and SHUTSYS.  These
are procs that execute the COMMAND program and get their input from
parmlib members.
You could continue to put   COM='S RMF.RMF,,,MEMBER(00)  in your
COMMNDxx member and do the F RMF,START III from a COMMAND STC,
but I put just about everything in my STARTSYS process.  The only 
things in COMMNDxx are things started SUB=MSTR and STARTSYS itself.  
Although there is no reason a COMMAND STC can't run SUB=MSTR and
as a matter of fact, I run it that way at shutdown so it can shutdown
JES2 before it does a VARY XCF OFFLINE and shuts itself down. 
Example COMMNDxx:
COM='TRACE ST,128K' 
COM='START JES2,PARM='WARM,NOREQ''
COM='START VLF,SUB=MSTR'  
COM='START RRS,SUB=MSTR'  
COM='START STARTSYS.STARTSYS' 
Example STARTSYS proc:
//STARTSYS PROC 
//**
//* COMMAND IS FROM CBT FILE 019 - HTTP://WWW.CBTTAPE.ORG   
//**
//STARTSYS EXEC PGM=COMMAND,TIME=1439   
//STEPLIB  DD  DISP=SHR,DSN=authorized.loadlib  
//IEFRDER  DD  DISP=SHR,DSN=sandbox.parmlib(STRTSYSNAME.)  
Example input from sandbox.parmlib
* CHANGE VVDSSPACE FROM DEFAULT OF (10,10)  - Z/OS 1.7  ABOVE
F CATALOG,VVDSSPACE(30,15)
*  DYNAMIC LPA ADDS FROM PDSE LIBRARIES   
SETPROG LPA,ADD,MASK=GSK*,DSN=SYS1.SIEALNKE   
* START TASKS 
S CSF 
S NET 
DELAY=15  
S TCPIP   
DELAY=10  
S OMPROUTE
S TN3270  
S RMF,,,MEMBER(M0)
S SDSF
S HCHECKER
DELAY=10  
S TSO 
F RMF,START III   
Hope this explains it all more clearly.
Regards,
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: DATACLASS

2011-04-10 Thread ibmnew
Dear Schwarz 

 I tested your ACS routing today.It works.

 I submit the following JCL

//ALOCHSKP EXEC PGM=IEFBR14,REGION=0M 
//MESSAGE  DD DSN=ABSP.CEB.TEST32,DISP=(NEW,CATLG,DELETE),
//UNIT=3390,SPACE=(4096,(10,10)), 
// DCB=(LRECL=300,BLKSIZE=27900,RECFM=FB) 

The output of the JCL:
3 IGD01007I DSN=ABSP.CEB.TEST32
3 IGD01007I DSORG =
3 IGD01007I DSN MATCHES
3 IGD01007I DSORG MATCHES  
3 IGD01007I DATACLASS =DCPS


SPACE=(4096,(10,10)) statement cann't tell system that the ORG of the dataset 
isn't a PS (DSORG=' ')

Then I submit the following JCL

//ALOCHSKP EXEC PGM=IEFBR14,REGION=0M 
//MESSAGE  DD DSN=ABSP.CEB.TEST33,DISP=(NEW,CATLG,DELETE),
//UNIT=3390,SPACE=(4096,(10,10,10)),  
// DCB=(LRECL=300,BLKSIZE=27900,RECFM=FB) 
 
The output of the JCL:

3 IGD01007I DSN=ABSP.CEB.TEST33
3 IGD01007I DSORG =PO  
3 IGD01007I DSN MATCHES
3 IGD01007I DATACLASS =
3 IGD01007I DATACLASS =DCSTD   

SPACE=(4096,(10,10,10)) can tell system that the allocated dataset is a PDS. 
(DSORG=PO)

Q1.Why can SPACE=(4096,(10,10,10)) statement tell system that the allocated 
dataset is a PDS but SPACE=(4096,(10,10)) cann't do it 
Q2 What's wrong of the ACS routing below:

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


Thanks a lot!

Jason Cai




发件人: Schwarz, Barry A 
发送时间: 2011-04-09  03:12:03 
收件人: IBM-MAIN 
抄送: 
主题: Re: DATACLASS 
 
Show us the definition of ABSPPS.
You might also want to consider inserting some debugging WRITE statements.  
Something like
  FILTLIST ABSPPS INCLUDE(...)
  FILTLIST DSORGS INCLUDE('PO', 'VS', 'IS', 'DA')
  WRITE DSN= DSN, DSORG = DSORG
  IF DSN = ABSPPS THEN
 DO
 WRITE DSN MATCHES
 IF DSORG NE DSORGS THEN
DO
WRITE DSORG MATCHES
SET DATACLAS = 'DCPS'
END
 WRITE DATACLASS = DATACLAS
 END
  IF DATACLAS EQ '' THEN
 SET DATACLAS = 'DCSTD'
  WRITE DATACLASS = DATACLAS
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
ibmnew
Sent: Thursday, April 07, 2011 11:11 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: DATACLASS
Hi
 I changed the check in the ACS routine from DSORG EQ PS to DSORG NE (PO, VS, 
IS, DA, etc)
Below is the ACS routing
   SELECT
   WHEN ((DSN = ABSPPS)   AND
   (DSORG NE 'PO')   AND
   (DSORG NE 'VS')   AND
   (DSORG NE 'IS')   AND
   (DSORG NE 'DA'))   SET DATACLAS = 'DCPS'
 WHEN (DATACLAS NE '') SET DATACLAS = DATACLAS
 OTHERWISE SET DATACLAS = 'DCSTD'
   END
 END
I submit the following JCL
//ALOCHSKP EXEC PGM=IEFBR14
//MESSAGE  DD DSN=ABSP.CEB.TEST22,DISP=(NEW,CATLG,DELETE),
//UNIT=3390,SPACE=(4096,(10,10)),
// DCB=(LRECL=300,BLKSIZE=27900,RECFM=FB)
But the dataclass of  ABSP.CEB.TEST22 is DCSTD
 Is the ACS routing correct?
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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-08 Thread ibmnew

Hi 

 I changed the check in the ACS routine from DSORG EQ PS to DSORG NE (PO, VS, 
IS, DA, etc)

Below is the ACS routing

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


I submit the following JCL 


//ALOCHSKP EXEC PGM=IEFBR14  
//MESSAGE  DD DSN=ABSP.CEB.TEST22,DISP=(NEW,CATLG,DELETE),   
//UNIT=3390,SPACE=(4096,(10,10)),
// DCB=(LRECL=300,BLKSIZE=27900,RECFM=FB)


But the dataclass of  ABSP.CEB.TEST22 is DCSTD 

 Is the ACS routing correct?

 Maybe we have to use DSORG=PS in the IEFBR14. Thanks a  lot!

Jason Cai






发件人: Schwarz, Barry A 
发送时间: 2011-04-08  02:20:33 
收件人: IBM-MAIN 
抄送: 
主题: Re: DATACLASS 
 
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: How to start RMF Monitor III automatically after IPL the system.

2011-04-08 Thread ibmnew
Dear Mark 

 Do we need to submit the following JCl to start RMF Monitor III
  
   //JOBNAME ... 
   //COMMAND  EXEC PGM=COMMAND
   //IEFRDER  DD  *   
D R,R  
DELAY 10   
F RMF,START III  

 Thanks a lot!

Best Regards,

Jason Cai



发件人: Mark Zelden 
发送时间: 2011-04-08  00:42:42 
收件人: IBM-MAIN 
抄送: 
主题: Re: How to start RMF Monitor III automatically after IPL the system. 
 
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: How to start RMF Monitor III automatically after IPL the system.

2011-04-08 Thread ibmnew

Dear Anthony 

 I download the CBT 332 file.

 I assemble and  link the OTTO PGM to authorize LIB.

 I add ' ERB100I RMF MESSAGES ' to CPAC.PARMLIB(MPFLST00) 

But I didn't know how to use this PGM.

Could you give me more detailed help? How to write the JCL? How to start the 
JCL?


Thanks a lot!

Jason Cai 





发件人: Anthony Thompson 
发送时间: 2011-04-07  11:53:47 
收件人: IBM-MAIN 
抄送: 
主题: Re: How to start RMF Monitor III automatically after IPL the system. 
 
From context, I suppose SA means System Automation.
You can use PARMLIB's MPFLST to call a program on receipt of the RMF 
initialization complete message (ERB100I); the program calls SVC34 to issue the 
S RMFGAT command (or whatever). The program can be generalized for other system 
automation since the message it triggers on is available to the program.
In a previous barebones (z/OS 1.8. 1.9) site I used the venerable OTTO from 
file 332 of the CBT tape quite successfully. File 623 might be more functional, 
but I can't personally vouch for that one. 
Ant.
Northern Territory Govt., Australia 
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
ibmnew
Sent: Thursday, 7 April 2011 11:54 AM
To: IBM-MAIN@bama.ua.edu
Subject: How to start RMF Monitor III automatically after IPL the system.
Hi all 
 We don't have SA. 
 How to start RMF Monitor III automatically after IPL the system?
Any suggestions is apprecited!
Thanks a lot!
Jason Cai
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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 to start RMF Monitor III automatically after IPL the system.

2011-04-08 Thread ibmnew

Mark 

 Wherther do  I prepare a proc and   put  COM='S RMFIII' statement in the 
COMMND00 after COM='S RMF.RMF,,,MEMBER(00)' statement

  //RMFIIIPROC 
  //COMMAND  EXEC PGM=COMMAND 
   //IEFRDER  DD  *   
D R,R  
DELAY 10   
F RMF,START II


Thanks a lot!

Jason Cai 





发件人: ibmnew 
发送时间: 2011-04-08  14:30:22 
收件人: IBM-MAIN 
抄送: 
主题: Re: How to start RMF Monitor III automatically after IPL the system. 
 
Dear Mark 
 Do we need to submit the following JCl to start RMF Monitor III
  
   //JOBNAME ... 
   //COMMAND  EXEC PGM=COMMAND
   //IEFRDER  DD  *   
D R,R  
DELAY 10   
F RMF,START III  
 Thanks a lot!
Best Regards,
Jason Cai
发件人: Mark Zelden 
发送时间: 2011-04-08  00:42:42 
收件人: IBM-MAIN 
抄送: 
主题: Re: How to start RMF Monitor III automatically after IPL the system. 

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


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

2011-04-06 Thread ibmnew
Hi all 

 We don't have SA. 

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

Any suggestions is apprecited!

Thanks a lot!

Jason Cai

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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-06 Thread ibmnew
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 Hawkinsron.hawkins1...@sbcglobal.net
 To: IBM-MAIN@bama.ua.edu
 Sent: Fri, April 1, 2011 5:25:30 PM
 Subject: Re: DATACLASS

 Scott,

 I may be older then.

 The JCL is pretty much run of the mill placeholder allocation. It's a
 pretty
 common practice to pre-allocate your space like this. Some shops add the
 DCB
 info in the IEFBR14 and some shops add it on the step that opens the file.
 It doesn't really matter 'cause it is 

Re: DATACLASS

2011-04-06 Thread ibmnew
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 Hawkinsron.hawkins1...@sbcglobal.net
 To: IBM-MAIN@bama.ua.edu
 Sent: Fri, 

DATACLASS

2011-04-01 Thread ibmnew
Hi all

We want to assign  a DC (DCPS) to HLQ(ABSP.CEB.**) and DSORG=PS

Below is the ACS rounting:

PROC DATACLAS 
FILTLIST ABSPPS INCLUDE(ABSP.CEB.**)
  
  SELECT  
   WHEN ((DSORG = 'PS')  (DSN = ABSPPS)) SET DATACLAS = 'DCPS'  
WHEN (DATACLAS NE '') SET DATACLAS = DATACLAS  
OTHERWISE SET DATACLAS = 'DCSTD' 
  END 
END   


Then the ACS and DC were activate.

If we used ispf p.3.2 to allocate a DATASET ABAS.CEB.TEST and Directory=0, 

DC of the dataset was assigned as DCPS.

I deleted the dataset ABAS.CEB.TEST';

Then the following jcl was submitted to allocated the same dataset.


//ALOCHSKP EXEC PGM=IEFBR14 
//MESSAGE  DD DSN=ABSP.CEB.TEST,DISP=(NEW,CATLG,DELETE),  
//UNIT=3390,SPACE=(4096,(10,10))   


This time DC of the  dataset was assign as  DCSTD


What's wrong ?


Any suggestion are appreciated  !


Jason Cai 

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


WLM Scheduling Environments

2011-03-25 Thread ibmnew
Hi all

 We defined a Scheduling Environments  (DEVLD) in the WLM below.

Scheduling Environment Name. . DEVLD
  
 Resource Name State  Resource Description
 - -  
DBZ3ON


The WLM was activate.

 In the SDSF.RES

NP   RESOURCE BDZ3 
  BDZ3RESET

I issued  F WLM,RESOURCE=BDZ3,ON .

It is ok.

After I reIPLed the system,the resource(BDZ3) was reset.

My question:
 
 How to make the resource(BDZ3) on after IPL.


Thanks a lot!

Best Regards,

Jason Cai


 




   
  

 

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


Purging and Cancelling own jobs

2011-03-15 Thread ibmnew
Hi all

 My shop is z/OS 1.11(RACF).

 I want to know how to only purge and cancel own jobs from the SDSF pannels.

 SDSF,OPERCMDS and JESSPPOL classes are involved.

 Could you help me?

 Any suggestion would be helpful!

Best Regards,

Jason Cai

   

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Purging and Cancelling own jobs

2011-03-15 Thread ibmnew

Hi 

 I found the reason:

 SDSF checks ISFAUTH *before* it looks at JESSPOOL. 


Thanks a lot!

Best Regards,

Jason Cai
 
ibmnew pisze:
 Hi all
 
  My shop is z/OS 1.11(RACF).
 
  I want to know how to only purge and cancel own jobs from the SDSF pannels.
 
  SDSF,OPERCMDS and JESSPPOL classes are involved.
 
  Could you help me?
 
  Any suggestion would be helpful!
Could you be more specific?
We don't know anything about your setup.
Possible solution:
Simply activate JESSPOOL class. Users are by default allowed to their 
own outputs, the rest is by default restricted.
You can relieve the restriction by definning ** UACC(READ) and 
authorizing some powerusers with ALTER to that profile.
BTW: SDSF, JESSPOOL and OPERCMDS reliationships are not easy to understand.
-- 
Radoslaw Skorupka
Lodz, Poland
--
BRE Bank SA
ul. Senatorska 18
00-950 Warszawa
www.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 16.07.2010 r. kapita zakadowy BRE Banku SA (w caoci 
wpacony) wynosi 168.248.328 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


operlog

2011-03-10 Thread ibmnew
Hi all

 Our shop is a single image on z/OS 1.11

  Do we need to issue 'VARY OPERLOG,HARDCPY' command?

  Do the single image need  OPERLOG?

Any suggestion would be helpful!

Best Regards,

Jason Cai
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: operlog

2011-03-10 Thread ibmnew
Hi

 We will activate operlog. Thanks a lot!

Best Regards,

Jason Cai 



 
On Thu, 10 Mar 2011 16:58:03 +0800, ibmnew ibm...@163.com wrote:
Hi all

 Our shop is a single image on z/OS 1.11

  Do we need to issue 'VARY OPERLOG,HARDCPY' command?

  Do the single image need  OPERLOG?

Any suggestion would be helpful!

You never need OPERLOG  - be it monoplex or in a sysplex.   
Even though the main benefit of OPERLOG is thought to be a single
source of syslog data from multiple systems in a sysplex, there can
still be benefits in a monoplex.  Some benefits are:
1) An extra source of syslog data in case the JES2 syslog is lost
for some reason (purged, save process error, catastrophic error that
forces a JES2 cold start, etc.).
2) Data gets written to the operlog even after JES2 is brought down.  
You will never see that data in the JES2 syslog.
3) SDSF provides use of the FILTER command for OPERLOG, but does
not have any filter capability for syslog.
VARY OPERLOG,HARDCPY is the way to activate the OPERLOG on a running
system assuming you have met the prerequisites.   The prerequisite is
having the system logger configured. You would need to define a 
DASD ONLY logstream for the operlog.
After it is activated via command, you would add this to your PARMLIB's
CONSOLxx member so activates at the next IPL:
HARDCOPY DEVNUM(SYSLOG,OPERLOG)   
Hope this helps.
Regards,
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

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


What is the difference of the entry of the GDG vs VSAM in CATALOG

2011-03-03 Thread ibmnew
Hi all 

 We defined a VSAM file and a GDG base using a user id DBJMP05.

The prefix of DBJMP05 is managed by SMS 

SMS routing

SC :
 FILTLIST TSOUSERS   INCLUDE(DBJMP*) 

WHEN HLQ = TSOUSERS  
 SET STORCLAS = 'SCSTAND'   
SG:

FILTLIST TSOUSERS   INCLUDE(DBJMP*) 

WHEN(HLQ= TSOUSERS) SET STORGRP = 'SGTSO'   

Below is the JCL and the output of the JCL.
 
1. Define a VSAM : DBJMP05.BDZ3.MAN1
 
   DEFINE CLUSTER( - 
 CONTROLINTERVALSIZE(4096) -   
 TRACKS(50) -  
 NAME(DBJMP05.BDZ3.MAN1) - 
 INDEXED - 
 RECORDSIZE(4086,32767) -  
 BUFFERSPACE(81920) -  
 REUSE -   
 SHAREOPTIONS(2) - 
 SPANNED - 
 SPEED ) 


The return code is Zero

2.Define a base of GDG: DBJMP05.FAS.SE.FMLX.HIST


DEFINE GDG (NAME(DBJMP05.FAS.SE.FMLX.HIST) - 
LIMIT(03)  - 
NOEMPTY- 
SCRATCH ) 

The return is 12
   
ICH408I USER(DBJMP05 ) GROUP(#TMPUG  ) NAME(APPL MAINTENANCE
  CATALOG.PLEXBDZ3.TSO CL(DATASET ) VOL(BD3CT1) 
  INSUFFICIENT ACCESS AUTHORITY 
  FROM CATALOG.PLEXBDZ3.TSO (G) 
  ACCESS INTENT(UPDATE )  ACCESS ALLOWED(READ   )

My question :

 I want to know the reasons:


 1. Why is it success when I define a vsam or PDS using prefix DBJMP05?

 2.Why isnot it success when I define a base of GDG using prefix DBJMP05?

 3.What is the difference  of them in the catalog 


Any suggestion would be helpful!

Thanks a lot!

Jason Cai






  

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


Re: What is the difference of the entry of the GDG vs VSAM in CATALOG

2011-03-03 Thread ibmnew
Hi all 

Our shop is RACF.

It is single level alias 

DBJMP05.BDZ3.MAN1 catalog to the same catalog as the GDG.


Thanks a lot!

Jason Cai
 
 DEFINE GDG (NAME(DBJMP05.FAS.SE.FMLX.HIST) - 
LIMIT(03)  - 
NOEMPTY- 
SCRATCH ) 

 The return is 12
   
 ICH408I USER(DBJMP05 ) GROUP(#TMPUG  ) NAME(APPL MAINTENANCE
   CATALOG.PLEXBDZ3.TSO CL(DATASET ) VOL(BD3CT1) 
   INSUFFICIENT ACCESS AUTHORITY 
   FROM CATALOG.PLEXBDZ3.TSO (G) 
   ACCESS INTENT(UPDATE )  ACCESS ALLOWED(READ   )
 
  1. Why is it success when I define a vsam or PDS using prefix DBJMP05?
 
  2.Why isnot it success when I define a base of GDG using prefix DBJMP05?
 
  3.What is the difference  of them in the catalog

Jason,
I do not think this is an ACS routine issue.
This looks more like a security profile issue.  The ICH408I is indicating
that the DBJMP05 user does not have access to the CATALOG.PLEXBDZ3.TSO.
What is the access to this catalog for this ID?
What catalog ( Report results of a LISTC ENT(DBJMP05.BDZ3.MAN1) ALL ) does
it live in?
Does DBJMP05.BDZ3.MAN1 catalog to the same catalog as the GDG?  How is the
CATALOG set up?  Is is single level or multiple level aliases?  Is the
failure on the same LPAR or Different LPARs?
What security product are you using (RACF?)  What level of z/OS?
Lizette
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

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


Re: What is the difference of the entry of the GDG vs VSAM in CATALOG

2011-03-03 Thread ibmnew
Our shop is z/OS 1.11.  the image is a single image.


Thanks a lot!


Hi all 
Our shop is RACF.
It is single level alias 
DBJMP05.BDZ3.MAN1 catalog to the same catalog as the GDG.
Thanks a lot!
Jason Cai

 DEFINE GDG (NAME(DBJMP05.FAS.SE.FMLX.HIST) - 
LIMIT(03)  - 
NOEMPTY- 
SCRATCH ) 

 The return is 12
   
 ICH408I USER(DBJMP05 ) GROUP(#TMPUG  ) NAME(APPL MAINTENANCE
   CATALOG.PLEXBDZ3.TSO CL(DATASET ) VOL(BD3CT1) 
   INSUFFICIENT ACCESS AUTHORITY 
   FROM CATALOG.PLEXBDZ3.TSO (G) 
   ACCESS INTENT(UPDATE )  ACCESS ALLOWED(READ   )
 
  1. Why is it success when I define a vsam or PDS using prefix DBJMP05?
 
  2.Why isnot it success when I define a base of GDG using prefix DBJMP05?
 
  3.What is the difference  of them in the catalog

Jason,
I do not think this is an ACS routine issue.
This looks more like a security profile issue.  The ICH408I is indicating
that the DBJMP05 user does not have access to the CATALOG.PLEXBDZ3.TSO.
What is the access to this catalog for this ID?
What catalog ( Report results of a LISTC ENT(DBJMP05.BDZ3.MAN1) ALL ) does
it live in?
Does DBJMP05.BDZ3.MAN1 catalog to the same catalog as the GDG?  How is the
CATALOG set up?  Is is single level or multiple level aliases?  Is the
failure on the same LPAR or Different LPARs?
What security product are you using (RACF?)  What level of z/OS?
Lizette
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

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


Re: What is the difference of the entry of the GDG vs VSAM in CATALOG

2011-03-03 Thread ibmnew
Lizette

 There are only RACF profiles DBJMP05.**  for  DBJMP05.BDZ3 and  DBJMP05.FAS.

Thanks a lot!

Jason Cai

 Our shop is RACF.
 It is single level alias
 Our shop is z/OS 1.11.  the image is a single image.

 DBJMP05.BDZ3.MAN1 catalog to the same catalog as the GDG.
 Thanks a lot!
 Jason Cai
 
  DEFINE GDG (NAME(DBJMP05.FAS.SE.FMLX.HIST) -
 LIMIT(03)  -
 NOEMPTY-
 SCRATCH )
 
  The return is 12
 
  ICH408I USER(DBJMP05 ) GROUP(#TMPUG  ) NAME(APPL MAINTENANCE
CATALOG.PLEXBDZ3.TSO CL(DATASET ) VOL(BD3CT1)
INSUFFICIENT ACCESS AUTHORITY
FROM CATALOG.PLEXBDZ3.TSO (G)
ACCESS INTENT(UPDATE )  ACCESS ALLOWED(READ   )
 
   1. Why is it success when I define a vsam or PDS using prefix DBJMP05?
 
   2.Why isnot it success when I define a base of GDG using prefix
DBJMP05?
 
   3.What is the difference  of them in the catalog
 
 
Jason,
So what RACF profiles do you have for all levels of these datasets?
Start by looking at DBJMP05
The DBJMP05.BDZ3
Then DBJMP05.FAS
And so on.
See if the LD command for RACF can show what profile covers each dataset
name.  I sometimes use the RACF ISPF panels or if you have Tivoli, have your
Tivoli administrator look with you.
Lizette
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

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


Re: What is the difference of the entry of the GDG vs VSAM in CATALOG

2011-03-03 Thread ibmnew
Joel C

 I got it.Thanks you very very much!

Best Regards,

Cai Jin Song


 Hi all
 
   We defined a VSAM file and a GDG base using a user id DBJMP05.
 The prefix of DBJMP05 is managed by SMS
 SMS routing
 SC :
   FILTLIST TSOUSERS   INCLUDE(DBJMP*)
 
 WHENHLQ =TSOUSERS
   SETSTORCLAS = 'SCSTAND'
 SG:
 FILTLIST TSOUSERS   INCLUDE(DBJMP*)
 
 WHEN(HLQ=TSOUSERS) SETSTORGRP = 'SGTSO'
 
 Below is the JCL and the output of the JCL.
 1. Define a VSAM : DBJMP05.BDZ3.MAN1
 DEFINE CLUSTER( -
   CONTROLINTERVALSIZE(4096) -
   TRACKS(50) -
   NAME(DBJMP05.BDZ3.MAN1) -
   INDEXED -
   RECORDSIZE(4086,32767) -
   BUFFERSPACE(81920) -
   REUSE -
   SHAREOPTIONS(2) -
   SPANNED -
   SPEED )
 
 The return code is Zero
 
 2.Define a base of GDG: DBJMP05.FAS.SE.FMLX.HIST
 DEFINE GDG (NAME(DBJMP05.FAS.SE.FMLX.HIST) -
  LIMIT(03)  -
  NOEMPTY-
  SCRATCH )
 The return is 12
 
 ICH408I USER(DBJMP05 ) GROUP(#TMPUG  ) NAME(APPL MAINTENANCE
CATALOG.PLEXBDZ3.TSO CL(DATASET ) VOL(BD3CT1)
INSUFFICIENT ACCESS AUTHORITY
FROM CATALOG.PLEXBDZ3.TSO (G)
ACCESS INTENT(UPDATE )  ACCESS ALLOWED(READ   )
 
 My question :
 
   I want to know the reasons:
   1. Why is it success when I define a vsam or PDS using prefix DBJMP05?
   2.Why isnot it success when I define a base of GDG using prefix DBJMP05?
   3.What is the difference  of them in the catalog
 
 Any suggestion would be helpful!
 
 Thanks a lot!
 
 Jason Cai
 
...
The answer is really quite simple, although perhaps counter-intuitive.
Only data sets are SMS controlled, thus the VSAM file is an SMS data
set, the GDG base is not.
 All SMS data sets must be cataloged in their alias-directed catalog;
therefore, except for the special case of the master catalog, z/OS
allows them to be cataloged in any user catalog to which they are
directed by defined alias definitions, bypassing any RACF access checks
on USERCAT catalog access in order to guarantee that cataloging can
occur and avoid unnecessary problems .  Master catalog access still
requires RACF access, since unless a mistake has been made, access to
any dataset HLQs that would map to master cat should be restricted to
SysProgs who should have access to master cat.
Since the GDG base is not an SMS dataset, RACF access checks on catalogs
are not bypassed and the user must have RACF UPDATE access to the
catalog.  Altering or creating catalog entries in a USERCAT, other than
those changes implied by the creation/deletion of SMS datasets, requires
UPDATE access to the catalog.
It used to be the case that RACF UPDATE access to all catalogs was
always required to make catalog changes. At somewhere along the line
this SMS exception was documented as an enhancement with MVS release
migration docs.
-- 
Joel C. Ewing, Fort Smith, ARjcew...@acm.org
   Bentonville, AR   jcew...@acm.org 
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Could I issue '-SETXCF COUPLE,ACOUPLE=PLEXBDZ3.OMVS' in a monoplex configuration

2010-12-30 Thread ibmnew
Dear Bill

 You are right. 

 I have other two questions: 

1.Could you tell me why the records associated with the SYSPLEX couple data set 

weren't in the incoming CDS ? Because of monplex configuration?

 2. How to report on the contents of the BPXMCDS data?


Thanks a lot!

Best Regards,

Jason Cai  


 Re: Could I issue '-SETXCF COUPLE,ACOUPLE=PLEXBDZ3.OMVS' in a monoplex 
configuration 
 
As an earlier poster indicated, your ACOUPLE command must specify the TYPE
keyword:
SETXCF COUPLE,TYPE=BPXMCDS,ACOUPLE=PLEXBDZ3.OMVS01
Without it, the SETXCF command defaults to TYPE=SYSPLEX.  Your original
ACOUPLE command failed because the system was expecting to find the records
associated with the SYSPLEX couple data set in the incoming CDS, and they
weren't there.
Your attempt to use IXCMIAPU to report on the contents of the BPXMCDS data
set failed because OMVS does not support use of the policy utility.
 Bill Neiman
 IBM Parallel Sysplex 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

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


Could I issue '-SETXCF COUPLE,ACOUPLE=PLEXBDZ3.OMVS' in a monoplex configuration

2010-12-27 Thread ibmnew
Hi all 

 Our shop is a monoplex configuration.We want to use a new OMVS couple dataset.

1.We issue '-D XCF,COUPLE,TYPE=BPXMCDS' command.The following messages were 
shown:

   
 IXC358I  16.07.47  DISPLAY XCF 850  
 BPXMCDS COUPLE DATA SETS
 PRIMARYDSN: PLEXBDZ3.OMVS01.BK  
VOLSER: BD3CD1 DEVN: 3F06
FORMAT TOD MAXSYSTEM 
12/27/2010 14:35:584 
ADDITIONAL INFORMATION:  
  FORMAT DATA
   VERSION(2)
   MOUNTS(200)   AMTRULES(50)
 ALTERNATE  DSN: PLEXBDZ3.OMVS02.BK  
VOLSER: BD3CD2 DEVN: 3C07
FORMAT TOD MAXSYSTEM 
12/27/2010 14:35:584 
ADDITIONAL INFORMATION:  
   FORMAT DATA 
VERSION(2) 
MOUNTS(200)   AMTRULES(50) 
  BPXMCDS IN USE BY ALL SYSTEMS

2. We define a new OMVS couple dataset( PLEXBDZ3.OMVS01) as the existing OMVS 
couple dataset.

3. We issue 'SETXCF COUPLE,ACOUPLE=PLEXBDZ3.OMVS01' command.The following 
messages were shown   
  
 IXC309I SETXCF COUPLE,ACOUPLE REQUEST FOR SYSPLEX WAS ACCEPTED
 IXC260I ALTERNATE COUPLE DATA SET REQUEST FROM SYSTEM 
 BDZ3 FOR SYSPLEX IS NOW BEING PROCESSED.  
 DATA SET:  PLEXBDZ3.OMVS01
 IXC255I UNABLE TO USE DATA SET
 PLEXBDZ3.OMVS01   
 AS THE ALTERNATE FOR SYSPLEX: DOES NOT CONTAIN SYSTEM RECORDS 
 IXC255I UNABLE TO USE DATA SET
 PLEXBDZ3.OMVS01   
 AS THE ALTERNATE FOR SYSPLEX: DOES NOT CONTAIN RECOVERY RECORDS   
 IXC255I UNABLE TO USE DATA SET
 PLEXBDZ3.OMVS01   
 AS THE ALTERNATE FOR SYSPLEX: DOES NOT CONTAIN SYSPLEX RECORDS
 IXC255I UNABLE TO USE DATA SET
 PLEXBDZ3.OMVS01   
 AS THE ALTERNATE FOR SYSPLEX: DOES NOT CONTAIN MEMBER RECORDS 
IXC260I ALTERNATE COUPLE DATA SET REQUEST FROM SYSTEM 
BDZ3 FOR SYSPLEX IS NOW BEING PROCESSED.  
DATA SET:  PLEXBDZ3.OMVS01
IXC255I UNABLE TO USE DATA SET
PLEXBDZ3.OMVS01   
AS THE ALTERNATE FOR SYSPLEX: DOES NOT CONTAIN SYSTEM RECORDS 
IXC255I UNABLE TO USE DATA SET
PLEXBDZ3.OMVS01   
AS THE ALTERNATE FOR SYSPLEX: DOES NOT CONTAIN RECOVERY RECORDS   
IXC255I UNABLE TO USE DATA SET
PLEXBDZ3.OMVS01   
AS THE ALTERNATE FOR SYSPLEX: DOES NOT CONTAIN SYSPLEX RECORDS
IXC255I UNABLE TO USE DATA SET
PLEXBDZ3.OMVS01   
AS THE ALTERNATE FOR SYSPLEX: DOES NOT CONTAIN MEMBER RECORDS 
IXC255I UNABLE TO USE DATA SET
PLEXBDZ3.OMVS01   
AS THE ALTERNATE FOR SYSPLEX: DOES NOT CONTAIN IXCLKFLR RECORDS   

Our questions:

1.Could I issue '-SETXCF COUPLE,ACOUPLE=PLEXBDZ3.OMVS' in a monoplex 
configuration 

2.Is there anything we didn't do?


Thanks a lot!

Best Regards,

Jason Cai

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Could I issue '-SETXCF COUPLE,ACOUPLE=PLEXBDZ3.OMVS' in a monoplex configuration

2010-12-27 Thread ibmnew
 Hi all 

 We are using PLEXBDZ3.OMVS01.BK and PLEXBDZ3.OMVS02.BK

Below is the couplexx we are using

COUPLE SYSPLEX(SYSPLEX.)  
PCOUPLE(SYSPLEX..XCF01)   
ACOUPLE(SYSPLEX..XCF02)   
   DATA TYPE(WLM)  
PCOUPLE(SYSPLEX..WLM01)   
ACOUPLE(SYSPLEX..WLM02)   
   DATA TYPE(LOGR) 
PCOUPLE(SYSPLEX..LOGR01)  
ACOUPLE(SYSPLEX..LOGR02)  
   DATA TYPE(BPXMCDS)  
PCOUPLE(SYSPLEX..OMVS01.BK)  
ACOUPLE(SYSPLEX..OMVS02.BK)  

 We want to replace PLEXBDZ3.OMVS01.BK with PLEXBDZ3.OMVS01
  

 Below is the output of the OMVS CDS definition. The RC is Zero
   
   DEFINEDS SYSPLEX(PLEXBDZ3)   
DSN(PLEXBDZ3.OMVS01) VOLSER(BD3CD1)  
MAXSYSTEM(4)
  CATALOG   
DATA TYPE(BPXMCDS)  
 ITEM NAME(MOUNTS) NUMBER(200)  
 ITEM NAME(AMTRULES) NUMBER(50) 
IGD100I 3F06 ALLOCATED TO DDNAME COUPLE   DATACLAS ()   
IXC292I DATA SET FORMATTING COMPLETE: DATA SET REQUIRES 30 TRACKS ON VOLSER 
BD3CD1

IXC292I 1 RECORDS FORMATTED WITH 1 DISTBRLM ITEMS EACH  
IXC292I 1 RECORDS FORMATTED WITH 200 MOUNTS ITEMS EACH  
IXC292I 1 RECORDS FORMATTED WITH 50 AMTRULES ITEMS EACH 


The definition is the same as PLEXBDZ3.OMVS01.BK

We ran the following JOB

//DEFLOGR  EXEC PGM=IXCMIAPU
//SYSPRINT DD SYSOUT=*  
//SYSIN DD *
 DATA TYPE(BPXMCDS) REPORT(YES) 

The output is below
---

LINE # CONTROL CARDS

 1 DATA TYPE(BPXMCDS) REPORT(YES)   
ADMINISTRATIVE DATA UTILITY:  MESSAGES  




IXC730I ERROR DETECTED IN LINE 1.   
  THE VALUE 'BPXMCDS' FOR KEYWORD 'TYPE' IS NOT ONE OF THE ALLOWABLE
  VALUES.   
IXC735I XCF ADMINISTRATIVE DATA UTILITY ENCOUNTERED AN ERROR: DATA TYPE CONTROL 


Our questions:

 1. Why don't  we get a normal output by running IXCMIAPU utility program with 
DATA TYPE(BPXMCDS) REPORT(YES)?
 (note: the output is normal by issuing '-D XCF,COUPLE,TYPE=BPXMCDS' command)

 2.What else do we need to do ?


Thanks a lot!

Jason Cai   



 Re: Could I issue '-SETXCF COUPLE,ACOUPLE=PLEXBDZ3.OMVS' in a monoplex 
configuration 
 
I guess I am little confused.  In you display your dataset name is
PLEXBDZ3.OMVS01.BK  
But in your SETXCF command your dataset name is PLEXBDZ3.OMVS01  without a
.BK at the end.
Which data set name is correct?  And when was the last time you ran an
IXCMIAPU for both the primary and alternate?  Did you use the correct input?
Did you restore the alternate from a backup?
Also, if you look up the message it states
DOES NOT CONTAIN record-type RECORDS
XCF cannot use the data set as a couple data set because either of the
following conditions occurs:
* For sysplex couple data sets only, the data set does not contain
all the required record types.
* For incoming alternates only, the data set is missing a record or
subrecord that is present in the primary.
Consider to run IXCMIAPU utility program with DATA TYPE(BPXMCDS) REPORT(YES)
to find out the capacity from current primary CDS.  Or you may need to
rebuild the alternate.
Lizette
-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf
Of ibmnew
Sent: Monday, December 27, 2010 3:35 AM
To: IBM-MAIN@bama.ua.edu
Subject: Could I issue '-SETXCF COUPLE,ACOUPLE=PLEXBDZ3.OMVS' in a monoplex
configuration
Hi all 
 Our shop is a monoplex configuration.We want to use a new OMVS couple
dataset.
1.We issue '-D XCF,COUPLE,TYPE=BPXMCDS' command.The

Create a sysplex root ZFS data set

2010-12-07 Thread ibmnew
Hi all 

 Our shop is a monoplex configuration


 When we use BPXISYZR member to create the sysplex root ZFS data set, I found 
that shareoptions was 2.

Could you tell me it is correct or not? Could I use SHAREOPTIONS(3) as the 
following?

-
DEFINE CLUSTER (NAME(OMVS.PLEXBDZ3.ROOT) - 
VOLUMES(BD3S01) -  
LINEAR CYL(200 0) SHAREOPTIONS(3)) 


Thanks a lot!

Jason Cai

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


Could we define ARM Couple datasesr and OMVS Couple dataset?

2010-11-30 Thread ibmnew
Hi all

 There isn't any Couple facility in our shop.it was monoplex  configuration

Could we define ARM Couple datasesr and OMVS Couple dataset in our shop? 

 If ARM couple dataset could be defined,we could define some arm police to 

restart some Adderspaces when they abend.If it cann't be defined,what else 

methods could Automatic Restart the abend AS?

 Do we need to define OMVS Couple dataset in our shop?

Thanks a lot!

Best Regards,

Jason Cai

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Could we define ARM Couple datasesr and OMVS Couple dataset?

2010-11-30 Thread ibmnew
Staller

 Thank you very much!


ARM Couple datasesr and OMVS Couple dataset? 
 
1) Yes you can define these files and policies. A CF is not needed for
this.
2) an OMVS couple dataset would only be needed if there are multiple
images sharing HFS/ZFS files, See the Setting up a SYSPLEX books (I
believe this is a redbook)
HTH,
snip
There isn't any Couple facility in our shop.it was monoplex
configuration
Could we define ARM Couple datasesr and OMVS Couple dataset in our shop?
 If ARM couple dataset could be defined,we could define some arm police
to 
restart some Adderspaces when they abend.If it cann't be defined,what
else 
methods could Automatic Restart the abend AS?
 Do we need to define OMVS Couple dataset in our shop?
/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


IEC614I RENAME FAILED - RC 008, DIAGNOSTIC INFORMATION IS (04100C04)

2010-11-09 Thread ibmnew
Hi all

When we install z/OS 1.11 using Servpac,we want to rename SSA.PLEXBDZ3.XCF01 to 
PLEXBDZ3.XCF01 as below.

IEC614I RENAME FAILED  was occurred.Please see the following message.


IEC614I RENAME FAILED - RC 008, DIAGNOSTIC INFORMATION IS (04100C04),  258
258 ALTCAT,BD3CD2,SSA.PLEXBDZ3.XCF01

 ALTER -
   SSA.PLEXBDZ3.XCF01 -
   NEWNM(PLEXBDZ3.XCF01) -
   CAT(CAT.MASTER.PLEXBDZ3)
0IDC3014I CATALOG ERROR
 IDC3009I ** VSAM CATALOG RETURN CODE IS 98 - REASON CODE IS IGG0CLE6-8
 IDC0532I **ENTRY SSAMC3.PLEXBDZ3.XCF01 NOT ALTERED
0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 8


 Could you tell me how to solve this problem? Thanks a lot!


Best Regards,

Jason Cai

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


install new z10s into one data center

2010-10-21 Thread ibmnew
Hi all

  We are planning to install new z10s into one data center that do not 
currently have mainframes. 

 I will use the Customized offerings Driver to install the driver system.

 I am coding the IOCDS on the HMC. I hope that our IOCDS match the IODF shipped 
by the Customized offerings Driver .

 The IODF is SYS1.IODF00 on the tape. If you have the Driver system on the 
DASD, Could you use HCD to write the IOCP data?

Then ,could you send the IOCP to me?

   
  Any suggestions are very highly appreciated!
  

Best Regards,

Jason Cai 

 
 

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


IXG301I rc=X'0C', rc=X'0000'

2010-07-09 Thread ibmnew
Hi all

 We finished z/OS 1.11(A system) installation using Serverpac on one system(A).

All of IVPs are ok. We checked /Service/bin directory and see the UID/GID of the

filesre stored is 0/1.

This system(A) can be IPLed.Everything seem to be normal.  
 
 Then we migrated an other z/OS(B) from 1.9 to 1.11 using the new z/OS 1.11(A) 
sysres.

After we did everything for the migration on the z/OS 1.9 system(B),

we IPLed this z/OS 1.11(B). 

There are error messages appearing in the oplog

IFB097I LOGREC RECORDING MEDIUM CHANGED FROM IGNORETO LOGSTREAM 294
IXL014I IXLCONN REQUEST FOR STRUCTURE LOGRECSTRUCTURE 295  
WAS SUCCESSFUL.  JOBNAME: IXGLOGR ASID: 0014   
CONNECTOR NAME: IXGLOGR_BM00 CFNAME: C011  
IXG303I DIRECTED OFFLOAD FOR LOGSTREAM SYSPLEX.LOGREC.ALLRECS STARTED. 
IXG063I LOGGER ABENDED AND REQUESTED AN SVC DUMP WHILE PROCESSING 297  
LOGSTREAM: SYSPLEX.LOGREC.ALLRECS  
STRUCTURE: LOGRECSTRUCTURE 
GROUP: PRODUCTION  
MODULE=IXGF1WOW,ABEND=S00C9,REASON=0009
IXG209I RECOVERY FOR LOGSTREAM SYSPLEX.LOGREC.ALLRECS 299  
IN STRUCTURE LOGRECSTRUCTURE COMPLETED SUCCESSFULLY.   
IXG301I SYSTEM LOGGER FAILED TO OFFLOAD DATA FOR LOG STREAM 298
SYSPLEX.LOGREC.ALLRECS IN STRUCTURE LOGRECSTRUCTURE.  RETURN CODE: 
000C  REASON CODE:   DIAG1:   DIAG2:   
DIAG3: 0416000A  DIAG4:    
IXG214I SYSTEM LOGGER LOGSTREAM DATA DUPLEXING FOR LOGSTREAM 300   
SYSPLEX.LOGREC.ALLRECS IS BEING DONE IN LOCAL BUFFERS. 
LOCAL BUFFERS MAY NOT BE THE PREFERRED MODE OF DUPLEXING.  
IFB100E LOGREC LOG STREAM ERROR ON SYSTEM BM00 - RC=0008-085D 301  
  UNABLE TO WRITE TO LOG STREAM - LS DIRECTORY FULL / OFFLOAD FAILED   
  LOG STREAM NAME:  SYSPLEX.LOGREC.ALLRECS 
IFB100E LOGREC LOG STREAM ERROR ON SYSTEM BM00 - RC=0008-085D 304  
  UNABLE TO WRITE TO LOG STREAM - LS DIRECTORY FULL / OFFLOAD FAILED   
  LOG STREAM NAME:  SYSPLEX.LOGREC.ALLRECS  

   

The error message of IXG301I rc=X'0C', rc=X''  indicates that an  internal 
logger error has occurred


We cann't IPLed the system(B).

After we changed SETLOGRC LOGSTREAM  to SETLOGRC IGNORE .The system(B) can be 
IPLed.

On the system(B) we submit a job  to offload EREP.Below is the Job

//OFFEREP  EXEC  PGM=IFCEREP1,REGION=0M,   
//PARM=('ACC=Y,HIST=Y,SYSUM=Y,TABSIZE=5000K')  
//ACCINDD DSN=SYSPLEX.LOGREC.ALLRECS,  
//SUBSYS=(LOGR,IFBSEXIT,'VIEW=ALL',DELETE),
//DCB=(RECFM=VB,BLKSIZE=4000)  
//ACCDEV   DD DSN=OFFLOAD.EREP.PLEXM1.DAILY(+1),   
//DISP=(NEW,CATLG),DATACLAS=DCCOMP,
//DCB=(RECFM=VB,BLKSIZE=4000), 
//UNIT=3390,SPACE=(CYL,(50,5)) 
//SERLOG   DD DSN=SYSPLEX.LOGREC.ALLRECS,  
//SUBSYS=(LOGR,IFBSEXIT,'VIEW=ALL',DELETE),
//DCB=(RECFM=VB,BLKSIZE=4000)  
//DIRECTWK DD UNIT=3390,SPACE=(CYL,15,,CONTIG) 
//TOURIST  DD SYSOUT=*,DCB=BLKSIZE=133 
//EREPPT   DD SYSOUT=*,DCB=BLKSIZE=133 
//SYSABEND DD SYSOUT=* 
//SYSINDD DUMMY


A error occurred.The job abend.

The error message shown below

IFC135I PROCESSING TERMINATED ACCINREAD ERROR 

It seems a permanent I/O error has occurred on SYSPLEX.LOGREC.ALLRECS data set 

Could you help us find the root cause and tell us how to solve the problem?



Thanks a lot!

Best Regards,

Jason Cai

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


Changing data set space values.

2010-07-06 Thread ibmnew
Hi all


 We are installing z/OS 1.11 using Serverpac.

 Normal we issue 'CH S 100 * 100' command to increase the all datasets shipped 
on the RES volume.

 Could you tell us how to make sure which dataset on the RES volume really need 
to increase?

Normal what do you do for it? Thanks a lot!

Best Regards,

Jason Cai 

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


Could two parallel sysplex share one CF LPAR

2010-07-06 Thread ibmnew
Hi all

 Normal One parallel sysplex use its own CFs.

 I wonder whether two parallel sysplex could share one CF Lpar 

Thanks a lot!

Best Regards,

Jason Cai 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Changing data set space values.

2010-07-06 Thread ibmnew
Dear 
 
  Could you share your list of datasets that got a D37 with us? Thanks a lot!

Best Regards,

Jason Cai 





主题: Re: Changing data set space values. 
 
Jason,
I typically keep a list of datasets that got a D37 from the last time I 
installed a Serverpac and did an Apply.
The next server pac install I then verify the datasets and see if the space 
needs to be increased.
Lizette

Hi all


 We are installing z/OS 1.11 using Serverpac.

 Normal we issue 'CH S 100 * 100' command to increase the all datasets shipped 
 on the RES volume.

 Could you tell us how to make sure which dataset on the RES volume really 
 need to increase?

Normal what do you do for it? Thanks a lot!

Best Regards,

Jason Cai 

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


How to implement zFS

2010-06-30 Thread ibmnew
Dear all

 Our shop is a parallel sysplex.We just migrated our z/OS from z/OS 1.9 to 1.11.

 We didn't migrate any existing data from HFS to zFS.

Our application team want to use zFS new function,but we don't want to migrate 
any existing data from HFS to zFS.

We don't have any experience of zFS. Could you tell how to make our application 
team use zFS new function.


Any suggestions are very highly appreciated!


Thanks a lot!

Jason Cai 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: There isn't RC of step in the joblog

2010-06-28 Thread ibmnew
Dear 

The exit IEFACTRT( SYSSLS0.IEFACTRT  E) is enable. Do we need recompile the 
exit?

Thanks a lot!

Best Regards,

Jason Cai 
 


On Mon, 28 Jun 2010 16:50:42 +0800 ibmnew ibm...@163.com wrote:
: Our shop is z/OS 1.9. 
: On the one z/OS 1.9,there isn't RC of step in the joblog.Please see it below:
Done by exit IEFACTRT.
--
Binyamin Dissen bdis...@dissensoftware.com
http://www.dissensoftware.com
Director, Dissen Software, Bar  Grill - Israel
Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.
I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: 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: There isn't RC of step in the joblog

2010-06-28 Thread ibmnew
Dear all 


 I checked our system.Please see informations below


On the bad system

 D PROG,EXIT,EX=SYS.IEFACTRT,DIAG 
RESPONSE=BT06 
 CSV464I 08.54.50 PROG,EXIT DISPLAY 176   
 EXIT SYS.IEFACTRT
 MODULESTATE EPADDRLOADPTLENGTHJOBNAME
 IEFACTRTA   8A4D3000      *  
 DLCABT05A   960C21C8      *  

On the good system

 D PROG,EXIT,EX=SYS.IEFACTRT,DIAG 
RESPONSE=BR04  
 CSV464I 09.07.26 PROG,EXIT DISPLAY 030
 EXIT SYS.IEFACTRT 
 MODULESTATE EPADDRLOADPTLENGTHJOBNAME 
 IEFACTRTA   898C      *   


On the bad system

D PROG,LPA,MODNAME=IEFACTRT
RESPONSE=BT06
 CSV550I 08.55.34 LPA DISPLAY 182
 FLAGS  MODULEENTRY PT  LOAD PT   LENGTHDIAG 
P   IEFACTRT  8A4D3000  0A4D3000  0808  16BF2180 


On the good system

RESPONSE=BR04
 CSV550I 09.09.04 LPA DISPLAY 048
 FLAGS  MODULEENTRY PT  LOAD PT   LENGTHDIAG 
P   IEFACTRT  898C  098C  0808  15FF3090 


Comparing our SMFPRMxx,I found there is a statement '
SUBSYS(JES2,EXITS(IEFUSI))'  in the SMFPRMxx on the bad system 

But on the good system, there is not this statement.

What can I do in the next step? thanks a lot!


Best Regards,

Jason Cai 








发件人: Greeley, Kevin 
发送时间: 2010-06-28  21:58:50 
收件人: IBM-MAIN 
抄送: 
主题: Re: There isn't RC of step in the joblog 
 
Compare your SMFPRMxx PARMLIB members.
Check if IEFACTRT is specified in SUBSYS(JES2... in SMFPRMxx.
Kevin.
-Original Message-
.ua.edu/archives/ibm-main.html


Do we need to apply this USERMOD (EDGUX100) for RMM when we migrate z/OS from 1.9 to 1.11

2010-06-23 Thread ibmnew
Dear all

 We are migrating z/OS from 1.9 to 1.11
 I found there was a usermod(FRED001) on the z/OS 1.9 .Below is the information 
for the usermod
FRED001 M.C.S. ENTRIES = ++USERMOD (FRED001) REWORK(2009183) . /* SPEFIFY 
USERMOD NAME */ 
++VER (Z038) FMID(HDZ1190) /* insert correct FMID */ 
PRE (UA44931) . 
++JCLIN . 
//EDGUX100 EXEC PGM=IEWL,PARM='LET,NCAL,RENT,REUS,REFR,LIST,XREF' 
//SYSLMOD DD DISP=SHR,DSN=SYS1.LINKLIB,UNIT=3390, 
// VOL=SER=BMRSC1 
//SRCLIB DD DISP=SHR,DSN=ABCRMM.PROD.HSKP.JCL,UNIT=3390, 
// VOL=SER=CMRMM1 
//AEDGMOD1 DD DISP=SHR,DSN=SYS1.AEDGMOD1,UNIT=3390, 
// VOL=SER=BMDLC1 
//SYSPRINT DD SYSOUT=* 
//SYSLIN DD * 
INCLUDE AEDGMOD1(EDGUX100) 
ENTRY EDGUX100 
NAME EDGUX100(R) 
++SRC(EDGUX100) TXLIB(SRCLIB) DISTLIB(ASAMPLIB) . 
++SAMP(EDGUX100) TXLIB(SRCLIB) DISTLIB(ASAMPLIB) . 

 Do we need to apply this USERMOD (FRED001) for RMM on the z/OS 1.11 when we 
migrate z/OS from 1.9 to 1.11

If we need apply the usermod,  Do we just chang FMID  from HDZ1190 to HDZ1B10 ? 
Please see it below

 )++VER (Z038) FMID(HDZ1B10) /* insert correct FMID */ 

Thanks a lot!

Best Regards,

Jason Cai

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: EDC5113I reason code = 053501B2 in/ /etc/utmpx

2010-06-12 Thread ibmnew

Dear all
 
 Yes you are right. 

  It will be reset back to 644 during the next IPL becuase there is 

''chmod 644 /etc/utmpx' statement in the /etc/rc.

  Who could tell us another solution for it?

We want to change owner of  /bin/fomtlout  from OEDFLT(UID=99) to 
   BPXOINIT(UID=0).
  
  we issued   '1.chown BPXOINIT /bin/fomtlout;   
 
2.chown BPXOINIT /bin/fomtlinc;3chmod 644 /etc/utmpx '  three commands.   
  
 The UID of BPXOINIT is 0.   
  The UID of OEDFLT  is 999  
  
 Then we issued 'TSO OMVS' command.it seem to be ok.  
  
But the following messages appear on the console: 
  
BPXP015I HFS PROGRAM /bin/fomtlinc IS NOT MARKED PROGRAM CONTROLLED.  
BPXP014I ENVIRONMENT MUST BE CONTROLLED FOR DAEMON (BPX.DAEMON)   
PROCESSING.   
BPXP015I HFS PROGRAM /bin/fomtlout IS NOT MARKED PROGRAM CONTROLLED.  
BPXP014I ENVIRONMENT MUST BE CONTROLLED FOR DAEMON (BPX.DAEMON)   
PROCESSING.   
  
  
We issued 'extattr +p /bin/fomtlinc' comand according to IBM  
  
 manual   
  
Then we issued 'TSO OMVS ' command,we got the error messages  
  
below 
  
  
FSUM2378 The start of the session was not recorded.  The slot 
 (in /etc/utmpx) for this terminal could not be updated, or a
new slot for the terminal could not be created.  
  
  
We rollback what we did as the following: 
  
we issued 'extattr -p /bin/fomtlinc' comand and ''1.chown OEDFLT  
/bin/fomtlout;2.chown OEDFLT  /bin/fomtlinc;3.chmod 644 /etc/utmpx '  
three comand. 
  
Then we issued 'TSO OMVS' command,it seem to be ok on OMVS,but the
following message appear on the console.  
  
BPXP015I HFS PROGRAM /bin/fomtlinc IS NOT MARKED PROGRAM CONTROLLED.  
BPXP014I ENVIRONMENT MUST BE CONTROLLED FOR DAEMON (BPX.DAEMON)   
PROCESSING.   
BPXP015I HFS PROGRAM /bin/fomtlout IS NOT MARKED PROGRAM CONTROLLED.  
BPXP014I ENVIRONMENT MUST BE CONTROLLED FOR DAEMON (BPX.DAEMON)   
PROCESSING.   
  
why cann't we rollback it?
  
We need your help to solve this problem!  
  
Thanks a lot! 
Best Regards,




发件人: Mark Zelden 
发送时间: 2010-06-12  22:39:26 
收件人: IBM-MAIN 
抄送: 
主题: Re: EDC5113I reason code = 053501B2 in/ /etc/utmpx 
 
After we issued 'chmod 646 /etc/utmpx ' command and 'ls -l /etc/utmpx'
comand , 
 
the /etc/utmpx attribution was shown now below: 
 
-rw-r--rw--   1 BPXOINIT #SYSSTC 2288 Jun 10 21:42 /etc/utmpx  
 
we issued 'TSO OMVS'   command again.Everything is normal. 
Doesn't your /etc/rc have this?  If so, the next IPL or OMVS restart with
change it to 644:
 
# Setup utmpx file   
/etc/utmpx  
chmod 644 /etc/utmpx 
Something still doesn't make sense.   
Mark
--
Mark 

EDC5113I reason code = 053501B2 in/ /etc/utmpx

2010-06-11 Thread ibmnew
 Dear  
 Our shop is z/OS 1.11 now .  
 After z/OS was migrated from 1.9 to 1.11,we issued 'TSO OMVS'  
command.  
   We got the following messages:  
FSUM2378 The start of the session was not recorded.  The slot  
(in /etc/utmpx) for this terminal could not be updated, or a  
   new slot for the terminal could not be created.  
   Function = pututxline(), terminal name = '/dev/ttyp',  
   program name = '/bin/fomtlinc', errno = 113 (X'0071'),  
   reason code = 053501B2,  
message = 'EDC5113I  
Bad file descriptor.'  
We could obrowse the utmpx.We also checked the attribution  
   of  utmpx file,  
   the attribution is shown below:  
   Pathname : /BM00/etc/utmpx  
More: +  
   File type . . . . . . : Regular file  
   Permissions . . . . . : 644 rw-r--r--  
   Access control list . : 0  
   File size . . . . . . : 2288  
   File owner  . . . . . : BPXOINIT(0)  
   Group owner . . . . . : #SYSSTC(80)  
   Last modified . . . . : 2010-06-10 21:42:40  
   Last changed  . . . . : 2010-06-10 21:42:40  
   Last accessed . . . . : 2010-06-11 04:47:19  
   Created . . . . . . . : 2010-02-02 02:39:16  
   Link count  . . . . . : 1  
   Then we issue 'exit' command,we also get error messages below:  
   #exit  
FSUM2187I The end of the session was not recorded.  The proper  
   location for recording could not be found.+  
FSUM2188I Function = getutxline(), terminal name = 'ttyp',  
   user name = BJSP41, return value = 0  


  Could you tell me what reason code = 053501B2 means?Could you help us to 
solve this problem?  

Any Suggestions are highly appreciated!


   Thanks.  
   Jason Cai

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: EDC5113I reason code = 053501B2 in/ /etc/utmpx

2010-06-11 Thread ibmnew

Dear all 

   
We verified the following files.We found that the setuid bit for all of them 
was on.  
ls -alE /bin/fomtlinc 
ls -alE /bin/fomtlout  
ls -alE /bin/crontab  


-rwsr-xr-x  --s-  2 OEDFLT   1 344064 Nov 12  2009 /bin/fomtlinc 
-rwsr-xr-x  --s-  2 OEDFLT   1 344064 Nov 12  2009 /bin/fomtlout
-rwsr-xr-x  --s-  2 OEDFLT   1 344064 Nov 12  2009 /bin/crontab 
   
  
   ^  
   setuid bit 

we issued 'TSO OMVS'   command again.  We got the same error messages as before 

When we checked the syslog,the following messages appear on the console:

(these message also appear yesterday) 

ICH408I USER(IBMSE41  ) GROUP(#SPUSR  ) NAME(DOMENG MENG  
  /etc/utmpx CL(FSOBJ   ) FID(01C2D4E2D3F0F200041A00DB)
  INSUFFICIENT AUTHORITY TO OPEN   
  ACCESS INTENT(RW-)  ACCESS ALLOWED(OTHER  R--)   
  EFFECTIVE UID(99)  EFFECTIVE GID(20)


After  ' ls -l /etc/utmpx ' comand was issued, the /etc/utmpx attribution was 
shown below:

-rw-r--r--   1 BPXOINIT #SYSSTC 2288 Jun 10 21:42 /etc/utmpx 


After we issued 'chmod 646 /etc/utmpx ' command and 'ls -l /etc/utmpx' comand ,

the /etc/utmpx attribution was shown now below:

-rw-r--rw--   1 BPXOINIT #SYSSTC 2288 Jun 10 21:42 /etc/utmpx 

we issued 'TSO OMVS'   command again.Everything is normal.


Our questions:

 When we issue 'tso lu IBMSE41 omvs' command,we get the omvs informations for 
userid (IBMSE41) below:


OMVS INFORMATION   
   
UID= 00
HOME= /
PROGRAM= /bin/sh   
CPUTIMEMAX= NONE   
ASSIZEMAX= NONE
FILEPROCMAX= NONE  
PROCUSERMAX= NONE  
THREADSMAX= NONE   
MMAPAREAMAX= NONE  


But why EFFECTIVE UID  is  99  in the following messages ?

Who changed IBMSE41 from UID(0) to UID(99)?

ICH408I USER(IBMSE41  ) GROUP(#SPUSR  ) NAME(DOMENG MENG  
  /etc/utmpx CL(FSOBJ   ) FID(01C2D4E2D3F0F200041A00DB)
  INSUFFICIENT AUTHORITY TO OPEN   
  ACCESS INTENT(RW-)  ACCESS ALLOWED(OTHER  R--)   
  EFFECTIVE UID(99)  EFFECTIVE GID(20)

 
Thanks a lot!

Best Regards,

Jason Cai 









发件人: David Geib 
发送时间: 2010-06-12  00:25:55 
收件人: IBM-MAIN 
抄送: 
主题: Re: EDC5113I reason code = 053501B2 in/ /etc/utmpx 
 
Verify that these files have the setuid bit 
on:  
ls -alE /bin/fomtlinc 
ls -alE /bin/fomtlout 
  
-rwsr-xr-x  --s-  2 SYSADM   1  344064 May 19  2009 /bin/fomtlinc 
-rwsr-xr-x  --s-  2 SYSADM   1  319488 May 19  2009 /bin/fomtlout 
   ^  
   setuid bit 
  
  
To turn the set-user-ID bit on, issue the following commands: 
chmod u+s /bin/fomtlinc   
chmod u+s /bin/fomtlout   
  
Also, see (older) INFO APAR II12726, as it may explain how the setuid bit got 
turned off for these files.   
If the /etc file system was mounted R/O, a different rsncode would surface:
FSUM2378 The start of the session was not recorded.  The slot 
(in /etc/utmpx) fo
r this terminal could not be updated, or a new slot for the terminal could not b
e created.  

Function = pututxline(), terminal name = '/dev/ttyp', program name 
= '/bin/f
omtlinc', errno = 141 (X'008D'), reason code = 05620060, message 
= 'EDC5141I
 Read-only file system.'
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


How to create a new system from a existing system

2010-06-09 Thread ibmnew
Dear all

 As we know,if we want to create a new system from a existing system,we usually 
clone the existing system.

When we clone the existing system,we could use a new name convention for the 
new system.for example :

a new syslex name,a new system,a new MCAT name.  but it take few days to do 
it.


  I wonder whether I could  create a new system by coping all volumes on the 
exsiting system by full volume copy

 command with volid;then could I change the syslex name or system name? I feel 
it faster than clone.

 Of course we need do something as the following examples: 

For example:

Because there are duplex volumes,we need offline some of them from one 
system.because there is a new CF 

for the new system,we need redefine the CFRM.We aslo need modify VTAMTCP/IP 
definition..


Are there any other considerations we should pay attention to when we create 
the system by coping all volumes?


Any Suggestions are highly appreciated!

Thanks a lot!

Best Regards,

Jason Cai 





 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Why the ISFROWS1 is diffenent between on batch with under ISPF/PDF

2010-05-28 Thread ibmnew
Paul 

 Our shop is z/OS 1.9 with parallel sysplex,Could you tell me how to find the 
reason ?

Thanks a lot!

Best Regards,

Jason Cai 




 
ADDRESS SDSF does not require ISPF.
The old SDSF access routines do need ISPF, but the interface that came
with 1.9 does not.
Regards
Paul 
-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
Behalf Of Lizette Koehler
Sent: 28 May 2010 12:36
To: IBM-MAIN@bama.ua.edu
Subject: Re: Why the ISFROWS1 is diffenent between on batch with under
ISPF/PDF
The JCL you are running is just TSO.  You need to include the ISPF and
SDSF
libraries to allow some of these functions.
So you need to have ISPPROF, ISPPLIB, ISPMLIB, ISPSLIB, ISPTLIB which
have
the SDSF and ISPF Libraries.
You could run JCL that almost looks like your TSO/ISPF Logon proc JCL to
get
a base.
Or use ISRDDN to create a CLIST that would allocate the files you need
for
ISPF functions.
Look in the IBM Main archives or TSO-E REXX archives.  I think there are
some example SDSF REXXes there.
Lizette
___
Atos Origin and Atos Consulting are trading names used by the Atos Origin 
group.  The following trading entities are registered in England and Wales:  
Atos Origin IT Services UK Limited (registered number 01245534) and Atos 
Consulting Limited (registered number 04312380).  The registered office for 
each is at 4 Triton Square, Regents Place, London, NW1 3HG.The VAT No. for each 
is: GB232327983
This e-mail and the documents attached are confidential and intended solely for 
the addressee, and may contain confidential or privileged information.  If you 
receive this e-mail in error, you are not authorised to copy, disclose, use or 
retain it.  Please notify the sender immediately and delete this email from 
your systems.   As emails may be intercepted, amended or lost, they are not 
secure.  Atos Origin therefore can accept no liability for any errors or their 
content.  Although Atos Origin endeavours to maintain a virus-free network, we 
do not warrant that this transmission is virus-free and can accept no liability 
for any damages resulting from any virus transmitted.   The risks are deemed to 
be accepted by everyone who communicates with Atos Origin by email. 
___
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: Why the ISFROWS1 is diffenent between on batch with under ISPF/PDF

2010-05-28 Thread ibmnew
Dear all

I use ISRDDN to create a Clist 

Below is my JCL

//SYSTEM   EXEC PGM=IKJEFT01,DYNAMNBR=30,REGION=4096K
//SYSEXEC  DD   DSN=IBMSE03.REXX,DISP=SHR
//SYSTSPRT DD   DSN=IBMSE03.REPORT(TEMP),DISP=SHR
//ISPPROF DD DSN=IBMSE03.ISPF.ISPPROF,DISP=SHR
//ISPPLIB DD DISP=SHR,DSN=DSN910.SDSNPFPE  
//DD DISP=SHR,DSN=ISP.SISPPENU
//DD DISP=SHR,DSN=SYS1.SERBPENU
//DD DISP=SHR,DSN=SYS1.HRFPANL
//DD DISP=SHR,DSN=SYS1.SBLSPNL0
//DD DISP=SHR,DSN=SYS1.SBPXPENU
//DD DISP=SHR,DSN=SYS1.DGTPLIB
//DD DISP=SHR,DSN=REXX.SFANPENU
//DD DISP=SHR,DSN=GDDM.SADMPNL
//DD DISP=SHR,DSN=FFST.V120ESA.SEPWPENU
//DD DISP=SHR,DSN=SYS1.DFQPLIB
//DD DISP=SHR,DSN=SYS1.SEDGPENU
//DD DISP=SHR,DSN=SYS1.SCBDPENU
//DD DISP=SHR,DSN=CSF.SCSFPNL0
//DD DISP=SHR,DSN=EOX.SEPHPNL1
//DD DISP=SHR,DSN=AOP.SAOPPENU
//DD DISP=SHR,DSN=TCPIP.SEZAPENU
//DD DISP=SHR,DSN=ISF.SISFPLIB
//DD DISP=SHR,DSN=SYS1.SHASPNL0
//DD DISP=SHR,DSN=SYS1.SICEPENU
//DD DISP=SHR,DSN=EOY.SEOYPENU
//DD DISP=SHR,DSN=SYS1.SBDTPNL0
//DD DISP=SHR,DSN=IOE.SIOEPNLE
//DD DISP=SHR,DSN=ICQ.ICQPLIB
//DD DISP=SHR,DSN=GIM.SGIMPENU
//DD DISP=SHR,DSN=EUV.SEUVPNL
//DD DISP=SHR,DSN=IMS1010.SDFSPLIB
//ISPMLIB DD DISP=SHR,DSN=DSN910.SDSNSPFM
//DD DISP=SHR,DSN=SYS1.SERBMENU
//DD DISP=SHR,DSN=SYS1.HRFMSG
//DD DISP=SHR,DSN=SYS1.SBLSMSG0
//DD DISP=SHR,DSN=SYS1.SBPXMENU
//DD DISP=SHR,DSN=SYS1.DGTMLIB
//DD DISP=SHR,DSN=ISP.SISPMENU
//DD DISP=SHR,DSN=GDDM.SADMMSG
//DD DISP=SHR,DSN=SYS1.DFQMLIB
//DD DISP=SHR,DSN=SYS1.SEDGMENU
//DD DISP=SHR,DSN=SYS1.SCBDMENU
//DD DISP=SHR,DSN=CSF.SCSFMSG0
//DD DISP=SHR,DSN=EOY.SEOYBENU
//DD DISP=SHR,DSN=EOX.SEPHMSG1
//DD DISP=SHR,DSN=AOP.SAOPMENU
//DD DISP=SHR,DSN=TCPIP.SEZAMENU
//DD DISP=SHR,DSN=ISF.SISFMLIB
//DD DISP=SHR,DSN=SYS1.SICEMENU
//DD DISP=SHR,DSN=EOY.SEOYMENU
//DD DISP=SHR,DSN=SYS1.SBDTMSG
//DD DISP=SHR,DSN=IOE.SIOEMSGE
//DD DISP=SHR,DSN=ICQ.ICQMLIB
//DD DISP=SHR,DSN=GIM.SGIMMENU
//DD DISP=SHR,DSN=EUV.SEUVMSG
//DD DISP=SHR,DSN=IMS1010.SDFSMLIB
//ISPSLIB DD DISP=SHR,DSN=DSN910.SDSNSPFS
//DD DISP=SHR,DSN=SYS1.HRFSKEL
//DD DISP=SHR,DSN=SYS1.SBLSKEL0
//DD DISP=SHR,DSN=SYS1.DGTSLIB
//DD DISP=SHR,DSN=ISP.SISPSLIB
//DD DISP=SHR,DSN=ISP.SISPSENU
//DD DISP=SHR,DSN=CSF.SCSFSKL0
//DD DISP=SHR,DSN=ISF.SISFSLIB
//DD DISP=SHR,DSN=SYS1.SICESLIB
//DD DISP=SHR,DSN=ICQ.ICQSLIB
//DD DISP=SHR,DSN=GIM.SGIMSENU
//DD DISP=SHR,DSN=SYS2.CCB.ISPSLIB
//ISPTLIB DD DISP=SHR,DSN=DSN910.SDSNSPFT
//DD DISP=SHR,DSN=IBMSE03.ISPF.ISPPROF
//DD DISP=SHR,DSN=SYS1.SERBT
//DD DISP=SHR,DSN=SYS1.SERBTENU
//DD DISP=SHR,DSN=SYS1.SBLSTBL0
//DD DISP=SHR,DSN=SYS1.SBPXTENU
//DD DISP=SHR,DSN=SYS1.DGTTLIB
//DD DISP=SHR,DSN=ISP.SISPTENU
//DD DISP=SHR,DSN=SYS1.SCBDTENU
//DD DISP=SHR,DSN=CSF.SCSFTLIB
//DD DISP=SHR,DSN=EOX.SEPHTBL1
//DD DISP=SHR,DSN=SYS1.SBLSPNL0
//DD DISP=SHR,DSN=ISF.SISFTLIB
//DD DISP=SHR,DSN=SYS1.SICETLIB
//DD DISP=SHR,DSN=EOY.SEOYTENU
//DD DISP=SHR,DSN=ICQ.ICQTABLS
//DD DISP=SHR,DSN=IMS1010.SDFSTLIB
//DD DISP=SHR,DSN=GIM.SGIMTENU
//SYSPRINT  DD  SYSOUT=*
//SYSTSIN  DD   *
 %TEMP
/*

but I also got the same result.Could you tell how to fine the root cause and 
how to solve the problem.

Thanks  a lot!

Best Regards,

Jason Cai



==

The JCL you are running is just TSO.  You need to include the ISPF and SDSF
libraries to allow some of these functions.
So you need to have ISPPROF, ISPPLIB, ISPMLIB, ISPSLIB, ISPTLIB which have
the SDSF and ISPF Libraries.
You could run JCL that almost looks like your TSO/ISPF Logon proc JCL to get
a base.
Or use ISRDDN to create a CLIST that would allocate the files you need for
ISPF functions.
Look in the IBM Main archives or TSO-E REXX archives.  I think there are
some example SDSF REXXes there.
Lizette
 
 I have the following questions :
 
 1.Running my REXX under ISPF/PDF
 under ispf p.6
 
 
 EX TEST.BJSP55.ZTB9TMP(SCHDA04)
 
 
 TEST.BJSP55.ZTB9TMP(SCHDA04)
 /* REXX */
  RC=ISFCALLS(ON)
  ISFOWNER =CCBSP02
  ADDRESS SDSF ISFEXEC ST (DELAYED ALTERNATE)
  IF RC0 THEN EXIT RC
  SAY NUMBER OF ROWS RETURNED: ISFROWS
  RC=ISFCALLS(OFF)
 EXIT 0
 *
 output:
  3 *-* RC=ISFCALLS(ON)
  4 *-* SAY 'RC1=' RC
 RC1= 0
  5 *-* ISFOWNER =CCBSP02
  6 *-* ADDRESS SDSF ISFEXEC ST (DELAYED ALTERNATE)
   ISFEXEC ST (DELAYED ALTERNATE)
  7 *-* SAY 'RC2=' RC
 RC2= 0
  8 *-* SAY ISFROWS1: ISFROWS
 ISFROWS1: 27
  9 

Re: Why the ISFROWS1 is diffenent between on batch with under ISPF/PDF

2010-05-28 Thread ibmnew

Paul 

Could you sent it to me.My email is ibm...@163.com Thanks a lot!

Best Regards,

Jason Cai





发件人: Paul Gilmartin 
发送时间: 2010-05-28  20:52:33 
收件人: IBM-MAIN 
抄送: 
主题: Re: Why the ISFROWS1 is diffenent between on batch with under ISPF/PDF 
 
On Fri, 28 May 2010 07:01:46 -0500, Staller, Allan wrote:
Concur, however, there are a different set of ISPMLIB, ISPSLIB,...
(usually included in the TSO concat for those files) that are still
required to be present.

And I mostly disagree with that, although I can't dispute the OP's
observation.  I have a demo SDSF EXEC that runs under z/OS Unix with
_no_ such allocations.  I know I cribbed it from somewhere with
considerable modifications -- I didn't write it ab ovo, but
I neglected to keep the attribution.
I'll send it off-list to anyone who's curious and sends me a request
off-list.
I'd be grateful to anyone who can point me to the example I cribbed.
snip
ADDRESS SDSF does not require ISPF.
The old SDSF access routines do need ISPF, but the interface that came
with 1.9 does not.
/snip
-- 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


Why the ISFROWS1 is diffenent between on batch with under ISPF/PDF

2010-05-27 Thread ibmnew
I have the following questions :

1.Running my REXX under ISPF/PDF
under ispf p.6


EX TEST.BJSP55.ZTB9TMP(SCHDA04) 


TEST.BJSP55.ZTB9TMP(SCHDA04) 
/* REXX */ 
 RC=ISFCALLS(ON)   
 ISFOWNER =CCBSP02   
 ADDRESS SDSF ISFEXEC ST (DELAYED ALTERNATE) 
 IF RC0 THEN EXIT RC 
 SAY NUMBER OF ROWS RETURNED: ISFROWS   
 RC=ISFCALLS(OFF) 
EXIT 0   
*
output: 
 3 *-* RC=ISFCALLS(ON)  
 4 *-* SAY 'RC1=' RC
RC1= 0  
 5 *-* ISFOWNER =CCBSP02  
 6 *-* ADDRESS SDSF ISFEXEC ST (DELAYED ALTERNATE)
  ISFEXEC ST (DELAYED ALTERNATE)   
 7 *-* SAY 'RC2=' RC
RC2= 0  
 8 *-* SAY ISFROWS1: ISFROWS  
ISFROWS1: 27
 9 *-* IF RC0 
10 *-* SAY NUMBER OF ROWS RETURNED: ISFROWS   
NUMBER OF ROWS RETURNED: 27 
11 *-* RC=ISFCALLS(OFF) 
12 *-* EXIT 0   

2.Running the REXX on batch

//RUNSCHDA JOB ADM#,TIME=1440,NOTIFY=SYSUID,CLASS=2, 
//MSGCLASS=X,MSGLEVEL=(1,1),REGION=4M 
//JOBLIB DD DSN=DSN810.SDSNLOAD,DISP=SHR 
//RUNREXX EXEC PGM=IKJEFT01,DYNAMNBR=30,REGION=0M 
//SYSEXEC DD DISP=SHR,DSN=TEST.BJSP55.ZTB9TMP 
//SYSTSPRT DD SYSOUT=*   
//SYSTSIN DD *   
%SCHDA04 
/*   
output: 
* TOP OF 
 3 *-* RC=ISFCALLS(ON)   
 4 *-* SAY 'RC1=' RC 
RC1= 0   
 5 *-* ISFOWNER =CCBSP02   
 6 *-* ADDRESS SDSF ISFEXEC ST (DELAYED ALTERNATE) 
  ISFEXEC ST (DELAYED ALTERNATE)
 7 *-* SAY 'RC2=' RC 
RC2= 0   
 8 *-* SAY ISFROWS1: ISFROWS   
ISFROWS1: 0  
 9 *-* IF RC0  
10 *-* SAY NUMBER OF ROWS RETURNED: ISFROWS
NUMBER OF ROWS RETURNED: 0 
 BOTTOM O   

Why the ISFROWS1 is diffenent between on batch with under ISPF/PDF?

Thanks a lot!


Best Regards,

Jason Cai 

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


Re: What is the difference between starting a cataloged procedure and submitting a JCL

2010-05-19 Thread ibmnew
Dear all

You are right.It is security. I checked the SYSLOG and found the messages.

Thanks a lot!

Best Regards,

Jason Cai







发件人: Mary Anne Matyaz 
发送时间: 2010-05-18  19:08:56 
收件人: IBM-MAIN 
抄送: 
主题: Re: What is the difference between starting a cataloged procedure and 
submitting a JCL 
 
Jason, 
My bet is it's security (Started task has a different security ID than your 
batch job submit). Did you check the SYSLOG to see if there were any 
messages around the time of your proc executing? When your proc starts, 
Getting more output: Started tasks may have a different MSGCLASS 
($DJOBCLASS(STC), then $DMSGCLASS(D) to see where the output is going. 
In my case, it's: 
$DJOBCLASS(STC),MSGCLASS 
$HASP837 JOBCLASS(STC)   MSGCLASS=D  
$HASP842 OUTCLASS(D)   
$HASP842 OUTCLASS(D)  OUTPUT=PRINT,BLNKTRNC=YES,   
$HASP842  OUTDISP=(PURGE,WRITE),TRKCELL=YES  
The OUTDISP of PURGE,WRITE is what's causing the output to disappear. 
You can do a couple of things to alter this. $TJOBCLASS(STC),MSGCLASS=X, 
or some other class that isn't disp purge. You can also change your cataloged 
proc to have sysprint=X instead of sysprint=*, but that will only get you the 
iebgener messages, not the Jesmsglg.   
Differences:
Security  Do you see an IEF695i msg indicating the user assigned to your 
started task? 
WLM - STC's get classified differently and usually have different performance 
goals 
STC's may have a different default region size
See Chapter 7 of the MVS JCL Reference for more info
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


What is the difference between starting a cataloged procedure and submitting a JCL

2010-05-18 Thread ibmnew
Hi all 

 I submit the following JCL

 
//LOGWDSJ  JOB CLASS=A   
//STEP1   EXEC PGM=IEBGENER  
//SYSUT1  DD DUMMY,DCB=(LRECL=133,RECFM=FB)  
//SYSUT2   DD  DISP=(,CATLG,DELETE),RETPD=366,VOL=(,,,1),
// DSN=BKTST.SYSLOG.PLEXH1.BH01.WEEKLY(+1),  
// UNIT=VTAPE,SPACE=(CYL,(120,50)),DATACLAS=DCCOMP,   
// DCB=(LRECL=133,RECFM=FB)  
//SYSPRINT DD  SYSOUT=*  
//SYSINDD  DUMMY


The JCL allocated the GDG BKTST.SYSLOG.PLEXH1.BH01.WEEKLY(+1) successfully.


But I start the following cataloged procedure 


//LOGWDS  PROC   
//STEP1   EXEC PGM=IEBGENER  
//SYSUT1  DD DUMMY,DCB=(LRECL=133,RECFM=FB)  
//SYSUT2   DD  DISP=(,CATLG,DELETE),RETPD=366,VOL=(,,,1),
// DSN=BKTST.SYSLOG.PLEXH1.BH01.WEEKLY(+1),  
// UNIT=VTAPE,SPACE=(CYL,(120,50)),DATACLAS=DCCOMP,   
// DCB=(LRECL=133,RECFM=FB)  
//SYSPRINT DD  SYSOUT=*  
//SYSINDD  DUMMY


The  cataloged procedure cann't allocate the GDG 
BKTST.SYSLOG.PLEXH1.BH01.WEEKLY(+1) ,but the return code is zero.
   

The JCL is almost similar as the cataloged procedure.

My questions:

1.I wonder why the cataloged procedure cann't allocate the GDG but the JCL can 
do it.

2.There is less messages in SDSF.H for the cataloged procedure output,How can I 
get more messages for it. 

3.What is the differences between starting a cataloged procedure and 
submittinga JCL. 

Any Suggestions are highly appreciated!

Thanks a lot!

Best Regards,

Jason Cai 


 

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


How to define couple links using HCD

2010-04-09 Thread ibmnew
Hi all

 We want to replace out sysplex time with STP. We purchased two CFs(Z10) and 
installed two couple links with 

ICB-4 between the CFs.

Could you help us to define the couple links using HCD for it. Thanks a lot!

Best Regards,

Jason Cai

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


Is anyone out there using HSM and the CDS are managed via RLS?

2007-04-03 Thread ibmnew
Hi all

  Our shop is Z/OS 1.8. We want to implement HSMplex(4 members).we will also 
implement DR in the future.
We are not sure whethere we need  RLS for accessing the control data sets.
  Could you tell us  the advantage and disadvantage of  RLS ? Is there any 
limition for the HSM CDS managed via RLS?
  Any suggestion and comment are great appreciated! 

Jason Cai

 
  
  

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