Re: Need help with Assembler accessing VSAM file in reentrant LE-conforming program

2007-03-16 Thread Steve Comstock

Schiradin,Roland HG-Dir itb-db/dc wrote:

Well without a dump it's hard to solve.
Post the register and psw and from the instruction the 
offset to the relevant register


Or post the code 


Roland


Well, I did post most (all?) of the relevant code;
I had an LE dump to work with but since the bug
was in OPEN (or, rather, my invocation of OPEN),
I was trying to debug at the source level.

Finally got it working.

Thanks.

Kind regards,

-Steve Comstock



-Original Message-
From: IBM Mainframe Assembler List 
[mailto:[EMAIL PROTECTED] On Behalf Of Steve Comstock

Sent: Friday, March 16, 2007 8:20 PM
To: [EMAIL PROTECTED]
Subject: Need help with Assembler accessing VSAM file in 
reentrant LE-conforming program



Been working on this several days, driving me nuts.

The basic setup:

LE-conforming, reentrant Assembler program intended
to run as a CGI and access a KSDS by key.

In the program, my call to BPXWDYN is working fine.

Next, I use GENCB to generate an ACB dynamically.

Then I issue OPEN against that ACB: I get S0C4 that
points to the next instruction after my OPEN, which
is an LTR  15,15; so it looks like the abend is being
generated in OPEN.

The code in the vicinity:

  la2,genparm1

  gencb blk=acb,ddname=meals,macrf=(key,dir,in),
loc=any,am=vsam,
rmode31=all,mf=(g,(2),genlen)
  ltr   15,15
  jnz   bad_gencb
  lr10,1  pick up address of built acb


  open  ((10)),mode=31,mf=(e,openlist)
  ltr   15,15

The following fields are defined in a DSECT; (this
DSECT is set up as part of the DSA so that
addressability is provided by R13):

acbstart  acb   am=vsam
acbendds0f
acblenequ   acbend-acbstart
   ds0f
genparm1  dscl(genlen)

---

My guess is that actually the gencb parameters may
not be correct, but I can't see it.

Any suggestions for this?

---



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


Re: Need help with Assembler accessing VSAM file in reentrant LE-conforming program

2007-03-16 Thread Steve Comstock

Gary Green wrote:

Steve,

Would this be of any help?

http://www.hlasm.com/goodies/bxaio00.htm



Not really. Doesn't hit what I'm searching for.
But interesting code. Thanks for the pointer.

Kind regards,

-Steve Comstock

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


Re: Need help with Assembler accessing VSAM file in reentrant LE-conforming program

2007-03-16 Thread Steve Comstock

Ray Mullins wrote:

Steve, welcome to MF=L/E land.

Note - the following is really simple, and merely a starting point.  


What you really should do, IMHO, in this situation, is in a constant area,
code

#OPENOPEN  (,INPUT),MF=L
#OPEN_L  EQU   *-#OPEN

Then in your DSECT area, code

@OPENDSXL(#OPEN_L)

And in your program code

 MVC   @OPEN,#OPEN
 OPEN  ((10)),MF=(E,@OPEN)

It's good practice to generate an MF=L list in your constant area so you can
define the MF=E area properly.  It's not so important for OPEN, but for
things like ATTACH that have a lot of bits set, it's a lifesaver.

Later,
Ray


Well, I do that with most macros (or at least a similar
approach), and in fact I has something like that in my
code, but not quite the same, obviously.

Anyway, thanks for the note.

Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

303-393-8716
http://www.trainersfriend.com

-- to be included in our opt-in list of announcements of
-- new courses and other products and services from The
-- Trainer's Friend, send an email to [EMAIL PROTECTED]


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


Re: Need help with Assembler accessing VSAM file in reentrant LE-conforming program

2007-03-16 Thread Steve Comstock

Ray Mullins wrote:

The (*,label) and (S,label) syntaxes (the latter for when the label is in a
DSECT) are documented not with the macros, but in a general addressing
paragraph before the macro documentation.

Later,
Ray


Ahh. Found it. Thanks for the pointer.

Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

303-393-8716
http://www.trainersfriend.com

-- to be included in our opt-in list of announcements of
-- new courses and other products and services from The
-- Trainer's Friend, send an email to [EMAIL PROTECTED]


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


Re: Need help with Assembler accessing VSAM file in reentrant LE-conforming program

2007-03-16 Thread Ray Mullins
The (*,label) and (S,label) syntaxes (the latter for when the label is in a
DSECT) are documented not with the macros, but in a general addressing
paragraph before the macro documentation.

Later,
Ray

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Steve Comstock
Sent: Friday March 16 2007 14:42
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Need help with Assembler accessing VSAM file in reentrant
LE-conforming program

<>

Thanks for the explanation of DDNAME=(*,meals) syntax;
hadn't seen that before (including in the docs!).

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


Re: Need help with Assembler accessing VSAM file in reentrant LE-conforming program

2007-03-16 Thread Ray Mullins
Steve, welcome to MF=L/E land.

Note - the following is really simple, and merely a starting point.  

What you really should do, IMHO, in this situation, is in a constant area,
code

#OPENOPEN  (,INPUT),MF=L
#OPEN_L  EQU   *-#OPEN

Then in your DSECT area, code

@OPENDSXL(#OPEN_L)

And in your program code

 MVC   @OPEN,#OPEN
 OPEN  ((10)),MF=(E,@OPEN)

It's good practice to generate an MF=L list in your constant area so you can
define the MF=E area properly.  It's not so important for OPEN, but for
things like ATTACH that have a lot of bits set, it's a lifesaver.

Later,
Ray

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Steve Comstock
Sent: Friday March 16 2007 13:37
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Need help with Assembler accessing VSAM file in reentrant
LE-conforming program

Gerhard Postpischil wrote:
> Steve Comstock wrote:
> 
>> Then I issue OPEN against that ACB: I get S0C4 that
>> points to the next instruction after my OPEN, which
>> is an LTR  15,15; so it looks like the abend is being
>> generated in OPEN.
>>  open  ((10)),mode=31,mf=(e,openlist)
> 
> 
> To eliminate one more "obvious" possibility - is openlist initialized, 
> i.e., is the x'80' end of list bit on?
> 
> 
> Gerhard Postpischil

Hmmm. Interesting question.

Openlist is defined in my DSECT area:

  openlist  open  0,mode=31,mf=l
+OPENLIST DC0F'0'
+ DCAL1(128)
+ DCAL3(0)
+ DCA(0)

So the x'80' bit is on here, but since it's in a DSECT,
of course, no real initialization occurs. The code where
the OPEN is invoked shows on the listing as:

   open  ((10)),mode=31,mf=(e,openlist)
+ LA1,OPENLIST
+ ST10,4(1,0)
+ LR0,1
+ SR1,1
+ SVC   19
   ltr   15,15

So, no, I would say the x'80' bit is not on at
execution time. But, it is not clear how one
would do that (without manually coding the
macro expansion oneself). The doc does not
include the classic 'vl' operand as an option:

[label] OPEN (address[, [(options)][,...]])[,MODE={24|31}]

Hmmm no, not sure what to do about that.

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


Re: ZFS Root impact on cloning SYSRES

2007-03-16 Thread Mark Zelden
On Fri, 16 Mar 2007 12:52:00 -0400, Jousma, David <[EMAIL PROTECTED]> wrote:

>
>
>
>
>All that duplication of HFS / ZFS on the sysres for backups does take a
>lot of space.  If you use the recatalog method I plan on using, you
>won't have to do that.  For HFS you can just define non-vsam and use
>indirect cataloging etc.
>
>I have always kept the tgt zones on the sysres (set) also when there has
>been space.  When things get tight... that has always been the first
>thing to go to get me an extra 100 cyl. or so since the zones aren't
>required to be on the sysres.  But today, 100 cyl doesn't buy much.
>
>
>
>No duplication:
>
>OMVS.RST01A.AFOROOT.DATA140?   1  3390
>OMVS.RST01A.JAVA31V5.DATA  5865?   1  3390
>OMVS.RST01A.JAVA64V5.DATA  5535?   1  3390
>OMVS.RST01A.MQS.DATA270?   1  3390
>OMVS.RST01A.NETVHFS.DATA110?   1  3390
>OMVS.RST01A.ROOT.DATA 35760?   1  3390
>OMVS.RST01A.SBBOHFS.DATA  29685?   1  3390
>OMVS.RST01A.SEQQHFS.DATA   2145?   1  3390
>OMVS.RST01A.SIGYROOT.DATA 8?   1  3390
>OMVS.RST01A.SINGHFS.DATA 70?   1  3390
>OMVS.RST01A.SIWOHFS.DATA   2084?   1  3390
>OMVS.RST01A.SPRLHFS.DATA   2670?   1  3390
>OMVS.RST01A.XML.DATA  29055?   1  3390
>

Are these the backup files or your HFS files?  If backup files,
then isn't it duplication of space when you restore them to 
HFS / zFS (even if you don't restore them onto the sysres)?

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group:  G-ITO
mailto:[EMAIL PROTECTED]
z/OS and OS390 expert at http://searchDataCenter.com/ateExperts/
Systems Programming expert at http://expertanswercenter.techtarget.com/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html

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


Re: Copy file(s) from one lpar to another

2007-03-16 Thread McKown, John
> -Original Message-
> From: IBM Mainframe Discussion List 
> [mailto:[EMAIL PROTECTED] On Behalf Of Jangula, Duane A.
> Sent: Friday, March 16, 2007 2:03 PM
> To: IBM-MAIN@BAMA.UA.EDU
> Subject: Copy file(s) from one lpar to another
> 
> I am new to the sms world. Have a question about coping files from one
> lpar to another.
> 
> Our production lpar and testlpar are separate systems, 
> separate catalogs
> and all that good stuff. 
> 
> I want to copy file(s) from our production lpar to our Test 
> lpar.  Many
> of the files are sms managed.  What I would like to do is 
> copy any file;
> regardless of its manageclass,etc   and just put it to a volume on our
> test lpar. When I use ADRDSSU, I get various messages. I have tried
> running this a 100 times, and I basically get any of the 
> three messages
> below.   
> 
> Like I mentioned, I just want to copy the file and I really don't care
> about sms.  Does anybody have any jcl (mvs utility)   that 
> will just do
> the copy period   Thanks. 



> 
> Duane Jangula

If you mean: "How to I copy a file on system1 and place it on a system2
SMS managed volume, when system1 and system2 are not in the same
SMSplex?", then you CANNOT do this. Period. OK, you can. But if you do,
when it breaks, you get to keep both pieces. And I will NOT tell you how
to do this. It is EVIL, so to speak.

You may be able to allocate a dataset on a nonSMS managed volume which
"belongs" to system2. Cataloguing it is a whole 'nuther question unless
the catalogs are shared.

As one person indicated, you can use FTP to send the dataset from
system1 to system2, assuming that system2 is running FTP and there is an
IP connection between the two systems. I've done this myself.

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

The information contained in this e-mail message may be privileged
and/or confidential.  It is for intended addressee(s) only.  If you are
not the intended recipient, you are hereby notified that any disclosure,
reproduction, distribution or other use of this communication is
strictly prohibited and could, in certain circumstances, be a criminal
offense.  If you have received this e-mail in error, please notify the
sender by reply and delete this message without copying or disclosing
it. 

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


Re: Need help with Assembler accessing VSAM file in reentrant LE-conforming program

2007-03-16 Thread Schiradin,Roland HG-Dir itb-db/dc
Well without a dump it's hard to solve.
Post the register and psw and from the instruction the 
offset to the relevant register

Or post the code 

Roland

-Original Message-
From: IBM Mainframe Assembler List 
[mailto:[EMAIL PROTECTED] On Behalf Of Steve Comstock
Sent: Friday, March 16, 2007 8:20 PM
To: [EMAIL PROTECTED]
Subject: Need help with Assembler accessing VSAM file in 
reentrant LE-conforming program


Been working on this several days, driving me nuts.

The basic setup:

LE-conforming, reentrant Assembler program intended
to run as a CGI and access a KSDS by key.

In the program, my call to BPXWDYN is working fine.

Next, I use GENCB to generate an ACB dynamically.

Then I issue OPEN against that ACB: I get S0C4 that
points to the next instruction after my OPEN, which
is an LTR  15,15; so it looks like the abend is being
generated in OPEN.

The code in the vicinity:

  la2,genparm1

  gencb blk=acb,ddname=meals,macrf=(key,dir,in),
loc=any,am=vsam,
rmode31=all,mf=(g,(2),genlen)
  ltr   15,15
  jnz   bad_gencb
  lr10,1  pick up address of built acb


  open  ((10)),mode=31,mf=(e,openlist)
  ltr   15,15

The following fields are defined in a DSECT; (this
DSECT is set up as part of the DSA so that
addressability is provided by R13):

acbstart  acb   am=vsam
acbendds0f
acblenequ   acbend-acbstart
   ds0f
genparm1  dscl(genlen)

---

My guess is that actually the gencb parameters may
not be correct, but I can't see it.

Any suggestions for this?

---


Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

303-393-8716
http://www.trainersfriend.com

-- to be included in our opt-in list of announcements of
-- new courses and other products and services from The
-- Trainer's Friend, send an email to [EMAIL PROTECTED]

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


Re: Need help with Assembler accessing VSAM file in reentrant LE-conforming program

2007-03-16 Thread Steve Comstock

[EMAIL PROTECTED] wrote:

  la2,genparm1

  gencb blk=acb,ddname=meals,macrf=(key,dir,in),
loc=any,am=vsam,
rmode31=all,mf=(g,(2),genlen)
*

Is MEALS the actual DDNAME, or is it an address containing the DDNAME?

If it's the latter, it needs to be specified as DDNAME=(*,meals).  As
coded above, GENCB generates the hard coded MEALS as the DDNAME.

If it's the former, I have no clue what'll happen when MVS gets the
lower case DDNAME passed on the OPEN as you specified above.

HTH,
John Sullivan
EMC Corporation


MEALS is the acutal DD name, and the lowercase-ness is
handled fine.

Just got it to work, thanks to a suggestion from
Gerhard Postpischil, see the recent posts.

Thanks for the explanation of DDNAME=(*,meals) syntax;
hadn't seen that before (including in the docs!).

Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

303-393-8716
http://www.trainersfriend.com

-- to be included in our opt-in list of announcements of
-- new courses and other products and services from The
-- Trainer's Friend, send an email to [EMAIL PROTECTED]


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


Re: Need help with Assembler accessing VSAM file in reentrant LE-conforming program - solved!

2007-03-16 Thread Steve Comstock

Gerhard Postpischil wrote:

Steve Comstock wrote:


So, no, I would say the x'80' bit is not on at
execution time. But, it is not clear how one
would do that (without manually coding the
macro expansion oneself). The doc does not
include the classic 'vl' operand as an option:



1) Then that's the problem. OPEN processes successive double words as 
ACB/DCB entries until it gets one it bombs on.


2) IBM has a lot of funny macros that were shoehorned into RENT support. 
For these it's necessary to define a copy in your CSECT, and another in 
your DSECT, and move the pattern. Some programmers put all their 
patterns into one CSECT, then use a single MVC/MVCL to initialize the 
DSECT (for anything non-trivial, I make a macro with different name 
expansions).


However, in the case of OPEN, you can just do an MVI openlist,X'80' for 
an input file.


Yup! That did it! Thanks.

Well, that's surely not very clearly documented.

Kind regards,

-Steve Comstock

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


Re: Need help with Assembler accessing VSAM file in reentrant LE-conforming program

2007-03-16 Thread Sullivan_JohnR
  la2,genparm1

  gencb blk=acb,ddname=meals,macrf=(key,dir,in),
loc=any,am=vsam,
rmode31=all,mf=(g,(2),genlen)
*

Is MEALS the actual DDNAME, or is it an address containing the DDNAME?

If it's the latter, it needs to be specified as DDNAME=(*,meals).  As
coded above, GENCB generates the hard coded MEALS as the DDNAME.

If it's the former, I have no clue what'll happen when MVS gets the
lower case DDNAME passed on the OPEN as you specified above.

HTH,
John Sullivan
EMC Corporation

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


Re: "MVS Experience"

2007-03-16 Thread Patrick O'Keefe
On Fri, 16 Mar 2007 09:14:49 -0500, McKown, John 
<[EMAIL PROTECTED]> wrote:

>...
>A "zero sum game" is one in which you neither win nor lose. You come out
>no worse or better than you were before. A "negative sum game" is one in
>which you lose. You come out worse off than you were before.
>...

Not quite ... unless the "you" is the total of all players.  The "zero sum"
is summed across all players.  Winners win at the expense of losers.

Pat O'Keefe

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


Re: Need help with Assembler accessing VSAM file in reentrant LE-conforming program

2007-03-16 Thread Gerhard Postpischil

Steve Comstock wrote:

So, no, I would say the x'80' bit is not on at
execution time. But, it is not clear how one
would do that (without manually coding the
macro expansion oneself). The doc does not
include the classic 'vl' operand as an option:


1) Then that's the problem. OPEN processes successive double 
words as ACB/DCB entries until it gets one it bombs on.


2) IBM has a lot of funny macros that were shoehorned into RENT 
support. For these it's necessary to define a copy in your 
CSECT, and another in your DSECT, and move the pattern. Some 
programmers put all their patterns into one CSECT, then use a 
single MVC/MVCL to initialize the DSECT (for anything 
non-trivial, I make a macro with different name expansions).


However, in the case of OPEN, you can just do an MVI 
openlist,X'80' for an input file.




Gerhard Postpischil
Bradford, VT

new e-mail address: gerhardp (at) charter (dot) net

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


Re: Copy file(s) from one lpar to another

2007-03-16 Thread Barkow, Eileen
I am new to this list and my previous msg got rejected because it
'contained too many msgs from previous posts' or something like that.
But here it goes again:

 When i copy to different lpars without shared dasd i run  a ADRDSSU/FTP

When i copy to different lpars without shared dasd i run  a ADRDSSU/FTP
job which ftp's over the unloaded pds files. I then run a reload job on
the other lpar which allocates new datasets and load them up. I can send
you my job stream if you like (it is used for propagating CICS
maintenance but can be modified for anything).


-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Jangula, Duane A.
Sent: Friday, March 16, 2007 3:19 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Copy file(s) from one lpar to another

I am new to the sms world. Have a question about coping files from one
lpar to another.

 

Our production lpar and testlpar are separate systems, separate catalogs
and all that good stuff. 

 

I want to copy file(s) from our production lpar to our Test lpar.  Many
of the files are sms managed.  What I would like to do is copy any file;
regardless of its manageclass,etc   and just put it to a volume on our
test lpar. When I use ADRDSSU, I get various messages. I have tried
running this a 100 times, and I basically get the any of the three
message below.   

 

Like I mentioned, I just want to copy the file and I really don't care
about sms.  Does anybody have any jcl (mvs utility)   that will just do
the copy period   Thanks. 

 

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


Re: Need help with Assembler accessing VSAM file in reentrant LE-conforming program

2007-03-16 Thread Gary Green
Steve,

Would this be of any help?

http://www.hlasm.com/goodies/bxaio00.htm




-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Steve Comstock
Sent: Friday, March 16, 2007 4:37 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Need help with Assembler accessing VSAM file in reentrant
LE-conforming program

Gerhard Postpischil wrote:
> Steve Comstock wrote:
> 
>> Then I issue OPEN against that ACB: I get S0C4 that
>> points to the next instruction after my OPEN, which
>> is an LTR  15,15; so it looks like the abend is being
>> generated in OPEN.
>>  open  ((10)),mode=31,mf=(e,openlist)
> 
> 
> To eliminate one more "obvious" possibility - is openlist initialized, 
> i.e., is the x'80' end of list bit on?
> 
> 
> Gerhard Postpischil

Hmmm. Interesting question.

Openlist is defined in my DSECT area:

  openlist  open  0,mode=31,mf=l
+OPENLIST DC0F'0'
+ DCAL1(128)
+ DCAL3(0)
+ DCA(0)

So the x'80' bit is on here, but since it's in a DSECT,
of course, no real initialization occurs. The code where
the OPEN is invoked shows on the listing as:

   open  ((10)),mode=31,mf=(e,openlist)
+ LA1,OPENLIST
+ ST10,4(1,0)
+ LR0,1
+ SR1,1
+ SVC   19
   ltr   15,15

So, no, I would say the x'80' bit is not on at
execution time. But, it is not clear how one
would do that (without manually coding the
macro expansion oneself). The doc does not
include the classic 'vl' operand as an option:

[label] OPEN (address[, [(options)][,...]])[,MODE={24|31}]

Hmmm no, not sure what to do about that.

Anyone have any thoughts?

Kind regards,

-Steve Comstock

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


Re: Need help with Assembler accessing VSAM file in reentrant LE-conforming program

2007-03-16 Thread Steve Comstock

Gerhard Postpischil wrote:

Steve Comstock wrote:


Then I issue OPEN against that ACB: I get S0C4 that
points to the next instruction after my OPEN, which
is an LTR  15,15; so it looks like the abend is being
generated in OPEN.
 open  ((10)),mode=31,mf=(e,openlist)



To eliminate one more "obvious" possibility - is openlist initialized, 
i.e., is the x'80' end of list bit on?



Gerhard Postpischil


Hmmm. Interesting question.

Openlist is defined in my DSECT area:

 openlist  open  0,mode=31,mf=l
+OPENLIST DC0F'0'
+ DCAL1(128)
+ DCAL3(0)
+ DCA(0)

So the x'80' bit is on here, but since it's in a DSECT,
of course, no real initialization occurs. The code where
the OPEN is invoked shows on the listing as:

  open  ((10)),mode=31,mf=(e,openlist)
+ LA1,OPENLIST
+ ST10,4(1,0)
+ LR0,1
+ SR1,1
+ SVC   19
  ltr   15,15

So, no, I would say the x'80' bit is not on at
execution time. But, it is not clear how one
would do that (without manually coding the
macro expansion oneself). The doc does not
include the classic 'vl' operand as an option:

[label] OPEN (address[, [(options)][,...]])[,MODE={24|31}]

Hmmm no, not sure what to do about that.

Anyone have any thoughts?

Kind regards,

-Steve Comstock

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


Re: Copy file(s) from one lpar to another

2007-03-16 Thread Mark H. Young
On Fri, 16 Mar 2007 14:03:19 -0500, Jangula, Duane A. <[EMAIL PROTECTED]> 
wrote:

>I am new to the sms world. Have a question about coping files from one
>lpar to another.
>
>Our production lpar and testlpar are separate systems, separate catalogs
>and all that good stuff. 
>
>I want to copy file(s) from our production lpar to our Test lpar.  Many
>of the files are sms managed.  What I would like to do is copy any file;
>regardless of its manageclass,etc   and just put it to a volume on our
>test lpar. When I use ADRDSSU, I get various messages. I have tried
>running this a 100 times, and I basically get any of the three messages
>below.   
>
>Like I mentioned, I just want to copy the file and I really don't care
>about sms.  Does anybody have any jcl (mvs utility)   that will just do
>the copy period   Thanks. 
>
>Some of the message are as follows:
>
>ADR472E (001)-NEWDS(06), UNABLE TO SELECT A TARGET VOLUME FOR DATA SET
>DJ12.CDPS.LIBRN.BKJCL.PDS IN CATALOG CATALOG.NONVSAM, 72
>
>ADR439E (001)-PREDS(01), A PREALLOCATED DATA SET
>DJ12.CDPS.LIBRN.BKJCL.PDS WAS FOUND FOR DATA SET BUT WAS UNUSABLE, 132
>
>ADR713E (001)-ALLOC(01), UNABLE TO ALLOCATE SMS MANAGED DATA SET
>DJ12.CDPS.LIBRN.BKJCL.PDS BECAUSE NEITHER DELETE NOR RENAMEU WA
> 
>
>Duane Jangula

OK, you are new to the SMS world, what about the Systems Programming world?
Have you bothered to look up those error messages and the codes at the end?
You need to read and learn.

You are using the correct utility (ADRDSSU) which is DFDSS.
Are you going directly from one DASD to another?
Or are you going to tape first?
Please take the time to look up the error messages and codes.
Do you have the QuickRef tool for error messages?
If not, break out the IBM manual and/or bookmanger, right?

The sysin should look something like this for a DASD to tape dump:

DUMP DATASET(INCLUDE(YOUR.DATA.SET.NAME)) -
  TOLERATE(ENQF) -
  OUTDD(TAPE)

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


Re: Copy file(s) from one lpar to another

2007-03-16 Thread John Kington
IBM Mainframe Discussion List  wrote on 03/16/2007
03:18:36 PM:


> I want to copy file(s) from our production lpar to our Test lpar.  Many
> of the files are sms managed.  What I would like to do is copy any file;
> regardless of its manageclass,etc   and just put it to a volume on our
> test lpar. When I use ADRDSSU, I get various messages. I have tried
> running this a 100 times, and I basically get the any of the three
> message below.
>
Duane,
Look at NULLSTORCLAS, REPLACE and either OUTDYN or OUTDD in DFSMSdss
Storage
Administration Reference.
DSS retains the dataclass, storclass and mgmtclass values when it backs up
a SMS managed dataset. You must remove the storage class value during
restore
by either specifying NULLSTORCLAS or have the ACS routine set &STORCLAS to
null.
Regards,
John

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


Re: DB2 V9 z/OS GA (Was: What to do with extra storage on new z9)

2007-03-16 Thread Walt Farrell

On 3/15/2007 11:26 AM, R.S. wrote:
What can I do with XML in DB2 ? My application doesn't use it. I'm *not* 
application programmer, so I won't change it.


You could, for example, tell RACF SMF Unload (IRRADU00) to produce an 
XML-formatted output file instead of a flat file.  This takes much less 
DASD space for the file itself.


You could then import that XML data into DB2 V9 in XML format, and run 
XML queries against it for security reporting.


Just one thought; I'm still playing around with it.

Walt Farrell, CISSP
z/OS Security Design, IBM

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


Re: IBMLINK Problem Records

2007-03-16 Thread Jangula, Duane A.
I was just on IBMLINK.  It worked just fine.

But just a week ago and prior to that,  I had all kinds of problems. I
finally called support and she had me delete all my cookies, etc. Since
then it has worked great.  She said they made some change, but I don't
recall what the details are. 

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Veilleux, Jon L
Sent: Friday, March 16, 2007 2:00 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: IBMLINK Problem Records

Those of you who have opened Problem Records on the recent IBMLINK
problems, have you gotten any response from IBMLINK support? I am not
having much luck with them. 
Thanks,
Jon

Jon L. Veilleux
[EMAIL PROTECTED]
(860) 636-2683 


-
This e-mail may contain confidential or privileged information. If
you think you have received this e-mail in error, please advise the
sender by reply e-mail and then delete this e-mail immediately.
Thank you. Aetna

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


Copy file(s) from one lpar to another

2007-03-16 Thread Jangula, Duane A.
I am new to the sms world. Have a question about coping files from one
lpar to another.

 

Our production lpar and testlpar are separate systems, separate catalogs
and all that good stuff. 

 

I want to copy file(s) from our production lpar to our Test lpar.  Many
of the files are sms managed.  What I would like to do is copy any file;
regardless of its manageclass,etc   and just put it to a volume on our
test lpar. When I use ADRDSSU, I get various messages. I have tried
running this a 100 times, and I basically get the any of the three
message below.   

 

Like I mentioned, I just want to copy the file and I really don't care
about sms.  Does anybody have any jcl (mvs utility)   that will just do
the copy period   Thanks. 

 

Some of the message are as follows:

 

ADR472E (001)-NEWDS(06), UNABLE TO SELECT A TARGET VOLUME FOR DATA SET
DJ12.CDPS.LIBRN.BKJCL.PDS IN CATALOG CATALOG.NONVSAM, 72

 

ADR439E (001)-PREDS(01), A PREALLOCATED DATA SET
DJ12.CDPS.LIBRN.BKJCL.PDS WAS FOUND FOR DATA SET BUT WAS UNUSABLE, 132

 

ADR713E (001)-ALLOC(01), UNABLE TO ALLOCATE SMS MANAGED DATA SET
DJ12.CDPS.LIBRN.BKJCL.PDS BECAUSE NEITHER DELETE NOR RENAMEU WA

 

 

 

Duane Jangula

Information Technology Dept.  State of North Dakota

ph:701-328-2358  Fax:701-328-1047

[EMAIL PROTECTED]

 


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


Re: IBMLINK Problem Records

2007-03-16 Thread Bob Shannon
IBMLINK has become a %^$&ing disaster. Some IBM executive should take
ownership of this problem and fix it. IBM ought to be embarrassed.

Bob Shannon

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


Re: Tape Conversion Experiences

2007-03-16 Thread Mark H. Young
On Fri, 16 Mar 2007 13:24:38 -0500, Daniel McLaughlin 
<[EMAIL PROTECTED]> wrote:

>I see references to TapeCopy from one vendor and Copycat from another.
>We're considering those, as well as looking for others, for our 3480 to
>VTS move. One has an ISPF GUI interface, but not sure about the other, or
>other products.
>Would any of you care to share your personal experiences? I've combed the
>archives and the references I've seen look more like plain text sales
>brochures.
>
>Thank you much in advance.

Well, VTS being an IBM device.aren't they providing some support in 
that endeavor?  Don't they have some utility to provide to perform mass 
copies like that?  You know, as part of the agreement/deal/contract for 
youse guys to buy the VTS?  Seems like that would be a big carrot?  And 
provide free of charge or included for a "small" fee?

I don't know, never having gone thru that, even though we have VTS here
(before my arrival).

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


Copy file(s) from one lpar to another

2007-03-16 Thread Jangula, Duane A.
I am new to the sms world. Have a question about coping files from one
lpar to another.

 

Our production lpar and testlpar are separate systems, separate catalogs
and all that good stuff. 

 

I want to copy file(s) from our production lpar to our Test lpar.  Many
of the files are sms managed.  What I would like to do is copy any file;
regardless of its manageclass,etc   and just put it to a volume on our
test lpar. When I use ADRDSSU, I get various messages. I have tried
running this a 100 times, and I basically get any of the three messages
below.   

 

Like I mentioned, I just want to copy the file and I really don't care
about sms.  Does anybody have any jcl (mvs utility)   that will just do
the copy period   Thanks. 

 

Some of the message are as follows:

 

ADR472E (001)-NEWDS(06), UNABLE TO SELECT A TARGET VOLUME FOR DATA SET
DJ12.CDPS.LIBRN.BKJCL.PDS IN CATALOG CATALOG.NONVSAM, 72

 

ADR439E (001)-PREDS(01), A PREALLOCATED DATA SET
DJ12.CDPS.LIBRN.BKJCL.PDS WAS FOUND FOR DATA SET BUT WAS UNUSABLE, 132

 

ADR713E (001)-ALLOC(01), UNABLE TO ALLOCATE SMS MANAGED DATA SET
DJ12.CDPS.LIBRN.BKJCL.PDS BECAUSE NEITHER DELETE NOR RENAMEU WA

 

 

 

Duane Jangula

Information Technology Dept.  State of North Dakota

ph:701-328-2358  Fax:701-328-1047

[EMAIL PROTECTED]

 


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


IBMLINK Problem Records

2007-03-16 Thread Veilleux, Jon L
Those of you who have opened Problem Records on the recent IBMLINK
problems, have you gotten any response from IBMLINK support? I am not
having much luck with them. 
Thanks,
Jon

Jon L. Veilleux
[EMAIL PROTECTED]
(860) 636-2683 


-
This e-mail may contain confidential or privileged information. If
you think you have received this e-mail in error, please advise the
sender by reply e-mail and then delete this e-mail immediately.
Thank you. Aetna

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


Allocating HFS datasets - TSO vs Batch problem

2007-03-16 Thread Low, David
Hi Listers,

Our system is z/os 1.6 with current maintenance.

I'm struggling with a problem I'm hoping to fix before this weekend.  I
have a batch job executing IKJEFT1B that allocates an HFS dataset like
so:

ALLOCATE FILE(NEWHFS) NEW DATASET('OMVS.DAVE.TEST') DSNTYPE(HFS) +
 UNIT(3390) SPACE(1,1) CYLINDERS DIR(1)

This works fine.  When I run the same allocate command thru TSO or REXX
I get an unmountable dataset.  Mount command error:  Errno=97x Dynamic
allocation error; Reason=0210

Why is there a difference between ALLOCATE in batch vs. TSO?


Dave Low
Auto-Owners Insurance Co.

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


Re: MVS NFS Holding Exclusive Enqueue

2007-03-16 Thread Ed Rabara
On Wed, 14 Mar 2007 16:50:04 -0500, Ed Rabara <[EMAIL PROTECTED]> 
wrote:
>
>Gil, your situation is a close match to mine. Unfortunately, my Servers is
>in Production status. We push a lot of files back and forth. Before this
>change, i.e., going to a more current AIX and faster P-series servers, we
>ran the MVSNFS Servers for weeks to months without recycling the NFS
>Servers.
>
>I have a PMR with IBM. If we find anything, I'll report back here.
>
>Ed

IBM opened APAR OA20339 to address my problem. Here's the description:

  ERROR DESCRIPTION:
NFS Server allocates mounted mvs datasets causing an enqueue
  on the dataset while being processed.  We increment the
  ref_count to show the file in use, however, there is an error
  path taken which does not decrement the ref count.  When this
  happens, the enqueue on the dataset is never released until the
  NFS server is cancelled and restarted.

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


Re: Need help with Assembler accessing VSAM file in reentrant LE-conforming program

2007-03-16 Thread Gerhard Postpischil

Steve Comstock wrote:

Then I issue OPEN against that ACB: I get S0C4 that
points to the next instruction after my OPEN, which
is an LTR  15,15; so it looks like the abend is being
generated in OPEN.
 open  ((10)),mode=31,mf=(e,openlist)


To eliminate one more "obvious" possibility - is openlist 
initialized, i.e., is the x'80' end of list bit on?



Gerhard Postpischil
Bradford, VT

new e-mail address: gerhardp (at) charter (dot) net

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


Re: Need help with Assembler accessing VSAM file in reentrant LE-conforming program

2007-03-16 Thread Mike Kerford-Byrnes
Just to eliminate the *obvious - you are in
31-bit mode, aren't you?

>From one who occasionally forgets.

Mike Kerford-Byrnes
-Original Message-
From: IBM Mainframe Assembler List [mailto:[EMAIL PROTECTED]
On Behalf Of Steve Comstock
Sent: 16 March 2007 19:20
To: [EMAIL PROTECTED]
Subject: Need help with Assembler accessing VSAM file in reentrant
LE-conforming program

Been working on this several days, driving me nuts.

The basic setup:

LE-conforming, reentrant Assembler program intended
to run as a CGI and access a KSDS by key.

In the program, my call to BPXWDYN is working fine.

Next, I use GENCB to generate an ACB dynamically.

Then I issue OPEN against that ACB: I get S0C4 that
points to the next instruction after my OPEN, which
is an LTR  15,15; so it looks like the abend is being
generated in OPEN.

The code in the vicinity:

  la2,genparm1

  gencb blk=acb,ddname=meals,macrf=(key,dir,in),
loc=any,am=vsam,
rmode31=all,mf=(g,(2),genlen)
  ltr   15,15
  jnz   bad_gencb
  lr10,1  pick up address of built acb


  open  ((10)),mode=31,mf=(e,openlist)
  ltr   15,15

The following fields are defined in a DSECT; (this
DSECT is set up as part of the DSA so that
addressability is provided by R13):

acbstart  acb   am=vsam
acbendds0f
acblenequ   acbend-acbstart
   ds0f
genparm1  dscl(genlen)

---

My guess is that actually the gencb parameters may
not be correct, but I can't see it.

Any suggestions for this?

---


Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

303-393-8716
http://www.trainersfriend.com

-- to be included in our opt-in list of announcements of
-- new courses and other products and services from The
-- Trainer's Friend, send an email to [EMAIL PROTECTED]

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


Tape Conversion Experiences

2007-03-16 Thread Daniel McLaughlin
I see references to TapeCopy from one vendor and Copycat from another. 
We're considering those, as well as looking for others, for our 3480 to 
VTS move. One has an ISPF GUI interface, but not sure about the other, or 
other products. 
Would any of you care to share your personal experiences? I've combed the 
archives and the references I've seen look more like plain text sales 
brochures.

Thank you much in advance.

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


Need help with Assembler accessing VSAM file in reentrant LE-conforming program

2007-03-16 Thread Steve Comstock

Been working on this several days, driving me nuts.

The basic setup:

LE-conforming, reentrant Assembler program intended
to run as a CGI and access a KSDS by key.

In the program, my call to BPXWDYN is working fine.

Next, I use GENCB to generate an ACB dynamically.

Then I issue OPEN against that ACB: I get S0C4 that
points to the next instruction after my OPEN, which
is an LTR  15,15; so it looks like the abend is being
generated in OPEN.

The code in the vicinity:

 la2,genparm1 


 gencb blk=acb,ddname=meals,macrf=(key,dir,in),
   loc=any,am=vsam,
   rmode31=all,mf=(g,(2),genlen)
 ltr   15,15
 jnz   bad_gencb
 lr10,1  pick up address of built acb 



 open  ((10)),mode=31,mf=(e,openlist)
 ltr   15,15

The following fields are defined in a DSECT; (this
DSECT is set up as part of the DSA so that
addressability is provided by R13):

acbstart  acb   am=vsam
acbendds0f
acblenequ   acbend-acbstart
  ds0f
genparm1  dscl(genlen)

---

My guess is that actually the gencb parameters may
not be correct, but I can't see it.

Any suggestions for this?

---


Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

303-393-8716
http://www.trainersfriend.com

-- to be included in our opt-in list of announcements of
-- new courses and other products and services from The
-- Trainer's Friend, send an email to [EMAIL PROTECTED]


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


Re: Renaming SYS1.VTAMLST

2007-03-16 Thread Chris Mason

Barry

I connection with possible problems from "moved" VTAMLST members, I used to 
do the following:


But first I need to explain the environment. I used to have a number of test 
MVS systems running on the same VM system. There was also a "production" MVS 
system also running on the same VM system from which I could access all the 
volumes used to support the test systems.


I was very often playing around with VTAM and making very frequent changes 
to VTAMLST members - as one does with test systems. Whenever I felt I may be 
getting near to the capacity of a VTAMLST data set, I ran a "z" on it from a 
TSO ISPF session running in the production MVS system. I was actually 
somewhat paranoid about running out of space so I probably "z"ed far more 
often than I really needed to.


I recall having no problems ever - in getting on for 20 years - over a 
"moved" VTAMLST member.


Chris Mason

- Original Message - 
From: "Schwarz, Barry A" <[EMAIL PROTECTED]>

Newsgroups: bit.listserv.ibm-main
To: 
Sent: Monday, March 12, 2007 7:44 PM
Subject: Re: Renaming SYS1.VTAMLST


...

You can compress the dataset in batch with IEBCOPY and DISP=SHR but you
run the risk of active tasks having problems if any open member is
relocated. 


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


Re: Game-theoretic terminology

2007-03-16 Thread Ted MacNEIL
You can't win
You can't break even
You can't get out of the game


-
Too busy driving to stop for gas!  

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


Re: "MVS Experience"

2007-03-16 Thread Ed Gould

On Mar 16, 2007, at 9:18 AM, Mark H. Young wrote:
---SNIP-



Well, if you have moved to the "dark side".I guess it could  
certainly
be an EXPANDED human brain, just utilizing lots more than 5 or 10  
percent

computing capacity, ay?!

TTFN,
Mark


Unless he ran out of IDRSPACE:0

Ed

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


Re: Zos Maintenance and pax format

2007-03-16 Thread McKown, John
> -Original Message-
> From: IBM Mainframe Discussion List 
> [mailto:[EMAIL PROTECTED] On Behalf Of Paul Gilmartin
> Sent: Friday, March 16, 2007 11:46 AM
> To: IBM-MAIN@BAMA.UA.EDU
> Subject: Re: Zos Maintenance and pax format
> 
> 
> On Fri, 16 Mar 2007 11:02:03 -0500, McKown, John wrote:
> > >
> > > 1. Is there a way to order so the files are .zip format and
> > > not in .pax format and still get internet delivery?
> > 
> > No. Why would you want it? z/OS UNIX comes with the pax command and
> > there is no "unzip" unless you get it from the "Tools and Toys" web
> > site.
> > 
> Mostly agree.  But if the OP needs to use a desktop as a waystation
> multiple FTP commands are necessary to fetch an order.  Schemes
> for doing this have been posted here and in IBM manuals.  Are there,
> perhaps wizards for fetching to a desktop in a single command?

I use the "Download Director" Java application to do this. Works fine.
This is on WinXP Pro. 

Getting all the parts up to the z/OS system is "tricky" except that I
have Cygwin installed on WinXP, so I can create a "tar" file which can
be processed with the z/OS pax command.

> 
> It's a little idiosyncratic that an order comprises multiple pax
> archives rather than a single enormous archive, but it facilitates
> restarting an interrupted session.
> 
> > > 2. Any issues with creating an temporary HFS file on a volume
> > > other than a res volume to place the maintenance into?
> > 
> > No problem at all. My /SMPNTS is in its own HFS file and is 
> multivolume,
> > not on a RES type pack at all. I plan to "cheat" in that I 
> now have a
> > Linux desktop. I plan to NFS mount the /SMPNTS subdirectory to that
> > desktop and keep the Internet downloaded files there instead of on a
> > z/OS UNIX file. As best as I can tell, it should work.
> > 
> I can somewhat confirm this: I've used an NFS mounted from Solaris in
> small tests.
> 
> -- gil

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

The information contained in this e-mail message may be privileged
and/or confidential.  It is for intended addressee(s) only.  If you are
not the intended recipient, you are hereby notified that any disclosure,
reproduction, distribution or other use of this communication is
strictly prohibited and could, in certain circumstances, be a criminal
offense.  If you have received this e-mail in error, please notify the
sender by reply and delete this message without copying or disclosing
it. 

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


Re: ZFS Root impact on cloning SYSRES

2007-03-16 Thread Jousma, David
 



All that duplication of HFS / ZFS on the sysres for backups does take a
lot of space.  If you use the recatalog method I plan on using, you
won't have to do that.  For HFS you can just define non-vsam and use
indirect cataloging etc.

I have always kept the tgt zones on the sysres (set) also when there has
been space.  When things get tight... that has always been the first
thing to go to get me an extra 100 cyl. or so since the zones aren't
required to be on the sysres.  But today, 100 cyl doesn't buy much.



No duplication:

OMVS.RST01A.AFOROOT.DATA140?   1  3390 
OMVS.RST01A.JAVA31V5.DATA  5865?   1  3390 
OMVS.RST01A.JAVA64V5.DATA  5535?   1  3390 
OMVS.RST01A.MQS.DATA270?   1  3390 
OMVS.RST01A.NETVHFS.DATA110?   1  3390 
OMVS.RST01A.ROOT.DATA 35760?   1  3390 
OMVS.RST01A.SBBOHFS.DATA  29685?   1  3390 
OMVS.RST01A.SEQQHFS.DATA   2145?   1  3390 
OMVS.RST01A.SIGYROOT.DATA 8?   1  3390 
OMVS.RST01A.SINGHFS.DATA 70?   1  3390 
OMVS.RST01A.SIWOHFS.DATA   2084?   1  3390 
OMVS.RST01A.SPRLHFS.DATA   2670?   1  3390 
OMVS.RST01A.XML.DATA  29055?   1  3390 

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

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


Re: Zos Maintenance and pax format

2007-03-16 Thread Paul Gilmartin
On Fri, 16 Mar 2007 11:02:03 -0500, McKown, John wrote:
> >
> > 1. Is there a way to order so the files are .zip format and
> > not in .pax format and still get internet delivery?
> 
> No. Why would you want it? z/OS UNIX comes with the pax command and
> there is no "unzip" unless you get it from the "Tools and Toys" web
> site.
> 
Mostly agree.  But if the OP needs to use a desktop as a waystation
multiple FTP commands are necessary to fetch an order.  Schemes
for doing this have been posted here and in IBM manuals.  Are there,
perhaps wizards for fetching to a desktop in a single command?

It's a little idiosyncratic that an order comprises multiple pax
archives rather than a single enormous archive, but it facilitates
restarting an interrupted session.

> > 2. Any issues with creating an temporary HFS file on a volume
> > other than a res volume to place the maintenance into?
> 
> No problem at all. My /SMPNTS is in its own HFS file and is multivolume,
> not on a RES type pack at all. I plan to "cheat" in that I now have a
> Linux desktop. I plan to NFS mount the /SMPNTS subdirectory to that
> desktop and keep the Internet downloaded files there instead of on a
> z/OS UNIX file. As best as I can tell, it should work.
> 
I can somewhat confirm this: I've used an NFS mounted from Solaris in
small tests.

-- gil
-- 
StorageTek
INFORMATION made POWERFUL

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


Re: NJE poor speed between AS/400 and z890

2007-03-16 Thread Chris Mason

Marian

I'm somewhat rusty on the OSA-Express but I see from the OSA-Express Modes 
of Operation web page


http://www.redbooks.ibm.com/abstracts/tips0088.html

that the OSA-Express 1000BASE-T defined as OSE supports SNA. My experience 
with OSA-Express has been exclusively with the GbE feature which supports 
only OSD and TCP/IP. Thus you are using 3172 emulation and VTAM XCA 
definitions with OSE.


I'm afraid I am also not familiar with the Cisco machine so I don't know 
what that emulates. You need to compare whatever the Cisco machine emulates 
with the OSE mode of operation of the OSA. As you said, the same VTAM 
switched definitions and the mode table entry are used for both so the 
difference cannot lie there.


I expect that you need to improve the performance parameters associated with 
the 802.2 connection over Ethernet.


The 802.2 parameters are as follows:

N1 - maximum size of I-frame
N2 - maximum number of retransmissions following T1 timeout
N3 - maximum number of frames received before acknowledgement
Nw - number of acknowledgements needed to increment Ww when less than TW
RW - limit to maximum number of unacknowledged frames that can be sent
T1 - maximum time allowed for an expected acknowledgement
T2 - maximum time to delay before sending an acknowledgement
TI - maximum time to allow no traffic to flow
TW - maximum number of received unacknowledged frames that can be sent

The performance parameters are N1, N3, RW, T2 and TW. Nw also affects 
performance when frames are being lost. (Ww is the "working window" which is 
set lower dynamically when frames are being lost.)


Performance over the wire or though the aether is always about minimising 
the effect of protocol headers - a point perhaps Lizette had in mind - and 
minimizing the effect of flow control - pacing, acknowledgements and so on.


If you had NCP and token ring rather than Ethernet, you could actually 
specify the necessary parameters through your switched PU statement 
definition. I don't believe all the parameters apply to an OSA defined with 
XCA. Thus you need to configure some of the parameters using OSA/SF - if my 
memory serves me well.


You can influence N1, RW and TW through VTAM or VTAM application 
definitions. N3 and T2 must be configured in OSA definitions.


The size of frames to be sent, N1, is probably going to be determined by 
JES2. I see you have not specified a value for RU sizes in the mode table 
entry RUSIZES operand. The RU size determined by JES2 will translate, after 
protocol headers have become attached, to the frame size, N1.


Note the MAXDATA operand is ignored since your connection to the AS/400 will 
use type 3 XIDs.


Thus we can concentrate on the acknowledgement flow, RW and TW. This is 
controlled by MAXOUT and 7 is probably far too low. You should try to ensure 
that 127, the maximum, is used instead. This involves setting MAXOUT=127 and 
also you should be sure that the AS/400 adapter is defined to use 127 also 
since TW is the minimum of the RW received in the type 3 XID and MAXOUT.


When I used to have test systems to play with, the 16M 3 or 4 segment token 
ring I used needed MAXOUT=20 to be sure acknowledgements were never a 
limitation.


It may be that the difference between Cisco and OSA is that the Cisco 
machine managed to ignore your far-too-small MAXOUT somehow.


N3 and T2 are concerned with when an acknowledgement is sent. In principle, 
for raw speed, you should set N3 to 1 and T2 to 0 - both these values mean 
the same thing really, namely that each received frame is acknowledged 
immediately. However you will put less traffic on the LAN if you delay the 
acknowledgement somewhat giving a chance that the acknowledgement can in 
effect be carried in a frame in the opposite direction if one appears in the 
interval defined by N3 and T2.


I see you also have far-too-small pacing specified in your mode table entry. 
You should specify 63 for all your pacing fields. There are rules over which 
pacing fields/operands are used but they are far too complicated, depending 
as they do somewhat on the configuration. You can't go wrong if you just 
specify the same value everywhere a pacing value is needed and 63 is the 
maximum. This assumes you need pacing and with NJE you do. If the traffic 
were self-paced with definite responses as 3270 traffic usually is (but not 
an LU type 1 printer), you need to specify 0 everywhere a pacing value is 
needed.


A few more comments on your definitions while I'm here:

- IDBLK and IDNUM are redundant when you use CPNAME.
- DATMODE is relevant only over an SDLC connection.
- PASSLIM is relevant only for an SDLC multipoint connection (and token ring 
when being shared by SNA and IP traffic).

- XID=YES is superfluous in a switched definition.
- SSCPFM is irrelevant for the definition of an SSCP-independent LU, that 
is, an LU defined with LOCADDR=0 which, in any case should be defined using 
a CDRSC statement rather than LU LOCADDR=0.
- Di

Re: Warning on IBM APAR OA17011

2007-03-16 Thread Big Iron
IBM has issued a flash on this subject, see
  http://www.ibm.com/support/techdocs/atsmastr.nsf/WebIndex/FLASH10559

Bill

On Thu, 1 Mar 2007 08:17:26 -0500, Shmuel Metz (Seymour J.)
<[EMAIL PROTECTED]> wrote:

>In
><[EMAIL PROTECTED]>,
>on 02/27/2007
>   at 10:29 AM, Alan Schwartz <[EMAIL PROTECTED]> said:
>
>>Early in January Russ Witt sent the list a warning about the
>>implications  apar OA17011 could have on tape retention.  We've had
>>some discussions  about this apar internally; not concerning the
>>technical impact but the  fact that there was no hold on it.  I'm
>>not suggesting that it should have  a hold
>
>Then I will; it should have a hold.
>
>>So I'm asking the group "when you're applying preventative
>>maintenance do  you read and analyze the cover information for every
>>ptf being applied?"
>
>IMHO that would be a practical impossibility. I have, however, always
>read the text of every unresolved hold, including DOC, before
>installing service.
>
>--
> Shmuel (Seymour J.) Metz, SysProg and JOAT
> ISO position; see 
>We don't care. We don't have to care, we're Congress.
>(S877: The Shut up and Eat Your spam act of 2003)
>

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


Re: Game-theoretic terminology

2007-03-16 Thread (IBM Mainframe Discussion List)
 
In a message dated 3/16/2007 11:04:21 A.M. Central Daylight Time,  
[EMAIL PROTECTED] writes:
>War is a negative-sum game.
 
Von Neumann's and Morgenstern's terminology may apply, but I prefer to  think 
of war as a negative-sum activity.
 
Bill Fairchild




** AOL now offers free email to everyone. 
 Find out more about what's free from AOL at http://www.aol.com.

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


Game-theoretic terminology

2007-03-16 Thread john gilmore

John McKown wrote:



That is a "positive sum game". A "positive sum game" is one in which you
come out of the game "ahead" of where you were before entering the game.
A "zero sum game" is one in which you neither win nor lose. You come out
no worse or better than you were before. A "negative sum game" is one in
which you lose. You come out worse off than you were before.



and he is of course free to use words as he likes.  Still, the standard von 
Neumann-Morgenstern definitions of these terms are very different.


A zero-sum game is one in which no utility is created during play.  Anything 
won by a player or players must be lost by another player or some 
combination of other players.


A positive-sum game is one in which utility is or at least may be created 
during play.  All players may sometimes thus win in the sense that they 
leave the game possessed of more utility than they entered it with.


Finally, a negative-sum game is one in which utility is or may be destroyed 
during play.  All players may lose utility or some may win, but the sum of 
the utilities possessed by all players will be less at the end of the game 
than it was at the beginning.


Poker is a zero-sum game.  Many economic processes, those that create 
wealth, are positive-sum games.  War is a negative-sum game.


John Gilmore
Ashland, MA 01721-1817
USA

_
Live Search Maps – find all the local information you need, right when you 
need it. http://maps.live.com/?icid=hmtag2&FORM=MGAC01


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


Re: Zos Maintenance and pax format

2007-03-16 Thread McKown, John
> -Original Message-
> From: IBM Mainframe Discussion List 
> [mailto:[EMAIL PROTECTED] On Behalf Of Matt Dazzo
> Sent: Friday, March 16, 2007 10:52 AM
> To: IBM-MAIN@BAMA.UA.EDU
> Subject: Zos Maintenance and pax format
> 
> 
> First time user of Shopzeries and ordering system 
> maintenance, I have 2 questions. 
> 
> 1. Is there a way to order so the files are .zip format and 
> not in .pax format and still get internet delivery?

No. Why would you want it? z/OS UNIX comes with the pax command and
there is no "unzip" unless you get it from the "Tools and Toys" web
site.

> 2. Any issues with creating an temporary HFS file on a volume 
> other than a res volume to place the maintenance into? 
> Current space on HFS does not appear to be enough to handle 
> maintenance. Maintenance files will need 4300mb of space in 
> HFS. HFS res volume has 5300 cyls available.

No problem at all. My /SMPNTS is in its own HFS file and is multivolume,
not on a RES type pack at all. I plan to "cheat" in that I now have a
Linux desktop. I plan to NFS mount the /SMPNTS subdirectory to that
desktop and keep the Internet downloaded files there instead of on a
z/OS UNIX file. As best as I can tell, it should work.

> 
> Suggestions on the best way to handle this? We are running 
> zOS1.7.  Thanks


--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

The information contained in this e-mail message may be privileged
and/or confidential.  It is for intended addressee(s) only.  If you are
not the intended recipient, you are hereby notified that any disclosure,
reproduction, distribution or other use of this communication is
strictly prohibited and could, in certain circumstances, be a criminal
offense.  If you have received this e-mail in error, please notify the
sender by reply and delete this message without copying or disclosing
it. 

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


Zos Maintenance and pax format

2007-03-16 Thread Matt Dazzo
First time user of Shopzeries and ordering system maintenance, I have 2 
questions. 

1. Is there a way to order so the files are .zip format and not in .pax format 
and still get internet delivery?
2. Any issues with creating an temporary HFS file on a volume other than a res 
volume to place the maintenance into? Current space on HFS does not appear to 
be enough to handle maintenance. Maintenance files will need 4300mb of space in 
HFS. HFS res volume has 5300 cyls available.  

Suggestions on the best way to handle this? We are running zOS1.7.  Thanks

Current HFS root stats are

Current Allocation  
 Allocated tracks  . : 37,188   
 Allocated extents . : 2
 Maximum dir. blocks : NOLIMIT  


Current Utilization 
 Used pages  . . . . : 392,242  
 % Utilized  . . . . : 87   
 Number of members . : 11,516   



  

Matt  Dazzo
Technical Services
Publishers Clearing House
516-944-4816
[EMAIL PROTECTED] 

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


Re: "MVS Experience"

2007-03-16 Thread Ray Mullins
Great minds think alike, Chris!  

I can think of 2.75 for myself  (although that includes .5 of one and .25 of
another, and all of those run on S/390 architecture or better *g*  ). 

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Craddock, Chris
Sent: Thursday March 15 2007 20:34
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: "MVS Experience"

> A friend recently stated that "the human brain is only capable of
learning
> one and a half operating systems'.  Perhaps that's true.

You mean I don't have a human brain? Eeek!

:-)

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


Re: ZFS Root impact on cloning SYSRES

2007-03-16 Thread Dan Ahler
Many thanks to Mark and all other responders. This is going to help us 
considerably. We had talked ourselves into and out of zfs for the root as 
we struggled with the idea, but we'll be going forward with the information 
you all generously provided.

Regards,

Dan Ahler
USBank

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


Re: ZFS Root impact on cloning SYSRES

2007-03-16 Thread Mark Zelden
On Fri, 16 Mar 2007 10:22:24 -0400, Jousma, David <[EMAIL PROTECTED]> wrote:

>-Original Message-
>From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
>Behalf Of Mark Zelden
>Sent: Friday, March 16, 2007 10:02 AM
>To: IBM-MAIN@BAMA.UA.EDU
>Subject: Re: ZFS Root impact on cloning SYSRES
>
>
>>It does work, I even tested it to make sure.  They key is the HLQ of
>SYS1.  I said that in my post but I should have explained why. That's
>what happens
>>when you start rambling.  There is special code in DFSMS to allow SYS1
>(and PAGE) to be cataloged in multiple catalogs.
>
>>OMVS HLQ... that is the recatalog issue. Change to SYS1.OMVS and it
>will work.
>
>Thanks, didn't realize that it was true for SYS1 as well.  We also have
>FDR and realize I can do a straight copy, but don't want to rely on a
>process that requires that product, as DFDSS doesn't support direct
>copies of hfs/zfs last I knew.  We are migrating away from FDR usage
>anyway.

Oh.. you mean my HFS disk to disk copy?  I forgot that DFSMSdss didn't
used to support that.  It does now.  Since I don't use it often I 
can't remember when... z/OS 1.3 DFSMS (same version in z/OS 1.4) or
maybe it was 1.5.  I know it does in z/OS 1.6.   But that doesn't apply
to zFS anyway since it is VSAM.

>The only reason why I rebuild IPL text EVERY time is to not miss any
>updated or changes made to IPL text introduced by maintenance(granted,
>not very often), but now I never have to think about it.

I have seen and heard others say the same thing.  But if you miss that
ACTION hold, what others are you missing? I have to go through all of
them anyway, so I don't consider that an issue.  But it only takes 
a few seconds (plus an operator reply), so no harm.   

> DFDSS copies
>it too.  My running sysres's are 50% utilized(saves room for those ever
>increasing ZFS dataset sizes).  That includes TARGETzone SMPE
>environment that that sysres, DSSDUMP copies of ZFS, and the ZFS's
>themselves, which incidentally, make up 113,000 tracks out of the
>491,000 available by themselves.

All that duplication of HFS / ZFS on the sysres for backups does
take a lot of space.  If you use the recatalog method I plan
on using, you won't have to do that.  For HFS you can just define
non-vsam and use indirect cataloging etc.

I have always kept the tgt zones on the sysres (set) also when there
has been space.  When things get tight... that has always been
the first thing to go to get me an extra 100 cyl. or so since the zones 
aren't required to be on the sysres.  But today, 100 cyl doesn't buy much.

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group:  G-ITO
mailto:[EMAIL PROTECTED]
z/OS and OS390 expert at http://searchDataCenter.com/ateExperts/
Systems Programming expert at http://expertanswercenter.techtarget.com/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html
 

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


Re: REXX Question (subject too broad)

2007-03-16 Thread Paul Gilmartin
In a recent note, Veilleux, Jon L said:

> Date: Fri, 16 Mar 2007 09:31:03 -0400
> Subject:  REXX Question
> 
A more specific subject would be more useful.

> Is there a way, other than using ISPF panels, to enter hidden data
> (passwords) as a response to a prompt from a REXX exec?
> 
Ironicallly, not in TSO Rexx AFAICT, but in:

File that you are currently viewing
   Linkname: CONTENTS "z/OS V1R6.0 Using REXX and z/OS UNIX System Services"
URL: 
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/BPXZB651/CCONTENTS

Link that you currently have selected
   Linkname: getpass()
URL: 
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/BPXZB651/5.11?DT=20050119125816

Which was a circumvention posted in:

   Linkname: [EMAIL PROTECTED] post from Lindy Mayfield
URL: http://www2.marist.edu/htbin/wlvtype?MVS-OE.41280

to a similar question with no satisfactory answer that I asked
concerning masking passwords in a shell script in OMVS.

So, you (or I) could "SYSCALL spawn" a z/OS Unix Rexx EXEC that
read a password; echo it; and capture the output.  But is it any
better than ISPF?

Maybe I should PMR the (mis)behavior of "stty -echo" in OMVS.

-- gil
-- 
StorageTek
INFORMATION made POWERFUL

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


Re: DFSORT 1.4->1.5 EQUALS=VBLKSET default

2007-03-16 Thread Frank Yaeger
Greg Saccomanno wrote on 03/15/2007 06:42:22 PM:
> Would DFSORT at release 1.4 (z/OS 1.4 and I think OS/390 2.10) using
> EQUALS=VBLKSET produce the same results run after run if the input data
> were the same but produce different results when run under DFSORT 1.5
(All
> jobs ran with EQUALS=N)?  I know what EQUALS= does, it's just that the
> results between two parallel runs always matched even back to os/390 2.10

> and now they do not and the difference is in the sequence of duplicate
> records.
>
> If the answer to the above is YES, is there some way to get 1.5 to
produce
> the same results as I used to get under 1.4 (I don't know if the
duplicate
> records were in input order or not under 1.4 so I don't know that
> EQUALS=YES would get me what I want, just that the two executions would
> always match before)?

The shipped default is EQUALS=VLBLKSET for both DFSORT 1.4 and 1.5.  This
only guarantees that the first duplicate will be kept for VLR Blockset
applications.  For all other applications, the default is EQUALS=NO which
means that any record from a set of duplicates can be selected.  Which
record is selected with EQUALS=NO depends on different factors like the
technique selected, how storage is laid out, etc.  So with EQUALS=NO, you
might get the same duplicates run after run or you might not, even for the
same release.  The only way to ensure that you always get the same
duplicates for every run and every release is to use EQUALS=YES. There's no
way to guarantee that you'll get the same results with 1.5 that you got
with 1.4 without having used EQUALS=YES for both.

Frank Yaeger - DFSORT Team (IBM) - [EMAIL PROTECTED]
Specialties: PARSE, JFY, SQZ, ICETOOL, IFTHEN, OVERLAY, Symbols, Migration

 => DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort/
--
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


Re: "MVS Experience"

2007-03-16 Thread Mark H. Young
On Fri, 16 Mar 2007 09:14:49 -0500, McKown, John 
<[EMAIL PROTECTED]> wrote:

>> -Original Message-
>> From: IBM Mainframe Discussion List
>> [mailto:[EMAIL PROTECTED] On Behalf Of Mark H. Young
>> Sent: Friday, March 16, 2007 9:07 AM
>> To: IBM-MAIN@BAMA.UA.EDU
>> Subject: Re: "MVS Experience"
>>
>
>
>
>> What I meant was hiring us "MVS veterans" is a Win-Win
>> situation for the
>> employer, company, management, their bottom line, AND the
>> younger folks
>> who work there too.
>>
>
>That is a "positive sum game". A "positive sum game" is one in which you
>come out of the game "ahead" of where you were before entering the game.
>A "zero sum game" is one in which you neither win nor lose. You come out
>no worse or better than you were before. A "negative sum game" is one in
>which you lose. You come out worse off than you were before.
>
>John McKown

I had the word "positive" in mind, but it didn't sound right?
OK, I've been corrected.

THANX,
Mark

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


Re: "MVS Experience"

2007-03-16 Thread Mark H. Young
On Fri, 16 Mar 2007 08:02:36 -0400, Rob Scott 
<[EMAIL PROTECTED]> wrote:

>I can just see it now.
>
>Enjoy this marvelous ride visiting the MVS discovery zone! (Note :
>Minimum age requirement 50)
>
>(o) Listen with rapt awe as old sysprogs regale you with with model
>numbers of obsolete devices and how they could make the lights blink in
>amusing sequences !

Yep, that's my favorite part.  Relax und watch das blinkenlights.

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


Re: "MVS Experience"

2007-03-16 Thread Craddock, Chris
> >> A friend recently stated that "the human brain is only capable of
> >learning
> >> one and a half operating systems'.  Perhaps that's true.
> >
> >You mean I don't have a human brain? Eeek!
> 
> Well, if you have moved to the "dark side".I guess it could
certainly
> be an EXPANDED human brain, just utilizing lots more than 5 or 10
percent
> computing capacity, ay?!

I have been using lots of different operating systems and technologies
for almost 30 years. I have spent most of that time dealing with
mainframe management applications on MVS and its descendants. But I have
also done UNIX kernel development, risc hardware architecture and a
metric sh1tload of WINTEL PC stuff and even  some networking
stuff. I did most of my mainframe development on PCs because I hate
touching TSO and ISPF unless I absolutely have to. Which of those sides
is dark? I think I must be using more than 5% because my brain keeps
making room for new stuff by forgetting old stuff!!!

:-)

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


Re: ZFS Root impact on cloning SYSRES

2007-03-16 Thread Imbriale, Donald (Exchange)
As of z/OS 1.3, DFDSS does support direct copying of hfs/zfs.

Don Imbriale

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Jousma, David
Sent: Friday, March 16, 2007 10:22 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: ZFS Root impact on cloning SYSRES


Thanks, didn't realize that it was true for SYS1 as well.  We also have
FDR and realize I can do a straight copy, but don't want to rely on a
process that requires that product, as DFDSS doesn't support direct
copies of hfs/zfs last I knew.  We are migrating away from FDR usage
anyway.




***
Bear Stearns is not responsible for any recommendation, solicitation, 
offer or agreement or any information about any transaction, customer 
account or account activity contained in this communication.
***

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


Re: ZFS Root impact on cloning SYSRES

2007-03-16 Thread Jousma, David
-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Mark Zelden
Sent: Friday, March 16, 2007 10:02 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: ZFS Root impact on cloning SYSRES


>It does work, I even tested it to make sure.  They key is the HLQ of
SYS1.  I said that in my post but I should have explained why. That's
what happens 
>when you start rambling.  There is special code in DFSMS to allow SYS1
(and PAGE) to be cataloged in multiple catalogs. 

>OMVS HLQ... that is the recatalog issue. Change to SYS1.OMVS and it
will work.

Thanks, didn't realize that it was true for SYS1 as well.  We also have
FDR and realize I can do a straight copy, but don't want to rely on a
process that requires that product, as DFDSS doesn't support direct
copies of hfs/zfs last I knew.  We are migrating away from FDR usage
anyway.

>I do it all in one jobstream.  A job similar to what I currently do is
on my web site in the JOBS/DOC section (CLONERES). Since I volume copy
my primary >sysres with FDR, I don't have to worry about IPLTEXT.
>I only rebuild it on the maintenance sysres when a PTF requires it.
>As far as mod 27, we were just talking about it for 1.8 but it is too
big of a waste.  I'm only using slightly over a mod-9 (I just had to go
to a second >mod-9 sysres for HFS when I installed XML toolkit under
z/OS 1.6).  Under 1.8 I have a few extra HFSes - PLI, COBOL, Netview -
in addition to the ones I >had for 1.6 (ROOT, TSM, and XML).  The only
way I would consider mod-27 is if we also put our ISV sysres on it (we
roll out ISV maintenance / software as >part of the sysres set).  But I
really don't want to put them on the same volume because sometimes we
clone the IBM sysres or ISV sysres from a running 
>version instead of the maintenance version.

The only reason why I rebuild IPL text EVERY time is to not miss any
updated or changes made to IPL text introduced by maintenance(granted,
not very often), but now I never have to think about it.  DFDSS copies
it too.  My running sysres's are 50% utilized(saves room for those ever
increasing ZFS dataset sizes).  That includes TARGETzone SMPE
environment that that sysres, DSSDUMP copies of ZFS, and the ZFS's
themselves, which incidentally, make up 113,000 tracks out of the
491,000 available by themselves.

All in all, sounds like we have very similar processes.

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

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


Re: "MVS Experience"

2007-03-16 Thread Mark H. Young
On Fri, 16 Mar 2007 06:28:17 -0500, Doc Farmer <[EMAIL PROTECTED]> 
wrote:

>"MVS Experience"
>
>When will this be a ride at Disneyland?

No sure, but it WILL no doubt be an E-ticket ride, and I don't mean 
Electronic!!

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


Re: "MVS Experience"

2007-03-16 Thread Mark H. Young
On Thu, 15 Mar 2007 23:41:14 -0400, Wayne Driscoll 
<[EMAIL PROTECTED]> wrote:

>Chris,
>Like that was ever in doubt?
>
>Wayne
>
>-Original Message-
>From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
>Behalf Of Craddock, Chris
>Sent: Thursday, March 15, 2007 10:34 PM
>To: IBM-MAIN@BAMA.UA.EDU
>Subject: Re: "MVS Experience"
>
>> A friend recently stated that "the human brain is only capable of
>learning
>> one and a half operating systems'.  Perhaps that's true.
>
>You mean I don't have a human brain? Eeek!
>
>:-)

Well, if you have moved to the "dark side".I guess it could certainly
be an EXPANDED human brain, just utilizing lots more than 5 or 10 percent 
computing capacity, ay?!

TTFN,
Mark

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


Re: "MVS Experience"

2007-03-16 Thread McKown, John
> -Original Message-
> From: IBM Mainframe Discussion List 
> [mailto:[EMAIL PROTECTED] On Behalf Of Mark H. Young
> Sent: Friday, March 16, 2007 9:07 AM
> To: IBM-MAIN@BAMA.UA.EDU
> Subject: Re: "MVS Experience"
> 



> What I meant was hiring us "MVS veterans" is a Win-Win 
> situation for the 
> employer, company, management, their bottom line, AND the 
> younger folks 
> who work there too.
> 

That is a "positive sum game". A "positive sum game" is one in which you
come out of the game "ahead" of where you were before entering the game.
A "zero sum game" is one in which you neither win nor lose. You come out
no worse or better than you were before. A "negative sum game" is one in
which you lose. You come out worse off than you were before.

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

The information contained in this e-mail message may be privileged
and/or confidential.  It is for intended addressee(s) only.  If you are
not the intended recipient, you are hereby notified that any disclosure,
reproduction, distribution or other use of this communication is
strictly prohibited and could, in certain circumstances, be a criminal
offense.  If you have received this e-mail in error, please notify the
sender by reply and delete this message without copying or disclosing
it. 

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


Re: "MVS Experience"

2007-03-16 Thread Mark H. Young
On Thu, 15 Mar 2007 14:54:57 -0500, Patrick O'Keefe 
<[EMAIL PROTECTED]> wrote:

>On Thu, 15 Mar 2007 12:49:45 -0500, Mark H. Young
><[EMAIL PROTECTED]> wrote:
>
>>......  It can ONLY
>>be a "zero-sum gain" advantage for employers and their bean counters, and
>>the bottom line CEOs/CFOs/CIOs and the shareholders, no?
>>...
>
>Huh?  I was mostly with you until that last sentence.  I think you picked
>the wrong aphorism.  Yes?
>
>Who loses when they hire us?
>Or are you saying they can empoy one of us or one and a half younsters?
>I would like to think that employing those with deep MVS experience helps
>us, the empoyer, and and the younger, less experienced newcomers.
>(Yup. I'm a dreamer.)
>
>Or did I completely miss the point you were trying to make?
>
>Pat O'Keefe

Sorry.  I was at the end of my rant, it was late, and I wanted to sum up. 
That phrase was sticking in my mind.  I looked up it's meaning on 
wikipedia, etc. and thought it was appropriate?  Maybe not.

What I meant was hiring us "MVS veterans" is a Win-Win situation for the 
employer, company, management, their bottom line, AND the younger folks 
who work there too.


TTFN,
Mark

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


Re: ZFS Root impact on cloning SYSRES

2007-03-16 Thread Mark Zelden
On Fri, 16 Mar 2007 07:15:27 -0400, Jousma, David <[EMAIL PROTECTED]> wrote:

>Mark,
>
>I'm not sure the define/recatalog's will work with the zFS's.  At least
>I was not able to get it to work. 

It does work, I even tested it to make sure.  They key is the HLQ of
SYS1.  I said that in my post but I should have explained why. That's
what happens when you start rambling.  There is special code in DFSMS 
to allow SYS1 (and PAGE) to be cataloged in multiple catalogs. 

> I clone/promote the code from my
>maintenance zones to tech -> tech to dev -> dev to prod -> using logical
>copies for all datasets EXCEPT zfs's.  Since we have a separate
>mastercat structure for tech/dev/prod and my OMVS HLQ is in the
>mastercat, 

OMVS HLQ... that is the recatalog issue. Change to SYS1.OMVS and
it will work.

>I use DFDss to DUMP the zFS on the ZFS owning system, and
>restore the ZFS on the target system.  In fact, since we run our
>serverpac provided zfs's read-only, I leave the dumped zfs images on my
>sysres so that the promotion to the next environment (say dev to prod),
>only required a DSS restore(with rename for the sysres qualifier).
>This process has worked very well for me.

Similar to what we did prior to non-SMS HFS.

>  To clone, I run just 5 jobs -
>1 clip the target volume, and reload IPLtext, 2 - logical dataset copy,
>excluding OMVS, & SMPE, 3 - restore OMVS zfs's, 4 create target csi for
>new target sysres & zonecopy, 5 - logical copy/rename all SMPE target
>zone support datasets(sts, mcs, log, etc).  All of which run
>concurrently in about 15 minutes.  BTW, I run a single mod-27 for each
>sysres.
>

I do it all in one jobstream.  A job similar to what I currently do
is on my web site in the JOBS/DOC section (CLONERES). Since I volume
copy my primary sysres with FDR, I don't have to worry about IPLTEXT.
I only rebuild it on the maintenance sysres when a PTF requires it.
As far as mod 27, we were just talking about it for 1.8 but it is 
too big of a waste.  I'm only using slightly over a mod-9 (I just
had to go to a second mod-9 sysres for HFS when I installed XML toolkit
under z/OS 1.6).  Under 1.8 I have a few extra HFSes - PLI, COBOL,
Netview - in addition to the ones I had for 1.6 (ROOT, TSM, and
XML).  The only way I would consider mod-27 is if we also put our ISV
sysres on it (we roll out ISV maintenance / software as part of the
sysres set).  But I really don't want to put them on the same volume
because sometimes we clone the IBM sysres or ISV sysres from a 
running version instead of the maintenance version.

Regards,

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group:  G-ITO
mailto:[EMAIL PROTECTED]
z/OS and OS390 expert at http://searchDataCenter.com/ateExperts/
Systems Programming expert at http://expertanswercenter.techtarget.com/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html

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


REXX Question

2007-03-16 Thread Veilleux, Jon L
Is there a way, other than using ISPF panels, to enter hidden data
(passwords) as a response to a prompt from a REXX exec?
TIA,
Jon

Jon L. Veilleux
[EMAIL PROTECTED]
(860) 636-2683 


-
This e-mail may contain confidential or privileged information. If
you think you have received this e-mail in error, please advise the
sender by reply e-mail and then delete this e-mail immediately.
Thank you. Aetna

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


Re: IBMLink web access broken all accounts presented Entitlement page TN3270 working fine

2007-03-16 Thread Veilleux, Jon L
I can hear wood being knocked upon all over the place. 


Jon L. Veilleux
[EMAIL PROTECTED]
(860) 636-2683 


-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Robert Justice
Sent: Friday, March 16, 2007 9:07 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: IBMLink web access broken all accounts presented
Entitlement page TN3270 working fine

amazing, but web IBMLINK actually seems to be working today. 

so far anyway. 

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

-
This e-mail may contain confidential or privileged information. If
you think you have received this e-mail in error, please advise the
sender by reply e-mail and then delete this e-mail immediately.
Thank you. Aetna

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


Re: IBMLink web access broken all accounts presented Entitlement page TN3270 working fine

2007-03-16 Thread Robert Justice
amazing, but web IBMLINK actually seems to be working today. 

so far anyway. 

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


Re: IBMLink web access broken all accounts presented Entitlement page TN3270 working fine

2007-03-16 Thread Matt Dazzo
Shopzseries and IBMlink appear to be working for me. 

Matt  Dazzo
Technical Services
Publishers Clearing House
516-944-4816
[EMAIL PROTECTED] 

>>> "Knutson, Sam" <[EMAIL PROTECTED]> 3/16/2007 8:03 AM >>>
Hi,
 
Everyone in our company cannot get into the web version of IBMLink
today.  We are all being presented with the Entitlement page.   TN3270
version is working fine.  It seems the mappings for web id to account or
something is not working properly.The help desk won't open it as a
SEV1 since we can login even though no one can work.  I found 4 of my
co-workers who had the problem while I was on with the help desk.
 
I really liked the part where the technician asked for my userid and
password so he could see what is happening.  I would have been happy to
share out my desktop with him using an IBM tool like AOS but our policy
is pretty strict about giving out your password over the phone.
 
Anyone else seeing this today?   If so please call the IBMLink help desk
1-800-543-3912 so they get reports from multiple accounts and will
escalate it.

Maybe it just is GEICO's account but I am skeptical.

Best Regards, 

Sam Knutson, GEICO 
Performance and Availability Management 
mailto:[EMAIL PROTECTED] 
(office)  301.986.3574 

"Think big, act bold, start simple, grow fast..."
 

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

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


Re: "MVS Experience"

2007-03-16 Thread Doc Farmer
ROTFLMFAO!!!


(o) Listen to the 1403 Printer Orchestra play your favourites, 
including "Raindrops Keep Fallin' on My Head", "Born Free", "Blue Danube 
Waltz", and "Granma Got Run Over By A Reindeer" - With an animatronic 
Admiral Grace Hopper accompanying on 129 Keypunch!

(o) Learn the ancient craft of Breadboarding!  And be sure to buy a braided 
patchcord friendship bracelet at our "House of Hex" giftshop.

(o) Watch the 3330 Synchronised Spindle Dance Troupe!

(o) See the MVS Playhouse perform "Hamlet" - in Hexidecimal!

(o) Observe Tape Apes in their natural environment!

(o) See how ancient SysProgs survived in the days before Starbucks and 
Dunkin Donuts!

(o) Meet the inventor of "chad"!

(o) Join the Paper Tape Braiding Society as they unspool coding ribbons and 
form them into wonderous objects!

(o) Make your own 80-column Christmas wreath!

(o) Don't miss the "Dunk the PDP-8 Operator Into A Vat Of Piranha" Tank!



Can you tell it's FRIDAY?!?


On Fri, 16 Mar 2007 08:02:36 -0400, Rob Scott 
<[EMAIL PROTECTED]> wrote:

>I can just see it now.
>
>Enjoy this marvelous ride visiting the MVS discovery zone! (Note :
>Minimum age requirement 50)
>
>(o) Watch as the operators perform punched card shuffles, sometimes
>dropping and re-arranging whole payroll JCL streams in one go!
>(o) Gather around and stare at the one shared green and black terminal
>for all of your team !
>(o) Watch spellbound as the syslog comes out on a printer!
>(o) Listen with rapt awe as old sysprogs regale you with with model
>numbers of obsolete devices and how they could make the lights blink in
>amusing sequences !
>(o) Be impressed at the wealth of possibilities at your fingertips with
>24-bit addressing!
>(o) Test your strength - can you lift the 3350 H.D.A all by yourself ?
>(o) Survive the tape reel unspooling adventure !
>(o) Can you decode the wait-state mystery?
>
>
>
>
>Rob Scott
>Rocket Software, Inc
>275 Grove Street
>Newton, MA 02466
>617-614-2305
>[EMAIL PROTECTED]
>http://www.rs.com/portfolio/mxi_g2
>
>-Original Message-
>From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
>Behalf Of Doc Farmer
>Sent: 16 March 2007 07:28
>To: IBM-MAIN@BAMA.UA.EDU
>Subject: Re: "MVS Experience"
>
>"MVS Experience"
>
>When will this be a ride at Disneyland?
>
>=

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


Re: IBMLink web access broken all accounts presented Entitlement page TN3270 working fine

2007-03-16 Thread Mark Vitale
I also got the entitlement/login page.  I could not
sign on with my IBM id until I turned on cookies and 
deleted all my old ibm.com cookies.   Perhaps something
has changed in the site's cookie names or format?


Mark Vitale 
Senior Software Engineer

ISM - The power behind great IT decisions
Visit us at www.perfman.com 

 

> -Original Message-
> From: IBM Mainframe Discussion List 
> [mailto:[EMAIL PROTECTED] On Behalf Of Knutson, Sam
> Sent: Friday, March 16, 2007 8:03 AM
> To: IBM-MAIN@BAMA.UA.EDU
> Subject: IBMLink web access broken all accounts presented 
> Entitlement page TN3270 working fine
> 
> Hi,
>  
> Everyone in our company cannot get into the web version of IBMLink
> today.  We are all being presented with the Entitlement page.   TN3270
> version is working fine.  It seems the mappings for web id to 
> account or
> something is not working properly.The help desk won't open it as a
> SEV1 since we can login even though no one can work.  I found 
> 4 of my co-workers who had the problem while I was on with 
> the help desk.
>  
> I really liked the part where the technician asked for my 
> userid and password so he could see what is happening.  I 
> would have been happy to share out my desktop with him using 
> an IBM tool like AOS but our policy is pretty strict about 
> giving out your password over the phone.
>  
> Anyone else seeing this today?   If so please call the 
> IBMLink help desk
> 1-800-543-3912 so they get reports from multiple accounts and 
> will escalate it.
> 
> Maybe it just is GEICO's account but I am skeptical.
> 
> Best Regards, 
> 
> Sam Knutson, GEICO 
> Performance and Availability Management 
> mailto:[EMAIL PROTECTED] 
> (office)  301.986.3574 
> 
> "Think big, act bold, start simple, grow fast..."
>  
> 
> This email/fax message is for the sole use of the intended
> recipient(s) and may contain confidential and privileged information.
> Any unauthorized review, use, disclosure or distribution of 
> this email/fax is prohibited. If you are not the intended 
> recipient, please destroy all paper and electronic copies of 
> the original message.
> 
> --
> For IBM-MAIN subscribe / signoff / archive access 
> instructions, send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Old Email about a book...

2007-03-16 Thread Veilleux, Jon L
 


How about "A Guide to Using MVS/XA Interface Facilities"? 


Jon L. Veilleux
[EMAIL PROTECTED]
(860) 636-2683 



-
This e-mail may contain confidential or privileged information. If
you think you have received this e-mail in error, please advise the
sender by reply e-mail and then delete this e-mail immediately.
Thank you. Aetna

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


SDSF and External Security

2007-03-16 Thread Michael Babcock

Sorry for the bad formatting.  Hope this is better.

What's the best way to tell if SDSF is using external security?  We have
some LPARs that have the SDSF class active, but few profiles.  SDSF's
ISFPARMS don't appear to be using external security.  Is there a way to
tell definitively?  Or will SDSF use a combination?

I would assume it would use external security for those profiles that 
are defined, but revert to ISFPARMs if no profile was defined. Am I correct?


For example, one LPAR has the SDSF class active (but not RACLISTed). 
These are the profiles defined in the SDSF class (and there is no catchall).


ISFCMD.DSP
ISFOPER.ANYDEST
ISFOPER.SYSTEM
ISFATTR.** (G)
ISFCMD.DSP.SCHENV.** (G)
ISFCMD.DSP.** (G)
ISFCMD.ODSP.INITIATOR.** (G)
ISFCMD.ODSP.** (G)
ISFCMD.** (G)
ISFE.** (G)
ISFFRDR.** (G)
ISFINIT.** (G)
ISFJOBCL.** (G)
ISFLINE.** (G)
ISFMEMB.** (G)
ISFNODE.** (G)
ISFO.** (G)
ISFRES.** (G)


The SDSF parms for SYSPROGs contain these statements.

GROUP NAME(ISFSPROG),   /* GROUP NAME  */
TSOAUTH(JCL,OPER,ACCT), /*USER MUST HAVE JCL, OPER, ACCT   */
ACTION(ALL),/* ALL ROUTE CODES DISPLAYED   */
ACTIONBAR(YES), /* DISPLAY THE ACTION BAR ON PANELS*/
APPC(ON),   /* INCLUDE APPC SYSOUT */
AUPDT(2),   /* MINIMUM AUTO UPDATE INTERVAL*/
AUTH(LOG,I,O,H,DA,DEST,PREF, /* AUTHORIZED FUNCTIONS   */
 SYSID,ABEND,ACTION,INPUT,

 FINDLIM,ST,INIT,PR,TRACE,

 ULOG,MAS,SYSNAME,LI,SO,NO,PUN,RDR,JC,SE,RES),

CMDAUTH(ALL),   /* COMMANDS ALLOWED FOR ALL JOBS   */
CMDLEV(7),  /* AUTHORIZED COMMAND LEVEL*/
CONFIRM(ON),/* ENABLE CANCEL CONFIRMATION  */
CURSOR(ON), /* LEAVE CURSOR ON LAST ROW PROCESSED  */
DADFLT(IN,OUT,TRANS,STC,TSU,JOB),  /* DEFAULT ROWS SHOWN ON DA */
DATE(MMDD), /* DEFAULT DATE FORMAT */
DATESEP('/'),   /* DEFAULT DATESEP FORMAT  */
DFIELD2(DAFLD2),/* SAMPLE ALTERNATE FIELD LIST FOR DA  */
DISPLAY(ON),/* DO NOT DISPLAY CURRENT VALUES   */
DSPAUTH(ALL),   /* BROWSE ALLOWED FOR ALL JOBS */
GPLEN(2),   /* GROUP PREFIX LENGTH */
ILOGCOL(1), /* INITIAL DISPLAY COLUMN IN LOG   */
ISYS(LOCAL),/* INITIAL SYSTEM DEFAULT FOR DA   */
LANG(ENGLISH),  /* DEFAULT LANGUAGE*/
LOGOPT(OPERACT),/* DEFAULT LOG OPTION  */
OWNER(NONE),/* DEFAULT OWNER   */
UPCTAB(TRTAB2), /* UPPER CASE TRANSLATE TABLE NAME */
VALTAB(TRTAB),  /* VALID CHARACTER TRANSLATE TABLE */
VIO(SYSALLDA)   /* UNIT NAME FOR PAGE MODE OUTPUT  */

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


Re: IBMLink web access broken all accounts presented Entitlement page TN3270 working fine

2007-03-16 Thread Bob Shannon
Sam - Web access works OK for me.

Bob Shannon

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


Re: "MVS Experience"

2007-03-16 Thread Veilleux, Jon L
Think of where the *IX systems are now. That's where MVS was 20+ years
ago. Too many really sharp Systems Programmers dug into the source code
and made what they thought were useful modifications. They worked great
until there was an upgrade to that section of code. 
Since OCO the OS has been much more stable but the opportunity to learn
the 'guts' has been diminished. New Systems Programmers will never have
the same opportunity to dig deep that we had unless they do it in the
*IX OSes where the source is still available. 
IBM lost a great source of debuggers when they went OCO.


Jon L. Veilleux
[EMAIL PROTECTED]
(860) 636-2683 


-
This e-mail may contain confidential or privileged information. If
you think you have received this e-mail in error, please advise the
sender by reply e-mail and then delete this e-mail immediately.
Thank you. Aetna

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


IBMLink web access broken all accounts presented Entitlement page TN3270 working fine

2007-03-16 Thread Knutson, Sam
Hi,
 
Everyone in our company cannot get into the web version of IBMLink
today.  We are all being presented with the Entitlement page.   TN3270
version is working fine.  It seems the mappings for web id to account or
something is not working properly.The help desk won't open it as a
SEV1 since we can login even though no one can work.  I found 4 of my
co-workers who had the problem while I was on with the help desk.
 
I really liked the part where the technician asked for my userid and
password so he could see what is happening.  I would have been happy to
share out my desktop with him using an IBM tool like AOS but our policy
is pretty strict about giving out your password over the phone.
 
Anyone else seeing this today?   If so please call the IBMLink help desk
1-800-543-3912 so they get reports from multiple accounts and will
escalate it.

Maybe it just is GEICO's account but I am skeptical.

Best Regards, 

Sam Knutson, GEICO 
Performance and Availability Management 
mailto:[EMAIL PROTECTED] 
(office)  301.986.3574 

"Think big, act bold, start simple, grow fast..."
 

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

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


Re: "MVS Experience"

2007-03-16 Thread Rob Scott
I can just see it now.

Enjoy this marvelous ride visiting the MVS discovery zone! (Note :
Minimum age requirement 50)

(o) Watch as the operators perform punched card shuffles, sometimes
dropping and re-arranging whole payroll JCL streams in one go!
(o) Gather around and stare at the one shared green and black terminal
for all of your team !
(o) Watch spellbound as the syslog comes out on a printer!
(o) Listen with rapt awe as old sysprogs regale you with with model
numbers of obsolete devices and how they could make the lights blink in
amusing sequences !
(o) Be impressed at the wealth of possibilities at your fingertips with
24-bit addressing!
(o) Test your strength - can you lift the 3350 H.D.A all by yourself ?
(o) Survive the tape reel unspooling adventure !
(o) Can you decode the wait-state mystery?
   



Rob Scott
Rocket Software, Inc
275 Grove Street
Newton, MA 02466
617-614-2305
[EMAIL PROTECTED]
http://www.rs.com/portfolio/mxi_g2

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Doc Farmer
Sent: 16 March 2007 07:28
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: "MVS Experience"

"MVS Experience"

When will this be a ride at Disneyland?

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

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


Re: "MVS Experience"

2007-03-16 Thread John P Kalinich
Doc Farmer of the IBM Mainframe Discussion List 
wrote on 03/16/2007 06:28:17 AM:

> "MVS Experience"

Be careful what words you use.  Jimi Hendrix's daughter may take you to
court.

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


Re: "MVS Experience"

2007-03-16 Thread Doc Farmer
"MVS Experience"

When will this be a ride at Disneyland?

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


Re: ZFS Root impact on cloning SYSRES

2007-03-16 Thread Jousma, David
Mark, 

I'm not sure the define/recatalog's will work with the zFS's.  At least
I was not able to get it to work.  I clone/promote the code from my
maintenance zones to tech -> tech to dev -> dev to prod -> using logical
copies for all datasets EXCEPT zfs's.  Since we have a separate
mastercat structure for tech/dev/prod and my OMVS HLQ is in the
mastercat, I use DFDss to DUMP the zFS on the ZFS owning system, and
restore the ZFS on the target system.  In fact, since we run our
serverpac provided zfs's read-only, I leave the dumped zfs images on my
sysres so that the promotion to the next environment (say dev to prod),
only required a DSS restore(with rename for the sysres qualifier).
This process has worked very well for me.  To clone, I run just 5 jobs -
1 clip the target volume, and reload IPLtext, 2 - logical dataset copy,
excluding OMVS, & SMPE, 3 - restore OMVS zfs's, 4 create target csi for
new target sysres & zonecopy, 5 - logical copy/rename all SMPE target
zone support datasets(sts, mcs, log, etc).  All of which run
concurrently in about 15 minutes.  BTW, I run a single mod-27 for each
sysres.  

Dave


Dave Jousma
Principal Systems Programmer
[EMAIL PROTECTED]
616.653.8429


-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Mark Zelden
Sent: Thursday, March 15, 2007 4:00 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: ZFS Root impact on cloning SYSRES

If you look back at some of the old posts / SHARE presentations prior to
non-SMS HFS, the same methods should work.  One of those methods was to
backup the HFS to a (non-vsam) dsn on the sysres set and then restore it
on the target environment as a HFS again.  That would certainly work. 

Thinking out loud... none of my "sysres" unix files are zFS yet.

You can include the primary or secondary sysres name as part of the ZFS
file name (which is something you have to do anyway for shared HFS /zFS
if you are using that).  I'm not sure how you clone today, but you would
have to change your procedures to logically copy the ZFS from your
maintenance name to the proper name for the sysres set you are cloning
to.  I am using 2 mod-9s today with only sysres HFS files on the 2nd
sysres. I volume copy the 1st volume and logically copy / rename HFS
files on the 2nd volume, so my cloning job won't have to change for ZFS.

If your environment is completely shared, ignore the rest.

We share the sysres (including HFS) across sysplex boundaries as read
only... so this applies to environments similar to ours.
Even in our other sysplexes that don't do this, we still maintain the
sysres / HFS files from one environment on a string of shared volumes
and then clone from the target environment.  Some of this below also
applies to that. 

Since it is VSAM, you might be required to use SYS1 as the HLQ if you
clone from an environment that is not sharing the catalogs with a target
environment that you might IPL from.
Then you can do a DEFINE RECATALOG for all the sysres set possibilities
in your other non-shared environments or at least catalog the
maintenance ZFS (assuming it is on a shared
volume) and run the logical copy of the ZFS files from the target
environment - then they would be cataloged.   

This is what I'll have to do (and similar to what I currently do with
HFS except I used define NONVSAM to catalog all of the
sysres set possibilities for the various HFS files):

 DEFINE CLUSTER  -  
 (NAME(SYS1.OMVS.vv.ROOT) - 
 VOLUMES(vv) -  
 RECATALOG -
 LINEAR)
 DEFINE CLUSTER  -  
 (NAME(SYS1.OMVS.vv.TIVOLI)   - 
 VOLUMES(vv) -  
 RECATALOG -
 LINEAR)
 DEFINE CLUSTER  -  
 (NAME(SYS1.OMVS.vv.XML)  - 
 VOLUMES(vv) -  
 RECATALOG -
 LINEAR)  

... (etc)

So if you have 6 sysres sets, you need to do the define 6 times
replacing vv with the sysres name. Obviously BPXPRMxx has to specify
the vv as &SYSRn in the data set name. 

The big difference between what I did for HFS is that a VSAM DSN has to
exist before you can do the first DEFINE RECATALOG (not so with DEFINE
NONVSAM).  So it is a one time thing for each new sysres set you use.
Every other time you clone to the same sysres set, the ZFS files will
already be cataloged in the other environments.  (BTW, this is how our
IODFs are set up since we don't have them in a shared usercat across all
the various sysplexes).

Hope this isn't too confusing. :-)

This e-mail transmission contains information that is confidential and may be 
privileged.   It is intended only for the addressee(s

Re: Old Email about a book...

2007-03-16 Thread Shane
On Thu, 2007-03-15 at 11:05 -0400, Gary Green wrote:

> Back then, the "Advanced Assembler Language and MVS Interfaces" was
> available on Amazon for $332.00.  Well, just for ha-ha's I checked today's
> going rate.  Someone has a new copy of the book and was asking $450.00, plus
> shipping!

I mentioned this in the office, and one of the DBAs raced over to his
bookshelf.
Yep - he had one of the original series.
I've got one of the second series - hardly ever opened. Collects dust
whilst the Linux kernel references next to it get all the action.
Regardless, *NO* mine ain't for sale.

Shane ...

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


Re: HSM's Autobackup performance

2007-03-16 Thread O'Brien, David W. (NIH/CIT) [C]
Richard,
 
IIRC the 16K tape blocksize was addressed years ago at which time IBM had no 
intention of changing it.
If my memory is incorrect or a larger blocksize is indeed available, somebody 
please enlighten me.
 
You might want to consider the following setsys parameters:
 
 SETSYS -   
TAPEHARDWARECOMPACT -   
COMPACT(DASDBACKUP DASDMIGRATE NOTAPEBACKUP NOTAPEMIGRATE) -
 
Assuming your tapes have compaction enabled then there's no point in adding 
software compaction.
 
I've also always used  DUMPIO(4) which causes DFDSS Dump to read a cyl at a 
time.



From: Richard Marchant [mailto:[EMAIL PROTECTED]
Sent: Fri 3/16/2007 4:58 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: HSM's Autobackup performance





Is there any parameters that can be tweaked to increase the performance
of HSM's autobackup?



A GTF trace shows that HSM backs-up datasets in 16K blocks.

Surely if HSM is using DFDSS as the datamover (default now) it should be
securing these datasets in 64K blocks at least.

Is it necessary to change any of the parameters in the DEVSUPxx member?
EG the COMPACT and TAPEBLKSZLIM



The HSM manuals have no information regarding the above.



Richard 


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



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


HSM's Autobackup performance

2007-03-16 Thread Richard Marchant
 

Is there any parameters that can be tweaked to increase the performance
of HSM's autobackup?

 

A GTF trace shows that HSM backs-up datasets in 16K blocks.

Surely if HSM is using DFDSS as the datamover (default now) it should be
securing these datasets in 64K blocks at least.

Is it necessary to change any of the parameters in the DEVSUPxx member?
EG the COMPACT and TAPEBLKSZLIM

 

The HSM manuals have no information regarding the above. 

 

Richard  


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