Re: ISR only with SW contract

2007-05-16 Thread Walter Marguccio
- Original Message 
From: Kurt Quackenbush [EMAIL PROTECTED]

 Therefore, to use SMP/E Internet Service Retrieval you do not need to 
 have a SW Support contract.

 If anyone experiences something different, or is told something 
 different, please let me know, with details such as customer name and 
 country, so I may follow up appropriately.

Kurt,

thanks very much for confirming this, you've been very helpful.

Walter Marguccio
z/OS Systems Programmer
Munich - Germany

--
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: Virtual tape limits (Was: OEM software electronic download report card)

2007-05-16 Thread R.S.

Ron Hawkins wrote:

Shane,

Wintel solution? Who mentioned a Wintel solution?

The software runs on Mainframe. The virtualization of SATA is handled by a
USP.

How much more robust can the HW and SW be?

[...]
So, I have to buy USP (I like USP, but like the *choice* more), then I have to buy some 
SATA disks, preferrably from HDS, then pay license for virtualization (less 
if HDS SATA is used), then buy VTF software, then consume CPU cycles for compression.
Well...
We did some analyzes for SATA as ML1 disks. It seemed that it is simply to expensive, it is better to negotiate good price for n-1 technology. Using ML1 disks instead of tapes is 1) too expensive, 2) not scalable enough. 
It can be suitable for small amounts of data and high demands on availability and reliability. Such a disks are RAID protected and can be easily mirrored across the sites. 
My $0.02

--
Radoslaw Skorupka
Lodz, Poland


--
BRE Bank SA
ul. Senatorska 18
00-950 Warszawa
www.brebank.pl

Sd Rejonowy dla m. st. Warszawy 
XII Wydzia Gospodarczy Krajowego Rejestru Sdowego, 
nr rejestru przedsibiorców KRS 025237

NIP: 526-021-50-88
Wedug stanu na dzie 01.01.2007 r. kapita zakadowy BRE Banku SA (w caoci 
opacony) wynosi 118.064.140 z. W zwizku z realizacj warunkowego 
podwyszenia kapitau zakadowego, na podstawie uchwa XVI WZ z dnia 21.05.2003 
r., kapita zakadowy BRE Banku SA moe ulec podwyszeniu do kwoty 118.760.528 
z. Akcje w podwyszonym kapitale zakadowym bd w caoci opacone.

--
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: Release a dataset from a user of MVS

2007-05-16 Thread Vernooy, C.P. - SPLXM


Ted MacNEIL [EMAIL PROTECTED] wrote in message
news:[EMAIL PROTECTED]
-cell00.bisx.prod.on.blackberry...
  Why does RACF not support rules restricting the set of users who
may ENQ
  on protected data set names?
 
 
 It does: via the restriction who can read or update the dataset,
ain't it?
 
 No. It does not. You can grab a DSN with old or share, without opening
it.
 The read/update is not checked until you open it.
 
 So, if you never open it, you can still lock it up.
 

That's right, but in 99.9% of the situations they are the same, you ENQ
a dataset because you are going to open it, if you are not allowed to
open it, you will get one 913 abend and then never do it again or have
your autorizations changed. Only in 0.1 % of the situations you might
have something doing an ENQ without intending to Open and causing
contention and this also being intentionally and not desired by your
colleagues.

99.9% of the situations the OP is referring to are users ENQ'ing a
dataset legally, authorized by RACF at Open time.

1% of the answers refer to this situation (call user, cancel user) and
99% of the answers elaborates the 0.1% of the situations that only will
arise when you let a number of sysprogs play in a sandbox and not in the
real world. So the majority of this thread is highly academically and
theoretically. Let's go and do some useful work.

Kees.
**
For information, services and offers, please visit our web site:
http://www.klm.com. This e-mail and any attachment may contain
confidential and privileged material intended for the addressee
only. If you are not the addressee, you are notified that no part
of the e-mail or any attachment may be disclosed, copied or
distributed, and that any other action related to this e-mail or
attachment is strictly prohibited, and may be unlawful. If you have
received this e-mail by error, please notify the sender immediately
by return e-mail, and delete this message. Koninklijke Luchtvaart
Maatschappij NV (KLM), its subsidiaries and/or its employees shall
not be liable for the incorrect or incomplete transmission of this
e-mail or any attachments, nor responsible for any delay in
receipt.
Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal
Dutch Airlines) is registered in Amstelveen, The Netherlands, with
registered number 33014286 
**

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


Re: DB2 version 8 SPUFI and ISPF

2007-05-16 Thread Jim McAlpine

Thanks Kevin.  I'm not really bothered about the DSNE345I message per se.
If I'm really sure that the code page being used is 1146 and that the
message is just reporting that ZTERMCID is not being set then I'll just
restore the DB2 ptf that issues the message.  Will SPUFI be using code page
1146 or 37 is what I need to know.

Jim McAlpine

On 5/15/07, Fletcher, Kevin [EMAIL PROTECTED] wrote:


Jim,

The PTF you describe (putting out message DSNE345I) was a part of DB2
V7, this was an enforcement PTF, eg. The exposure was always there now
DB2 is telling you. We had a similar problem using CCSID 1140 (US plus
euro). If you cruise IBM link  or DB2-L looking for DSNE345I you will
find a different solution, rebind the SPUFI plans using CCSID 37. The
PTF also added an extra screen where you can tell SPUFI what you want to
change the plan to.

If you do not wish to do that solution, I believe there is a VTAM option
of the VBUILD macro that will let you set the code page for your 1146
CCSID. The exact parm escapes me at this time. We did not do this since
this would pretty much be global for all TSO users.



Thanks,

Fletch

Dilbert - I ask for so little..and boy do I get 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


Report on TSO usage

2007-05-16 Thread Sridhar K Veena
G'day All,

Am new to this list, sorry if am asking the wrong question here !

Am looking for some kind of report which will pull out the info on TSO
usage on a mainframe. Something which would individually list all the
TSO users who logged on 

and their various resource consumption stats. Please let me know if such
a thing is possible by running some reporting JCLs. We have a mainframe
that is used for

 training purposes, and the TSO users are constantly changing. We are
looking at generating resource consumption reports after every training
session.

Thanks

Sridhar K Veena



This message is for the designated recipient only and may contain privileged, 
proprietary, or otherwise private information.  If you have received it in 
error, please notify the sender immediately and delete the original.  Any other 
use of the email by you is prohibited.

--
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: Virtual tape limits (Was: OEM software electronic download report card)

2007-05-16 Thread Shane
On Wed, 2007-05-16 at 05:25 +0800, Ron Hawkins wrote:

 
 Wintel solution? Who mentioned a Wintel solution?

First paragraph of your reference link;
Virtual Tape Library Solutions by Hitachi Data Systems enables storage
managers to obtain all the benefits of backing up to disk without
changing established backup policies or procedures. The integrated suite
of the software, server, and disk creates a virtual tape library that
appears to the backup application as one or more real tape libraries.

When I see The integrated suite of the software, server, and disk ...
from a vendor my eyes glaze over.

I'm afraid you (royal plural) lost me right there.

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: Report on TSO usage

2007-05-16 Thread Vinod Kumar
Hi Sridhar,

Check if SMF record 30  32 will help you.

Regards,
Vinod Kumar

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Sridhar K Veena
Sent: Wednesday, May 16, 2007 2:02 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Report on TSO usage

G'day All,

Am new to this list, sorry if am asking the wrong question here !

Am looking for some kind of report which will pull out the info on TSO
usage on a mainframe. Something which would individually list all the
TSO users who logged on 

and their various resource consumption stats. Please let me know if such
a thing is possible by running some reporting JCLs. We have a mainframe
that is used for

 training purposes, and the TSO users are constantly changing. We are
looking at generating resource consumption reports after every training
session.

Thanks

Sridhar K Veena



This message is for the designated recipient only and may contain
privileged, proprietary, or otherwise private information.  If you have
received it in error, please notify the sender immediately and delete
the original.  Any other use of the email by you is prohibited.

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

DISCLAIMER:
---
The contents of this e-mail and any attachment(s) are confidential and intended 
for the named recipient(s) only. 
It shall not attach any liability on the originator or HCL or its affiliates. 
Any views or opinions presented in 
this email are solely those of the author and may not necessarily reflect the 
opinions of HCL or its affiliates. 
Any form of reproduction, dissemination, copying, disclosure, modification, 
distribution and / or publication of 
this message without the prior written consent of the author of this e-mail is 
strictly prohibited. If you have 
received this email in error please delete it and notify the sender 
immediately. Before opening any mail and 
attachments please check them for viruses and defect.
---

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


FW: Virtual tape limits (Was: OEM software electronic download report card)

2007-05-16 Thread Ron Hawkins
Radoslaw,

You do not have to buy a USP or a USP-V. The NSC55 can do this just fine,
and you can buy it without any disk drives. This is an enterprise class
rack-mount controller that can run with external storage only.

I'm not aware of anyone else providing virtualization for Mainframe, so yes
your options are limited to these three virtualization boxes. From what I
know of your shop, the NSC55 would probably be a better-size for you. Then
again, there are probably other options that are right for you, including
staying with tape.

I guess there is some choice of vendor - you can get these boxes from HDS,
SUN, or HP. (GDR). Note that the USP is now n-1 as of yesterday.

The midrange controllers can come from EMC, IBM, SUN, HP, and a few others.
You can also use old enterprise boxes as long as they can be fitted with FCP
connections. I have a customer in Asia with IBM ESS E20 and F20 virtualised
- they use them for development LPARs after migrating production off them
into a USP.

Yes you have to pay for the virtualisation and VTFM software, just like any
other software. You pay for DFSORT so you can sort don't you? You pay for
DB2 so you can have a RDBMS don't you? So what is different? (you wouldn't
pay for VTFM to replace ML1 or ML2 though).

Replacing ML1 with SATA disk would allow you to have more aggressive
migration policies, and less aggressive ML2 policies (keep it on ML2 longer)
- and I believe you already have some experience with ML2 disk as a further
option.

I don't agree that virtualised storage doesn't scale.

I don't think that virtualization, VTFM and SATA are the answer to
everything - I've stated many times in the past that I'm a TMM bigot, and
that has not changed. I do like the idea of combining TMM and External
storage.

I do agree that cost justifying this may be hard in your shop. I recall from
previous posts that you manage a lot of storage (disk based ML2 I think) by
using n-3 storage with no maintenance or support. These costs are often the
drivers to move to new storage - but if you aren't paying maintenance how
can there be a saving.

Ron







 -Original Message-
 From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
 Behalf Of R.S.
 Sent: Wednesday, 16 May 2007 3:01 PM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: Re: Virtual tape limits (Was: OEM software electronic download
 report card)
 [...]
 So, I have to buy USP (I like USP, but like the *choice* more), then I
 have to buy some SATA disks, preferrably from HDS, then pay license for
 virtualization (less if HDS SATA is used), then buy VTF software, then
 consume CPU cycles for compression.
 Well...
 We did some analyzes for SATA as ML1 disks. It seemed that it is simply
 to expensive, it is better to negotiate good price for n-1 technology.
 Using ML1 disks instead of tapes is 1) too expensive, 2) not scalable
 enough.
 It can be suitable for small amounts of data and high demands on
 availability and reliability. Such a disks are RAID protected and can be
 easily mirrored across the sites.
 My $0.02
 --
 Radoslaw Skorupka
 Lodz, Poland
 

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


Shared ICP between 2 SYSPLEXES

2007-05-16 Thread Cwi Jeret
Hello,
I have the following question :

We have the following configuration :

2 CPC's , on each one 2 LPARS,  one CF and One MEMBER of SYSPLEX1.
both CF's are connected to the members of the sysplex of the
other CPC with  a pair of  ICP connections .

  CPC1   CPC2
++ ++
||   icp   ||
| PLEX1a |--+  +---| PLEX1b |
||  |  |   ||
||  |  |   ||
++  |  |   ++
||  +--|---||
|  CF1   |-+  icp  |  CF2   |
++ ++
|| ||
|| ||
|| ||
|| ||
++ ++
|| ||
|| ||
++ ++

My question is :

Is it possible to add a second SYSPLEX, sharing the same physical ICP
connections like sharing CTC connections between LPARs , like this:

  CPC1   CPC2
++ ++
||   icp   ||
| PLEX1a |--+  +---| PLEX1b |
||  |  |   ||
||  |  |   ||
++  |  |   ++
||  +--|---||
|  CF1   |-+  icp  |  CF2   |
++ ++
|| ||
| PLEX2a | | PLEX2b |
|| ||
|| ||
++ ++
|| ||
|  CF3   | |  CF4   |
++ ++

If the answer is positive, where can I find documentation
describing the definitions for it .

Cwi jeret,  Bank Hapoalim  T.A.

--
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: Virtual tape limits (Was: OEM software electronic download report card)

2007-05-16 Thread Ron Hawkins
Hmmm, when did z/series and s/390 stop being servers?

Did you assume... :-)

 -Original Message-
 From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
 Behalf Of Shane
 Sent: Wednesday, 16 May 2007 5:17 PM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: Re: Virtual tape limits (Was: OEM software electronic download
 report card)
 
 On Wed, 2007-05-16 at 05:25 +0800, Ron Hawkins wrote:
 
 
  Wintel solution? Who mentioned a Wintel solution?
 
 First paragraph of your reference link;
 Virtual Tape Library Solutions by Hitachi Data Systems enables storage
 managers to obtain all the benefits of backing up to disk without
 changing established backup policies or procedures. The integrated suite
 of the software, server, and disk creates a virtual tape library that
 appears to the backup application as one or more real tape libraries.
 
 When I see The integrated suite of the software, server, and disk ...
 from a vendor my eyes glaze over.
 
 I'm afraid you (royal plural) lost me right there.
 
 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

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


Duplicate CTC addresses

2007-05-16 Thread Errol
Hi to all. Does anybody know if it is possible to define duplicate ctc 
addresses 
to a DR LPAR? 
I have two processors and can define duplicate LPARs to each of them, so 
that each CPC has LPARS A to E defined to it. CPC 1 has LPARS A and B 
running normally on it and CPC 2 has LPARs C D and E. IF I have a problem 
with CPC 1, I would like to IPL LPARs A and B on CPC2, but without having to 
change my VTAM definitions to match the new range of CTC addresses. Could 
I generate the same CTC addresses from C,D,E to A nd B regardless of which 
CPC the LPAR is running on? Maybe the LPARS A and B could be detached from 
CPC 2 in the normal gen, but in the event of a problem, would I be able to 
dynamically detach LPARs A and B from CPC 1 and attach them to CPC2 so 
that the same CTC addresses would be valid?
Assume there is enough memory and processing power to handle all LPARs on 
any CPC.
Otherwise is there any other method of handling this problem?  

--
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: Virtual tape limits (Was: OEM software electronic download report card)

2007-05-16 Thread Shane
On Wed, 2007-05-16 at 17:26 +0800, Ron Hawkins wrote:
 Hmmm, when did z/series and s/390 stop being servers?
 
 Did you assume... :-)

Where-ever did you get that idea ???.

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: Report on TSO usage

2007-05-16 Thread גדי בן אבי
Hi,

This information is stored in SMF type 30 records. You can either write your 
own program to analyze these records or use a third party product to do so.

I would suggest you look around the CBTTAPE at www.cbttape.org and see if there 
is something there that fits your needs.

You might already have something inhouse that can analyze smf records.

I use SAS and MXG for this type of analysis.

Gadi

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of 
Sridhar K Veena
Sent: Wednesday, May 16, 2007 11:32 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Report on TSO usage

G'day All,

Am new to this list, sorry if am asking the wrong question here !

Am looking for some kind of report which will pull out the info on TSO usage on 
a mainframe. Something which would individually list all the TSO users who 
logged on 

and their various resource consumption stats. Please let me know if such a 
thing is possible by running some reporting JCLs. We have a mainframe that is 
used for

 training purposes, and the TSO users are constantly changing. We are looking 
at generating resource consumption reports after every training session.

Thanks

Sridhar K Veena



This message is for the designated recipient only and may contain privileged, 
proprietary, or otherwise private information.  If you have received it in 
error, please notify the sender immediately and delete the original.  Any other 
use of the email by you is prohibited.

--
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: How to reload SSL certificate for z/OS TN3270 server

2007-05-16 Thread Wayne Driscoll
Chris,
All true, except, encouragement should be replaced by long term
requirement as z/OS 1.8 is the last version of CS that supports the
TN3270 running as a subtask of the TCPIP stack.  The sooner you get to
running the TN3270 in a separate address space, the sooner you eliminate
a migration task.
Wayne Driscoll
Product Developer 
JME Software LLC
[EMAIL PROTECTED]
Phone: (630) 663-0719
Mobile: (630) 247-1632  

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Chris Mason
Sent: Tuesday, May 15, 2007 11:08 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: How to reload SSL certificate for z/OS TN3270 server

Tom

The encouragement today is to split the internal client, namely the
TN3270 server function, from the main CS IP address space and run it in
its own address space. Thus recycling the TN3270 server is not
necessarily going to involve recycling the whole of CS IP. Perhaps the
need sometimes to recycle the TN3270 server is one of the reasons why
the split is encouraged.

Chris Mason

--
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: Data Areas Manuals to be dropped

2007-05-16 Thread Shmuel Metz (Seymour J.)
In [EMAIL PROTECTED], on
05/15/2007
   at 10:28 PM, Greg Price [EMAIL PROTECTED] said:

I think I've still got my Just say NO to OCO T-shirt that I bought
at a NaSTEC.

You can have mine when they pry it out of my cold dead fingers ;-)
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see http://patriot.net/~shmuel/resume/brief.html 
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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


Re: CLIST question (the ampersands are killing me)

2007-05-16 Thread Shmuel Metz (Seymour J.)
In [EMAIL PROTECTED], on 05/11/2007
   at 06:05 PM, Paul Gilmartin [EMAIL PROTECTED] said:

Actually, CMS EXEC supports the same modal interaction with CMS EDIT
as CLIST with TSO EDIT.

You can invoke a CMS EXEC or EXEC2 procedure from within CMS EDIT, but
if you invoke EDIT from within an EXEC then it loses control until
EDIT completes. There is no equivalent to DATA and DATA PROMPT.

But you must accept not receiving status from the stacked commands

Correct. This is one of the few cases where CLIST is superior to REXX.

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

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


Re: Data Areas Manuals to be dropped

2007-05-16 Thread Shmuel Metz (Seymour J.)
In
[EMAIL PROTECTED],
on 05/15/2007
   at 07:16 AM, Peter Relson [EMAIL PROTECTED] said:

The data areas books have forever been generated automatically from
macros;

I don't recall when the change occurred, but the OS/360 System Control
Blocks was not automatically generated. FWIW, automatic generation has
its advantages for the customer *IF* all of the relevant data are in
the mapping macros and the tools are properly written. However,
pointer diagrams have their uses and it's hard to see how you could
automatically generate those.

at least in the past 20 years

For me forever is longer than 20 years.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see http://patriot.net/~shmuel/resume/brief.html 
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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


Re: DB2 version 8 SPUFI and ISPF

2007-05-16 Thread Shmuel Metz (Seymour J.)
In [EMAIL PROTECTED], on
05/15/2007
   at 03:01 PM, Jim McAlpine [EMAIL PROTECTED] said:

As you are no doubt aware there are code page pre-requisites for DB2
V8.  I have applied a ptf to SPUFI which shows the incompatibilities
in code page betweed SPUFI and the ISPF terminal like this

What is the meaning of CCSID USED BY THE TERMINAL? Specifically, is
that the code page used by the actual terminal or the code page used
by ISPF. They aren't the same in, e.g., TEXT mode, due to the handling
of GE and associated characters.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see http://patriot.net/~shmuel/resume/brief.html 
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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


Re: Data Areas Manuals to be dropped

2007-05-16 Thread Mark Baron
Of course, reading the softcopy manuals has become very difficult as well. 
Library Reader is no longer available (unless, of course you happen to have
a very old library distribution - probably prior to 2001 or 2002 - laying
around).  Softcopy Reader doesn't work properly, or at all, under Windows
Vista.  I opened an ETR to ask about this a couple of months ago and
basically IBM's response was that SCR is not Vista ready but since it's a
free product and they will get an update when they get to an update.  If we
can believe Bill Gates last pronouncement that Microsoft has already sold
more than 40 million copies of Vista, then IBM really ought to get a Vista
ready SCR out to its customers.

Fortunately, the last version of Library Reader still basically works under
Vista the although some functions (particularly the mouse scroll wheel) no
longer function.  If anyone on the list needs a copy, reply to me offline
and I'll send you a .zip file with 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: Data Areas Manuals to be dropped

2007-05-16 Thread R.S.

Mark Baron wrote:
Of course, reading the softcopy manuals has become very difficult as well. 
Library Reader is no longer available (unless, of course you happen to have

a very old library distribution - probably prior to 2001 or 2002 - laying
around).  

AFAIK it is still available, but hidden - it's hard to find it out on IBM 
pages.


Softcopy Reader doesn't work properly, or at all, under Windows
Vista.  I opened an ETR to ask about this a couple of months ago and
basically IBM's response was that SCR is not Vista ready but since it's a
free product and they will get an update when they get to an update.  If we
can believe Bill Gates last pronouncement that Microsoft has already sold
more than 40 million copies of Vista, then IBM really ought to get a Vista
ready SCR out to its customers.

AFAIK SoftCopy Reader does not work properly on any OS.



Fortunately, the last version of Library Reader still basically works under
Vista the although some functions (particularly the mouse scroll wheel) no
longer function. [...]
Minor correction: it has *never* functioned. 


--
Radoslaw Skorupka
Lodz, Poland


--
BRE Bank SA
ul. Senatorska 18
00-950 Warszawa
www.brebank.pl

Sd Rejonowy dla m. st. Warszawy 
XII Wydzia Gospodarczy Krajowego Rejestru Sdowego, 
nr rejestru przedsibiorców KRS 025237

NIP: 526-021-50-88
Wedug stanu na dzie 01.01.2007 r. kapita zakadowy BRE Banku SA (w caoci 
opacony) wynosi 118.064.140 z. W zwizku z realizacj warunkowego 
podwyszenia kapitau zakadowego, na podstawie uchwa XVI WZ z dnia 21.05.2003 
r., kapita zakadowy BRE Banku SA moe ulec podwyszeniu do kwoty 118.760.528 
z. Akcje w podwyszonym kapitale zakadowym bd w caoci opacone.

--
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: Data Areas Manuals to be dropped

2007-05-16 Thread Mark Baron
On Wed, 16 May 2007 14:15:06 +0200, R.S. [EMAIL PROTECTED] wrote:

Mark Baron wrote:
 Of course, reading the softcopy manuals has become very difficult as well.
 Library Reader is no longer available (unless, of course you happen to have
 a very old library distribution - probably prior to 2001 or 2002 - laying
 around).
AFAIK it is still available, but hidden - it's hard to find it out on IBM
pages.

Interesting - I've looked but never found it so I considered my lucky to
have found a copy of it on one of the last OS/390 library distributions and
kept it all these years.


 Softcopy Reader doesn't work properly, or at all, under Windows
 Vista.  I opened an ETR to ask about this a couple of months ago and
 basically IBM's response was that SCR is not Vista ready but since it's a
 free product and they will get an update when they get to an update.  If we
 can believe Bill Gates last pronouncement that Microsoft has already sold
 more than 40 million copies of Vista, then IBM really ought to get a Vista
 ready SCR out to its customers.
AFAIK SoftCopy Reader does not work properly on any OS.

I've had no problem with SCR until Vista.  I have it working well on my
WinXP system.



 Fortunately, the last version of Library Reader still basically works under
 Vista the although some functions (particularly the mouse scroll wheel) no
 longer function. [...]
Minor correction: it has *never* functioned.

You are correct about the mouse wheel scroll function.  My apologies to the
list.

Mark


--
Radoslaw Skorupka
Lodz, Poland


--
BRE Bank SA
ul. Senatorska 18
00-950 Warszawa
www.brebank.pl

Sd Rejonowy dla m. st. Warszawy
XII Wydzia Gospodarczy Krajowego Rejestru Sdowego,
nr rejestru przedsibiorców KRS 025237
NIP: 526-021-50-88
Wedug stanu na dzie 01.01.2007 r. kapita zakadowy BRE Banku SA (w
caoci opacony) wynosi 118.064.140 z. W zwizku z realizacj
warunkowego podwyszenia kapitau zakadowego, na podstawie uchwa XVI WZ z
dnia 21.05.2003 r., kapita zakadowy BRE Banku SA moe ulec podwyszeniu do
kwoty 118.760.528 z. Akcje w podwyszonym kapitale zakadowym bd w
caoci opacone.

--
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: DB2 version 8 SPUFI and ISPF

2007-05-16 Thread Fletcher, Kevin
Jim,

Spufi will use CCSID 37. If you restore the PTF you are not really
gaining anything since the conflict will still exist, with the PTF DB2
is just telling you about it. There is another thing I tried was to put
my terminal emulator to a 1140 CCSID (which on our system translated to
a blank CCSID) and told spufi to ignore blank CCSID warning (this is
CURRENT SPUFI DEFAULTS - PANEL 2).

Thanks,

Fletch (317) 817-3545

Dilbert - I ask for so little..and boy do I get it.
 

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Jim McAlpine
Sent: Wednesday, May 16, 2007 3:58 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: DB2 version 8 SPUFI and ISPF


Thanks Kevin.  I'm not really bothered about the DSNE345I message per
se. If I'm really sure that the code page being used is 1146 and that
the message is just reporting that ZTERMCID is not being set then I'll
just restore the DB2 ptf that issues the message.  Will SPUFI be using
code page 1146 or 37 is what I need to know.

Jim McAlpine

On 5/15/07, Fletcher, Kevin [EMAIL PROTECTED] wrote:

 Jim,

 The PTF you describe (putting out message DSNE345I) was a part of DB2 
 V7, this was an enforcement PTF, eg. The exposure was always there now

 DB2 is telling you. We had a similar problem using CCSID 1140 (US plus

 euro). If you cruise IBM link  or DB2-L looking for DSNE345I you will 
 find a different solution, rebind the SPUFI plans using CCSID 37. The 
 PTF also added an extra screen where you can tell SPUFI what you want 
 to change the plan to.

 If you do not wish to do that solution, I believe there is a VTAM 
 option of the VBUILD macro that will let you set the code page for 
 your 1146 CCSID. The exact parm escapes me at this time. We did not do

 this since this would pretty much be global for all TSO users.



 Thanks,

 Fletch

 Dilbert - I ask for so little..and boy do I get 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

--
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: Data Areas Manuals to be dropped

2007-05-16 Thread R.S.

Mark Baron wrote:

On Wed, 16 May 2007 14:15:06 +0200, R.S. [EMAIL PROTECTED] wrote:


Mark Baron wrote:

Of course, reading the softcopy manuals has become very difficult as well.
Library Reader is no longer available (unless, of course you happen to have
a very old library distribution - probably prior to 2001 or 2002 - laying
around).

AFAIK it is still available, but hidden - it's hard to find it out on IBM

pages.

Interesting - I've looked but never found it so I considered my lucky to
have found a copy of it on one of the last OS/390 library distributions and
kept it all these years.


http://www-1.ibm.com/support/docview.wss?doc=4000232org=SWrs=0

--
Radoslaw Skorupka
Lodz, Poland


--
BRE Bank SA
ul. Senatorska 18
00-950 Warszawa
www.brebank.pl

Sd Rejonowy dla m. st. Warszawy 
XII Wydzia Gospodarczy Krajowego Rejestru Sdowego, 
nr rejestru przedsibiorców KRS 025237

NIP: 526-021-50-88
Wedug stanu na dzie 01.01.2007 r. kapita zakadowy BRE Banku SA (w caoci 
opacony) wynosi 118.064.140 z. W zwizku z realizacj warunkowego 
podwyszenia kapitau zakadowego, na podstawie uchwa XVI WZ z dnia 21.05.2003 
r., kapita zakadowy BRE Banku SA moe ulec podwyszeniu do kwoty 118.760.528 
z. Akcje w podwyszonym kapitale zakadowym bd w caoci opacone.

--
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: Shared ICP between 2 SYSPLEXES

2007-05-16 Thread Bielskie, Stephen
Do you mean CFP (ICP are Internal Coupling Peer, which have no physical 
connection and are limited to within a single CEC)?

I believe the limitation is only that there can be only on CF accessed on each 
end of the CFP.

Washington Systems Center published zSeries Peer Mode Links whitepaper in 
September of 2002.  It should be available at the IBM pubs website.  If you can 
not find it, email me and I will send you a copy.

Regards,
Steve

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Cwi 
Jeret
Sent: Wednesday, May 16, 2007 5:25 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Shared ICP between 2 SYSPLEXES

Hello,
I have the following question :

We have the following configuration :

2 CPC's , on each one 2 LPARS,  one CF and One MEMBER of SYSPLEX1.
both CF's are connected to the members of the sysplex of the other CPC with  a 
pair of  ICP connections .

  CPC1   CPC2
++ ++
||   icp   ||
| PLEX1a |--+  +---| PLEX1b |
||  |  |   ||
||  |  |   ||
++  |  |   ++
||  +--|---||
|  CF1   |-+  icp  |  CF2   |
++ ++
|| ||
|| ||
|| ||
|| ||
++ ++
|| ||
|| ||
++ ++

My question is :

Is it possible to add a second SYSPLEX, sharing the same physical ICP 
connections like sharing CTC connections between LPARs , like this:

  CPC1   CPC2
++ ++
||   icp   ||
| PLEX1a |--+  +---| PLEX1b |
||  |  |   ||
||  |  |   ||
++  |  |   ++
||  +--|---||
|  CF1   |-+  icp  |  CF2   |
++ ++
|| ||
| PLEX2a | | PLEX2b |
|| ||
|| ||
++ ++
|| ||
|  CF3   | |  CF4   |
++ ++

If the answer is positive, where can I find documentation describing the 
definitions for it .

Cwi jeret,  Bank Hapoalim  T.A.

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

==
Please access the attached hyperlink for an important electronic communications 
disclaimer: 

http://www.credit-suisse.com/legal/en/disclaimer_email_ib.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: Shared ICP between 2 SYSPLEXES

2007-05-16 Thread Field, Alan C.
I think you can - we have z9EC machines with ICB-4 links that can be
shared, though we don't.

In HCD define the icp as SHR and assign it to the appropriate LPAR(s). I
would hope HCD wouldn't let you define an illegal configuration.  

I expect documentation will be found in the HCD manuals. 

Alan 



-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Cwi Jeret
Sent: Wednesday, May 16, 2007 04:25
To: IBM-MAIN@BAMA.UA.EDU
Subject: Shared ICP between 2 SYSPLEXES

Hello,
I have the following question :

We have the following configuration :

2 CPC's , on each one 2 LPARS,  one CF and One MEMBER of SYSPLEX1.
both CF's are connected to the members of the sysplex of the
other CPC with  a pair of  ICP connections .

  CPC1   CPC2
++ ++
||   icp   ||
| PLEX1a |--+  +---| PLEX1b |
||  |  |   ||
||  |  |   ||
++  |  |   ++
||  +--|---||
|  CF1   |-+  icp  |  CF2   |
++ ++
|| ||
|| ||
|| ||
|| ||
++ ++
|| ||
|| ||
++ ++

My question is :

Is it possible to add a second SYSPLEX, sharing the same physical ICP
connections like sharing CTC connections between LPARs , like this:

  CPC1   CPC2
++ ++
||   icp   ||
| PLEX1a |--+  +---| PLEX1b |
||  |  |   ||
||  |  |   ||
++  |  |   ++
||  +--|---||
|  CF1   |-+  icp  |  CF2   |
++ ++
|| ||
| PLEX2a | | PLEX2b |
|| ||
|| ||
++ ++
|| ||
|  CF3   | |  CF4   |
++ ++

If the answer is positive, where can I find documentation
describing the definitions for it .

Cwi jeret,  Bank Hapoalim  T.A.

--
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: Data Areas Manuals to be dropped

2007-05-16 Thread Rick Fochtman

Mark Baron wrote:

Of course, reading the softcopy manuals has become very difficult as well. 
Library Reader is no longer available (unless, of course you happen to have

a very old library distribution - probably prior to 2001 or 2002 - laying
around).  Softcopy Reader doesn't work properly, or at all, under Windows
Vista.  I opened an ETR to ask about this a couple of months ago and
basically IBM's response was that SCR is not Vista ready but since it's a
free product and they will get an update when they get to an update.  If we
can believe Bill Gates last pronouncement that Microsoft has already sold
more than 40 million copies of Vista, then IBM really ought to get a Vista
ready SCR out to its customers.

Fortunately, the last version of Library Reader still basically works under
Vista the although some functions (particularly the mouse scroll wheel) no
longer function.  If anyone on the list needs a copy, reply to me offline
and I'll send you a .zip file with it.
 



That's one of those things that I burned onto a CD-ROM, so I have a 
permanent copy that I can re-install as needed. :-) I've NEVER been able 
to get SCR to work.


--
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: Duplicate CTC addresses

2007-05-16 Thread Rick Fochtman

-snip--

Hi to all. Does anybody know if it is possible to define duplicate ctc addresses 
to a DR LPAR? 
I have two processors and can define duplicate LPARs to each of them, so 
that each CPC has LPARS A to E defined to it. CPC 1 has LPARS A and B 
running normally on it and CPC 2 has LPARs C D and E. IF I have a problem 
with CPC 1, I would like to IPL LPARs A and B on CPC2, but without having to 
change my VTAM definitions to match the new range of CTC addresses. Could 
I generate the same CTC addresses from C,D,E to A nd B regardless of which 
CPC the LPAR is running on? Maybe the LPARS A and B could be detached from 
CPC 2 in the normal gen, but in the event of a problem, would I be able to 
dynamically detach LPARs A and B from CPC 1 and attach them to CPC2 so 
that the same CTC addresses would be valid?
Assume there is enough memory and processing power to handle all LPARs on 
any CPC.

Otherwise is there any other method of handling this problem?


unsnip-
If you'll contact me offlist, I'll try and help you untangle this issue.

Dealing with CTC's can be a PITA or it can be fairly easy, depending on 
needs, equipment and software requirements. I would probably define the 
complete range of CTC addresses on both CPC's, varying them offline or 
online as needed when each image is IPL'd. I like to define CTC devices 
in full strings of 32 devices for each image, then dedicate a string to 
each image. So Image A would be contected via 1CAx and 1CBx, Image B 
would be contacted via 1CCx and 1CDx, etc. or you might use only 16 
devices, so that Image A would be contacted via 1CAx, Image B would be 
contacted via 1CBx, etc., using the third character of the address as a 
image identifier. Just my thoughts, for what they're worth.


--
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: How to reload SSL certificate for z/OS TN3270 server

2007-05-16 Thread Alan Scott
Either way, Subtask of TCPIP or seperate address space, doesn't matter. To 
reload the SSL cert for TN3270 all secureports must be stopped. Can be done 
with OBEYFILE commands, but will disrupt all secure TN3270 connections.

--
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: Report on TSO usage

2007-05-16 Thread Rick Fochtman

--snip---


G'day All,

Am new to this list, sorry if am asking the wrong question here !

Am looking for some kind of report which will pull out the info on TSO
usage on a mainframe. Something which would individually list all the
TSO users who logged on 


and their various resource consumption stats. Please let me know if such
a thing is possible by running some reporting JCLs. We have a mainframe
that is used for

training purposes, and the TSO users are constantly changing. We are
looking at generating resource consumption reports after every training
session.

Thanks

Sridhar K Veena
 


--unsnip--
If you have the PL/1 Optimizer compiler, I can send you a program I have 
that provides some extremely basic statistics from Type-30 SMF records. 
It's pretty raw, since it was designed only to provide data to load into 
a XCEL spreadsheet, but it should provide a reasonable starting point 
for further development. If you E-Mail me offlist, please add the term 
IBM-MAIN in the title, so I don't mistake you message for SPAM.


--
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: Shared ICP between 2 SYSPLEXES

2007-05-16 Thread Paolo Cacciari
Well, I think you can't do that.
on every side of a peer link you can have ONE and only ONE CF. In your
case,
you have to add a second peer link for new sysplex. Otherwise, you have to
rebuild your configuration, using a couple of peer links (no redoundancy)
for both PLEX1a and PLEX1b reusing your second peer couple for new
sysplexes...

Hope this helps.


-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Cwi Jeret
Sent: Wednesday, May 16, 2007 04:25
To: IBM-MAIN@BAMA.UA.EDU
Subject: Shared ICP between 2 SYSPLEXES

Hello,
I have the following question :

We have the following configuration :

2 CPC's , on each one 2 LPARS,  one CF and One MEMBER of SYSPLEX1.
both CF's are connected to the members of the sysplex of the
other CPC with  a pair of  ICP connections .

  CPC1   CPC2
++ ++
||   icp   ||
| PLEX1a |--+  +---| PLEX1b |
||  |  |   ||
||  |  |   ||
++  |  |   ++
||  +--|---||
|  CF1   |-+  icp  |  CF2   |
++ ++
|| ||
|| ||
|| ||
|| ||
++ ++
|| ||
|| ||
++ ++

My question is :

Is it possible to add a second SYSPLEX, sharing the same physical ICP
connections like sharing CTC connections between LPARs , like this:

  CPC1   CPC2
++ ++
||   icp   ||
| PLEX1a |--+  +---| PLEX1b |
||  |  |   ||
||  |  |   ||
++  |  |   ++
||  +--|---||
|  CF1   |-+  icp  |  CF2   |
++ ++
|| ||
| PLEX2a | | PLEX2b |
|| ||
|| ||
++ ++
|| ||
|  CF3   | |  CF4   |
++ ++

If the answer is positive, where can I find documentation
describing the definitions for it .

Cwi jeret,  Bank Hapoalim  T.A.

_
Paolo Cacciari
Business Continuity and Resiliency Services, IBM Global Services - South
Region, EMEA
Via Darwin 85, 20019 Settimo Milanese(MI) – Italy - MISET001
The goal is to be prepared for a disaster not to continually plan for a
successful test
* [EMAIL PROTECTED]
( + 39 051 41.36799   Mobile: + 39 335 6287584
7 + 39 02 596.23288   Fax BO: + 39 02 406052

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

2007-05-16 Thread Mark H. Young
On Wed, 16 May 2007 01:15:08 +0530, Varun Manocha 
[EMAIL PROTECTED] wrote:

Yes, that worked. Thanks! It was driving me crazy...



Can you please send me a copy (offline) of your working REXX code?
THANX.

mhyI

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


Enterprise Class? (Was Virtual tape limits)

2007-05-16 Thread Jeffrey Deaver
This is an enterprise class rack-mount controller

What the heck does enterprise class mean nowadays, anyway?

As I'm looking at virtual tape solutions that involve SATA disk for a MF
solution, I'm being told by certain folks that its not enterprise class.
Why?   Everything in the box is redundant.  Its running RAID 5 or 6.  Its
got hot spares and does auto rebuilds - some will even do predictive
failures.  Sounds pretty robust to me.

Is it just because the drives -might- fail more often and have to be
replaced more often?  Heck, I have a spindle in my 'enterprise class' MF
attached array fail every few months that has to be replaced.  Whats the
difference?  Is it because its smaller?  Its still my most important data,
my 'enterprise' data.   Is it because its cheaper?

So what is the definitive definition of enterprise class?


Jeffrey Deaver, Engineer
Systems Engineering
[EMAIL PROTECTED]
651-665-4231(v)
651-610-7670(p)

--
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: Another migration from the mainframe

2007-05-16 Thread Howard Brazee
On 15 May 2007 14:35:16 -0700, [EMAIL PROTECTED] (McKown, John)
wrote:

1) They'll deny it by creative accounting.
   This happened at one place that I worked when the PC revolution
was new. The individual departments were responsible for their own PC
workstations and software. Therefore the saving for the old 3270
devices were accrued to the IT department, showing that using PCs was
more cost effective than 3270s.

Accounting for IS is always a political issue.

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


E-Mail From the Mainframe Question

2007-05-16 Thread Robert Pelletier
I have been asked to have the frame send e-mail to a specific address
for encryption and then the server would send it out. Would anyone know
where the address is specified on the frame side? Thanks in advance. We
use the XMITIP utility under TSO to send the mail. 


Have a Nice Day !
 
Bob Pelletier
Connecticut Student Loan Foundation
Rocky Hill, Ct.

--
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: How to reload SSL certificate for z/OS TN3270 server

2007-05-16 Thread Chris Mason

Wayne

How time flies! It seems only yesterday I was reflecting on the novelty of 
actually having the TN3270 server function running as an external client 
as is the relationship of all the other server - and indeed *real* client - 
functions associated with TCP/IP for MVS - as I first knew it - to the main 
address space. Actually it seems only the day before yesterday I was 
wrestling with this novel networking software, its peculiar ways and its 
cavalier approach to terminology when the same component was sometimes a 
server and sometimes a client, whether internal or external.


Chris Mason

- Original Message - 
From: Wayne Driscoll [EMAIL PROTECTED]

Newsgroups: bit.listserv.ibm-main
To: IBM-MAIN@BAMA.UA.EDU
Sent: Wednesday, May 16, 2007 1:02 PM
Subject: Re: How to reload SSL certificate for z/OS TN3270 server



Chris,
All true, except, encouragement should be replaced by long term
requirement as z/OS 1.8 is the last version of CS that supports the
TN3270 running as a subtask of the TCPIP stack.  The sooner you get to
running the TN3270 in a separate address space, the sooner you eliminate
a migration task.
Wayne Driscoll
Product Developer
JME Software LLC
[EMAIL PROTECTED]
Phone: (630) 663-0719
Mobile: (630) 247-1632

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Chris Mason
Sent: Tuesday, May 15, 2007 11:08 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: How to reload SSL certificate for z/OS TN3270 server

Tom

The encouragement today is to split the internal client, namely the
TN3270 server function, from the main CS IP address space and run it in
its own address space. Thus recycling the TN3270 server is not
necessarily going to involve recycling the whole of CS IP. Perhaps the
need sometimes to recycle the TN3270 server is one of the reasons why
the split is encouraged.

Chris Mason 


--
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: Shared ICP between 2 SYSPLEXES

2007-05-16 Thread Neubert, Kevin (DIS)
If you have peer mode capable links you could certainly do what you
propose, but it would not be adhering to high availability connectivity
design.  It really depends on you comfort level, your CF structures, if
you're exploiting system-managed CF structure duplexing, etc., but you
might be able to achieve higher availability with just a third link
containing one CF from each sysplex.

Regards,

Kevin

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Cwi Jeret
Sent: Wednesday, May 16, 2007 2:25 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Shared ICP between 2 SYSPLEXES

Hello,
I have the following question :

We have the following configuration :

2 CPC's , on each one 2 LPARS,  one CF and One MEMBER of SYSPLEX1.
both CF's are connected to the members of the sysplex of the
other CPC with  a pair of  ICP connections .

My question is :

Is it possible to add a second SYSPLEX, sharing the same physical ICP
connections like sharing CTC connections between LPARs , like this:

If the answer is positive, where can I find documentation
describing the definitions for it .

Cwi jeret,  Bank Hapoalim  T.A.

--
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: Duplicate CTC addresses

2007-05-16 Thread Chris Mason

Errol

Is it possible you could use dynamic XCF in place of the current 
channel-to-channel definitions?


In any case you should mention in what sort of VTAM definitions your channel 
addresses appear, TRLEs or CTCA or MPC, in support of the SNA or IP 
components of CS.


Also with something as apparently complicated as this, a diagram or two 
might help.[1]


Note that I'm tackling this at the level of CS/VTAM. I know nothing of any 
hardware tricks that may solve the problem for you - although anyone 
tackling this at the hardware level might appreciate those diagrams.[1]


Chris Mason

[1] Just something simple using a non-proportional font. The last time I was 
given diagrams it needed some software I couldn't find to display them.


- Original Message - 
From: Errol [EMAIL PROTECTED]

Newsgroups: bit.listserv.ibm-main
To: IBM-MAIN@BAMA.UA.EDU
Sent: Wednesday, May 16, 2007 11:30 AM
Subject: Duplicate CTC addresses


Hi to all. Does anybody know if it is possible to define duplicate ctc 
addresses

to a DR LPAR?
I have two processors and can define duplicate LPARs to each of them, so
that each CPC has LPARS A to E defined to it. CPC 1 has LPARS A and B
running normally on it and CPC 2 has LPARs C D and E. IF I have a problem
with CPC 1, I would like to IPL LPARs A and B on CPC2, but without having 
to

change my VTAM definitions to match the new range of CTC addresses. Could
I generate the same CTC addresses from C,D,E to A nd B regardless of which
CPC the LPAR is running on? Maybe the LPARS A and B could be detached from
CPC 2 in the normal gen, but in the event of a problem, would I be able to
dynamically detach LPARs A and B from CPC 1 and attach them to CPC2 so
that the same CTC addresses would be valid?
Assume there is enough memory and processing power to handle all LPARs on
any CPC.
Otherwise is there any other method of handling this problem? 


--
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: LOADxx PARMLIB statement, can dsname include SYSR1 symbol?

2007-05-16 Thread Jakubek, Jan
In case others would have a similar interest, I did an experiment.
This is unsupported:

Case 1:
---

PARMLIB  SYS1.PARMLIB.SYSR1

At IPL we get:

IGGN307I sysr1,SYS1.PARMLIB.SYSR1,DATA SET NOT FOUND ON VOLUME
IEA345A SYS1.PARMLIB.SYSR1 NOT USED (NOT CATALOGED) - PRESS ENTER TO
CONTINUE 

Case 2:
---

Tried to cheat, defined ALIAS:

DEFINE ALIAS( NAME(SYS1.PARMLIB.SYSR1) - 
   SYMBOLICRELATE(SYS1.PARMLIB.SYSR1))  

PARMLIB  SYS1.PARMLIB.SYSR1

At IPL we get:

IGGN307I sysr1,SYS1.PARMLIB.SYSR1,DATA SET NOT FOUND ON VOLUME
IEA345A SYS1.PARMLIB.SYSR1 NOT USED (NOT CATALOGED) - PRESS ENTER TO
CONTINUE

Needless to say, I am disappointed...

--
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: E-Mail From the Mainframe Question

2007-05-16 Thread Barkow, Eileen
Each site may have different requirements for the control statements to
send email i think that XMITIP was different.
But i have been using just IKJEFT01 to send email like this:
The email address to send to goes in the RCPT TO: fields


SYSTSIN DD *
TRANSMIT NODENAME.SMTPSRV DD(SYSIN) SEQ NOLOG NONO

SYSIN DD *
HELO NODENAME
MAIL FROM: [EMAIL PROTECTED]
RCPT TO: [EMAIL PROTECTED]
RCPT TO: [EMAIL PROTECTED]
RCPT TO: [EMAIL PROTECTED]
data
SUBJECT: SUBJECT OF EMAILXXX
XXENDX.
MESSAGE GOES HEREXXX
.
.
quit

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Robert Pelletier
Sent: Wednesday, May 16, 2007 11:02 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: E-Mail From the Mainframe Question

I have been asked to have the frame send e-mail to a specific address
for encryption and then the server would send it out. Would anyone know
where the address is specified on the frame side? Thanks in advance. We
use the XMITIP utility under TSO to send the mail. 


Have a Nice Day !
 
Bob Pelletier
Connecticut Student Loan Foundation
Rocky Hill, Ct.

--
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: LOADxx PARMLIB statement, can dsname include SYSR1 symbol?

2007-05-16 Thread Lizette Koehler
I only have a minor question to ask.

Is SYSR1 in your IEASYM  member for that system at IPL time?  It almost looks 
like SYSR1 is not resolving and I am not sure that is a default IBM symbolic.  
Though I could be wrong.  So this is just a question.

Lizette
In case others would have a similar interest, I did an experiment.
This is unsupported:

Case 1:
---

PARMLIB  SYS1.PARMLIB.SYSR1

At IPL we get:

IGGN307I sysr1,SYS1.PARMLIB.SYSR1,DATA SET NOT FOUND ON VOLUME
IEA345A SYS1.PARMLIB.SYSR1 NOT USED (NOT CATALOGED) - PRESS ENTER TO
CONTINUE 

Case 2:
---

Tried to cheat, defined ALIAS:

DEFINE ALIAS( NAME(SYS1.PARMLIB.SYSR1) - 
   SYMBOLICRELATE(SYS1.PARMLIB.SYSR1))  

PARMLIB  SYS1.PARMLIB.SYSR1

At IPL we get:

IGGN307I sysr1,SYS1.PARMLIB.SYSR1,DATA SET NOT FOUND ON VOLUME
IEA345A SYS1.PARMLIB.SYSR1 NOT USED (NOT CATALOGED) - PRESS ENTER TO
CONTINUE


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


How do I find the SPANNED indicator in a VB record?

2007-05-16 Thread Robert Bardos
Folks,

quick question (since I'm chasing/trying to recover severe
production problems in parallel): how do I find the spanned
indicator in a VB record?

Background: had a program abend which processes IMS log records.
CA support very aptly pointed to a statement in the code where
there was a check for spanned records. Suggestion was to bypass
the check (quote: IMS log records should never be spanned anyway).
Suggestion worked - so thanks CA support! Possible suspect now is
a customer exit which probably inserts records having the spanned
indicator on. I'd like to verify this and as I'm basically
assembler illiterate I'd really appreciate it if anybody could
give me a clue where to look for this 'spanned indicator'. Some
nice DFSORT/ICETOOL solution maybe?

Thanks a ton

Robert Bardos
Ansys AG, Zurich, Switzerland

--
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: E-Mail From the Mainframe Question

2007-05-16 Thread Lionel B Dyck
Robert - XMITIP by default sends all outgoing mail to the JES2 spool and 
then the z/OS SMTP server picks it up and sends it out to its destination. 
 z/OS SMTP can be configured to route all outgoing mail to an in house 
SMTP server running Sendmail or one of the other mail handling programs 
which will then further process the e-mail and route it to its 
destination.

You should check with your corporate e-mail support team on this as they 
should be able to give you guideance on where to send the z/OS SMTP 
e-mail. The z/OS TCPIP SMTP configuration file is where you'd make those 
changes. You probably already have your z/OS mail going to an in house 
server as few companies allow their mainframe to connect directly to the 
public internet.

Good luck

Lionel B. Dyck, Consultant/Specialist 
Enterprise Platform Services, Mainframe Engineering 
KP-IT Enterprise Engineering, Client and Platform Engineering Services 
(CAPES) 
925-926-5332 (8-473-5332) | E-Mail: [EMAIL PROTECTED] 
AIM: lbdyck | Yahoo IM: lbdyck 
Kaiser Service Credo: Our cause is health. Our passion is service. We?re 
here to make lives better.? 

?Never attribute to malice what can be caused by miscommunication.? 

NOTICE TO RECIPIENT: If you are not the intended recipient of this e-mail, 
you are prohibited from sharing, copying, or otherwise using or disclosing 
its contents. If you have received this e-mail in error, please notify the 
sender immediately by reply e-mail and permanently delete this e-mail and 
any attachments without reading, forwarding or saving them. Thank you. 

--
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: How do I find the SPANNED indicator in a VB record?

2007-05-16 Thread Jim McAlpine

IIRC it's in the first byte after the 2 byte length field in the RDW. See
below -

00   -   complete logical record
01   -   first segment of multi segment record
10   -   last segment of multi segment record
11   -   segment other than the first or last.

Jim McAlpine


On 5/16/07, Robert Bardos [EMAIL PROTECTED] wrote:


Folks,

quick question (since I'm chasing/trying to recover severe
production problems in parallel): how do I find the spanned
indicator in a VB record?

Background: had a program abend which processes IMS log records.
CA support very aptly pointed to a statement in the code where
there was a check for spanned records. Suggestion was to bypass
the check (quote: IMS log records should never be spanned anyway).
Suggestion worked - so thanks CA support! Possible suspect now is
a customer exit which probably inserts records having the spanned
indicator on. I'd like to verify this and as I'm basically
assembler illiterate I'd really appreciate it if anybody could
give me a clue where to look for this 'spanned indicator'. Some
nice DFSORT/ICETOOL solution maybe?

Thanks a ton

Robert Bardos
Ansys AG, Zurich, Switzerland

--
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: E-Mail From the Mainframe Question

2007-05-16 Thread Robert Pelletier
Thanks very much.  


 
Bob Pelletier
Connecticut Student Loan Foundation
Rocky Hill, Ct.

-Original Message-
From: Lionel B Dyck [mailto:[EMAIL PROTECTED] 
Sent: Wednesday, May 16, 2007 11:52 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: E-Mail From the Mainframe Question

Robert - XMITIP by default sends all outgoing mail to the JES2 spool and
then the z/OS SMTP server picks it up and sends it out to its
destination. 
 z/OS SMTP can be configured to route all outgoing mail to an in house
SMTP server running Sendmail or one of the other mail handling programs
which will then further process the e-mail and route it to its
destination.

You should check with your corporate e-mail support team on this as they
should be able to give you guideance on where to send the z/OS SMTP
e-mail. The z/OS TCPIP SMTP configuration file is where you'd make those
changes. You probably already have your z/OS mail going to an in house
server as few companies allow their mainframe to connect directly to the
public internet.

Good luck

Lionel B. Dyck, Consultant/Specialist
Enterprise Platform Services, Mainframe Engineering KP-IT Enterprise
Engineering, Client and Platform Engineering Services
(CAPES)
925-926-5332 (8-473-5332) | E-Mail: [EMAIL PROTECTED]
AIM: lbdyck | Yahoo IM: lbdyck
Kaiser Service Credo: Our cause is health. Our passion is service.
We?re here to make lives better.? 

?Never attribute to malice what can be caused by miscommunication.? 

NOTICE TO RECIPIENT: If you are not the intended recipient of this
e-mail, you are prohibited from sharing, copying, or otherwise using or
disclosing its contents. If you have received this e-mail in error,
please notify the sender immediately by reply e-mail and permanently
delete this e-mail and any attachments without reading, forwarding or
saving them. Thank you. 

--
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: E-Mail From the Mainframe Question

2007-05-16 Thread Alan Scott
You need to specify the address of the server you want all of your mail to go 
to in the SMTP configuration file. The parameters to set are;

1. IPMAILERADDRESS - Set the address of the server to recieve all SMTP mail 
here.

2. RESOLVERUSAGE - Set this parameter to NO. This prevents the SMTP 
server on z/OS from resolving the IP address of the recipient thus causing it 
to 
be sent to the server specified in the IPMAILERADDRESS parameter. 

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


Hexadecimal value

2007-05-16 Thread Amlan Prasad
Hi,

I have a requirement to send the Hex value in the file field. For example after 
some caluculation I get a 4-char value whose hex equivalent is X'076DC419'. 
Now I need to pass '076DC419' in a 8-char field to be written in a file. This 
will 
be processed by the other system.
How can I do it in COBOL in Mainframe?

Thanks,
Amlan

--
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: E-Mail From the Mainframe Question

2007-05-16 Thread Robert Pelletier
Thanks again. Group is great. 


Have a Nice Day !
 
Bob Pelletier
Connecticut Student Loan Foundation
Rocky Hill, Ct.

-Original Message-
From: Alan Scott [mailto:[EMAIL PROTECTED] 
Sent: Wednesday, May 16, 2007 11:53 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: E-Mail From the Mainframe Question

You need to specify the address of the server you want all of your mail
to go to in the SMTP configuration file. The parameters to set are;

1. IPMAILERADDRESS - Set the address of the server to recieve all SMTP
mail here.

2. RESOLVERUSAGE - Set this parameter to NO. This prevents the SMTP
server on z/OS from resolving the IP address of the recipient thus
causing it to be sent to the server specified in the IPMAILERADDRESS
parameter. 

--
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: How do I find the SPANNED indicator in a VB record?

2007-05-16 Thread Farley, Peter x23353
You can start here (watch the line-wrap):

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2D430/3.1.3.2?
SHELF=DGT2BK41DT=20040624112123

From that page, the third byte of the RDW for each record is the segment
control byte, only the last two bits of which are significant:

Figure 73. Segment Control Codes   
 
 Binary Code   Relative Position of Segment 
 
 00Complete logical record  
 
 01First segment of a multisegment record   
 
 10Last segment of a multisegment record
 
 11Segment of a multisegment record other than 
   the first or  last segment


You could process the file as RECFM=VB with a JCL override and scan for byte
3 NE x'00'.  Sort should handle this nicely.

Something like this (untested):

SORT FIELDS=COPY
INCLUDE COND=(3,1,NE,X'00')

HTH

Peter

-Original Message-
From: Robert Bardos [mailto:[EMAIL PROTECTED] 
Sent: Wednesday, May 16, 2007 11:42 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: How do I find the SPANNED indicator in a VB record?

Folks,

quick question (since I'm chasing/trying to recover severe
production problems in parallel): how do I find the spanned
indicator in a VB record?

Background: had a program abend which processes IMS log records.
CA support very aptly pointed to a statement in the code where
there was a check for spanned records. Suggestion was to bypass
the check (quote: IMS log records should never be spanned anyway).
Suggestion worked - so thanks CA support! Possible suspect now is
a customer exit which probably inserts records having the spanned
indicator on. I'd like to verify this and as I'm basically
assembler illiterate I'd really appreciate it if anybody could
give me a clue where to look for this 'spanned indicator'. Some
nice DFSORT/ICETOOL solution maybe?

Thanks a ton

Robert Bardos
Ansys AG, Zurich, Switzerland

This message and any attachments are intended only for the use of the addressee 
and
may contain information that is privileged and confidential. If the reader of 
the 
message is not the intended recipient or an authorized representative of the
intended recipient, you are hereby notified that any dissemination of this
communication is strictly prohibited. If you have received this communication in
error, please notify us immediately by e-mail and delete the message and any
attachments from your system.

--
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: How do I find the SPANNED indicator in a VB record?

2007-05-16 Thread Bill Wilkie

Robert:
I could probably dig out the details, but here is the link to what you're 
asking aboutfor VB and VBS:


http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/dgt1d405/3.2.3?SHELF=DT=19990106110554

Bill



From: Robert Bardos [EMAIL PROTECTED]
Reply-To: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU
To: IBM-MAIN@BAMA.UA.EDU
Subject: How do I find the SPANNED indicator in a VB record?
Date: Wed, 16 May 2007 17:41:47 +0200

Folks,

quick question (since I'm chasing/trying to recover severe
production problems in parallel): how do I find the spanned
indicator in a VB record?

Background: had a program abend which processes IMS log records.
CA support very aptly pointed to a statement in the code where
there was a check for spanned records. Suggestion was to bypass
the check (quote: IMS log records should never be spanned anyway).
Suggestion worked - so thanks CA support! Possible suspect now is
a customer exit which probably inserts records having the spanned
indicator on. I'd like to verify this and as I'm basically
assembler illiterate I'd really appreciate it if anybody could
give me a clue where to look for this 'spanned indicator'. Some
nice DFSORT/ICETOOL solution maybe?

Thanks a ton

Robert Bardos
Ansys AG, Zurich, Switzerland

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


_
Make every IM count. Download Messenger and join the i’m Initiative now. 
It’s free. http://im.live.com/messenger/im/home/?source=TAGHM_MAY07


--
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: PSF-PRINTER

2007-05-16 Thread Ron Wells
Anyone here work with OMR
Optical Mark Recognition 

Looking for samples of code...

--
Email Disclaimer
This  E-mail  contains  confidential  information  belonging to the sender, 
which  may be legally privileged information.  This information is intended 
only  for  the use of the individual or entity addressed above.  If you are not 
 the  intended  recipient, or  an  employee  or  agent responsible for 
delivering it to the intended recipient, you are hereby notified that any 
disclosure,  copying, distribution, or the taking of any action in reliance on 
the contents of the E-mail or attached files is strictly prohibited.

--
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: How do I find the SPANNED indicator in a VB record?

2007-05-16 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of Robert Bardos
 Sent: Wednesday, May 16, 2007 10:42 AM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: How do I find the SPANNED indicator in a VB record?
 
 
 Folks,
 
 quick question (since I'm chasing/trying to recover severe
 production problems in parallel): how do I find the spanned
 indicator in a VB record?
 
 Background: had a program abend which processes IMS log records.
 CA support very aptly pointed to a statement in the code where
 there was a check for spanned records. Suggestion was to bypass
 the check (quote: IMS log records should never be spanned anyway).
 Suggestion worked - so thanks CA support! Possible suspect now is
 a customer exit which probably inserts records having the spanned
 indicator on. I'd like to verify this and as I'm basically
 assembler illiterate I'd really appreciate it if anybody could
 give me a clue where to look for this 'spanned indicator'. Some
 nice DFSORT/ICETOOL solution maybe?
 
 Thanks a ton
 
 Robert Bardos
 Ansys AG, Zurich, Switzerland

Read:

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2D450/3.1.
3.2

--
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: Data Areas Manuals to be dropped

2007-05-16 Thread Mark Baron
On Wed, 16 May 2007 08:41:41 -0500, Rick Fochtman [EMAIL PROTECTED] wrote:

Mark Baron wrote:

Of course, reading the softcopy manuals has become very difficult as well.
Library Reader is no longer available (unless, of course you happen to have
a very old library distribution - probably prior to 2001 or 2002 - laying
around).  Softcopy Reader doesn't work properly, or at all, under Windows
Vista.  I opened an ETR to ask about this a couple of months ago and
basically IBM's response was that SCR is not Vista ready but since it's a
free product and they will get an update when they get to an update.  If we
can believe Bill Gates last pronouncement that Microsoft has already sold
more than 40 million copies of Vista, then IBM really ought to get a Vista
ready SCR out to its customers.

Fortunately, the last version of Library Reader still basically works under
Vista the although some functions (particularly the mouse scroll wheel) no
longer function.  If anyone on the list needs a copy, reply to me offline
and I'll send you a .zip file with it.



That's one of those things that I burned onto a CD-ROM, so I have a
permanent copy that I can re-install as needed. :-) I've NEVER been able
to get SCR to work.

Have you tried SCR 3.6 - it's dated late 2006 and I downloaded it this past
Feb for a WinXp machine and it worked first try out of the box.  It's a
large download (more than 64Mb) but it does work for me


--
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: Data Areas Manuals to be dropped

2007-05-16 Thread Walt Farrell

On 5/16/2007 7:56 AM, Mark Baron wrote:
Of course, reading the softcopy manuals has become very difficult as well. 


There's always reading them on the web, assuming you have an Internet 
connection.


Walt

--
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: LOADxx PARMLIB statement, can dsname include SYSR1 symbol?

2007-05-16 Thread Tom Marchant
On Wed, 16 May 2007 11:40:37 -0400, Lizette Koehler wrote:

I only have a minor question to ask.

Is SYSR1 in your IEASYM  member for that system at IPL time?  It almost
looks like SYSR1 is not resolving and I am not sure that is a default IBM
symbolic.  Though I could be wrong.  So this is just a question.

Well, of course it doesn't matter.  At the time the PARMLIB statement in 
LOADxx is being processed, the IEASYMxx member is not yet available.

-- 
Tom Marchant


Lizette

PARMLIB  SYS1.PARMLIB.SYSR1

At IPL we get:

IGGN307I sysr1,SYS1.PARMLIB.SYSR1,DATA SET NOT FOUND ON VOLUME
IEA345A SYS1.PARMLIB.SYSR1 NOT USED (NOT CATALOGED) - PRESS 
ENTER TO
CONTINUE

--
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: Hexadecimal value

2007-05-16 Thread Mark Jacobs

Amlan Prasad wrote:

Hi,

I have a requirement to send the Hex value in the file field. For example after 
some caluculation I get a 4-char value whose hex equivalent is X'076DC419'. 
Now I need to pass '076DC419' in a 8-char field to be written in a file. This will 
be processed by the other system.

How can I do it in COBOL in Mainframe?

Thanks,
Amlan

--
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
  
If I remember correctly (over twenty years ago) if you define a COMP 
field that is eight bytes in length and place the decimal equivalent  to 
the hexadecimal number you want in the field you should be all set.


--
Mark Jacobs
Technical Services
Time Customer Service - Tampa, FL
--

I will accept the rules that you feel necessary to your freedom. I am free, 
no matter what rules surround me. If I find them tolerable, I tolerate them; 
if I find them too obnoxious, I break them. I am free because I know that I 
alone am morally responsible for everything I do.


Robert A. Heinlein - The Moon is a Harsh Mistress (1966)

--
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: How do I find the SPANNED indicator in a VB record?

2007-05-16 Thread Paul Gilmartin
On Wed, 16 May 2007 17:41:47 +0200, Robert Bardos wrote:

quick question (since I'm chasing/trying to recover severe
production problems in parallel): how do I find the spanned
indicator in a VB record?

assembler illiterate I'd really appreciate it if anybody could
give me a clue where to look for this 'spanned indicator'. Some
nice DFSORT/ICETOOL solution maybe?

Start with:

3.1.3.2.2 z/OS V1R7.0 DFSMS Using Data Sets
3.1.3 Variable-Length Record Formats
  3.1.3.1   Format-V Records
  3.1.3.2   Spanned Format-VS Records (Sequential Access Method)
3.1.3.2.2 Segment Descriptor Word

What's your language of choice?  If possible, override to RECFM=U
in the DD statement; read raw data; dump in hex and inspect.

Rexx won't read RECFM=U, so I'd use REPRO to convert to RECFM=V
and try to process that.

(just untested ideas)

In a similar case, I overrode to RECFM=U and used IEBGENER to copy to
an HFS file which I processed with Rexx SYSCALL read.

-- gil

--
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: How do I find the SPANNED indicator in a VB record?

2007-05-16 Thread Paul Gilmartin
On Wed, 16 May 2007 11:56:46 -0400, Farley, Peter x23353 wrote:

You can start here (watch the line-wrap):

 http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2D430/3.1.3.2?SHELF=DGT2BK41DT=20040624112123

(unwrapped?)

You could process the file as RECFM=VB with a JCL override and scan for byte
3 NE x'00'.  Sort should handle this nicely.

Something like this (untested):

SORT FIELDS=COPY
INCLUDE COND=(3,1,NE,X'00')

Will SORT support processing RDWs as data?  (Yah, I know; SORT can do 
everything,
and Frank will probably tell you how.)

-- gil

--
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: Hexadecimal value

2007-05-16 Thread Flint, Mike
Seen many times before:

05  ws-num5 PIC 9(5) COMP-3.   
05  ws-hexvalue2 redefines ws-num5 
PIC X(2).  
05  ws-hex5 PIC 9(5).  
05  ws-display4 redefines ws-hex5  
PIC X(4).  

(place hex code in hexvalue2)
move ws-num5to ws-hex5. 
inspect ws-display4 converting x'FAFBFCFDFEFF' to 'ABCDEF'. 
(output in ws-display4)  

-this is for two bytes obviously, so increase the value(!)

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED]
Behalf Of Amlan Prasad
Sent: 16 May 2007 16:55
To: IBM-MAIN@BAMA.UA.EDU
Subject: Hexadecimal value


Hi,

I have a requirement to send the Hex value in the file field. For example after 
some caluculation I get a 4-char value whose hex equivalent is X'076DC419'. 
Now I need to pass '076DC419' in a 8-char field to be written in a file. This 
will 
be processed by the other system.
How can I do it in COBOL in Mainframe?

Thanks,
Amlan

--
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 has come from Experian, the only business to have been twice named 
the UK's 'Business of the Year’  

===

Information in this e-mail and any attachments is confidential, and may not be 
copied or used by anyone other than the addressee, nor disclosed to any third 
party without our permission. There is no intention to create any legally 
binding contract or other binding commitment through the use of this electronic 
communication unless it is issued in accordance with the Experian Limited 
standard terms and conditions of purchase or other express written agreement 
between Experian Limited and the recipient. 

Although Experian has taken reasonable steps to ensure that this communication 
and any attachments are free from computer virus, you are advised to take your 
own steps to ensure that they are actually virus free.  

Companies Act information:

Registered name: Experian Limited 
Registered office: Talbot House, Talbot Street, Nottingham  NG80 1TH 
Place of registration: England and Wales 
Registered number: 653331

--
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: CLIST question (the ampersands are killing me)

2007-05-16 Thread Paul Gilmartin
On Tue, 15 May 2007 20:51:56 -0300, Shmuel Metz (Seymour J.) wrote:

You can invoke a CMS EXEC or EXEC2 procedure from within CMS EDIT, but
if you invoke EDIT from within an EXEC then it loses control until
EDIT completes. There is no equivalent to DATA and DATA PROMPT.

My recollection differs, though I may well be confusing CMS EXEC with
CLIST.  Regardless, it's now moot: the only hit I get for EDIT * * is:

 EDIT EXEC S2  V 133  Trunc=133 Size=75 Line=0 Col=1 Alt=0

**
*
* @VR5HNKW - Remove call to old EDIT since 370 machines are not
*supported in VM/ESA 1.3.0.
*
*THIS  EXEC  IS   USED  TO   INVOKE  XEDIT   IN   EDIT
*COMPATIBILITY MODE.

But you must accept not receiving status from the stacked commands

Correct. This is one of the few cases where CLIST is superior to REXX.

The only such modal behavior I now know in Rexx is with the new-fangled
(z/OS 1.4) address 'TSO' in Rexx EXECs invoked from a UNIX shell.
But, it proves the concept provided developers were diligent, and at
least one z/OS Unix developer was so diligent.

-- gil

--
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: How do I find the SPANNED indicator in a VB record?

2007-05-16 Thread Frank Yaeger
Peter Farley wrote on 05/16/2007 08:56:46 AM:
 You could process the file as RECFM=VB with a JCL override and scan for
byte
 3 NE x'00'.  Sort should handle this nicely.

 Something like this (untested):

 SORT FIELDS=COPY
 INCLUDE COND=(3,1,NE,X'00')

Well, that would be:

INCLUDE COND=(3,1,BI,NE,X'00')

but it actually won't work because DFSORT assembles the spanned record
into an
unspanned record before it processes the INCLUDE statement.  So the INCLUDE
statement
will see an RDW with the total length in the first and second bytes and
X'00' in the
third byte, rather than an SDW with the partial length in the first and
second bytes
and the segment descriptor in the third byte.

Frank Yaeger - DFSORT Development 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: How do I find the SPANNED indicator in a VB record?

2007-05-16 Thread Farley, Peter x23353
SORT (both DF and SYNC) always did process RDW as data, at least in my times
(1972+).  In fact, I always have to think twice when coding SORT control
statements for RECFM=V input, always need to remember to add +4 to any field
offset to account for RDW.

Peter

-Original Message-
From: Paul Gilmartin [mailto:[EMAIL PROTECTED] 
Sent: Wednesday, May 16, 2007 12:19 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: How do I find the SPANNED indicator in a VB record?

On Wed, 16 May 2007 11:56:46 -0400, Farley, Peter x23353 wrote:
Snipped
Something like this (untested):

SORT FIELDS=COPY
INCLUDE COND=(3,1,NE,X'00')

Will SORT support processing RDWs as data?  (Yah, I know; SORT can do
everything, and Frank will probably tell you how.)

This message and any attachments are intended only for the use of the addressee 
and
may contain information that is privileged and confidential. If the reader of 
the 
message is not the intended recipient or an authorized representative of the
intended recipient, you are hereby notified that any dissemination of this
communication is strictly prohibited. If you have received this communication in
error, please notify us immediately by e-mail and delete the message and any
attachments from your system.

--
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: Hexadecimal value

2007-05-16 Thread Tom Marchant
On Wed, 16 May 2007 10:54:55 -0500, Amlan Prasad wrote:

Hi,

I have a requirement to send the Hex value in the file field. For example after
some caluculation I get a 4-char value whose hex equivalent is X'076DC419'.
Now I need to pass '076DC419' in a 8-char field to be written in a file. This 
will
be processed by the other system.
How can I do it in COBOL in Mainframe?

It's been a long time since I coded COBOL, but you want something like this.


05 PACKED PIC 9(11) COMP-3.
O5 FILLER REFEFINES PACKED.
  10 HEX PIC X(4).
  10 FILLER PIC X.
05 UNPACKED PIC 9(8).

MOVE HEX-VALUE TO HEX.
MOVE PACKED TO UNPACKED.

UNPACKED will now have, in your example, X'F0F7F6FDFCF4F1F9'.  You'll need 
to translate, for example, X'FC' to a 'C'

-- 
Tom Marchant

--
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: LOADxx PARMLIB statement, can dsname include SYSR1 symbol?

2007-05-16 Thread Glenn Miller
Hi Jan,

We have placed the following comments in the bottom of our LOADxx members 
to remind us of the restrictions:

*
* NOTE APAR II11230 (5/27/98)
* ENTRY IN CATALOG FOR CONCATINATED DATA SET(S) (PARMLIB)
* CAN'T HAVE SYMBOLIC(S) E.G. (OSRES ETC.)  


The INFO APAR also has a couple of examples of what does and doesn't work 
with LOADxx and System Symbols.

Glenn Miller

--
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: How do I find the SPANNED indicator in a VB record?

2007-05-16 Thread Farley, Peter x23353
Frank, won't the RDW's be processed for each segment independently if the
SORTIN DD has an override for RECFM=V or VB, bypassing the Spanned
processing?

-Original Message-
From: Frank Yaeger [mailto:[EMAIL PROTECTED] 
Sent: Wednesday, May 16, 2007 12:24 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: How do I find the SPANNED indicator in a VB record?

Peter Farley wrote on 05/16/2007 08:56:46 AM:
 You could process the file as RECFM=VB with a JCL override and scan for
byte
 3 NE x'00'.  Sort should handle this nicely.

 Something like this (untested):

 SORT FIELDS=COPY
 INCLUDE COND=(3,1,NE,X'00')

Well, that would be:

INCLUDE COND=(3,1,BI,NE,X'00')

but it actually won't work because DFSORT assembles the spanned record
into an unspanned record before it processes the INCLUDE statement.  So the
INCLUDE statement will see an RDW with the total length in the first and
second bytes and X'00' in the third byte, rather than an SDW with the
partial length in the first and second bytes and the segment descriptor in
the third byte.

This message and any attachments are intended only for the use of the addressee 
and
may contain information that is privileged and confidential. If the reader of 
the 
message is not the intended recipient or an authorized representative of the
intended recipient, you are hereby notified that any dissemination of this
communication is strictly prohibited. If you have received this communication in
error, please notify us immediately by e-mail and delete the message and any
attachments from your system.

--
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: How do I find the SPANNED indicator in a VB record?

2007-05-16 Thread Jack Kelly
Does buftek=a still combine spanned records? seems like it's documented in 
the 1.7 jcl reference, so it may still be good

Jack Kelly
LA Systems @ US Courts
x 202-502-2390

--
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: How do I find the SPANNED indicator in a VB record?

2007-05-16 Thread Frank Yaeger
gil wrote on 05/16/2007 09:18:42 AM:
 Will SORT support processing RDWs as data?

DFSORT can process an RDW as data, but per my previous note it converts an
SDW to an RDW
before it starts processing.

Frank Yaeger - DFSORT Development 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: Hexadecimal value

2007-05-16 Thread Hardee, Charles H
You can do the following:

05   HEX-DATA.
   10   HEX-NUMERIC PIC S9(9) COMP.
05   HEX-DIGIT  OCCURS 8 TIMES
PIC 9(1) COMP.
05   DIGIT-INDEXPIC S9(04) COMP.
05   HEX-STRING
   10   STRING-CHAR OCCURS 8 TIMES
PIC X(1).
05HEX-CHARS   PIC X(16) VALUE '0123456789ABCDEF'.
05HEX-CHAR  REDEFINES HEX-CHAR
 OCCURS 16 TIMES
 PIC X(1).

* Start by breaking up each nibble into a single value.
MOVE calculated-field to HEX-NUMERIC.
MOVE 8 to DIGIT-INDEX.
PERFORM SINGLE-DIGITS 7 times.
SINGLE-DIGITS.
DIVIDE HEX-NUMERIC BY 2 
 GIVING HEX-NUMERIC
 REMAINDER HEX-DIGIT(DIGIT-INDEX).
SUBTRACT 1 FROM DIGIT-INDEX.
SINGLE-DIGITS-END.
* Now convert each nibble into a hex character.
MOVE 1 to DIGIT-INDEX.
PERFORM TRANSFORM-DIGITS 7 times.
TRANSFORM-DIGITS.
ADD 1 TO HEX-DIGIT(DIGIT-INDEX)
GIVING HEX-NUMERIC.
MOVE HEX-CHAR(HEX-NUMERIC) TO STRING-CHAR(DIGIT-INDEX).
ADD 1 TO DIGIT-INDEX.
TRANSFORM-DIGITS-END.
* Now put it where ever it needs to go.
MOVE HEX-STRING TO whereeveryouwantittogo.

Chuck


-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Amlan Prasad
Sent: Wednesday, May 16, 2007 10:55 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Hexadecimal value

Hi,

I have a requirement to send the Hex value in the file field. For
example after 
some caluculation I get a 4-char value whose hex equivalent is
X'076DC419'. 
Now I need to pass '076DC419' in a 8-char field to be written in a file.
This will 
be processed by the other system.
How can I do it in COBOL in Mainframe?

Thanks,
Amlan

--
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: How do I find the SPANNED indicator in a VB record?

2007-05-16 Thread Robert Bardos
Thanks guys,

appreciate your superfast replies. As such this thread is closed.
I just go on mumbling a bit. The whole story has potential to
drive me crazy. While a few hours ago I could reliably reproduce a
S0C9 having a certain IMS SLDS (secondary log data set) as input
dataset, now that you have  all answered my question the symptom
evaporated wisteriously. Strange. I still do have all the versions
of the load library involved. I still have the S0C9ing JCL in the
JES spool (so I can recover the exact JCL), yet whatever I try I
get a clean execution. I use the same datasets, even the same
concatenation of them although the job had always bombed as soon
as the very first input tape was mounted.

Thought I wait a bit before saying Thank you as you all gave the
thread an interesting twist.

Robert



 -Ursprüngliche Nachricht-
 Auftrag von Jim McAlpine
 Betreff: Re: How do I find the SPANNED indicator in a VB record?


 IIRC it's in the first byte after the 2 byte length
 field in the RDW. See below -

 00   -   complete logical record
 01   -   first segment of multi segment record
 10   -   last segment of multi segment record
 11   -   segment other than the first or last.

 Jim McAlpine


--
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: LOADxx PARMLIB statement, can dsname include SYSR1 symbol?

2007-05-16 Thread Jakubek, Jan
On Wed, 16 May 2007 11:40:37 -0400, Lizette Koehler wrote:

I only have a minor question to ask.

Is SYSR1 in your IEASYM  member for that system at IPL time?  It 
almost looks like SYSR1 is not resolving and I am not sure that is a 
default IBM symbolic.  Though I could be wrong.  So this is just a
question.

Tom Marchant
Well, of course it doesn't matter.  At the time the PARMLIB statement
in LOADxx is being processed, the IEASYMxx member is not yet available.

SYSR1 is defined implicitly/ by default, and its value is known at
LOADxx processing time, it is even used, but only to interpret the
VOLSER field of PARMLIB statement (as well as to resolve VOLSER of any
catalogued PARMLIBs). So it seems to be feasible implement such a
Feature, however it is unsupported at z/OS 1.7 level. 
If this gets noticed, and considered - it can/ may get done :-)

Janek J.

--
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: How do I find the SPANNED indicator in a VB record?

2007-05-16 Thread Paul Gilmartin
On Wed, 16 May 2007 09:24:13 -0700, Frank Yaeger wrote:

Well, that would be:

INCLUDE COND=(3,1,BI,NE,X'00')

but it actually won't work because DFSORT assembles the spanned record into 
an
unspanned record before it processes the INCLUDE statement.  So the INCLUDE 
statement
will see an RDW with the total length in the first and second bytes and X'00' 
in the
third byte, rather than an SDW with the partial length in the first and second 
bytes
and the segment descriptor in the third byte.

Ummm.  How, then, does it deal with logical records longer than 32767 (65535?)
bytes, supported in JCL by LRECL=X?

-- gil

--
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: How do I find the SPANNED indicator in a VB record?

2007-05-16 Thread Frank Yaeger
Peter Farley wrote on 05/16/2007 09:32:35 AM:
 Frank, won't the RDW's be processed for each segment independently if the
 SORTIN DD has an override for RECFM=V or VB, bypassing the Spanned
 processing?

Well, I couldn't make it do that.

I set up an input data set with RECFM=VBS,LRECL=60,BLKSIZE=40
and gave it 60 byte records so they would be spanned.  I used that
data set as SORTIN for a step with:

  INCLUDE COND=(3,1,BI,NE,X'00')

None of the records were included which is what I would expect
given that DFSORT assembles the spanned records to unspanned
records before the INCLUDE is processed.

Then I tried specifying RECFM=V on the SORTIN DD as you suggested.
DFSORT treated the input data set as RECFM=VS.  With RECFM=VB,
I got RECFM=VBS. So trying to fool DFSORT that way doesn't work.

I really don't think there's any way to get DFSORT's INCLUDE to look
at the SDW directly - it sets up an RDW internally.

Frank Yaeger - DFSORT Development 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: How do I find the SPANNED indicator in a VB record?

2007-05-16 Thread Paul Gilmartin
On Wed, 16 May 2007 12:32:35 -0400, Farley, Peter x23353 wrote:

Frank, won't the RDW's be processed for each segment independently if the
SORTIN DD has an override for RECFM=V or VB, bypassing the Spanned
processing?

Depends on the processing.  Technically, this should be reported as a
data error.  But once when I was writing a library routine to process
variable [spanned] records as a stream, I ignored the DCB spanned flag
(DCBRECSB?  IIRC) and always processed according to the flags in
the SDW.  (But I was conscientious enough to report an error if the
sum of the RDWs exceeded the BDW or the BDW exceeded BLKSIZE).

--gil

--
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: How do I find the SPANNED indicator in a VB record?

2007-05-16 Thread Frank Yaeger
gil wrote on 05/16/2007 10:11:27 AM:
 Ummm.  How, then, does it deal with logical records longer than 32767
(65535?)
 bytes, supported in JCL by LRECL=X?

DFSORT doesn't support that.

Frank Yaeger - DFSORT Development 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: How do I find the SPANNED indicator in a VB record?

2007-05-16 Thread Ed Finnell
 
In a message dated 5/16/2007 11:59:58 A.M. Central Daylight Time,  
[EMAIL PROTECTED] writes:

Thought  I wait a bit before saying Thank you as you all gave the
thread an  interesting twist.




Guess I'd run EREP and see if you're getting any hits against the tape  
drives either TEMP or PERM. Maybe with the shift change the heads were  cleaned?



** See what's free 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


Re: How do I find the SPANNED indicator in a VB record?

2007-05-16 Thread Robert Bardos
Ed Finnell replied to my mention of the drastical change (i.e.
disappearance) of the problem:


 
 Guess I'd run EREP and see if you're getting any hits
 against the tape
 drives either TEMP or PERM. Maybe with the shift change
 the heads were  cleaned?



Thanks Ed,

I was also speculating about possible reasons. Alas I'm no sysprog
(in my case: sysadmin) any longer, so I am not supposed to use
such tools at the place where I'm doing long distance contracting.
Actually I don't think there was anything like a shift change as
my first failing attempts were in mid afternoon central european
time whereas the last non-failing ones were towards 6:30 pm.
Furthermore I think - I don't even know - these are all VTS like
units/volumes. I just think they are, judging from the drastically
reduced mount times in the first few minutes after they had
recently been mounted.

Robert

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


Payback on zIIPs

2007-05-16 Thread Chase, John
Hi, All,

Looking for (pointers to) real-world data on software license cost
savings attributable to zIIP processors:  Percentage reduction in
chargeable MSUs or VWLC dollar costs, and specific types of workloads
that qualified for execution on the zIIP.  Currently running z/OS 1.7
and getting ready to upgrade to DB2 v8, with z/OS 1.9 on the plate for
early next year.  z9-EC and z9-BC in parallel sysplex.

TIA,

-jc-

--
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: How do I find the SPANNED indicator in a VB record?

2007-05-16 Thread Jon Brock
Since when does Visual Basic use spanned records?




Do I lose my list membership for this?

Jon

--
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: How do I find the SPANNED indicator in a VB record?

2007-05-16 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of Jon Brock
 Sent: Wednesday, May 16, 2007 1:21 PM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: Re: How do I find the SPANNED indicator in a VB record?
 
 Since when does Visual Basic use spanned records?
 
 Do I lose my list membership for this?
 
 Jon

No, but Darren may just set you NOPOST grin.

--
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: RMM web service web server(s)

2007-05-16 Thread Mike Wood
Radoslaw, Yes, the book is correct; the web service for DFSMSrmm is shipped 
as a Enterprise ARchive for deployment under WAS. It requires a Java run-time 
and the WAS environment to get to the web service.  We ship a sample client 
that makes it real easy to demonstrate...  But yes, assumption is you 
already have a WAS environment.  That is all we tested.  I would not expect 
anyone to purchase WAS for the sole purpose of hosting our web service.

We understand the requirement for something that would work with a non-
WAS environment and know that it is quite straightforward (for those with the 
knowledge and RAD skills) to use the code we ship and adapt it to create a 
Web ARchive instead that can be deployed for example under Tomcat.

An HTTP server is required, but is not enough to handle web services. 

Just out of interest, do you have ideas about how/where you would use the 
web service ?

Mike WoodRMM Development
On Tue, 15 May 2007 20:59:36 +0200, R.S. 
[EMAIL PROTECTED] wrote:

I just read RMM IC Guide. It says: go to the administrative console of
your z/OS WebSphere Application Server.

Q: Does it require WAS *or* HTTP Server ?

Background is quite obvious IMHO: HTTP is no-cost feature of the system,
while WAS is fee based.

--
Radoslaw Skorupka

--
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: Payback on zIIPs

2007-05-16 Thread Richards.Bob
John,

A tool is not available yet that can do this automagically. My
performance folks have indicated that, from Day 1 in our environment,
they offloaded over 300 MIPS and 200 MIPS of zIIP-eligible work was
still running on GP processors.  Needless to say, we installed another
zIIP per CEC. I have ballparked the $$$ value of that 500 MIPS not
participating in the *peak* simultaneous four hour rolling average, but
hestitate to proffer a percentage figure off of one month's experience.
Initial high profile zIIP consumer in my environment is PeopleSoft DRDA
work. 

Bob Richards 

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Chase, John
Sent: Wednesday, May 16, 2007 2:13 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Payback on zIIPs

Hi, All,

Looking for (pointers to) real-world data on software license cost
savings attributable to zIIP processors:  Percentage reduction in
chargeable MSUs or VWLC dollar costs, and specific types of workloads
that qualified for execution on the zIIP.  Currently running z/OS 1.7
and getting ready to upgrade to DB2 v8, with z/OS 1.9 on the plate for
early next year.  z9-EC and z9-BC in parallel sysplex.

TIA,

-jc-

--
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 
  
  
  
LEGAL DISCLAIMER 
The information transmitted is intended solely for the individual or entity to 
which it is addressed and may contain confidential and/or privileged material. 
Any review, retransmission, dissemination or other use of or taking action in 
reliance upon this information by persons or entities other than the intended 
recipient is prohibited. If you have received this email in error please 
contact the sender and delete the material from any computer. 
  
SunTrust and Seeing beyond money are federally registered service marks of 
SunTrust Banks, Inc. 
[ST:XCL] 
 
 
 
 

--
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: How do I find the SPANNED indicator in a VB record?

2007-05-16 Thread Ed Finnell
 
In a message dated 5/16/2007 12:53:18 P.M. Central Daylight Time,  
[EMAIL PROTECTED] writes:

units/volumes. I just think they are, judging from the  drastically
reduced mount times in the first few minutes after they  had
recently been mounted.




 
Even if it's a VTS should get sense data cut or logged. Could be hardware,  
could be interface card, could be uCode levels. If it's a production outage,  
somebody's gonna ask 'What will prevent this from  reoccurring?'



** See what's free 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


Re: Enterprise Class? (Was Virtual tape limits)

2007-05-16 Thread Bruno Sugliani
On Wed, 16 May 2007 09:46:10 -0500, Jeffrey Deaver
[EMAIL PROTECTED] wrote:

This is an enterprise class rack-mount controller

What the heck does enterprise class mean nowadays, anyway?

As I'm looking at virtual tape solutions that involve SATA disk for a MF
solution, I'm being told by certain folks that its not enterprise class.
Why?   Everything in the box is redundant.  Its running RAID 5 or 6.  Its
got hot spares and does auto rebuilds - some will even do predictive
failures.  Sounds pretty robust to me.

Is it just because the drives -might- fail more often and have to be
replaced more often?  Heck, I have a spindle in my 'enterprise class' MF
attached array fail every few months that has to be replaced.  Whats the
difference?  Is it because its smaller?  Its still my most important data,
my 'enterprise' data.   Is it because its cheaper?

So what is the definitive definition of enterprise class?

I don't really know  , however i can say that when you use SATA disks , they 
are generally a lot bigger than NON-SATA ones . 
Without using the word enterprise class , you will realise that the time
needed for rebuild is a lot longer than with smaller volumes and was
sometimes not acceptable to some shops .
This was pointed to me by manufacturers during my bid for SAN and they
provided me with numbers ( time needed for the loss of a 500 SATA 
compared to a 145 GB FC  
Bruno
Bruno(dot)sugliani(at)groupemornay(dot)asso(dot)fr

--
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: Enterprise Class? (Was Virtual tape limits)

2007-05-16 Thread Ron Hawkins
Jeff,

A lot of the difference comes down to good old RAS. You may want to look up
the old Raid Advisory Board definitions that defined the difference between
fault tolerant and disaster tolerant.

Ron

 -Original Message-
 From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
 Behalf Of Jeffrey Deaver
 Sent: Wednesday, 16 May 2007 10:46 PM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: Enterprise Class? (Was Virtual tape limits)
 
 This is an enterprise class rack-mount controller
 
 What the heck does enterprise class mean nowadays, anyway?
 
 As I'm looking at virtual tape solutions that involve SATA disk for a MF
 solution, I'm being told by certain folks that its not enterprise class.
 Why?   Everything in the box is redundant.  Its running RAID 5 or 6.  Its
 got hot spares and does auto rebuilds - some will even do predictive
 failures.  Sounds pretty robust to me.
 
 Is it just because the drives -might- fail more often and have to be
 replaced more often?  Heck, I have a spindle in my 'enterprise class' MF
 attached array fail every few months that has to be replaced.  Whats the
 difference?  Is it because its smaller?  Its still my most important data,
 my 'enterprise' data.   Is it because its cheaper?
 
 So what is the definitive definition of enterprise class?
 
 
 Jeffrey Deaver, Engineer
 Systems Engineering
 [EMAIL PROTECTED]
 651-665-4231(v)
 651-610-7670(p)
 

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


LRECL of Spanned Records

2007-05-16 Thread Paul Gilmartin
 3 //STEP EXEC  PGM=IEFBR14
 4 //SYSUT1DD   UNIT=SYSALLDA,RECFM=VBS,DSORG=PS,SPACE=(1,1),
   //  LRECL=32767
   //*
  STMT NO. MESSAGE
 -
 4 IEF638I SPECIFIED NUMERIC EXCEEDS MAXIMUM ALLOWED IN THE LRECL 
SUBPARAMETER OF THE DCB FIELD

Why?

-- 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: LRECL of Spanned Records

2007-05-16 Thread Farley, Peter x23353
z/OS 1.6 JCL manual, under LRECL subparameter says:

The value of bytes is: 

1 to 32,760 for non-VSAM data sets.

Peter

-Original Message-
From: Paul Gilmartin [mailto:[EMAIL PROTECTED] 
Sent: Wednesday, May 16, 2007 5:38 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: LRECL of Spanned Records

 3 //STEP EXEC  PGM=IEFBR14
 4 //SYSUT1DD   UNIT=SYSALLDA,RECFM=VBS,DSORG=PS,SPACE=(1,1),
   //  LRECL=32767
   //*
  STMT NO. MESSAGE
 -
 4 IEF638I SPECIFIED NUMERIC EXCEEDS MAXIMUM ALLOWED IN THE LRECL
SUBPARAMETER OF THE DCB FIELD

Why?

-- gil

This message and any attachments are intended only for the use of the addressee 
and
may contain information that is privileged and confidential. If the reader of 
the 
message is not the intended recipient or an authorized representative of the
intended recipient, you are hereby notified that any dissemination of this
communication is strictly prohibited. If you have received this communication in
error, please notify us immediately by e-mail and delete the message and any
attachments from your system.

--
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: LRECL of Spanned Records

2007-05-16 Thread Paul Gilmartin
In a recent note, Farley, Peter x23353 said:

 Date: Wed, 16 May 2007 17:48:25 -0400
 
 z/OS 1.6 JCL manual, under LRECL subparameter says:
 
 The value of bytes is:
 
 1 to 32,760 for non-VSAM data sets.
 
But what is the rationale for that limit?

Anyway, by experiment, that statement is incorrect (or at least
inapplicable).

  4 IEF638I SPECIFIED NUMERIC EXCEEDS MAXIMUM ALLOWED IN THE LRECL
 SUBPARAMETER OF THE DCB FIELD

-- 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: LRECL of Spanned Records

2007-05-16 Thread Bob Rutledge

I think you want LRECL=X.

Bob

Paul Gilmartin wrote:

 3 //STEP EXEC  PGM=IEFBR14
 4 //SYSUT1DD   UNIT=SYSALLDA,RECFM=VBS,DSORG=PS,SPACE=(1,1),
   //  LRECL=32767
   //*
  STMT NO. MESSAGE
 -
 4 IEF638I SPECIFIED NUMERIC EXCEEDS MAXIMUM ALLOWED IN THE LRECL 
SUBPARAMETER OF THE DCB FIELD

Why?

-- gil


--
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: How do I find the SPANNED indicator in a VB record?

2007-05-16 Thread Shane
On Wed, 2007-05-16 at 09:24 -0700, Frank Yaeger wrote:

 Well, that would be:
 
 INCLUDE COND=(3,1,BI,NE,X'00')
 
 but it actually won't work because DFSORT assembles the spanned
 record into an unspanned record before it processes the INCLUDE
 statement.  So the INCLUDE statement will see an RDW with the total
 length in the first and second bytes and X'00' in the third byte,
 rather than an SDW with the partial length in the first and
 second bytes and the segment descriptor in the third byte.

I reckon I needed to get at this data once before - I think a quick E15
solved it for me.
I may have even had an off-list with Frank about this deficiency (my
perception) in DF/SORT wrt handling (real long) spanned records.

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


S01D abend Reason Code CF050311 while importing Dump

2007-05-16 Thread Ankur Batra
Greetings,

I am getting S01D abend Reason Code CF050311 while trying to import a Dump 
in Dumpmaster. The explaination of the reason code says : The new current 
size exceeds the maximum size for the data space and Hiperspace. 
Can you suggest what should be done to correct this?

Thanks in Advance
Ankur Batra

--
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: Enterprise Class? (Was Virtual tape limits)

2007-05-16 Thread Eric Bielefeld
I don't recall every seeing a definition of Enterprise Class, but I
always just assumed from the name that it meant anything that worked
well for a large enterprise.  In my mind, that means reliable, scales
well, and is secure.  I was going to say RAS, which adds Available.
H, sounds like a mainframe!  

I'm sure one could debate the details forever.  If a vendor tries
telling you that their competitor's product is not Enterprise Class, I
would tend to chalk that up to FUD, and the vendor just trying to get
you to buy their product.  

Eric Bielefeld 
Sr. Systems Programmer
Milwaukee, Wisconsin
414-475-7434

 -Original Message-
 Whats the
 difference?  Is it because its smaller?  Its still my most
 important data,
 my 'enterprise' data.   Is it because its cheaper?
 
 So what is the definitive definition of enterprise class?
 
 I don't really know  , however i can say that when you use SATA
 disks , they
 are generally a lot bigger than NON-SATA ones .
 Without using the word enterprise class , you will realise that
 the time
 needed for rebuild is a lot longer than with smaller volumes and was
 sometimes not acceptable to some shops .
 This was pointed to me by manufacturers during my bid for SAN and
 they
 provided me with numbers ( time needed for the loss of a 500 SATA
 compared to a 145 GB FC
 Bruno
 Bruno(dot)sugliani(at)groupemornay(dot)asso(dot)fr

--
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: LRECL of Spanned Records

2007-05-16 Thread GAVIN Darren * OPS EAS
The LRECL is driven by 4 bytes (first two bytes as nulls) inserted in
front of each record to hold the record length as a binary integer.

The 32K limit is driven by the fact this binary integer is considered
Signed; so instead of 0 thru 65535 it's -32767 thru 32768

The last 8 bytes are lost to track marks and block marks reserved space.

Darren


-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Paul Gilmartin
Sent: Wednesday, May 16, 2007 2:55 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: LRECL of Spanned Records

But what is the rationale for that limit?

Anyway, by experiment, that statement is incorrect (or at least
inapplicable).

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

--
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: Top 10 software install gripes

2007-05-16 Thread Pinnacle
- Original Message - 
From: Neal Eckhardt [EMAIL PROTECTED]

Newsgroups: bit.listserv.ibm-main
Sent: Wednesday, May 16, 2007 4:18 PM
Subject: Re: Top 10 software install gripes



On 11 May 2007 12:17:17 -0700, [EMAIL PROTECTED] (Tom
Marchant) wrote:


On Fri, 11 May 2007 11:21:13 -0500, Thomas Conley wrote:

#4 - Directory blocks should ALWAYS be a multiple of 45.  That way I 
won't

get directory out of space the next time you expand your product.


ITYM because a 3390 track will hold 45 directory blocks.  That might or 
moght
not mean that you won't run out of directory space, though.  Certainly, I 
think
a direcrtory should have room to allow for more members or more 
information in

the user data.


My gripe is that there is NO REASON for a vendor to be stingy with
directory blocks. I hate it when the initial install goes OK, then the
first maintenance tape causes me 5 runs because 4 datasets run out of
directory blocks.

You'd think that they were paying for the disk space.



Neal,

THANK YOU  I took so much crap for this one.  Guess you and I are 
the only ones that think running out of directory blocks during maintenance 
because the initial install specified 10 is stupid.


Regards,
Tom Conley 


--
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: Top 10 software install gripes

2007-05-16 Thread Richards.Bob
Tom,

You aren't the only ones, just the vocal ones! LOL

Bob Richards 

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Pinnacle
Sent: Wednesday, May 16, 2007 6:44 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Top 10 software install gripes

- Original Message - 
From: Neal Eckhardt [EMAIL PROTECTED]
Newsgroups: bit.listserv.ibm-main
Sent: Wednesday, May 16, 2007 4:18 PM
Subject: Re: Top 10 software install gripes


 On 11 May 2007 12:17:17 -0700, [EMAIL PROTECTED] (Tom
 Marchant) wrote:

On Fri, 11 May 2007 11:21:13 -0500, Thomas Conley wrote:

#4 - Directory blocks should ALWAYS be a multiple of 45.  That way I 
won't
get directory out of space the next time you expand your product.

ITYM because a 3390 track will hold 45 directory blocks.  That might
or 
moght
not mean that you won't run out of directory space, though.
Certainly, I 
think
a direcrtory should have room to allow for more members or more 
information in
the user data.

 My gripe is that there is NO REASON for a vendor to be stingy with
 directory blocks. I hate it when the initial install goes OK, then the
 first maintenance tape causes me 5 runs because 4 datasets run out of
 directory blocks.

 You'd think that they were paying for the disk space.


Neal,

THANK YOU  I took so much crap for this one.  Guess you and I
are 
the only ones that think running out of directory blocks during
maintenance 
because the initial install specified 10 is stupid.

Regards,
Tom Conley 
  
  
  
LEGAL DISCLAIMER 
The information transmitted is intended solely for the individual or entity to 
which it is addressed and may contain confidential and/or privileged material. 
Any review, retransmission, dissemination or other use of or taking action in 
reliance upon this information by persons or entities other than the intended 
recipient is prohibited. If you have received this email in error please 
contact the sender and delete the material from any computer. 
  
SunTrust and Seeing beyond money are federally registered service marks of 
SunTrust Banks, Inc. 
[ST:XCL] 
 
 
 
 

--
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: How do I find the SPANNED indicator in a VB record?

2007-05-16 Thread Frank Yaeger
Shane wrote on 05/16/2007 03:06:29 PM:
 I reckon I needed to get at this data once before - I think a quick E15
 solved it for me.

That would only work if the E15 read the records itself in some way that
could access the SDWs.  If DFSORT reads the records from SORTIN and passes
them to the E15, they will look like unspanned records (DFSORT assembles
spanned records before passing them to the E15 so they will have RDWs, not
SDWs).

Frank Yaeger - DFSORT Development 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: Top 10 software install gripes

2007-05-16 Thread Kenneth E Tomiak
I am not hard set on filling the track for filling sake. I do it because it 
seems 
orderly. Certainly a vendor should allocate 'stingy' because they are also not 
providing the disk space but they should be considerate and use reasonable 
numbers. We should not be guessing how many more directory blocks they 
need, nor how much larger the secondary should have been.

I'll go back on my earlier post and say 'allocate what you need plus 10%. I 
read someone up that to 20%. The actual % is dependent on the vendor and 
the product. They need to do analysis and then provide good numbers.

If they already fill 43 directory blocks, then using Tom's method they should 
have upped to 90, not 45. I could live with that. If they fill 2 directory 
blocks 
then I do not want to see 90, 45 is still okay by me.


On Wed, 16 May 2007 18:49:21 -0400, Richards.Bob 
[EMAIL PROTECTED] wrote:

Tom,

You aren't the only ones, just the vocal ones! LOL

Bob Richards

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Pinnacle

#4 - Directory blocks should ALWAYS be a multiple of 45.  That way I
won't
get directory out of space the next time you expand your product.


 My gripe is that there is NO REASON for a vendor to be stingy with
 directory blocks. I hate it when the initial install goes OK, then the
 first maintenance tape causes me 5 runs because 4 datasets run out of
 directory blocks.

 You'd think that they were paying for the disk space.


Neal,

THANK YOU  I took so much crap for this one.  Guess you and I
are
the only ones that think running out of directory blocks during
maintenance
because the initial install specified 10 is stupid.

Regards,
Tom Conley



--
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: LRECL of Spanned Records

2007-05-16 Thread Kenneth E Tomiak
VBS 32767 SMF data has annoyed me since I first started working with it.

JCL LRECL is limited to 32760, LRECL=X I never got to work with my COBOL 
program. For pure allocating a dataset to hold SMF data I always used 
DCB=SOME.SMF.ARCHIVE.DSN to carry along the attributes.

In desperation I once write my own COBOL code to read the file RECFM=U and 
unspanned the records myself.

 Bob Rutledge wrote:

I think you want LRECL=X.

Bob

  4 //SYSUT1DD   UNIT=SYSALLDA,RECFM=VBS,DSORG=PS,SPACE=(1,1),
//  LRECL=32767
 -
  4 IEF638I SPECIFIED NUMERIC EXCEEDS MAXIMUM ALLOWED IN THE 
LRECL SUBPARAMETER OF THE DCB FIELD

 Why?

 -- gil


--
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: LRECL of Spanned Records

2007-05-16 Thread Paul Gilmartin
On Wed, 16 May 2007 15:37:16 -0700, GAVIN Darren * OPS EAS wrote:

The LRECL is driven by 4 bytes (first two bytes as nulls) inserted in
front of each record to hold the record length as a binary integer.

The 32K limit is driven by the fact this binary integer is considered
Signed; so instead of 0 thru 65535 it's -32767 thru 32768

ITYM -32768 thru 32767.

The last 8 bytes are lost to track marks and block marks reserved space.

???  With my correction to 32767, this would be 32767 - 8, or 32759.

All of which is (or should be) irrelevant because of:

Title: z/OS V1R7.0 MVS JCL Reference
Document Number: SA22-7597-10

12.0  Chapter 12.  DD Statement
12.37 LRECL Parameter
  12.37.2 Subparameter Definition
  ...
  Note: ... For RECFM=VS, the length can exceed BLKSIZE.

I see no rationale for a limit other than the 32767 imposed
by the signed halfword.

-- gil

--
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: LRECL of Spanned Records

2007-05-16 Thread Bob Rutledge
H.  I used LRECL=X, BFTEK=A and locate-mode GET in my assembler programs. 
Does COBOL not support that technique?


Bob

Kenneth E Tomiak wrote:

VBS 32767 SMF data has annoyed me since I first started working with it.

JCL LRECL is limited to 32760, LRECL=X I never got to work with my COBOL 
program. For pure allocating a dataset to hold SMF data I always used 
DCB=SOME.SMF.ARCHIVE.DSN to carry along the attributes.


In desperation I once write my own COBOL code to read the file RECFM=U and 
unspanned the records myself.


--
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: S01D abend Reason Code CF050311 while importing Dump

2007-05-16 Thread Shane Ginnane
IEFUSI in play ???

Shane ...
 
 I am getting S01D abend Reason Code CF050311 while trying to import a 
Dump 
 in Dumpmaster. The explaination of the reason code says : The new 
current 
 size exceeds the maximum size for the data space and Hiperspace. 
 Can you suggest what should be done to correct 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: Top 10 software install gripes

2007-05-16 Thread Ted MacNEIL
If they already fill 43 directory blocks, then using Tom's method they should 
have upped to 90, not 45. I could live with that. If they fill 2 directory 
blocks 
then I do not want to see 90, 45 is still okay by me.

I think we're optimising the wrong thing!
At the cost of today's disk, why are we fighting over one (or two) tracks?

For 15 years I have allocated at least one cylinder for directory space.
Never had a STOW problem.

Arguing over a track or two is not a productive use of anybody's time.
-
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


  1   2   >