date:20050629

Hi folks
 
Is here a quick and easy way to ask HSM who caused a dataset to be recalled?
 
I thought REPORT FUNCTION(RECALL) might do it but it just gives a load of 
totals and counts.
 
There doesn't seem to be anything particularly specific to this in SMF 14 or 15 
either.
 
TIA 
 
Brian
This e-mail message is for the sole use of the intended recipient(s)and may 
contain confidential and privileged information of Transaction NetworkServices. 
 
Any unauthorized review, use, disclosure or distribution isprohibited.  If you 
are not the intended recipient, please contact thesender by reply e-mail and 
destroy all copies of the original message.

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

Re: WORM tape mount - type mismatch

2005-06-29 Thread Natasa Savinc

Mike,
thank you for input, we will probably do that.
Regards,
Natasa

--
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: Running z/OS 1.4 on a G5/G6 after 31 March 2007

2005-06-29 Thread Timothy Sipples

Of itself, we are not concerned about running on an unsupported level of 
OS
for 6-9 months.

I'm curious...why not?  What government functions is that Sysplex 
supporting?  Personally, I would be concerned.  What I would then do 
about that concern is a separate issue.

We are concerned about having to either
(1) conform, upgrade to z/architecture, and potentially move to a Group 
80
license on a z890 from our current Amdahl Group 70 license, or
(2) suffer expulsion from the sysplex by no longer being part of PSLC
pricing.
Our desire is to stay in the sysplex on an unsupported version of zOS,
continue to benefit from PSLC, and then exit in Dec-2007.
Sounds as though our preferred approach is something up with which others
will not put.

What's Plan B?

For example, I don't think IBM has officially announced an end-of-service 
date for z/OS V1R5 yet, although the projected date is listed as March 
31, 2007.  The dates are listed at:

http://www-1.ibm.com/servers/eserver/zseries/zos/support/zos_eos_dates.html

That *might* be a viable Plan B if the goal is more hardware life and if 
(big if) IBM moves that date.  But then you'd have to weigh the labour 
costs of a V1R5 upgrade.  So a Plan C would be in order.

One suggestion for a Plan C would be to get out the spreadsheets and run 
some what ifs?  On the software front, look at the list of products 
you're running now and determine which you don't need, which you can 
switch to lower-cost options (and at what effort, costed), etc.  If you're 
not combining mainframe and non-mainframe software into one contract, 
check into that to see if it does anything.  If there's any z/OS.e 
potential workload -- DB2 workload can fit into that category -- see if a 
z/OS.e LPAR helps.  Do you get anything from workload-based licensing 
options (via SCRT)?  The technology dividend might help.  (More MIPS, 
lower MSUs on each new model.)  Are you going to save some money moving 
workload to Linux on zSeries, where appropriate?  (If you can eliminate 
100 Windows file servers and associated labour, for example, that can help 
the financials.)  Do you have any Java workload yet (or which is available 
for consolidation)?  (Look at a zAAP.)  Do you have any crypto processing 
now or in your future?  (A z890 offloads that work better than prior 
hardware.  That's hitting us hard in the U.S. because of privacy 
concerns.)

Everything should be on the table.  Hope that helps.

- - - - -
Timothy F. Sipples
Consulting Software Architect, Enterprise Transformation
IBM Americas zSeries Software
Phone: (312) 245-4003
E-Mail: [EMAIL PROTECTED] (PGP key available.)

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

Re: HSM statistics

2005-06-29 Thread Cliff Hess

That sort of detail can be found in the HSM log.  However, I don't think
I have this set up properly, and hence, nobody will see this reply.

-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] 
Sent: Wednesday, June 29, 2005 7:36 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: HSM statistics

Hi folks

Is here a quick and easy way to ask HSM who caused a dataset to be
recalled?

I thought REPORT FUNCTION(RECALL) might do it but it just gives a load
of totals and counts.

There doesn't seem to be anything particularly specific to this in SMF
14 or 15 either.

TIA 

Brian
This e-mail message is for the sole use of the intended recipient(s)and
may 
contain confidential and privileged information of Transaction
NetworkServices.  
Any unauthorized review, use, disclosure or distribution isprohibited.
If you 
are not the intended recipient, please contact thesender by reply e-mail
and 
destroy all copies of the original message.

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

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

CBT034 - RACFUSER - Index Error

2005-06-29 Thread Steve Grimes

Hello, z/OS 1.4 here.

I'm looking for a clue as to why I'm getting *** AN ERROR OCCURRED IN THE
INDEX RECORDS from my first attempt to execute pgm RACFUSER, (CBT Tape,
file 034).

Here's a snippet of the (relevant?) code.

PINDX01  XRR2,R2  CLEAR FOR THE DIVIDE
 LHR3,DCBLRECLLOAD THE LRECL
 MHR3,RECNO+2 RECNO SHOULD BE ZERO, BUT...
 ARR7,R3  ADD THE OFFSET TO THE BEGINNING
 A R7,RBAOFF  ADD ANY OFFSET TO THE RBA BEGINNING
 SPACE
 CLI   INDXHID,HEX8A  Q. IS THIS  THE INDEX BLOCK ID
 BNE   ERRINDEX   A. NO, PUNT
 SPACE
 CLI   INDXHI2,HEX4E  Q. IS THIS  THE INDEX BLOCK ID
 BNE   ERRINDEX   A. NO, PUNT
 SPACE
 CLI   INDXHILN,HEX01 Q. IS THIS  INDEX LEVEL 1
 BNE   ERRINDEX   A. NO, PUNT

Thanks.

Stg

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

Re: HSM statistics

We saw it.

Bob 

 -Original Message-
From:   IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED]  On Behalf Of 
Cliff Hess
Sent:   Wednesday, June 29, 2005 8:44 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject:Re: HSM statistics

That sort of detail can be found in the HSM log.  However, I don't think
I have this set up properly, and hence, nobody will see this reply.

-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] 
Sent: Wednesday, June 29, 2005 7:36 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: HSM statistics

Hi folks

Is here a quick and easy way to ask HSM who caused a dataset to be
recalled?

I thought REPORT FUNCTION(RECALL) might do it but it just gives a load
of totals and counts.

There doesn't seem to be anything particularly specific to this in SMF
14 or 15 either.

TIA 

Brian
This e-mail message is for the sole use of the intended recipient(s)and
may 
contain confidential and privileged information of Transaction
NetworkServices.  
Any unauthorized review, use, disclosure or distribution isprohibited.
If you 
are not the intended recipient, please contact thesender by reply e-mail
and 
destroy all copies of the original message.

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

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

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. 

Seeing Beyond Money is a service mark 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: HSM statistics

Thanks Bob

I've got HOLD LOG and ARCLOGX and Y set to DUMMY at the moment, with everything 
going to SMF instead.

I didn't want the extra hassle of setting up an archiving procedure for them 
when one was already in place for SMF.

Was that a bad move? Is it better to use the logs?

Cheers

Brian

-
This e-mail message is for the sole use of the intended recipient(s)and may 
contain confidential and privileged information of Transaction NetworkServices. 
 
Any unauthorized review, use, disclosure or distribution isprohibited.  If you 
are not the intended recipient, please contact thesender by reply e-mail and 
destroy all copies of the original message.

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

Re: Running z/OS 1.4 on a G5/G6 after 31 March 2007

2005-06-29 Thread Mark Zelden

On Wed, 29 Jun 2005 00:00:00 GMT, Ted MacNEIL
[EMAIL PROTECTED] wrote:

...
For example, I don't think IBM has officially announced an end-of-service
date for z/OS V1R5 yet, although the projected date is listed as March
31, 2007.
...

Why would IBM expire two at the same time?
That's the EOS for 1.4!


Why not?  IBM has done it many times before. Especially when they've
extended the dates for a particular release or re-version the OS.
IIRC, OS/390 1.3 (last V1 version), OS/390 2.4 and OS/390 2.5 all
had an EOS date of 03/31/2001.

Mark
--
Mark Zelden
Sr. Software and Systems Architect
mailto: [EMAIL PROTECTED]
Systems Programming expert at http://Search390.com/ateExperts/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html

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

Re: IDENTIFY restriction [was: RE: ISKE/IVSK]

2005-06-29 Thread Farley, Peter x23353

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA2A931/5.1?SHEL
F=IEA2BK34DT=20030429143021CASE=

-Original Message-
From: Shmuel (Seymour J.) Metz [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, June 28, 2005 8:13 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: IDENTIFY restriction [was: RE: ISKE/IVSK]

In [EMAIL PROTECTED],
on 06/28/2005
   at 10:10 AM, Farley, Peter x23353 [EMAIL PROTECTED] said:

Well, he's not the only graybeard who didn't get that memo.  I missed 
it too.  I just looked it up,

Where? The Devil is in the details.

IDENTIFY *must* specify an
address within an already-loaded/fetched/etc. program.

If that were the case then LOADER wouldn't work. Now, if you told me that
the other PLIST was not a GUPI, I'd agree, but that is a much different
issue.

_
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: Other DASD Erase programs

 
In a message dated 6/29/2005 8:26:11 A.M. Central Daylight Time,  
[EMAIL PROTECTED] writes:

Write  one of your own.  Use ICKDSF to overlay the VTOC and then use an 
ALC  program to do two passes of writing two blocks per track of low 
values and  three blocks per track of low values(to nail that pesky 
interrecord cap  left by the first one).  It takes about the same amount 
of time as  DFDSS's erase.  If you can figure out how to write full track  
records, then you can do it in one pass.  I am still trying to figure  
that one out.


I assume you are using QSAM on the 2 and 3 blocks per track pass to make  the 
ALC program easier to write, but a single full-track block can be written  
with EXCP if you want to go there - takes a little more ALC programming.   
Chain 
enough full-track writes together to do one whole cylinder per I/O  request.  
Then you lose minimal time due to extra rotations when switching  from one 
track to the next.
 
BIG CAVEAT:  make sure there are no data sets in use on the volume  before 
you start erasing it.  Especially system data sets.  Especially  JES checkpoint 
and paging data sets.  Been there, done that, got major ugly  scars (master 
console went SOLID red with undeletable critical error msgs just  before system 
crashed bigtime).  ENQ is a good way to test for most  data sets.
 
High-speed erase of huge number of volumes (such as in a DR facility after  
testing one's DR plan) is a difficult problem, and very necessary.  Whoever  
comes into the DR shop after you leave can see all your data unless you erase 
it 
 when you are finished with your test.  And that includes paging data sets,  
which also need to be erased, but you really ought to do them last.  A  
non-MVS standalone process is probably best (as in New Era).  How to erase  is 
not 
itself difficult, but how to erase super-fast a huge number of volumes  becomes 
the problem.  One way to speed it up is to ask different DASD  vendors for 
their proprietary full-volume erase command.  STK has one, and  doing one I/O 
request erases the whole volume.  Other vendors may require  doing full-track 
writes to tens of thousands of tracks, a very time-consuming  process.  And 
DoD/IC [1] standards require multiple passes with special bit  patterns.
 
If it takes you one hour to download all your data at the beginning of a DR  
test shot, plan on taking at least one hour to erase everything.  Test it  all 
at home before you go to the DR place, too.  Then you can accurately  plan on 
how long it will take to erase at the DR place.
 
Bill Fairchild
 
[1] Department of Defense/Intelligence Community

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

Re: HSM statistics

Brian,

No, it wasn't a bad move. Most shops have it that way and the fine manual even 
recommends that it be set up that way. See below:

The DFSMShsm log data sets provide DFSMShsm with information about events on a 
particular processing unit and about commands that are entered with the LOG 
command. The DFSMShsm log records this information in chronological order. 
However, the SMF and the problem determination aid data sets already record 
much of the information in the log. If you already are keeping SMF and PDA data 
and you do not have an ISV product that needs to directly scan the LOGX/LOGY 
files, it is recommended that you do not maintain LOGX/LOGY files. Specify DD 
DUMMY and use the HOLD LOG command.

In the past, I have set it up both ways. 

If you do not mind my asking, why do you care who recalled a dataset?

Bob 

 -Original Message-
From:   IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED]  On Behalf Of 
Perryman, Brian
Sent:   Wednesday, June 29, 2005 9:37 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject:Re: HSM statistics

Thanks Bob

I've got HOLD LOG and ARCLOGX and Y set to DUMMY at the moment, with everything 
going to SMF instead.

I didn't want the extra hassle of setting up an archiving procedure for them 
when one was already in place for SMF.

Was that a bad move? Is it better to use the logs?

Cheers

Brian

- 
  
  
  
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. 
  
Seeing Beyond Money is a service mark 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

Lookat exec

2005-06-29 Thread Andy White

Anyone out there know this?

I have a person that wants to use the LOOKAT exec in TSO. I use it 
as a command but he wants to move the cursor to a message and press a pf 
key and bring him to the book which contains the message. Does anyone know 
what the PF key would look like? Thanks

Andy 
Internet: Mailto:[EMAIL PROTECTED]

The information contained in this message may be CONFIDENTIAL and is for the
intended addressee only.  Any unauthorized use, dissemination of the
information, or copying of this message is prohibited.  If you are not the
intended addressee, please notify the sender immediately and delete this
message.

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

Re: HSM statistics

Thanks Bob.

Ah, the reason I want to know is that there is an obsolete (ex-test) 
application load library that I want to get rid of (for another whole bunch of 
reasons) so late yesterday evening I migrated it first, rather than delete it. 
This morning it was back on disk.

The likelihood is that it's wormed its way into some one or more production JCL 
decks and I need to identify them.

Brian

-
This e-mail message is for the sole use of the intended recipient(s)and may 
contain confidential and privileged information of Transaction NetworkServices. 
 
Any unauthorized review, use, disclosure or distribution isprohibited.  If you 
are not the intended recipient, please contact thesender by reply e-mail and 
destroy all copies of the original message.

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

Re: HSM statistics

2005-06-29 Thread ibm-main

Stick a RACF rule on it - sit back and wait for the messages.
KISS.

Shane ...

From: Perryman, Brian

 Ah, the reason I want to know is that there is an obsolete (ex-test)
application load library that I want to get rid of (for another whole bunch
of reasons) so late yesterday evening I migrated it first, rather than
delete it. This morning it was back on disk.

 The likelihood is that it's wormed its way into some one or more
production JCL decks and I need to identify them.

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

Re: HSM statistics

Use PDS 8.5, SRCHFOR, STARTOOLS, etc. and scan those decks for a string match! 
grin

Bob 

 -Original Message-
From:   IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED]  On Behalf Of 
Perryman, Brian
Sent:   Wednesday, June 29, 2005 10:02 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject:Re: HSM statistics

Thanks Bob.

Ah, the reason I want to know is that there is an obsolete (ex-test) 
application load library that I want to get rid of (for another whole bunch of 
reasons) so late yesterday evening I migrated it first, rather than delete it. 
This morning it was back on disk.

The likelihood is that it's wormed its way into some one or more production JCL 
decks and I need to identify them.

Brian

-
This e-mail message is for the sole use of the intended recipient(s)and may 
contain confidential and privileged information of Transaction NetworkServices. 

Any unauthorized review, use, disclosure or distribution isprohibited.  If you 
are not the intended recipient, please contact thesender by reply e-mail and 
destroy all copies of the original message.

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

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. 

Seeing Beyond Money is a service mark 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: Other DASD Erase programs

2005-06-29 Thread SArnett

Just out of curiosity, why multiple passes.  I know that they must have 
their reasons...  Something like residual data on the edges of the track 
or some such, since there is a possibility of the track not being 
recorded in the exact location of the previous write?


Bill Fairchild wrote:

I assume you are using QSAM on the 2 and 3 blocks per track pass to make  the 
ALC program easier to write, but a single full-track block can be written  
with EXCP if you want to go there - takes a little more ALC programming.   Chain 
enough full-track writes together to do one whole cylinder per I/O  request.  
Then you lose minimal time due to extra rotations when switching  from one 
track to the next.


BIG CAVEAT:  make sure there are no data sets in use on the volume  before 
you start erasing it.  Especially system data sets.  Especially  JES checkpoint 
and paging data sets.  Been there, done that, got major ugly  scars (master 
console went SOLID red with undeletable critical error msgs just  before system 
crashed bigtime).  ENQ is a good way to test for most  data sets.


High-speed erase of huge number of volumes (such as in a DR facility after  
testing one's DR plan) is a difficult problem, and very necessary.  Whoever  
comes into the DR shop after you leave can see all your data unless you erase it 
when you are finished with your test.  And that includes paging data sets,  
which also need to be erased, but you really ought to do them last.  A  
non-MVS standalone process is probably best (as in New Era).  How to erase  is not 
itself difficult, but how to erase super-fast a huge number of volumes  becomes 
the problem.  One way to speed it up is to ask different DASD  vendors for 
their proprietary full-volume erase command.  STK has one, and  doing one I/O 
request erases the whole volume.  Other vendors may require  doing full-track 
writes to tens of thousands of tracks, a very time-consuming  process.  And 
DoD/IC [1] standards require multiple passes with special bit  patterns.


If it takes you one hour to download all your data at the beginning of a DR  
test shot, plan on taking at least one hour to erase everything.  Test it  all 
at home before you go to the DR place, too.  Then you can accurately  plan on 
how long it will take to erase at the DR place.


Bill Fairchild

[1] Department of Defense/Intelligence Community

--
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: IGVFSMAN 0C4 (was IPCS missing module)

2005-06-29 Thread Mark


Jim Mulder wrote:



 OA10104 (PTF UA16888) should fix the 0C4 abend in the z/OS 1.6
VERBX VSMDATA.

 However, if you are processing a z/OS 1.4 dump on a z/OS 1.6 system.
you should be STEPLIBing or TSOLIBing to a z/OS 1.4 SYS1.MIGLIB,
as well as the z/OS 1.4 PARMLIB for IPCAPARM, etc. 


Jim Mulder   z/OS System Test   IBM Corp.  Poughkeepsie,  NY



Thanks for the heads up on the PTF.  I appreciate it.

May I ask how one goes about getting those libraries?  I believe that 
I'll be potentially looking at dumps from any z/OS system.   This 
suggests that I'll need to find libraries for the all the various releases.


And do you have any specifics on how to setup those libraries?   I 
presume you meant to say IPCSPARM and not IPCAPARM.  Please correct me 
if I'm wrong. 

If you meant IPCSPARM, then I believe I can allocate that specifically 
with the same name DD card before starting IPCS.  If this is true, then 
it would seem to be the easiest to setup.


The PARMLIB is a bit different.   I'll review my allocations to see 
where my 1.6 version is allocated.   And presume you mean that I'll need 
to substitute the 1.4 version of the same library in the allocation.


Do the 1.4 libaries _replace_ the corresponding 1.6 libraries, or should 
they be concatenated before the 1.6 libraries, leaving the 1.6 libraries 
in place?


-Mark Vollmer

--
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: Other DASD Erase programs

2005-06-29 Thread R.S.


SArnett wrote:

Just out of curiosity, why multiple passes.  I know that they must have 
their reasons...  Something like residual data on the edges of the track 
or some such, since there is a possibility of the track not being 
recorded in the exact location of the previous write?


It is (theoretically) possible to read traces or remains from disk 
plate. It is analog device, magnetism is not 0 or 1, sometimes it can be 
0.05 (it suggest 1 before the erasure), or 0 at the middle of the track, 
but 1 on the edges.
Lats but not least, it is virtually impossible to read overwritten data 
using regular controller (microscopes are used), it is rather most 
probable track content rather then just track content, it is vry 
hard work to assemble the bits into any informative string of data.

However it is possible.
IMHO more possible would be to corrupt any employee having access to 
data. And much less expensive.
From the other hand special agencies like NSA (where it would be much 
harder to corrupt employee or employee cannot steal the data) for sure 
uses their owne erasure methods or just destroy the disks.


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

Re: Other DASD Erase programs

In a message dated 6/29/2005 9:24:24 A.M. Central Daylight Time,
[EMAIL PROTECTED] writes:

Just out of curiosity, why multiple passes. I know that they must have
their reasons... Something like residual data on the edges of the track
or some such, since there is a possibility of the track not being
recorded in the exact location of the previous write?

The precise location of recorded bits around the track moves around
somewhat. That is why the controller does something called read with offset
when
re-reading a block that produced a data check (aka head shaking). The
read-write mechanism/transducer is moved a tiny distance to the left of the
center
of where the track is supposed to be, the data is read, if still bad then
the transducer is moved a tiny distance to the right of the center... If the
data cannot be read correctly (i.e., no data check indication) and you have
moved the transducer so far to either side that it is now within the tolerance
for the adjacent track, then you give up on reading that block.

Another issue is residual magnetism. When you magnetize a substance, a
large % of the molecules are aligned in a certain way. When you erase that
data,
not all the molecules get realigned back to their original direction. This
is why skilled recording experts with expensive, sensitive equipment can
recover recorded data that was over-written or erased. The cost of such
recovery
is high. The cost of erasing data to the point that it cannot be recovered
by an expert is also high. The trade-off is how valuable is the data to you
and what would it cost you if someone else got the data.

Here are the DoD's standards:
_http://72.14.207.104/search?q=cache:dRHWf5Fg2LQJ:security.ouhsc.edu/docs/DoD_5220.doc+DoD+5220hl=en_

(http://72.14.207.104/search?q=cache:dRHWf5Fg2LQJ:security.ouhsc.edu/docs/DoD_5220.doc+Do
D+5220hl=en)

On the line that says non-removable rigid disk it says that in order to
clear the data all you need to do is to overwrite all addressable locations
with
a single character, such as writing a full track of X'00'. But in order to
sanitize the disk you must degauss the disk, destroy the disk, or use process
d, which means to Overwrite all addressable locations with a character,
its complement, then a random character and verify. This would require at
least 4 revolutions of the track, the first 3 of which are writing and the 4th
is reading, then some CPU time to do the verify. So if it takes X hours to
download the data and you want it sanitized, it will take 4X hours to sanitize.

Bill Fairchild

--
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: Other DASD Erase programs

2005-06-29 Thread Mike Bell

Actually, it doesn't require a microscope.  All current hard drives
adjust the track location to compensate for expansion of the platter
because the temperature has changed and other little details.  What is
required is a diagnostic controller that can adjust the head position
just to the side of the track so it can read prior data.  Some of what
can be read in relatively short time is close to magical. The multiple
pass requirement is so the head position is at different parts of the
track tolerance which will reduce the ability of a diagnostic
controller to easily read the data.  Note - this does not make it
impossible just harder.  and yes the electron microscope is still the
final recovery tool.

That is the reason for the requirement for physical destruction for
some kinds of data.

Mike

On 6/29/05, R.S. [EMAIL PROTECTED] wrote:
 SArnett wrote:
 
  Just out of curiosity, why multiple passes.  I know that they must have
  their reasons...  Something like residual data on the edges of the track
  or some such, since there is a possibility of the track not being
  recorded in the exact location of the previous write?
 
 It is (theoretically) possible to read traces or remains from disk
 plate. It is analog device, magnetism is not 0 or 1, sometimes it can be
 0.05 (it suggest 1 before the erasure), or 0 at the middle of the track,
 but 1 on the edges.
 Lats but not least, it is virtually impossible to read overwritten data
 using regular controller (microscopes are used), it is rather most
 probable track content rather then just track content, it is vry
 hard work to assemble the bits into any informative string of data.
 However it is possible.
 IMHO more possible would be to corrupt any employee having access to
 data. And much less expensive.
  From the other hand special agencies like NSA (where it would be much
 harder to corrupt employee or employee cannot steal the data) for sure
 uses their owne erasure methods or just destroy the disks.
 
 --
 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
 


-- 
Mike

--
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: FW: Lookat exec

 
In a message dated 6/29/2005 9:38:19 A.M. Central Standard Time,  
[EMAIL PROTECTED] writes:

You can  setup a PF key(your/his choice depending on shop standards) to be  
TSO  %LOOKCSR if
you have this REXX routine. I believe it came with  LOOKAT.





Thanks. There's also a paper on LOOKAT by Sam Knutson on the NASPA site.  
Memebership required(fairly cheap-the membership that  is)

--
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: Lookat exec

2005-06-29 Thread Imbriale, Donald (Exchange)

In Google, to search for something at a particular site, use

zoom site:naspa.com

as the search argument.

(Although when I did this I didn't find the utility mentioned).

Don Imbriale


-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf
Of Ed Finnell
Sent: Wednesday, June 29, 2005 10:19 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Lookat exec



 Maybe google?
Ugh...too many cameras. Went to _www.naspa.com_ (http://www.naspa.com)
and searched
on ZOOM. 'bout the 7th one down.



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

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

Re: Max. size of pageds?

2005-06-29 Thread Mark Thomen

Vernooy, C.P. - SPLXM [EMAIL PROTECTED] wrote in message
news:[EMAIL PROTECTED]...
 Mark Thomen [EMAIL PROTECTED] wrote in message

news:[EMAIL PROTECTED].

 .
 
 
 
 
 
 
 
  Vernooy, C.P. - SPLXM [EMAIL PROTECTED] wrote in message
  news:[EMAIL PROTECTED]...
   Hello,
  
   While moving to 3390-9 devices, I want to enlarge our pageds, but am
not
   sure of the limits.
  
   From OW54255 I found that the maximum size is now 4GB, if SADUMP must
be
   able to process it.
   From z/OS V1R3.0 DFSMS Access Method Services for Catalogs: 17.1.1 I
 read
   that the maximum size is 16M slots, so 64 GB.
 
  The current limit is 4GB.
 
  Thanks,
  Mark Thomen
  Catalog/IDCAMS/VSAM Development
 

 Thanks Mark, so the 16MB slot limit is a limit that cannot be reached in
 practice yet.

That's correct, at the moment.  I remember an RCF to correct this, but I
don't see the change in the 1.6 doc - must be in the 1.7 doc.

Thanks,
Mark Thomen
Catalog/IDCAMS/VSAM Development

--
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: FW: Lookat exec

2005-06-29 Thread Andy White

Thanks! The only exec I didnt upload ;)


Andy White

Internet: Mailto:[EMAIL PROTECTED]





Robert Lawrence [EMAIL PROTECTED]
Sent by: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU
06/29/2005 10:37 AM
Please respond to IBM Mainframe Discussion List
 
To: IBM-MAIN@BAMA.UA.EDU
cc: 
Subject:[IBM-MAIN] FW: Lookat exec


You can setup a PF key(your/his choice depending on shop standards) to be 
TSO %LOOKCSR if
you have this REXX routine. I believe it came with LOOKAT.


Bob Lawrence
DBA
Boscov's Dept Stores LLc



 -Original Message-
 From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED]
 Behalf Of Andy White
 Sent: Wednesday, June 29, 2005 10:02 AM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: Lookat exec


 Anyone out there know this?

 I have a person that wants to use the LOOKAT exec in TSO. I use 
it
 as a command but he wants to move the cursor to a message and press a pf
 key and bring him to the book which contains the message. Does anyone 
know
 what the PF key would look like? Thanks

 Andy
 Internet: Mailto:[EMAIL PROTECTED]


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



The information contained in this message may be CONFIDENTIAL and is for the
intended addressee only.  Any unauthorized use, dissemination of the
information, or copying of this message is prohibited.  If you are not the
intended addressee, please notify the sender immediately and delete this
message.

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

Re: IGVFSMAN 0C4 (was IPCS missing module)

2005-06-29 Thread Jim Mulder

IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU wrote on 06/29/2005 
10:38:11 AM:

   However, if you are processing a z/OS 1.4 dump on a z/OS 1.6 system.
 you should be STEPLIBing or TSOLIBing to a z/OS 1.4 SYS1.MIGLIB,
 as well as the z/OS 1.4 PARMLIB for IPCAPARM, etc. 

 May I ask how one goes about getting those libraries?  I believe that 
 I'll be potentially looking at dumps from any z/OS system.   This 
 suggests that I'll need to find libraries for the all the various 
releases.
 
 And do you have any specifics on how to setup those libraries?   I 
 presume you meant to say IPCSPARM and not IPCAPARM.  Please correct me 
 if I'm wrong. 
 
 If you meant IPCSPARM, then I believe I can allocate that specifically 
 with the same name DD card before starting IPCS.  If this is true, then 
 it would seem to be the easiest to setup.
 
 The PARMLIB is a bit different.   I'll review my allocations to see 
 where my 1.6 version is allocated.   And presume you mean that I'll need 

 to substitute the 1.4 version of the same library in the allocation.
 
 Do the 1.4 libaries _replace_ the corresponding 1.6 libraries, or should 

 they be concatenated before the 1.6 libraries, leaving the 1.6 libraries 

 in place?

  IPCSPARM is the DDNAME to which you need to allocate the correct
PARMLIB data set.  If you are going to use IPCS's ISPF dialogs, there
are several more DDNAMEs to allocate. 

  MVS IPCS Customization  manual has a section titled
Using IPCS on Another System which describes this. 


  As to getting the libraries, the assumption is that at some time
you had installed all of the releases for which you will need to 
process dumps, and saved the IPCS libraries. 

Jim Mulder   z/OS System Test   IBM Corp.  Poughkeepsie,  NY

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

Re: HSM statistics

2005-06-29 Thread Mark Zelden

On Wed, 29 Jun 2005 10:08:32 -0400, Richards.Bob
[EMAIL PROTECTED] wrote:

I'm with Shane on this one. I really like that idea! No muss, no fuss.


Invovling the RACF people to make a rule just to find out who
is recalling a data set is easier said than done. Much easier
to look at a log (that's what they're for).  Had to do this
here recently to find out who/what was recalling some old LE
data sets (installed off sysres back when it was installed
outside of ServerPac around MVS/ESA V5).  Scanning prod
JCL decks wasn't an answer either since it was some
programmer's JCL.   SMF wasn't a help because the data set
wasn't opened, just allocated in STEPLIB.  I've often wanted an
SMF record just for allocation of a data set.

Mark
--
Mark Zelden
Sr. Software and Systems Architect
mailto: [EMAIL PROTECTED]
Systems Programming expert at http://Search390.com/ateExperts/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html

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

SSH Implementation problem

2005-06-29 Thread Gregg, Jim

I have just installed the 'IBM Ported Tools for z/OS' V1.1.0 on a z/OS 1.6
system.
I am trying to connect using SSH from a Linux box.
The first time I tried to connect the machines exchanged autorizations OK.
I get :

From the Linux box:
linux:~ # ssh -vl tsjeg ftp.cslp.org
OpenSSH_3.8p1, SSH protocols 1.5/2.0, OpenSSL 0.9.7d 17 Mar 2004
debug1: Reading configuration data /etc/ssh/ssh_config
debug1: Applying options for *
debug1: Connecting to ftp.cslp.org [10.1.10.6] port 22.
debug1: Connection established.
debug1: identity file /root/.ssh/identity type -1
debug1: identity file /root/.ssh/id_rsa type -1
debug1: identity file /root/.ssh/id_dsa type -1
debug1: Remote protocol version 2.0, remote software version OpenSSH_3.8.1p1
debug1: match: OpenSSH_3.8.1p1 pat OpenSSH*
debug1: Enabling compatibility mode for protocol 2.0
debug1: Local version string SSH-2.0-OpenSSH_3.8p1
debug1: SSH2_MSG_KEXINIT sent
debug1: SSH2_MSG_KEXINIT received
debug1: kex: server-client aes128-cbc hmac-md5 none
debug1: kex: client-server aes128-cbc hmac-md5 none
debug1: SSH2_MSG_KEX_DH_GEX_REQUEST(102410248192) sent
debug1: expecting SSH2_MSG_KEX_DH_GEX_GROUP
debug1: SSH2_MSG_KEX_DH_GEX_INIT sent
debug1: expecting SSH2_MSG_KEX_DH_GEX_REPLY
debug1: Host 'ftp.cslp.org' is known and matches the RSA host key.
debug1: Found key in /root/.ssh/known_hosts:1
debug1: ssh_rsa_verify: signature correct
debug1: SSH2_MSG_NEWKEYS sent
debug1: expecting SSH2_MSG_NEWKEYS
debug1: SSH2_MSG_NEWKEYS received
debug1: SSH2_MSG_SERVICE_REQUEST sent
debug1: SSH2_MSG_SERVICE_ACCEPT received
debug1: Authentications that can continue:
publickey,password,keyboard-interactive
debug1: Next authentication method: publickey
debug1: Trying private key: /root/.ssh/identity
debug1: Trying private key: /root/.ssh/id_rsa
debug1: Trying private key: /root/.ssh/id_dsa
debug1: Next authentication method: keyboard-interactive
debug1: Authentications that can continue:
publickey,password,keyboard-interactive
debug1: Next authentication method: password
[EMAIL PROTECTED]'s password:
debug1: Authentication succeeded (password).
debug1: channel 0: new [client-session]
debug1: Entering interactive session.
debug1: client_input_channel_req: channel 0 rtype exit-status reply 0
debug1: channel 0: free: client-session, nchannels 1
Connection to ftp.cslp.org closed.
debug1: Transferred: stdin 0, stdout 0, stderr 36 bytes in 0.3 seconds
debug1: Bytes per second: stdin 0.0, stdout 0.0, stderr 117.7
debug1: Exit status 255
linux:~ #

From the z/OS side:
ACF01137 TSJEG LAST SYSTEM ACCESS 10.11-06/29/05 FROM 0A010A6C
OS$ACT097 SSHD2   //STEP1   /BPXPRFC  COND =  
OS$ACT121 SSHD2 MAXRC=  CPU=0.22 ELAPSED=55.36 I/O=6
OS$ACT097 SSHD3   //STEP1   /BPXPRFC  COND =  0255
OS$ACT097 SSHD1   //STEP1   /BPXPRFC  COND =  
OS$ACT121 SSHD3 MAXRC= 0255 CPU=0.11 ELAPSED=0.33 I/O=20
OS$ACT121 SSHD1 MAXRC=  CPU=0.26 ELAPSED=55.79 I/O=6

There is nothing on the JES2 for either the SSHD1,2,3 ot for BPXAS.
Any help will be appreciated.

Jim Gregg

--
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 , formatting question

2005-06-29 Thread McKown, John

 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of Daniel Cremieux
 Sent: Wednesday, June 29, 2005 11:05 AM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: rexx , formatting question

 dear gurus,

 a=15.53666222

 How to display only the 2 first decimal digit :

 = a=15.53 (or 15.54 i don't mind for the precision)

You're so close. Use the FORMAT function.

twoplaces=format(data,,2)

 Thank you

 another question :
 a=1555666
 is there any way to display it as 1.555.666 ( easier to read)

I don't know a really good way, but the following should work:

b=
do while length(a)  3
   if b=
   then b=right(a,3) /* get last 3 digits of a */
   else b=right(a,3).b /* current last 3 digits of a with previous
tail */
   a = left(a,length(a)-3) /* remove last 3 digits of a */
end
if a   then b=a.b

Note that you may end up with a trailing period if a has 3 or fewer
digits.

 great thanks

--
John McKown
Senior Systems Programmer
UICI Insurance Center
Information Technology

This message (including any attachments) contains confidential
information intended for a specific individual and purpose, and its'
content is protected by law.  If you are not the intended recipient, you
should delete this message and are hereby notified that any disclosure,
copying, or distribution of this transmission, or taking any action
based on it, 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: IGVFSMAN 0C4 (was IPCS missing module)

2005-06-29 Thread Bob Wright


Mark wrote:


May I ask how one goes about getting those libraries?  I believe that 
I'll be potentially looking at dumps from any z/OS system.   This 
suggests that I'll need to find libraries for the all the various releases.




Mark, if, as it sounds, you function as a vendor for z/OS products, 
you'll want to contact IBM vendor relations.  Hopefully, one of the many 
vendors who use this forum can give you a specific email address to 
start you off.


I presented at a vendor disclosure session some time ago where the topic 
of establishing a distribution process for these libraries was 
suggested, and everyone in the room at the time seemed to agree that it 
would be a good thing.  Someone from the IBM Dallas contingent of vendor 
relations folks took it as a to-do to follow up and get back with the 
group.  I lost track of what happened since then.


--
Bob Wright - MVS Service Aids

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

Best practices for administration/maintenance of USS in production

2005-06-29 Thread Pope, Lynette

Cross posted to IBM-Main and MVS-OE

Yes, I've checked the archives from both lists.  The few leads I found
there will be contacted off list.

If you don't want to reply to the list, no problem, reply directly to
me.  ( Lynette dot pope at eds dot com  )

We are looking for the best methods for care and feeding of mainframe
Unix System Services.  It has become a customer-affecting component of
z/OS, and must be treated that way.   

Here's an idea of what I'm looking for.   How do YOU

-Move a site specific change from test to production(update
/etc/httpd.conf or /etc/home.map for a single system)
  
-Propagate a change to multiple production systems   (add a new zFS to
20 production systems, update automount policies.)

-Track  who changed what and when   (after ipl, if USS isn't working
as it should,  the immediate suspects are the most recent changes, who
made ANY change to USS?  What was changed)
  
What are your back out procedures?   (if you know that something is
wrong, and it's probably related to the last two changes made, how do
you back out those changes? )
  
Do you have a method of staging updates?  (scripts or tools that allow
an update to be setup during the week, and to be implemented on the
weekend by someone else)

Do you have software to do this?   Did you 'roll your own'?

What are your backup and restore processes for 
A.  USS itself  (root, bto, var, .)
B.  Applications   by directory or by volume, or by HFS/ZFS
C.  Do you have a separate procedure for /etc  filesystem?

Disaster recovery processes for USS and applications that run under it?

How do you monitor the health of USS?   (a problem in USS will soon
affect TCPIP, FTP, USS based applications and often DB2 and IMS)

I'll be glad to correspond off list.

Also,  I'm willing to post my findings to the list 
(and if it's as interesting as I think it will be, there will probably
be a future SHARE presentation on it.)

No answer is too simple or complex.Hopefully we've thought of the
easy stuff already, but your process might spark an idea that can help
us improve our process.

LASTLY,I know this is IBM-Main (and mvs-oe).   Sarcasm is expected but
it will be ignored. (my delete key works just fine...)

Thanks for your assistance.

Lynette Pope

--
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 on ISPF Startup

In [EMAIL PROTECTED], on 06/28/2005
   at 02:21 AM, Anonymous Jieryn [EMAIL PROTECTED] said:

done. the rexx now behaves the way i'd expect at logon. :-) but a new
problem arises.. namely, after i log in and the rexx does its thing,
i am now faced with the logout menu (asking me whether or not i
should delete the ISPF history, etc). i tap enter, then i pop out at
the READY prompt. quite odd.. how do i avoid this and go straight to
READY without any logout setting panel being displayed?

As I recall it's an ISPF profile option. Go into the ISPF log panel;
there should be an option there.
 
-- 
 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: CBT034 - RACFUSER - Index Error

2005-06-29 Thread Knutson, Sam

Steve,

RACFUSER was written for the OLD RACF database before it was reformatted
in 1.9.x (?) but reading the raw database directly is old school and it
doesn't work anymore unless the code has been updated which this has not.  

Today there are much better alternatives.  Most of these work off of
supported data unloads.
The RACF Database Unload Utility (IRRDBU00)and the RACF SMF Data Unload
Utility (IRRADU00) can
take the database and SMF records and put them in a flat file format that is
easy to post process.

RACFICE

Effective security management requires flexible analysis and reporting
tools. The RACF product has introduced two tools that assist security
administrators and auditors: The RACF Database Unload Utility (IRRDBU00)and
the RACF SMF Data Unload Utility (IRRADU00). RACFICE contains the tools
necessary to create reports using the output of IRRDBU00 and IRRADU00 as
input to DFSORT's ICETOOL utility. Several examples are included. 

http://www-1.ibm.com/servers/eserver/zseries/zos/racf/racfice.html

Nigel Pentland's PC Utilities relating to RACF

The 'RACF' utilities are text processing programs which take an IRRDBU00
ASCII flat file download from RACF and produces as output text reports and
depending on the program JCL which can be checked, transferred back to
mainframe and submitted. 

http://www.nigelpentland.co.uk/racf.htm


That should get you started.

Best Regards,

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

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

-Original Message-
Hello, z/OS 1.4 here.

I'm looking for a clue as to why I'm getting *** AN ERROR OCCURRED IN THE
INDEX RECORDS from my first attempt to execute pgm RACFUSER, (CBT Tape,
file 034).


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

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

Re: HSM statistics

By your own wordsin Brian's case, logging was not active. He probably has 
no plans to change it either for the rare instance the logs are useful. Your 
point about STEPLIB is very valid and goes to negate some portion of my 
scanning suggestion, especially if it results in no hits. However, in this 
case, RACF *is* the easiest solution for this particular situation.

Bob 

 -Original Message-
From:   IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED]  On Behalf Of 
Mark Zelden
Sent:   Wednesday, June 29, 2005 12:17 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject:Re: HSM statistics

On Wed, 29 Jun 2005 10:08:32 -0400, Richards.Bob
[EMAIL PROTECTED] wrote:

I'm with Shane on this one. I really like that idea! No muss, no fuss.


Invovling the RACF people to make a rule just to find out who
is recalling a data set is easier said than done. Much easier
to look at a log (that's what they're for).  Had to do this
here recently to find out who/what was recalling some old LE
data sets (installed off sysres back when it was installed
outside of ServerPac around MVS/ESA V5).  Scanning prod
JCL decks wasn't an answer either since it was some
programmer's JCL.   SMF wasn't a help because the data set
wasn't opened, just allocated in STEPLIB.  I've often wanted an
SMF record just for allocation of a data set.

Mark
--
Mark Zelden
Sr. Software and Systems Architect
mailto: [EMAIL PROTECTED]
Systems Programming expert at http://Search390.com/ateExperts/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html

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

Sysplex X RACF

2005-06-29 Thread Rosangela S F Andrade

Hello!
 
Please, I need  your Help!

Can I have one sysplex in two machines with any Lparts at in more than one 
place, but the Lpars machine 1 not look machine 2, but same racf using the 
sysplex; or I need will do installation of RRSF?

 

TIA

 

Rosangela


__
Converse com seus amigos em tempo real com o Yahoo! Messenger 
http://br.download.yahoo.com/messenger/ 

--
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: CISP VISA compliance

2005-06-29 Thread Ward, Mike S

We use IBM for Intrusion Detection, Vulnerability scanning and
Penetration Testing. 

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Davis Kriss P
Sent: Tuesday, June 28, 2005 7:22 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: CISP VISA compliance

Dear Colleagues, 

I know this is more of a business question, but perhaps some of you have
been involved in the technical compliance part of this.

There are new credit card compliance rules (firewall placement, etc.)
coming into effect for VISA credit card transactions.  

There seems to be two parts (we are tier 2 based on our transaction
loads and VISA's CISP documentation).

1.  The periodic scan of our servers/system by a certified scanner to
make sure our systems are secure.

2.  The self-assessment Q and A document we need to fill out
periodically.

I would be interested if anyone has used a consulting firm for one or
both compliance parts.  The Q and A part we have reviewed just is not
clear enough to us to know what VISA is asking for in certain
situations.  Getting someone in that has a track record and knowledge of
the ins and outs of the CISP specification to help us would be great.

Thanks in advance.

-
Kriss Davis, CCP
Project Manager Touchnet/eCommerce
Illinois State University [EMAIL PROTECTED]
309-438-2802
-

--
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: Lookat exec

 
In a message dated 6/29/2005 9:59:23 A.M. Central Standard Time,  
[EMAIL PROTECTED] writes:

(Although when I did this I didn't find the utility  mentioned).




I went back and looked and still can't find it. Maybe it was Xephon
but that's not what I remember. Went back to Google and used
'ISPF EDIT Macros' for search argument and looks like best hits
are Cedit,cbrowse, and cview on NASPA but Doug Nadel's VCURSOR
wherever his site is now is recommended.

--
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: Gates on outsourcing

 
In a message dated 6/29/2005 2:27:56 P.M. Central Standard Time,  
[EMAIL PROTECTED] writes:

I don't  always like what comes out of Redmond, but this time I think
businesses  should listen up to Mr. Gates:




He also puts his money where his mouth is, with large contributions
to in trouble schools and libraries.
 
We had an operator who took 10 years to get her degree in interior design  or 
something and everybody said 'thank goodness' when she left. Saw her dad at  
one of our analysts wives' funeral and she's doing exclusive work for Gates 
home  and office. Making more than all of us put together-she did like to  
argurevbg

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

Rename VSAM Cluster and its components

2005-06-29 Thread Gilbert Saint-Flour

Hello:

I am looking for a simple way to rename a VSAM cluster along with its 
DATA  INDEX components.  Three ALTER commands in an IDCAMS step is the 
obvious method, but is there some batch utility program that can do it 
in a single command, i.e. without having to specify the old and new 
names of the associated objects?   Same question for the other 
components in a VSAM sphere, i.e. CLUSTERs, AIXs, PATHs.What's the 
simplest way to rename the whole sphere just by specifying the name of 
the cluster?

Thanks.

-- 

 Gilbert Saint-Flour
 GSF Software
 http://gsf-soft.com/
 mailto:[EMAIL PROTECTED]

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

Re: rexx , formatting question

2005-06-29 Thread Arthur T.

On Wed, 29 Jun 2005 18:59:52 GMT, in bit.listserv.ibm-main 
(Message-ID:[EMAIL PROTECTED]) gerard46 
[EMAIL PROTECTED] wrote:



| another question :
| a=1555666
| is there any way to display it as 1.555.666 ( easier to read)

| I don't know a really good way, but the following should work:
|
| b=
| do while length(a)  3
|   if b=
|   then b=right(a,3) /* get last 3 digits of a */
|   else b=right(a,3).b /* current last 3 digits of a 
with previous

| tail */
|   a = left(a,length(a)-3) /* remove last 3 digits of a */
| end
| if a   then b=a.b
|
| Note that you may end up with a trailing period if a 
has 3 or fewer

| digits.

 or if the number is in exponential notation
 (4.567e+77 === 4.567e,+77)

or has a leading sign
 (-123 ===  -,123 ---or---.+56 ===  +,456)

or has a decial point
 ( .1234  === .1,234---or---   123. === 1,23.)

or has leading or trailing blanks  ( +  23  +  , 23)

... and I'm sure that there are a few others. 
_Gerard S.


 The following code was designed for a specific size 
of numbers, but works fine for them.  The comments should 
allow someone to make the code work for other (or variable) 
lengths.  I probably could, too, but I don't want to have 
to test it.  The code also knows when to give up.  It was 
copied from my CALCR exec, available on the CBT tape (file 209).


 You might also want to ask on the REXX listserv 
and/or one of the REXX newsgroups.  I know there are more 
elegant ways to do this.


 Also note that this is for the USA, where we use 
commas to separate triads and period for decimal point.


INITIALIZE:
   NUMERIC DIGITS 30
   !!max = 
   !!min = -999
   !!minfrac = 10**-33  /* Smallest number I'll express without
   going to scientific notation  */


COMMA: /* put commas into number and format it correctly */
   procedure expose !!max !!min  !!minfrac
   curr = arg(1)
   select
 when abs(curr)  !!minfrac  curr \= 0 then
   return format(curr16)
 when curr  !!max then
   return ' ' || format(curr,,29,,20)
 when curr  -1*!!max/10 then  /* neg numbers have 
xtra char */

   return format(curr,,29,,19)
 when abs(curr)  !!min then
   return format(curr,,29,,20)
 otherwise
   nop
   end /* of select */
   int = trunc(curr)
   fraction = format(curr - int,,,0)
   if int = '' then int = 0
   int = format(int,20)
   /*  17 = 20-3  */
   do i = 17 to 1 by -3 while datatype(substr(int,i,1),'N')
 int = insert(',',int,i)
   end
   int = right(int,26) /* 26 = 20 + int((20-1)/3) */
   select
 when fraction = '' then nop
 when fraction = 0 then fraction = ''
 otherwise nop
   end   /* of select */
   if length(fraction)  0 then do
 parse var fraction . '.' fraction
 fraction = '.'fraction
   end /* of IF */
   if int = 0 then
 if curr  0 then int = right('-0',26)
   ret = int || fraction
   return ret

--
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 OS/390 to z/OS 1.4 migration question (COBOL)

In [EMAIL PROTECTED], on 06/29/2005
   at 09:03 AM, Joe Zitzelberger [EMAIL PROTECTED] said:

ISPF will offer a note line to the effect of nondisplayable data, 

Water is wet. That doesn't help if you have no water.

Again, this only applies if you view your listing as a DASD file.

Not if the compiler translates out nondisplayable data.

That is what the translator, with the given options would insert.   
One of those blank-looking columns in the alphanumeric literal is  
going to be the problem.

Again, the issue is what the compiler puts in the file, not what was
in its input.

This is the problem we have been discussing.

No, it is only half of the problem.

Somehow, some people think that these messages are not self- 
documenting and completely obvious given the context in which they  
are used.

That's because they aren't, as demonstrated by empirical data; the OP
did *not* understand the message. Somehow people believe that just
because they understand a message based on external knowledge that the
target audience must understand it.

You want to know whether a message is self documenting? Put together
a testing laboratory and expose a representative sample of real users
to it. If a significant number don't understand it, then it is not
self documenting, no matter how clear it is to you.

And you still haven't said whether the compiler actually retains the
SI and SO in the listing file.
 
-- 
 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: Fw: Another OS/390 to z/OS 1.4 migration question (COBOL)

In [EMAIL PROTECTED], on 06/28/2005
   at 09:27 PM, Bill Klein [EMAIL PROTECTED] said:

I don't understand your comment. 

Because you ignored part[1] of it and are are assuming that what
appears in the listing is identical to what appears in the source
code. That certainly didn't use to be true, and so far nobody has been
willing to state that it has changed.

As previously indicated the FLAG(I,I) option became the default at
the same time as DBCS.

As previously indicated, that is irrelevant.

Therefore, the compiler error message WILL appear in the listing
IMMEDIATELY after the line inserted by the translator (indicating
the column in that line with the problem).

What good does that do when the message lacks the necessary data to
diagnose the problem and is unintelligible to the target audience?

If a CICS application programmer can't recognize a translator
inserted line with
   Move alphanumeric literal to DFH 
field as being inserted by the translator 

Straw dummy. The CICS programmer can recognize it; what he can't do is
to guess what nondisplayable data are in the text.

and/or if that same programmer can't recognize that the column that 
the message is pointing to is within an alphanumeric literal, 

Another straw dummy.

then NO messages and codes manual is ever going to
help that programmer (IMHO)

A combination of a messages manual and a better message would. 
Starting with displaying the message text in hexadecimal, explaining
what SI and SO are and giving their hexadecimal values.

[1] Have they stopped translating out nondisplayable 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: IDENTIFY restriction [was: RE: ISKE/IVSK]

In [EMAIL PROTECTED], on 06/28/2005
   at 02:52 PM, Edward E. Jaffe [EMAIL PROTECTED] said:

So, when IBM removed the function from MVS, they created a secret 
handshake (available to privileged code only) to allow the loader 
itself to continue using the interface? Cute!

I doubt that they did either; they just removed the documentation. Why
not run a quick test, once from AC(0) and once from AC(1), to see
whether the interface has changed at all and whether it requires
authorization?

The only thin gs that I can guaranty are that the interface is still
there and that it was never a GUPI.
 
-- 
 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: IDENTIFY restriction [was: RE: ISKE/IVSK]

In [EMAIL PROTECTED], on 06/28/2005
   at 03:50 PM, Edward E. Jaffe [EMAIL PROTECTED] said:

Wow! Looks like the CDE resulting from the secret SVC 41 interface 

Considering that IBM documented it in the logic manuals, it can hardly
be considered secret. But it is *not* and never has been GUPI, so use
it at your own risk.

does *not* have the CDSYSLIB bit turned on, meaning any 
authorized/privileged program that tries to LOAD the resulting
module  will receive abend S306. Understandable.

I would have created a PMR were that not the case. Way back when IBM
published a list of MVT characteristics that they had changed in MVS
for security reasons, and I believe that this was one of the ones
documented there. 
 
-- 
 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: IDENTIFY restriction [was: RE: ISKE/IVSK]

In [EMAIL PROTECTED],
on 06/29/2005
   at 09:49 AM, Farley, Peter x23353 [EMAIL PROTECTED] said:

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA2A931/5.1?SHEL
F=IEA2BK34DT=20030429143021CASE=

I don't see no stinking memo. What I see is essetially the same text
that was there all the way back to OS/360, describing the form of
IDENTIFY used to create a minor CDE. It doesn't say that the form of
IDENTIFY used to create a major CDE has been withdrawn or even
changed.
 
-- 
 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

Untursed Dataset Question

2005-06-29 Thread Howard Rifkind

Hello all,
 
I just received some service for my z/OS 1.4 system which was ordered from the 
IBM Link 2000 site.  The .BIN file which I FTP down to a dataset on my system 
needs to be untursed but I don't understand how big the target dataset has to 
be, maybe it's DSN etc.
 
How do you go about determing this in order to pre allocate the target dataset.
 
Thanks.


-
Do you Yahoo!?
 Make Yahoo! your home page   

--
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: Flashcopy question

2005-06-29 Thread Bruce Black


Steve Arnett wrote:

I was reviewing our company backups that are using ESS Flashcopy when 
it occured to me that our backups are still out of sync using this 
feature.  In order for my backups to be in sync, it is necessary to 
set up all of the FC pairs within an ESS and then issue a single 
commit to start the Flashcopies.  This is possible using the HMC 
panels on the Shark, but how can it be done from within MVS?  All of 
the commands, whether DFDSS driven or TSO driven seem operate on 
single pairs and the Flashcopy begins towards the end of the execution 
of that single command.  While each Flashcopy pair will be in sync 
with each other at the point the commit takes place, all of the FC 
pairs will be out of sync with each other.  For any given multivolume 
VSAM dataset, it would render this PIT backup useless.
   Is there a way, in MVS, to set up the commands such that a single 
commit can be done, which would be equivalent to setting them up on 
the ESS HMC?


Steve, as far as I am aware, current IBM software does not support 
Flashcopy consistency groups (which is what you are describing). 

FDRINSTANT, our FDR enhancement for point-in-time backups using 
Flashcopy, Snap, etc, will support Flashcopy consistency groups in the 
near future.


Bruce Black
Innovation Data Processing

--
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: Flashcopy question

 
In a message dated 6/29/2005 3:06:13 P.M. Central Standard Time,  
[EMAIL PROTECTED] writes:

FDRINSTANT, our FDR enhancement for point-in-time backups using  
Flashcopy, Snap, etc, will support Flashcopy consistency groups in the  
near future.




So for the present your DBMS needs to be down!

--
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: Flashcopy question

 
In a message dated 6/29/2005 12:23:22 P.M. Central Daylight Time,  
[EMAIL PROTECTED] writes:

Is there  a way, in MVS, to set up the commands such that a single 
commit can be  done, which would be equivalent to setting them up on the 
ESS  HMC?

TIA,
Steve A.




Other solutions:
I didn't know about FDRINSTANT until I read BBlack's post.  There is  also 
IBM's PPRC hardware feature, used by their service offering GDPS.   Don't know 
if PPRC is implemented yet in 2105 ESS microcode.  Also EMC has  consistency 
group support in their controllers.
 
Bill Fairchild

--
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: Other DASD Erase programs

In [EMAIL PROTECTED], on
06/28/2005
   at 03:44 PM, Gabe Torres [EMAIL PROTECTED] said:

Is the List aware of any other Vendors or products that offer a
solution ($$) to writing over DASD at a DR site?

It's more difficult for virtual DASD. I doubt that there is a general
solution.
 
-- 
 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: Vtoc free information

In [EMAIL PROTECTED], on 06/28/2005
   at 04:32 PM, R.S. [EMAIL PROTECTED] said:

Last but not least: it is much less probable to blow up the system
when  using tools.

Many of the home grown tools are more robust than the equivalent
vendor products.
 
-- 
 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: Vtoc free information

In [EMAIL PROTECTED],
on 06/28/2005
   at 10:26 AM, Knutson, Sam [EMAIL PROTECTED] said:

I think the supposition is that for most people it is easier to deal
with tool output

From Gerhard's perspective I believe that LSPACE is a tool; he's been
around the block a few[1] times and is probably more familiar with the
assembler services than he is with the utilities.

[1] Can you say vacuum tubes?
 
-- 
 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: rexx , formatting question

2005-06-29 Thread Mark L. Wheeler

If you happen to have CMS/TSO Pipelines, you can try this:
   a  = 123456.789   /* Perhaps */
   a2 = format(a,,2)
   'PIPE()',
  'VAR A2 |',
  'SPECS A: 1-* .',
'SET #0:=A',
'PRINT #0 PICTURE ZZZ,ZZZ,ZZZ,ZZZ.99 1 |',
  'STRIP LEADING |',
  'VAR A2_WITH_COMMAS'
   say a
   say a2
   say a2_with_commas

Mark Wheeler, 3M Company

--
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: IDENTIFY restriction [was: RE: ISKE/IVSK]

2005-06-29 Thread Farley, Peter x23353

Agreed.  What it *does* say, though, is the answer to the question
originally raised about not being able to define arbitrary areas of memory
as programs.  There's no *documented* way to do it, which for those of us
who are not now or never were aware of the other PLIST for the IDENTIFY
SVC (i.e., me, among others) says that it cannot be done.

Also agreed, that is an *implied* conclusion of which you and others (thanks
also to Alex B. and GSF, inter alia) have disabused us all.  One more
example of what happens when one assumes.  Mea culpa.

'Nuff said.

Peter

-Original Message-
From: Shmuel Metz (Seymour J.) [mailto:[EMAIL PROTECTED] 
Sent: Wednesday, June 29, 2005 4:10 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: IDENTIFY restriction [was: RE: ISKE/IVSK]

In [EMAIL PROTECTED],
on 06/29/2005
   at 09:49 AM, Farley, Peter x23353 [EMAIL PROTECTED] said:

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA2A931/5.1
?SHELF=IEA2BK34DT=20030429143021CASE=

I don't see no stinking memo. What I see is essetially the same text that
was there all the way back to OS/360, describing the form of IDENTIFY used
to create a minor CDE. It doesn't say that the form of IDENTIFY used to
create a major CDE has been withdrawn or even changed.

_
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

JES2 Exit 2 3 Questions/HELP

2005-06-29 Thread Glenn Siegel

We are currently using JES2 Exit 3 for Account Code verification.  I have
been asked to change the account code if it doesnt match the table of
account codes.  I gave it a try without success, I believe I should be
using Exit 2 for this.
Q1. Can I use the same code from Exit 3 for Exit 2 for checking the account
code and then change the Account Code?
Q2. Does anyone have a working example for changing the Account Code in
Exit 2 or Exit 3, if so can I have a copy or a snip PLEASE?
TIA Glenn

--
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: Other DASD Erase programs

2005-06-29 Thread Bruce Black




The precise location of recorded bits around the track moves around  
somewhat.  That is why the controller does something called read with  offset when 
re-reading a block that produced a data check (aka head  shaking).  The 
read-write mechanism/transducer is moved a tiny distance to  the left of the center 
of where the track is supposed to be, the data is read,  if still bad then 
the transducer is moved a tiny distance to the right of the  center...  If the 
data cannot be read correctly (i.e., no data check  indication) and you have 
moved the transducer so far to either side that it is  now within the tolerance 
for the adjacent track, then you give up on reading  that block.


Another issue is residual magnetism.  When you magnetize a substance,  a 
large % of the molecules are aligned in a certain way.  When you erase  that data, 
not all the molecules get realigned back to their original  direction.  This 
is why skilled recording experts with expensive, sensitive  equipment can 
recover recorded data that was over-written or erased.  The  cost of such recovery 
is high.  The cost of erasing data to the point that  it cannot be recovered 
by an expert is also high.  The trade-off is how  valuable is the data to you 
and what would it cost you if someone else got the  data.


Don't forget that none of the above can be done from the mainframe.  To 
do these actions, someone must remove the FBA disks from the mainframe 
disk subsystem, attach them to a SCSI/Fiber channel with an appropriate 
PC or equipment, and then execute the proper diagnostic command to try 
and read the residual data.  What you will get is the data that the 
mainframe CU emulator wrote on the FBA disk, including emulated count 
fields and such, which varys by manufacturer.   Just makes the job of 
someone trying to recover your data more difficult. 

From the mainframe CCW point-of-view, once you write over a track, the 
previous contents are no longer recoverable. 


Bruce Black

--
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: Flashcopy question

2005-06-29 Thread Bruce Black


Ed Finnell wrote:


So for the present your DBMS needs to be down!

 

Yes, down or quiesced.  DB2 supports a LOG SUSPEND command which 
essentially suspends logging which suspends all update activity.  If you 
use FDRINSTANT or another point-in-time capture process, the time it 
needs to be uiesced is just minutes.


Even when consistency groups are supported, the data must be something 
like DB2 where updates are logged and the system can recover from an 
interruption (such as a power-failure) by backing out uncommitted updates. 


BTW, FDRINSTANT supports EMC Consistency Groups with BCVs today

Bruce Black

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

SVC 99 Question (sort of) File Creation Date Needed via ASM

2005-06-29 Thread JONES, CHARLIE

I have an assembler routine that reads a series of files and extracts
the report creation date

from the report header.  It just occurred to me that the report creation
date is the same as 

the file creation date.  Is there a slick way, knowing the file name in
advance, to dynamically

acquire the file creation date?  The SVC 99 Verb Code 07 does not seem
to provide this info.

 

This solution, if available, would save me from having to open all these
files and perform an I-O

operation.  I need to be able to do this via an assembler routine.

 

Charlie


--
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: SVC 99 Question (sort of) File Creation Date Needed via ASM

2005-06-29 Thread McKown, John

 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of JONES, CHARLIE
 Sent: Wednesday, June 29, 2005 3:50 PM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: SVC 99 Question (sort of) File Creation Date Needed via ASM

 I have an assembler routine that reads a series of files and extracts
 the report creation date

 from the report header.  It just occurred to me that the 
 report creation
 date is the same as 

 the file creation date.  Is there a slick way, knowing the 
 file name in
 advance, to dynamically

 acquire the file creation date?  The SVC 99 Verb Code 07 does not seem
 to provide this info.

 This solution, if available, would save me from having to 
 open all these
 files and perform an I-O

 operation.  I need to be able to do this via an assembler routine.

 Charlie

You can use the OBTAIN macro to read the format 1 DSCB. That contains
the creation date. Macro IECSDSL1 in SYS1.MODGEN will map the DSCB
records from the VTOC.

--
John McKown
Senior Systems Programmer
UICI Insurance Center
Information Technology

This message (including any attachments) contains confidential
information intended for a specific individual and purpose, and its'
content is protected by law.  If you are not the intended recipient, you
should delete this message and are hereby notified that any disclosure,
copying, or distribution of this transmission, or taking any action
based on it, 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: Problems Printing IBM PDFs

2005-06-29 Thread Edwin Philbrook

My Adobe reader is v7.0.1. I'll check for updates.

EdP





Bruce Black [EMAIL PROTECTED] 
Sent by: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU
06/29/2005 10:33 AM
Please respond to
IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: Problems Printing IBM PDFs






Edwin Philbrook wrote:

While trying to print the VSAM Transparency User's Guide, every 
occurrence of a pair of parentheses causes
 only their contents to print and an immediate page eject. The output is 
unusable. 
 

Make sure you have the latest Adobe Reader.  I believe V7.0.   I recall 
having printing errors on earlier releases.

Bruce Black

--
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: Candle Isogon

2005-06-29 Thread Mark Yuhas

I have been reading all of the speculations about the Isogon purchase.
We don't use SoftAudit.  But we do use SPIFFY - Isogon's ISPF
enhancement.  What is IBM's intention concerning SPIFFY?

--
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: OT Automated Teller Machines ATM software

2005-06-29 Thread Hal Merritt

http://www.efunds.com/us/en/index.cnt
 

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Ward, Mike S
Sent: Friday, June 17, 2005 9:26 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: OT Automated Teller Machines ATM software

Does anyone know of a vendor that sells ATM software for the mainframe.
I see a lot for server platform, but not mainframe. If anyone can
provide a name or number please do so.

Thanks.

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

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

Re: HSM statistics

2005-06-29 Thread Barry Schwarz

If the step executed, how could the steplib not be opened?

Mark Zelden [EMAIL PROTECTED] wrote:snip

Invovling the RACF people to make a rule just to find out who
is recalling a data set is easier said than done. Much easier
to look at a log (that's what they're for). Had to do this
here recently to find out who/what was recalling some old LE
data sets (installed off sysres back when it was installed
outside of ServerPac around MVS/ESA V5). Scanning prod
JCL decks wasn't an answer either since it was some
programmer's JCL. SMF wasn't a help because the data set
wasn't opened, just allocated in STEPLIB. I've often wanted an
SMF record just for allocation of a data set.



-
Yahoo! Sports
 Rekindle the Rivalries. Sign up for Fantasy Football

--
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: Other DASD Erase programs

 
In a message dated 6/29/2005 3:44:51 P.M. Central Daylight Time,  
[EMAIL PROTECTED] writes:

From the  mainframe CCW point-of-view, once you write over a track, the 
previous  contents are no longer recoverable. 



Yep yep yep.  For DR security purposes, format writing any kind of  data will 
cause the rest of the track to be erased after the last block is  written 
and, when read back by software on the mainframe, the original data will  not 
be 
readable.  In this case it doesn't matter if you write two, three,  50, or one 
block per track of only one byte long.  What matters is you are  doing format 
writes, as would be the case with DISP=NEW.  Still it will  require one whole 
revolution's worth of time for each track to be erased.   But with clever 
programming many, many such tracks can be erased simultaneously  on different 
devices.  The OP was concerned about security in a DR  situation and not top 
secret clearance sanitizing the data so that even  Mission Impossible people 
couldn't read it.
 
Bill Fairchild

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

Where is TSO PROFILE PREFIX(XX) stored?

2005-06-29 Thread Rob Wunderlich

z/os 1.4, RACF. I'm trying to display the TSO PROFILE PREFIX() value for
another user. Where is this value stored? I believe it is stored in RACF
somewhere, but I can't figure out how to display it.

Thanks,
Rob Wunderlich

--
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: Where is TSO PROFILE PREFIX(XX) stored?

2005-06-29 Thread Gates, Guy

Hello Rob,

  The Prefix information for a User is stored in the ISPF Profile
Dataset in Member ISPPROF. If you have the RACF Authority, You can view
the users Profile Dataset (Usually something like Userid.ISPF.PROFILE).
Or the user can display it by issuing the 'TSO PROFILE' Command on the
ISPF Command Line. 


Thanks...Guy M. Gates Jr.
TTI Z/OS Systems Programmer
Phone: (817) 740-9000 x-4627
Email: [EMAIL PROTECTED]
 

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Rob Wunderlich
Sent: Wednesday, June 29, 2005 4:47 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Where is TSO PROFILE PREFIX(XX) stored?

z/os 1.4, RACF. I'm trying to display the TSO PROFILE PREFIX() value for
another user. Where is this value stored? I believe it is stored in RACF
somewhere, but I can't figure out how to display it.

Thanks,
Rob Wunderlich

--
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: Where is TSO PROFILE PREFIX(XX) stored?

2005-06-29 Thread Imbriale, Donald (Exchange)

That's not true at all.  You can have a prefix without ever using ISPF
or having an ISPF profile data set.  It is stored in the TSO segment in
the RACF profile.

Don Imbriale


-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf
Of Gates, Guy
Sent: Wednesday, June 29, 2005 5:57 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Where is TSO PROFILE PREFIX(XX) stored?

Hello Rob,

  The Prefix information for a User is stored in the ISPF Profile
Dataset in Member ISPPROF. If you have the RACF Authority, You can view
the users Profile Dataset (Usually something like
Userid.ISPF.PROFILE).
Or the user can display it by issuing the 'TSO PROFILE' Command on the
ISPF Command Line.


Thanks...Guy M. Gates Jr.
TTI Z/OS Systems Programmer
Phone: (817) 740-9000 x-4627
Email: [EMAIL PROTECTED]


-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Rob Wunderlich
Sent: Wednesday, June 29, 2005 4:47 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Where is TSO PROFILE PREFIX(XX) stored?

z/os 1.4, RACF. I'm trying to display the TSO PROFILE PREFIX() value
for
another user. Where is this value stored? I believe it is stored in
RACF
somewhere, but I can't figure out how to display it.

Thanks,
Rob Wunderlich


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

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

Re: Where is TSO PROFILE PREFIX(XX) stored?

2005-06-29 Thread Rob Wunderlich

On Wed, 29 Jun 2005 16:57:06 -0500, Gates, Guy [EMAIL PROTECTED] wrote:

  The Prefix information for a User is stored in the ISPF Profile
Dataset in Member ISPPROF. 


This doesn't sound right to me. I can display  change my PREFIX() value
without ever entering ISPF or even allocating my ISPPROF dataset. I'm after
a TSO profile value, not an ISPF profile value.

-Rob Wunderlich

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

Re: HSM statistics

2005-06-29 Thread Mark Zelden

On Wed, 29 Jun 2005 14:37:44 -0700, Barry Schwarz [EMAIL PROTECTED]
wrote:

If the step executed, how could the steplib not be opened?


Good question.   The LE (SCEERUN) library in the STEPLIB was
emptied at Y2K time to ensure the modules from the LNKLST
were picked up. Quick fix at the time to make sure everyone
used the Y2K complient library without having to worry about
missing a JCL change somewhere. So the library is in the STEPLIB
concatenation, but never opened.

I just recently noticed that some of these old LE libraries
were never cleaned up and I'm trying to do so now without causing
jobs to fail due to JCL errors (even if they are only programmer
jobs).  After some due diligence, then I will get rid of them (via
proper change control of course) and take any heat from people
who were not informed.

Cheers,

Mark
--
Mark Zelden
Sr. Software and Systems Architect
mailto: [EMAIL PROTECTED]
Systems Programming expert at http://Search390.com/ateExperts/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html

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

Re: rexx , formatting question

n = LENGTH(a); if n3 then do i=n-3 to 1 by -3; a=INSERT('.',a,i); end
 
Brian
 



From: IBM Mainframe Discussion List on behalf of Daniel Cremieux
Sent: Wed 29/6/05 17:05
To: IBM-MAIN@BAMA.UA.EDU
Subject: rexx , formatting question



dear gurus,

a=15.53666222

How to display only the 2 first decimal digit :

= a=15.53 (or 15.54 i don't mind for the precision)

Thank you

another question :
a=1555666
is there any way to display it as 1.555.666 ( easier to read)


great thanks

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
This e-mail message is for the sole use of the intended recipient(s)and may 
contain confidential and privileged information of Transaction NetworkServices. 
 
Any unauthorized review, use, disclosure or distribution isprohibited.  If you 
are not the intended recipient, please contact thesender by reply e-mail and 
destroy all copies of the original message.

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

Re: Where is TSO PROFILE PREFIX(XX) stored?

2005-06-29 Thread Ray Mullins

Hi Rob,

It's in the TSO segment.  It might be easier to run the RACF data base
unload utility.

(Still up in Nevada County?  Reply off-list.)

Later,
Ray

-- 
M. Ray Mullins 
Roseville, CA, USA 
http://www.catherdersoftware.com/
http://www.mrmullins.big-bear-city.ca.us/ 
http://www.the-bus-stops-here.org/ 

 

 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of Rob Wunderlich
 Sent: Wednesday 29 June 2005 14:47
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: Where is TSO PROFILE PREFIX(XX) stored?
 
 z/os 1.4, RACF. I'm trying to display the TSO PROFILE 
 PREFIX() value for another user. Where is this value stored? 
 I believe it is stored in RACF somewhere, but I can't figure 
 out how to display it.
 
 Thanks,
 Rob Wunderlich
 
 --
 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: Where is TSO PROFILE PREFIX(XX) stored?

2005-06-29 Thread Skip Robinson

And if there is no TSO segment?
.
.
.
JO.Skip Robinson
Southern California Edison Company
SHARE MVS Program Co-Manager
626-302-7535 Office
323-715-0595 Mobile
[EMAIL PROTECTED]

IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU wrote on 06/29/2005
15:35:50:

 Hi Rob,

 It's in the TSO segment.  It might be easier to run the RACF data base
 unload utility.


--
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: Where is TSO PROFILE PREFIX(XX) stored?

2005-06-29 Thread Rob Wunderlich

On Wed, 29 Jun 2005 15:35:50 -0700, Ray Mullins [EMAIL PROTECTED] wrote:
Hi Rob,

It's in the TSO segment.  It might be easier to run the RACF data base
unload utility.

Thanks all. I found the answer over in the RACF-L archive. It's stored in
the TSO segment, field TUPT. There is no command support for the TUPT
field, which means I can't display the value for another user. I'll take a
look at the unload utility output. Thanks.

-Rob Wunderlich

--
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: Where is TSO PROFILE PREFIX(XX) stored?

2005-06-29 Thread Ray Mullins

Then there's UADS, or there's no prefix setting (defaulting then to the
userid).

But in my experience, people that use TSO have TSO segments.  Sure, I'm sure
there are places that don't have them...

Ray



-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Skip Robinson
Sent: Wednesday June 29 2005 15:39
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Where is TSO PROFILE PREFIX(XX) stored?

And if there is no TSO segment?
.
.
.
JO.Skip Robinson
Southern California Edison Company
SHARE MVS Program Co-Manager
626-302-7535 Office
323-715-0595 Mobile
[EMAIL PROTECTED]

IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU wrote on 06/29/2005
15:35:50:

 Hi Rob,

 It's in the TSO segment.  It might be easier to run the RACF data base 
 unload utility.


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

ESCON to FICON conversion

2005-06-29 Thread Salway, Nigel

Dear Friends, 

 

I am looking to scope out a possible conversion from ESCON to FICON on a
Shark I manage. There are currently 4 ESCON channels EMIFed to 4 LPARs
on one CPU. If this were to converted to FICON channels, approximately
how many would I need? With only one CPU in the complex, can I connect
the channels natively or shoulr I look at a FICON director. I don't
currently use an ESCON director. 

 

I am having some troubles finding documentation which addresses the
above questions. Could someone please send me a URL or some
recommendations on how to scope out this conversion. 

 

Cheers

 

Nigel Salway


--
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: Where is TSO PROFILE PREFIX(XX) stored?

2005-06-29 Thread Skip Robinson

I think there's ALWAYS a prefix setting. It just starts out as (defaults
to) userid until changed to something else.

And yes, there are places that still use UADS. If you do use UADS in your
particular cave dwelling, you see the prefix when you LIST the userid:

USER PROFILE TABLE:
  00382101 prefix-

If the prefix is changed via the PROFILE command, it gets written out to
UADS at logoff.

Whatever the mechanism, only a logged on user can change the prefix, and
only via the PROFILE command.

.
.
.
JO.Skip Robinson
Southern California Edison Company
SHARE MVS Program Co-Manager
626-302-7535 Office
323-715-0595 Mobile
[EMAIL PROTECTED]

IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU wrote on 06/29/2005
15:43:28:

 Then there's UADS, or there's no prefix setting (defaulting then to the
 userid).

 But in my experience, people that use TSO have TSO segments.  Sure, I'm
sure
 there are places that don't have them...

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

Transition requirements for new world was Re: z/OS future needs was Re: USS in a legacy world

2005-06-29 Thread Clark Morris

In the exchange below there is an important point about how we get
from where we are to where the system is going.  Shmeul is saying we
will need a compatibility interface for BSAM and BPAM while I am
contending this won't be necessary.  We may or may not be as far apart
as the discussion below indicates but I am certain there are a number
of areas where this same discussion will occur.  I will agree that so
far as any higher level language program (COBOL, PL1, maybe C/C++,
etc.) the only program change should be a straight recompile at most
and depending on the support routines involved, it might all be
handled by the LE or language specific run-time completely transparent
to the application programmer.  64 bit support probably necessitates a
recompile.

For the rest of the points raised I am making the following
assumptions and need to understand if they are correct.

1.  BSAM and BPAM are only used by assembler level programs.  I know
that COBOL has no BPAM and BSAM capability.

2.  There will be a multi-year overlap between when the ability to
fully run a system on FBA native devices first becomes available and
when support for CKD is finally dropped where multi means at least 5.

3.  COBOL will finally lose the distinction between ESDS and QSAM data
sets.  This would be in line with the SHARE Guide Lanuage Futures Task
Force report.  Note that I would hope for the same thing to happen for
the other languages that I can read with difficulty and frequent
reference to a manual.

4  Few if any applications programs in most shops (as opposed to
system or home grown utilities) depend on BSAM and BPAM in
installation written code.

5.  Vendors currently using BPAM and BSAM will need to upgrade to
using the new access mechanisms because they will need to be able to
handle the new facilities and functions available for sequential and
library files.  

The ability to handle any mixture of QSAM and ESDS files (and allowing
ESDS files to go to tape and printer) is probably a compatibility
interface.  However I consider it more a conformance to the Language
Futures Task Force idea that we want the program to be as independent
as possible of how the data is actually stored and only be concerned
with whether the logical access is possible.  Thus we wanted a program
to be able to access a QSAM file, an ESDS, a KSDS, a DB2 view or any
other input that shared the same record description with zero program
change.  VSAM transparency facilities for ADABAS and DB2 reflect this
vision.

Various things will change drastically as we move toward FBA, 64 bit
addressing, different character sets, and larger names.  Since
compatibility interfaces represent code that can break, I would want
to see as few as possible.  On the other hand, the amount of change
needed to existing facility must be minimized and change must be as
non-disruptive as possible.  I do not envy those who have to design
the migration path.  I will be interested to find out what others
think.  It won't be the first time I have overlooked the obvious.


On 28 Jun 2005 04:57:21 -0700, in bit.listserv.ibm-main you wrote:

In [EMAIL PROTECTED], on 06/25/2005
   at 11:32 PM, Clark Morris [EMAIL PROTECTED] said:

Since the actual hardware is FBA now and the magic is done in the
controller, I see no need for the CKD oriented access methods to be
ported to new style devices.

I wasn't suggesting new device-dependent code for the old access
methods; I was suggesting a compatibility interface similar to that
used to allow you to open a DCB to a subsystem data set. Currently
OPEN has the ability to automatically acquire an ACB, open it and link
it to the DCB. I suspect that IBM could lift from VSE and OS/VS1 what
little code is needed beyond what is already there for SYSOUT.

Given the graying, balding and aging of the MVS etc. community, 
the BPAM and BSAM applications are fast becoming a millstone around 
the necks of our organizations.

That won't make them go away. They are an economic reality, and if IBM
wants to retain the customer base then it will need to provide for a
smooth migration.

The need is to move any still needed functions of BPAM and BSAM to 
newer architectures, not to move BPAM and BSAM. 

No, the need is to preserve investment. The customer doesn't care
about architecture; he cares about fiscal issues, one of which is
the residual value of code that he has already spent a lot of money
one. Tell him that he must spend additional money to rewrite that code
and you have removed his incentive to stay with IBM.

Also, your statement has an implication contrary to fact. There was no
proposal to move BPAM and BSAM; there was a proposal to provide a
device-independent CI.

I agree that changes to name lengths and use of Unicode will require 
drastic changes to the BCP but the combination of FBA and name length 
and character set changes will have a drastic impact on the JESs.

Why?

Any course of action will have
to be able to be executed in

Re: Running z/OS 1.4 on a G5/G6 after 31 March 2007

2005-06-29 Thread John Eells


[EMAIL PROTECTED] wrote:

snip

Since you can't order Z/OS 1.5 any longer, you must order Z/OS 1.7 even
if you don't implement it immediately.  Z/OS 1.8 will not be able to
come up into the sysplex with Z/OS 1.4 - this means you can't share
DASD, JES2, etc.


z/OS R6 is the currently orderable release.

--
John Eells
z/OS Technical Marketing
IBM Poughkeepsie
[EMAIL PROTECTED]

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

Re: Running z/OS 1.4 on a G5/G6 after 31 March 2007

2005-06-29 Thread John Eells


See below.

Peter Greening wrote:


Had initially mentioned only reference i've found so far is that z/OS 1.4
can coexist with z/OS 1.5, thru 1.7, but nothing about parallel sysplex.
In hindsight that was obviously poorly proof-read.


Coexistence includes parallel sysplex coexistence.


i had been unable to find anything stating that zOS 1.4 can co-exist in a
parallel sysplex with 1.5-1.7 when zOS1.4 is no longer supported.
My question should simply have been does it make any difference to this
level of co-existence if z/OS 1.4 is out of support?


Look, this is pretty simple.  z/OS R4 will coexist with z/OS R7.

But once z/OS R4 is withdrawn from service, two things will 
happen.  First, we will stop fixing any new coexistence issues 
that happen to arise on z/OS R4.  Second, we won't support 
problems in your mixed sysplex if the problem is caused by the 
unsupported z/OS R4 system.  (Yes, you can get extended support 
contracts, but I'm assuming you don't want to.)



i infer from Don's response that it does make a difference, in that if zOS
1.4 is unsupported as of 31/03/2007 then it is not allowed to co-exist with
other environments in the sysplex that are at 1.5 thru 1.7 (let alone 1.8)


So far as I know, we won't change the code just to prevent it, 
but if it doesn't work for some reason you're on your own once R4 
is unsupported.  That's part of what unsupported means.  But 
note that we might change the code in a way that prevents it for 
some other reason than merely preventing it.  For example, 
suppose we find a problem on a higher release that requires a 
change to all the systems in the sysplex, and take an APAR that's 
fixed on all supported releases.  If you can live without that 
fix, you're in luck.  If you cannot, there won't be an R4 fix, 
which could be, um, inconvenient.



Of itself, we are not concerned about running on an unsupported level of OS
for 6-9 months.  We are concerned about having to either
(1) conform, upgrade to z/architecture, and potentially move to a Group 80
license on a z890 from our current Amdahl Group 70 license, or
(2) suffer expulsion from the sysplex by no longer being part of PSLC
pricing.

Our desire is to stay in the sysplex on an unsupported version of zOS,
continue to benefit from PSLC, and then exit in Dec-2007.
Sounds as though our preferred approach is something up with which others
will not put.


Sorry, I've no clue about the pricing implications.

snip

--
John Eells
z/OS Technical Marketing
IBM Poughkeepsie
[EMAIL PROTECTED]

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

Transition requirements for new world was Re: z/OS future needs was Re: USS in a legacy world

2005-06-29 Thread Clark Morris

In the exchange below there is an important point about how we get
from where we are to where the system is going.  Shmeul is saying we
will need a compatibility interface for BSAM and BPAM while I am
contending this won't be necessary.  We may or may not be as far apart
as the discussion below indicates but I am certain there are a number
of areas where this same discussion will occur.  I will agree that so
far as any higher level language program (COBOL, PL1, maybe C/C++,
etc.) the only program change should be a straight recompile at most
and depending on the support routines involved, it might all be
handled by the LE or language specific run-time completely transparent
to the application programmer.  64 bit support probably necessitates a
recompile.

For the rest of the points raised I am making the following
assumptions and need to understand if they are correct.

1.  BSAM and BPAM are only used by assembler level programs.  I know
that COBOL has no BPAM and BSAM capability.

2.  There will be a multi-year overlap between when the ability to
fully run a system on FBA native devices first becomes available and
when support for CKD is finally dropped where multi means at least 5.

3.  COBOL will finally lose the distinction between ESDS and QSAM data
sets.  This would be in line with the SHARE Guide Lanuage Futures Task
Force report.  Note that I would hope for the same thing to happen for
the other languages that I can read with difficulty and frequent
reference to a manual.

4  Few if any applications programs in most shops (as opposed to
system or home grown utilities) depend on BSAM and BPAM in
installation written code.

5.  Vendors currently using BPAM and BSAM will need to upgrade to
using the new access mechanisms because they will need to be able to
handle the new facilities and functions available for sequential and
library files.  

The ability to handle any mixture of QSAM and ESDS files (and allowing
ESDS files to go to tape and printer) is probably a compatibility
interface.  However I consider it more a conformance to the Language
Futures Task Force idea that we want the program to be as independent
as possible of how the data is actually stored and only be concerned
with whether the logical access is possible.  Thus we wanted a program
to be able to access a QSAM file, an ESDS, a KSDS, a DB2 view or any
other input that shared the same record description with zero program
change.  VSAM transparency facilities for ADABAS and DB2 reflect this
vision.

Various things will change drastically as we move toward FBA, 64 bit
addressing, different character sets, and larger names.  Since
compatibility interfaces represent code that can break, I would want
to see as few as possible.  On the other hand, the amount of change
needed to existing facility must be minimized and change must be as
non-disruptive as possible.  I do not envy those who have to design
the migration path.  I will be interested to find out what others
think.  It won't be the first time I have overlooked the obvious.

The reason I believe that the JES component will be drastically hit by
the change in name provision is that a high percentage of the JES
control blocks contain names from JCL and similar sources.

On 28 Jun 2005 04:57:21 -0700, in bit.listserv.ibm-main you wrote:

In [EMAIL PROTECTED], on 06/25/2005
   at 11:32 PM, Clark Morris [EMAIL PROTECTED] said:

Since the actual hardware is FBA now and the magic is done in the
controller, I see no need for the CKD oriented access methods to be
ported to new style devices.

I wasn't suggesting new device-dependent code for the old access
methods; I was suggesting a compatibility interface similar to that
used to allow you to open a DCB to a subsystem data set. Currently
OPEN has the ability to automatically acquire an ACB, open it and link
it to the DCB. I suspect that IBM could lift from VSE and OS/VS1 what
little code is needed beyond what is already there for SYSOUT.

Given the graying, balding and aging of the MVS etc. community, 
the BPAM and BSAM applications are fast becoming a millstone around 
the necks of our organizations.

That won't make them go away. They are an economic reality, and if IBM
wants to retain the customer base then it will need to provide for a
smooth migration.

The need is to move any still needed functions of BPAM and BSAM to 
newer architectures, not to move BPAM and BSAM. 

No, the need is to preserve investment. The customer doesn't care
about architecture; he cares about fiscal issues, one of which is
the residual value of code that he has already spent a lot of money
one. Tell him that he must spend additional money to rewrite that code
and you have removed his incentive to stay with IBM.

Also, your statement has an implication contrary to fact. There was no
proposal to move BPAM and BSAM; there was a proposal to provide a
device-independent CI.

I agree that changes to name lengths and use of Unicode will require 
drastic

Dropping duplicates.

2005-06-29 Thread Adrian H Auer-Hudson

Listers,

Anyone have any thoughts on this:  I have a large sequential file.  I need to 
drop duplicate records from said file.  Sort would work fine if I knew the 
correct key sequence.  This information is not imediately available.   The file 
needs to retain its input sequence.  Duplicates are always grouped together.

Short of writing a program is there a quick way to fix this?

Thanks

Adrian.

Webmaster, http://www.losangelesmetro.net.
Supporter of Expo Light Rail - Enabler for the Digital Coast 
http://www.friends4expo.org.

--
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: Dropping duplicates.

2005-06-29 Thread Adrian H Auer-Hudson

Thanks Frank,

No DFSORT and NO ICETools here.  DFSORT would have been great.  Regular sort 
will not work without a Sort or merge statement.

The file characteristics are:

 Organization  . . . : PS 
 Record format . . . : FB 
 Record length . . . : 320
 Block size  . . . . : 27840  

The first eighty bytes look like:

077075333730D2123200506001435L062M79506   MPC   

It fills 114 cylinders.

Dups are identical records and they should not exist.

Thanks again

A.




Webmaster, http://www.losangelesmetro.net.
Supporter of Expo Light Rail - Enabler for the Digital Coast 
http://www.friends4expo.org.

--
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: Dropping duplicates.

2005-06-29 Thread Frank Yaeger

Actually I thought of a much better way to do this with DFSORT's ICETOOL
given that you say all of the duplicates are grouped together.
This version only requires one copy pass rather than two sort passes.

//S1EXEC  PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN DD *
 01
 02
 01
 01
 02
 03
 04
 01
 02
 03
 01
/*
//OUT DD SYSOUT=*
//TOOLIN DD *
* Select first record with each key.
 SELECT FROM(IN) TO(OUT) ON(1,4,CH) FIRST USING(CTL1)
/*
//CTL1CNTL DD *
* Force copy instead of sort since dup records are
* grouped together.
   OPTION COPY
/*

Frank Yaeger - DFSORT Team (IBM)
 Specialties: 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: Dropping duplicates.

2005-06-29 Thread Arthur T.

On 29 Jun 2005 17:21:35 -0700, in bit.listserv.ibm-main 
(Message-ID:[EMAIL PROTECTED]) 
[EMAIL PROTECTED] (Adrian H Auer-Hudson) wrote:


Anyone have any thoughts on this:  I have a large 
sequential file.  I need to drop duplicate records from 
said file.  Sort would work fine if I knew the correct key 
sequence.  This information is not imediately 
available.   The file needs to retain its input 
sequence.  Duplicates are always grouped together.


Short of writing a program is there a quick way to fix this?


 These are statements for Syncsort.  I'm not sure if 
there's an exact equivalent for DFSORT.  Also, I haven't 
tried it, but this *might* work:


SORT FIELDS=COPY
   SUM FIELDS=NONE  


--
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: Gates on outsourcing

2005-06-29 Thread Ed Gould


On Jun 29, 2005, at 2:34 PM, Ed Finnell wrote:



In a message dated 6/29/2005 2:27:56 P.M. Central Standard Time,
[EMAIL PROTECTED] writes:

I don't  always like what comes out of Redmond, but this time I think
businesses  should listen up to Mr. Gates:






He also puts his money where his mouth is, with large contributions
to in trouble schools and libraries.


Yes but only if they use WINDOWS software :(

--
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: Gates on outsourcing

 
In a message dated 6/29/2005 9:34:02 P.M. Central Standard Time,  
[EMAIL PROTECTED] writes:

Yes but  only if they use WINDOWS software :(




Guess if the choice is Windows or shutdown, it's not a hard
decision.

--
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: Gates on outsourcing

2005-06-29 Thread Robert Justice

shutdown looks like the winner in that battle ! 
(of course you have to startup to shutdown) 



- Original Message - 
From: Ed Finnell [EMAIL PROTECTED]

Newsgroups: bit.listserv.ibm-main
To: IBM-MAIN@BAMA.UA.EDU
Sent: Wednesday, June 29, 2005 10:37 PM
Subject: Re: Gates on outsourcing




In a message dated 6/29/2005 9:34:02 P.M. Central Standard Time,  
[EMAIL PROTECTED] writes:


Yes but  only if they use WINDOWS software :(






Guess if the choice is Windows or shutdown, it's not a hard
decision.

--
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: Gates on outsourcing

2005-06-29 Thread Ed Gould


On Jun 29, 2005, at 9:37 PM, Ed Finnell wrote:



In a message dated 6/29/2005 9:34:02 P.M. Central Standard Time,
[EMAIL PROTECTED] writes:

Yes but  only if they use WINDOWS software :(






Guess if the choice is Windows or shutdown, it's not a hard
decision.


Double standard here... if IBM were to do the same people would squel 
like a stuck pig. I have heard Gates do the same with education 
types...


Ed

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

Re: Gates on outsourcing