COBOL is an obvious cash cow to be milked to death was Re: Does Ent. COBOL 4.1 generate 64-bit binary arithmetic instructions?

[Bill Klein]

Clark Morris cfmpub...@ns.sympatico.ca wrote in message
news:mq7tc51ajbefs2n1tc5e769m2gb2aep...@4ax.com...
 On 8 Oct 2009 14:08:24 -0700, in bit.listserv.ibm-main you wrote:
 
snip
 It could be done 
 much snippage

For those in IBM-MAIN who don't follow such things.  Clark has had long
running desires of how it would like to see IBM COBOL development
prioritize things.  When voted upon by SHARE (LNGC project) members, many of
the things that Clark wants are things that current IBM customers also want.


HOWEVER, in most cases, those enhancements that IBM has delivered in recent
releases and versions of Enterprise COBOL have received HIGHER priorities
from customers (in and out of SHARE) that those things that Clark has asked
for.

I suspect that many (Possibly even most) existing IBM COBOL customers would
like it if IBM COBOL development had unlimited resources for enhancements
- ASSUMING that the cost of COBOL to their shops did not increase and that
all future COBOL environments were %100 per cent upwardly (and downwardly)
compatible.  This isn't true and is unlike to ever be true.

Therefore, similar to other specific IBM-MAIN participants who hate such
things as LE, his repeated posts ranting bout specific issues (such as
64-bit COBOL and *non* decimal IEEE floating point) provide little service.

OBVIOUSLY, if any other IBM-MAIN participant belongs to SHARE and wants to
see some new/different enhancement request for Enterprise COBOL processed, I
would encourage you to use the SHARE requirement process and/or marketing
REQUEST procedures.  I can certainly help you with the SHARE requirement
process if you are interested in such.

If you are interested in specific things that have already been voted upon
by LNGC (such as 64-bit COBOL and/or IEEE binary Floating-Point), then I
would be more than happy to provide you with information on the existing
requirements and you submit a marketing REQUEST that references 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

Does Ent. COBOL 4.1 generate 64-bit binary arithmetic instructions?

[Bill Klein]

When it comes specifically to 64-bit COBOL, the biggest issue (IMHO) is
mixing of 31-(and/or 24-)bit COBOL with 64-bit COBOL.

It is my impression (and I do NOT speak for IBM) that IBM is aware of the
desire for 64-bit COBOL, but that (given the LE, not z/OS restriction on
mixed 31-/64-bit) code, that they are looking at a foreseeable but not
immediate 64-bit COBOL that will work 
  A) in a 64-bit only environment
(and maybe)
  B) will have some mechanism (NOT traditional COBOL run-unit and CALL
statements) for communicating between 31-bit and 64-bit COBOL programs.

My personal guess is that either or both of these will be nice to have but
will get very little actual user-community use.  COBOL shops (and
applications) are just too used to transparent inter program
communication.  However, when/if such are available, it may (or may not)
give IBM additional information on how to proceed from there and actually
meet paying customer demands and expectations.

When there was a recent SHARE LNGC vote on IBM providing such a solution
(even if it were a transition step to a future more mixed environment),
the LNGC project gave this sufficiently LOW priority that the requirement
never even got sent to IBM.

If any shop (with readers in IBM-MAIN) thinks that such a 64-bit COBOL
product *would* meet their needs, please feel free to contact me off-list
and I can give you the rejected by user requirement information so that
you can submit it as a marketing REQUEST.

NOTE:
  If your shop is interested in IBM providing a 64-bit COBOL solution with
an explicit statement of direction (or actual implementation) of mixed
31-/64-bit COBOL programs in a single run-unit, then you can also contact me
off-list and I will provide you information on that requirement and you can
do a marketing REQUEST for that too.  I wouldn't be very optimistic about
how IBM would respond, but it can still be communicated to them.

Timothy Sipples timothy.sipp...@us.ibm.com wrote in message
news:of79a78257.faa461e9-on4925764a.001ddf83-4925764a.001f5...@us.ibm.com.
..
 This COBOL discussion feels like deja vu. :-)
 
 As a reminder, I am not speaking for IBM.
 
 There have been and are lots of discussions about future COBOL
innovations,
 both within IBM and with our customers. One of the big ones is how (and
 consequently when) to get to 64-bit. I have my own (strong) views on that
 question, which I express as often as I can. (And I know I'm right. :-))
 But, in all seriousness, there is a rather complex set of factors that
have
 to be considered on how, and ultimately the relevant voices are
customers'.
 They decide the right answer.
 
 So, I'll say it again: tell IBM what you want and how you want it -- and
 what you value most. In particular, there is a tension between innovation
 and potential risk. Do you want zero or near-zero risk? Well, then, maybe
 IBM shouldn't be so aggressive in innovating. (I'm oversimplifying, but
 that's the idea.) Said another way, COBOL (and PL/I) really do run the
 mission-critical world, while some of these other languages don't. :-)
 
 Now, I happen to think my recommended approach perfectly combines maximum
 innovation with zero or near-zero risk. (I have a have your cake and eat
 it too idea.) But I don't get to decide these things. You do, subject to
 the technical constraints of course. So please speak up, through the
proper
 channels. Much appreciated. Thanks.
 
 - - - - -
 Timothy Sipples
 IBM Consulting Enterprise Software Architect
 Based in Tokyo, Serving IBM Japan / Asia-Pacific
 E-Mail: timothy.sipp...@us.ibm.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

AUTO: Angelo Corridori is out of the office.

[Angelo Corridori]

I am out of the office until 10/19/2009.

I will respond to your message when I return. Primarily working from home;
limited access to e-mail/phonemail. Call me at home (845-297-5196) or send
an e-mail if you need to get touch with me.


Note: This is an automated response to your message  IBM-MAIN Digest - 7
Oct 2009 to 8 Oct 2009 (#2009-281) sent on 10/9/09 0:00:03.

This is the only notification you will receive while this person is away.

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

Leonard Sasso/GIS/CSC is Out-of-the-Office.

[Leonard Sasso]

I will be out of the office starting  10/09/2009 and will not return until
10/12/2009.


If you require immediate attention please contact Deb Hext (518) 257-4212,
Tony Alfonso (518) 257-4640 or Joyce Brooks (518) 257-4208 .  You may also
contact my Team Lead, Sharon King (518) 257-4784 or my manager, David
Richardson (518) 257-4414, otherwise I will respond to your message when I
return.  Please send all emails to our Lotus Notes Group
rdc_applications_...@csc.

  I hope you have a wonderful day !

  Thank You,

   Len

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

Does a DD-Statement waste memory after dealloc?

[Michael Knigge]

All,


I currently try to find a obscure memory leak in one of our 
applications. After some days our appl occupies ~17.000 pages of real 
memory  (needs just ~1.500 after startup).


As we track all malloc(), calloc(), realloc() and free() function calls, 
I can say that there is no obvious memory leak


Now... after I've looked at the JESYSMSG I've noticed that we've done 
approx 17.000 DYNALLOCs, everyone with a different DD-Name (we let the 
z/OS generate a unique one, like SYS1, SYS2, SYS3 and 
so on). to be clear: *NOT* ~17.000 at the same time. mostly only one 
at the same time...


Of couse, we deallocate them after we've finished using the DD-Name, but 
I wonder that even after a DEALLOC (with SVC99) there is some space 
still occupied


Why? Because of performance? Because of some kind of control block that 
can only grow but not shrink?



Thanks,
Michael

--
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: Does a DD-Statement waste memory after dealloc?

[Rob Scott]

Michael,

Have you tried taking an in-flight dump (z/OS command : DUMP COMM=('foo') ) of 
the address space and then running IPCS against it to see where the storage is 
being used (VERBX VSMDATA and RSMDATA would be good place to start). 


Rob Scott
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 
Michael Knigge
Sent: 09 October 2009 09:34
To: IBM-MAIN@bama.ua.edu
Subject: Does a DD-Statement waste memory after dealloc?

All,


I currently try to find a obscure memory leak in one of our applications. After 
some days our appl occupies ~17.000 pages of real memory  (needs just ~1.500 
after startup).

As we track all malloc(), calloc(), realloc() and free() function calls, I can 
say that there is no obvious memory leak

Now... after I've looked at the JESYSMSG I've noticed that we've done approx 
17.000 DYNALLOCs, everyone with a different DD-Name (we let the z/OS generate a 
unique one, like SYS1, SYS2, SYS3 and so on). to be 
clear: *NOT* ~17.000 at the same time. mostly only one at the same time...

Of couse, we deallocate them after we've finished using the DD-Name, but I 
wonder that even after a DEALLOC (with SVC99) there is some space still 
occupied

Why? Because of performance? Because of some kind of control block that can 
only grow but not shrink?


Thanks,
Michael

--
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: Password?

[Robert S. Hansel (RSH)]

Ray,

I don't have an explanation for the panel, but this event raises an
interesting question. Do you leave you work station logged on and unlocked
when you leave the office at night such that someone else could use it to
access the network and email system under your ID and authority and with you
being held accountable for such actions?

Regards, Bob

-
Robert S. Hansel   | 2009 RACF Training
Lead RACF Specialist   |
RSH Consulting, Inc.   |  Audit for Results   - Boston - NOV 3-5
www.rshconsulting.com  |
617-969-8211   | Visit our website for registration  details
-

-Original Message-
Date:Thu, 8 Oct 2009 08:08:55 -0400
From:Baraniecki, Ray ray.baranie...@morganstanley.com
Subject: Password?

When I arrived at work this morning there was a panel on my work station =
that was asking for my password for LISTSERV. I don't recall ever having =
a password or for that matter how to request a password.

Can someone help clear up this confusion?


Thanks,


Ray Baraniecki
Morgan Stanley Smith Barney
18th Floor
1 New York Plaza
New York, NY 10004
Office - 212-276-5641
   Cell - 917-597-5692

ray.baranie...@morganstanley.commailto:ray.baranie...@morganstanley.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

Why no arm statement inside?

[Tommy Tsui]

Hi all,
After I defined the ARM policy and activiate it but nothing inside ? I  
already defined the restart element in ARM policy. anything I missing?


SETXCF COUPLE,PCOUPLE=(SYS1.ARMCDS01),TYPE=ARM
IXC309I SETXCF COUPLE,PCOUPLE REQUEST FOR ARM WAS ACCEPTED
IEF196I IEF237I 982E ALLOCATED TO SYS00066
IXC286I COUPLE DATA SET 014
SYS1.ARMCDS01,
VOLSER S1, HAS BEEN ADDED AS THE PRIMARY
FOR ARM ON SYSTEM XXXSPD1
IXC811I SYSTEM XXXSPD1 IS NOW ARM CAPABLE

SETXCF START,POLICY,POLNAME=ARMPLOY,TYPE=ARM
IXC805I ARM POLICY HAS BEEN STARTED BY SYSTEM XXXSPD1. 029
POLICY NAMED ARMPLOY IS NOW IN EFFECT.

D XCF,ARMSTATUS
IXC392I 15.50.31 DISPLAY XCF 081
NO ARM ELEMENTS ARE DEFINED

--
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: FEX (Find EXpression)

[Shmuel Metz (Seymour J.)]

In 4acb1a23.4010...@gmail.com, on 10/06/2009
   at 06:21 PM, David Crayford dcrayf...@gmail.com said:

Does SimpList add this regex find

What he described is not a regex find, although it does borrow some
syntax. 

Has anybody ported PCRE to z/OS?
 
-- 
 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 1401 Announcement, 50th Anniversary today, Oct 5th

[Shmuel Metz (Seymour J.)]

In f62a8029ba9f4bf689c9e44f5f8eb...@afg, on 10/05/2009
   at 08:53 AM, Andreas F. Geissbuehler afg0...@videotron.ca said:

Autocoder was/is the name of the 1401 Assembler:

c/the/a/

You're forgetting SPS; Autocoder required more hardware.

-- 
 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 name standards (Was: multiple jobs / same name)

[Shmuel Metz (Seymour J.)]

In listserv%200910031526437940.0...@bama.ua.edu, on 10/03/2009
   at 03:26 PM, Paul Gilmartin paulgboul...@aim.com said:

There's a smoldering need here for a means to pass arbitrary name/value
pairs from JCL to job processing components other than by steganographic
jobname coding. 

SJF. Unfortunately, IBM has only documented its use for DD and OUTPUT
statements.
 
-- 
 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: FEX (Find EXpression)

[Rich Smrcina]

I recall having an email conversation with someone that was working on 
porting the Hobbit (now Xymon) network systems monitor to z/OS.  It has 
a prereq for PCRE.  I'll check with him to see if he got it working.


Shmuel Metz (Seymour J.) wrote:

In 4acb1a23.4010...@gmail.com, on 10/06/2009
   at 06:21 PM, David Crayford dcrayf...@gmail.com said:

  

Does SimpList add this regex find



What he described is not a regex find, although it does borrow some
syntax. 


Has anybody ported PCRE to z/OS?
 
  



--
Rich Smrcina
Phone: 414-491-6001
http://www.linkedin.com/in/richsmrcina

Catch the WAVV! http://www.wavv.org
WAVV 2010 - Apr 9-14, 2010 Covington, KY

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

SV: Multiple jobs/same name

[Thomas Berg]

The help function in SDSF has always been somewhat byzantine...
I think they looked at it as: was it hard to code, it should be hard to use :)
 


Regards, 
Thomas Berg 
__ 
Thomas Berg   Specialist   IT-U   SWEDBANK 



 

 -Ursprungligt meddelande-
 Från: IBM Mainframe Discussion List 
 [mailto:ibm-m...@bama.ua.edu] För Peter Relson
 Skickat: den 8 oktober 2009 16:49
 Till: IBM-MAIN@bama.ua.edu
 Ämne: Re: Multiple jobs/same name
 
 I was not aware of PREFIX **.
 This appears to work well!
 Thanks for the heads up!
 Where is this documented, anyway?
 SDSF seems to only have one manual,
 SDSF Operation and Customization,
 and I can't find PREFIX documented anywhere in there.
 
 According to the SDSF folks, their commands are documented in 
 the help panels. Sounds strange to me. But it's not my component.
 
 From SDSF option H,
 Help - 1 for Extended Help - 2 for Syntax of the H command 
 to second page for 2 Displaying all jobs
 
 And yes, that too sounds somewhat unfriendly to me, as you 
 are not trying to display all jobs and you really are trying 
 to display only your own jobs which was option 1 on that 
 last panel. But that option turns out to be only your own 
 jobs as long as they have names that match your user ID 
 according to the displayed text..
 
 Peter Relson
 z/OS Core Technology Design
 --
 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: Multiple jobs/same name

[Bob Shannon]

 The help function in SDSF has always been somewhat byzantine...
I think they looked at it as: was it hard to code, it should be hard to use 
:)

I think they decided to use the OS/2 model of only having online documentation. 
There is an old user's guide from years ago that is helpful but no longer 
complete.

Bob Shannon
Rocket Software

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Thomas Berg
Sent: Friday, October 09, 2009 7:34 AM
To: IBM-MAIN@bama.ua.edu
Subject: SV: Multiple jobs/same name

The help function in SDSF has always been somewhat byzantine...
I think they looked at it as: was it hard to code, it should be hard to use :)
 


Regards, 
Thomas Berg 
__ 
Thomas Berg   Specialist   IT-U   SWEDBANK 



 

 -Ursprungligt meddelande-
 Från: IBM Mainframe Discussion List 
 [mailto:ibm-m...@bama.ua.edu] För Peter Relson
 Skickat: den 8 oktober 2009 16:49
 Till: IBM-MAIN@bama.ua.edu
 Ämne: Re: Multiple jobs/same name
 
 I was not aware of PREFIX **.
 This appears to work well!
 Thanks for the heads up!
 Where is this documented, anyway?
 SDSF seems to only have one manual,
 SDSF Operation and Customization,
 and I can't find PREFIX documented anywhere in there.
 
 According to the SDSF folks, their commands are documented in 
 the help panels. Sounds strange to me. But it's not my component.
 
 From SDSF option H,
 Help - 1 for Extended Help - 2 for Syntax of the H command 
 to second page for 2 Displaying all jobs
 
 And yes, that too sounds somewhat unfriendly to me, as you 
 are not trying to display all jobs and you really are trying 
 to display only your own jobs which was option 1 on that 
 last panel. But that option turns out to be only your own 
 jobs as long as they have names that match your user ID 
 according to the displayed text..
 
 Peter Relson
 z/OS Core Technology Design
 --
 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: Does a DD-Statement waste memory after dealloc?

[Michael Knigge]

Have you tried taking an in-flight dump (z/OS command : DUMP COMM=('foo') ) of the address space and then running IPCS against it to see where the storage is being used (VERBX VSMDATA and RSMDATA would be good place to start). 


I've never used IPCS :-(  But I'm afraid in this case I have to use it.

Bye,
Michael

--
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: Does Ent. COBOL 4.1 generate 64-bit binary arithmetic instructions?

[Don Higgins]

Here is example of what is possible as far as generating 64 z9/z10 
instructions, extended HFP, BFP, and DFP floating point, and 31 digit packed 
and zoned decimal.  With NOTRUNC, a 64 bit add for 1 byte literals can be 
done with single AGSI instruction as shown below.  The use of 64 bit 
arithmetic instructions is a separate issue from 64 bit addressing.  The 
example below was run in 31 bit address mode. 


The following COBOL program was compiled using open source zcobol compiler 
which generates HLASM source assembler with labels.  Then the zcobol source 
execution trace was run to show both the instruction operand hex values and 
the corresponding source code:

   IDENTIFICATION DIVISION.
   PROGRAM-ID.TESTZC1.
   AUTHOR.DON HIGGINS.
   ENVIRONMENT DIVISION.
   DATA DIVISION.
   WORKING-STORAGE SECTION.
   77  INT64  PIC S9(18) COMP   
  VALUE 123456789012345678
   77  INT128 PIC S9(39) COMP  
  VALUE 123456789012345678901234567890123456789.
   77  HFP-EXT FLOAT-HEX-30 
   VALUE 123456789012345678901234567890.
   77  BFP-EXT FLOAT-BINARY-34
   VALUE 12345678901234567890123456789012301234.
   77  DFP-EXT FLOAT-DECIMAL-34
   VALUE 12345678901234567890123456789012301234.
   77 PD31COMP-3 PIC S9(31) 
  VALUE 1234567890123456789012345678901.
   77 ZD31   PIC S9(31) 
  VALUE 1234567890123456789012345678901.
   PROCEDURE DIVISION.
   ADD 1 TO INT64
   ADD 1 TO INT128
   ADD 1 TO HFP-EXT
   ADD 1 TO BFP-EXT
   ADD 1 TO DFP-EXT
   ADD 1 TO PD31   
   ADD 1 TO ZD31
   STOP RUN.

Here is the resulting ZPARTRS source execution trace:

 CBL=TESTZC1PROCEDURE DIVISION ; ADD   1,TO,INT64

 800FFDAC 2 EB01D058007A  AGSI  S2(000FFF28)=01B69B4BA630F34E I2=01
 TESTZC1  DC TESTZC1  AGSI  INT64,1

 CBL=TESTZC1  23 ADD   1,TO,INT128

 800FFDB2 2 EB01D064  LMG   R0=F4F4F4F40130 
R1=F4F4F4F4000FFED0 S2(000FFF30)=5CE0E9A56015FEC5
 TESTZC1  E2  LMG  ZC_R0,ZC_R1,INT128
 800FFDB8 2 C0E00068  LARL  RE=800FFD48 S2(000FFE88)
 TESTZC1  E8  LARL ZC_R14,=FL16'1'
 800FFDBE 2 E31E0008000A  ALG   R1=AADFA328AE398115 S2(000FFE90)
=0001
 TESTZC1  EE  ALG  ZC_R1,8(ZC_R14)
 800FFDC4 1 E30E0088  ALCG  R0=5CE0E9A56015FEC5 S2(000FFE88)
=
 TESTZC1  F4  ALCG ZC_R0,0(ZC_R14)
 800FFDCA 1 EB01D0600024  STMG  R0=5CE0E9A56015FEC5 
R1=AADFA328AE398116 S2(000FFF30)=5CE0E9A56015FEC5
 TESTZC1  FA  STMG ZC_R0,ZC_R1,INT128

 CBL=TESTZC1  24 ADD   1,TO,HFP_EXT

 800FFDD0 1 6800D070  LDF0=F4F4F4F4F4F4F4F4 S2(000FFF40)
=5918EE90FF6C373E
 TESTZC1  000100  LDZC_F0,HFP_EXT
 800FFDD4 1 6820D078  LDF2=F4F4F4F4F4F4F4F4 S2(000FFF48)
=4B0EE4E3F0AD2000
 TESTZC1  000104  LDZC_F2,8+HFP_EXT
 800FFDD8 1 C0E00060  LARL  RE=000FFE88 S2(000FFE98)
 TESTZC1  000108  LARL  ZC_R14,=LH'1'
 800FFDDE 1 681E  LDF1=F4F4F4F4F4F4F4F4 S2(000FFE98)
=4110
 TESTZC1  00010E  LDZC_F1,0(ZC_R14)
 800FFDE2 1 683E0008  LDF3=F4F4F4F4F4F4F4F4 S2(000FFEA0)
=3300
 TESTZC1  000112  LDZC_F3,8(ZC_R14)
 800FFDE6 1 3601  AXR   F0=5918EE90FF6C373E F1=4110
 TESTZC1  000116  AXR   ZC_F0,ZC_F1
 800FFDE8 2 6000D070  STD   F0=5918EE90FF6C373E S2(000FFF40)
=5918EE90FF6C373E
 TESTZC1  000118  STD   ZC_F0,HFP_EXT
 800FFDEC 2 6020D078  STD   F2=4B0EE4E3F0AD3000 S2(000FFF48)
=4B0EE4E3F0AD2000
 TESTZC1  00011C  STD   ZC_F2,8+HFP_EXT

 CBL=TESTZC1  25 ADD   1,TO,BFP_EXT

 800FFDF0 2 6800D080  LDF0=5918EE90FF6C373E S2(000FFF50)
=407A29361EDE0046
 TESTZC1  000120  LDZC_F0,BFP_EXT
 800FFDF4 2 6820D088  LDF2=4B0EE4E3F0AD3000 S2(000FFF58)
=627889320A1BC709
 TESTZC1  000124  LDZC_F2,8+BFP_EXT
 800FFDF8 2 C0E00058  LARL  RE=000FFE98 S2(000FFEA8)
 TESTZC1  000128  LARL  ZC_R14,=LB'1'
 800FFDFE 2 681E  LDF1=4110 S2(000FFEA8)
=3FFF
 TESTZC1  00012E  LDZC_F1,0(ZC_R14)
 800FFE02 2 683E0008  LDF3=3300 S2(000FFEB0)
=
 TESTZC1  000132  LDZC_F3,8(ZC_R14)
 800FFE06 2 B34A0001  AXBR  F0=407A29361EDE0046 
F1=3FFF
 TESTZC1  000136  AXBR  ZC_F0,ZC_F1
 800FFE0A 2 6000D080  STD   F0=407A29361EDE0046 S2(000FFF50)
=407A29361EDE0046
 TESTZC1  00013A  STD   ZC_F0,BFP_EXT
 800FFE0E 2 6020D088  STD   F2=627889320A1BC708 S2(000FFF58)
=627889320A1BC709
 TESTZC1  00013E  STD   ZC_F2,8+BFP_EXT

 CBL=TESTZC1  26 ADD   1,TO,DFP_EXT

 800FFE12 2 6800D090  LDF0=407A29361EDE0046 S2(000FFF60)
=2609134B9C1E28E5
 TESTZC1  000142  LDZC_F0,DFP_EXT
 

Re: Does a DD-Statement waste memory after dealloc?

[Rob Scott]

If you are leaking in the C program (I am assuming it is LE) then you might see 
just some large chunks allocated to the heap (subpool 2 maybenot sure). If 
that is the case then maybe the VERBX LEDATA IPCS command will help (IIRC you 
will have to provide the TCB address). Disclaimer : I am a complete noob as far 
as C is concerned.

If you have a more traditonal sytle leak - then this might be evident in the 
other (non-heap) subpools and VSMLIST will show you some clues.   


Rob Scott
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 
Michael Knigge
Sent: 09 October 2009 13:11
To: IBM-MAIN@bama.ua.edu
Subject: Re: Does a DD-Statement waste memory after dealloc?

 Have you tried taking an in-flight dump (z/OS command : DUMP COMM=('foo') ) 
 of the address space and then running IPCS against it to see where the 
 storage is being used (VERBX VSMDATA and RSMDATA would be good place to 
 start). 

I've never used IPCS :-(  But I'm afraid in this case I have to use it.

Bye,
Michael

--
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: Does Ent. COBOL 4.1 generate 64-bit binary arithmetic instructions?

[Lloyd Fuller]

There needs to be an expectation level set here:

64 bit addressing does not equal 64 bit arithmetic.

You can use the 64 bit arithmetic instructions WITHOUT using 64 bit addressing. 
 Our product does it all of the time.  You just need to be running on the 
correct architecture to use the 64 bit arithmetic instructions.

Lloyd

--- On Fri, 10/9/09, Bill Klein wmkl...@ix.netcom.com wrote:

 From: Bill Klein wmkl...@ix.netcom.com
 Subject: Does Ent. COBOL 4.1 generate 64-bit binary arithmetic instructions?
 To: IBM-MAIN@bama.ua.edu
 Date: Friday, October 9, 2009, 2:47 AM
 When it comes specifically to 64-bit
 COBOL, the biggest issue (IMHO) is
 mixing of 31-(and/or 24-)bit COBOL with 64-bit COBOL.
 
 It is my impression (and I do NOT speak for IBM) that IBM
 is aware of the
 desire for 64-bit COBOL, but that (given the LE, not z/OS
 restriction on
 mixed 31-/64-bit) code, that they are looking at a
 foreseeable but not
 immediate 64-bit COBOL that will work 
   A) in a 64-bit only environment
 (and maybe)
   B) will have some mechanism (NOT traditional COBOL
 run-unit and CALL
 statements) for communicating between 31-bit and 64-bit
 COBOL programs.
 
 My personal guess is that either or both of these will be
 nice to have but
 will get very little actual user-community use.  COBOL
 shops (and
 applications) are just too used to transparent inter
 program
 communication.  However, when/if such are available,
 it may (or may not)
 give IBM additional information on how to proceed from
 there and actually
 meet paying customer demands and expectations.
 
 When there was a recent SHARE LNGC vote on IBM providing
 such a solution
 (even if it were a transition step to a future more mixed
 environment),
 the LNGC project gave this sufficiently LOW priority that
 the requirement
 never even got sent to IBM.
 
 If any shop (with readers in IBM-MAIN) thinks that such a
 64-bit COBOL
 product *would* meet their needs, please feel free to
 contact me off-list
 and I can give you the rejected by user requirement
 information so that
 you can submit it as a marketing REQUEST.
 
 NOTE:
   If your shop is interested in IBM providing a 64-bit
 COBOL solution with
 an explicit statement of direction (or actual
 implementation) of mixed
 31-/64-bit COBOL programs in a single run-unit, then you
 can also contact me
 off-list and I will provide you information on that
 requirement and you can
 do a marketing REQUEST for that too.  I wouldn't be
 very optimistic about
 how IBM would respond, but it can still be communicated to
 them.
 
 Timothy Sipples timothy.sipp...@us.ibm.com
 wrote in message
 news:of79a78257.faa461e9-on4925764a.001ddf83-4925764a.001f5...@us.ibm.com.
 ..
  This COBOL discussion feels like deja vu. :-)
  
  As a reminder, I am not speaking for IBM.
  
  There have been and are lots of discussions about
 future COBOL
 innovations,
  both within IBM and with our customers. One of the big
 ones is how (and
  consequently when) to get to 64-bit. I have my own
 (strong) views on that
  question, which I express as often as I can. (And I
 know I'm right. :-))
  But, in all seriousness, there is a rather complex set
 of factors that
 have
  to be considered on how, and ultimately the relevant
 voices are
 customers'.
  They decide the right answer.
  
  So, I'll say it again: tell IBM what you want and how
 you want it -- and
  what you value most. In particular, there is a tension
 between innovation
  and potential risk. Do you want zero or near-zero
 risk? Well, then, maybe
  IBM shouldn't be so aggressive in innovating. (I'm
 oversimplifying, but
  that's the idea.) Said another way, COBOL (and PL/I)
 really do run the
  mission-critical world, while some of these other
 languages don't. :-)
  
  Now, I happen to think my recommended approach
 perfectly combines maximum
  innovation with zero or near-zero risk. (I have a
 have your cake and eat
  it too idea.) But I don't get to decide these things.
 You do, subject to
  the technical constraints of course. So please speak
 up, through the
 proper
  channels. Much appreciated. Thanks.
  
  - - - - -
  Timothy Sipples
  IBM Consulting Enterprise Software Architect
  Based in Tokyo, Serving IBM Japan / Asia-Pacific
  E-Mail: timothy.sipp...@us.ibm.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
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to 

Re: Does Ent. COBOL 4.1 generate 64-bit binary arithmetic instructions?

[Farley, Peter x23353]

EXACTLY.  That was why I asked the question in the first place.  It is a
matter of using the all facilities that are available, and 64-bit
arithmetic instructions are just one of the z/Architecture instruction
enhancements that COBOL/PL1 generated code could use without any problem
in a 31-bit addressing environment.

PERFORMANCE is the reason.  Reducing total CPU consumption is a large
focus in these economic times, so as to be able to avoid hardware
upgrades costing many buckets of currency and still handle increased
workload.  Using one instruction in place of 10 or 20 or more is a
really good way to do that.

We don't use much floating point (though there is some), so the decimal
floating point question isn't all that critical here.  Besides,
assembler is always an altrernative if you really, really need it.  (Yes
Virginia, there are still assembler application programmers alive and
programming... :)

If a current or near-future COBOL used more of the newer ALS
instructions to best advantage it would be worth the compiler upgrade
and increased maintenance charges.  Otherwise it isn't nearly so
attractive a business proposition.

Peter

 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:ibm-m...@bama.ua.edu] On Behalf Of Lloyd Fuller
 Sent: Friday, October 09, 2009 8:33 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: Does Ent. COBOL 4.1 generate 64-bit binary 
 arithmetic instructions?
 
 There needs to be an expectation level set here:
 
 64 bit addressing does not equal 64 bit arithmetic.
 
 You can use the 64 bit arithmetic instructions WITHOUT using 
 64 bit addressing.  Our product does it all of the time.  You 
 just need to be running on the correct architecture to use 
 the 64 bit arithmetic instructions.
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: Does Ent. COBOL 4.1 generate 64-bit binary arithmetic instructions?

[john gilmore]

At last!

 

Lloyd Fuller has made the crucial point.  It should, but probably will not, put 
an end to this jejune discussion.

 

There is no real connection between AMODE(64) and 64-bit arithmetic operations. 
 IBM Enterprise COBOL could support, say, 64-bit/doubleword signed binary 
integer arithmetic without supporting AMODE(64); indeed it already supports 
double-precision HFP arithmetic.  

 

Its failure to support (or even hint at future support for)  BFP or in 
particular DFP, which could supplant traditional low-performance COBOL 
packed-decimal arithmetic, does indeed raise questions about the strength of 
IBM's long-term commitment to COBOL.

 

These things said, it must also be conceded that the important new features 
that IBM has added to Enterprise COBOL, e.g., pointers and address modification 
(the curious COBOL terminology for substring operations), have been very little 
used.  (Pointer usage, which would greatly simplify many COBOL CICS APs, is 
still, for example, exiguous in  them.)

 

IBM may have concluded, I fear correctly, that adding new technology to COBOL 
is a mug's game.  We techies clamor for it, but the unwashed don't use it when 
it is made available.

John Gilmore Ashland, MA 01721-1817 USA


  
_
Hotmail: Trusted email with powerful SPAM protection.
http://clk.atdmt.com/GBL/go/177141665/direct/01/
--
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

Experience with NPF

[Dana Mitchell]

I am researching IP print solutions, to replace some quite old impact line 
printers, and I recently stumbled upon the manual for NPF while working on our 
z/OS 1.11 install.  I don't recall ever reading or hearing about this before.   
At 
first glance it appears to be a way to drive LPD printers without many bells  
whistles, to do standard JES to IP printing.   Am I missing some obvious warts 
here?  There doesn't seem to be much discussion on IBM-Main about it, 
although it seems to have been around for quite some time.   If anyone could 
share info on NPF with me I would greatly appreciate it.

thanks
Dana

--
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: Does Ent. COBOL 4.1 generate 64-bit binary arithmetic instructions?

[Tom Marchant]

On Fri, 9 Oct 2009 05:33:01 -0700, Lloyd Fuller wrote:

There needs to be an expectation level set here:

64 bit addressing does not equal 64 bit arithmetic.

You can use the 64 bit arithmetic instructions WITHOUT using 
64 bit addressing.  Our product does it all of the time.  You just 
need to be running on the correct architecture to use the 64 bit 
arithmetic instructions.


Right.  And as of z/OS 1.6, z/Architecture is required.

-- 
Tom Marchant


--- On Fri, 10/9/09, Bill Klein wmkl...@ix.netcom.com wrote:

 From: Bill Klein wmkl...@ix.netcom.com
 Subject: Does Ent. COBOL 4.1 generate 64-bit binary arithmetic instructions?
 To: IBM-MAIN@bama.ua.edu
 Date: Friday, October 9, 2009, 2:47 AM
 When it comes specifically to 64-bit
 COBOL, the biggest issue (IMHO) is
 mixing of 31-(and/or 24-)bit COBOL with 64-bit COBOL.

 It is my impression (and I do NOT speak for IBM) that IBM
 is aware of the
 desire for 64-bit COBOL, but that (given the LE, not z/OS
 restriction on
 mixed 31-/64-bit) code, that they are looking at a
 foreseeable but not
 immediate 64-bit COBOL that will work
   A) in a 64-bit only environment
 (and maybe)
   B) will have some mechanism (NOT traditional COBOL
 run-unit and CALL
 statements) for communicating between 31-bit and 64-bit
 COBOL programs.


--
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: Does Ent. COBOL 4.1 generate 64-bit binary arithmetic instructions?

[Don Leahy]

Small correction:  Cobol calls it reference modification.  A
substring by another name...

On Fri, Oct 9, 2009 at 9:15 AM, john gilmore john_w_gilm...@msn.com wrote:
 At last!
SNIP

 These things said, it must also be conceded that the important new features 
 that IBM has added to Enterprise COBOL, e.g., pointers and address 
 modification (the curious COBOL terminology for substring operations), have 
 been very little used.  (Pointer usage, which would greatly simplify many 
 COBOL CICS APs, is still, for example, exiguous in  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

Re: Experience with NPF

[Ed Finnell]

 
In a message dated 10/9/2009 8:27:45 A.M. Central Daylight Time,  
dmit...@shazam.net writes:

although it seems to have been around for quite some  time.   If anyone 
could 
share info on NPF with me I would  greatly appreciate it.



Think most of  this was beaten down a  few years ago and is in the 'old' 
archives. NPF has been functionally  stabilized for many moons.
If you just need to get line mode data to  a networked printer, LPR should 
suffice or from JCL  'DEST:IP=xxx.yyy.xx.'.





--
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: Experience with NPF

[Ward, Mike S]

If you use dest:IPxxx.yyy.xx.nnn what type of software or device do you
need at the other end?

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
Behalf Of Ed Finnell
Sent: Friday, October 09, 2009 9:10 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Experience with NPF


 
In a message dated 10/9/2009 8:27:45 A.M. Central Daylight Time,  
dmit...@shazam.net writes:

although it seems to have been around for quite some  time.   If anyone 
could 
share info on NPF with me I would  greatly appreciate it.



Think most of  this was beaten down a  few years ago and is in the 'old'

archives. NPF has been functionally  stabilized for many moons.
If you just need to get line mode data to  a networked printer, LPR
should 
suffice or from JCL  'DEST:IP=xxx.yyy.xx.'.





--
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
==
This email and any files transmitted with it are confidential and intended 
solely for the use of the individual or entity
to which they are addressed. If you have received this email in error please 
notify the system manager. This message
contains confidential information and is intended only for the individual 
named. If you are not the named addressee you
should not disseminate, distribute or copy this e-mail. Please notify the 
sender immediately by e-mail if you
have received this e-mail by mistake and delete this e-mail from your system. 
If you are not the intended recipient
you are notified that disclosing, copying, distributing or taking any action in 
reliance on the contents of this
information is strictly prohibited.

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

Speed up DYNALLOC ?

[Miklos Szigetvari]

Hi

One of our customer insists to create dynamically,  from a C++ 
application , several  1000 small files.

Any method to speed up this allocation ?

--
Miklos Szigetvari

Development Team
ISIS Information Systems Gmbh 
tel: (+43) 2236 27551 570
Fax: (+43) 2236 21081 

E-mail: miklos.szigetv...@isis-papyrus.com 

Info: i...@isis-papyrus.com 
Hotline: +43-2236-27551-111 

Visit our Website: http://www.isis-papyrus.com 
---

This e-mail is only intended for the recipient and not legally
binding. Unauthorised use, publication, reproduction or
disclosure of the content of this e-mail is not permitted.
This email has been checked for known viruses, but ISIS accepts
no responsibility for malicious or inappropriate content.
--- 


--
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: Does Ent. COBOL 4.1 generate 64-bit binary arithmetic instructions?

[Farley, Peter x23353]

 -Original Message-
 From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
 Behalf Of john gilmore
 Sent: Friday, October 09, 2009 9:16 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: Does Ent. COBOL 4.1 generate 64-bit binary arithmetic
 instructions?
 
 At last!
 
 Lloyd Fuller has made the crucial point.  It should, but probably will
 not, put an end to this jejune discussion.

Jejune to you perhaps, but not to others.  Though I will admit the
morphing of my 64-bit arithmetic question into 64-bit addressing was not
interesting or relevant to me.

 There is no real connection between AMODE(64) and 64-bit arithmetic
 operations.  IBM Enterprise COBOL could support, say,
64-bit/doubleword
 signed binary integer arithmetic without supporting AMODE(64); indeed
it
 already supports double-precision HFP arithmetic.

Precisely.  And extended TR... instructions and string scanning
instructions and relative-addressing branch instructions and ... well
you get the idea.  Use what the machine is capable of to reduce overall
CPU usage, not just what has worked for 20 years.  I have yet to see
COBOL code generation that takes account of potential superscalar
pipeline interruptions.  Why is that?

 Its failure to support (or even hint at future support for) BFP or in
 particular DFP, which could supplant traditional low-performance COBOL
 packed-decimal arithmetic, does indeed raise questions about the
strength
 of IBM's long-term commitment to COBOL.

I wouldn't go that far.  Is DFP really going to perform better than
packed-decimal?  Floating point of any kind has always been a large CPU
consumer, and somehow I doubt that either BFP or DFP are going to change
that pattern.  But I do question the motives of code generation that is
clearly sub-optimal and just happens to add to increased CPU usage.
That's a tad too convenient for my conspiracy neurosis.

 These things said, it must also be conceded that the important new
 features that IBM has added to Enterprise COBOL, e.g., pointers and
 address modification (the curious COBOL terminology for substring
 operations), have been very little used.  (Pointer usage, which would
 greatly simplify many COBOL CICS APs, is still, for example, exiguous
in
 them.)

I beg to radically differ with that opinion.  For the last several years
I and my colleagues in applications have been using more and more
pointer-based code to save CPU time.  Why move a large data structure
around when you can just pass the address around?  Yes, there are
limitations (no legal pointing to FILE area records, for instance) but
those limitations are trivially bypassed with a tiny amount of assembler
code.

And again, if a record structure must be handled which is not easily
defined as variable length but is, in fact, varying, why move only the
largest size when (with information in the record) you can use
reference modification to move just the data that is there?  MVCL's
and CLCL'a are *expensive* CPU operations that frequently show up in
performance monitor reports (look out for those READ ... INTO
operations!), so keep them as short as you can.

 IBM may have concluded, I fear correctly, that adding new technology
to
 COBOL is a mug's game.  We techies clamor for it, but the unwashed
don't
 use it when it is made available.

Excuse me, I wash every single day.  And I'm an application programmer.
So there... :)

On the gripping hand, I think you're wrong about the new technology
remark -- look at the XML stuff they have introduced and improved in the
last several releases.  The PFCSK techies have been begging for that,
and they got it.  Why shouldn't CPU-saving z/Arch instruction code
generation be such a far stretch?  Especially since it impacts only the
code generation phase, not the language itself.

I have hopes, but no ability to impact decisions.  I just have to get
the job done.

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: Experience with NPF

[Ed Finnell]

 
In a message dated 10/9/2009 9:22:14 A.M. Central Daylight Time,  
mw...@ssfcu.org writes:

If you use dest:IPxxx.yyy.xx.nnn what type of software or device do  you
need at the other end?



For line mode data nothing  extra. Modern print engines are highly 
customizable and queue names are  usually associated with features like
PCL,PS, text. Most have 'auto' and the  printer figures it out although for 
network printing the OPS staff prefers  routing thru a spooled  destination 
 but is not  required.





--
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: Does a DD-Statement waste memory after dealloc?

[Miklos Szigetvari]

Hi

We are also around dynalloc from C/C++, but
You are saying 17000 pages , but the used storage also high  ?  
(RPTSTG(ON))
So is it a reall  a memory leak (HEAPC(ON,0,0,20)) or just a high real 
storage usage ?

The LE runtime HEAPOOL(ALIGN) can make big differences .



Michael Knigge wrote:


All,


I currently try to find a obscure memory leak in one of our 
applications. After some days our appl occupies ~17.000 pages of real 
memory  (needs just ~1.500 after startup).


As we track all malloc(), calloc(), realloc() and free() function 
calls, I can say that there is no obvious memory leak


Now... after I've looked at the JESYSMSG I've noticed that we've done 
approx 17.000 DYNALLOCs, everyone with a different DD-Name (we let the 
z/OS generate a unique one, like SYS1, SYS2, SYS3 
and so on). to be clear: *NOT* ~17.000 at the same time. mostly 
only one at the same time...


Of couse, we deallocate them after we've finished using the DD-Name, 
but I wonder that even after a DEALLOC (with SVC99) there is some 
space still occupied


Why? Because of performance? Because of some kind of control block 
that can only grow but not shrink?



Thanks,
Michael

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




--
Miklos Szigetvari

Development Team
ISIS Information Systems Gmbh 
tel: (+43) 2236 27551 570
Fax: (+43) 2236 21081 

E-mail: miklos.szigetv...@isis-papyrus.com 

Info: i...@isis-papyrus.com 
Hotline: +43-2236-27551-111 

Visit our Website: http://www.isis-papyrus.com 
---

This e-mail is only intended for the recipient and not legally
binding. Unauthorised use, publication, reproduction or
disclosure of the content of this e-mail is not permitted.
This email has been checked for known viruses, but ISIS accepts
no responsibility for malicious or inappropriate content.
--- 


--
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: Experience with NPF

[a.watthey]

Dana,

That's probably because, being IP, it is usually discussed on TCPIP-L.
However, back to your question.

It comes as part of the base so costs nothing and does what it says on the
tin.  It has a JES component that takes batch output off the spool (via FSS)
and writes it to datasets.  It has a VTAM component that emulates LU1 or LU3
SNA printers and writes that output to temporary datasets.  It has a QUEUE
component that takes the temporary datasets and calls LPR to send them via
TCP to remote IP printers.  You control via an ISPF interface how each
printer is defined (name, destination, translate-table, retry limit, etc).
These definitions are stored on VSAM datasets which can be accessed by
multiple systems for backup purposes (but not at the same time).  There is
an ISPF menu for controlling (deleting, requeueing, etc) the print entries
in the queue (in effect the datasets).

I have used it for many, many years and it is now very reliable.  It is
still supported by IBM for problems (they wrote a fix for my PMR last year)
but it will not get any new functionality added.  It does nothing fancy with
the data other than pass it to LPR so you are limited by what that can do.
If you want to do data transforms then you will need to get Infoprint which
costs money.  The two products are quite similar in many respects.

Regards,
Alan.

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf
Of Dana Mitchell
Sent: 09 October 2009 15:27
To: IBM-MAIN@bama.ua.edu
Subject: Experience with NPF


I am researching IP print solutions, to replace some quite old impact line 
printers, and I recently stumbled upon the manual for NPF while working on
our 
z/OS 1.11 install.  I don't recall ever reading or hearing about this
before.   At 
first glance it appears to be a way to drive LPD printers without many bells
 
whistles, to do standard JES to IP printing.   Am I missing some obvious
warts 
here?  There doesn't seem to be much discussion on IBM-Main about it, 
although it seems to have been around for quite some time.   If anyone could

share info on NPF with me I would greatly appreciate it.

thanks
Dana

--
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: Experience with NPF

[Ward, Mike S]

So you're saying that a windows network printer can receive the data an
print it?

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
Behalf Of Ed Finnell
Sent: Friday, October 09, 2009 9:37 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Experience with NPF


 
In a message dated 10/9/2009 9:22:14 A.M. Central Daylight Time,  
mw...@ssfcu.org writes:

If you use dest:IPxxx.yyy.xx.nnn what type of software or device do  you
need at the other end?



For line mode data nothing  extra. Modern print engines are highly 
customizable and queue names are  usually associated with features like
PCL,PS, text. Most have 'auto' and the  printer figures it out although
for 
network printing the OPS staff prefers  routing thru a spooled
destination 
 but is not  required.





--
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
==
This email and any files transmitted with it are confidential and intended 
solely for the use of the individual or entity
to which they are addressed. If you have received this email in error please 
notify the system manager. This message
contains confidential information and is intended only for the individual 
named. If you are not the named addressee you
should not disseminate, distribute or copy this e-mail. Please notify the 
sender immediately by e-mail if you
have received this e-mail by mistake and delete this e-mail from your system. 
If you are not the intended recipient
you are notified that disclosing, copying, distributing or taking any action in 
reliance on the contents of this
information is strictly prohibited.

--
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 name standards (Was: multiple jobs / same name)

[Paul Gilmartin]

On Thu, 8 Oct 2009 17:52:00 -0500, Shmuel Metz (Seymour J.) wrote:

There's a smoldering need here for a means to pass arbitrary name/value
pairs from JCL to job processing components other than by steganographic
jobname coding.

SJF. Unfortunately, IBM has only documented its use for DD and OUTPUT
statements.

FSVO arbitrary.  This is the USERDATA parameter, isn't it?.  I
believe John McKown (IIRC) mentioned this in these lists several
months ago.  Each userdata string is limited to 60 characters,
which is somewhat less than another notorious JCL string length
limitation.  And JCL symbols are not resolved in userdata strings
surrounded by apostrophes, severely limiting the use of symbols
in USERDATA.

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

Re: Does a DD-Statement waste memory after dealloc?

[Michael Knigge]

We are also around dynalloc from C/C++, but
You are saying 17000 pages , but the used storage also high  ?  
(RPTSTG(ON))
So is it a reall  a memory leak (HEAPC(ON,0,0,20)) or just a high real 
storage usage ?

The LE runtime HEAPOOL(ALIGN) can make big differences .



I'll give this a try

MK

--
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: Experience with NPF

[Ed Finnell]

 
In a message dated 10/9/2009 9:43:19 A.M. Central Daylight Time,  
mw...@ssfcu.org writes:

So you're saying that a windows network printer can receive the  data an
print it?



Lots of 'properly configured' presumptions  but yes in general.





--
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: Speed up DYNALLOC ?

[Edward Jaffe]

Miklos Szigetvari wrote:
One of our customer insists to create dynamically,  from a C++ 
application , several  1000 small files.

Any method to speed up this allocation ?


If it helped DB2, it should help you. Add this to DIAGxx:

Vsm UseZosV1R9Rules(NO) /* Use faster GETMAIN/FREEMAIN*/

--
Edward E Jaffe
Phoenix Software International, Inc
5200 W Century Blvd, Suite 800
Los Angeles, CA 90045
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

Re: Does a DD-Statement waste memory after dealloc?

[Clark Morris]

On 9 Oct 2009 01:35:23 -0700, in bit.listserv.ibm-main you wrote:

All,


I currently try to find a obscure memory leak in one of our 
applications. After some days our appl occupies ~17.000 pages of real 
memory  (needs just ~1.500 after startup).

As we track all malloc(), calloc(), realloc() and free() function calls, 
I can say that there is no obvious memory leak

Now... after I've looked at the JESYSMSG I've noticed that we've done 
approx 17.000 DYNALLOCs, everyone with a different DD-Name (we let the 
z/OS generate a unique one, like SYS1, SYS2, SYS3 and 
so on). to be clear: *NOT* ~17.000 at the same time. mostly only one 
at the same time...

If these are for QSAM data sets, does the C program do a FREEPOOL
(free the buffer pool) on CLOSE.  For reasons I don't understand,
apparently CLOSE does not automatically free the buffers.  I think the
COBOL implementors were smart enough to understand this and did the
FREEPOOL.  Others who understand more about this can clarify what I
have said.

Of couse, we deallocate them after we've finished using the DD-Name, but 
I wonder that even after a DEALLOC (with SVC99) there is some space 
still occupied

Why? Because of performance? Because of some kind of control block that 
can only grow but not shrink?


Thanks,
Michael

--
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: Experience with NPF

[David Andrews]

On Fri, 2009-10-09 at 10:32 -0400, a.watthey wrote:
 If you want to do data transforms then you will need to get Infoprint which
 costs money.  The two products are quite similar in many respects.

Extensive data transforms can be accomplished in an Input Record Exit -
I did one of those back in the day that supported COPIES=, FLASH= (for
overlays), interpreted carriage control, provided hex transparency,
wrote dataset separators, and other stuff.  When Infoprint came out the
input record exit point was less capable than NPF's and we weren't able
to use it - I don't remember the details (it's been 12 years!)  Perhaps
IBM has fixed this, I don't know; we've long since moved on to
VPS/TCPIP.

-- 
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: Does Ent. COBOL 4.1 generate 64-bit binary arithmetic instructions?

[Paul Gilmartin]

On Fri, 9 Oct 2009 10:31:19 -0400, Farley, Peter x23353 wrote:

I wouldn't go that far.  Is DFP really going to perform better than
packed-decimal?  Floating point of any kind has always been a large CPU
consumer, and somehow I doubt that either BFP or DFP are going to change
that pattern.  ...

But for the obvious advantage of register operations over SS.  Which
is faster nowadays, a packed-decimal multiply of two large numbers
or the equivalent HFP, BFP, or DFP operation?  (Overlook that, I
believe, the first implementation of DFP was millicode.)

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

Re: Speed up DYNALLOC ?

[Paul Gilmartin]

On Fri, 9 Oct 2009 07:57:38 -0700, Edward Jaffe wrote:

Miklos Szigetvari wrote:
 One of our customer insists to create dynamically,  from a C++
 application , several  1000 small files.
 Any method to speed up this allocation ?

If it helped DB2, it should help you. Add this to DIAGxx:

Vsm UseZosV1R9Rules(NO) /* Use faster GETMAIN/FREEMAIN*/

(How to drag your peers, kicking and screaming, out of the
20th Century?)

Consider using Unix files.  Bypass allocation completely.
Seriously, my perception is that for small files, the per-file
overhead is vastly less for z/OS Unix files.

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

Re: Why no arm statement inside?

[Guy Gardoit]

Obviously, no potential ARM users (products) have been set up to utilize
Automatic Restart Management.   The Automatic part is Restart, not
joining the fray.

Hope that helps.

On Fri, Oct 9, 2009 at 2:49 AM, Tommy Tsui tommyt...@gmail.com wrote:

 Hi all,
 After I defined the ARM policy and activiate it but nothing inside ? I
 already defined the restart element in ARM policy. anything I missing?

 SETXCF COUPLE,PCOUPLE=(SYS1.ARMCDS01),TYPE=ARM
 IXC309I SETXCF COUPLE,PCOUPLE REQUEST FOR ARM WAS ACCEPTED
 IEF196I IEF237I 982E ALLOCATED TO SYS00066
 IXC286I COUPLE DATA SET 014
 SYS1.ARMCDS01,
 VOLSER S1, HAS BEEN ADDED AS THE PRIMARY
 FOR ARM ON SYSTEM XXXSPD1
 IXC811I SYSTEM XXXSPD1 IS NOW ARM CAPABLE

 SETXCF START,POLICY,POLNAME=ARMPLOY,TYPE=ARM
 IXC805I ARM POLICY HAS BEEN STARTED BY SYSTEM XXXSPD1. 029
 POLICY NAMED ARMPLOY IS NOW IN EFFECT.

 D XCF,ARMSTATUS
 IXC392I 15.50.31 DISPLAY XCF 081
 NO ARM ELEMENTS ARE DEFINED

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




-- 
Guy Gardoit
z/OS Systems Programming

--
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 Mainframes Draw Antitrust Scrutiny

[Guy Gardoit]

The government idiots should be looking at MicroSoft, not IBM.  Oh wait, who
did MicroSoft support in the last USA election?

On Thu, Oct 8, 2009 at 10:35 PM, Ed Gould ps2...@yahoo.com wrote:

 IBM Mainframes Draw Antitrust Scrutiny
 Trade group says it's been contacted by investigators seeking information
 on Big Blue's licensing practices.

 http://www.informationweek.com/news/hardware/supercomputers/showArticle.jhtml?articleID=220301635cid=alert_art_hard_d_f



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




-- 
Guy Gardoit
z/OS Systems Programming

--
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: Speed up DYNALLOC ?

[Miklos Szigetvari]

Hi

I agree, but they insist to use unique seq files.
No PDS no VSAM no Unix HFS

Paul Gilmartin wrote:


On Fri, 9 Oct 2009 07:57:38 -0700, Edward Jaffe wrote:

 


Miklos Szigetvari wrote:
   


One of our customer insists to create dynamically,  from a C++
application , several  1000 small files.
Any method to speed up this allocation ?
 


If it helped DB2, it should help you. Add this to DIAGxx:

Vsm UseZosV1R9Rules(NO) /* Use faster GETMAIN/FREEMAIN*/

   


(How to drag your peers, kicking and screaming, out of the
20th Century?)

Consider using Unix files.  Bypass allocation completely.
Seriously, my perception is that for small files, the per-file
overhead is vastly less for z/OS Unix files.

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


 



--
Miklos Szigetvari

Development Team
ISIS Information Systems Gmbh 
tel: (+43) 2236 27551 570
Fax: (+43) 2236 21081 

E-mail: miklos.szigetv...@isis-papyrus.com 

Info: i...@isis-papyrus.com 
Hotline: +43-2236-27551-111 

Visit our Website: http://www.isis-papyrus.com 
---

This e-mail is only intended for the recipient and not legally
binding. Unauthorised use, publication, reproduction or
disclosure of the content of this e-mail is not permitted.
This email has been checked for known viruses, but ISIS accepts
no responsibility for malicious or inappropriate content.
--- 


--
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: Speed up DYNALLOC ?

[Paul Gilmartin]

On Fri, 9 Oct 2009 17:19:02 +0200, Miklos Szigetvari wrote:

I agree, but they insist to use unique seq files.
No PDS no VSAM no Unix HFS

Cap their resource use.

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

Re: Speed up DYNALLOC ?

[Miklos Szigetvari]

Hi

I'm trying this out,  we had the DEFAULT YES, but I don't see any 
performance difference till now


Edward Jaffe wrote:


Miklos Szigetvari wrote:

One of our customer insists to create dynamically,  from a C++ 
application , several  1000 small files.

Any method to speed up this allocation ?



If it helped DB2, it should help you. Add this to DIAGxx:

Vsm UseZosV1R9Rules(NO) /* Use faster GETMAIN/FREEMAIN*/



--
Miklos Szigetvari

Development Team
ISIS Information Systems Gmbh 
tel: (+43) 2236 27551 570
Fax: (+43) 2236 21081 

E-mail: miklos.szigetv...@isis-papyrus.com 

Info: i...@isis-papyrus.com 
Hotline: +43-2236-27551-111 

Visit our Website: http://www.isis-papyrus.com 
---

This e-mail is only intended for the recipient and not legally
binding. Unauthorised use, publication, reproduction or
disclosure of the content of this e-mail is not permitted.
This email has been checked for known viruses, but ISIS accepts
no responsibility for malicious or inappropriate content.
--- 


--
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: Experience with NPF

[Dana]

On Fri, 9 Oct 2009 10:10:17 EDT, Ed Finnell efinnel...@aol.com wrote:


suffice or from JCL  'DEST:IP=xxx.yyy.xx.'.


Ed,

What else needs to be setup to get this to work?  I ran a job with that and 
the output is sitting in the output queue with DEST IP.The only 
reference I can find to this in any manuals is in the JCL reference under 
DEST=.  Not a word about this in JES2 books...

Dana

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

Does Ent. COBOL 4.1 generate 64-bit binary arithmetic instructions?

[Bill Klein]

Lots of good performance improvement comments snipped

One more time,
  Have you created either a SHARE requirement or a marketing REQUEST for any
of the specific compiler changes to get performance improvements in
Enterprise COBOL (specifically those using higher ALS instructions)?

If not, why not?

I suppose you might think that IBM should constantly be looking at the
generated object code from the compiler looking for performance
improvements.  Again, this might be nice, but it is highly unlikely to
happen.

If, on the other hand, you have specific suggestions and you submit them to
IBM via any of the numerous ways of making such suggestions, then they MIGHT
get into the development stream.

Especially, when you include wording (like that snipped) that included,
  this might be worth paying for a version upgrade

P.S.  Just because it was in part of the snipped notes,
  IBM has given a positive response to the SHARE requirement for adding DFP
support to COBOL.
  They have, however, rejected adding BFP support.

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

Re: Why no arm statement inside?

[Chris Mason]

Tommy

Back in 2001 I researched the use of ARM as a complement to the VIPARANGE 
flavour of dynamic VIPA.

As Guy just about hinted, there is both an ARM policy and ARM-using address 
spaces. In order to support programs which were not, as it were, ARM-
enabled I created some utilities to perform the ARM functions which could be 
wrapped around the relevant job step running the server program.[1]

Only later - probably when dealing with a list query - did I discover that IBM 
had already created essentially the same utilities and provided them through 
the following web page:

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

Select Additional material in order to download armwrap.zip. The redpaper is 
a description of how to use the ARMWRAP utility which performs much the 
same functions as the programs I wrote.

I have attached a document to this post - and I hope I don't find I have to 
split the 12-page document up in order to put it on the list as I have at least 
once for another document in the past.

Checking through it quickly, I see that I need to explain that I used to refer 
to 
the VIPARANGE flavour of dynamic VIPA as either an application-oriented 
dynamic VIPA when the bind() call was used in order to activate the VIPA - 
or - a command-oriented dynamic VIPA when the MODDVIPA utility was used 
in order to activate the VIPA using an ioctl() call.

Also, when you come to where I provide details of how my utility worked, you 
are going to have to switch to the description in the redpaper.

The numbers in the document indicate the header levels for when I got round 
to - and I never did! - producing a more professional version of the document.

Also bear in mind that all references were good in 2001 but may have drifted 
since.

Chris Mason

[1] In much the same way as it is possible to wrap some utility job steps 
around the server program step in order to have the VIPARANGE flavour of 
dynamic VIPA become active and become deactive, a function more usually 
performed by using the BIND parameter of an entry in the PORT statement list.

-

(2) Automatic Recovery Manager (ARM) for VIPA

Note: The utilities described below need not be considered solely for use with 
VIPAs. The utilities perform the ARM register and deregister functions for 
either a started task or a job in a basic manner which allows generalization. 
The utilities are for use where a program which is automatically to be 
restarted does not already contain the ARM register and deregister functions. 
Note that since many parameters may be specified in the ARM policy, even 
using these basic utilities will allow quite complicated restart strategies.

The MVS Automatic Recovery Manager (ARM) will generally be used together 
with the application-oriented VIPA (and possibly the command-oriented VIPA) 
in order to have the service application program restarted on another sysplex 
member when the sysplex member where the program normally runs fails.

These notes explain how ARM and application-oriented VIPA may be used 
together. It is assumed that 

1. The ARM environment is already established, for example, the ARM coupling 
data sets is already initialized

2. An ARM policy already exists in the ARM coupling data set to which 
modifications can be made

(3) ARM Overview

ARM may be understood, in basic terms (sufficient for use with VIPA) as the 
confluence of two features as follows:

1. An ARM coupling facility policy

2. The registration of an address space (a job or started task) for ARM

The two features are tied together using an element name which must be 
unique within the sysplex environment. The element name is specified in the 
policy definition statements (TYPE=ARM) and by the assembler program macro 
call (IXCARM REQUEST=REGISTER) which performs the registration function.

When a suitable ARM policy is active, an address space, which has been 
registered for ARM can be restarted as follows:

1. In the same sysplex member if the program running in the address space 
terminates

2. In another sysplex member if the MVS system supporting the address space 
becomes disconnected from the sysplex environment, normally by failure of 
the MVS system or the underlying processor, “cross-system restart”

Either or both of these conditions may be specified in the ARM policy, for 
greatest flexibility, or in the IXCARM REQUEST=REGISTER macro.

Note: A suitable ARM policy may simply be the supplied default policy or a 
default policy with local modifications. In effect, the registered element name 
is specified in the policy as a “wild card”.

The means used to restart the address space can be identical to the means 
used to start the address space initially (so-called “persistent restart”) or 
may 
be specified differently.

Since, within an ARM policy, it is possible to define a particular order for 
restarting address spaces in order to ensure that prerequisite support 
programming has been restarted prior to initiating programs 

Re: Experience with NPF

[Ward, Mike S]

That was what happened to me also.

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
Behalf Of Dana
Sent: Friday, October 09, 2009 11:16 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Experience with NPF

On Fri, 9 Oct 2009 10:10:17 EDT, Ed Finnell efinnel...@aol.com wrote:


suffice or from JCL  'DEST:IP=xxx.yyy.xx.'.


Ed,

What else needs to be setup to get this to work?  I ran a job with that
and 
the output is sitting in the output queue with DEST IP.The only 
reference I can find to this in any manuals is in the JCL reference
under 
DEST=.  Not a word about this in JES2 books...

Dana

--
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
==
This email and any files transmitted with it are confidential and intended 
solely for the use of the individual or entity
to which they are addressed. If you have received this email in error please 
notify the system manager. This message
contains confidential information and is intended only for the individual 
named. If you are not the named addressee you
should not disseminate, distribute or copy this e-mail. Please notify the 
sender immediately by e-mail if you
have received this e-mail by mistake and delete this e-mail from your system. 
If you are not the intended recipient
you are notified that disclosing, copying, distributing or taking any action in 
reliance on the contents of this
information is strictly prohibited.

--
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: Experience with NPF

[Barkow, Eileen]

I am not sure if yours is the same situation, but we have to be able to use 
printer netnames as destids and
In order to do this a JES $ADD command has to be issued to associate the name 
with the actual DESTID that was
Defined for the device.

$ADD DESTID(IPM),DEST=U  
Associates IPM with DEST=U

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Dana
Sent: Friday, October 09, 2009 12:16 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Experience with NPF

On Fri, 9 Oct 2009 10:10:17 EDT, Ed Finnell efinnel...@aol.com wrote:


suffice or from JCL  'DEST:IP=xxx.yyy.xx.'.


Ed,

What else needs to be setup to get this to work?  I ran a job with that and 
the output is sitting in the output queue with DEST IP.The only 
reference I can find to this in any manuals is in the JCL reference under 
DEST=.  Not a word about this in JES2 books...

Dana

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

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

Re: Why no arm statement inside?

[Guy Gardoit]

Yeah, sorry, as Chris Mason pointed out it's called Automatic Recovery
Management, not Automatic Restart Manager.  Same idea though.   An
application has to have the capability for ARM and then be defined to ARM.
I've never used it for much myself since most automation packages provide
much of the same capability.

On Fri, Oct 9, 2009 at 8:12 AM, Guy Gardoit ggard...@gmail.com wrote:

 Obviously, no potential ARM users (products) have been set up to utilize
 Automatic Restart Management.   The Automatic part is Restart, not
 joining the fray.

 Hope that helps.

   On Fri, Oct 9, 2009 at 2:49 AM, Tommy Tsui tommyt...@gmail.com wrote:

 Hi all,
 After I defined the ARM policy and activiate it but nothing inside ? I
 already defined the restart element in ARM policy. anything I missing?

 SETXCF COUPLE,PCOUPLE=(SYS1.ARMCDS01),TYPE=ARM
 IXC309I SETXCF COUPLE,PCOUPLE REQUEST FOR ARM WAS ACCEPTED
 IEF196I IEF237I 982E ALLOCATED TO SYS00066
 IXC286I COUPLE DATA SET 014
 SYS1.ARMCDS01,
 VOLSER S1, HAS BEEN ADDED AS THE PRIMARY
 FOR ARM ON SYSTEM XXXSPD1
 IXC811I SYSTEM XXXSPD1 IS NOW ARM CAPABLE

 SETXCF START,POLICY,POLNAME=ARMPLOY,TYPE=ARM
 IXC805I ARM POLICY HAS BEEN STARTED BY SYSTEM XXXSPD1. 029
 POLICY NAMED ARMPLOY IS NOW IN EFFECT.

 D XCF,ARMSTATUS
 IXC392I 15.50.31 DISPLAY XCF 081
 NO ARM ELEMENTS ARE DEFINED

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




 --
 Guy Gardoit
 z/OS Systems Programming




-- 
Guy Gardoit
z/OS Systems Programming

--
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: Speed up DYNALLOC ?

[Vernooij, CP - SPLXM]

Miklos Szigetvari miklos.szigetv...@isis-papyrus.com wrote in
message news:4acf4719.8070...@isis-papyrus.com...
 Hi
 
 One of our customer insists to create dynamically,  from a C++ 
 application , several  1000 small files.
 Any method to speed up this allocation ?
 
 -- 
 Miklos Szigetvari

Could he change this to 1000 members in a PDS(E)?

Kees.
**
For information, services and offers, please visit our web site:
http://www.klm.com. This e-mail and any attachment may contain
confidential and privileged material intended for the addressee
only. If you are not the addressee, you are notified that no part
of the e-mail or any attachment may be disclosed, copied or
distributed, and that any other action related to this e-mail or
attachment is strictly prohibited, and may be unlawful. If you have
received this e-mail by error, please notify the sender immediately
by return e-mail, and delete this message. 

Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries
and/or its employees shall not be liable for the incorrect or
incomplete transmission of this e-mail or any attachments, nor
responsible for any delay in receipt.
Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal
Dutch Airlines) is registered in Amstelveen, The Netherlands, with
registered number 33014286 
**

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

Re: Why no arm statement inside?

[Guy Gardoit]

Ok, it's Friday.  ARM = Automatic Restart Management.   Applications
or products must have the capability of registering for ARM coverage.

On Fri, Oct 9, 2009 at 10:54 AM, Guy Gardoit ggard...@gmail.com wrote:

 Yeah, sorry, as Chris Mason pointed out it's called Automatic Recovery
 Management, not Automatic Restart Manager.  Same idea though.   An
 application has to have the capability for ARM and then be defined to ARM.
 I've never used it for much myself since most automation packages provide
 much of the same capability.


 On Fri, Oct 9, 2009 at 8:12 AM, Guy Gardoit ggard...@gmail.com wrote:

 Obviously, no potential ARM users (products) have been set up to utilize
 Automatic Restart Management.   The Automatic part is Restart, not
 joining the fray.

 Hope that helps.

   On Fri, Oct 9, 2009 at 2:49 AM, Tommy Tsui tommyt...@gmail.com wrote:

 Hi all,
 After I defined the ARM policy and activiate it but nothing inside ? I
 already defined the restart element in ARM policy. anything I missing?

 SETXCF COUPLE,PCOUPLE=(SYS1.ARMCDS01),TYPE=ARM
 IXC309I SETXCF COUPLE,PCOUPLE REQUEST FOR ARM WAS ACCEPTED
 IEF196I IEF237I 982E ALLOCATED TO SYS00066
 IXC286I COUPLE DATA SET 014
 SYS1.ARMCDS01,
 VOLSER S1, HAS BEEN ADDED AS THE PRIMARY
 FOR ARM ON SYSTEM XXXSPD1
 IXC811I SYSTEM XXXSPD1 IS NOW ARM CAPABLE

 SETXCF START,POLICY,POLNAME=ARMPLOY,TYPE=ARM
 IXC805I ARM POLICY HAS BEEN STARTED BY SYSTEM XXXSPD1. 029
 POLICY NAMED ARMPLOY IS NOW IN EFFECT.

 D XCF,ARMSTATUS
 IXC392I 15.50.31 DISPLAY XCF 081
 NO ARM ELEMENTS ARE DEFINED

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




 --
 Guy Gardoit
 z/OS Systems Programming




 --
 Guy Gardoit
 z/OS Systems Programming




-- 
Guy Gardoit
z/OS Systems Programming

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

My IEFACTRT crippled?

[John Norgauer]

I have had the IEFACTRT  exit in my test LPAR for sometime now and I see 
today that it's not executing.

When I issue:  D PROG,EXIT,EN=SYS.IEFACTRT,DIAG

I get:

CSV464I 11.25.36 PROG,EXIT DISPLAY 116
EXIT SYS.IEFACTRT
MODULESTATE EPADDRLOADPTLENGTHJOB
IEFACTRTA   85303000      *

So the system thinks the exit is there, but I am not getting any 
accounting info in my JES2  JESMSGLG sysout for batch jobs.

Any suggestion as to how I can get this back working?




John Norgauer
Senior Systems Programmer
Mainframe Technical Support Services
University of California Davis Medical Center
2315 Stockton Blvd
ASB 1300
Sacramento, Ca 95817
916-734-0536

 SYSTEMS PROGRAMMING..  Guilty, until proven innocent !! JN  2004

Hardware eventually breaks - Software eventually works  anon


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

Re: Why no arm statement inside?

[Chris Mason]

Guy

Thanks for the correction. Actually it's a correction to my 8-year old 
document. I just didn't bother to check this time around - nor, it would 
appear, ever since I wrote it! I hope my customer forgave me - if one of the 
later system programmers ever bothered to read it!

Maybe I should have stuck to my usual policy of giving a title with a web page:

z/OS Automatic Restart Manager
http://www.redbooks.ibm.com/abstracts/redp0173.html

That's the trouble with initials - eventually you forget which precise words 
they represent.

Chris Mason

On Fri, 9 Oct 2009 11:17:08 -0700, Guy Gardoit ggard...@gmail.com 
wrote:

Ok, it's Friday.  ARM = Automatic Restart Management.   Applications
or products must have the capability of registering for ARM coverage.

On Fri, Oct 9, 2009 at 10:54 AM, Guy Gardoit ggard...@gmail.com wrote:

 Yeah, sorry, as Chris Mason pointed out it's called Automatic Recovery
 Management, not Automatic Restart Manager.  Same idea though.   An
 application has to have the capability for ARM and then be defined to ARM.
 I've never used it for much myself since most automation packages provide
 much of the same capability.


 On Fri, Oct 9, 2009 at 8:12 AM, Guy Gardoit ggard...@gmail.com wrote:

 Obviously, no potential ARM users (products) have been set up to utilize
 Automatic Restart Management.   The Automatic part is Restart, not
 joining the fray.

 Hope that helps.

   On Fri, Oct 9, 2009 at 2:49 AM, Tommy Tsui tommyt...@gmail.com 
wrote:

 Hi all,
 After I defined the ARM policy and activiate it but nothing inside ? I
 already defined the restart element in ARM policy. anything I missing?

 SETXCF COUPLE,PCOUPLE=(SYS1.ARMCDS01),TYPE=ARM
 IXC309I SETXCF COUPLE,PCOUPLE REQUEST FOR ARM WAS ACCEPTED
 IEF196I IEF237I 982E ALLOCATED TO SYS00066
 IXC286I COUPLE DATA SET 014
 SYS1.ARMCDS01,
 VOLSER S1, HAS BEEN ADDED AS THE PRIMARY
 FOR ARM ON SYSTEM XXXSPD1
 IXC811I SYSTEM XXXSPD1 IS NOW ARM CAPABLE

 SETXCF START,POLICY,POLNAME=ARMPLOY,TYPE=ARM
 IXC805I ARM POLICY HAS BEEN STARTED BY SYSTEM XXXSPD1. 029
 POLICY NAMED ARMPLOY IS NOW IN EFFECT.

 D XCF,ARMSTATUS
 IXC392I 15.50.31 DISPLAY XCF 081
 NO ARM ELEMENTS ARE DEFINED

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




 --
 Guy Gardoit
 z/OS Systems Programming




 --
 Guy Gardoit
 z/OS Systems Programming




--
Guy Gardoit
z/OS Systems Programming

--
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: Does Ent. COBOL 4.1 generate 64-bit binary arithmetic instructions?

[Kirk Wolf]

Does anyone have any estimates (guesses) as to what performance gains
would result from generating 64-bit grande arithmetic instructions?

If it is significant, it would seem to me to be an opportunity for
some software vendor to have a tool that reads ADATA and assembler
output and generates optimized assembler code for the new
instructions.   Sell the tool priced at a percentage of savings, and
you might make some money :-)

Kirk Wolf
Dovetailed Technologies
http://dovetail.com


On Fri, Oct 9, 2009 at 12:42 AM, Timothy Sipples
timothy.sipp...@us.ibm.com wrote:
 This COBOL discussion feels like deja vu. :-)

 As a reminder, I am not speaking for IBM.

 There have been and are lots of discussions about future COBOL innovations,
 both within IBM and with our customers. One of the big ones is how (and
 consequently when) to get to 64-bit. I have my own (strong) views on that
 question, which I express as often as I can. (And I know I'm right. :-))
 But, in all seriousness, there is a rather complex set of factors that have
 to be considered on how, and ultimately the relevant voices are customers'.
 They decide the right answer.

 So, I'll say it again: tell IBM what you want and how you want it -- and
 what you value most. In particular, there is a tension between innovation
 and potential risk. Do you want zero or near-zero risk? Well, then, maybe
 IBM shouldn't be so aggressive in innovating. (I'm oversimplifying, but
 that's the idea.) Said another way, COBOL (and PL/I) really do run the
 mission-critical world, while some of these other languages don't. :-)

 Now, I happen to think my recommended approach perfectly combines maximum
 innovation with zero or near-zero risk. (I have a have your cake and eat
 it too idea.) But I don't get to decide these things. You do, subject to
 the technical constraints of course. So please speak up, through the proper
 channels. Much appreciated. Thanks.

 - - - - -
 Timothy Sipples
 IBM Consulting Enterprise Software Architect
 Based in Tokyo, Serving IBM Japan / Asia-Pacific
 E-Mail: timothy.sipp...@us.ibm.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: My IEFACTRT crippled?

[Terri E Shaffer]

Did you tell smf to use it?  in your SMFPRMxx

DDCONS(NO) 
SYS(NOTYPE(4,5,19,20,34,35,40,99),INTERVAL(SMF,SYNC),  
EXITS(IEFACTRT,IEFUJI,IEFUJV,IEFUSI,IEFU83,IEFU84,IEFUTL)) 
SUBSYS(STC,EXITS(IEFACTRT,IEFUJI,IEFUSI,IEFU83,IEFUTL))
SUBSYS(OMVS,EXITS(IEFACTRT,IEFUJI,IEFU83)) 

Thanks

Ms. Terri E. Shaffer 
terri.e.shaf...@jpmchase.com
Engineer
J.P.Morgan Chase  Co.
GTI DCT ECS Core Services zSoftware Group / Emerging Technologies 
Office: # 614-213-3467
Cell: # 412-519-2592 


-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
John Norgauer
Sent: Friday, October 09, 2009 2:32 PM
To: IBM-MAIN@bama.ua.edu
Subject: My IEFACTRT crippled?

I have had the IEFACTRT  exit in my test LPAR for sometime now and I see 
today that it's not executing.

When I issue:  D PROG,EXIT,EN=SYS.IEFACTRT,DIAG

I get:

CSV464I 11.25.36 PROG,EXIT DISPLAY 116
EXIT SYS.IEFACTRT
MODULESTATE EPADDRLOADPTLENGTHJOB
IEFACTRTA   85303000      *

So the system thinks the exit is there, but I am not getting any 
accounting info in my JES2  JESMSGLG sysout for batch jobs.

Any suggestion as to how I can get this back working?




John Norgauer
Senior Systems Programmer
Mainframe Technical Support Services
University of California Davis Medical Center
2315 Stockton Blvd
ASB 1300
Sacramento, Ca 95817
916-734-0536

 SYSTEMS PROGRAMMING..  Guilty, until proven innocent !! JN  2004

Hardware eventually breaks - Software eventually works  anon


--
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
This communication is for informational purposes only. It is not
intended as an offer or solicitation for the purchase or sale of
any financial instrument or as an official confirmation of any
transaction. All market prices, data and other information are not
warranted as to completeness or accuracy and are subject to change
without notice. Any comments or statements made herein do not
necessarily reflect those of JPMorgan Chase  Co., its subsidiaries
and affiliates.

This transmission may contain information that is privileged,
confidential, legally privileged, and/or exempt from disclosure
under applicable law. If you are not the intended recipient, you
are hereby notified that any disclosure, copying, distribution, or
use of the information contained herein (including any reliance
thereon) is STRICTLY PROHIBITED. Although this transmission and any
attachments are believed to be free of any virus or other defect
that might affect any computer system into which it is received and
opened, it is the responsibility of the recipient to ensure that it
is virus free and no responsibility is accepted by JPMorgan Chase 
Co., its subsidiaries and affiliates, as applicable, for any loss
or damage arising in any way from its use. If you received this
transmission in error, please immediately contact the sender and
destroy the material in its entirety, whether in electronic or hard
copy format. Thank you.

Please refer to http://www.jpmorgan.com/pages/disclosures for
disclosures relating to European legal entities.

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

FEX (Find EXpression)

[Dave Salt]

A number of people have contacted me off-list with questions about the FEX 
command, so this email will hopefully clarify some points.

 

First, FEX is going to be part of the next SimpList release (i.e. version 2.1). 
It is deeply imbedded in the SimpList libraries (e.g. uses SimpList panel and 
message libraries etc), and therefore requires the SimpList libraries to be 
installed. However, FEX can continue to be used even after the trial has 
expired; i.e. it does NOT require a SimpList license and therefore beta testers 
are free to continue using the FEX command forever more.

 

Second, FEX can be used in ANY edit or view session; i.e. you do NOT have to be 
in a SimpList session in order to use the FEX command.

 

Third, other extended edit and view commands have always been available in 
SimpList, and can also be kept after the SimpList trial has ended. For example, 
FN (Find Next) can be entered on any edit or view command to find the next 
occurrence of whichever string the cursor is pointed at. COMPRESS can be 
entered to free unused space, and so on.

 

Fourth, what's required of the beta testers is to simply use the FEX command 
and provide feedback; likes, dislikes, suggestions for improvement (etc).

 

If there are any additional questions then please let me know. If anyone is 
interested in being a beta tester there are still a few places left so please 
contact me off-list.

 

Thanks,


Dave Salt

SimpList(tm) - try it; you'll get it!   
http://www.mackinney.com/products/SIM/simplist.htm   


  
_
New: Messenger sign-in on the MSN homepage
http://go.microsoft.com/?linkid=9677403
--
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: Deactivate LPAR

[Guy Gardoit]

Ok, I've had time to research my memory banks.  This probably has nothing
to do with the OPs original question but just for the record, there is a
subtle difference between RESET NORMAL and RESET CLEAR that has to with more
that just clearing storage.

It has to do with the FDRPAS program.  FDRPAS (and I would assume other
products like TDMF) determine from any of the modern controllers (HDS, EMC
or IBM) what LPARs have access to DASD volumes and then require that each
LPAR that has access to participate in any volume movement being done by a
program.

If an LPAR is taken down, I think a RESET CLEAR is needed to inform the
controller that the LPAR no longer has access.  If that's not done, and you
try to use FDRPAS from a different LPAR, FDRPAS will send nasty messages
saying that not all accessing systems are participating on the move.

At least that was my experience from a few years ago.   Sometimes experience
is more valuable than reading and quoting Redbooks.

-- 
Guy Gardoit
z/OS Systems Programming

On Fri, Oct 2, 2009 at 11:03 AM, Scott Rowe scott.r...@joann.com wrote:

 Yes, it does.

  Ward, Mike S mw...@ssfcu.org 10/2/2009 12:55 PM 
  I thought reset did that and clear just cleared memory.

 -Original Message-
 From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
 Behalf Of Guy Gardoit
 Sent: Thursday, October 01, 2009 5:45 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: Deactivate LPAR

 SYSTEM RESET CLEAR will also clear any spurious I/O.

 On Thu, Oct 1, 2009 at 2:21 PM, Scott Rowe scott.r...@joann.com wrote:

  For his purpose I seriously doubt clearing storage would have any
 effect
  whatsoever.
 
   Guy Gardoit ggard...@gmail.com 10/1/2009 5:05 PM 
   Make sure it is a RESET *CLEAR*.
 
  On Thu, Oct 1, 2009 at 8:02 AM, Donnelly, John P
 john.p.donne...@nsc.com
  wrote:
 
   We have a two LPAR environment; one PROD, one TEST.
   We have been advised to DEACTIVATE the TEST PAR when not in use to
  provide
   more process power to the PROD LPAR; at present we do a SYSTEM RESET
 on
  the
   TEST LPAR when not in use.
  
   Opinions?
  
  
  
 --
   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
  
 
 
 
  --
  Guy Gardoit
  z/OS Systems Programming
 
  --
  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
 
 
 
  CONFIDENTIALITY/EMAIL NOTICE: The material in this transmission
 contains
  confidential and privileged information intended only for the
 addressee.  If
  you are not the intended recipient, please be advised that you have
 received
  this material in error and that any forwarding, copying, printing,
  distribution, use or disclosure of the material is strictly
 prohibited.  If
  you have received this material in error, please (i) do not read it,
 (ii)
  reply to the sender that you received the message in error, and (iii)
 erase
  or destroy the material. Emails are not secure and can be intercepted,
  amended, lost or destroyed, or contain viruses. You are deemed to have
  accepted these risks if you communicate with us by email. Thank you.
 
 
  --
  For IBM-MAIN subscribe / signoff / archive access instructions,
  send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
  Search the archives at http://bama.ua.edu/archives/ibm-main.html
 



 --
 Guy Gardoit
 z/OS Systems Programming

 --
 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
 ==
 This email and any files transmitted with it are confidential and intended
 solely for the use of the individual or entity
 to which they are addressed. If you have received this email in error
 please notify the system manager. This message
 contains confidential information and is intended only for the individual
 named. If you are not the named addressee you
 should not disseminate, distribute or copy this e-mail. Please notify the
 sender immediately by e-mail if you
 have received this e-mail by mistake and delete this e-mail from your
 system. If you are not the intended recipient
 you are notified that disclosing, copying, distributing or taking any
 action in reliance on the contents of this
 information is strictly prohibited.

 --
 For IBM-MAIN subscribe / signoff / archive access 

Re: COBOL is an obvious cash cow to be milked to death was Re: Does Ent. COBOL 4.1 generate 64-bit binary arithmetic instructions?

[Kirk Wolf]

Wrong equations :-)
What is the *business case* for adding better optimizations to the
COBOL compiler?

Back in the day when there was fierce PCM competition, you could add
new instructions and then spend money in compiler exploitation as a
competitive advantage.   Now the business case is a little fuzzier, I
would guess.

On Fri, Oct 9, 2009 at 8:20 AM, David Andrews d...@lists.duda.com wrote:
 On Fri, 2009-10-09 at 02:32 -0400, Bill Klein wrote:
 I suspect that many (Possibly even most) existing IBM COBOL customers would
 like it if IBM COBOL development had unlimited resources for enhancements

 Unlimited?  No, but if IBM applied a higher percentage of gross it would
 be nice.

 Rounding down, on my dinky little 15 MSU box I pay $900 a month for
 COBOL.  There are something like 10,000 mainframe customers, so suppose
 that they all have dinky little 15 MSU boxes like me and that only 10%
 of them use COBOL.  That's $900,000/month revenue for the COBOL effort
 at IBM, or a little over $10M per year, and pretty conservative numbers.

 I'll bet I could rent some nice office space and hire a small team of
 superprogrammers for that same money, PLUS have enough to pay a modest
 shareholder dividend.

 Yeah I know, IBM has other expenses that have to be covered: admin
 types, testers, support staff.  Tom Ross's attention at SHARE isn't
 free, and he likely has a bigger development crew than my imaginary
 small team of superprogrammers.  But holy cash cow, ten megabucks!

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


--
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: My IEFACTRT crippled?

[John Norgauer]

Here's my SMFPRMXX statements:

SYS(NOTYPE(16,19,20,34,35,42,120:127,129:143,
145:244,246:252),
  EXITS(IEFU83,IEFU84,IEFACTRT,
  IEFUSI,IEFUJI,IEFU29),NOINTERVAL,NODETAIL)


John Norgauer
Senior Systems Programmer
Mainframe Technical Support Services
University of California Davis Medical Center
2315 Stockton Blvd
ASB 1300
Sacramento, Ca 95817
916-734-0536

 SYSTEMS PROGRAMMING..  Guilty, until proven innocent !! JN  2004

Hardware eventually breaks - Software eventually works  anon


--
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: COBOL is an obvious cash cow to be milked to death was Re: Does Ent. COBOL 4.1 generate 64-bit binary arithmetic instructions?

[P S]

On Fri, Oct 9, 2009 at 2:48 PM, Kirk Wolf k...@dovetail.com wrote:
 Wrong equations :-)
 What is the *business case* for adding better optimizations to the
 COBOL compiler?

 Back in the day when there was fierce PCM competition, you could add
 new instructions and then spend money in compiler exploitation as a
 competitive advantage.   Now the business case is a little fuzzier, I
 would guess.

Sure; the case is making z more competitive against the squatty
little boxes, but that's clearly MUCH fuzzier. And not warmer. Just
fuzzier.

--
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: Experience with NPF

[Ed Finnell]

 
In a message dated 10/9/2009 11:16:30 A.M. Central Daylight Time,  
dmit...@shazam.net writes:

DEST=.  Not a word about this in JES2  books...



Sorry it's in the IP Printway guide. I'll  get a reference in a minute.





--
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: My IEFACTRT crippled?

[Mike W Stayton]

The loadpt value of  means the module was found in LPA.
Issue
 D PROG,LPA,MODNAME=iefactrt 

This is the response I received on my test system. 
14.50.31  CSV550I 14.50.31 LPA DISPLAY 992 
FLAGS  MODULEENTRY PT  LOAD PT   LENGTHDIAG 
   P   IEFACTRT  87520DE0  07520DE0  0220  17AE3548 

Mike Stayton
z/OS Communications Server
m...@us.ibm.com

IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu wrote on 10/09/2009 
02:32:03 PM:

 [image removed] 
 
 My IEFACTRT crippled?
 
 John Norgauer 
 
 to:
 
 IBM-MAIN
 
 10/09/2009 02:35 PM
 
 Sent by:
 
 IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu
 
 Please respond to IBM Mainframe Discussion List
 
 I have had the IEFACTRT  exit in my test LPAR for sometime now and I see 

 today that it's not executing.
 
 When I issue:  D PROG,EXIT,EN=SYS.IEFACTRT,DIAG
 
 I get:
 
 CSV464I 11.25.36 PROG,EXIT DISPLAY 116
 EXIT SYS.IEFACTRT
 MODULESTATE EPADDRLOADPTLENGTHJOB
 IEFACTRTA   85303000      *
 
 So the system thinks the exit is there, but I am not getting any 
 accounting info in my JES2  JESMSGLG sysout for batch jobs.
 
 Any suggestion as to how I can get this back working?
 
 
 
 
 John Norgauer
 Senior Systems Programmer
 Mainframe Technical Support Services
 University of California Davis Medical Center
 2315 Stockton Blvd
 ASB 1300
 Sacramento, Ca 95817
 916-734-0536
 
  SYSTEMS PROGRAMMING..  Guilty, until proven innocent !! JN 
2004
 
 Hardware eventually breaks - Software eventually works  anon
 
 
 --
 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: COBOL is an obvious cash cow to be milked to death was Re: Does Ent. COBOL 4.1 generate 64-bit binary arithmetic instructions?

[J D Cassidy]

To add even more topic-skew, no mention of a full blown COBOL port to
zLinux with ahem.. CICS.



JC



= On Fri, Oct 9, 2009 at 2:48 PM, Kirk Wolf k...@dovetail.com wrote:
= Wrong equations :-)
= What is the *business case* for adding better optimizations to the
= COBOL compiler?
=
= Back in the day when there was fierce PCM competition, you could add
= new instructions and then spend money in compiler exploitation as a
= competitive advantage.   Now the business case is a little fuzzier, I
= would guess.
=
= Sure; the case is making z more competitive against the squatty
= little boxes, but that's clearly MUCH fuzzier. And not warmer. Just
= fuzzier.
=
= --
= 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
=


John Cassidy (Dipl.-Ingr.)

Kapellenstr. 21a

65193 Wiesbaden

Germany



Mobile: +49 (0) 170 794 3616


http://www.JDCassidy.net

http://en.federaleurope.org/

http://sva-zhosting.com/en/index.php

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

BAMA UPS work.

[Ed Finnell]

Haven't seen a formal notice but got back from lunch with some of the
DBA's and they were gnashing about having to go in Sat night and Sunday  
morning to baby sit a UPS upgrade. Supposedly a lights out power down will be  
required. It may be short or it could be intermittent for a while until all 
the  patch panels are worked over.

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

Mark Thomen

[Rick Fochtman]

Mark Thomen withdrew from the list some time ago, IIRC, due to health 
issues.


Does anyone know his current status? He was a very welcome and 
knowledgeable contributor, as well as a friend to all.


Rick

--
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: Mark Thomen

[John P Kalinich]

Rick Fochtman of the IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu
wrote on 10/09/2009 02:18:53 PM:

 Mark Thomen withdrew from the list some time ago, IIRC, due to health
 issues.

 Does anyone know his current status? He was a very welcome and
 knowledgeable contributor, as well as a friend to all.

I miss Mark's comments.  I finally got to meet him at SHARE in NYC.

Regards,
John K

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

Check out 4.4.1 z/OS V1R8.0 Infoprint Server User's Guide IBM Library Serve

[Ed Finnell]

_4.4.1  z/OS V1R8.0 Infoprint Server User's Guide IBM Library Server_ 
(http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/aopv0331/4.4.1?ACTIO
N=MATCHESREQUEST=DESTTYPE=FUZZYSHELF=AOPBK363DT=20071022150028CASE=sea
rchTopic=TOPICsearchText=TEXTsearchIndex=INDEXrank=RANKScrollTOP=FIRSTHI
T#FIRSTHIT)  
 
Here's the link to DEST='IP:'.

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

Fw: ShopzSeries Outage and IP Address Changes Notification

[Chris Hoelscher]

for those who care about such things, I just received thin in my inbox



Dear ...,

There will be a 15 hour outage beginning Saturday October 24 at 9:00 AM 
MDT 
until October 24 at 11:59 PM MDT.  During this time, ShopzSeries will be
unavailable.

In support of IBM network infrastructure improvements, beginning October 
24, 2009 
new download servers with new IP addresses will be deployed.  Included are 
servers 
which support internet delivery of ShopzSeries product and service orders. 
 This 
effort will allow IBM to direct download orders to appropriate servers 
depending on 
business rules and server availability.  Your firewall configuration may 
require 
updates to permit access to the new download servers on October 24.

It is recommended that firewall configuration updates be made as soon as 
possible. 
Rather than deleting or changing the current host names and IP addresses, 
the new 
host names and IP addresses should be added and the old addresses removed 
only after 
you have verified all processes are successfully using the new download 
server host 
names and IP addresses.

Current servers and IP addresses (prior to October 24, 2009):
 download3.boulder.ibm.com   170.225.15.76  
(primary FTP)
 inetsd01.boulder.ibm.com170.225.15.62  
(FTP server endpoint)
 lindsey.boulder.ibm.com 170.225.15.70 
 (FTP server endpoint)


After October 24, 2009, the new servers and primary/fail over IP 
addresses:
 download3.boulder.ibm.com   170.225.15.76
 download3.mul.ie.ibm.com129.35.224.114
 delivery03-bld.dhe.ibm.com  129.35.224.103 
170.225.15.103
 delivery03-mul.dhe.ibm.com  129.35.224.113 
170.225.15.113

Regards,

The ShopzSeries Team


The information transmitted is intended only for the person or entity to which 
it is addressed and may contain CONFIDENTIAL material.  If you receive this 
material/information in error, please contact the sender and delete or destroy 
the material/information.

--
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: COBOL is an obvious cash cow to be milked to death was Re: Does Ent. COBOL 4.1 generate 64-bit binary arithmetic instructions?

[Farley, Peter x23353]

 -Original Message-
 From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
 Behalf Of David Andrews
 Sent: Friday, October 09, 2009 9:20 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: COBOL is an obvious cash cow to be milked to death was
Re:
 Does Ent. COBOL 4.1 generate 64-bit binary arithmetic instructions?
Snipped 
 I'll bet I could rent some nice office space and hire a small team of
 superprogrammers for that same money, PLUS have enough to pay a modest
 shareholder dividend.

BUT the resulting reduction in customer CPU utilization would
cannibalize the additional hardware sales that would have been made when
customer work volume increases, making the hardware side of the house
*very* unhappy...

Reducing customer CPU utilization likely loses IBM more money than it
makes them, so guess what priority optimal code generation is likely to
have?

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: Mark Thomen

[Bob Shannon]

The last I heard, Mark will not be back on IBM-MAIN. I appreciated his comments 
too (at least some of them :-) ).

Bob Shannon
Rocket Software

--
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: My IEFACTRT crippled?

[John Norgauer]

D PROG,LPA,MODNAME=IEFACTRT
CSV550I 13.29.30 LPA DISPLAY 152
FLAGS  MODULEENTRY PT  LOAD PT   LENGTHDIAG
   P   IEFACTRT  85303000  05303000  1EE0  16E14060


John Norgauer
Senior Systems Programmer
Mainframe Technical Support Services
University of California Davis Medical Center
2315 Stockton Blvd
ASB 1300
Sacramento, Ca 95817
916-734-0536

 SYSTEMS PROGRAMMING..  Guilty, until proven innocent !! JN  2004

Hardware eventually breaks - Software eventually works  anon


--
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: My IEFACTRT crippled?

[Lizette Koehler]

According to the CSR464I message it states:

LOADPT loadpt   
The load point address of the exit routine module. The value is only
valid when the exit routine is active.  

The load point is only known when the module was located by the system  
from the lnklst or a user-specified data set. If the module was 
located from the LPA, the load point is displayed as zeroes. However,   
you can issue a D PROG,LPA,MODNAME=modulename command to determine the  
actual load point.  

So perhaps your exit is in LPA rather than LINKLST???

Lizette




I have had the IEFACTRT  exit in my test LPAR for sometime now and I see 
today that it's not executing.

When I issue:  D PROG,EXIT,EN=SYS.IEFACTRT,DIAG

I get:

CSV464I 11.25.36 PROG,EXIT DISPLAY 116
EXIT SYS.IEFACTRT
MODULESTATE EPADDRLOADPTLENGTHJOB
IEFACTRTA   85303000      *

So the system thinks the exit is there, but I am not getting any 
accounting info in my JES2  JESMSGLG sysout for batch jobs.

Any suggestion as to how I can get this back working?






--
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: AMATERSE Even Less Device Independent Than Before

[Edward Jaffe]

Edward Jaffe wrote:

Pinnacle wrote:

Did they give you the WAD here?


No WAD yet...


Just had a close call with this. The support person suggested that, 
because the documentation doesn't explicitly state that OUTFILE can be 
sysout, it need not be supported and that any update should be handled 
through a new function APAR. My response was:


ETR Response
I'm not understanding the rationale that's being applied here. MVS 
utility input and output files are device independent unless explicitly 
stated otherwise. You might be too young to remember, but that's one of 
the tenets that originally separated MVS (was OS) from VSE (was DOS).


Utilities like IEBDG, IEBPTPCH, IEBGENER, etc. work just fine when the 
output file is sysout. You can even unload a PDS to sysout using 
IEBCOPY! (If you doubt the accuracy of that statement, try this:)


 // EXEC PGM=IEBCOPY
 //SYSPRINT DD SYSOUT=*
 //SYSINDD *
  COPY I=INDD,O=OUTDD
 //INDD DD DSN=SYS1.MODGEN,DISP=SHR
 //OUTDDDD SYSOUT=*

If your team is trying to avoid yet another PE on this chain, then a new 
function APAR is OK by me. But, we really don't want to have to wait 
until R12 or beyond to get a fix for this.

/ETR Response

They opened APAR OA30714 to address the issue.

--
Edward E Jaffe
Phoenix Software International, Inc
5200 W Century Blvd, Suite 800
Los Angeles, CA 90045
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

Re: My IEFACTRT crippled?

[John Norgauer]

It is in th LPALIB and I did a re-ipl with CLPA and still no output from 
the IEFACTRT in my jobs.


John Norgauer
Senior Systems Programmer
Mainframe Technical Support Services
University of California Davis Medical Center
2315 Stockton Blvd
ASB 1300
Sacramento, Ca 95817
916-734-0536

 SYSTEMS PROGRAMMING..  Guilty, until proven innocent !! JN  2004

Hardware eventually breaks - Software eventually works  anon


--
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 Mainframes Draw Antitrust Scrutiny

[Shmuel Metz (Seymour J.)]

In 52bc4b80910090814x5ad52c8cua18e88d140c6d...@mail.gmail.com, on
10/09/2009
   at 08:14 AM, Guy Gardoit ggard...@gmail.com said:

The government idiots should be looking at MicroSoft, not IBM. 

They should be looking at both. But I agree that ms is the worse offender.
 
-- 
 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: COBOL is an obvious cash cow to be milked to death was Re: Does Ent. COBOL 4.1 generate 64-bit binary arithmetic instructions?

[Gord Tomlin]

Meanwhile, IBM spends considerable effort in optimizing its C/C++ 
compilers. Customers with C and C++ applications have more alternatives 
to Big Iron.


Farley, Peter x23353 wrote:

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
Behalf Of David Andrews
Sent: Friday, October 09, 2009 9:20 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: COBOL is an obvious cash cow to be milked to death was

Re:

Does Ent. COBOL 4.1 generate 64-bit binary arithmetic instructions?
Snipped 

I'll bet I could rent some nice office space and hire a small team of
superprogrammers for that same money, PLUS have enough to pay a modest
shareholder dividend.


BUT the resulting reduction in customer CPU utilization would
cannibalize the additional hardware sales that would have been made when
customer work volume increases, making the hardware side of the house
*very* unhappy...

Reducing customer CPU utilization likely loses IBM more money than it
makes them, so guess what priority optimal code generation is likely to
have?

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




--
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: Experience with NPF

[Dana]

On Fri, 9 Oct 2009 15:03:30 EDT, Ed Finnell efinnel...@aol.com wrote:

Sorry it's in the IP Printway guide. I'll  get a reference in a minute.

Thanks, I forgot to mention it, but that is what I was trying to avoid with 
this 
project, buying anything...  ;-)

Dana

--
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 name standards (Was: multiple jobs / same name)

[Shmuel Metz (Seymour J.)]

In listserv%200910090945570233.0...@bama.ua.edu, on 10/09/2009
   at 09:45 AM, Paul Gilmartin paulgboul...@aim.com said:

FSVO arbitrary.  This is the USERDATA parameter, isn't it?. 

Userdata parameter of what?

There are vendors adding their own DD keywords via SJF; I don't know
whether they are under NDA's. If not, perhaps one of them could comment on
length restrictions.
 
-- 
 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: Justice Department probing allegations of abuse by IBM in mainframe computer market

[Shmuel Metz (Seymour J.)]

In c648d10634943c4891f7085d0dad806b579d6...@usmbx06.aafes.com, on
10/08/2009
   at 10:07 AM, Elliot, David elli...@aafes.com said:

They'll be discovering steam next. Of course IBM is being unfair to its
competitors. That's what being dominant means.

No, that's not what it means.
 
-- 
 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: Justice Department probing allegations of abuse by IBM in mainframe computer market

[Shmuel Metz (Seymour J.)]

In 67954f200910081418h3f651d01qf2ecacd40da6d...@mail.gmail.com, on
10/08/2009
   at 05:18 PM, P S zosw...@gmail.com said:

Sure, but FLEX-ES was fallout from PSI.

That has nothing to do with whether IBM's licensing policies violated
antitrust laws. The fact remains that IBM refuses to license, e.g., z/OS,
on competitive systems.
 
-- 
 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: Justice Department probing allegations of abuse by IBM in mainframe computer market

[Shmuel Metz (Seymour J.)]

In 4ace5273.5020...@ync.net, on 10/08/2009
   at 03:58 PM, Rick Fochtman rfocht...@ync.net said:

IIRC, none of IBM's competitors in the mainframe market offer a 64-bit 
machine. What's unfair about providing something your competitors
don't??

Why are you beating your wife?

You're defending IBM against a claim that nobody has made and ignoring the
actual allegations.
 
-- 
 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: AMATERSE Even Less Device Independent Than Before

[Paul Gilmartin]

On Fri, 9 Oct 2009 13:44:29 -0700, Edward Jaffe wrote:

ETR Response
I'm not understanding the rationale that's being applied here. MVS
utility input and output files are device independent unless explicitly
stated otherwise. You might be too young to remember, but that's one of
the tenets that originally separated MVS (was OS) from VSE (was DOS).

Does that umbrella cover Unix files, also?  I'm thinking of
the packed input/output for AMATERSE.  But that never worked,
so can't be considered a regression.  Is transgression of
design motivation APARable?

Utilities like IEBDG, IEBPTPCH, IEBGENER, etc. work just fine when the
output file is sysout. You can even unload a PDS to sysout using
IEBCOPY! (If you doubt the accuracy of that statement, try this:)

  // EXEC PGM=IEBCOPY
  //SYSPRINT DD SYSOUT=*
  //SYSINDD *
   COPY I=INDD,O=OUTDD
  //INDD DD DSN=SYS1.MODGEN,DISP=SHR
  //OUTDDDD SYSOUT=*

I'm astonished.  It's almost if the original planners of OS adhered
to Doug Gwyn's maxim:

http://www.armoredpenguin.com/quotes/Unix.html

UNIX was not designed to stop its users from doing stupid
things, as that would also stop them from doing clever things.

--- Doug Gwyn 

Then what do you do with it.  Hmmm.  Maybe if you said:

   //OUTDDDD SYSOUT=B

They opened APAR OA30714 to address the issue.

Is this still subject to reversal by the next tier?

Good Luck.

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

Re: Justice Department probing allegations of abuse by IBM in mainframe computer market

[Anne Lynn Wheeler]

The following message is a courtesy copy of an article
that has been posted to bit.listserv.ibm-main,alt.folklore.computers as well.


shmuel+ibm-m...@patriot.net (Shmuel Metz  , Seymour J.) writes:
 That has nothing to do with whether IBM's licensing policies violated
 antitrust laws. The fact remains that IBM refuses to license, e.g., z/OS,
 on competitive systems.

major production platform that FLEX sold on was Sequent ... and then IBM
bought Sequent ... and then stopped selling Sequent boxes.

FLEX had sold some on Compaq (later HP) ... but that seemed to be more
for test/development.

Before IBM bought Sequent, we did some consulting for Chen when he was
CTO at Sequent
http://en.wikipedia.org/wiki/Sequent_Computer_Systems

Sequent  FLEX looked at providing FLEX on an Itanium-based Sequent box
... but Itanium then had performance issues and delays.

we had gotten involved with SCI effort before leaving IBM and then
spent some time with various places doing SCI efforts ... including
Sequent
http://en.wikipedia.org/wiki/Scalable_Coherent_Interface

above mentions DG AViiON and Sun using SCI as well as Sequent.  There
was also SGI and Convex. DG  Sequent was 64 four (intel) processor
boards interconnected with SCI (256 Intel processors ).  Convex
(Exemplar) was 64 two (HP RISC) processor boards interconnection with
SCI (128 HP RISC processors).

Much earlier Chen had been at Cray computers and was credited with the
XMP. He then left and formed his own supercomputer company ... with lots
of funding from IBM (which was eventually acquired by Sequent):
http://en.wikipedia.org/wiki/Steve_Chen_%28computer_engineer%29

Sequent ran both NT and Dynix (their enhanced UNIX) system on their
pre-NumaQ intel processor SMPs. The Sequent people in that period
claimed to have done much of the NT SMP scale-up  parallelization work.

-- 
40+yrs virtualization experience (since Jan68), 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: Experience with NPF

[Ed Finnell]

 
In a message dated 10/9/2009 4:08:08 P.M. Central Daylight Time,  
dmit...@shazam.net writes:

Thanks, I forgot to mention it, but that is what I was trying to  avoid 
with this 
project, buying anything...   ;-)



I think it's bundled with PSF although  with 4.1 they started pulling the 
pieces apart.
 
Lacking that LPR should get you started  and then motor into NPF. With the 
SeverPAC think the NPF menus are built in  but you have to do some initial  
customization to get it fired  up.
 





--
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: My IEFACTRT crippled?

[Ed Finnell]

 
In a message dated 10/9/2009 3:54:15 P.M. Central Daylight Time,  
john.norga...@ucdmc.ucdavis.edu writes:

It is in th LPALIB and I did a re-ipl with CLPA and still no output  from 
the IEFACTRT in my jobs.



Check the length or hist with PDS against  a working one. Sounds like it 
might have gotten replaced with the  default.





--
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: Does Ent. COBOL 4.1 generate 64-bit binary arithmetic instructions?

[Clark Morris]

On 9 Oct 2009 09:34:42 -0700, in bit.listserv.ibm-main you wrote:

Lots of good performance improvement comments snipped

One more time,
  Have you created either a SHARE requirement or a marketing REQUEST for any
of the specific compiler changes to get performance improvements in
Enterprise COBOL (specifically those using higher ALS instructions)?

If not, why not?

I suppose you might think that IBM should constantly be looking at the
generated object code from the compiler looking for performance
improvements.  Again, this might be nice, but it is highly unlikely to
happen.

If, on the other hand, you have specific suggestions and you submit them to
IBM via any of the numerous ways of making such suggestions, then they MIGHT
get into the development stream.

Especially, when you include wording (like that snipped) that included,
  this might be worth paying for a version upgrade

P.S.  Just because it was in part of the snipped notes,
  IBM has given a positive response to the SHARE requirement for adding DFP
support to COBOL.
  They have, however, rejected adding BFP support.

They tout inoperability with Java.  Then instead of recognizing a base
data type of Java (and the more standard floating point for newer
software) which can be done merely by implementing the 2002 Usages as
IEEE and leaving COMP-1 and COMP-2 for hex floating point, they come
up with resource consuming kludge of translating back and forth
complete with potential for error in some cases.

--
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: My IEFACTRT crippled?

[Guy Gardoit]

Did you try ISRDDN?

TSO ISRDDN
LPA
M IEFACTRT

Should give you a screen telling you that it is PLPA resident and in what
library in the LPA concatenation it was found in.
Did it find the one you expected?

On Fri, Oct 9, 2009 at 3:08 PM, Ed Finnell efinnel...@aol.com wrote:


 In a message dated 10/9/2009 3:54:15 P.M. Central Daylight Time,
 john.norga...@ucdmc.ucdavis.edu writes:

 It is in th LPALIB and I did a re-ipl with CLPA and still no output  from
 the IEFACTRT in my jobs.


 
 Check the length or hist with PDS against  a working one. Sounds like it
 might have gotten replaced with the  default.





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




-- 
Guy Gardoit
z/OS Systems Programming

--
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: My IEFACTRT crippled?

[Lizette Koehler]

There is a function in ISRDDN in TSO that might be able to help.

On the command line issue LPA - a list of the LPA Libraries will pop up.
Then issue MEMBER IEFACTRT.  See if the module is where you expect it.

Lizette


 
 It is in th LPALIB and I did a re-ipl with CLPA and still no output from
 the IEFACTRT in my jobs.
 

--
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: More bad news.

[Howard Rifkind]

Ed, (smile) I contend there isn't any mainframe skills shortage.

z/VM, z/OS, SDF/Cobol/CICS/ DB2 and anything else you can think of.

With all the mainframe folks out of work now you could fill every standing 
mainframe job opening in the contry and then some.  

Who was the wise guy yelling about H1B's because there isn't enough talent out 
there in the USA.

--- On Tue, 9/29/09, Edward Jaffe edja...@phoenixsoftware.com wrote:

 From: Edward Jaffe edja...@phoenixsoftware.com
 Subject: Re: More bad news.
 To: IBM-MAIN@bama.ua.edu
 Date: Tuesday, September 29, 2009, 5:23 PM
 Arthur Gutowski wrote:
  ... until this so-called recovery actually happens, I
 don't see much of either sort of training happening here.
    
 
 In his Sep 20 CNN interview, President Obama said that U.S.
 employers have eliminated almost 7 million jobs since the
 recession started and that you need 150,000 additional jobs
 each month just to keep pace with population growth.
 
 Either my calculator is broken or recovery seems a long,
 long way off...at least in the United States.
 
 To restore 7 million jobs over 5 years you have to add (60
 * 150,000 + 7,000,000) / 60 jobs per month or 266,666 new
 jobs every month for 5 years. (Not likely.)
 
 It's not much better when the problem is spread over 10
 years (120 * 150,000 + 7,000,000) / 120 = 208,333 new jobs
 every month for 10 years.
 
 The coming mainframe skills shortage should help mainframe
 job demand out-pace that of other industries. However, most
 of our employers' customers work in other industries...
 
 -- Edward E Jaffe
 Phoenix Software International, Inc
 5200 W Century Blvd, Suite 800
 Los Angeles, CA 90045
 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
 


  

--
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: Justice Department probing allegations of abuse by IBM in mainframe computer market

[P S]

On Fri, Oct 9, 2009 at 6:15 PM, Shmuel Metz (Seymour J.)
shmuel+ibm-m...@patriot.net wrote:
 That has nothing to do with whether IBM's licensing policies violated
 antitrust laws. The fact remains that IBM refuses to license, e.g., z/OS,
 on competitive systems.

Um. Doh?

--
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: FEX (Find EXpression)

[Rich Smrcina]

Here's the response from the person that compiled PCRE on z/OS:

I did get Pcre working. From looking at the Pcre dir that I did the work in, I 
had to start from scratch with just the C files and H files and created new 
make files. I also had to manually create a config.h file, and inside that my 
comment says I had to change newline from 0x10 to 0x15. Looks like I was 
successful in building the PcreTest program and the libpcre.a library.



Rich Smrcina wrote:
I recall having an email conversation with someone that was working on 
porting the Hobbit (now Xymon) network systems monitor to z/OS.  It 
has a prereq for PCRE.  I'll check with him to see if he got it working.


Shmuel Metz (Seymour J.) wrote:

In 4acb1a23.4010...@gmail.com, on 10/06/2009
   at 06:21 PM, David Crayford dcrayf...@gmail.com said:

 

Does SimpList add this regex find



What he described is not a regex find, although it does borrow some
syntax.
Has anybody ported PCRE to z/OS?
 
  






--
Rich Smrcina
Phone: 414-491-6001
http://www.linkedin.com/in/richsmrcina

Catch the WAVV! http://www.wavv.org
WAVV 2010 - Apr 9-14, 2010 Covington, KY

--
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: Does a DD-Statement waste memory after dealloc?

[Lloyd Fuller]

Clark Morris wrote:

On 9 Oct 2009 01:35:23 -0700, in bit.listserv.ibm-main you wrote:





If these are for QSAM data sets, does the C program do a FREEPOOL
(free the buffer pool) on CLOSE.  For reasons I don't understand,
apparently CLOSE does not automatically free the buffers.  I think the
COBOL implementors were smart enough to understand this and did the
FREEPOOL.  Others who understand more about this can clarify what I
have said.


As I remember things, and it has been a while, the FREEPOOL is not 
automatically done because it is expensive to get rid of the buffer pool 
if you are just closing the file to reopen it because then you have to 
just get the buffers all over.  Clsoing and reopening used to be a 
common way to get back to the beginning of the file.


Lloyd

--
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: Does a DD-Statement waste memory after dealloc?

[Ted MacNEIL]

As I remember things, and it has been a while, the FREEPOOL is not 
automatically done because it is expensive to get rid of the buffer pool 
if you are just closing the file to reopen it because then you have to 
just get the buffers all over.

These days, it's not that expensive.

Clsoing and reopening used to be a 
common way to get back to the beginning of the file.

Doesn't the verb REWIND exist any more?
-
Too busy driving to stop for gas!

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

Page Faults and Interrupts

[David Stephens]

I've always thought that a page fault in any operating system, including 
z/OS, would generate an interrupt. The task requiring the missing page 
would be put aside whilst RSM did the required I/O to the page datasets 
(unless the page was already in memory - in expanded storage, or a 
stolen page). However, I haven't been able to find any mention of this 
interrupt (Principles of Operation mentions the six interrupt types), 
and how it works.


Can anyone clear this up? Does a page fault generate an interrupt like a 
program exception? If so, what sort? If not, what happens?


Thanks for your help.

David
--

David Stephens
Lead Systems Programmer
d...@longpelaexpertise.com.au
www.longpelaexpertise.com.au 
http://www.longpelaexpertise.com.au/images/logo.gif

Ph. 0404 757 821 (from Australia)

(Longpela Expertise Logo)
Longpela Expertise - System z Mainframe Consultants
Read new expert Mainframe articles every quarter in our LongEx Mainframe 
Quarterly http://www.longpelaexpertise.com.au/ezine


--
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: Page Faults and Interrupts

[Steve Comstock]

David Stephens wrote:
I've always thought that a page fault in any operating system, including 
z/OS, would generate an interrupt. The task requiring the missing page 
would be put aside whilst RSM did the required I/O to the page datasets 
(unless the page was already in memory - in expanded storage, or a 
stolen page). However, I haven't been able to find any mention of this 
interrupt (Principles of Operation mentions the six interrupt types), 
and how it works.


Can anyone clear this up? Does a page fault generate an interrupt like a 
program exception? If so, what sort? If not, what happens?


Thanks for your help.

David


Look at the z/Achitecture Reference Summary (descendent of the
original Green Card) under program interruption codes, especially
values x'10' and greater.



--

Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

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

  z/OS Application development made easier
* Our classes include
   + How things work
   + Programming examples with realistic applications
   + Starter / skeleton code
   + Complete working programs
   + Useful utilities and subroutines
   + Tips and techniques

== Ask about being added to our opt-in list:  ==
==   * Early announcement of new courses  ==
==   * Early announcement of new techincal papers ==
==   * Early announcement of new promotions   ==

--
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: Page Faults and Interrupts

[Anne Lynn Wheeler]

The following message is a courtesy copy of an article
that has been posted to bit.listserv.ibm-main,alt.folklore.computers as well.


d...@longpelaexpertise.com.au (David Stephens) writes:
 I've always thought that a page fault in any operating system,
 including z/OS, would generate an interrupt. The task requiring the
 missing page would be put aside whilst RSM did the required I/O to the
 page datasets (unless the page was already in memory - in expanded
 storage, or a stolen page). However, I haven't been able to find any
 mention of this interrupt (Principles of Operation mentions the six
 interrupt types), and how it works.

 Can anyone clear this up? Does a page fault generate an interrupt like
 a program exception? If so, what sort? If not, what happens?

re: Principles of Operation
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DZ9ZR003/CCONTENTS?SHELF=DZ9ZBK03DN=SA22-7832-03DT=20040504121320

see Section 6.5 Program Interuption  various things called
translation exception.

slightly older version ... 360/67 (from 1967):
http://www.bitsavers.org/pdf/ibm/360/funcChar/A27-2719-0_360-67_funcChar.pdf

see pg. 17  two program interrupts, segment translation and page
translation.

it is possible to have page translation exception program interrupt if
the page invalid bit is on in the page table entry (possibly indicating
that the page isn't in memory). it is also possible to have segment
translation exception program interrupt if the segment invalid bit is on
in the segment table entry (possibly indicating that the page table
hasn't been built yet).

when i did table migration in the mid-70s ... i used the segment invalid
bit in the segment table entry to indicate that the corresponding page
table information wasn't available.

some old email references:
http://www.garlic.com/~lynn/2006v.html#email731212/a
http://www.garlic.com/~lynn/2006w.html#email750102/a
http://www.garlic.com/~lynn/2006w.html#email750430/a

in cp67, i had gotten the avg total pathlength to take an page-fault
interrupt, select a page to be replace, build  initiate page fetch I/O
operation, perform task switch, take the page fetch i/o interrupt,
clean-up the operation and reschedule the original task ... down around
500 instructions (that includes prorated cost of doing page write when a
changed page had been selected for replacement ... between 1/3rd and 1/2
of the time).

-- 
40+yrs virtualization experience (since Jan68), 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