Re: z/OS subroutine in assembler, used in both batch CICS , making re-entrant

2013-06-27 Thread Hunkeler, Peter (TLSG 4)
OTH - if this module makes no system calls or other subroutine calls, then 
it does not need a save area of its own, so it can use the caller's 
provided area

[snip]

The question is not whether or not the code *can* use the caller's save area.
The code *shall* use the caller's save area to save the caller's register 
content.

That is one way to save the caller's registers, not the only documented 
Linkage Convention.

You're absolutely right. But I didn't mean to place the emphasis on that part. 
What I wanted 
to place the emphasis on is the fact that the statement cited above states that:

  *if* the code does not need an own new save area, because it makes no calls,
  *then* it can use the caller's save area.

... and this is false. The code shall save the caller's registers and it *can* 
use the
SA provided by the caller or some other mechanisms like BAKR. This is entirely
independent of the fact whether or not it makes calls.

--
Peter Hunkeler

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Install IBM SDK for Z/os java2 technology edition v7

2013-06-27 Thread baby eklavya
Hello Craig

You are right . i was able to locate those modules in SIEALNKE .similarly ,
the proc and samp members in samplib/proclib as well . Thanks a lot !

Regards,
Baby


On Thu, Jun 27, 2013 at 1:31 AM, craig.p...@fotlinc.com wrote:

 The program directory documents all the files.  The NON Unix System
 Services files are there to support JZOS (PROC, LOAD, SAMP).  In a lot of
 environments these are merged into the z/OS LINKLIB, SAMPLIB and PROCLIB
 since there are no conflicting modules and one per release level.


 Craig




 From:   baby eklavya baby.ekla...@gmail.com
 To: IBM-MAIN@LISTSERV.UA.EDU,
 Date:   06/26/2013 14:48
 Subject:Install IBM SDK for Z/os java2 technology edition v7
 Sent by:IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU



 Hi all,

 We are running in Z/os 1.11 . I am trying to install IBM SDK 64 bit
 for z/OS JAVA2 Technology Edition V7 . In the current environment , i
 see only 2 ZFS filesystems (one for java31 and other for java64) .But
 when downloaded v7 , i got some additional datasets , ie , some
 loadlibs and proclibs . It looks like our customer did a non-smpe
 install earlier and i dont see anything other than the ZFS being used
 . I am now doing an smpe install for v7 which brings in additional
 datasets . Can someone point me to right documentation to understand
 how it works . .

 One of my colleagues said that the loadlibs and proclibs are optional
 . and only ZFS is wat it needs and am confused . Any help is much
 appreciated .

 Regards,
 Baby

 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


 **
 This communication contains information which is confidential and
 may also be privileged. It is for the exclusive use of the intended
 recipient(s). If you are not the intended recipient(s), please note
 that any distribution, copying or use of this communication or the
 information in it is strictly prohibited. If you have received this
 communication in error, please notify the sender immediately and
 then destroy any copies of it.
 **

 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Install IBM SDK for Z/os java2 technology edition v7

2013-06-27 Thread baby eklavya
yes..we do . my seniors said that only ZFS is wat is needed . But , i still
had a doubt if those libraries were optional . After reading Craig's
response , i checked it again and its clarified now .Thanks for the help .


On Thu, Jun 27, 2013 at 4:54 PM, baby eklavya baby.ekla...@gmail.comwrote:

 yes..we do . my seniors said that only ZFS is want is needed . But , i
 still had a doubt if those libraries were optional . After reading Craig's
 response , i checked it again and its clarified now .Thanks for the help .


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Install IBM SDK for Z/os java2 technology edition v7

2013-06-27 Thread Roger Steyn
As someone said , java is a pretty simple install . the program directory has 
everything documented . you really don't need a senior systems programmer's 
expertise to do this . you can read through and complete the install yourself . 
But if you need any suggestions , we are always here to help .Thanks !

Steyn



 From: baby eklavya baby.ekla...@gmail.com
To: IBM-MAIN@LISTSERV.UA.EDU 
Sent: Thursday, June 27, 2013 4:56 PM
Subject: Re: Install IBM SDK for Z/os java2 technology edition v7
 

yes..we do . my seniors said that only ZFS is wat is needed . But , i still
had a doubt if those libraries were optional . After reading Craig's
response , i checked it again and its clarified now .Thanks for the help .


On Thu, Jun 27, 2013 at 4:54 PM, baby eklavya baby.ekla...@gmail.comwrote:

 yes..we do . my seniors said that only ZFS is want is needed . But , i
 still had a doubt if those libraries were optional . After reading Craig's
 response , i checked it again and its clarified now .Thanks for the help .


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS subroutine in assembler, used in both batch CICS , making re-entrant

2013-06-27 Thread Tom Marchant
On Wed, 26 Jun 2013 18:28:08 -0400, John Gilmore wrote:

Tom and I differ about this, profoundly.

Maybe yes, maybe no.

My view, which I have already tried to make clear, is that a routine
[or a routine entry and its associated code path] must [almost always]
follow the conventions of the environment in which it is  to be
invoked and executed and that failure to do so [almost always] has
untoward consequences.

I agree completely with this.

His view is different.  So be it.

I read Mr. Gilmore's statement above as a suggestion that I do not 
believe that it is important to follow conventions.  Nothing could be 
further from the truth

In my previous post, which I am including below, I pointed out that 
the linkage conventions explicitly allow any program to use the 
Linkage Stack to save its caller's registers.  Indeed, from the 
introduction of ESA until 2010, when the z/OS 1.12 edition of the 
Assembler Services guide was published, the only documented 
convention for an AR-mode program to save its caller's registers 
was to use the Linkage Stack.

Please do not misinterpret this.  The conventions also allow 
Primary-mode program to use the Linkage Stack to save its caller's 
registers.  That was why I pointed out that the statement quoted 
again below, There is, however, something of an obligation to use 
a caller-/invoker-supplied save area when one is in fact supplied. 
was incorrect.  There is no such obligation.

There is a requirement that a primary-mode program provide a save 
area for use by the programs that it calls.  The linkage conventions 
give the called program the choice of whether to use that save 
area or to use the Linkage stack.

-- 
Tom Marchant

On Wed, 26 Jun 2013 17:14:34 -0500, Tom Marchant  wrote:

On Wed, 26 Jun 2013 12:34:45 -0400, John Gilmore wrote:

Tom  Marchant wrote:

begin extract
That is one way to save the caller's registers, not the only
documented Linkage convention.
/end extract

and this is formally correct.  There is, however, something of an
obligation to use a caller-/invoker-supplied save area when one is in
fact supplied.

No there isn't.  Certainly the Linkage Conventions chapter in the 
Assembler Services Guide does not say that.  It is perfectly 
legitimate, for example, to use BAKR to save your caller's registers.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS subroutine in assembler, used in both batch CICS , making re-entrant

2013-06-27 Thread John Gilmore
The gap between Tom's views and mine is perhaps smaller than I had thought.

I had supposed that my words and this is formally correct would
suffice to make it clear that I conceded, if that be the right word,
that alternatives to the use of DSAs are available.  They did not, and
I should perhaps have expanded upon them.

The focus of my post was upon what I judged to be good practices; that
of Tom's was upon what he judged, correctly, to be licit.  These
different emphases yield, as a practical matter, different views; and
I hope everyone now understands what these differences are.

John Gilmore, Ashland, MA 01721 - USA

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS subroutine in assembler, used in both batch CICS , making r e-entrant

2013-06-27 Thread Tom Marchant
On Wed, 26 Jun 2013 22:45:50 -0700, Ed Jaffe wrote:

AFAIK, there is only one 4K range of virtual addresses guaranteed to
generate 0C4 now and forever: 7000 - 7FFF.

I didn't know that.  Is it documented anywhere?

The 4K range from  - 0FFF is key 0 storage and, as such, 
is protected from stores by unauthorized programs.

-- 
Tom Marchant

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS subroutine in assembler, used in both batch CICS , making r e-entrant

2013-06-27 Thread Steve Thompson
From:   Tom Marchant m42tom-ibmm...@yahoo.com
Date:   06/27/2013 10:46 AM



On Wed, 26 Jun 2013 22:45:50 -0700, Ed Jaffe wrote:

AFAIK, there is only one 4K range of virtual addresses guaranteed to
generate 0C4 now and forever: 7000 - 7FFF.

I didn't know that.  Is it documented anywhere?

The 4K range from  - 0FFF is key 0 storage and, as such, 
is protected from stores by unauthorized programs.

-- 
Tom Marchant
---

Look in the z/Arch book (Principles) for LAP. It even prevents authorized 
programs from writing into the PSA.

[Low Address Protection ?]

You have to set the LAP bit off in a CR to be able to update that area.

Regards,
Steve Thompson

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS subroutine in assembler, used in both batch CICS , making re-entrant

2013-06-27 Thread Shmuel Metz (Seymour J.)
In 51cb818a.2060...@t-online.de, on 06/27/2013
   at 02:04 AM, Bernd Oppolzer bernd.oppol...@t-online.de said:

I believe that in OS/360's time the designers then couldn't do much
better.

Due to management, not to technology.

When I first met the IBM world (in 1982), I was kind of impressed 
by the  simple and clean structure of the OS linkage conventions, 
and by the fact, that every language could call the other.

There has never been a release with ILC among C, COBOL, FORTRAN,
Pascal and PL/I.

0C8 abends in the PSW program mask

Don't confuse a program interrupt with an ABEND. You only get an ABEND
if there is no [E]SPIE for overflow.

-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 Atid/2http://patriot.net/~shmuel
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...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: GIMZIP (was: free zIP/UNZIP in z/OS)

2013-06-27 Thread Shmuel Metz (Seymour J.)
In 01ee01ce72d0$ac412e80$04c38b80$@mindspring.com, on 06/26/2013
   at 05:53 PM, Lizette Koehler stars...@mindspring.com said:

Because many of us asked for IBM to do this.  We found that groups
outside of Sysprogs were using SMPE to verify fixes.  We did not want
them altering the environment. 

Why did you give them write access to the relevant data sets. How does
restricting SMPE prevent them from altering the environment?

-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 Atid/2http://patriot.net/~shmuel
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...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS subroutine in assembler, used in both batch CICS , making r e-entrant

2013-06-27 Thread John McKown
In z/OS, it is also protected (most of the time) by low-address protection.
When bit 35 of CR0 is '1'b, then a CPU instruction cannot modify this area.
Even in key 0. The area, of course, can be updated by various interrupts.
This refers to low core in the real address sense, not in the absolute
address sense. Which makes me wonder about something. I know that each CP
has its own prefix register. This maps the first 8K of the real address
range to some other 8K absolute address. In z/OS, virtual address 0 in an
address space is always mapped to real location 0 (correct?). But, since
each CP has its own real address 0 range of 8K, are the other CP's FLC
mapped into virtual storage on this CP? If so, then I guess it would be
possible for FLC to become corrupted by an errant key 0 routine. Which
would make me hope that the FLC for the other CPs are not mapped into the
virtual address space at all.


On Thu, Jun 27, 2013 at 9:39 AM, Tom Marchant m42tom-ibmm...@yahoo.comwrote:

 On Wed, 26 Jun 2013 22:45:50 -0700, Ed Jaffe wrote:

 AFAIK, there is only one 4K range of virtual addresses guaranteed to
 generate 0C4 now and forever: 7000 - 7FFF.

 I didn't know that.  Is it documented anywhere?

 The 4K range from  - 0FFF is key 0 storage and, as such,
 is protected from stores by unauthorized programs.

 --
 Tom Marchant

 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN




-- 
This is a test of the Emergency Broadcast System. If this had been an
actual emergency, do you really think we'd stick around to tell you?

Maranatha! 
John McKown

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS subroutine in assembler, used in both batch CICS , making r e-entrant

2013-06-27 Thread Pew, Curtis G
On Jun 27, 2013, at 10:10 AM, John McKown john.archie.mck...@gmail.com wrote:

 But, since
 each CP has its own real address 0 range of 8K, are the other CP's FLC
 mapped into virtual storage on this CP?

The answer is yes; each processor is described by a control block called the 
PCCA and field PCCAPSAV in that control block points to the processor's PSA.

 If so, then I guess it would be
 possible for FLC to become corrupted by an errant key 0 routine. Which
 would make me hope that the FLC for the other CPs are not mapped into the
 virtual address space at all.

I don't know if this is an issue or not.

-- 
Curtis Pew (c@its.utexas.edu)
ITS Systems Core
The University of Texas at Austin

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS subroutine in assembler, used in both batch CICS , making r e-entrant

2013-06-27 Thread Paul Gilmartin
On Thu, 27 Jun 2013 09:39:01 -0500, Tom Marchant wrote:

On Wed, 26 Jun 2013 22:45:50 -0700, Ed Jaffe wrote:

AFAIK, there is only one 4K range of virtual addresses guaranteed to
generate 0C4 now and forever: 7000 - 7FFF.

I didn't know that.  Is it documented anywhere?

The 4K range from  - 0FFF is key 0 storage and, as such, 
is protected from stores by unauthorized programs.
 
This thread appears to have drifted from a discussion of 7000
to a discussion of PSA.  But a search of z/OZ publibz for the former
finds a few tantalizing references such as:
...
 152 (98)ADDRESS  4 OUCBWORKQTOKEN
Server Environment
Address Space Queue
Entry pointer or
7000

... but no definitive statement that that page is forever excluded,
nor whether it's a hardware or software feature, and of course no
mention of other operating systems.

Is there any such restricted address in AMODE 24?

And I suspect Shmuel's statement may apply:  You're not
guaranteed an 0C4 if a SPIE is in effect.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS subroutine in assembler, used in both batch CICS , making r e-entrant

2013-06-27 Thread Ed Jaffe

On 6/27/2013 7:39 AM, Tom Marchant wrote:

On Wed, 26 Jun 2013 22:45:50 -0700, Ed Jaffe wrote:


AFAIK, there is only one 4K range of virtual addresses guaranteed to
generate 0C4 now and forever: 7000 - 7FFF.

I didn't know that.  Is it documented anywhere?


Documented? Unlikely. But Jim Mulder stated in an IBM-MAIN post back in 
2007 that it has been that way since MVS/XA and is not going to change. 
If you disassemble or otherwise look at IBM source code in VPL, they use 
this value often.


We load 7000 instead of zero (or negative one) into a unused 
register any time we want to avoid accidental overlay. Our 
infrastructure task launcher/subroutine linkage does this automatically 
for _all_ registers not used as part of the system linkage.


In addition, it launcher loads AR2-AR13 with  and, if the target 
code is 31-bit mode, the high halves of R2-R13 with .


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

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS subroutine in assembler, used in both batch CICS , making r e-entrant

2013-06-27 Thread Ed Jaffe

On 6/27/2013 8:25 AM, Paul Gilmartin wrote:

This thread appears to have drifted from a discussion of 7000
to a discussion of PSA.  But a search of z/OZ publibz for the former
finds a few tantalizing references such as:
 ...
  152 (98)ADDRESS  4 OUCBWORKQTOKEN
 Server Environment
 Address Space Queue
 Entry pointer or
 7000

... but no definitive statement that that page is forever excluded,
nor whether it's a hardware or software feature, and of course no
mention of other operating systems.

Is there any such restricted address in AMODE 24?


This was discussed in 2007 on IBM-MAIN.

MVS has guaranteed the 4K hole at 7000  since MVS/XA and will do 
so in the future. IBM code depends upon it. There is no equivalent for 
24-bit mode.


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

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS subroutine in assembler, used in both batch CICS , making r e-entrant

2013-06-27 Thread Jim Phoenix

On 6/27/2013 8:39 AM, Ed Jaffe wrote:

On 6/27/2013 8:25 AM, Paul Gilmartin wrote:

This thread appears to have drifted from a discussion of 7000
to a discussion of PSA.  But a search of z/OZ publibz for the former
finds a few tantalizing references such as:
 ...
  152 (98)ADDRESS  4 OUCBWORKQTOKEN
 Server Environment
 Address Space Queue
 Entry pointer or
7000

... but no definitive statement that that page is forever excluded,
nor whether it's a hardware or software feature, and of course no
mention of other operating systems.

Is there any such restricted address in AMODE 24?


This was discussed in 2007 on IBM-MAIN.

MVS has guaranteed the 4K hole at 7000  since MVS/XA and will do so in 
the future. IBM code depends upon it. There is no equivalent for 24-bit mode.


If it doesn't also protect against long displacement instructions, then it 
probably should.
--
| Jim Phoenix | Voice:   (310) 338-0400 x316   |
| Senior Software Developer| Fax: (310) 338-0801|
| Phoenix Software International   | |
| 831 Parkview Drive North | jimphoe...@phoenixsoftware.com |
| El Segundo, CA 90245 | http://www.phoenixsoftware.com |

Opinions expressed by this individual are not necessarily those of the Company.



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Reader Comment on SA22-7832-08 (PoPS), should I?

2013-06-27 Thread John McKown
I am wondering if anybody else has the same problem that I have with how
the Principles of Operation, in PDF format, is laid out. Basically, in
today's electronic world, why is this publication still formatted in two
columns? On my normal PC, in portrait mode, I must either view an entire
page at a time (which even on my 27 monitor makes the characters a bit
small), or I must pgdn, then pgup to read the second column. And even when
I view the entire page on a single screen, the jump from the bottom of
column 1 to the top of column 2 is irritating.

Would it be worth while to tell IBM that the document would be much more
readable if it were like the other manuals; having only one column of text,
except perhaps for tables? I wonder if it would be worth my while to try to
OCR the PDF to create something that I could import into a true DTP program
(and I'm not talking MS Word! Perhaps LaTex).

-- 
This is a test of the Emergency Broadcast System. If this had been an
actual emergency, do you really think we'd stick around to tell you?

Maranatha! 
John McKown

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS subroutine in assembler, used in both batch CICS , making r e-entrant

2013-06-27 Thread Ed Jaffe

Why?

On 6/27/2013 8:45 AM, Jim Phoenix wrote:

On 6/27/2013 8:39 AM, Ed Jaffe wrote:

On 6/27/2013 8:25 AM, Paul Gilmartin wrote:

This thread appears to have drifted from a discussion of 7000
to a discussion of PSA.  But a search of z/OZ publibz for the former
finds a few tantalizing references such as:
 ...
  152 (98)ADDRESS  4 OUCBWORKQTOKEN
Server Environment
Address Space Queue
 Entry 
pointer or

7000

... but no definitive statement that that page is forever excluded,
nor whether it's a hardware or software feature, and of course no
mention of other operating systems.

Is there any such restricted address in AMODE 24?


This was discussed in 2007 on IBM-MAIN.

MVS has guaranteed the 4K hole at 7000  since MVS/XA and will 
do so in the future. IBM code depends upon it. There is no equivalent 
for 24-bit mode.


If it doesn't also protect against long displacement instructions, 
then it probably should.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: DFHSM QUESTION - MIGRATE VOLUME PARMS

2013-06-27 Thread Lizette Koehler
A couple of questions

What version of z/OS?
Have you searched the Internet?  I found a couple of relevant hits already

Second, the RC25 says
25
There is a space management request on an SMS-managed volume with DBA or DBU
specified, or a nonzero value of days on MIGRATE (days) or DAYS (days) is
specified on a MIGRATE command.

So you need to check to see if you have DBA or DBU specified
z/OS V1R13.0 DFSMShsm Storage Administration
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/download/DGT2S6A2.pdf?D
T=20120814235256XKS=dgt2bkb2


Lizette


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of esmie moo
Sent: Thursday, June 27, 2013 8:47 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: DFHSM QUESTION - MIGRATE VOLUME PARMS

Good Morning Gentle Readers,
 
I was going through the DFSMShsm Storage Administration Doc to find some
info on migrating Ml0 or Primary volumes.  The examples provided seem quite
straight forward.  I tried the example on the SMS managed primary volumes :
MIGRATE VOLUME(SDF001 MIGRATE(0))  and it worked.  I tried the example HSEND
MIGRATE VOLUME(SDF002) DAYS(0) and that worked too.  What is the difference
between the two i.e. MIGRATE(0) and DAYS(0)?
 
 I tried the command HSEND MIGRATE VOLUME(SSDF03) DAYS(1) (I wanted to
migrate dsns over 1 day old)  I got the error message :
ARC0570I COMMAND MIGRATION FOR SBB203 VOLUME(S) TERMINATED, RC=25 REASON=0
 
According to the doc it suggests to use the CONVERT parm.  Fair enough. 
However the CONVERT would move the dsns from 1 Primary volume to another and
not migrate them to ML1 or ML2 which doesn't help.  When I issued the
command HSEND MIGRATE VOLUME(SDF002) DAYS(0) does it mean that the CONVERT
parm is a default or were the dsns migrated to ML1/ML2.  I cannot check this
because I didn't list the dsns before I issued the command.  
 
Hopefully somebody can answer my questions.
 
Thanks.

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email
to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: GIMZIP (was: free zIP/UNZIP in z/OS)

2013-06-27 Thread John Gilmore
Here I agree strongly with Shmuel.  Make the data read-only or
inaccessible if you must, but leave the tools alone.

John Gilmore, Ashland, MA 01721 - USA

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS subroutine in assembler, used in both batch CICS , making r e-entrant

2013-06-27 Thread Ed Jaffe

On 6/27/2013 9:15 AM, Jim Phoenix wrote:
So that long displacement instructions are guaranteed to get a S0C4 as 
well if the base register is not initialized properly.


It's not z/OS's responsibility to protect us from any possible bug. 
We're lucky we get one 4K hole for use by 31-bit code. We get nothing 
for 24-bit code.


The area between 2G and 4G is guaranteed as a hole (unless you use an 
undocumented parameter to acquire store there). I suggest that 64-bit 
code load 3G into its unused registers to guarantee 0C4 even when long 
displacements are used.


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

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Reader Comment on SA22-7832-08 (PoPS), should I?

2013-06-27 Thread Mike Bell
many of the redbooks now supply epub format -
And yes, I still miss bookmanager.

Mike


On Thu, Jun 27, 2013 at 11:12 AM, Tom Marchant m42tom-ibmm...@yahoo.comwrote:

 On Thu, 27 Jun 2013 10:48:57 -0500, John McKown wrote:

 why is this publication [Principles of Operation] still formatted in two
 columns?

 I find that annoying too.

 --
 Tom Marchant

 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN




-- 
Mike

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS subroutine in assembler, used in both batch CICS , making r e-entrant

2013-06-27 Thread Jim Phoenix

So that long displacement instructions are guaranteed to get a S0C4 as well if 
the base register is not initialized properly.


On 6/27/2013 8:51 AM, Ed Jaffe wrote:

Why?

On 6/27/2013 8:45 AM, Jim Phoenix wrote:

On 6/27/2013 8:39 AM, Ed Jaffe wrote:

On 6/27/2013 8:25 AM, Paul Gilmartin wrote:

This thread appears to have drifted from a discussion of 7000
to a discussion of PSA.  But a search of z/OZ publibz for the former
finds a few tantalizing references such as:
 ...
  152 (98)ADDRESS  4 OUCBWORKQTOKEN
Server Environment
Address Space Queue
Entry pointer or
7000

... but no definitive statement that that page is forever excluded,
nor whether it's a hardware or software feature, and of course no
mention of other operating systems.

Is there any such restricted address in AMODE 24?


This was discussed in 2007 on IBM-MAIN.

MVS has guaranteed the 4K hole at 7000  since MVS/XA and will do so in 
the future. IBM code depends upon it. There is no equivalent for 24-bit mode.


If it doesn't also protect against long displacement instructions, then it 
probably should.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN




--
| Jim Phoenix | Voice:   (310) 338-0400 x316   |
| Senior Software Developer| Fax: (310) 338-0801|
| Phoenix Software International   | |
| 831 Parkview Drive North | jimphoe...@phoenixsoftware.com |
| El Segundo, CA 90245 | http://www.phoenixsoftware.com |

Opinions expressed by this individual are not necessarily those of the Company.



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: DFHSM QUESTION - MIGRATE VOLUME PARMS

2013-06-27 Thread esmie moo
Lizette,
 
We are running z/OS 01.13.00.  Yes I googled the command etc which led me to 
the Storage admin doc.  I do not know how to check if the volume has a DBA or 
DBU specified.  I thought usually that this would apply to non-SMS vols.



From: Lizette Koehler stars...@mindspring.com
To: IBM-MAIN@LISTSERV.UA.EDU 
Sent: Thursday, June 27, 2013 11:57:16 AM
Subject: Re: DFHSM QUESTION - MIGRATE VOLUME PARMS


A couple of questions

What version of z/OS?
Have you searched the Internet?  I found a couple of relevant hits already

Second, the RC25 says
25
There is a space management request on an SMS-managed volume with DBA or DBU
specified, or a nonzero value of days on MIGRATE (days) or DAYS (days) is
specified on a MIGRATE command.

So you need to check to see if you have DBA or DBU specified
z/OS V1R13.0 DFSMShsm Storage Administration
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/download/DGT2S6A2.pdf?D
T=20120814235256XKS=dgt2bkb2


Lizette


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of esmie moo
Sent: Thursday, June 27, 2013 8:47 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: DFHSM QUESTION - MIGRATE VOLUME PARMS

Good Morning Gentle Readers,
 
I was going through the DFSMShsm Storage Administration Doc to find some
info on migrating Ml0 or Primary volumes.  The examples provided seem quite
straight forward.  I tried the example on the SMS managed primary volumes :
MIGRATE VOLUME(SDF001 MIGRATE(0))  and it worked.  I tried the example HSEND
MIGRATE VOLUME(SDF002) DAYS(0) and that worked too.  What is the difference
between the two i.e. MIGRATE(0) and DAYS(0)?
 
 I tried the command HSEND MIGRATE VOLUME(SSDF03) DAYS(1) (I wanted to
migrate dsns over 1 day old)  I got the error message :
ARC0570I COMMAND MIGRATION FOR SBB203 VOLUME(S) TERMINATED, RC=25 REASON=0
 
According to the doc it suggests to use the CONVERT parm.  Fair enough. 
However the CONVERT would move the dsns from 1 Primary volume to another and
not migrate them to ML1 or ML2 which doesn't help.  When I issued the
command HSEND MIGRATE VOLUME(SDF002) DAYS(0) does it mean that the CONVERT
parm is a default or were the dsns migrated to ML1/ML2.  I cannot check this
because I didn't list the dsns before I issued the command.  
 
Hopefully somebody can answer my questions.
 
Thanks.

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email
to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: GIMZIP (was: free zIP/UNZIP in z/OS)

2013-06-27 Thread Paul Gilmartin
On Thu, 27 Jun 2013 12:06:21 -0400, John Gilmore wrote:

Here I agree strongly with Shmuel.  Make the data read-only or
inaccessible if you must, but leave the tools alone.
 
In the intense discussion of this topic here in April 2010, IBM
employes took the position that that is ineffective or not feasible.
Since IBM's policies in such cases prohibit more detailed technical
discussion, we are unable to assess the merits of that assertion.

I continue to suspect that IBM could have provided a more narrowly
targeted remedy, but chose not to do so, perhaps for reasons
they're not allowed to discuss.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Reader Comment on SA22-7832-08 (PoPS), should I?

2013-06-27 Thread Tom Marchant
On Thu, 27 Jun 2013 10:48:57 -0500, John McKown wrote:

why is this publication [Principles of Operation] still formatted in two
columns?

I find that annoying too.

-- 
Tom Marchant

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS subroutine in assembler, used in both batch CICS , making r e-entrant

2013-06-27 Thread Paul Gilmartin
On Thu, 27 Jun 2013 09:25:40 -0700, Ed Jaffe wrote:

The area between 2G and 4G is guaranteed as a hole (unless you use an
undocumented parameter to acquire store there). I suggest that 64-bit
code load 3G into its unused registers to guarantee 0C4 even when long
displacements are used.
 
There might be some argument for initializing obtained storage to
7000 (or perhaps 3G) rather than to 0.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS subroutine in assembler, used in both batch CICS , making re-entrant

2013-06-27 Thread Ward, Mike S
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of John McKown
Sent: Tuesday, June 25, 2013 8:16 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: z/OS subroutine in assembler, used in both batch  CICS , making 
re-entrant

IMO, this is a rather involved problem.

background:
This is in CICS/TS 4.1, z/OS 1.12. We have a few highly used assembler 
subroutines which are statically linked into both CICS and batch COBOL 
programs. These programs are very old (20+ years). They use an in line
save area, and so they are not RENT. We are having a problem with some other 
program (nobody can figure out which one) in which that program sometimes 
overlays  a CICS application program. Some time thereafter, when this overlaid 
program is invoked, it abends (surprise, suprise!). We are running 
RENTPGM=PROTECT. However, none of our programs are linked as RENT and so they 
are not protected. We use CA-Endevor to do all our compiles.
The Endevor person changed the Endevor setup to have the RENT parm in all 
CICS/COBOL links. Unfortunately, this resulted in programs which use this 
assembler subroutine abending ASRA (S0C4-4) when the subroutine tried to modify 
its save area (in the CSECT). I don't know why the binder requires the RENT 
parameter to mark a program object as RENT if all the input CSECTs are COBOL 
which is compiled with the RENT compiler option. Maybe somebody could explain? 
Nobody here really understands CA-Endevor.

Bottom line: I need to change the assembler program to be RENT. And it still 
needs to be callable by both CICS and COBOL programs. And I cannot have a batch 
version vs. a CICS version. So I really do need it to truly be RENT. So I have 
some questions.

This has worked for me in the past:

   DFHAFCD TYPE=LOCATE  ADDRESS AFCB
   LTR   R15,R15 Are we BATCH?
   BZ BATCH00 YES Do Batch
  CLC   0(3,R15),=CL3'AFC'  Is It CICS?
  BE CICS00 Yes, Do CICS
BATCH00 DS0H
  Batch Stuff
CICS00 DS   0H
  CICS Stuff


1) Can I use a BAKR instruction in CICS successfully. This would put the 
caller's registers in the z/OS stack. Since the program runs on the QR TCB and 
does not do any CICS work, there should not be any concern about a CICS task 
switch causing the program stack to be modified.

2) Convert the assembler code to be LE compliant. I think that the LE prologue 
is the same for both CICS and batch. I am familiar with writing LE enabled 
assembler main routines.

3) Convert the assembler to COBOL. This would be a royal PITA to code and I am 
concerned about the CPU impact. This is highly used code. And, apologies to Tom 
Ross, the COBOL code generation seems to be designed to stress test the entire 
instruction set.

4) What about not using a save area at all? It might be poor design, but what 
about using the high full word of each register as a save area for the lower 
full word? I don't think that CICS or COBOL uses the full 64 bit registers. I 
think that the start up code could save each register with a RLLG Rn,Rn,32 to 
rotate bits 32-64 into 0-31 before using bits 32-64 for other purposes. Then 
restore the register(s) with the exact same instruction to rotate the bits in 
0-31 back into bits 32-64. I _assume_ that bits 0-31 at entry are not important 
and need not be saved/restored.

5) What about using the access registers as a save area? I could do a series of 
SAR Rx,Rx at the front of the code and then EAR Rx,Rx instructions at the end. 
I don't think that the Access Registers are used in CICS application code and I 
doubt their values are assumed to be anything specific in CICS management 
routines. I.e. they should be available without saving.

I have more or less ordered these in my most to least desirable order.
Oh, rewriting into C is not an option. We don't have a C compiler. Actually all 
we have is HLASM and COBOL.


--
This is a test of the Emergency Broadcast System. If this had been an actual 
emergency, do you really think we'd stick around to tell you?

Maranatha! 
John McKown

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

==
This email, and any files transmitted with it, is confidential and intended 
solely for the use of the individual or entity to which it is 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 message by mistake 

Re: Reader Comment on SA22-7832-08 (PoPS), should I?

2013-06-27 Thread Tony Harminc
On 27 June 2013 11:48, John McKown john.archie.mck...@gmail.com wrote:

 Would it be worth while to tell IBM that the document would be much more
 readable if it were like the other manuals; having only one column of text,
 except perhaps for tables?

I have had nothing but good results from my RCFs to the PrOps over the
years. Those have all been regarding technical matters rather than
formatting, but by all means do send in your comments. I'm sure they
will be quite receptive.

 I wonder if it would be worth my while to try to
 OCR the PDF to create something that I could import into a true DTP program
 (and I'm not talking MS Word! Perhaps LaTex).

OCRing shouldn't be necessary. The PDF contains the text already (as
evidenced by the correct working of the find function) and should be
editable in any PDF editor. There are no security flags set that would
prevent this, but I don't know what the copyright implications of
doing so might be. This is almost certainly not the right forum to get
into (yet another, usually ill-informed) discussion of the copyright
laws.

Tony H.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS subroutine in assembler, used in both batch CICS , making re-entrant

2013-06-27 Thread John Gilmore
Something akin to Mike Ward's scheme will work well.

My own preference would, however, be for two different entry points.
It is ugly to take a foregone code-path decision at execution time
when it can be taken at bind time.

John Gilmore, Ashland, MA 01721 - USA

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS subroutine in assembler, used in both batch CICS , making re-entrant

2013-06-27 Thread John McKown
Not possible. This was designed 20+ years ago and is in use by about 650
different programs, combined CICS and batch, currently in production.
Trying to get either all of the batch xor all of the CICS programs changed
to use a different name is politically impossible. The original person
should have made separate entry points. But we have some really _bad_
design decisions in a lot of programs, IMO. And we continue in that
tradition until this day.

On Thu, Jun 27, 2013 at 12:16 PM, John Gilmore jwgli...@gmail.com wrote:

 Something akin to Mike Ward's scheme will work well.

 My own preference would, however, be for two different entry points.
 It is ugly to take a foregone code-path decision at execution time
 when it can be taken at bind time.

 John Gilmore, Ashland, MA 01721 - USA

 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN




-- 
This is a test of the Emergency Broadcast System. If this had been an
actual emergency, do you really think we'd stick around to tell you?

Maranatha! 
John McKown

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS subroutine in assembler, used in both batch CICS , making r e-entrant

2013-06-27 Thread Tom Marchant
On Thu, 27 Jun 2013 09:25:40 -0700, Ed Jaffe wrote:

The area between 2G and 4G is guaranteed as a hole (unless you use an
undocumented parameter to acquire store there).

... or if there is Java in the address space.

-- 
Tom Marchant

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Dice article on IBM layoffs

2013-06-27 Thread Dana Mitchell
Another article relating to the decline of IBM:

http://www.cringely.com/2013/06/20/ibm-to-customers-your-hand-is-staining-my-window/

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Dice article on IBM layoffs

2013-06-27 Thread Bob Shannon
Cringley makes some valid points, but many of them are applicable to almost all 
publically-owned companies.  He's also known for not being fond of IBM so take 
all of his comments with a grain of salt.

Bob Shannon
Rocket Software

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS subroutine in assembler, used in both batch CICS , making re-entrant

2013-06-27 Thread Bernd Oppolzer

To be able do to maintenance to such subroutines that are called from many
other places, we usually put them in a module that is called 
dynamically. We do
this using MVS-LOAD and we store the EP address statically in the 
calling modules

CSECT (the LOAD is done, if it's zero, if not, it's already there).

If the calling language doesn't support dynamic calls in an easy way, we 
link a little
ASSEMBLER stub to the calling module (let it be PL/1 or COBOL or any 
other language)

that only does the LOAD and stores the EPA.

This works for us under IMS/DC control, too, and it should work with 
CICS, too. The
only concern is, that the modules needed may have to be preloaded prior 
to the
start of the CICS main task (don't know much about CICS, but with IMS, 
this could be a

problem, because the modules would otherwise disappear).

The modules are never DELETEd
until termination of the main task.

Kind regards

Bernd



Am 27.06.2013 19:31, schrieb John McKown:

Not possible. This was designed 20+ years ago and is in use by about 650
different programs, combined CICS and batch, currently in production.
Trying to get either all of the batch xor all of the CICS programs changed
to use a different name is politically impossible. The original person
should have made separate entry points. But we have some really _bad_
design decisions in a lot of programs, IMO. And we continue in that
tradition until this day.

On Thu, Jun 27, 2013 at 12:16 PM, John Gilmore jwgli...@gmail.com wrote:


Something akin to Mike Ward's scheme will work well.

My own preference would, however, be for two different entry points.
It is ugly to take a foregone code-path decision at execution time
when it can be taken at bind time.

John Gilmore, Ashland, MA 01721 - USA

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN






--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Breaking unit AFF in SMS for Tape

2013-06-27 Thread Greg
How to break unit aff in SMS tape when tape dataset are directed to different 
SMS tape storage group?

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS subroutine in assembler, used in both batch CICS , making re-entrant

2013-06-27 Thread John McKown
Getting too complicate for this particular need. And cannot dynamically
modify the program itself because we want the programs in CICS to be loaded
into read only storage (ERDSA). That's the whole driving force behind
making the HLASM re-entrant. Original problem is memory overlays by errant
CICS user programs. Which, by happy chance, I found yesterday because the
nasty program tried to overlay a CICS control block and abended S0C4-4. So
I could finally give the programmer an exact cause. The cause: storing
beyond the bounds of a GETMAIN'ed area.

On Thu, Jun 27, 2013 at 3:20 PM, Bernd Oppolzer
bernd.oppol...@t-online.dewrote:

 To be able do to maintenance to such subroutines that are called from many
 other places, we usually put them in a module that is called dynamically.
 We do
 this using MVS-LOAD and we store the EP address statically in the calling
 modules
 CSECT (the LOAD is done, if it's zero, if not, it's already there).

 If the calling language doesn't support dynamic calls in an easy way, we
 link a little
 ASSEMBLER stub to the calling module (let it be PL/1 or COBOL or any other
 language)
 that only does the LOAD and stores the EPA.

 This works for us under IMS/DC control, too, and it should work with CICS,
 too. The
 only concern is, that the modules needed may have to be preloaded prior to
 the
 start of the CICS main task (don't know much about CICS, but with IMS,
 this could be a
 problem, because the modules would otherwise disappear).

 The modules are never DELETEd
 until termination of the main task.

 Kind regards

 Bernd



 Am 27.06.2013 19:31, schrieb John McKown:

 Not possible. This was designed 20+ years ago and is in use by about 650
 different programs, combined CICS and batch, currently in production.
 Trying to get either all of the batch xor all of the CICS programs changed
 to use a different name is politically impossible. The original person
 should have made separate entry points. But we have some really _bad_
 design decisions in a lot of programs, IMO. And we continue in that
 tradition until this day.

 On Thu, Jun 27, 2013 at 12:16 PM, John Gilmore jwgli...@gmail.com
 wrote:

  Something akin to Mike Ward's scheme will work well.

 My own preference would, however, be for two different entry points.
 It is ugly to take a foregone code-path decision at execution time
 when it can be taken at bind time.

 John Gilmore, Ashland, MA 01721 - USA

 --**--**
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN




 --**--**--
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN




-- 
This is a test of the Emergency Broadcast System. If this had been an
actual emergency, do you really think we'd stick around to tell you?

Maranatha! 
John McKown

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS subroutine in assembler, used in both batch CICS , making re-entrant

2013-06-27 Thread Bernd Oppolzer

Ok,

the modules being in read-only storage is currently not supported by our 
approach.


Another drawback is, that if there are different callers to the same 
routine, every
caller has to do the LOAD once, until it has it's own copy of the EPA in 
its static CSECT,

which leads to many unnecessary LOADs.

The EPAs were originally (in the 70s) stored for performance reasons. I 
believe that
then, when LOAD was issued, the CDE list was searched sequentially to 
lookup the
loaded modules, and this was very slow, when there are some thousand 
modules in

the CDE chain (which is the case in our IMS dialogs).

I don't know exactly how LOAD works today. So some ten years ago I 
thought about
a solution where I call a service module storing the module names and 
EPA addresses
in a balanced tree structure (like AVL tree), to shorten search times - 
but management
decided that we stay with the current solution, and I got no budget to 
do this. If we had
this, there would be no need to store the EPA address in the caller's 
CSECT. There
even would have been the possibility to store some meta data about the 
called module
in the tree, for example: programming language (which is examined by 
reading the
IDR records today), the AMODE (which was sometimes 24 in prior times), 
or the department
which is responsible for this module (which has to get the alarm mail, 
in the case

that the module abends).

Another topic:

I don't know if it is possible to put all modules into read-only 
storage, because some of
the application modules anyway store statical information (although they 
are supposed
to be RENT). At our site it's kind of common that some math modules 
store the
entry parms and the results from the last call statically, so that in 
case they are called
again with the same parms, they don't have to do the calculation over 
and over again.


I don't know, if they all do proper ENQ/DEQs around the critical path ...

well, that's all for performance reasons ...

Kind regards

Bernd


Am 27.06.2013 22:35, schrieb John McKown:

Getting too complicate for this particular need. And cannot dynamically
modify the program itself because we want the programs in CICS to be loaded
into read only storage (ERDSA). That's the whole driving force behind
making the HLASM re-entrant. Original problem is memory overlays by errant
CICS user programs. Which, by happy chance, I found yesterday because the
nasty program tried to overlay a CICS control block and abended S0C4-4. So
I could finally give the programmer an exact cause. The cause: storing
beyond the bounds of a GETMAIN'ed area.

On Thu, Jun 27, 2013 at 3:20 PM, Bernd Oppolzer
bernd.oppol...@t-online.dewrote:


To be able do to maintenance to such subroutines that are called from many
other places, we usually put them in a module that is called dynamically.
We do
this using MVS-LOAD and we store the EP address statically in the calling
modules
CSECT (the LOAD is done, if it's zero, if not, it's already there).

If the calling language doesn't support dynamic calls in an easy way, we
link a little
ASSEMBLER stub to the calling module (let it be PL/1 or COBOL or any other
language)
that only does the LOAD and stores the EPA.

This works for us under IMS/DC control, too, and it should work with CICS,
too. The
only concern is, that the modules needed may have to be preloaded prior to
the
start of the CICS main task (don't know much about CICS, but with IMS,
this could be a
problem, because the modules would otherwise disappear).

The modules are never DELETEd
until termination of the main task.

Kind regards

Bernd









--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Reader Comment on SA22-7832-08 (PoPS), should I?

2013-06-27 Thread Skip Robinson
During the Test under Mask thread I was moved to consult this bible for 
the first time in ages. Dual column format is a major PITA. Took me twice 
as long to chase the bouncing ball. Totally unwarranted in the age of 
online browsing. 

.
.
JO.Skip Robinson
Southern California Edison Company
Electric Dragon Team Paddler 
SHARE MVS Program Co-Manager
626-302-7535 Office
323-715-0595 Mobile
jo.skip.robin...@sce.com



From:   Tony Harminc t...@harminc.net
To: IBM-MAIN@LISTSERV.UA.EDU, 
Date:   06/27/2013 09:53 AM
Subject:Re: Reader Comment on SA22-7832-08 (PoPS), should I?
Sent by:IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU



On 27 June 2013 11:48, John McKown john.archie.mck...@gmail.com wrote:

 Would it be worth while to tell IBM that the document would be much more
 readable if it were like the other manuals; having only one column of 
text,
 except perhaps for tables?

I have had nothing but good results from my RCFs to the PrOps over the
years. Those have all been regarding technical matters rather than
formatting, but by all means do send in your comments. I'm sure they
will be quite receptive.

 I wonder if it would be worth my while to try to
 OCR the PDF to create something that I could import into a true DTP 
program
 (and I'm not talking MS Word! Perhaps LaTex).

OCRing shouldn't be necessary. The PDF contains the text already (as
evidenced by the correct working of the find function) and should be
editable in any PDF editor. There are no security flags set that would
prevent this, but I don't know what the copyright implications of
doing so might be. This is almost certainly not the right forum to get
into (yet another, usually ill-informed) discussion of the copyright
laws.

Tony H.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: GIMZIP (was: free zIP/UNZIP in z/OS)

2013-06-27 Thread Skip Robinson
I think Gil is on to something here. At SHARE conferences following 
announcement of the change, I got the impression that rank and file 
thought it was major overkill--even killing by friendly fire--to control 
product usage in this way. But the shotgun solution was mandated from on 
high to appease a minuscule subset of customers upset by some local 
shoot-your-foot catastrophe. It's not hard to manage. Create a RACF Group 
that has appropriate access to SMP/E, then connect each legitimate user to 
that group. Until someone moves in or out of the role, you're done. 

.
.
JO.Skip Robinson
Southern California Edison Company
Electric Dragon Team Paddler 
SHARE MVS Program Co-Manager
626-302-7535 Office
323-715-0595 Mobile
jo.skip.robin...@sce.com



From:   Paul Gilmartin paulgboul...@aim.com
To: IBM-MAIN@LISTSERV.UA.EDU, 
Date:   06/27/2013 09:41 AM
Subject:Re: GIMZIP (was: free zIP/UNZIP in z/OS)
Sent by:IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU



On Thu, 27 Jun 2013 12:06:21 -0400, John Gilmore wrote:

Here I agree strongly with Shmuel.  Make the data read-only or
inaccessible if you must, but leave the tools alone.
 
In the intense discussion of this topic here in April 2010, IBM
employes took the position that that is ineffective or not feasible.
Since IBM's policies in such cases prohibit more detailed technical
discussion, we are unable to assess the merits of that assertion.

I continue to suspect that IBM could have provided a more narrowly
targeted remedy, but chose not to do so, perhaps for reasons
they're not allowed to discuss.

-- gil


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Reader Comment on SA22-7832-08 (PoPS), should I?

2013-06-27 Thread John McKown
Well, I've send an email off to IBM. We shall see. I've found that
pdftotext on my Linux system will extract the text. I'll may see if I can
use this to make a LaTex document which I will then reformat into an epub
for personal use only. Wish I could then share that, but I regard that as a
violation of Copyright and don't want the IBM lawyers after me grin/.

On Thu, Jun 27, 2013 at 3:57 PM, Skip Robinson jo.skip.robin...@sce.comwrote:

 During the Test under Mask thread I was moved to consult this bible for
 the first time in ages. Dual column format is a major PITA. Took me twice
 as long to chase the bouncing ball. Totally unwarranted in the age of
 online browsing.

 .
 .
 JO.Skip Robinson
 Southern California Edison Company
 Electric Dragon Team Paddler
 SHARE MVS Program Co-Manager
 626-302-7535 Office
 323-715-0595 Mobile
 jo.skip.robin...@sce.com



 From:   Tony Harminc t...@harminc.net
 To: IBM-MAIN@LISTSERV.UA.EDU,
 Date:   06/27/2013 09:53 AM
 Subject:Re: Reader Comment on SA22-7832-08 (PoPS), should I?
 Sent by:IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU



 On 27 June 2013 11:48, John McKown john.archie.mck...@gmail.com wrote:

  Would it be worth while to tell IBM that the document would be much more
  readable if it were like the other manuals; having only one column of
 text,
  except perhaps for tables?

 I have had nothing but good results from my RCFs to the PrOps over the
 years. Those have all been regarding technical matters rather than
 formatting, but by all means do send in your comments. I'm sure they
 will be quite receptive.

  I wonder if it would be worth my while to try to
  OCR the PDF to create something that I could import into a true DTP
 program
  (and I'm not talking MS Word! Perhaps LaTex).

 OCRing shouldn't be necessary. The PDF contains the text already (as
 evidenced by the correct working of the find function) and should be
 editable in any PDF editor. There are no security flags set that would
 prevent this, but I don't know what the copyright implications of
 doing so might be. This is almost certainly not the right forum to get
 into (yet another, usually ill-informed) discussion of the copyright
 laws.

 Tony H.

 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN




-- 
This is a test of the Emergency Broadcast System. If this had been an
actual emergency, do you really think we'd stick around to tell you?

Maranatha! 
John McKown

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS subroutine in assembler, used in both batch CICS , making re-entrant

2013-06-27 Thread Frank Swarbrick
Really?  Is it not better (for ease of use rather than absolute performance) 
for the single called routine to be required to make the environmental 
distinction than to have dozens or hundreds of calling programs call the 
specific entry point for the environment in which it is working?  Are there 
different entry points for the LE Get (Heap) Storage routine, dependent on the 
environment?  No, there is only one (CEEGTST).  I would imagine that the 
routine interrogates its environment to determine if, for example, it needs to 
use CICS services to acquire the storage, or if it can use MVS services (or 
something else, perhaps, in other environments).






 From: John Gilmore jwgli...@gmail.com
To: IBM-MAIN@LISTSERV.UA.EDU 
Sent: Thursday, June 27, 2013 11:16 AM
Subject: Re: z/OS subroutine in assembler, used in both batch  CICS , making 
re-entrant
 

Something akin to Mike Ward's scheme will work well.

My own preference would, however, be for two different entry points.
It is ugly to take a foregone code-path decision at execution time
when it can be taken at bind time.

John Gilmore, Ashland, MA 01721 - USA

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN




--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: z/OS subroutine in assembler, used in both batch CICS , making re-entrant

2013-06-27 Thread John Gilmore
Finally this is an issue of taste, and tastes differ.

Both absolute performance and ease of maintenance dictate, I think ,
different, separately assembled and bound routines for different
environments.

It is of course possible, and often desirable, to write a single
framing macro that can be used to generate any of a family of routines
parametrically, tailoring it to its target environment in doing so.

This is another way of saying that execution-time dithering about
foregone conclusions is undesirable, not least because it is ugly.



-- 
John Gilmore, Ashland, MA 01721 - USA

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: GIMZIP (was: free zIP/UNZIP in z/OS)

2013-06-27 Thread Paul Gilmartin
On Thu, 27 Jun 2013 14:03:14 -0700, Skip Robinson wrote:

I think Gil is on to something here. At SHARE conferences following
announcement of the change, I got the impression that rank and file
thought it was major overkill--even killing by friendly fire--to control
product usage in this way. But the shotgun solution was mandated from on
high to appease a minuscule subset of customers upset by some local
shoot-your-foot catastrophe. It's not hard to manage. Create a RACF Group
that has appropriate access to SMP/E, then connect each legitimate user to
that group. Until someone moves in or out of the role, you're done.
 
Appeasing a minuscule subset of customers does not rise to the level
of a System Integrity APAR (cf. Boy Who Cried Wolf) unless that
minuscule subset controls a disproportionate subset of revenues.

I suspect there's something more afoot.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


AUTO: Kevin Minerley/Poughkeepsie/IBM is not available (returning 07/08/2013)

2013-06-27 Thread Kevin Minerley
I am out of the office until 07/08/2013.

Vacation.  If an emergency, call 845-901-2328.


Note: This is an automated response to your message  Re: Reader Comment on
SA22-7832-08 (PoPS), should I? sent on 06/27/2013 17:15:50.

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...@listserv.ua.edu with the message: INFO IBM-MAIN


SDSF display omits stepname.

2013-06-27 Thread Paul Gilmartin
z/OS 1.13.  SDSF shows me:

SDSF JOB DATA SET DISPLAY - JOB GIMZIP   (JOB06889)LINE 1-13 (13)
 PREFIX=*  DEST=(ALL)  OWNER=user  SORT=StepName/A  SYSNAME=
 NP   DDNAME   StepName ProcStep DSID OwnerC Dest   Rec-Cnt
  JESJCLIN  1 user A 33
  $JOURNAL  6 user A104
  UNUSED  101 user A  1
  SYSIN   104 user A 12
  JESMSGLG JES2 2 user R LOCAL   21
  JESJCL   JES2 3 user R LOCAL   37
  JESYSMSG JES2 4 user R LOCAL   55
  $INTTEXT JES2 5 user A 21
  SYSINSTEP0CALLED102 user A  0
  SYSUT1   STEP0CALLED103 user A  1
  SYSPRINT STEP0CALLED109 user R LOCAL4
  SYSUT2   STEP0CALLED110 user R LOCAL1
  SMPOUT   STEP1  111 user R LOCAL6

Why, for example, does it not show STEP1 as the StepName for DSID 104,
which is the SYSIN for //STEP1 EXEC PGM=GIMZIP?  The step name is likewise
blank when I use retrieve the job using the Rexx API.  I suppose I should be
grateful for consistency.

JCL as submitted; some qualifiers obfuscated:

//
//GIMZIPJOB  505303JOB,'Paul Gilmartin',
// MSGLEVEL=(1,1),REGION=0M
//*
//USERCOUTPUT JESDS=ALL,DEFAULT=YES,
//  CLASS=R,PAGEDEF=V0648Z,CHARS=GT12
//*
//*.+|+|+|+|+|+|+|+|
//P  PROC
//CALLED EXEC PGM=IEBGENER
//UNUSED  DD  *
  nevermore
//SYSPRINTDD  SYSOUT=(,)
//SYSIN   DD  *
//SYSUT2  DD  SYSOUT=(,)
//SYSUT1  DD  *
  whatever
//   PEND
//*
//STEP0  EXEC P
//*
//STEP1  EXEC PGM=GIMZIP
//SMPDIR DD PATH='/tmp/user/smpdir'
//SMPWKDIR   DD PATH='/tmp/user/smpwkdir'
//SMPCPATH   DD PATH='/usr/lpp/smp/classes/.'
//SMPJHOME   DD PATH='/usr/lpp/java/J6.0.1'
//SMPOUT DD SYSOUT=(,)   |
//SYSPRINT   DD SYSOUT=(,)   |
//SYSUT2 DD UNIT=SYSALLDA,SPACE=(4096,(1000,1000))   |
//SYSUT3 DD UNIT=SYSALLDA,SPACE=(1000,(1000,100))|
//SYSUT4 DD UNIT=SYSALLDA,SPACE=(1000,(1000,100))|
//SYSIN  DD *|
GIMZIP description=This is a sample software package.
   !-- This sample package contains the files shown below. --
  FILEDEF name=/u/user/charsets
   description=This is a sample UNIX directory.
  /FILEDEF
  FILEDEF name=hlq2.ITD.GLOBAL.CSI
   description=This is a sample VSAM cluster.
  /FILEDEF
  FILEDEF name=hlq1.user.HPDM.LINKLIB
   description=This is a sample program object library.
  /FILEDEF
  /GIMZIP
//
//*.+|+|+|+|+|+|+|+|
//
 :w ! submit $MVS_HOST

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Reader Comment on SA22-7832-08 (PoPS), should I?

2013-06-27 Thread Don Williams
IBM still has a lot of manuals in two column format. I've put up with that 
format for years.  I would be much happier with one column.

Don

 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
 On Behalf Of Tom Marchant
 Sent: Thursday, June 27, 2013 12:13 PM
 To: IBM-MAIN@LISTSERV.UA.EDU
 Subject: Re: Reader Comment on SA22-7832-08 (PoPS), should I?
 
 On Thu, 27 Jun 2013 10:48:57 -0500, John McKown wrote:
 
 why is this publication [Principles of Operation] still formatted in two
 columns?
 
 I find that annoying too.
 
 --
 Tom Marchant
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN