Re: z990s still running?

2010-09-08 Thread Mike Schwab
On Wed, Sep 8, 2010 at 12:59 AM, Edward Jaffe
edja...@phoenixsoftware.com wrote:
  On 9/7/2010 10:13 PM, Ron Hawkins wrote:

 I occasionally get copied on questions regarding support for OS390 on our
 (HDS) storage products. I think the most recent was a question about
 support
 for OS/390 1.2

 Wow! The oldest OS I've seen recently was OS/390 2.4 in a stabilized site
 that has been trying to get off the mainframe for over a decade.

 --
 Edward E Jaffe
 Phoenix Software International, Inc
 831 Parkview Drive North
 El Segundo, CA 90245
 310-338-0400 x318
 edja...@phoenixsoftware.com
 http://www.phoenixsoftware.com/

On the Hercules groups they have some sites running MVS 3.8 on
emulators.  50 mips per thread on current boxes.

-- 
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

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


Re: IEC020I 001-1

2010-09-08 Thread Fred van der Windt
 If you did not explicitly create a PDS but allowed IEWL and 
 JCL to create this library, is it possible a PDS-E was 
 created instead?  A program that tries to read a program 
 object from a PDS-E if it were a load module from a PDS (by 
 using BSAM) will abend with s001-01 .  

You are rigth: it is a PDSE. I figured that wouldn't really make a difference 
and I could just use that as 'test' input. I'll try a normal PDS or (PDSE) to 
see if I can read that. Thanks for the tip!

So how does one 'read' a program object? 

Fred!
-
ATTENTION:
The information in this electronic mail message is private and
confidential, and only intended for the addressee. Should you
receive this message by mistake, you are hereby notified that
any disclosure, reproduction, distribution or use of this
message is strictly prohibited. Please inform the sender by
reply transmission and delete the message without copying or
opening it.

Messages and attachments are scanned for all viruses known.
If this message contains password-protected attachments, the
files have NOT been scanned for viruses by the ING mail domain.
Always scan attachments before opening them.
-

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


Extended Beta program for TSSO replacement Product

2010-09-08 Thread Brian Westerman
Hi All,

The extended Beta program for SyzMPF/z (cool name huh?) is getting ready to
start.  This is the product that will eventually replace all of TSSO's
capabilities.  

Anyone who is interested should send an email to clientsupp...@syzygyinc.com
(or to me), the original Beta program was limited to 23 sites and is now
over.  This extended Beta limited to 100 sites and is expected to last about
a month.  It's intent is to really give the product a thorough workout. 

The newsworthy part of this is that participants in the Beta Program get the
product at no cost for a year.

The 23 sites who already participated are not eligible to participate, (but
they already get free copies anyway).

Once 100 sites area accepted the Beta will close, there is no preference for
existing customers of the other Syzygy products, this one is open to
everyone and is first-come-first-served.  

Brian

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


Re: Need a simple counter

2010-09-08 Thread Miklos Szigetvari

 Hi

I understand not so simple, but the problem is why not , at last in 
processor level
If you compare the effort to get a unique key with the large number of 
new,  sometimes exotic , machine instructions
you can ask Why it is so. Why don't get a counter from the CPU or with 
some simple system call ?


On 9/7/2010 10:29 PM, john gilmore wrote:

The OP asked for a perhaps SYSPLEX-wide facility.  The CF-based approach I 
suggested is probably a minimal way to meet this requirement.

For those of you who have not looked at such problems in any detail itr is 
perhaps appropriate to recall that SYSPLEX-wide data sharing poses significant, 
non-trivial problems.

It is not neurosurgery, but It certainly cannot be done in COBOL, which, 
whatever its other merits, is not a systems-implementation language.

You must write authorized code; and you need the appropriate design and testing 
skills, as I made clear in my original post.  If you don't have them you should 
think about getting an ISV who does to do the job for you.

John Gilmore Ashland, MA 01721-1817 USA



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




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


Re: SDSF REXX exec to read the actual job

2010-09-08 Thread Miklos Szigetvari

 Hi

Yes, it is a normal batch job

On 9/7/2010 6:42 PM, Itschak Mugzach wrote:

Are you sure this is a job and not an STC? An STC might run under the master
address space and does not need Jes2 to start.

On Tue, Sep 7, 2010 at 4:21 PM, Miklos Szigetvari
miklos.szigetv...@isis-papyrus.com  wrote:


 Hi

SDSF REXX try to read the actual , running job and got JCT NOT AVAILABLE ,
but it can read the active from anybody else.
(sorry, I'm hyperactive today)

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


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



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


Re: z990s still running?

2010-09-08 Thread R.S.

zMan pisze:

Just curious -- I came across a customer who is still running on a
z990, with no plans to upgrade or move off of z. That surprised me:
I'd've bet that the only z990s still running were in companies who are
certain they're turning off the z system (no matter how long it takes)
and are thus willing to spend far more $$$ on maintenance because they
don't want to enter into a new lease.

At the risk of asking folks to air dirty laundry, anyone still running
on hardware that old? Care to explain why?


I'm aware of 9672 G5 machine still working on production. Just to 
remind: z/990 - z/900 - 9672 G6 - 9672 G5.

Reason: IT'S WORKING AND ITS PROFITABLE. No growth perspective.
Hardware maintenance? No service contract. Service per call is ordered 
from third party vendor.


Another example: z-Previous machines in DR centre. Cold backup. No HW 
service contract as well.


Third example: z/990 on production. No HW service contract, but another 
z/990 is standing nearby the first one. A plan for HW failure is simple: 
use another machine. No sysplex due to application reasons, historical 
reasons, lack of timers, license reasons (more MIPS = more $$$), and 
finally no business requirements.


In fact the only real competition for IBM mainframes are ...older IBM 
mainframes.

--
Radoslaw Skorupka
Lodz, Poland


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

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

NIP: 526-021-50-88
Wedug stanu na dzie 01.01.2009 r. kapita zakadowy BRE Banku SA (w caoci 
wpacony) wynosi 118.763.528 zotych. W zwizku z realizacj warunkowego 
podwyszenia kapitau zakadowego, na podstawie uchway XXI WZ z dnia 16 marca 
2008r., oraz uchway XVI NWZ z dnia 27 padziernika 2008r., moe ulec 
podwyszeniu do kwoty 123.763.528 z. Akcje w podwyszonym kapitale zakadowym 
BRE Banku SA bd w caoci opacone.

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


Re: z990s still running?

2010-09-08 Thread R.S.

zMan pisze:

On Tue, Sep 7, 2010 at 9:04 PM, Edward Jaffe
edja...@phoenixsoftware.com wrote:

Earlier this year, we got a weekend support call from one of the world's
largest corporations because one of our products was abending 0C1 under z/OS
1.4 running on a 9672 at a DR site. The program took a path through our zHPF
I/O driver that contained some z/Architecture (aka grande) instructions.
Gave them a ZAP to force use of the old EXCP path and all was well.



Lesson learned: there is some very old hardware still being used out
there...


Indeed. DR site has 9672? That's just asking for a DRD*. And talk
about slow! What is that, 178MIPS?


Per CP. The largest 9672 is 1790 MIPS. Sounds better? Oh, Parallel 
Sysplex was invented then, so le's count several machines.


Of course I agree it's not state of the art DR. ;-)
--
Radoslaw Skorupka
Lodz, Poland


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

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

NIP: 526-021-50-88
Wedug stanu na dzie 01.01.2009 r. kapita zakadowy BRE Banku SA (w caoci 
wpacony) wynosi 118.763.528 zotych. W zwizku z realizacj warunkowego 
podwyszenia kapitau zakadowego, na podstawie uchway XXI WZ z dnia 16 marca 
2008r., oraz uchway XVI NWZ z dnia 27 padziernika 2008r., moe ulec 
podwyszeniu do kwoty 123.763.528 z. Akcje w podwyszonym kapitale zakadowym 
BRE Banku SA bd w caoci opacone.

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


Re: O/T IBM to Ship World's Fastest Computer Chip

2010-09-08 Thread Gerhard Postpischil

On 9/8/2010 12:42 AM, Mike Schwab wrote:

Just got a good example of journalistic incompetence.
http://twitpic.com/2lqaqh


The accompanying map is clipped, but appears to locate Bornholm 
on the western side Sweden. Must be a secret astronaut training 
base G



Gerhard Postpischil
Bradford, VT

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


Re: O/T IBM to Ship World's Fastest Computer Chip

2010-09-08 Thread Mike Schwab
On Wed, Sep 8, 2010 at 2:04 AM, Gerhard Postpischil gerh...@valley.net wrote:
 On 9/8/2010 12:42 AM, Mike Schwab wrote:

 Just got a good example of journalistic incompetence.
 http://twitpic.com/2lqaqh

 The accompanying map is clipped, but appears to locate Bornholm on the
 western side Sweden. Must be a secret astronaut training base G


 Gerhard Postpischil
 Bradford, VT

Surprised no one has found it in all the time since Tycho was training there.
-- 
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

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


Re: Need a simple counter

2010-09-08 Thread Rob Scott
Miklos,

Generating a sysplex-wide token value is a very simple process - but having a 
counter that is only updated (or reset) by permitted tasks on each system 
presents much more of a programming challenge and would in turn require some 
sort of runtime options to dictate how the counter is handled in normal and 
abnormal circumstances (for example, what to do if the creating TCB/ASID/SYSTEM 
goes away unexpectedly).

If you do not care about the counter contents and just want some sort of 
permanently increasing value then you might get some usage from the STCK/STCKE 
instruction.

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


-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Miklos Szigetvari
Sent: 08 September 2010 07:37
To: IBM-MAIN@bama.ua.edu
Subject: Re: Need a simple counter

  Hi

I understand not so simple, but the problem is why not , at last in 
processor level
If you compare the effort to get a unique key with the large number of 
new,  sometimes exotic , machine instructions
you can ask Why it is so. Why don't get a counter from the CPU or with 
some simple system call ?

On 9/7/2010 10:29 PM, john gilmore wrote:
 The OP asked for a perhaps SYSPLEX-wide facility.  The CF-based approach I 
 suggested is probably a minimal way to meet this requirement.

 For those of you who have not looked at such problems in any detail itr is 
 perhaps appropriate to recall that SYSPLEX-wide data sharing poses 
 significant, non-trivial problems.

 It is not neurosurgery, but It certainly cannot be done in COBOL, which, 
 whatever its other merits, is not a systems-implementation language.

 You must write authorized code; and you need the appropriate design and 
 testing skills, as I made clear in my original post.  If you don't have them 
 you should think about getting an ISV who does to do the job for you.

 John Gilmore Ashland, MA 01721-1817 USA


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



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

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


Re: O/T IBM to Ship World's Fastest Computer Chip

2010-09-08 Thread Mike Schwab
On Wed, Sep 8, 2010 at 2:33 AM, Mike Schwab mike.a.sch...@gmail.com wrote:
 On Wed, Sep 8, 2010 at 2:04 AM, Gerhard Postpischil gerh...@valley.net 
 wrote:
 On 9/8/2010 12:42 AM, Mike Schwab wrote:

 Just got a good example of journalistic incompetence.
 http://twitpic.com/2lqaqh

 The accompanying map is clipped, but appears to locate Bornholm on the
 western side Sweden. Must be a secret astronaut training base G

 Gerhard Postpischil
 Bradford, VT

 Surprised no one has found it in all the time since Tycho was training there.

Maybe he had Galileo convert a diving bell to a space capsule?

And actually built his helicopter to retrieve it after a launch.
-- 
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

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


Re: Need a simple counter

2010-09-08 Thread Mike Schwab
On Tue, Sep 7, 2010 at 1:57 AM, Miklos Szigetvari
miklos.szigetv...@isis-papyrus.com wrote:
     Hi

    Sometimes I would need a simple SYSTEM/SYSTEMS/SYSPLEX wide counter, for
 every call gives back the next number.
 (Seen maybe in CICS ?)

If not updated too frequently, with a shared catalog or volume, just a
counter in a file?
Open, read, increment, rewrite, close in under 0.1 second.

-- 
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

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


REXX : how to determine the member name of a DD card

2010-09-08 Thread CUNY Yann
Hi all ! 

 

I have this JCL : 

 

//STEP11   EXEC PGM=IKJEFT01,REGION=0M  

//SYSTSIN  DD * 

PROFILE NOPREF  

TEST15  

/*  

//SYSTSPRT DD SYSOUT=*  

//SYSEXEC  DD DSN=P3CUN.YANN.REXX,DISP=SHR  

//IN   DD DSN=P3CUN.YANN.JCL(TEST14),DISP=SHR 

 

 

I need, in my rexx, to retrieve the member name of the DD CARD IN.  With the 
LISTDSI, I just have the pds name. 

I don't want to add a paramèter. And I don't want to make an execio on another 
dd card. 

 

Any idea ?


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


Re: RMM Volume Delete fails.

2010-09-08 Thread Mike Wood
A better subject would have been 'IDCAMS volume delete fails', since this is
not RMM related.

It does appear to be tough to find out the authorization required to use
IDCAMS to update VOLCATs. In my experience, as well as the
STGADMIN.IGG.LIBRARY (required using IDCAMS) you also need the correct
authority to the catalog.
For example, for RMMs' EDGSPLCS utility that supports changes to the VOLCAT
via CBRXLCS macro, we document this catalog authority is needed.
(http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/dgt2c880/17.12?SHELF=EZ2ZBK0I.bksDT=20090527133850)

The Managing Catalogs books is also clear about what authorization is needed
to delete catalog entries.

Mike Wood   RMM Development

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


Re: Visibility of New Volume in Storage Group

2010-09-08 Thread Rick Humburg
Thanks to Rob and the others who replied.  I may have erred on the side of
brevity in my original question.  I am working on a problem from one of our
customers.  This customer added a volume to a storage group, but we did not
report a decrease in the percentage used across a group of volumes.  I was
trying to confirm that this was in fact due to no allocation being done.

Back to the technical level, I am looking at the SGD rather than the VLD. 
Is there a reference in IBM documentation for the first allocation condition?

On Tue, 7 Sep 2010 15:39:25 +, Rob Scott rsc...@rocketsoftware.com wrote:

Rick

I believe you might be referring to the fact that SMS will not report on
space usage or capacity for the volume in the VLD until the first allocation
is done.

What does ISMF say about the volume from the active config?

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

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


Re: REXX : how to determine the member name of a DD card

2010-09-08 Thread karolf Gazeta.pl
Hi!

You can go from TCB to TIOT and then from TIOT to JFCB.
In TIOT there is a table of all  DD statements of the job, In each table
entry there is pointer to approp. JFCB. In JFCB there are entries( one on
more) for all DSN-s on this DD statement (1 where concatenation occurs),
possibly. with member name (when dsn has form dsnname(membername)).



 /*===REXX=2010/09/02===KF===*/
/*---*/
/* Build stem zbiory_joba remembering names all DD statem. of */
/* job and for each dd statement DDNAME and name(s)(DSN) data */
/* sets (possibly with membername). */
/* Names - where on DD there are concatenated data sets. */
/*---*/
buld_jobs_files:
/*---*/
/* zbiory_joba.nr_dd.ddn- names of following jobs joba.(8b) */
/* zbiory_joba.nr_dd.ile-- number of concatenated data sets */
/* on this DD statement. */
/* zbiory_joba.nr_dd.nr_dsn.dsn-- dsn-s on DD number */
/* nr_dd. */
/* zbiory_joba.nr_dd.nr_dsn.mem-- member (or 8 spaces) for */
/* DSN number nr_dd. */
/* (DSN=dsnname(membername) */
/* */
/*---*/
/* TCB - task control block */
/* TIOT - task input/output table */
/* JFCB - Job File Control Block */
/*---*/
/* TCB+12 ---TIOT */
/* TIOT+24 first DD entry */
/* +4(8 bytes=DDNAME) */
/* +12(3 bytes -swa coded JFCB address) */
/* | */
/* | */
/* V */
/* JFCB (44 bytes=DSN) */
/* JFCB+44 (8bytes=membername or spaces) */
/*===*/
/* start of current TCB - address 540 */
tcbadr=C2D(STORAGE(D2X(540),4))
/* from TCB to TIOT */

adrtioa=C2D(STORAGE(D2X(tcbadr+12),4))
/**/
/* In TIOA table of all DD entries */
/* current jobstep. */
/**/
/* skip first 24 bytes (not interesting for us) */
adrtioa=adrtioa+24 /* address of first DD segment */
dd_count=0
dsn_count=0
do forever /* do until entry length  0 */
entrylen=C2D(STORAGE(D2X(adrtioa),1)) /* len of current entry */
/* on 1 byte! */
if entrylen=0 then
leave
adrdd=adrtioa+4
ddname=STORAGE(D2X(adrdd),8)
if ddnamethen do /* not concatenated or first in conc. */
dd_count=dd_count+1
zbiory_joba.dd_count.ddn=ddname
dsn_count=1
zbiory_joba.dd_count.ile=1
end
else do /* DD = spaces - concatenation */
dsn_count=dsn_count+1 /* count conc. data sets */
zbiory_joba.dd_count.ile=dsn_count
end
/* from TIOT entry to JFCB */
/* JFCB address on 3 bytes! (and sva coded!) */
adrjfcb=C2D(STORAGE(D2X(adrtioa+12),3))
/* add left zreoes 8 digits (4 bytes)*/
if LENGTH(adrjfcb)=2 then
adrjfcb='00'||adrjfcb
if LENGTH(adrjfcb)=3 then
adrjfcb='0'||adrjfcb
else
if LENGTH(adrjfcb)=4 then
adrjfcb=''||adrjfcb
else
if LENGTH(adrjfcb)=5 then
adrjfcb='000'||adrjfcb
else
if LENGTH(adrjfcb)=6 then
adrjfcb='00'||adrjfcb
else
if LENGTH(adrjfcb)=7 then
adrjfcb='0'||adrjfcb
/* uncode JFCB address */
if adrjfcb//16  15 then
adrjfb=adrjfcb+16
else do
NUMERIC DIGITS 10 /* bo max. to 7FFF */
tcb=C2D(STORAGE(D2X(540),4))
jscb=C2D(STORAGE(D2X(tcb+180),4))
qmpl=C2D(STORAGE(D2X(jscb+244),4))
qmat=C2D(STORAGE(D2X(qmpl+24),4))
do forever
if adrjfcb65536 then do
qmat=C2D(STORAGE(D2X(qmat+12),4))
adrjfcb=adrjfcb-65536;
end
else do
adrjfcb=C2D(STORAGE(D2X(qmat+adrjfcb+1),4))+16
leave
end
end
end
/* now adrjfcb is really JFCB address */
/* DSN- (jfcb+0)and member (or 8 spaces)-(jfcb+44) */
dsnname=STRIP(STORAGE(D2X(adrjfcb),44))
member=STRIP(STORAGE(D2X(adrjfcb+44),8))
zbiory_joba.dd_count.dsn_count.dsn=dsnname
/* nazwa membra (o ile podano dsn=filename(membername)),lub 8 spacji*/
zbiory_joba.dd_count.dsn_count.mem=member
/* next dd entry in TIOT */
adrtioa=adrtioa+entrylen /* next dd entry */
end /* forever len0 ( TIOT ) */
/* return */
novalue:
say 'Niezainicjowana zmienna w linii 'SIGL
exit 22
failure:
say 'Blad komendy w linii 'SIGL
exit 33
/* Koniec zrodla */


regards

Karol Filipowicz
Poland

2010/9/8 CUNY Yann yc...@externe.generali.fr

 Hi all !



 I have this JCL :



 //STEP11   EXEC PGM=IKJEFT01,REGION=0M

 //SYSTSIN  DD *

 PROFILE NOPREF

 TEST15

 /*

 //SYSTSPRT DD SYSOUT=*

 //SYSEXEC  DD DSN=P3CUN.YANN.REXX,DISP=SHR

 //IN   DD DSN=P3CUN.YANN.JCL(TEST14),DISP=SHR





 I need, in my rexx, to retrieve the member name of the DD CARD IN.  With
 the LISTDSI, I just have the pds name.

 I don't want to add a paramèter. And I don't want to make an execio on
 another dd card.



 Any idea ?


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



Re: Visibility of New Volume in Storage Group

2010-09-08 Thread Rob Scott
Rick

I do not believe there is anything specifically documented, however I have seen 
this behaviour occur on *many* systems over many years during my MXI freeware 
days - and if I remember correctly I added this foible to my FAQ section as so 
many people noticed it. 

You can sorta understand why this happens as SMS is trying to reduce overhead 
and only updates the SGRP space during allocation processing in a while you 
have the hood up way.  

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


-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Rick Humburg
Sent: 08 September 2010 12:04
To: IBM-MAIN@bama.ua.edu
Subject: Re: Visibility of New Volume in Storage Group

Thanks to Rob and the others who replied.  I may have erred on the side of
brevity in my original question.  I am working on a problem from one of our
customers.  This customer added a volume to a storage group, but we did not
report a decrease in the percentage used across a group of volumes.  I was
trying to confirm that this was in fact due to no allocation being done.

Back to the technical level, I am looking at the SGD rather than the VLD. 
Is there a reference in IBM documentation for the first allocation condition?

On Tue, 7 Sep 2010 15:39:25 +, Rob Scott rsc...@rocketsoftware.com wrote:

Rick

I believe you might be referring to the fact that SMS will not report on
space usage or capacity for the volume in the VLD until the first allocation
is done.

What does ISMF say about the volume from the active config?

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

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

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


Re: JES2 vs. JES3

2010-09-08 Thread Chase, John
 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of Mike Schwab
 
 On Mon, Sep 6, 2010 at 10:03 AM, Shmuel Metz (Seymour J.)
 shmuel+ibm-m...@patriot.net wrote:
 
  Why is an airplane better than a submarine? I'd like to know whether
  you plan to travel under the ice or over it before answering the
  question.
 
  --
      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)
 
 I sure would not want to to experience a pressurization loss in an
 airplane near Bolivia or Tibet.  In that case the pilot is required to
 descend to 10,000 ft above sea level.  Problem is, the runways in
 those areas are about 13,000 above sea levels, and planes are not good
 at moving through solid rock.

Submariner to pilot:  We've never left one of ours up there.

   -jc-

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


STATOPT

2010-09-08 Thread Sebastian Welton
Just setting up some VTAM definitions for TAF sessions and want to use the
STATOPT statement but this does not seem to be documented anywhere. I
presume that it should be coded on the last line as:

* STATOPT='stuff'

as removing the comment * and adding continuation characters causes problems
but leaving it there seems okay. Does this actually get used anywhere or is
it just a comment?

Sebastian

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


Re: STATOPT

2010-09-08 Thread Chase, John
 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of Sebastian Welton
 
 Just setting up some VTAM definitions for TAF sessions and want to use
the
 STATOPT statement but this does not seem to be documented anywhere. I
 presume that it should be coded on the last line as:
 
 * STATOPT='stuff'
 
 as removing the comment * and adding continuation characters causes
problems
 but leaving it there seems okay. Does this actually get used anywhere
or is
 it just a comment?

I think (but not sure) that the Netview Status Monitor reads it (as a
comment).

   -jc-

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


Re: Datamation issue coining term nybble?

2010-09-08 Thread Joel C. Ewing
On 09/07/2010 08:32 PM, Clark Morris wrote:
 On 7 Sep 2010 15:14:25 -0700, in bit.listserv.ibm-main you wrote:
 
 ---snip--

 For those who are not familiar with it, Datamation used to have some
 excruciatingly funny articles, some of which were collected under the
 title Faith, Hope and Parity. I didn't think much of their news
 coverage, but the humor was priceless.
  

 -unsnip-
 I particularly remember their description of the Postal System Input 
 Buffer Device, in one of their April issues.

 If you can find a copy of the book A Stress Analysis of a Strapless 
 Evening Gown, it's in there.
 
 Speaking of humor, does anyone know if the appendix to the
 Westinghouse DOS Dump Restore program is available on-line.  I am
 still trying to figure out how it ever got past the legal department.
 BJF - Botched Job Foreground is just one of the definitions.  The
 error scenario with companies doing research in Filet of Old Gnu was
 hilarious.
 
 Clark

 Rick

I afraid we finally canned our copy a decade ago, but it was the only
DOS manual we retained after migrating from DOS, and we kept it for the
entertainment value for over a decade after leaving DOS.

As I recall it also had a lengthy, humorous, and irreverent discussion
about how you couldn't believe IBM's track listing utilities because
they lied about the contents of the count fields and displayed what IBM
thought should be there rather than the actual contents, which in some
cases was very significant.

-- 
Joel C. Ewing, Fort Smith, ARjcew...@acm.org

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


Re: JES2 vs. JES3

2010-09-08 Thread Tom Marchant
On Tue, 7 Sep 2010 16:04:29 -0400, George Henke wrote:

I was just a lowly applications COBOL programmer at Bankers Trust when Bob
Graham suddenly appeared there, fresh out of Brown with a degree in Computer
Science, and morphed HASP into ASP.

My understanding was that ASP and HASP were developed separately, and 
that ASP predated HASP.  Did I get it wrong?

-- 
Tom Marchant

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


Re: Need a simple counter

2010-09-08 Thread Joel C. Ewing
On 09/08/2010 02:35 AM, Rob Scott wrote:
 Miklos,
 
 Generating a sysplex-wide token value is a very simple process - but having 
 a counter that is only updated (or reset) by permitted tasks on each system 
 presents much more of a programming challenge and would in turn require some 
 sort of runtime options to dictate how the counter is handled in normal and 
 abnormal circumstances (for example, what to do if the creating 
 TCB/ASID/SYSTEM goes away unexpectedly).
 
 If you do not care about the counter contents and just want some sort of 
 permanently increasing value then you might get some usage from the 
 STCK/STCKE instruction.
 
 Rob Scott
 Lead Developer
 Rocket Software
 275 Grove Street * Newton, MA 02466-2272 * USA
 Tel: +1.617.614.2305
 Email: rsc...@rs.com
 Web: www.rocketsoftware.com 
 
 
 -Original Message-
 From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf 
 Of Miklos Szigetvari
 Sent: 08 September 2010 07:37
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: Need a simple counter
 
   Hi
 
 I understand not so simple, but the problem is why not , at last in 
 processor level
 If you compare the effort to get a unique key with the large number of 
 new,  sometimes exotic , machine instructions
 you can ask Why it is so. Why don't get a counter from the CPU or with 
 some simple system call ?
 
 On 9/7/2010 10:29 PM, john gilmore wrote:
 The OP asked for a perhaps SYSPLEX-wide facility.  The CF-based approach I 
 suggested is probably a minimal way to meet this requirement.

 For those of you who have not looked at such problems in any detail itr is 
 perhaps appropriate to recall that SYSPLEX-wide data sharing poses 
 significant, non-trivial problems.

 It is not neurosurgery, but It certainly cannot be done in COBOL, which, 
 whatever its other merits, is not a systems-implementation language.

 You must write authorized code; and you need the appropriate design and 
 testing skills, as I made clear in my original post.  If you don't have them 
 you should think about getting an ISV who does to do the job for you.

 John Gilmore Ashland, MA 01721-1817 USA

...
Rob,
When using any technique other than a unique counter you have to beware
of unexpected effects caused by a change in hardware or a change in
transaction volume.

We have had cases in the past of CICS transactions using a unique value
derived from TOD value (they always want a unique value with fewer bits
than TOD) suddenly consuming ten times the expected CPU resource on a
new box.  The application had a spin loop retrying when a non unique
value was found which could be executed many more times on the faster
processor before the least significant bit they were using changed.

We have also had cases where a quasi-pseudo random value was generated
(I call it quasi because I'm sure no formal attempt was made to see if
it passed any of the customary randomness tests) and used as a unique
key, retrying if the key was already in use.  This worked fine as long
key range was very large compared to the number of entries, but you can
guess what happened to performance when the number of records increased
greatly over time and an attempt to reuse a unique key became a common
rather than a rare event.

A counter is the only way to guarantee uniqueness with the fewest number
of bits.  And in both the examples referenced above the transaction rate
was way too high to consider maintaining a counter value in some
external file.
-- 
Joel C. Ewing, Fort Smith, ARjcew...@acm.org

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


Possible DFSORT problem?

2010-09-08 Thread McKown, John
We are having a problem with a COBOL internal sort. If we run the job with no 
PARM=, the job abends with U4082-2. If it runs with PARM='TRAP(OFF)', it abends 
with S0C4-38 in ICEF64A. The latter dump has the following indicative dump:
 
SYSTEM COMPLETION CODE=0C4 REASON CODE=0038
TIME=09.01.18 SEQ=26947 CPU= ASID=005D
PSW AT TIME OF ERROR 078D2001 80060D28 ILC 6 INTC 38
NO ACTIVE MODULE FOUND
NAME=UNKNOWN
DATA AT PSW 00060D22 - E2E3D6D9 C540D21D 40006004
AR/GR 0: /_8005D88E 1: 0020/_0005F530
  2: /1199_0002 3: /1199_0004
  4: /_00074B00 5: /_00060D28
  6: /11A1_0588 7: /0008_0584
  8: /_0001 9: /_00060CD8
  A: /_050D7056 B: /_85145028
  C: /_050D6CC0 D: /_0005F000
  E: /_850D70B2 F: /_0004
END OF SYMPTOM DUMP

I have a SYSMDUMP from both runs. I am indeed running in AMODE(64). The 
instruction abending is D2 1D 4006 6004. As you can see, R6 has a non-zero 
value, 11A1, in the high word of the 64-bit register. And the SYSMDUMP show 
the TRNE as 11A1_ .

So, do I have a LE problem or a DFSORT problem? That is, to which should I open 
a PMR? I'm thinking DFSORT.

I don't see anything like this in IBMLink.
 
--
John McKown 
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone * (817)-691-6183 cell
john.mck...@healthmarkets.com * www.HealthMarkets.com

Confidentiality Notice: This e-mail message may contain confidential or 
proprietary information. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the original message. 
HealthMarkets(r) is the brand name for products underwritten and issued by the 
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance 
Company(r), Mid-West National Life Insurance Company of TennesseeSM and The 
MEGA Life and Health Insurance Company.SM

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


Re: JES2 vs. JES3

2010-09-08 Thread Thompson, Steve
-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
Behalf Of Chase, John
Sent: Wednesday, September 08, 2010 6:28 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: JES2 vs. JES3

 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of Mike Schwab
SNIPPAGE
 I sure would not want to to experience a pressurization loss in an
 airplane near Bolivia or Tibet.  In that case the pilot is required to
 descend to 10,000 ft above sea level.  Problem is, the runways in
 those areas are about 13,000 above sea levels, and planes are not good
 at moving through solid rock.

Submariner to pilot:  We've never left one of ours up there.
SNIP

They tell us to avoid thunderstorms by 20 Nautical miles or better. The
convective currents with the Cumulonimbus, hail, and the like can make
for a very bad day.

And we are also told to avoid Cumulogranite at all costs. Encountering
Cumulogranite could wreck your whole day.

Later,
Steve Thompson

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


Re: Possible DFSORT problem?

2010-09-08 Thread Farley, Peter x23353
 -Original Message-
 From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
 Behalf Of McKown, John
 Sent: Wednesday, September 08, 2010 10:30 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: Possible DFSORT problem?
 
 We are having a problem with a COBOL internal sort. If we run the job with
 no PARM=, the job abends with U4082-2. If it runs with PARM='TRAP(OFF)',
 it abends with S0C4-38 in ICEF64A. The latter dump has the following
 indicative dump:
 
 SYSTEM COMPLETION CODE=0C4 REASON CODE=0038
 TIME=09.01.18 SEQ=26947 CPU= ASID=005D
 PSW AT TIME OF ERROR 078D2001 80060D28 ILC 6 INTC 38
 NO ACTIVE MODULE FOUND
 NAME=UNKNOWN
 DATA AT PSW 00060D22 - E2E3D6D9 C540D21D 40006004
 AR/GR 0: /_8005D88E 1: 0020/_0005F530
   2: /1199_0002 3: /1199_0004
   4: /_00074B00 5: /_00060D28
   6: /11A1_0588 7: /0008_0584
   8: /_0001 9: /_00060CD8
   A: /_050D7056 B: /_85145028
   C: /_050D6CC0 D: /_0005F000
   E: /_850D70B2 F: /_0004
 END OF SYMPTOM DUMP
 
 I have a SYSMDUMP from both runs. I am indeed running in AMODE(64). The
 instruction abending is D2 1D 4006 6004. As you can see, R6 has a non-zero
 value, 11A1, in the high word of the 64-bit register. And the SYSMDUMP
 show the TRNE as 11A1_ .
 
 So, do I have a LE problem or a DFSORT problem? That is, to which should I
 open a PMR? I'm thinking DFSORT.

Um, and you are running in 64-bit mode with COBOL how, exactly?  I had no idea 
that was a supported COBOL option yet.

In any case, I would recommend switching back to 31-bit addressing mode before 
invoking SORT.  I have a strong suspicion that LE would react badly due to its 
assumption that any call from a COBOL program can only be 31-bit.

Peter

--

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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Need a simple counter

2010-09-08 Thread Rob Scott
The STCKE value is guaranteed to be unique with the bounds of a sysplex (as 
long as you don't shrink the significant number of bits).  

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


-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Joel C. Ewing
Sent: 08 September 2010 14:26
To: IBM-MAIN@bama.ua.edu
Subject: Re: Need a simple counter

On 09/08/2010 02:35 AM, Rob Scott wrote:
 Miklos,
 
 Generating a sysplex-wide token value is a very simple process - but having 
 a counter that is only updated (or reset) by permitted tasks on each system 
 presents much more of a programming challenge and would in turn require some 
 sort of runtime options to dictate how the counter is handled in normal and 
 abnormal circumstances (for example, what to do if the creating 
 TCB/ASID/SYSTEM goes away unexpectedly).
 
 If you do not care about the counter contents and just want some sort of 
 permanently increasing value then you might get some usage from the 
 STCK/STCKE instruction.
 
 Rob Scott
 Lead Developer
 Rocket Software
 275 Grove Street * Newton, MA 02466-2272 * USA
 Tel: +1.617.614.2305
 Email: rsc...@rs.com
 Web: www.rocketsoftware.com 
 
 
 -Original Message-
 From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf 
 Of Miklos Szigetvari
 Sent: 08 September 2010 07:37
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: Need a simple counter
 
   Hi
 
 I understand not so simple, but the problem is why not , at last in 
 processor level
 If you compare the effort to get a unique key with the large number of 
 new,  sometimes exotic , machine instructions
 you can ask Why it is so. Why don't get a counter from the CPU or with 
 some simple system call ?
 
 On 9/7/2010 10:29 PM, john gilmore wrote:
 The OP asked for a perhaps SYSPLEX-wide facility.  The CF-based approach I 
 suggested is probably a minimal way to meet this requirement.

 For those of you who have not looked at such problems in any detail itr is 
 perhaps appropriate to recall that SYSPLEX-wide data sharing poses 
 significant, non-trivial problems.

 It is not neurosurgery, but It certainly cannot be done in COBOL, which, 
 whatever its other merits, is not a systems-implementation language.

 You must write authorized code; and you need the appropriate design and 
 testing skills, as I made clear in my original post.  If you don't have them 
 you should think about getting an ISV who does to do the job for you.

 John Gilmore Ashland, MA 01721-1817 USA

...
Rob,
When using any technique other than a unique counter you have to beware
of unexpected effects caused by a change in hardware or a change in
transaction volume.

We have had cases in the past of CICS transactions using a unique value
derived from TOD value (they always want a unique value with fewer bits
than TOD) suddenly consuming ten times the expected CPU resource on a
new box.  The application had a spin loop retrying when a non unique
value was found which could be executed many more times on the faster
processor before the least significant bit they were using changed.

We have also had cases where a quasi-pseudo random value was generated
(I call it quasi because I'm sure no formal attempt was made to see if
it passed any of the customary randomness tests) and used as a unique
key, retrying if the key was already in use.  This worked fine as long
key range was very large compared to the number of entries, but you can
guess what happened to performance when the number of records increased
greatly over time and an attempt to reuse a unique key became a common
rather than a rare event.

A counter is the only way to guarantee uniqueness with the fewest number
of bits.  And in both the examples referenced above the transaction rate
was way too high to consider maintaining a counter value in some
external file.
-- 
Joel C. Ewing, Fort Smith, ARjcew...@acm.org

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

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


Re: Possible DFSORT problem?

2010-09-08 Thread Steve Comstock

On 9/8/2010 8:29 AM, McKown, John wrote:

We are having a problem with a COBOL internal sort. If we run the job with no 
PARM=, the job abends with U4082-2. If it runs with PARM='TRAP(OFF)', it abends 
with S0C4-38 in ICEF64A. The latter dump has the following indicative dump:

SYSTEM COMPLETION CODE=0C4 REASON CODE=0038
TIME=09.01.18 SEQ=26947 CPU= ASID=005D
PSW AT TIME OF ERROR 078D2001 80060D28 ILC 6 INTC 38
NO ACTIVE MODULE FOUND
NAME=UNKNOWN
DATA AT PSW 00060D22 - E2E3D6D9 C540D21D 40006004
AR/GR 0: /_8005D88E 1: 0020/_0005F530
   2: /1199_0002 3: /1199_0004
   4: /_00074B00 5: /_00060D28
   6: /11A1_0588 7: /0008_0584
   8: /_0001 9: /_00060CD8
   A: /_050D7056 B: /_85145028
   C: /_050D6CC0 D: /_0005F000
   E: /_850D70B2 F: /_0004
END OF SYMPTOM DUMP

I have a SYSMDUMP from both runs. I am indeed running in AMODE(64). The 
instruction abending is D2 1D 4006 6004. As you can see, R6 has a non-zero 
value, 11A1, in the high word of the 64-bit register. And the SYSMDUMP show 
the TRNE as 11A1_ .

So, do I have a LE problem or a DFSORT problem? That is, to which should I open 
a PMR? I'm thinking DFSORT.

I don't see anything like this in IBMLink.

--
John McKown
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)


John,

It occurs to me to ask: what version of COBOL are you using?
There have been a lot of problems if you run 4.2 without all
the requisite maintenance levels on z/OS and LE.


--

Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

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

* To get a good Return on your Investment, first make an investment!
  + Training your people is an excellent investment

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


Re: O/T IBM to Ship World's Fastest Computer Chip

2010-09-08 Thread Mike Schwab
On Wed, Sep 8, 2010 at 2:36 AM, Mike Schwab mike.a.sch...@gmail.com wrote:
 On Wed, Sep 8, 2010 at 2:33 AM, Mike Schwab mike.a.sch...@gmail.com wrote:
 On Wed, Sep 8, 2010 at 2:04 AM, Gerhard Postpischil gerh...@valley.net 
 wrote:
 On 9/8/2010 12:42 AM, Mike Schwab wrote:

 Just got a good example of journalistic incompetence.
 http://twitpic.com/2lqaqh

 The accompanying map is clipped, but appears to locate Bornholm on the
 western side Sweden. Must be a secret astronaut training base G

 Gerhard Postpischil
 Bradford, VT

 Surprised no one has found it in all the time since Tycho was training there.

 Maybe he had Galileo convert a diving bell to a space capsule?

 And actually built his helicopter to retrieve it after a launch.
 --
And a Chinese built solid rocket (firecracker) to lift the space capsule?
-- 
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

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


Re: JES2 vs. JES3

2010-09-08 Thread Burrell, C. Todd (CDC/OCOO/ITSO) (CTR)
I would look into the functions that JES3 offers that JES2 does not
offer, and if you need any of these functions then go with JES3.  But
unless you have a VERY compelling reason, then JES2 is probably the
better and easier to maintain option (IMHO).  I've worked with both, and
JES3 can be challenging for JCL and for operators...  

C. Todd Burrell 
PMP, MCSE 2003:Security
Security+, Network+
ITIL V3 Foundations
CSC Lead z/OS Systems Programmer 
ITSO 
(404) 723-2017 (Cell) 


-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
Behalf Of Shmuel Metz (Seymour J.)
Sent: Tuesday, September 07, 2010 5:38 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: JES2 vs. JES3

In 4c86a688.7060...@bremultibank.com.pl, on 09/07/2010
   at 10:54 PM, R.S. r.skoru...@bremultibank.com.pl said:

Theorethical case: If you start from scratch, then you should choose
JES2.

Nonsense; if you start from scratch, you should analyze which one best
meets your needs.
 
-- 
 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

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


Job Numbers rolling over

2010-09-08 Thread Martin Packer
In some SMF from a customer I see Job Numbers rolling over - i.e. Starting 
at 1 again - around midnight. And this happens when the old Job Numbers 
never approached the limit. (I only have overnight 1/2 September so don't 
know if this is regular.)

I'm wondering how this could be... Some kind of restart (cold really 
needed) or $T NUM are the two methods I know of.

I'm not just interested in the mechanism but also what people think are 
useful practices. Likewise this IS JES2 but JES3-related answers would 
also be interesting.

(Facebook users will have seen me witter on about analysing Job Numbers to 
see which jobs the scheduler threw into the hopper at the same tiem - else 
I wouldn't be looking at Job Numbers in the first place.)

Thanks, Martin

Martin Packer,
Mainframe Performance Consultant, zChampion
Worldwide Banking Center of Excellence, IBM

+44-7802-245-584

email: martin_pac...@uk.ibm.com

Twitter / Facebook IDs: MartinPacker





Unless stated otherwise above:
IBM United Kingdom Limited - Registered in England and Wales with number 
741598. 
Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU






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


Re: IEC020I 001-1

2010-09-08 Thread Shmuel Metz (Seymour J.)
In aadad469c0429c4fb23ce1486e5c10da3d82a2a...@ing.com, on 09/08/2010
   at 08:09 AM, Fred van der Windt fred.van.der.wi...@mail.ing.nl
said:

So how does one 'read' a program object? 

The BINDER has an API.
 
-- 
 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: z990s still running?

2010-09-08 Thread Shmuel Metz (Seymour J.)
In aanlktik0mw_2qradj6gqvfjkxjbu7olb=sjimyert...@mail.gmail.com, on
09/08/2010
   at 01:03 AM, Mike Schwab mike.a.sch...@gmail.com said:

On the Hercules groups they have some sites running MVS 3.8 on
emulators.

That's the new stuff. What about the OS/360 turnkey disk?
 
-- 
 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Datamation issue coining term nybble?

2010-09-08 Thread Shmuel Metz (Seymour J.)
In 4c86b8ee.3040...@ync.net, on 09/07/2010
   at 05:13 PM, Rick Fochtman rfocht...@ync.net said:

If you can find a copy of the book A Stress Analysis of a Strapless 
Evening Gown, it's in there.

It though that the articles there were from The Worm Runners Digest.
 
-- 
 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: IBM so rt maybe i n for some competiti on?

2010-09-08 Thread Shmuel Metz (Seymour J.)
In snt113-w8ed985e54b4b9eb6a069cc6...@phx.gbl, on 09/07/2010
   at 09:39 PM, john gilmore john_w_gilm...@msn.com said:

Radix sorts, internal or external, are certainly useful; but they are
not new.  The first edition of Knuth's TACP, volume 3, Sorting and
Searching, that I have on my shelves was copyrighted in 1973; and it
contains full treatments of them. 

ObQoheleth They were old hat by 1973; FAP used a binary radix sort.
 
-- 
 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Job Numbers rolling over

2010-09-08 Thread Burrell, C. Todd (CDC/OCOO/ITSO) (CTR)
I would say that someone is doing a $T NUM command to reset this.  We
used to have a command that reset it to 1 every week, but I saw no need
to continue this, so we stopped that practice.  I say unless there is a
good reason to do it, I'd just let them roll around. 

I do of another shop that resets theirs to x where the x is 1-7
based on the day of the week.  This works for them as they run a couple
thousand jobs a day. 

C. Todd Burrell 
PMP, MCSE 2003:Security
Security+, Network+
ITIL V3 Foundations
CSC Lead z/OS Systems Programmer 
ITSO 
(404) 723-2017 (Cell) 



-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
Behalf Of Martin Packer
Sent: Wednesday, September 08, 2010 11:58 AM
To: IBM-MAIN@bama.ua.edu
Subject: Job Numbers rolling over

In some SMF from a customer I see Job Numbers rolling over - i.e.
Starting 
at 1 again - around midnight. And this happens when the old Job Numbers 
never approached the limit. (I only have overnight 1/2 September so
don't 
know if this is regular.)

I'm wondering how this could be... Some kind of restart (cold really 
needed) or $T NUM are the two methods I know of.

I'm not just interested in the mechanism but also what people think are 
useful practices. Likewise this IS JES2 but JES3-related answers would 
also be interesting.

(Facebook users will have seen me witter on about analysing Job Numbers
to 
see which jobs the scheduler threw into the hopper at the same tiem -
else 
I wouldn't be looking at Job Numbers in the first place.)

Thanks, Martin

Martin Packer,
Mainframe Performance Consultant, zChampion
Worldwide Banking Center of Excellence, IBM

+44-7802-245-584

email: martin_pac...@uk.ibm.com

Twitter / Facebook IDs: MartinPacker





Unless stated otherwise above:
IBM United Kingdom Limited - Registered in England and Wales with number

741598. 
Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6
3AU






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

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


Re: Possible DFSORT problem?

2010-09-08 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:ibm-m...@bama.ua.edu] On Behalf Of Farley, Peter x23353
 Sent: Wednesday, September 08, 2010 9:57 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: Possible DFSORT problem?
snip
 
 Um, and you are running in 64-bit mode with COBOL how, 
 exactly?  I had no idea that was a supported COBOL option yet.
 
 In any case, I would recommend switching back to 31-bit 
 addressing mode before invoking SORT.  I have a strong 
 suspicion that LE would react badly due to its assumption 
 that any call from a COBOL program can only be 31-bit.
 
 Peter
 
 --

Sorry - DFSORT apparently did the AMODE switch to 64, not our code. Or 
something did, but not COBOL. No HLASM subroutines in this mix to do a SAM64 or 
BSM or BASSM either. But the system was in 64 bit AMODE. 

--
John McKown 
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone * (817)-691-6183 cell
john.mck...@healthmarkets.com * www.HealthMarkets.com

Confidentiality Notice: This e-mail message may contain confidential or 
proprietary information. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the original message. 
HealthMarkets(r) is the brand name for products underwritten and issued by the 
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance 
Company(r), Mid-West National Life Insurance Company of TennesseeSM and The 
MEGA Life and Health Insurance Company.SM

 

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


Re: Possible DFSORT problem?

2010-09-08 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:ibm-m...@bama.ua.edu] On Behalf Of Steve Comstock
 Sent: Wednesday, September 08, 2010 10:15 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: Possible DFSORT problem?
 
snip
 
 John,
 
 It occurs to me to ask: what version of COBOL are you using?
 There have been a lot of problems if you run 4.2 without all
 the requisite maintenance levels on z/OS and LE.

Enterprise COBOL 3.4

--
John McKown 
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone * (817)-691-6183 cell
john.mck...@healthmarkets.com * www.HealthMarkets.com

Confidentiality Notice: This e-mail message may contain confidential or 
proprietary information. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the original message. 
HealthMarkets(r) is the brand name for products underwritten and issued by the 
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance 
Company(r), Mid-West National Life Insurance Company of TennesseeSM and The 
MEGA Life and Health Insurance Company.SM

 

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


Re: IEC020I 001-1

2010-09-08 Thread Joe D'Alessandro
To read a program object, you have to use the binder API, or IEBCOPY the 
program object to a load library (which will convert the p.o. back to a load 
module) and then you can read the load module.  I think that some p.o. will 
not convert to load modules, so you would have to code a binder API program 
for those. 

For me, the binder API was a bit hard to decipher, but there is a sample in one 
of the manuals (see MVS Program Management: Advanced Facilities).  I used 
that sample to figure out how to convert one of my programs from reading 
load modules to reading program objects.  The binder API can read both 
program objects and most load modules (really old load modules cause the API 
to return unusual codes) so a bind API program can be used for both types of 
executables.  The example is called BAGETE.  I ran BAGETE under TSO TEST 
to get a sense of what it would do at the various API functions and I can truly 
say I DO NOT really understand it completely, especially the buffer usage, but 
I was able to make it work for most program objects and load modules created 
after certain APARs were applied to the LKED.

regards, Joe D'Alessandro

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


Re: STATOPT

2010-09-08 Thread Sebastian Welton
I think that you're correct there (can't verify as STAMON isn't running) but
according to some comments in a sample VTAMLST member it quite possibly has
something to do with the STATMON preprocessor. Nice to be documented
somewhere though.

Sebastian 


On Wed, 8 Sep 2010 07:08:00 -0500, Chase, John jch...@ussco.com wrote:

 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of Sebastian Welton

 Just setting up some VTAM definitions for TAF sessions and want to use
the
 STATOPT statement but this does not seem to be documented anywhere. I
 presume that it should be coded on the last line as:

 * STATOPT='stuff'

 as removing the comment * and adding continuation characters causes
problems
 but leaving it there seems okay. Does this actually get used anywhere
or is
 it just a comment?

I think (but not sure) that the Netview Status Monitor reads it (as a
comment).

   -jc-

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

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


Re: Possible DFSORT problem?

2010-09-08 Thread Martin Packer
John McKown said

 Sorry - DFSORT apparently did the AMODE switch to 64, not our code.

That's perfectly possible - if the sort was using a large memory object.

Martin Packer,
Mainframe Performance Consultant, zChampion
Worldwide Banking Center of Excellence, IBM

+44-7802-245-584

email: martin_pac...@uk.ibm.com

Twitter / Facebook IDs: MartinPacker





Unless stated otherwise above:
IBM United Kingdom Limited - Registered in England and Wales with number 
741598. 
Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU






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


Re: JES2 vs. JES3

2010-09-08 Thread R.S.

W dniu 2010-09-08 17:43, Burrell, C. Todd (CDC/OCOO/ITSO) (CTR) pisze:

I would look into the functions that JES3 offers that JES2 does not
offer, and if you need any of these functions then go with JES3.  But
unless you have a VERY compelling reason, then JES2 is probably the
better and easier to maintain option (IMHO).  I've worked with both, and
JES3 can be challenging for JCL and for operators...


The real choice nowadays is whether to use a system with JES or some 
without it, like AIX or (bunch of) Windoze.


I think that number of *new* JES3 customers is close to number of new 
IMS or VSE users. I also bet that number or JES2 new users is very close 
to number of new z/OS users.



--
Radoslaw Skorupka
Lodz, Poland


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

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

NIP: 526-021-50-88
Wedug stanu na dzie 01.01.2009 r. kapita zakadowy BRE Banku SA (w caoci 
wpacony) wynosi 118.763.528 zotych. W zwizku z realizacj warunkowego 
podwyszenia kapitau zakadowego, na podstawie uchway XXI WZ z dnia 16 marca 
2008r., oraz uchway XVI NWZ z dnia 27 padziernika 2008r., moe ulec 
podwyszeniu do kwoty 123.763.528 z. Akcje w podwyszonym kapitale zakadowym 
BRE Banku SA bd w caoci opacone.

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


Re: Job Numbers rolling over

2010-09-08 Thread Norman Hollander on DesertWiz
Some sites, with Multiple JES2 MAS, or systems in a local NJE ring, set the
numbers with the first digit
being the node or environment system.  This allows a bit of a visual clue
as to the origin of the Job or 
perhaps, output (if your printers are in a different location, you could
identify production output easier,
if you didn't recognize the name).  Some sites do the $TNUM on a weekly
basis or after IPL for some 
convenience (one site did this at IPL time to know if a system was IPL-ed
without notice).   I would think 
today (with Jobs coming from many different places, other than real card
readers), there is no compelling 
reason to do this.

zNorman

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf
Of Martin Packer
Sent: Wednesday, September 08, 2010 Wednesday 8:58 AM
To: IBM-MAIN@bama.ua.edu
Subject: Job Numbers rolling over

In some SMF from a customer I see Job Numbers rolling over - i.e. Starting
at 1 again - around midnight. And this happens when the old Job Numbers
never approached the limit. (I only have overnight 1/2 September so don't
know if this is regular.)

I'm wondering how this could be... Some kind of restart (cold really
needed) or $T NUM are the two methods I know of.

I'm not just interested in the mechanism but also what people think are
useful practices. Likewise this IS JES2 but JES3-related answers would also
be interesting.

(Facebook users will have seen me witter on about analysing Job Numbers to
see which jobs the scheduler threw into the hopper at the same tiem - else I
wouldn't be looking at Job Numbers in the first place.)

Thanks, Martin

Martin Packer,
Mainframe Performance Consultant, zChampion Worldwide Banking Center of
Excellence, IBM

+44-7802-245-584

email: martin_pac...@uk.ibm.com

Twitter / Facebook IDs: MartinPacker





Unless stated otherwise above:
IBM United Kingdom Limited - Registered in England and Wales with number
741598. 
Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU






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

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


Re: JES2 vs. JES3

2010-09-08 Thread Tom Marchant
On Wed, 8 Sep 2010 11:43:22 -0400, Burrell, C. Todd wrote:

I've worked with both, and
JES3 can be challenging for JCL and for operators...

I have much more JES2 experience than JES3, but I'd dispute your 
conclusion.  The two are quite different from an operational 
perspective and it can also be challenging for experienced JES3 
operators to work in a JES2 environment.

-- 
Tom Marchant

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


Re: JES2 vs. JES3

2010-09-08 Thread Edward Jaffe

 On 9/8/2010 6:04 AM, Tom Marchant wrote:

On Tue, 7 Sep 2010 16:04:29 -0400, George Henke wrote:


I was just a lowly applications COBOL programmer at Bankers Trust when Bob
Graham suddenly appeared there, fresh out of Brown with a degree in Computer
Science, and morphed HASP into ASP.

My understanding was that ASP and HASP were developed separately, and
that ASP predated HASP.  Did I get it wrong?


You got it exactly right. Nobody morphed HASP into ASP or vice versa. DCS became 
ASP; ASP became JES3. Meanwhile, HASP became JES2.


--
Edward E Jaffe
Phoenix Software International, Inc
831 Parkview Drive North
El Segundo, CA 90245
310-338-0400 x318
edja...@phoenixsoftware.com
http://www.phoenixsoftware.com/

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


CICS 4.1 ServerPac and XLMGNR8

2010-09-08 Thread R.S.
I have a problem with job XLMGNR8 which is a part of ServerPac for CICS 
TS 4.1.

It should create some report in XML format, the job is optional by the way.

The job indefinitely fills output dataset by repeatedly putting an entry 
describing SMPWRK6 dataset.


Has anyone found the problem? Is it a lack of service?

--
Radoslaw Skorupka
Lodz, Poland


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

Sąd Rejonowy dla m. st. Warszawy 
XII Wydział Gospodarczy Krajowego Rejestru Sądowego, 
nr rejestru przedsiębiorców KRS 025237

NIP: 526-021-50-88
Według stanu na dzień 01.01.2009 r. kapitał zakładowy BRE Banku SA (w całości 
wpłacony) wynosi 118.763.528 złotych. W związku z realizacją warunkowego 
podwyższenia kapitału zakładowego, na podstawie uchwały XXI WZ z dnia 16 marca 
2008r., oraz uchwały XVI NWZ z dnia 27 października 2008r., może ulec 
podwyższeniu do kwoty 123.763.528 zł. Akcje w podwyższonym kapitale zakładowym 
BRE Banku SA będą w całości opłacone.

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


Re: Possible DFSORT problem?

2010-09-08 Thread Frank Yaeger
John McKown on IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu wrote
on 09/08/2010 07:29:44 AM:
 We are having a problem with a COBOL internal sort. If we run the
 job with no PARM=, the job abends with U4082-2. If it runs with
 PARM='TRAP(OFF)', it abends with S0C4-38 in ICEF64A.

 So, do I have a LE problem or a DFSORT problem? That is, to which
 should I open a PMR? I'm thinking DFSORT.

Since ICEF64A is a DFSORT module, a DFSORT PMR is probably appropriate.
The PMR will, of course, be transferred if it turns out to be a
problem in another component.

Frank Yaeger - DFSORT Development Team (IBM) - yae...@us.ibm.com
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Possible DFSORT problem?

2010-09-08 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:ibm-m...@bama.ua.edu] On Behalf Of Frank Yaeger
 Sent: Wednesday, September 08, 2010 11:43 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: Possible DFSORT problem?
 
 John McKown on IBM Mainframe Discussion List 
 IBM-MAIN@bama.ua.edu wrote
 on 09/08/2010 07:29:44 AM:
  We are having a problem with a COBOL internal sort. If we run the
  job with no PARM=, the job abends with U4082-2. If it runs with
  PARM='TRAP(OFF)', it abends with S0C4-38 in ICEF64A.
 
  So, do I have a LE problem or a DFSORT problem? That is, to which
  should I open a PMR? I'm thinking DFSORT.
 
 Since ICEF64A is a DFSORT module, a DFSORT PMR is probably 
 appropriate.
 The PMR will, of course, be transferred if it turns out to be a
 problem in another component.
 
 Frank Yaeger - DFSORT Development Team (IBM) - yae...@us.ibm.com
 Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, 
 Migration
 
  = DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort

Thanks. I've done that now. And uploaded the TERSED files that were requested. 

Personally, I think something in our code is likely overwriting a SORT data 
area, causing a problem down the line. But I just can't find it, myself.

--
John McKown 
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone * (817)-691-6183 cell
john.mck...@healthmarkets.com * www.HealthMarkets.com

Confidentiality Notice: This e-mail message may contain confidential or 
proprietary information. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the original message. 
HealthMarkets(r) is the brand name for products underwritten and issued by the 
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance 
Company(r), Mid-West National Life Insurance Company of TennesseeSM and The 
MEGA Life and Health Insurance Company.SM

 

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


NO RESPONSE RECEIVED

2010-09-08 Thread Charles Mills
When you issue an operator command from SDSF (/S proc or /D IPLINFO, for
example) what determines whether SDSF displays NO RESPONSE RECEIVED in the
upper right or displays the messages that result from the command's being
issued? /S myproc, for example, results in WTO messages being issued within
less than a tenth of second but SDSF says NO RESPONSE RECEIVED. 

From SDSF's point of view, what is a response? I've looked at QEDIT and
CIB and I don't see a way to respond as opposed to just doing something.

Thanks,

Charles Mills

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


Re: NO RESPONSE RECEIVED

2010-09-08 Thread Patrick Lyon
On Wed, 8 Sep 2010 09:53:37 -0700, Charles Mills charl...@mcn.org 
wrote:

When you issue an operator command from SDSF (/S proc or /D IPLINFO, for
example) what determines whether SDSF displays NO RESPONSE RECEIVED 
in the
upper right or displays the messages that result from the command's being
issued? /S myproc, for example, results in WTO messages being issued within
less than a tenth of second but SDSF says NO RESPONSE RECEIVED.

From SDSF's point of view, what is a response? I've looked at QEDIT and
CIB and I don't see a way to respond as opposed to just doing something.

Thanks,

Charles Mills


Charles, try upping your response delay under Options/7. Set delay for 
responses... in SDSF.

Although I am not sure if you will get a response on a start command.
 

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


Re: NO RESPONSE RECEIVED

2010-09-08 Thread Chuck Arney
It has to do with the way the WTO was issued by the command processor.
Instead of issuing a simple WTO, the code that processes the command and
generates the response should use MCSFLAG=RESP on the WTO.  It could
also have to do with a CART being used.  If a CART is supplied with the
command the WTO should also include CART= where  matches the
CART of the command.

Chuck Arney
illustro Systems International, LLC
http://www.illustro.com
Internet-enable your applications with z/Ware V2
Voice: 214-800-8900 X#5562
--
This e-mail is private and may be confidential and is for the intended
recipient only. If misdirected, please notify us by telephone and
confirm that it has been deleted from your system and any copies
destroyed. If you are not the intended recipient you are strictly
prohibited from using, printing, copying, distributing or disseminating
this e-mail or any information contained in it.  
  
We use reasonable measures to virus scan all E-mails leaving illustro
but no warranty is given that this E-mail and any attachments are virus
free. You should ensure you have adequate measures in place for your own
virus checking.

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
Behalf Of Charles Mills
Sent: Wednesday, September 08, 2010 11:54 AM
To: IBM-MAIN@bama.ua.edu
Subject: NO RESPONSE RECEIVED

When you issue an operator command from SDSF (/S proc or /D IPLINFO, for
example) what determines whether SDSF displays NO RESPONSE RECEIVED in
the
upper right or displays the messages that result from the command's
being
issued? /S myproc, for example, results in WTO messages being issued
within
less than a tenth of second but SDSF says NO RESPONSE RECEIVED. 

From SDSF's point of view, what is a response? I've looked at QEDIT
and
CIB and I don't see a way to respond as opposed to just doing
something.

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


Re: NO RESPONSE RECEIVED

2010-09-08 Thread Rob Scott
What SDSF is doing here is using the MGCRE service with the CART parameter (the 
CART is the command response token) to send the operator command to an EMCS 
console. 

The expectation in most cases is that the code that eventually executes in 
whatever ASID because of the operator command looks at the CIB and sees that 
there is a CART present and then uses the CART=CIBXCART specification on the 
WTOs that writes messages containing the operator command response. This allows 
the EMCS that SDSF has established to wake up and get the message(s).

Not all software products use CARTs on their WTOs and there may be 
architectural reasons why some base z/OS components do not use CARTs either. To 
cater for this, SDSF must establish a timer so it can give up waiting - hence 
the setting in the SDSF options.  

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


-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Charles Mills
Sent: 08 September 2010 17:54
To: IBM-MAIN@bama.ua.edu
Subject: NO RESPONSE RECEIVED

When you issue an operator command from SDSF (/S proc or /D IPLINFO, for
example) what determines whether SDSF displays NO RESPONSE RECEIVED in the
upper right or displays the messages that result from the command's being
issued? /S myproc, for example, results in WTO messages being issued within
less than a tenth of second but SDSF says NO RESPONSE RECEIVED. 

From SDSF's point of view, what is a response? I've looked at QEDIT and
CIB and I don't see a way to respond as opposed to just doing something.

Thanks,

Charles Mills

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

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


Re: NO RESPONSE RECEIVED

2010-09-08 Thread Charles Mills
Thanks, Patrick, but that does not seem to be it. I upped it from 1 to 2
seconds with no discernible effect. For my particular benchmark /S
command, here are the timings

12:54:21.38  0290  S MYPROC  
12:54:21.41  0090  IRR813I NO PROFILE WAS FOUND IN THE STARTED 
 507 0090  MYPROC WITH JOBNAME MYPROC. RACF
12:54:21.43 STC00383 0291  $HASP100 MYPROC ON STCINRDR   
12:54:21.48 STC00383 0290  IEF695I START MYPROC WITH JOBNAME MYPROC
, GROUP DFLTSTC
12:54:21.48 STC00383 0090  $HASP373 MYPROC STARTED   
12:54:21.48 STC00383 0090  IEF403I MYPROC - STARTED - TIME=12.54.21  
12:54:21.60 STC00383 0090  program issues WTO message

So you can see there are a lot of responses within about a quarter of a
second.

Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf
Of Patrick Lyon
Sent: Wednesday, September 08, 2010 10:00 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: NO RESPONSE RECEIVED

On Wed, 8 Sep 2010 09:53:37 -0700, Charles Mills charl...@mcn.org 
wrote:

When you issue an operator command from SDSF (/S proc or /D IPLINFO, for
example) what determines whether SDSF displays NO RESPONSE RECEIVED 
in the
upper right or displays the messages that result from the command's being
issued? /S myproc, for example, results in WTO messages being issued within
less than a tenth of second but SDSF says NO RESPONSE RECEIVED.

From SDSF's point of view, what is a response? I've looked at QEDIT and
CIB and I don't see a way to respond as opposed to just doing
something.

Thanks,

Charles Mills


Charles, try upping your response delay under Options/7. Set delay for 
responses... in SDSF.

Although I am not sure if you will get a response on a start command.

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


Re: z990s still running?

2010-09-08 Thread Ed Finnell
 
In a message dated 9/8/2010 12:14:38 A.M. Central Daylight Time,  
ron.hawkins1...@sbcglobal.net writes:

(HDS) storage products. I think the most recent was a question  about 
support
for OS/390 1.2



Any FACOM sites still active?




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


Re: STATOPT

2010-09-08 Thread Chase, John
 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of Sebastian Welton
 
 I think that you're correct there (can't verify as STAMON isn't
running) but
 according to some comments in a sample VTAMLST member it quite
possibly has
 something to do with the STATMON preprocessor. Nice to be documented
 somewhere though.

Googled for STATOPT and found (among other, irrelevant hits):

http://publib.boulder.ibm.com/infocenter/tivihelp/v3r1/index.jsp?topic=/
com.ibm.itnetviewforzos.doc/inal0mst60.htm

or:  http://preview.tinyurl.com/25z8evx

Looks definitely like Netview.

-jc-

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


Re: JES2 vs. JES3

2010-09-08 Thread Ed Finnell
 
In a message dated 9/8/2010 11:37:29 A.M. Central Daylight Time,  
edja...@phoenixsoftware.com writes:

Nobody morphed HASP into ASP or vice versa. DCS became 
ASP; ASP  became JES3. Meanwhile, HASP became JES2.



Huh? HASP was the efforts of NASA Houston  and came out as Half ASP.
Renamed to Houston ASP.




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


EPILOG question

2010-09-08 Thread Cobe Xu
Hi list,
We recently upgraded to Omegamon XE v420, everything looks fine, except I
could not gen reports using EPILOG obtain command in batch, which works in
the old version.
The job gets rc 0, but no record printed. While I use EPILOG session command
line can display information. Any one encounter similar thing? any idea will
be appriciated. Thanks!

here is my JCL:
//EXPORT   EXEC PGM=KEPOBTN,REGION=4096K,PARM='EPPROD=EP'
//STEPLIB  DD DISP=SHR,DSN=SYS1.OZOS1.TKANMOD
//RKANPAR  DD DISP=SHR,DSN=SYSU.OZOS1.AHD5.RKANPARU
//RKM2OUTR DD SYSOUT=*REPORT LISTING
//RKM2OUTO DD SYSOUT=*OBTAIN MESSAGE LOG
//RKM2OUTM DD SYSOUT=*EPILOG MESSAGE LOG
//OUTREP   DD DSN=OUTREP,DISP=(NEW,PASS,DELETE),UNIT=3390,
//DCB=(RECFM=VB,LRECL=4096,BLKSIZE=27998),SPACE=(TRK,(1,1))
//ABNLIGNR DD DUMMY
//RKM2OUTD DD  DSN=MYUID.EPILOG.REPORT,DISP=(MOD,CATLG),
// SPACE=(CYL,(2,1)),UNIT=SYSDA,
// DCB=(DSORG=PS,RECFM=V,LRECL=4096)
//RKM2IN   DD *
//SYSPRINT DD *
 OBTAIN STC(CNMS) INT -
   ELEMENTS(SMFID,SDATE,STIME,STCNAME,CPUTRXTM) -
   FORMAT(PC) OUTFILE(RKM2OUTD) REPLACE
/*

-- 
Cobe Xu

Best Regards
---
zOS Performance  Capacity Analyst
E2E Performance Analyst
Email: cob...@gmail.com
---

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


PPRC SECONDARY DEVICES IN SECOND SUBCHANNEL - MSS

2010-09-08 Thread Marc Van Hoof
Hi, 

Somebody useing secondary PPRC devices in the second subchannel ?
 IBM first announced PAV's in the second subchannel, now allmost all 
secondary devices can be defined as special devices , useing the second 
subchannel. Like IBM, we call it a MSS-configuration.
I know that you best run Zos 1.11 and when GDPS is used, you need version 
3.7 for this.

Is it really so simple to configure ?

What about the DSCLI syntax needed to configure the DS8000 hardware ?
No specials there ?

Greetings from Belgium
 
  

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


Re: EPILOG question

2010-09-08 Thread Norman Hollander on DesertWiz
Have you called support to get help?  It may be a known problem, or others
may have
already reported it.

zNorman

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf
Of Cobe Xu
Sent: Wednesday, September 08, 2010 Wednesday 10:40 AM
To: IBM-MAIN@bama.ua.edu
Subject: EPILOG question

Hi list,
We recently upgraded to Omegamon XE v420, everything looks fine, except I
could not gen reports using EPILOG obtain command in batch, which works in
the old version.
The job gets rc 0, but no record printed. While I use EPILOG session command
line can display information. Any one encounter similar thing? any idea will
be appriciated. Thanks!

here is my JCL:
//EXPORT   EXEC PGM=KEPOBTN,REGION=4096K,PARM='EPPROD=EP'
//STEPLIB  DD DISP=SHR,DSN=SYS1.OZOS1.TKANMOD //RKANPAR  DD
DISP=SHR,DSN=SYSU.OZOS1.AHD5.RKANPARU
//RKM2OUTR DD SYSOUT=*REPORT LISTING
//RKM2OUTO DD SYSOUT=*OBTAIN MESSAGE LOG
//RKM2OUTM DD SYSOUT=*EPILOG MESSAGE LOG
//OUTREP   DD DSN=OUTREP,DISP=(NEW,PASS,DELETE),UNIT=3390,
//DCB=(RECFM=VB,LRECL=4096,BLKSIZE=27998),SPACE=(TRK,(1,1))
//ABNLIGNR DD DUMMY
//RKM2OUTD DD  DSN=MYUID.EPILOG.REPORT,DISP=(MOD,CATLG),
// SPACE=(CYL,(2,1)),UNIT=SYSDA,
// DCB=(DSORG=PS,RECFM=V,LRECL=4096)
//RKM2IN   DD *
//SYSPRINT DD *
 OBTAIN STC(CNMS) INT -
   ELEMENTS(SMFID,SDATE,STIME,STCNAME,CPUTRXTM) -
   FORMAT(PC) OUTFILE(RKM2OUTD) REPLACE
/*

--
Cobe Xu

Best Regards
---
zOS Performance  Capacity Analyst
E2E Performance Analyst
Email: cob...@gmail.com
---

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

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


Re: JES2 vs. JES3

2010-09-08 Thread Steve Comstock

On 9/8/2010 11:30 AM, Ed Finnell wrote:


In a message dated 9/8/2010 11:37:29 A.M. Central Daylight Time,
edja...@phoenixsoftware.com writes:

Nobody morphed HASP into ASP or vice versa. DCS became
ASP; ASP  became JES3. Meanwhile, HASP became JES2.





Huh? HASP was the efforts of NASA Houston  and came out as Half ASP.
Renamed to Houston ASP.


I think that's just a story. I recollect HASP came first,
out of NASA as you say, and ASP was developed separately
out in Thousand Oaks, CA. There was some rivalry and I
think both teams borrowed some concepts and code from
the other.

But, it's all ancient history, right?


--

Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

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

* To get a good Return on your Investment, first make an investment!
  + Training your people is an excellent investment

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


Re: STATOPT

2010-09-08 Thread Cifani, Domenic
Hi

Yes STATOPT is used in VTAM definitions for the STATMON.  It used to provide a 
description for the device, nice to have difficult to maintain based on the 
size of the Network.

Domenic


-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Sebastian Welton
Sent: Wednesday, September 08, 2010 12:14 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: STATOPT

I think that you're correct there (can't verify as STAMON isn't running) but
according to some comments in a sample VTAMLST member it quite possibly has
something to do with the STATMON preprocessor. Nice to be documented
somewhere though.

Sebastian 


On Wed, 8 Sep 2010 07:08:00 -0500, Chase, John jch...@ussco.com wrote:

 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of Sebastian Welton

 Just setting up some VTAM definitions for TAF sessions and want to use
the
 STATOPT statement but this does not seem to be documented anywhere. I
 presume that it should be coded on the last line as:

 * STATOPT='stuff'

 as removing the comment * and adding continuation characters causes
problems
 but leaving it there seems okay. Does this actually get used anywhere
or is
 it just a comment?

I think (but not sure) that the Netview Status Monitor reads it (as a
comment).

   -jc-

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

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

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


Call for Sessions for SHARE in Anaheim, CA

2010-09-08 Thread Norman Hollander on DesertWiz
Hello SHARE Participants -

SHARE in Boston was a very successful conference, with plenty of new
sessions on the new zEnterprise (and there was one in Technology Exchange
to be viewed).  There was quite a lot of buzz about this and all of the
great
sessions.  Now, it is time to start planning our next SHARE conference in
Anaheim, CA.  
It will be held at the Anaheim Convention Center, Sunday through Friday,
February 27th
 through March 4th, 2011, 2009.  
 
The Enterprise Wide Capacity and Performance (EWCP) Project is looking for
sessions of 
general interest; sessions on User experiences, Performance and Capacity
Planning.  We'd 
also be interested in beginner  and back to basics types of sessions
suitable for the zNextGenners.  
 
The scheduling process is beginning now.  You can submit abstracts at the
link below, or directly
to me.  The Call for Sessions closes on October 8th, so please consider
submitting any abstracts as 
soon as possible. 
 
For more information, please visit the SHARE website at
http://share.confex.com/share/116/cfp.cgi .
  

Norman Hollander, Project Manager
EWCP
Enterprise-Wide Capacity and Performance Project 
Office:   +1 760-992-5068
eMail:znor...@desertwiz.biz 
 

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


Re: NO RESPONSE RECEIVED

2010-09-08 Thread Charles Mills
Thanks. Perfect. That's what I was looking for. I was sure I remembered
something like this.

 Not all software products use CARTs on their WTOs

Nope, but mine will. g

Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf
Of Rob Scott
Sent: Wednesday, September 08, 2010 10:14 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: NO RESPONSE RECEIVED

What SDSF is doing here is using the MGCRE service with the CART parameter
(the CART is the command response token) to send the operator command to
an EMCS console. 

The expectation in most cases is that the code that eventually executes in
whatever ASID because of the operator command looks at the CIB and sees that
there is a CART present and then uses the CART=CIBXCART specification on the
WTOs that writes messages containing the operator command response. This
allows the EMCS that SDSF has established to wake up and get the message(s).

Not all software products use CARTs on their WTOs and there may be
architectural reasons why some base z/OS components do not use CARTs either.
To cater for this, SDSF must establish a timer so it can give up waiting -
hence the setting in the SDSF options.  

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


-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf
Of Charles Mills
Sent: 08 September 2010 17:54
To: IBM-MAIN@bama.ua.edu
Subject: NO RESPONSE RECEIVED

When you issue an operator command from SDSF (/S proc or /D IPLINFO, for
example) what determines whether SDSF displays NO RESPONSE RECEIVED in the
upper right or displays the messages that result from the command's being
issued? /S myproc, for example, results in WTO messages being issued within
less than a tenth of second but SDSF says NO RESPONSE RECEIVED. 

From SDSF's point of view, what is a response? I've looked at QEDIT and
CIB and I don't see a way to respond as opposed to just doing something.

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


S737 Abends, Deleted GDG Data Sets and TWS

2010-09-08 Thread Tabor, Rich
We experience this S737 abend maybe once every couple of years where a 
JCL-allocated GDG actively being updated by one batch job can be deleted by a 
TSO user or another batch job.  We found it very hard to believe this could 
even be possible but we did recreate the problem and found that our job 
scheduling product TWS was responsible for disabling this very basic MVS data 
set protection.

To recreate, we used a simple two step job.  Step1 allocates the GDG(+1) 
DISP=(NEW,CATLG) and Step2 updates GDG(+1) DISP=OLD.  If step2 abends (or the 
job is cancelled in step2), then we are ready to use TWS to restart the job in 
step2.  After TWS submits the restart, we are then able to issue a TSO DELETE 
command, or use ISPF 3.4, or submit another batch job to delete it.  Eventually 
the restarted job abends S737.  We found that when we display the enqueues for 
the GDG being created using 'D GRS,RES=(SYSDSN,gdgbase)' that two enqueues 
are returned, one for the GDG base and one for the actual data set name for the 
GDG.  For the restarted job, the enqueue for the GDG base is not present, which 
presumably allows the data set to be deleted even while allocated to another 
job.

Anyways, we just want TWS job scheduling customers to be aware of this 
exposure.  If anyone has seen any unexplainable S737 abends in the past, it 
just may be that their job scheduling product may be involved.

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


Re: S737 Abends, Deleted GDG Data Sets and TWS

2010-09-08 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:ibm-m...@bama.ua.edu] On Behalf Of Tabor, Rich
 Sent: Wednesday, September 08, 2010 1:38 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: S737 Abends, Deleted GDG Data Sets and TWS
 
 We experience this S737 abend maybe once every couple of 
 years where a JCL-allocated GDG actively being updated by one 
 batch job can be deleted by a TSO user or another batch job.  
 We found it very hard to believe this could even be possible 
 but we did recreate the problem and found that our job 
 scheduling product TWS was responsible for disabling this 
 very basic MVS data set protection.
 
 To recreate, we used a simple two step job.  Step1 allocates 
 the GDG(+1) DISP=(NEW,CATLG) and Step2 updates GDG(+1) 
 DISP=OLD.  If step2 abends (or the job is cancelled in 
 step2), then we are ready to use TWS to restart the job in 
 step2.  After TWS submits the restart, we are then able to 
 issue a TSO DELETE command, or use ISPF 3.4, or submit 
 another batch job to delete it.  Eventually the restarted job 
 abends S737.  We found that when we display the enqueues for 
 the GDG being created using 'D GRS,RES=(SYSDSN,gdgbase)' 
 that two enqueues are returned, one for the GDG base and one 
 for the actual data set name for the GDG.  For the restarted 
 job, the enqueue for the GDG base is not present, which 
 presumably allows the data set to be deleted even while 
 allocated to another job.
 
 Anyways, we just want TWS job scheduling customers to be 
 aware of this exposure.  If anyone has seen any unexplainable 
 S737 abends in the past, it just may be that their job 
 scheduling product may be involved.

Is that really TWS's fault? I don't know TWS's internals. But I would guess 
that the restart is like CA-11s. That is, when you restart a failed job, CA-11 
(and TWS?) replaces the relative GDG number with an absolute GDG number. When 
this is done, then the GDG base is not enqueued by the initiator. Try it 
yourself.

--
John McKown 
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone * (817)-691-6183 cell
john.mck...@healthmarkets.com * www.HealthMarkets.com

Confidentiality Notice: This e-mail message may contain confidential or 
proprietary information. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the original message. 
HealthMarkets(r) is the brand name for products underwritten and issued by the 
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance 
Company(r), Mid-West National Life Insurance Company of TennesseeSM and The 
MEGA Life and Health Insurance Company.SM

 

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


Re: JES2 vs. JES3

2010-09-08 Thread David Andrews
On Wed, 2010-09-08 at 14:11 -0400, Steve Comstock wrote:
   Nobody morphed HASP into ASP or vice versa.
  Huh? HASP was the efforts of NASA Houston  and came out as Half ASP.
  Renamed to Houston ASP.
 
 I think that's just a story. I recollect HASP came first,
 out of NASA as you say, and ASP was developed separately
 out in Thousand Oaks, CA.

Notes I took at a SHARE presentation 18 years ago (!) say that the same
people who built ASP built HASP.  NASA was less than enthusiastic over
the prospect of having to spend money on a second box just for spooling,
so the SPOOL program was born, renamed to HASP.

I'd never heard the Half ASP part of the story, but it fits
considering that SPOOL required half the processors of ASP.

See: http://www.redbug.org/dba/sharerpt/share79/o441.html

See also Bill Fairchild's recollection where he mentions Simpson and
Crabtree:
http://www.mail-archive.com/ibm-main@bama.ua.edu/msg09350.html

-- 
David Andrews
A. Duda and Sons, Inc.
david.andr...@duda.com

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


Re: IBM so rt maybe i n for some competiti on?

2010-09-08 Thread Paul Gilmartin
On Wed, 8 Sep 2010 11:42:20 -0400, Shmuel Metz (Seymour J.) wrote:

ObQoheleth ...

OK.  I did the Google search.  All the hits attribute to you.
So I'm entitled to ask.

L'shanah tovah,
gil

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


Updating CHPID Mapping Tool

2010-09-08 Thread Johnston, Robert E
I have v05.20 (J) of the CHPID mapping tool installed, from around Feb 2008. I 
need to install the newest version now but I haven't found anywhere how to 
handle my situation. The old doc talks about getting an upgrade file but there 
is not one on Resourcelink, just the new version of the CMT (which I have 
downloaded).

My question is, should I un-install the old CMT from Windows (XP) before 
launching the setupjre.exe installer or will it take care of uninstalling the 
old version? Thought I'd better ask the pros before trying anything...

Thanks,
Robert Johnston
UAMS - Little Rock


Confidentiality Notice: This e-mail message, including any attachments,
is for the sole use of the intended recipient(s) and may contain
confidential and privileged information.  Any unauthorized review,
use, disclosure or distribution is prohibited.  If you are not the 
intended recipient, please contact the sender by reply
e-mail and destroy all copies of the original message..

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


Re: STATOPT

2010-09-08 Thread Sebastian Welton
Some good information here from Chris Mason (many thanks) who asked me to
post it here:

John Chase is correct that STATOPT is a statement associated with an obscure
NetView component called - as John said - Status Monitor.[1,2] As to why
it is specified as a comment in terms of VTAM definitions requires some
knowledge of the history of this obscure NetView component.

Originally Status Monitor had another name - which I forget - as an IBM
field developed program (FDP) developed in Hursley - a development lab but
not having any mission for network management programs - in, IIRC, the
operations department.

Because at the time, the mid-80's, this FDP was very popular it got swept up
into the amalgamation of the seperate but interdependent products, NCCF,
NLDM and NPDA, which became NetView - because the word got back to network
management development that the poor lambs of system programmers who were
responsible for installing these products couldn't get their heads around
the simple instructions in the manuals regarding how to set up the necessary
NCCF definitions for the interfaces which provided support for NLDM and NPDA.

But I digress to a certain extent.

Because Status Monitor started out as an FDP and it works by having
definitions associated with resources identified by named VTAM statements,
it needed to insert its definitions into the VTAM definitions. The only way
to do this without upsetting VTAM when VTAM is parsing what VTAM rightly
regarded as VTAM definitions, the Status Monitor definitions needed to be
insinuated into the VTAM definitions without VTAM being aware of their
presence. Hence their specification as comment records.

Status Monitor gains access to both the named VTAM resources and their
associated additional definitions by running the appropriate VTAM
definitions - based on its own version of the ATCCONxx member IMMSMC -
through a preprocessor which needs to be run each time there is a sigificant
change to the VTAM definitions. In my test/ediucation systems in the days I
tried to care about the NetView Status Monitor component, I used to run
the preprocessor in the same started task as NetView as a job step before
NetView itself.[3]

STATMON was (is) a command you can enter when logged onto NetView and you
are presented with an NCCF panel. It shows you the VTAM resources in what
Status Monitor imagines is an appropriate hierarchy. You may imagine you
have a good view of your VTAM environemnt and, with simple cursor/Enter key
operations, you have a fast tool for entering VARY ACT and VARY INACT
commands. Also with Status Monitor you can request automatic reactivation
of resourtces which have become inactive which, IMNSHO, is not at all a
sensible approach to take, the main reason being that resources become
active not just because they feel like taking a break but because something
actually has broken.
You may judge I was *not* a Status Monitor advocate!

 the STATOPT statement but this does not seem to be documented anywhere.
The 10th Google hit with statopt ibm - and the prior 9 were not very
encouraging - took me to a page in NetView documentation where the STATOPT
statement was mentioned - and associated with Status Monitor. Searching
for Status Monitor on that so-called infocenter page found many hits.

I did some more digging and found the following page as the first hit with
'status monitor preprocessor':

http://publib.boulder.ibm.com/infocenter/tivihelp/v3r1/index.jsp?topic=/com.ibm.itnetviewforzos.doc/inal0mst60.htm

I think you will find this page particularly useful.

Chris Mason

[1] I needed reminding since it's a long time since I had anything to do
with this statement!

[2] I say obscure although at one time it was very popular. My take on why
it used to be popular and why it is obscure today is that the function
always promised far more than it delivered so that initial enthusiasm was
turned over time into disillusionment.
I may be describing it as obscure but, because it was once popular, I expect
very many VTAM installations have Status Monitor comments hanging around
their VTAM definitions and the current batch of responsible system
programmers just leave them alone although they have no idea what purpose
they could possibly be serving!

Also, as I expect you discovered when setting up your TAF definitions,
NetView still includes Status Monitor sample statements in their sample
definitions. If you never use Status Monitor, as seems very likely, throw
all these Status Monitor statements cluttering up your VTAM definitions away!

[3] This may have given me a problem with the program properties table
(PPT) entry regarding multiple job steps in a systems task but I was well
aware how to circumvent that quite unnecessary restriction.

and...

I have now spotted your post bemoaning the lack of documentation.
Armed with the knowledge that STATOPT is something to do with Status
Monitor and that Status Monitor is something to do with NetView, I
followed this sequence:

Re: IBM so rt maybe i n for some competiti on?

2010-09-08 Thread Shmuel Metz (Seymour J.)
In listserv%201009081519090576.0...@bama.ua.edu, on 09/08/2010
   at 03:19 PM, Paul Gilmartin paulgboul...@aim.com said:

So I'm entitled to ask.

Qoheleth is a transliteration of the original name for the book known
in English as Ecclesiastes. The reference here is to For there is
nothing new under the Sun.

L'shanah tovah,

The same to you and to the list at large.
 
-- 
 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: JES2 vs. JES3

2010-09-08 Thread Anne Lynn Wheeler
part of ibmmain thread from 2000 that ASP was some IBM group
that did Direct Couple at the LA Science Center (i.e. ASP
traces back to 7040/7090 direct couple system):
http://www.garli.ccom/~lynn/2000.html#77

predates the archives here (jan2005):
http://bama.ua.edu/archives/ibm-main.html

but gatewayed to usenet as bit.listserv.ibm-main at google:
http://groups.google.com/group/bit.listserv.ibm-main/browse_thread/thread/bd6288f5d6b18d6d/c0410d4d3a5e7738?lnk=gstq=direct+couple#c0410d4d3a5e7738
http://groups.google.com/group/bit.listserv.ibm-main/browse_thread/thread/b976844cb2604e43
http://groups.google.com/group/bit.listserv.ibm-main/browse_thread/thread/b8d52fe7172a3573
http://groups.google.com/group/bit.listserv.ibm-main/browse_thread/thread/078d193a73f2417d
http://groups.google.com/group/bit.listserv.ibm-main/browse_thread/thread/78d193a73f2417d/711120e7ed90aa32?lnk=gstq=direct+couple#711120e7ed90aa32

-- 
virtualization experience starting Jan1968, online at home since Mar1970

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


Re: JES2 vs. JES3

2010-09-08 Thread Shmuel Metz (Seymour J.)
In 1792f2.291be9b9.39b92...@aol.com, on 09/08/2010
   at 01:30 PM, Ed Finnell efinnel...@aol.com said:

Huh? HASP was the efforts of NASA Houston  and came out as Half ASP.

Do you have a citation for that? I never saw the term before I
suggested HASP is Half ASP for a project button.
 
-- 
 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: JES2 vs. JES3

2010-09-08 Thread Richard L Peurifoy

On 9/7/2010 8:27 PM, Clark Morris wrote:

On 7 Sep 2010 15:19:03 -0700, in bit.listserv.ibm-main you wrote:


---snip-
Why is JES2 better than JES3?
-unsnip--
Each one has its merits and drawbacks. Jes2, in general, has more
limited capabilities but a much smaller virtual storage requirement. One
shop I recently had contact with told me that their JES3 was running a
fairly small working set: ONLY 200 MB.


My that footprint has gone up since I ran JES3 on a 4 or 8 meg 4341 in
single system image.


We are currently running JES3 on a z10BC with in a 4GB LPAR.
The JES3 working set is around 40MB. Of course we are a small
shop.

--
Richard

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


Re: NO RESPONSE RECEIVED

2010-09-08 Thread Chris Craddock
In response to Charles, Rob Scott said:

What SDSF is doing here is using the MGCRE service with the CART parameter
 (the CART is the command response token) to send the operator command to
 an EMCS console.

 The expectation in most cases is that the code that eventually executes in
 whatever ASID because of the operator command looks at the CIB and sees
 that
 there is a CART present and then uses the CART=CIBXCART specification on
 the
 WTOs that writes messages containing the operator command response. This
 allows the EMCS that SDSF has established to wake up and get the
 message(s).

 Not all software products use CARTs on their WTOs and there may be
 architectural reasons why some base z/OS components do not use CARTs
 either.
 To cater for this, SDSF must establish a timer so it can give up waiting -
 hence the setting in the SDSF options.



'es a bright lad is our Rob! Spot on. However, whether or not you see the
NO RESPONSE  message depends entirely on whether SDSF sees a response
before that timeout occurs. So if the system is busy and/or your command
takes a while to process, you may get this even when you're doing everything
right with respect to the CART. BTDTGTS.

As an aside, if you have more than one line of data to return in the command
response you'll have to use the multi-line WTO option. Miraculously, it does
work and SDSF faithfully horks up the entire multi-line response which makes
it a lot easier to see which message parts belong with which responses.


-- 
This email might be from the
artist formerly known as CC
(or not) You be the judge.

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


Re: JES2 vs. JES3

2010-09-08 Thread Arthur Gutowski
This has been an interesting thread, though it seems to pop up from time to 
time here, I always seem to learn some new piece of history or functionality.

As a shop that runs both JES', not because we sell software that must 
operate equally well with either, but out of acqusistions and consolidations, 
and as a former JES2 bigot, I've been in some interesting... discussions over 
the years about which is better and why.  Most of these degenerate very 
quickly into religious diatribes.

One of my favorites was the opportunity to needle one of our most senior 
(experienced and knowledgeable) operators any time we had to cycle the 
initiators to address a throughput or fragmentation problem.  What was that 
command again?  Oh, yeah... COMMANDS.

*F G main G group INIT 0
*F G main G group OFF
*F G main C class OFF

Then repeat in reverse with ON and an INIT count  0 (if I got the order 
right).  Sheesh.  You know in JES2, that'd be a '$PI(xx-xx) followed by a '$SI
(xx-xx).  How hard is that to remember?  Tell me again why JES3 is so much 
better?  I will say they got the cancel right with *F U,...

Not that JES2 is any less cryptic these days, mind you, especially since the 
rewrites in, what was it, OS/390 2.4 (and subsequent removal of the 
command translation exit)?

Now that I've been here a while, I find myself defending JES3.  The balance 
between the two is almost 50-50 in terms of image count, but the vast 
majority of our workload runs on JES3 systems.  I actually helped stave off a 
proposal to convert ten JES3 images to JES2.  As others have pointed out, 
there simply was no way to justify the time, effort, and expense just to make 
some people's lives easier and save a negligible amount of $ (pun intended).

Our biggest systems run batch applications that rely on deadline scheduling.  I 
don't know CA7 enough to know if it functionally replaces ALL that deadline 
does, but we haven't.  Ditto for DJC networks (dependent job control).

I'll admit differences in print management can be tough getting used to.  We 
had a few technical and procedural problems getting InfoPrint and JES3 to 
coexist.  With VPS, it seemed to be less of an issue.  We have little to no RJE 
remaining, so ownership issues mentioned before are not a big deal.

I actually like JES3-managed tape.  Works rather well, and without a CF 
structure (IEFAUTOS) or GRS Star (for ATS Star).  The down side is when the 
Global is down, all locals wait for tape, or any allocation for that matter.

Yes, allocation (DISP=NEW v DISP=MOD) takes a little getting used to, but 
CA11 (or other restart manager) can help.

JECL is different, but some things have been moved into JCL to 
make universal job coding a little easier.  Besides, JES3 JECL is commentary 
to JES2.  The /*ROUTE equivalent is a pain (NJB cards and passwords), but 
ftp to the destination system's internal reader is a nice alternative.

I like that JES3 job classes can be more descriptive, and you can have many, 
many more of them than the 36 in JES2.  (Though, admittedly, we abuse it.)  I 
think it did some of what WLM-managed job classes do long before WLM.

I do still prefer JES2 in terms of it's peer relationship to other JES2 systems 
in 
the MAS.  Perhaps gaining experience with DSI will change my mind, but this 
SPoF in our shop is a big deal to me.  The Global also introduces IPL and 
Hotstart/Warmstart dependencies that don't exist in a JES2 MAS, but again, 
DSI may help me change my mind some day.

Bottom line is, we have both, and unless we migrate workload, we will 
continue to have both, so we, and our vendors (this has been an issue from 
time to time) have to support it.  I think our biggest problem is the relative 
lack of people who really know JES3.

I have to agree with the posters who said, if you're starting from scratch, 
assess your needs, compare the two, and make your choice.  JES2 is arguably 
cheaper, unless you have to buy a lot of add-ons, it's simpler, and it's more 
common.  JES3 arguably does more out of the box, but it is a separate (notice 
I didn't say greater*) cost, is more complex, and may be harder to find people 
to support it (if only due to our own bias).

If you're already one or the other (or both), you're going to have to make one 
helluva business case to justify a conversion.

* During our investigation for our conversion proposal, we noted that JES3 is 
separately priced, however we had no way to quantify the difference in MVS 
base MSUs for SCRT (WLC) on a JES2 vs a JES3 system.  We postulated that 
because JES2 does less, MVS might have to do more, which might drive up our 
cost for the base.  This was not vetted, but had the project continued, it 
would have been interesting to find out.  We also considered the cost of SDSF 
(JES2) v our JES3 spool manager (SDSF for JES3 was not yet announced).

Regards,
Art Gutowski
Ford Motor Company

--
For IBM-MAIN subscribe 

Re: JES2 vs. JES3

2010-09-08 Thread Ed Finnell
 
In a message dated 9/8/2010 3:52:35 P.M. Central Daylight Time,  
shmuel+ibm-m...@patriot.net writes:

Do you have a citation for that? I never saw the term before  I
suggested HASP is Half ASP for a project button.



I first heard it from Sperry  contractor back in the 70's.
Tried googling a while and NASA seems to have  reused HASP inexorably.
Maybe somebody else has better notes or  recollection.



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


Re: JES2 vs. JES3

2010-09-08 Thread Ed Finnell
 
In a message dated 9/8/2010 5:08:33 P.M. Central Daylight Time,  
linda.lst...@comcast.net writes:

A dogpile search for half asp +NASA turned this up -  

Thanks, should have known Mr. JES2 would have it  handy.



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


Re: JES2 vs. JES3

2010-09-08 Thread Linda Mooney
Hi Ed, 



A dogpile search for half asp +NASA turned this up - 



http://nersp.nerdc.ufl.edu/~schudel/JES2/history.html 



Linda 


- Original Message - 
From: Ed Finnell efinnel...@aol.com 
To: IBM-MAIN@bama.ua.edu 
Sent: Wednesday, September 8, 2010 2:56:41 PM 
Subject: Re: JES2 vs. JES3 

  
In a message dated 9/8/2010 3:52:35 P.M. Central Daylight Time,   
shmuel+ibm-m...@patriot.net writes: 

Do you have a citation for that? I never saw the term before  I 
suggested HASP is Half ASP for a project button. 


 
I first heard it from Sperry  contractor back in the 70's. 
Tried googling a while and NASA seems to have  reused HASP inexorably. 
Maybe somebody else has better notes or  recollection. 



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

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


Re: S737 Abends, Deleted GDG Data Sets and TWS

2010-09-08 Thread Tabor, Rich
The short answer I think is yes - yes it is TWS's fault.  Yes, as suggested, if 
I specify the absolute GDG data set name in the JCL, I see only the enqueue for 
the absolute GDG data set and no enqueue for the GDG base.  And MVS/DFP does 
not allow the data set to be deleted by another tso user or batch job in this 
instance (as we all hope and expect).  I don't know for sure if it has to do 
with enqueuing on both the GDG base and the actual gdg data set.  I don't know 
why it is possible in some circumstances for a TSO user or some other job to 
delete a gdg allocated to a job restarted by TWS, but TWS is apf-authorized and 
is modifying JES control blocks so I can't see another culprit here.  I'm just 
making sure that the problem is on record so that someone running into this in 
the future will find that it has happened before. 



-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
McKown, John
Sent: Wednesday, September 08, 2010 11:55 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: S737 Abends, Deleted GDG Data Sets and TWS

 -Original Message-
 From: IBM Mainframe Discussion List
 [mailto:ibm-m...@bama.ua.edu] On Behalf Of Tabor, Rich
 Sent: Wednesday, September 08, 2010 1:38 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: S737 Abends, Deleted GDG Data Sets and TWS
 
 We experience this S737 abend maybe once every couple of years where a 
 JCL-allocated GDG actively being updated by one batch job can be 
 deleted by a TSO user or another batch job.
 We found it very hard to believe this could even be possible but we 
 did recreate the problem and found that our job scheduling product TWS 
 was responsible for disabling this very basic MVS data set protection.
 
 To recreate, we used a simple two step job.  Step1 allocates the 
 GDG(+1) DISP=(NEW,CATLG) and Step2 updates GDG(+1) DISP=OLD.  If step2 
 abends (or the job is cancelled in step2), then we are ready to use 
 TWS to restart the job in step2.  After TWS submits the restart, we 
 are then able to issue a TSO DELETE command, or use ISPF 3.4, or 
 submit another batch job to delete it.  Eventually the restarted job 
 abends S737.  We found that when we display the enqueues for the GDG 
 being created using 'D GRS,RES=(SYSDSN,gdgbase)'
 that two enqueues are returned, one for the GDG base and one for the 
 actual data set name for the GDG.  For the restarted job, the enqueue 
 for the GDG base is not present, which presumably allows the data set 
 to be deleted even while allocated to another job.
 
 Anyways, we just want TWS job scheduling customers to be aware of this 
 exposure.  If anyone has seen any unexplainable
 S737 abends in the past, it just may be that their job scheduling 
 product may be involved.

Is that really TWS's fault? I don't know TWS's internals. But I would guess 
that the restart is like CA-11s. That is, when you restart a failed job, CA-11 
(and TWS?) replaces the relative GDG number with an absolute GDG number. When 
this is done, then the GDG base is not enqueued by the initiator. Try it 
yourself.

--
John McKown
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone * (817)-691-6183 cell john.mck...@healthmarkets.com * 
www.HealthMarkets.com

Confidentiality Notice: This e-mail message may contain confidential or 
proprietary information. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the original message. 
HealthMarkets(r) is the brand name for products underwritten and issued by the 
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance 
Company(r), Mid-West National Life Insurance Company of TennesseeSM and The 
MEGA Life and Health Insurance Company.SM

 

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

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


Where is APF documented?

2010-09-08 Thread Charles Mills
I know what APF-authorization means for a dataset well enough to use it. I'm
writing a manual and I would like a formal definition of APF-authorization.
I search the book manager z/OS MVS shelf for APF and I get lots of hits but
the ones I looked at are either very peripheral or else they are how to set
up your APF list in PARMLIB or the SETPROG APF command.

Where is a formal statement of what APF-authorization means?

Charles Mills

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


Re: Where is APF documented?

2010-09-08 Thread Starr, Alan
Charles,

Take a look at chapter 21 of the Authorized Assembler Programming GUIDE. That 
may help.

Cheers,
Alan 

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Charles Mills
Sent: Wednesday, September 08, 2010 16:26
To: IBM-MAIN@bama.ua.edu
Subject: Where is APF documented?

I know what APF-authorization means for a dataset well enough to use it. I'm 
writing a manual and I would like a formal definition of APF-authorization.
I search the book manager z/OS MVS shelf for APF and I get lots of hits but the 
ones I looked at are either very peripheral or else they are how to set up 
your APF list in PARMLIB or the SETPROG APF command.

Where is a formal statement of what APF-authorization means?

Charles Mills

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

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


Re: JES2 vs. JES3

2010-09-08 Thread WalterR

Shmuel Metz (Seymour J.) wrote:

In 1792f2.291be9b9.39b92...@aol.com, on 09/08/2010
   at 01:30 PM, Ed Finnell efinnel...@aol.com said:

  

Huh? HASP was the efforts of NASA Houston  and came out as Half ASP.



Do you have a citation for that? I never saw the term before I
suggested HASP is Half ASP for a project button.
 
  
I worked as an operator at the the L.A. Scientific Center in Westwood 
(data center on the U.C.L.A campus) when DCS was initially developed on 
a 7094 with a 7040 as the support processor (before that they tried a 
1410).  Art Walters was one of the leads.  I recall the term Half ASP 
used a couple of times somewhat sarcastically.  I also recall that HASP 
was already known as a product (Type III?) out of Houston.  This was 
around 1965.


Walter Rue

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


Re: Where is APF documented?

2010-09-08 Thread Charles Mills
Thanks. That's certainly better than anything else I found.

But I would really like a formal or fairly formal *definition* of APF
authorization.

(And to re-iterate the point in my OP, yes, I know informally well enough
what APF authorization does. I was hoping for a formal statement.)

Here's a way to re-phrase the question. Suppose an auditor said show me a
definition of APF authorization and a statement of what it means. Where
would you point him? (No smart answers please.)

Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf
Of Starr, Alan
Sent: Wednesday, September 08, 2010 4:32 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Where is APF documented?

Charles,

Take a look at chapter 21 of the Authorized Assembler Programming GUIDE.
That may help.

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


Re: S737 Abends, Deleted GDG Data Sets and TWS

2010-09-08 Thread Brian Kennelly
On Wed, Sep 8, 2010 at 15:53, Tabor, Rich richard.ta...@usairways.comwrote:

 The short answer I think is yes - yes it is TWS's fault.  Yes, as
 suggested, if I specify the absolute GDG data set name in the JCL, I see
 only the enqueue for the absolute GDG data set and no enqueue for the GDG
 base.  And MVS/DFP does not allow the data set to be deleted by another tso
 user or batch job in this instance (as we all hope and expect).  I don't
 know for sure if it has to do with enqueuing on both the GDG base and the
 actual gdg data set.  I don't know why it is possible in some circumstances
 for a TSO user or some other job to delete a gdg allocated to a job
 restarted by TWS, but TWS is apf-authorized and is modifying JES control
 blocks so I can't see another culprit here.  I'm just making sure that the
 problem is on record so that someone running into this in the future will
 find that it has happened before.


It is very likely a basic error in the TWS restart.  I remember another
vendor's restart product that had a similar problem.  it would reset the SWA
blocks for a GDS to reflect the absolute generation, as John described, but
it did so after MVS had built its enqueue table, so the GDS did not get
enqueued.  The programmer had to add code to acquire the enqueue and update
the enqueue table.

When I wrote my restart code, I made sure to avoid that error.  I adjust the
base, but not the relative generations on generation datasets.

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


Re: EPILOG question

2010-09-08 Thread Cobe Xu
thanks Norman...

Just figured out.. I did  a silly move that put SYSPRINT DD after RKM2IN
DD

On Thu, Sep 9, 2010 at 2:02 AM, Norman Hollander on DesertWiz 
norman.hollan...@desertwiz.biz wrote:

 Have you called support to get help?  It may be a known problem, or others
 may have
 already reported it.

 zNorman

 -Original Message-
 From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
 Behalf
 Of Cobe Xu
 Sent: Wednesday, September 08, 2010 Wednesday 10:40 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: EPILOG question

 Hi list,
 We recently upgraded to Omegamon XE v420, everything looks fine, except I
 could not gen reports using EPILOG obtain command in batch, which works in
 the old version.
 The job gets rc 0, but no record printed. While I use EPILOG session
 command
 line can display information. Any one encounter similar thing? any idea
 will
 be appriciated. Thanks!

 here is my JCL:
 //EXPORT   EXEC PGM=KEPOBTN,REGION=4096K,PARM='EPPROD=EP'
 //STEPLIB  DD DISP=SHR,DSN=SYS1.OZOS1.TKANMOD //RKANPAR  DD
 DISP=SHR,DSN=SYSU.OZOS1.AHD5.RKANPARU
 //RKM2OUTR DD SYSOUT=*REPORT LISTING
 //RKM2OUTO DD SYSOUT=*OBTAIN MESSAGE LOG
 //RKM2OUTM DD SYSOUT=*EPILOG MESSAGE LOG
 //OUTREP   DD DSN=OUTREP,DISP=(NEW,PASS,DELETE),UNIT=3390,
 //DCB=(RECFM=VB,LRECL=4096,BLKSIZE=27998),SPACE=(TRK,(1,1))
 //ABNLIGNR DD DUMMY
 //RKM2OUTD DD  DSN=MYUID.EPILOG.REPORT,DISP=(MOD,CATLG),
 // SPACE=(CYL,(2,1)),UNIT=SYSDA,
 // DCB=(DSORG=PS,RECFM=V,LRECL=4096)
 //RKM2IN   DD *
 //SYSPRINT DD *
  OBTAIN STC(CNMS) INT -
   ELEMENTS(SMFID,SDATE,STIME,STCNAME,CPUTRXTM) -
   FORMAT(PC) OUTFILE(RKM2OUTD) REPLACE
 /*

 --
 Cobe Xu

 Best Regards
 ---
 zOS Performance  Capacity Analyst
 E2E Performance Analyst
 Email: cob...@gmail.com
 ---

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

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




-- 
Cobe Xu

Best Regards
---
zOS Performance  Capacity Analyst
E2E Performance Analyst
Email: cob...@gmail.com
---

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