Re: 3490 Elimination

[Vernooy, C.P. - SPLXM]

"Mike Liberatore" <[EMAIL PROTECTED]> wrote in message news:<[EMAIL 
PROTECTED]>...
> looking for task or guidelines to eliminate 3490 and implement 9840s working 
> a projec to do this and was hoping someone alreay went through this process. 
> Help!
> 

My comments are about the same as David's, we let individual jobs write to 3490 
and do tape-disk conversion for most of our previous tapedata and archive them 
to 9840 with CA-DISK.

One step that you could consider, if you really want/need to remove 3490 is the 
next, bigger, one: convert to a VSM/VTS. This emulates 3490's (or whatever you 
want) for your jobs and write physically to large capacity tapes, like 9840's. 
It solves a number of problems for you, like controlling access to your 
physical units, you can provide as much as you need to your customers; organize 
and control tape-disk conversion, there is no problem writing to tape, since 
you have (virtually) enough of them; etc. etc.

I am sure VTS/VSM vendors will be interested in working out such a conversion 
project.

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

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

Re: Short term paging spike

[Vernooy, C.P. - SPLXM]

I was thinking about a similar cause.

We see such spikes caused by the WMQI Broker (or what is called these days). At 
startup, it allocates a huge amount of storage (0.6 GB) per address space (4 or 
5), which is paged out for 90% after some time. A Stop/Start of the application 
frees the paged out storage, so does not provide much relief for Central 
Storage during Stop, but subsequent Start allocates again 4 or 5 times 0.6 GB. 
The system needs some time (and paging) to establish a new stable situtation.

Kees.


"Shane Ginnane" <[EMAIL PROTECTED]> wrote in message news:<[EMAIL PROTECTED]>...
> Last time I noticed something like this, we put it down to "early
> starters".
> Online regions not getting used overnight, wound up getting (heavily)
> trimmed. First arrival in the morning whacks the "Enter" key and (probably)
> strolls off to get a coffee.
> Different office, similar scenario, but hitting a different region. Mad
> scramble for swap-in of large working sets.
> Once they are in and active, no paging.
> 
> This was a while ago in a different age, prior to WLM and big real storage,
> but I suspect the same situation could be a possibility.
> 
> Shane ...
> 
> > I am seeing short term paging spikes (zOS 1.4 system) at around 6am.  No
> > dumps happening, just a rapid drop in AFQ and then a spike of 500 pages /
> > sec... for a about 1 min.
> > Can anyone recommend how to find out who the causer is?  Do SMF records
> > capture this? The stuff I see doesn't have the granularity to find the
> > culprit(s).
> 


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

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

Cancel a VTAM post

[thomas zupar]

All,

I have a application program having a APPCCMD command coded with 
OPTCD=ASYN.
When the execution of the command  is over I do not want VTAM  to post
the ECB.
Is their any command through which I can inform VTAM to cancel the post.

Thanks,
Thomas Zupar


__
Do You Yahoo!?
Tired of spam?  Yahoo! Mail has the best spam protection around 
http://mail.yahoo.com 

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

Re: Cancel a VTAM post

[ibm-main]

From: "thomas zupar"

> Is their any command through which I can inform VTAM to cancel the post.

I always found "Z NET,CANCEL" resolved any and all problems I ever had with
VTAM.
My COMMS folks never looked on such shenanigans kindly - despite it always
having the desired effect  (for me) ...

This advice is offered freely - as Phil might say, it probably ain't worth
as much as that .

Shane ...

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

Re: Calling BPX1SPN services

[Big Iron]

I think that you need to specify each parameter as a separate argument.
In your example, [EMAIL PROTECTED] would be one argument and ls would be
another. One other point: I am not sure about this but I seem to recall
that Unix System Services shell commands expect the first parameter to
be the program invoked (ssh in your example).

You may also wish to inquire or search at MVS-OE
 (see http://www.marist.edu/htbin/wlvindex?mvs-oe)
which is more focused on Unix System Services.

Bill

On Tue, 20 Sep 2005 10:47:57 -0500, Josan Cardenosa
<[EMAIL PROTECTED]> wrote:

>Hi all,
>
>We are using a Z/OS callable services (BPX1SPN) to create a child process
>to run a specified executable file (ssh to be exact) from PL/I program.
>According to the manual  z/OS V1R4.0 UNIX System Services Programming:
>Assembler Callable Service Reference the arguments must be coded :
>
>a) Argument_count must be integer-fullword (DCL ARGUMENT_COUNT  BIN FIXED
>(31); if coded in PL/I).
>
>Argument_count
>Supplied parameter
>
>Type:   Integer
>
>Length: Fullword
>
>The name of a fullword that contains the number of pointers in the
>lists for the Argument_length_list and the Argument_list. If the
>program needs no arguments, specify 0.
>
>b) Argument_length_list must be a structure of pointers that gives the
>address of fullwords that gives the length of the arguments that is to be
>passed to BPX1SPN  (DCL ARGUMENT_LENGTH_LIST(10)   POINTER;  if coded in
>PL/I).
>
>Argument_length_list
>Supplied parameter
>
>Type:   Structure
>
>Length: Variable
>
>The name of a list of pointers. Each pointer in the list is the
>address of a fullword that gives the length of an argument that is to
>be passed to the specified program. If the program needs no arguments,
>specify 0.
>
>c) Argument_list must be a structure of pointers that gives the address of
>fullwords that gives the character string that is to be passed to BPX1SPN
>(DCL ARGUMENT_LIST(10)   POINTER;  if coded in PL/I).
>
>
>Argument_list
> Supplied
>parameter
>
>
> Type:
>Structure
>
>
> Length: Variable specified by
>Argument_length_list
>
>
> The name of a list of pointers. Each pointer in the list is
>the
> address of a character string that is an argument to be passed to
>the
> specified program.  Each argument is of the length that is
>specified
> by the corresponding element in the Argument_length_list. If
>the
> program needs no arguments, specify
>0.
>
>
>
>
>
>
>
>In our case, we are informing these variables like the exemple :
>
>DCL ARGUMENT_COUNT   BIN FIXED(31);
>DCL ARGUMENT_LENGTH_LIST(1)  POINTER;
>DCL ARGUMENT_LENGTH(1 )  BIN FIXED(31);
>DCL ARGUMENT_LIST(1) CHAR(255);
>DCL ARGUMENT_LISTP(1)POINTER;
>
>PATHNAME_LENGTH  = 8;
>PATHNAME  = '/bin/ssh';
>
>ARGUMENT_COUNT   = 1;
>
>ARGUMENT_LENGTH(01)  = 19;
>ARGUMENT_LENGTH_LIST(01) = ADDR(ARGUMENT_LENGTH(01));
>ARGUMENT_LIST(01)   = '[EMAIL PROTECTED] ls';
>ARGUMENT_LISTP(01)   = ADDR(ARGUMENT_LIST(01));
>
>CALL BPX1SPN ( PATHNAME_LENGTH,
>  PATHNAME,
>ARGUMENT_COUNT,
> ARGUMENT_LENGTH_LIST,
>ARGUMENT_LISTP,
> ENVIRONMENT_COUNT,
>ENVIRONMENT_DATA_LENGTHP,
> ENVIRONMENT_DATA_LISTP,
>  FILEDESC_COUNT,
> FILEDESC_LIST,
>  INHERIT_AREA_LEN,
> INHERIT_AREA,
> RETURN_VALUE,
>  RETURN_CODE,
>REASON_CODE);
>
>Although the return_code returns a valid PID, the arguments aren't
>recognized by the command and the result isn't valid (we look at the
>stdout fd).
>
> BROWSE -- /SYSTEM/tmp/lcp.fd2 -- Line  Col
>001 080
> Command ===>  Scroll ===>
>CSR
>* Top of Data
>**
>Usage: [EMAIL PROTECTED] ls Ýoptions~ host
>Ýcommand~
>Options:
>
>  -l user Log in using this user
>name.
>  -n  Redirect input
>from /dev/null.
>  -F config   Config file (default:
>¨/.ssh/config).
>  -A  Enable authentication agent
>forwarding.
>  -a  Disable authentication agent forwarding
>(default).
>  -X  Enable X11 connection
>forwarding.
>  -x  Disable X11 connection forwarding
>(default).
>  -i file Identity for public key authentication (default:
>¨/.ssh/identity)
>
>Does anybody know where is the problem?
>
>Thanks.
>Josan Cardenosa
>z/OS System Engineer
>"la Caixa"
>Barcelona - Spain
>

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

Re: z/Architecture Principles of Operation (SA22-7832-04)

[Tom Harper]

Thomas,
 
No problems whatsoever...
 
Tom Harper



From: IBM Mainframe Discussion List on behalf of Thomas Berg
Sent: Tue 9/20/2005 10:57 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: z/Architecture Principles of Operation (SA22-7832-04)



Thanks, was it any problems regarding certain instructions/operations
and if so, had you some interestion solutions for them ?

TIA
Thomas Berg

==  Tom Harper  ==  wrote2005-09-21 05:41:
> Thomas,
> 
> We have used the long-displacement instructions to allow for the generation 
> of additional "compiled" code over the short-displacement instructions, if 
> the machine environment supports them, removing the old size limitations of 
> +/- 64K. It was really not all that difficult to implement (baseless code 
> generation). We have actually converted most of our critical-path instruction 
> sequences to baseless code, believing future machines will execute these 
> instructions faster, due to fewer base-register interlocks. This was fairly 
> straight-foward using the structured programming facilities of HLASM.
> 
> Tom Harper
>



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

IPCS WHERE and OUTTRAP

[Kenneth J. Kripke]

Question:  Trapping/capturing output from an IPCS WHERE command.

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

IPCS WHERE and OUTTRAP

[Kenneth J. Kripke]

The Question:  Is there a clean way to capture the results from an IP WHERE 
command.

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

Re: Article in Information week: Mainframe Programmers Wanted

[Shmuel Metz (Seymour J.)]

In <[EMAIL PROTECTED]>, on 09/20/2005
   at 07:24 AM, Paul Hanrahan <[EMAIL PROTECTED]> said:

>Just go to the tool bar of the browser and click view and source then
>you can be responsible for some code.

Every time someone says "I don't believe in theories", another theory
dies. The theory that the code runs on the browser is DOA.

Yes, there is a lot of JavaScript and other client-side code running
around, but there is also a huge amount of server-side code.

>Ain't it great !

It would be if it were. It doesn't help much in a shop with code
running on the server, much less a shop were users are required to
disable client-side scripting.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see  
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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

Re: HASP/ASP JES/JES2/JES3

[Shmuel Metz (Seymour J.)]

In <[EMAIL PROTECTED]>, on 09/20/2005
   at 06:43 AM, Allan Scherr <[EMAIL PROTECTED]> said:

>The way Spooling was done on the pre-S/360 systems, to my  
>recollection, was with a second computer.

No; that's not SPOOL. There was standard SPOOL software for the 1410,
704x, 707x, 7080 and 709x. There was also SPOOL software for the 7030,
but I don't know that any of its software could be considered
standard.

>The 1410 did I/O for the 7010, for instance.

Not in any shop that I saw.

>The first general multiprogramming capabilities that I recall were in 
>some of the IBM special purpose systems in the early 60's like the 
>SABRE airline reservations system or the so called "defense 
>calculator" project that kept track of radar threats. 

Other companies were ahead of IBM, e.g., Burroughs, GE, Ferranti,
Honeywell, RCA.

>The operating systems I used in the 50's (SOS, FMS,  
>IBYSYS) had no multiprogramming. 

But IBM had nultiprogramming on the 7030.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see  
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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

Re: HASP/ASP JES/JES2/JES3

[Shmuel Metz (Seymour J.)]

In <[EMAIL PROTECTED]>, on 09/20/2005
   at 08:39 AM, Mark Zelden <[EMAIL PROTECTED]> said:

>So when (any why) did IBM change the meaning?

I don't know that they ever did. Every manual I had used only the
terms Houston Automatic Spooling Priority, HASP and HASP-II.

Unfortunately, the oldest HASP manual that I still have is for HASP II
V3, but it was definitely Priority for every version that I saw.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see  
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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

Re: HASP/ASP JES/JES2/JES3

[Shmuel Metz (Seymour J.)]

In
<[EMAIL PROTECTED]>,
on 09/20/2005
   at 09:29 AM, Doc Farmer <[EMAIL PROTECTED]> said:

>SPOOL
>s(imultaneous) p(eripheral) o(perations) o(n) l(ine).

I don't believe that anybody disputes that. The reel (sic)  issue
is whether back in the 1950s they had first decided to use the word
and only then came up with an acronym to justify it.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see  
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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

Re: HASP/ASP JES/JES2/JES3

[Shmuel Metz (Seymour J.)]

In <[EMAIL PROTECTED]>, on 09/20/2005
   at 11:38 AM, Bill Fairchild <[EMAIL PROTECTED]> said:

>Where is Tom Simpson now that we need him to resolve this issue? 
>Only  he  would know for sure.  Or maybe a printed copy of the 1,000+
>pages HASP  3.1 doc. 

There is none; HASP II was the last HASP. The HASP II V3 documentation
is in excess of 1100 pages, but I don't believe that any one[1] of the
HASP II V4 manuals is that large.

> I have still not figured out exactly where to go in all cases 
>where we must  determine the original "name" of something.

Original announcement letters and manuals, unless you are including
code names, e.g., AOS, Merlin, Zeus.

[1] I make no claim about the aggregate size ;-)
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see  
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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

Re: Order of allocations within a job step

[Shmuel Metz (Seymour J.)]

In <[EMAIL PROTECTED]>, on 09/20/2005
   at 01:19 PM, Barry Merrill <[EMAIL PROTECTED]> said:

>ALOCTIME to LOADTIME  - When Catalog Search (no VOLSER in your JCL)
>and/or Volume Search (for the DSNAME),

The search for the DSCB does not occur at that timel it occurs during
OPEN.

>The other class of JCL errors, that occur prior to the job
>inititation, are found in the Reader/Interpreter or (more common) in
>the JES Converter where JCL syntax errors are found.

Note that in a JES3 system the Interpreter is called earlier, so
out-of-bounds parameters will produce JCL errors earlier.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see  
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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

Re: Setting Completion Code in Batch?

[Shmuel Metz (Seymour J.)]

In <[EMAIL PROTECTED]>, on 09/19/2005
   at 10:52 PM, Paul Gilmartin <[EMAIL PROTECTED]> said:

>What's a good and very reliable way to write a step which sets its
>return code to a particular non-zero value?

 SET666   CSECT ,
  LAR15,666
  BRR14
  END
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see  
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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

Re: IPCS WHERE and OUTTRAP

[Don Poitras]

In article <[EMAIL PROTECTED]> you wrote:
> The Question:  Is there a clean way to capture the results from an IP WHERE 
> command.

Just add 'print' to the command to have it go to the file allocated to
IPCSPRNT. If you don't want to see the output on your terminal, add 'noterm'.

ip w x print noterm

-- 
Don Poitras - SAS Development  -  SAS Institute Inc. - SAS Campus Drive
[EMAIL PROTECTED]   (919) 531-5637Cary, NC 27513

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

Re: Article in Information week: Mainframe Programmers Wanted

[Huckert, James]

I have to agree with bill on some points but there are exceptions. I am 28
and I have been a mainframe operator for about 5 years now and I am looking
to get into system programming. I was raised  with a strong work ethic and I
do all I can to make sure my work is done and done right the first time. I
have worked long hours OFF the clock with my previous sys prog to try and
learn as much as I can. Unfortunately, just like other data centers I have
worked at, this company moved off the mainframe. I was once involved in a
conversion of a client from VSE to MVS and I worked several 20 and 30 hour
days to help the conversion. I know what it is like to not leave until the
system is up and running and not when you want too. I enjoyed every single
minute of it, well most of them at least :)

Umm if I have not made everyone to terribly mad does anyone have any advice
on what I can do to help get into mainframe system programming? College
seems to have some good basic computing classes but nothing for mainframe.
Heck I can find AS400 stuff all day even at junior colleges but nothing for
mainframes; at least here in Texas.

Today's mainframes can do so much more than just batch processing but it
seems people are biased towards mainframes. Companies could eliminate so
many pc servers and consolidate them on the mainframe but everyone I talked
to about it just looked at me like I was stupid or that it was a ridiculous
idea or both. I can understand not having everything on your mainframe
because if it crashes, well then a lot of stuff would be down. I worked at
one shop that had a MP3000, that thing crashed about every six to eight
months and IBM never could figure out why. IBM kept replacing parts that
they thought might have caused the crash but never really could tell us for
sure. My hunch was because the programming manager ipl'ed it by flipping the
power switch off. That was before we got down there to set him straight. IBM
did tells us that there was 5 or 6 other companies that had the same
problem. 
Well sorry everyone for the long posting. Just had a few things had to get
off my chest. 
Thanks 
James H.




There are societal factors that could account for this difference in work  
ethics or attitudes other than just having to work with expensive computing

resources.  In the 1960s and 1970s most young adult professionals still had
a 
serious work ethic, and took their work seriously whether it involved
computers 
or not.  Today young adult American professionals have zero or  negative
work 
ethic.  All sweeping generalities, to be sure.  There  are plenty of 
exceptions.  But my wife, who manages 60 to 70 hospital  emergency room
nurses, tells 
me this constantly.  Her young nurses would  rather go sailing than show up 
for scheduled work.  If the state allows 13  consecutive weeks for
compensated 
medical leave, some nurses take off all 13  weeks even if they only have a 
minor ailment.  Intense on-the-job  stress in nursing is to blame for much
of this 
low work ethic, but not  all.  Society (media, TV, advertising, home 
training, peer pressure, the  whole 19 yards) is producing an entire
generation of 
badly spoiled, impatient  brats who demand instant gratification and
high-paying 
entry-level jobs with  zero accountability and management that makes them
feel 
good no matter what they  do (outcome-oriented instead of results-oriented 
education has spawned  this).  Just my humble opinion.  And yes, there are 
exceptions.   Like, just, you know, try, you know, to ... uh... listen, you
know, 
to, you know, some of them, like, you know, speak, you know,  intelligently.
 
Bill Fairchild

**Confidentiality Notice**
This electronic transmission and any attached documents or other
writings are confidential and are for the sole use of the intended
recipient(s) identified above. This message may contain information
that is privileged, confidential or otherwise protected from disclosure
under applicable law. If the receiver of this information is not the
intended recipient, or the employee, or agent responsible for delivering
the information to the intended recipient, you are hereby notified that
any use, reading, dissemination, distribution, copying or storage of this
information is strictly prohibited. If you have received this information in
error, please notify the sender by return email and delete the electronic
transmission, including all attachments from your system.

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

IPCS WHERE and OUTTRAP

[Kenneth J. Kripke]

Apologies on the previous two incomplete posts.
Question: Is there a way to capture the results of an IP WHERE from a REXX EXEC
running under IPCS and store it in a REXX variable?
I don't think the command uses PUTLINE to put the message out, but, I could be
wrong.
The Goal: Go through a SYSTRACE and parse out the trace entries of interest,
then do IP WHERES on the PSW addresses to get the displacements in the
modules.  Generate side by side listing of trace entry, psw address, r15, r0, 
r1 and
the module name and displacement.

Sincerely;

Kenneth J. Kripke
[EMAIL PROTECTED]

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

Re: IPCS WHERE and OUTTRAP

[Binyamin Dissen]

On Wed, 21 Sep 2005 04:15:07 -0700 "Kenneth J. Kripke"
<[EMAIL PROTECTED]> wrote:

:>The Question:  Is there a clean way to capture the results from an IP WHERE 
command.

Look at the EVAL* subcommands.

--
Binyamin Dissen <[EMAIL PROTECTED]>
http://www.dissensoftware.com

Director, Dissen Software, Bar & Grill - Israel


Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.

I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.

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

Re: IPCS WHERE and OUTTRAP

[Robert Wright]

Kenneth J. Kripke wrote on 09/21/2005 07:15:07 AM:

> The Question:  Is there a clean way to capture the results from an
> IP WHERE command.

The WHERE subcommand, like many IPCS subcommands uses symbol X as well as
its return code to make its results available to a command procedure.
There is a difference between this and the display that it produces.  Only
the best fit among the blocks containing the address of interest is made
available via X.  Some have suggested that we add an option to WHERE,
filtering based on data type.  The most common filter that has been
proposed is a MODULE data type filter.  It would be interesting to hear
opinions on this suggestion from regular IBM-MAIN contributers - probably a
survey biased toward very experienced system programmers but better than
the opinion of one toymaker.

Bob Wright - z/OS MVS Service Aids

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

Re: IPCS WHERE and OUTTRAP

[Robert Wright]

Kenneth J. Kripke wrote on 09/21/2005 06:56:49 AM:

> Question:  Trapping/capturing output from an IPCS WHERE command.

Answer: (Ugly) SYSOUTTRAP in CLIST and REXX work fine in batch and
interactive line mode.  Unfortunately, most IPCS use takes place from the
IPCS dialog, and the "trapping" of terminal-bound output lines performed by
IPCS takes place ahead of the point where SYSOUTTRAPping is implemented.  A
lot of thought has gone into enabling SYSOUTTRAP during the IPCS dialog,
but a good answer to THAT question remains elusive.

Bob Wright - z/OS MVS Service Aids

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

Re: Non-LE ASM calling C function - PList and runtime reuse questions

[Mike Arnold]

Rich,

In Dignus Systems/C, you would just code:

#pragma prolkey(iefusi,"DCALL=YES")

//then the exit interface as defined
int iefusi(void * common,
   char * jobstep,
   char * program,
   char  * acct,
   REGION * reg,
   PERFORM * p,   
   DEFAULTS * def,

   char * subsystem
   )
{
 // I think this is from samplib
 reg->regflags1 |= 0x80;;
 if (!p->perform_vr)
   if (reg->regszreq!=0) {
  reg->reglimb = reg->regszreq+size64K;
  reg->regsizb = reg->regszreq;
  reg->regsiza = size32M;
  reg->reglimb = size32M;
   }
}

For more information, see http://dignus.com .

Mike.
(this is an example from a while back, so there may be parm changes 
since I wrote it, its also missing some typedefs for REGION, PERFORM 
and DEFAULTS)


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

Re: IPCS WHERE and OUTTRAP

[Robert Wright]

Kenneth J. Kripke wrote on 09/21/2005 08:08:40 AM:

> Question: Is there a way to capture the results of an IP WHERE from
> a REXX EXEC
> running under IPCS and store it in a REXX variable?
> I don't think the command uses PUTLINE to put the message out, but, I
could be
> wrong.
> The Goal: Go through a SYSTRACE and parse out the trace entries of
interest,
> then do IP WHERES on the PSW addresses to get the displacements in the
> modules.  Generate side by side listing of trace entry, psw address,
> r15, r0, r1 and
> the module name and displacement.
>

If you want to capture and analyze the results of an IPCS subcommand like
WHERE or SYSTRACE, the traditional answer is the one suggested by Don
Poitras.

(1)  Allocate a print file.  If you're writing the EXEC to support others
who may use ddname IPCSPRNT for their own purposes, use another ddname and
employ the CLOSE and OPEN subcommands to identify that ddname as a target.

(2) Have the subcommand write its output there.

(3) Close the print file.  Reopen IPCSPRNT, positioned to the end, if the
EXEC preempted the print file destination.

(4) Use REXX to read through the output.

If you're planning to be running z/OS V1R7 soon, look at whether the REPORT
primary command that the release introduces is a reasonable substitute.
REPORT has a number of capabilities, one of which is to look at lines in a
report, e.g. SYSTRACE, that has been captured by IPCS.  Another ability is
to format a newer report that would be nested in front of the other report.
We tried to anticipate the most common applications of this capability,
e.g. look at a report on the screen before directing it to a print file.
"REPORT IPCSPRNT" gets that job done.  What you'd use, assuming it met your
needs would be "REPORT %myroutine".

Bob Wright - z/OS MVS Service Aids

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

Re: Setting Completion Code in Batch?

[Paul Gilmartin]

In a recent note, "Shmuel Metz (Seymour J.)" said:

> Date: Tue, 20 Sep 2005 21:56:27 -0300
> 
> In <[log in to unmask]>, on 09/19/2005
>at 10:52 PM, Paul Gilmartin <[log in to unmask]> said:
> 
> >What's a good and very reliable way to write a step which sets its
> >return code to a particular non-zero value?
> 
>  SET666   CSECT ,
>   LAR15,666
>   BRR14
>   END
> 
The number of similar suggestions I received show me I
failed to be sufficiently clear.  By "a step", I meant
_one_ step.  The above requires at least two: assemble
and load-and-go.  The following, however, works:

 START
 DC H'0'
 MNOTE 222,'whatever'
 END

(HLASM imposes a limit of 255 on return code.  Very
stingy to save 3 bytes somewhere.)

-- gil
-- 
StorageTek
INFORMATION made POWERFUL

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

Re: IPCS WHERE and OUTTRAP

[Robert Wright]

Binyamin Dissen wrote on 09/21/2005 08:34:56 AM:

> On Wed, 21 Sep 2005 04:15:07 -0700 "Kenneth J. Kripke"
> <[EMAIL PROTECTED]> wrote:
>
> :>The Question:  Is there a clean way to capture the results from an
> IP WHERE command.
>
> Look at the EVAL* subcommands.
>

In the case of the WHERE subcommand, look at EVALMAP in particular.  What
WHERE does to produce its report is the following:

(1)  If the address falls in a range where storage map enrichment support
is available, and enrichment has not taken place for the range in this
dump, it is done.  This leaves the IPCS storage map slightly larger in the
area of interest than when you entered the subcommand.

(2) Read storage map records for the address space in question backward so
that the "best fit" is encountered first.  Set X to describe the best fit
and produce a report for each entry in the map that contains the address of
interest.  Some special processing is involved for common virtual storage
where IPCS only keeps map records associated with ASID(1) to limit the size
of the data base.

Your EXEC could exploit this even if WHERE does not currently contain code
to limit "best fit" to load modules, the desired association.

Bob Wright - z/OS MVS Service Aids

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

Keeping the lights on: Legacy systems and the maturing workforce

[Aaron Walker]

Here's an article recently posted on IBM's developerWorks.  Please forgive
any wrap.

Keeping the lights on: Legacy systems and the maturing workforce

http://www-128.ibm.com/developerworks/rational/library/sep05/lieberman/

Aaron

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

Re: IPCS and user CBF defns (fwd)

[Mark]

Robert Wright wrote:


Mark Vollmer wrote on 09/20/2005 10:00:41 AM:

 


My system did not allocate IPCSPARM for my IPCS sessions.  It appeared
to get its various IPCS parm information from another DD.

   



IPCSPARM is optional and best omitted if you're looking at dumps from the
system on which you're running or another system at the same release and
service level.  If IPCSPARM is not allocated when you start your IPCS
session, IPCS allocates an arbitrary ddname to the system parmlib
concatenation, reads the needed parmlib members, and frees the ddname
before commencing the main part of the session.  The parmlib concatenation
allows your installation to keep its parmlib members, possibly including
BLSCUSER, separate from those that are replaced when you go from one system
level to another, and two DYNALLOCs these days don't hurt responsiveness
like they might have a few years ago.

Bob Wright - z/OS MVS Service Aids
 



Since I cannot edit a BLSCUSER member in the SYS1.PARMLIB dataset 
without extra security authorization, I don't see any other alternative.


I tried just putting BLSCUSER (pds with a single member)  in the the 
IPCSPARM allocation, but that seemed to prevent the system from finding 
other PARMLIB members it needed.  That problem only went away after I 
added the SYS1.PARMLIB to the concatenation of the IPCSPARM dataset list.


Do you have an alternative suggestion that does not require altering 
system datasets?


-Mark Vollmer

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

Re: Non-LE ASM calling C function - PList and runtime reuse questions

[John Smith]

Mike,

Thanks for the comment.  Although the Dignus compiler
isn't an option, your note does raise the question of
using the "system programming C" facilities in the
z/OS compiler.  I had been planning on using an
LE-based environment will see if that's really
necessary.

Thanks,
Rich

--- Mike Arnold <[EMAIL PROTECTED]> wrote:

> Rich,
> 
> In Dignus Systems/C, you would just code:

__
Do You Yahoo!?
Tired of spam?  Yahoo! Mail has the best spam protection around 
http://mail.yahoo.com 

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

Re: Cancel a VTAM post

[Edward E. Jaffe]

thomas zupar wrote:

I have a application program having a APPCCMD command coded with 
OPTCD=ASYN.

When the execution of the command  is over I do not want VTAM  to post
the ECB.
Is their any command through which I can inform VTAM to cancel the post.
 



Why don't you want VTAM to post the ECB when the macro completes? That's 
how asynchronous requests work! After the ECB is posted, you "wake up" 
(from your WAIT) and issue APPCCMD CONTROL=CHECK to find out whether the 
request completed normally or abnormally. If you have a single-threaded 
design and don't want to deal an ECB, use a synchronous request instead.


--
-
| Edward E. Jaffe||
| Mgr, Research & Development| [EMAIL PROTECTED]|
| Phoenix Software International | Tel: (310) 338-0400 x318   |
| 5200 W Century Blvd, Suite 800 | Fax: (310) 338-0801|
| Los Angeles, CA 90045  | http://www.phoenixsoftware.com |
-

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

Re: Order of allocations within a job step

[Barry Merrill]

You said:
The search for the DSCB does not occur at that timel it occurs during OPEN.

Please educate me further:  The allocation of an existing dataset has to
verify the dataset exists, by reading the VTOC to verify its existence,
and since DATASET NOT FOUND errors occur prior to LOADTIME (i.e., during
allocation, and before program load), I don't understand how the read
of the VTOC for the DSCB can occur after the end of allocation.

Especially since a DATA SET NOT FOUND errors doesn't have a LOADTIME event.


Barry

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

Enhanced Preventive Service Planning Tool - z9

[Mark Zelden]

Was anyone who uses the Enhanced PSP tool able to get the z9 extract
file from the web page?   I wasn't.  It's not listed in the processors
category.

I was able to FTP them manually, but in case anyone from IBM who
can get this fixed or send a note to the right person to get
this fixed is listening, please do so for the next person.

I did use the feedback link but who knows if a real person
gets that email and looks at it in a timely manner.

BTW, if you've never looked at or used this tool, it makes PSP maintenance
a heck of a lot easier!!  I first heard about it at SHARE in N.Y. last
summer in Jerry Ng's opening session.

http://techsupport.services.ibm.com/390/psp_main.html

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America and Farmers Insurance Group
mailto: [EMAIL PROTECTED]
Systems Programming expert at http://Search390.com/ateExperts/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html

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

Re: Curiousity: format of an unused page dataset?

[McKown, John]

> -Original Message-
> From: IBM Mainframe Discussion List 
> [mailto:[EMAIL PROTECTED] On Behalf Of Glenn Miller
> Sent: Tuesday, September 20, 2005 9:01 PM
> To: IBM-MAIN@BAMA.UA.EDU
> Subject: Re: Curiousity: format of an unused page dataset?
> 
> 
> John,
> 
> Take a look at APAR OW55297 on IBMLINK.  It has a high-level 
> description of
> what you're
> seeing on the Page Datasets.  It also has references to other manuals.
> 

Glenn,

Thanks for the pointer. The explanation is fairly high level, with no
implementation details. However, it appears that in the past (pre-z/OS
1.3), the page data sets were simply initialized by filling them with 4K
blocks containing all binary zeros (or perhaps even random data?).

If this is so, then it would be relatively simple to initialize a page
dataset that had somehow gotten defined, but not initialized properly.

Muchas gracias!

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

This message (including any attachments) contains confidential
information intended for a specific individual and purpose, and its'
content is protected by law.  If you are not the intended recipient, you
should delete this message and are hereby notified that any disclosure,
copying, or distribution of this transmission, or taking any action
based on it, is strictly prohibited.

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

Re: IPCS and user CBF defns (fwd)

[Robert Wright]

Mark Vollmer wrote on 09/21/2005 10:06:45 AM:

>
> Since I cannot edit a BLSCUSER member in the SYS1.PARMLIB dataset
> without extra security authorization, I don't see any other alternative.
>
> I tried just putting BLSCUSER (pds with a single member)  in the the
> IPCSPARM allocation, but that seemed to prevent the system from finding
> other PARMLIB members it needed.  That problem only went away after I
> added the SYS1.PARMLIB to the concatenation of the IPCSPARM dataset list.
>
> Do you have an alternative suggestion that does not require altering
> system datasets?
>

The comment about letting IPCS allocate the parmlib concatenation being a
good thing was not specifically directed at your situation.  You and I are
treated as end-users on our production z/OS systems, and using ddname
IPCSPARM is the way that you and I need to personalize parmlib member
access.  Many other IPCS users are in a support capacity where their
systems have copies of IPCS for multiple release levels of z/OS and major
products.  They, too, need to use IPCSPARM as well as the TSOLIB command to
access the right level of IPCS for their needs.  The folks supporting your
system who screen dumps produced by the system are the ones for whom
letting IPCS use the parmlib concatenation tends to be the right thing.

Bob Wright - z/OS MVS Service Aids

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

Re: Does anyone have a 3480?

[Youngren, [EMAIL PROTECTED]]

We still have 3480 drives and would be happy to read your tape! You know
where to find me.

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Sylvia Gorman
Sent: Tuesday, September 20, 2005 8:08 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Does anyone have a 3480?


Hi all,

I'm trying to make a 3490-F11 create 18 track 3480 type tapes.  I
believe I 
may have succeeded, but the real test is in seeing if the tape I created

can be read by a 3480 drive.  So, I'm wondering if anyone with 3480
drives 
would be willing to read a tape for me and let me know if it works.

Thanks in advance,
Sylvia

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

Oh, "nasty" of Lenovo

[McKown, John]

http://www.pc.ibm.com/us/thinkpad/zseries/index.html

No, this is not a Thinkpad that runs zSeries software. It's just a
Thinkpad.

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

This message (including any attachments) contains confidential
information intended for a specific individual and purpose, and its'
content is protected by law.  If you are not the intended recipient, you
should delete this message and are hereby notified that any disclosure,
copying, or distribution of this transmission, or taking any action
based on it, is strictly prohibited.

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

Re: Order of allocations within a job step

[Binyamin Dissen]

On Wed, 21 Sep 2005 09:54:05 -0500 Barry Merrill <[EMAIL PROTECTED]> wrote:

:>You said:
:>The search for the DSCB does not occur at that timel it occurs during OPEN.

:>Please educate me further:  The allocation of an existing dataset has to
:>verify the dataset exists, by reading the VTOC to verify its existence,
:>and since DATASET NOT FOUND errors occur prior to LOADTIME (i.e., during
:>allocation, and before program load), I don't understand how the read
:>of the VTOC for the DSCB can occur after the end of allocation.

A DD statement does not cause a VTOC lookup. If no volser is specified it will
cause a catalog lookup to determine the volume and allocate the volume to the
job. If the dataset is not cataloged it will JCL error.

As a side point, if a dataset is cataloged on a volume where it does not exist
it will not JCL error. The 213-04 will only occur if opened.

OPEN is what reads the VTOC, since it needs to build the DEB.

:>Especially since a DATA SET NOT FOUND errors doesn't have a LOADTIME event.

This "loadtime" is not a defined concept. 

--
Binyamin Dissen <[EMAIL PROTECTED]>
http://www.dissensoftware.com

Director, Dissen Software, Bar & Grill - Israel


Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.

I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.

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

Re: Oh, "nasty" of Lenovo

[Pommier, Rex R.]

Trying to cash in on the RAS of the real z-series?

Rex

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of McKown, John
Sent: Wednesday, September 21, 2005 11:12 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Oh, "nasty" of Lenovo


http://www.pc.ibm.com/us/thinkpad/zseries/index.html

No, this is not a Thinkpad that runs zSeries software. It's just a
Thinkpad.

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

This message (including any attachments) contains confidential
information intended for a specific individual and purpose, and its'
content is protected by law.  If you are not the intended recipient, you
should delete this message and are hereby notified that any disclosure,
copying, or distribution of this transmission, or taking any action
based on it, is strictly prohibited.

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

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

HOD/HACL running on z/OS?

[Farley, Peter x23353]

(Posted to both MVS-OE and IBM-MAIN)

Hi all,

Our friends at IBM seem to think that these questions are worth a consulting
contract, which I am not in a position to even discuss.  Can anyone here
answer my questions, or point me to where I might find answers (no-charge
answers, of course)?

Background:

HOD (Host on Demand) has a java interface and "library" called HACL (Host
Access Class Library).  This toolkit is provided to licensees of the HOD
product, which of course is designed to be installed on PC workstations.
Specifically, there is a "java beans" jar file that uses, IIRC, "J2EE
Connection" to communicate with a host session, and enables an application
developer to deal with the "presentation space" (i.e., 3270 screen contents)
dynamically from a custom application.

Now, my questions:

Is the habeansnlv2.jar file (or equivalent) available in the z/OS USS
environment?  I.E., can a java program that uses the beans in that file to
communicate with the mainframe be moved to z/OS and executed there?  Could
the jar file simply be moved to an HFS directory in z/OS and used there by a
java program developed on the PC?  Has anyone already been through this
exercise and would be willing to share gotchas?

TIA for any help/info/url/RTFM you can provide.

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

Re: Enhanced Preventive Service Planning Tool - z9

[Michael Cleary]

Hey Mark,

Yeah, I heard about it at a prior SHARE, and we just use it in a batch
mode, not in the interactive mode.

We do an FTP:
EZA1736I   cd /s390/pspapartool
EZA1736I   ls -l

And then look for the buckets that we need, and the do another FTP to get
the buckets.

Then, do the batch analysis of our CSI with the bucket via the epspt
program.

I have sent e-mails to the comments address with some suggestions and
prolems.  Someone answered in a week or two, it was during the summer -
maybe he was on vacation.  :)  There was a problem with some of the data in
a bucket, and they corrected it in a week or so.

Also, one question about IPLINFO - is there anywhere that INITSQA is
available to be reported on, or is is just magic dust that is used by NIP?
We addeded INITSQA when we went to 64-bit, and was just wondering if IPLINF
could report on it's value.

Michael

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

SUPERC Insights

[George, William (DHS-ITSD)]

Can someone point me to where I can get insights to SUPERC (=3.12 or
3.13)
I'm having difficulty with attempts to generate a report that is
understandable when I add a CMPCOLM statement.
(compare files in specific columns)

What I'm attempting to do is... 
1)  I have two files of 6500 record length.
2)  I'd like to know those records that have different data in cols
999 for a length of six
3)  Any new or deleted records

My 20 record test files have these changes in the NEW file
1)  record 9 deleted in NEW
2)  record 5 had data changed in cols 999-1005
3)  record 2 also had data changed
4)  record 99989 was ADDED to the NEW file
  
RESULTS
When I DON'T add the CMPCOLM 999:1005 statement the output from SUPERC
seems as I would expect in my test file
(run with Compare Type = FILE   Listing type = Delta and NO process
options)
But this would show changes to records in ANY column. Not what we are
looking for.
  D - 01 9 3J90004514W5M38 3  ROGERS  
   
  I - 01 5 339361D1FVV 1  ALPHA REC   
  D - 01 5 339361D1FVV 1  ALPHA REC   
   
  I - 01 2 5390002361D3FVV 1  CONVERT EXPECT  
  D - 01 2 5390002361D3FVV 1  CONVERT EXPECT  
   
  I - 01 99989 5390005361D6F   6  FODDER  

When I add the CMPCOLM 999:1005 statement, the output is befuddling to
me. ???
  I - 01 5 339361D1FVV 1  ALPHA REC
  I - 01 4 4390001361D2FVV 1  EXPECT CONV  
  I - 01 2 5390002361D3FVV 1  CONVERT EXPECT   
 
  D - 01 3 3369332501M3F17 1 CKATZ 
  D - 01 1 4390004361D5F17 1 CCAROL
  D - 01 0 4390005361D6UVV 1  DUEINFOURMOS 

There seems to be an additional I (insert) in the middle insert listed.
There was no change to this record
And what are all the D (deletes)?
It also doesn't show the delete or inserted records (Rogers and Fodder).

I've tried a number of other options and statements...
Any insights would be appreciated!
Thanks
Bill


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

Re: Article in Information week: Mainframe Programmers Wanted

[Eric Bielefeld]

James,

We have an MP3000 H50.  In the 4 years we have had it, I don't think it has
ever crashed for problems with hardware.  We had 1 outage where a software
package caused a crash, and a couple times the power went out, but never a
hardware outage caused by the MP3000.

If you are looking for a job as a sysprog, try using a headhunter.  You can
also try dice.com, and the Naspa job site, although you may have to be a
Naspa member to use it.  There are jobs out there - just maybe not where
you live.  My job ends in April or May next year, so I'll be looking around
the USA for a job at that time.

Eric Bielefeld
P&H Mining Equipment

On Wed, 21 Sep 2005 06:36:41 -0500, Huckert, James
<[EMAIL PROTECTED]> wrote:
>>Today's mainframes can do so much more than just batch processing but it
>seems people are biased towards mainframes. Companies could eliminate so
>many pc servers and consolidate them on the mainframe but everyone I talked
>to about it just looked at me like I was stupid or that it was a ridiculous
>idea or both. I can understand not having everything on your mainframe
>because if it crashes, well then a lot of stuff would be down. I worked at
>one shop that had a MP3000, that thing crashed about every six to eight
>months and IBM never could figure out why. IBM kept replacing parts that
>they thought might have caused the crash but never really could tell us for
>sure. My hunch was because the programming manager ipl'ed it by flipping
the
>power switch off. That was before we got down there to set him straight.
IBM
>did tells us that there was 5 or 6 other companies that had the same
>problem.
>Well sorry everyone for the long posting. Just had a few things had to get
>off my chest.
>Thanks
>James H.

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

Re: Setting Completion Code in Batch?

[john gilmore]

I am a little hesitant to repeat someone else's contribution; but Volker 
Bandke's suggestion, which I strongly endorsed in an earlier post, was that 
a [JCL] set statement be used.


John Gilmore
Ashland, MA 01721
U.S.A.

_
On the road to retirement? Check out MSN Life Events for advice on how to 
get there! http://lifeevents.msn.com/category.aspx?cid=Retirement


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

Re: SUPERC Insights

[Barry Schwarz]

Columns 999:1005 is length of seven, not the six you specify.
 
When I use Compare Type = File, I only get a hash difference, never any 
indication of where the differences are.  I think you want Compare Type = 
Record.
 
I'm sorry but I don't understand your description of the records and results.


"George, William (DHS-ITSD)" <[EMAIL PROTECTED]> wrote:
Can someone point me to where I can get insights to SUPERC (=3.12 or
3.13)
I'm having difficulty with attempts to generate a report that is
understandable when I add a CMPCOLM statement.
(compare files in specific columns)

What I'm attempting to do is... 
1) I have two files of 6500 record length.
2) I'd like to know those records that have different data in cols
999 for a length of six
3) Any new or deleted records

My 20 record test files have these changes in the NEW file
1) record 9 deleted in NEW
2) record 5 had data changed in cols 999-1005
3) record 2 also had data changed
4) record 99989 was ADDED to the NEW file

results snipped because the automatic filter rejects the post if I don't


-
Yahoo! for Good
 Click here to donate to the Hurricane Katrina relief effort. 

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

Re: Access to the SHARE requirements database

[Patrick O'Keefe]

On Tue, 6 Sep 2005 09:54:22 -0500, John Laubenheimer
<[EMAIL PROTECTED]> wrote:

>...
>   Each project handled the merge of the GUIDE requirements in their own
>fashion.  ...

In case anyone still cares, this does not contradict what Bob Shannon said.
The Guide Requirements were all moved into the SHARE database, then
reviewed by each project (or program in some cases).  But both IBM and
SHARE upgraded their respective requirements systems (simultaneously,
and without as much coordination as one might wish).  Linkages between
the 2 were shakey for a while.  It's possible some Guide requirements
got lost.  (I think some SHARE requirements got lost, too.)  That
doesn't mean IBM didn't get them - just that they can't be tied back to
the original SHARE (or Guide) requirement ids.

Pat O'Keefe

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

Re: SUPERC Insights

[George, William (DHS-ITSD)]

Barry

Thanks for the reply.

You said, "Columns 999:1005 is length of seven, not the six you
specify."
Very true and this is what happens when I type without thinking.

Lets see if I can restate it better.
What I'm attempting to do is compare two files and;
  1) report any differences found within a certain column range and 
  2) any added or deleted records.

I have two test files I'm working with that have 20 records each. 
The files are exact until I made these changes to the one I'll call NEW
(Key is the first 9 digits of the record)
1)  record key 9 deleted from NEW
2)  record key 5 had data changed in cols 999-1004
3)  record key 2 also had data changed
4)  record key 99989 was ADDED to the NEW file
  
RESULTS
When I execute SUPERC with no process statements the output from SUPERC
seems as I would expect (run with Compare Type = FILE   Listing type =
Delta and NO process options)
  D - 9 3J90004514W5M38 3  ROGERS  
   
  I -  5 339361D1FVV 1  ALPHA REC   
  D - 5 339361D1FVV 1  ALPHA REC   
   
  I - 2 5390002361D3FVV 1  CONVERT EXPECT  
  D - 2 5390002361D3FVV 1  CONVERT EXPECT  
   
  I - 01 99989 5390005361D6F   6  FODDER  
But this shows records with changes in ANY column. Not what we are
looking for.

When I add the CMPCOLM 999:1004 statement and rerun the compare, the
output is befuddling to me as it is entirely different. I would have
expected the same as above as the changes were within those columns.
  I -  5 339361D1FVV 1  ALPHA REC
  I -  4 4390001361D2FVV 1  EXPECT CONV  
  I -  2 5390002361D3FVV 1  CONVERT EXPECT   
 
  D -  3 3369332501M3F17 1 CKATZ 
  D -  1 4390004361D5F17 1 CCAROL
  D -  0 4390005361D6UVV 1  DUEINFOURMOS 

There seems to be an additional I (insert) listed (key 4). 
Note: There was no change to record 4
And what are all the D (deletes) listed?
It also doesn't show the delete or inserted records (9 and
99989).

I've tried a number of other options and statements...
Any insights would be appreciated!
Thanks
Bill

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

Re: SUPERC Insights

[George, William (DHS-ITSD)]

Shazzzbot... tried to reformat so it may be understood better and I
still mess it up.  Sorry

What I'm attempting to do is compare two files and;
  1) report any differences found within a certain column range and 
  2) any added or deleted records.

I have two test files I'm working with that have 20 records each. 
The files are exact until I made these changes to the one I'll call NEW
(Key is the first 9 digits of the record)
1)  record key 9 deleted from NEW
2)  record key 5 had data changed in cols 999-1004
3)  record key 2 also had data changed
4)  record key 99989 was ADDED to the NEW file
  
RESULTS
When I execute SUPERC with no process statements the output from SUPERC
seems as I would expect 
run with Compare Type = FILE   Listing type = Delta and NO process
options)
  D - 9 3J90004514W5M38 3  ROGERS  
   
  I - 5 339361D1FVV 1  ALPHA REC   
  D - 5 339361D1FVV 1  ALPHA REC   
   
  I - 2 5390002361D3FVV 1  CONVERT EXPECT  
  D - 2 5390002361D3FVV 1  CONVERT EXPECT  
   
  I - 99989 5390005361D6F   6  FODDER  
But this shows records with changes in ANY column. 
Not what we are looking for.

When I add the CMPCOLM 999:1004 statement and rerun the compare, the
output is befuddling to me as it is entirely different. I would have
expected the same as above as the changes were within those columns.
  I -  5 339361D1FVV 1  ALPHA REC
  I -  4 4390001361D2FVV 1  EXPECT CONV  
  I -  2 5390002361D3FVV 1  CONVERT EXPECT   
 
  D -  3 3369332501M3F17 1 CKATZ 
  D -  1 4390004361D5F17 1 CCAROL
  D -  0 4390005361D6UVV 1  DUEINFOURMOS 

There seems to be an additional I (insert) listed (key 4). 
Note: There was no change to record 4
And what are all the D (deletes) listed?
It also doesn't show the delete or inserted records (9 and
99989).

I've tried a number of other options and statements...
Any insights would be appreciated!
Thanks
Bill

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

Re: Job Schedulers

[Neil Duffee]

At August 23, 2005 13:32, concerning "Re:  Job Schedulers", Cletus 
McGee <[EMAIL PROTECTED]> wrote (to IBM-Main):  

> We currently use CA-7 [snip] wondering what job scheduler other folks
> are using. [snip] 

Cletus :
We've used CyberMation's ESP (Execution Schedule Processor has been 
replaced with Enterprise Systems Platform) Workload Manager for going 
on a decade now.  

It has served all our needs, provides for fairly complex schedule 
criteria (Last Workday of Week less 1 Workday -> Wednesday when July 
4 is Thursday), intricate job dependencies (skip Job C on thursdays), 
ability to use rexx-style commands to generate the 'procedures', and 
the ability to simulate the generated jobs/operator commands for 
testing.

Check them out at http://www.cybermation.com/

ps.  no affiliation with CyberMation other than a satisfied user.

pps.  I haven't used other packages and can't compare them.
-->  signature = 6 lines follows <--
Neil Duffee, Joe SysProg, U d'Ottawa, Ottawa, Ont, Canada
telephone:1 613 562 5800 x4585 fax:1 613 562 5161
mailto:NDuffee of uOttawa.ca http:/ /aix1.uottawa.ca/ ~nduffee
"How *do* you plan for something like that?" Guardian Bob, Reboot
"For every action, there is an equal and opposite criticism."
"Systems Programming: Guilty, until proven innocent" John Norgauer 
2004

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

Re: Converting MIM to GRS

[Ted MacNEIL]

> Would anyone have any useful information (presentations, hints & tips) when
considering a migration.
...

BOEING had somebody give a presentation 3-4 years ago. Check SHARE.

Also:
1. Ring doesn't perform well, but must be used in a multi-plex environment.
2. You cannot cross plex boundaries with GRS*, since you cannot share CF's 
between plexes.
3. A lot of people miss this. The MIM $H;$E;$C combination is not done by GRS.
So, depending on the batch activity & queueing, you may need more inits (approx 
10% more) if you have a lot of that.
The inits are held for both enq delay and execution after resolution.

-teD

In God we Trust!
All others bring data!
 -- W. Edwards Deming

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

Re: Job Schedulers

[Neil Duffee]

At September 21, 2005 16:30, concerning "Re: Job Schedulers", 
[EMAIL PROTECTED] <[EMAIL PROTECTED]> wrote (to Neil Duffee):  

> In a message dated 9/21/2005 3:19:39 P.M. Central Standard Time, 
> [EMAIL PROTECTED] writes:
> We've used CyberMation's ESP (Execution Schedule Processor has been 
> replaced with Enterprise Systems Platform) Workload Manager for going 
> on a decade now. 
> >>
> Devil's advocate:How was it brought in? Bid, trial and error,
> we hate CA, boss made me do it, my sister works in their tech 
> support? Just curious

ummm a mis-interpretation, I believe.  The product started out as 
name1, a decade ago, but now is called by name2;  similar to the 
evolution of SAS, for those older fogeys about.  *grin*
-->  signature = 6 lines follows <--
Neil Duffee, Joe SysProg, U d'Ottawa, Ottawa, Ont, Canada
telephone:1 613 562 5800 x4585 fax:1 613 562 5161
mailto:NDuffee of uOttawa.ca http:/ /aix1.uottawa.ca/ ~nduffee
"How *do* you plan for something like that?" Guardian Bob, Reboot
"For every action, there is an equal and opposite criticism."
"Systems Programming: Guilty, until proven innocent" John Norgauer 2004

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

Re: Converting MIM to GRS

[Ted MacNEIL]

>There's nothing that beats GRS star, but if that is not doable, you're
better off staying with MIM. I've heard that advice from IBM account reps!
...

MIM in the CF performs just as well as GRS*.
But, I'd rather use the 'free' GRS.
And, I've had too many problems with a certain ISV.

-teD

In God we Trust!
All others bring data!
 -- W. Edwards Deming

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

Re: HASP/ASP JES/JES2/JES3

[Ted MacNEIL]

>I laughed at the people who
pretended that it was better to have an acronym than have it mean
"spool"
...

I always thought it came first; then somebody said: “So, what do we make it 
stand for?”.

-teD

In God we Trust!
All others bring data!
 -- W. Edwards Deming

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

Re: Setting Completion Code in Batch?

[Paul Gilmartin]

In a recent note, john gilmore said:

> Date: Wed, 21 Sep 2005 18:50:06 +
> 
> I am a little hesitant to repeat someone else's contribution; but Volker
> Bandke's suggestion, which I strongly endorsed in an earlier post, was that
> a [JCL] set statement be used.
> 
???

The only contribution to this thread I can find from Volker (however
the Subject: has meandered) is:

   Linkname: Re: Setting Completion Code in Batch?
URL: 
http://bama.ua.edu/cgi-bin/wa?A2=ind0509&L=ibm-main&D=1&O=D&P=118804

Containing (I don't hesitate to repeat):

//SETRC EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
~ SET LASTCC=2

This appears to be not a JCL SET statement, but a SET statement in
the SYSIN of an IDCAMS step.  (The tilde is silent?)

I'm unfamiliar with the use of a JCL SET statement to set the
completion code of a step.  Can it be done?  How?  Citation?
Examples?

Thanks,
gil
-- 
StorageTek
INFORMATION made POWERFUL

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

Re: COBOL Compiler Help

[Ted MacNEIL]

>> What else can it tweak to get this to compile?  Is the 
> program just TOO 
> large?
...

Fire the programmer! (Maybe a bit too harsh?)

Hasn't anybody heard of MODULAR?

-teD

In God we Trust!
All others bring data!
 -- W. Edwards Deming

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

Cobol Status Code 93

[Carl Edwards]

2 programs running against same file. Shr(2,3) on
cluster et all. Program 1 opens I-O., Program 2 opens
INPUT. Status 93 on open in program 2. 
IEC161I msg points to pgm 1 as conflicte.  Files is
VSAM KSDS, wuth upgradeable AIX.  Makes no sense to
me, but?

Any input appreciated

IEC161I 052(013,CST007)-084


013  
  CRTSKWR - Opening for output, SHR=2,x. Some ACB 
   already opened the data set for output.  
 



__ 
Yahoo! Mail - PC Magazine Editors' Choice 2005 
http://mail.yahoo.com

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

URL for CICS TS 3.1 Internet Repository

[Edward E. Jaffe]

My normal softcopy Internet URL doesn't have the CICS TS 3.1 books. I 
found the CICS TS 3.1 library on the Internet -- which carries the 
manuals in both BOOK and PDF form -- at 
http://www.ibm.com/software/htp/cics/tserver/v31/library/, but I 
*really* don't want to have to manually download and catalog them all. 
There are *lots* of BOOKs and PDFs!


Does anyone know a working URL that Softcopy Librarian can use to obtain 
CICS TS 3.1 BOOKs and PDFs from the Internet?


--
-
| Edward E. Jaffe||
| Mgr, Research & Development| [EMAIL PROTECTED]|
| Phoenix Software International | Tel: (310) 338-0400 x318   |
| 5200 W Century Blvd, Suite 800 | Fax: (310) 338-0801|
| Los Angeles, CA 90045  | http://www.phoenixsoftware.com |
-

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

Re: Short term paging spike

[Ted MacNEIL]

>SMF 30 could also be used (working
set, but it would probably not be my first place to look.
...

Maybe not; it does have PIN data, though -- efficient if you are using interval 
(of your choice) data.

-teD

In God we Trust!
All others bring data!
 -- W. Edwards Deming

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

Re: Short term paging spike

[Ted MacNEIL]

>This was a while ago in a different age, prior to WLM and big real storage,
but I suspect the same situation could be a possibility.
...

This can still happen in GOAL MODE.
At the same time IBM introduced CPU-Critical, they introduced MEMORY-Critical.

This was due to a large bank in the US having exactly this issue.

The key is to identify the culprit/victim and make them MEMORY-Critical.

-teD

In God we Trust!
All others bring data!
 -- W. Edwards Deming

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

Re: Converting MIM to GRS

[Mark Zelden]

On Wed, 21 Sep 2005 00:00:00 GMT, Ted MacNEIL
<[EMAIL PROTECTED]> wrote:

>
>MIM in the CF performs just as well as GRS*.
>But, I'd rather use the 'free' GRS.
>And, I've had too many problems with a certain ISV.
>

Perhaps, but MII has been very solid code and bery good support over
the years.  Also more dynamic changes than GRS - especially
in past years.  I've had some issues with MIA (tape) in the
past, but no glearing problems with MII (integrity). No one
ever mentions MIC in these threads.  While sysplex will let
you consolodate your consoles within a sysplex, with MIC you
can issue commands and view console messages that span the
boundries of sysplex.

Most people miss the fact that MIM can run with a control file in
the CF and perform as well as GRS STAR, but many shops that run
MIM do so specifically because it can span sysplexes.  Also,
some recent threads (and past threads) talk about a DASD shared
control file.  While you can do that, the best option is CTCONLY
which uses 2 sets of CTCs (primary + backup) for communications
and has a virtual control file that lives on one of the active
LPARs in the MIMplex. Obviously if you have FCTCs your better
off than with ESCON CTCs. It's not GRS STAR (or MIM in a CF), but
performance is still good.

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America and Farmers Insurance Group
mailto: [EMAIL PROTECTED]
Systems Programming expert at http://Search390.com/ateExperts/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html

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

Re: Article in Information week: Mainframe Programmers Wanted

[Ted MacNEIL]

>I can understand not having everything on your mainframe
because if it crashes, well then a lot of stuff would be down.
...

That's specious for two reasons:
1. Mainframes rarely crash.
2. Can you spell PARALLEL SYSPLEX boys & girls?

-teD

In God we Trust!
All others bring data!
 -- W. Edwards Deming

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

Re: IPCS and user CBF defns (fwd)

[Shane Ginnane]

Mark Vollmer wrote:
>
> Since I cannot edit a BLSCUSER member in the SYS1.PARMLIB dataset
> without extra security authorization, I don't see any other alternative.
>
> I tried just putting BLSCUSER (pds with a single member)  in the the
> IPCSPARM allocation, but that seemed to prevent the system from finding
> other PARMLIB members it needed.  That problem only went away after I
> added the SYS1.PARMLIB to the concatenation of the IPCSPARM dataset list.
>
> Do you have an alternative suggestion that does not require altering
> system datasets?

Just adding SYS1.PARMLIB is fraught with peril - I've seen too many sites
where that library contains (only) old members, and almost certainly not
all the members you will need at some point.
Go to SDSF, and issue a "D PARMLIB" command - concatenate all those
libraries (in order) behind your library in IPCSPARM. That way you're
covered.
If you don't have command auth, ring the sprogs - I'm sure they'll
accomodate some-one playing with IPCS.

Shane ...

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

SMS add volume to storage group

[Mike Liberatore]

Our storage administrator is out sick and I got the job of adding new volumes 
to our active SMS environment. I guess someone knew  that had some SMS 
expierence in the past. Anyway we share SMS across three LPARS ,I know I have 
to define a VTOC, INDEX VTOC and since we run FDRABR so I also need to allocate 
a FDR file(?) on these volume(s) that I will be adding. I haven't done SMS 
administrative tasks in sometime. So I was wondering if someone could share 
with me the steps required to add volume(s) to a SMS Storage group Via ISMF and 
any other steps needed outside of ISMF. Can this process, adding volumes to 
SMS, also be done in Batch. Thanks in advance!!

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

Re: IPCS WHERE and OUTTRAP

[Shane Ginnane]

Generally IPCS is a fine tool - but there are situations where it just
ain't shaped to fit.

UGLY - I'll tell you ugly.
Try parsing a (large) GFS trace for non-matching get/frees - from TCBs that
had a life not much longer than the duration of the obtained storage.
You might be surprised how often the same address pops up.

IPCS was basically no good for the job. I had a (brief) look at writing a
gtftrace filter exit, but it all looked too hard.
Eventually went with filtering the gtf dataset itself, then using IPCS to
format the remaining records to convince the errant (IBM) team they really
did have a problem and maybe they should stir themselves and have a look at
their code.
IPCS proved to be sensitive to the mangled gtf input - particularly the
control records. Even if there were only consecutive control records for
extended periods, if they weren't there, IPCS seemed to give up. This was
of course only found by trial and error.

When/if I ever get a 1.7 system to play with, I'll have a look at that
REPORT command Bob mentioned in another post. Unlikely to have helped in
this case, but in other situations I reckon I could get some use out of the
View subcommand in particular.

Shane ...

Bob wrote:
>
> Answer: (Ugly) SYSOUTTRAP in CLIST and REXX work fine in batch and
> interactive line mode.

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

Re: COBOL Compiler Help

[Ed Gould]

On Sep 20, 2005, at 7:00 PM, Ted MacNEIL wrote:


What else can it tweak to get this to compile?  Is the

program just TOO
large?

...

Fire the programmer! (Maybe a bit too harsh?)

Hasn't anybody heard of MODULAR?

-teD



Ted,

Well that may be a partial solution but over the years.. I have seen 
cobol translators (convert from UNIVAC to IBM example)  produce LARGE 
cobol source. So half way defending the programmer (in this instance) 
it may not be his/her fault.


Going back 20 some years I have seen some HUGE cobol programs. This was 
at a company that totally bought into modular programming. I have also 
seen hired "guns"  brought in to break up large programs sometimes they 
were able to do it sometimes they finally surfaced with a suggestion to 
break it up into several programs. I have also seen after a few years 
the program grow back into a large program. Apparently there is life 
after death for cobol programs. Maybe it was pregnant ??


Ed

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

Re: HOD/HACL running on z/OS?

[John S. Giltner, Jr.]

Farley, Peter x23353 wrote:

(Posted to both MVS-OE and IBM-MAIN)

Hi all,

Our friends at IBM seem to think that these questions are worth a consulting
contract, which I am not in a position to even discuss.  Can anyone here
answer my questions, or point me to where I might find answers (no-charge
answers, of course)?

Background:

HOD (Host on Demand) has a java interface and "library" called HACL (Host
Access Class Library).  This toolkit is provided to licensees of the HOD
product, which of course is designed to be installed on PC workstations.
Specifically, there is a "java beans" jar file that uses, IIRC, "J2EE
Connection" to communicate with a host session, and enables an application
developer to deal with the "presentation space" (i.e., 3270 screen contents)
dynamically from a custom application.

Now, my questions:

Is the habeansnlv2.jar file (or equivalent) available in the z/OS USS
environment?  I.E., can a java program that uses the beans in that file to
communicate with the mainframe be moved to z/OS and executed there?  Could
the jar file simply be moved to an HFS directory in z/OS and used there by a
java program developed on the PC?  Has anyone already been through this
exercise and would be willing to share gotchas?

TIA for any help/info/url/RTFM you can provide.

Peter



If I understand what you are asking, not only is it possible, IBM 
provides a tool to do it.  It called HATS (Host Access Tranformation 
something or other).  HATS is really a plugin to WSAD and creats a J2EE

programs, might specifically be a bean.

If you have HOD, then you either have Host Access Client Package on Host 
Integration, HATS comes with either of those.  All you need it WSAD and 
Websphere Application Server.  HATS does require WAS.


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

Re: COBOL Compiler Help

[Joe Zitzelberger]

On Sep 21, 2005, at 12:00 AM, Ted MacNEIL wrote:


What else can it tweak to get this to compile?  Is the


program just TOO
large?


...

Fire the programmer! (Maybe a bit too harsh?)

Hasn't anybody heard of MODULAR?

-teD


At the risk of getting things thrown at me... this program might  
explain some of the reluctance to hire 30-year veterans of  
programming from the neighboring thread.


There are a number of old-timers whose formal training consist of  
"the Call verb is Evil!" and "Michael Jackson says goto is cool!".   
I'm not saying all, or even a majority, of old-timers would write  
such a thing, but no PFCSK with an ounce of training would write such  
crap.  Your chances of avoiding monolithic garbage like this are  
better the younger the programmer.


And I would say firing is not harsh enough.

Anyone that writes a 309k line module should be dipped in honey and  
strung up over an ant hill next to the person at Micro$oft that  
invented that damn paper-clip.


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

Re: COBOL Compiler Help

[David Nobles]

At 11:09 PM 9/21/2005, you wrote:


On Sep 21, 2005, at 12:00 AM, Ted MacNEIL wrote:


What else can it tweak to get this to compile?  Is the

program just TOO
large?

...

Fire the programmer! (Maybe a bit too harsh?)

Hasn't anybody heard of MODULAR?

-teD


At the risk of getting things thrown at me... this program might
explain some of the reluctance to hire 30-year veterans of
programming from the neighboring thread.

There are a number of old-timers whose formal training consist of
"the Call verb is Evil!" and "Michael Jackson says goto is cool!".
I'm not saying all, or even a majority, of old-timers would write
such a thing, but no PFCSK with an ounce of training would write such
crap.  Your chances of avoiding monolithic garbage like this are
better the younger the programmer.

And I would say firing is not harsh enough.

Anyone that writes a 309k line module should be dipped in honey and
strung up over an ant hill next to the person at Micro$oft that
invented that damn paper-clip.
That's all well and good.  But I remember working on large programs, 
that in addition to being
too large called 'black boxes' used in a vaguely remembered 
conversion that had long ago
been completed.  Everybody agreed they were too large, spaghetti 
coded, inefficient, etc. At
the same time every change was accompanied by the mantra that 'there 
was no time to fix it,
that would be done at a later date.  Just go ahead and add the 
enhancements and let the

program grow."

On the flip side, I've worked with younger programmers who when asked 
to rate a change effort
as small, medium or large stated it was large since it would take a 
whole day.  Small was an
hour or two and medium anything in between.  Comes from their drag n 
drop programmer

training.






--
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.344 / Virus Database: 267.11.3/107 - Release Date: 9/20/2005

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

Re: Article in Information week: Mainframe Programmers Wanted

[Pommier, Rex R.]

Sorry, Ted, but I have to disagree with you on that second point (and
apparently in the case of the 7060 crashing on a regular basis, the
first as well).  Like the writer, we are running a 7060-H50
(uni-processor) and no money to be able to buy a "real" z-series box,
much less the money to invest in enough hardware to implement parallel
sysplex.  Granted, the only hardware related outage we've had over the
4+ years of our 7060 was with a third-party front-end communications
processor, but the fact is we are stuck on a single frame without enough
gas and/or hardware to implement a sysplex.  My guess is that there are
quite a few more sites out there like his and mine.

Rex

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Ted MacNEIL
Sent: Tuesday, September 20, 2005 7:00 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Article in Information week: Mainframe Programmers Wanted


>I can understand not having everything on your mainframe
because if it crashes, well then a lot of stuff would be down. ...

That's specious for two reasons:
1. Mainframes rarely crash.
2. Can you spell PARALLEL SYSPLEX boys & girls?

-teD

In God we Trust!
All others bring data!
 -- W. Edwards Deming

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

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

Re: Oh, "nasty" of Lenovo

[Bruce Hewson]

John,

I notice it is a big Z series. must make a difference :-)

Regards
Bruce Hewson

On Wed, 21 Sep 2005 11:12:03 -0500, McKown, John
<[EMAIL PROTECTED]> wrote:

>http://www.pc.ibm.com/us/thinkpad/zseries/index.html
>
>No, this is not a Thinkpad that runs zSeries software. It's just a
>Thinkpad.
>
>--
>John McKown
>Senior Systems Programmer
>UICI Insurance Center
>Information Technology

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

Re: Cobol Status Code 93

[Bruce Hewson]

Hello Carl,

Obvious maybe, your post says the file is opened by Program 2 as OUTPUT.

Are you absolutely sure that Program2 opens the file as INPUT?

Alternatively, does the file contain any data? Has it been initialised?

please note I am not certain if the AIX causes any SHARE problems.

On Wed, 21 Sep 2005 14:36:18 -0700, Carl Edwards <[EMAIL PROTECTED]> wrote:

>2 programs running against same file. Shr(2,3) on
>cluster et all. Program 1 opens I-O., Program 2 opens
>INPUT. Status 93 on open in program 2.
>IEC161I msg points to pgm 1 as conflicte.  Files is
>VSAM KSDS, wuth upgradeable AIX.  Makes no sense to
>me, but?
>
>Any input appreciated
>
>IEC161I 052(013,CST007)-084
>
>
>013
>  CRTSKWR - Opening for output, SHR=2,x. Some ACB
>   already opened the data set for output.
>

Regards
Bruce Hewson

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

Re: Cancel a VTAM post

[thomas zupar]

We have a situaton where the thread is being killed,so when VTAM gets back to 
post ,it finds the ecb  wrong and hits with s0a8,thats why I am want to cancel 
the post.

"Edward E. Jaffe" <[EMAIL PROTECTED]> wrote:thomas zupar wrote:

>I have a application program having a APPCCMD command coded with 
>OPTCD=ASYN.
>When the execution of the command is over I do not want VTAM to post
>the ECB.
>Is their any command through which I can inform VTAM to cancel the post.
> 
>

Why don't you want VTAM to post the ECB when the macro completes? That's 
how asynchronous requests work! After the ECB is posted, you "wake up" 
(from your WAIT) and issue APPCCMD CONTROL=CHECK to find out whether the 
request completed normally or abnormally. If you have a single-threaded 
design and don't want to deal an ECB, use a synchronous request instead.

-- 
-
| Edward E. Jaffe | |
| Mgr, Research & Development | [EMAIL PROTECTED] |
| Phoenix Software International | Tel: (310) 338-0400 x318 |
| 5200 W Century Blvd, Suite 800 | Fax: (310) 338-0801 |
| Los Angeles, CA 90045 | http://www.phoenixsoftware.com |
-

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



-
Yahoo! for Good
 Click here to donate to the Hurricane Katrina relief effort. 

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

Need RACF Audit Record For Datasets SMF Records To Test DAF

[Michael Cleary]

Greetings,
 
I am in need of SMF Record Type 83 (RACF Audit Record
For Datasets) to Test DAF.

Cheers,

Michael

http://www.geocities.com/michaeljosephcleary/

===

Instructions:

1) Creat the SMF file with IFASMFDP and XMIT the SMF
file (JCL below)

2) do a binary transfer of the XMIT file to your PC

3) Zip the downloaded file

4) e-mail me the zipped file as an attachment



Here is JCL to create the SMF file and XMIT it.

//&SYSUID.SMF JOB (TECHY),'CLEARY',CLASS=U,   
   
// MSGCLASS=X,MSGLEVEL=(1,1),NOTIFY=&SYSUID.  
   
//DELETE  EXEC PGM=IEFBR14
   
//DELETE1   DD
DSN=ZTGP01.SMFTXXX,DISP=(MOD,DELETE,DELETE),   
// UNIT=SYSDA,SPACE=(CYL,(1,1)),  
   
// DCB=(RECFM=VBS,LRECL=32760,BLKSIZE=27998,BUFNO=64) 
   
//DELETE2   DD
DSN=ZTGP01.SMFTXXX.XMI,DISP=(MOD,DELETE,DELETE),   
// UNIT=SYSDA,SPACE=(CYL,(1,1)),  
   
// DCB=(RECFM=VBS,LRECL=32760,BLKSIZE=27998,BUFNO=64) 
   
//IFASMFDP EXEC PGM=IFASMFDP  
   
//DUMPINDD
DISP=SHR,DSN=DCTR.SMFDUMP.ACCUM.BBC1(+0),  
// DCB=(BUFNO=64) 
   
//DUMPOUT   DD
DSN=ZTGP01.SMFTXXX,DISP=(NEW,CATLG,CATLG), 
// UNIT=SYSDA,SPACE=(CYL,(100,50),RLSE),  
   
//
DCB=(RECFM=VBS,LRECL=32760,BLKSIZE=27998,BUFNO=64) 
//SYSIN DD *  
   
  INDD(DUMPIN,OPTIONS(DUMP))  
   
  OUTDD(DUMPOUT,TYPE(XXX))
   
//SYSPRINT  DD SYSOUT=*   
   
//IKJEFT01 EXEC PGM=IKJEFT01  
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTSIN  DD *   
XMIT ANYNODE.ANYUSER +
 DATASET('ZTGP01.SMFTXXX') +  
 OUTDATASET('ZTGP01.SMFTXXX.XMI')



__
Do You Yahoo!?
Tired of spam?  Yahoo! Mail has the best spam protection around 
http://mail.yahoo.com 

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

Re: URL for CICS TS 3.1 Internet Repository

[R.S.]

Edward E. Jaffe wrote:

My normal softcopy Internet URL doesn't have the CICS TS 3.1 books. I 
found the CICS TS 3.1 library on the Internet -- which carries the 
manuals in both BOOK and PDF form -- at 
http://www.ibm.com/software/htp/cics/tserver/v31/library/, but I 
*really* don't want to have to manually download and catalog them all. 
There are *lots* of BOOKs and PDFs!


Does anyone know a working URL that Softcopy Librarian can use to obtain 
CICS TS 3.1 BOOKs and PDFs from the Internet?



Wouldn't be a solution for you to order IBM doc DVD ?
It's not very expensive ($5.00) and contains everything except LYxx 
books. 'Everything' means z/OS and all IBM products for z/OS.

Already organized into shelves.
HTH
--
Radoslaw Skorupka
Lodz, Poland

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

Re: Short term paging spike

[Vernooy, C.P. - SPLXM]

"Ted MacNEIL" <[EMAIL PROTECTED]> wrote in message news:<[EMAIL PROTECTED]>...
> >This was a while ago in a different age, prior to WLM and big real storage,
> but I suspect the same situation could be a possibility.
> ..
> 
> This can still happen in GOAL MODE.
> At the same time IBM introduced CPU-Critical, they introduced MEMORY-Critical.
> 
> This was due to a large bank in the US having exactly this issue.
> 
> The key is to identify the culprit/victim and make them MEMORY-Critical.
> 

Only if this is the problem!
The original question was about paging spikes, which by itsself are usually not 
a problem for the system. If the spikes are for an application, that suffers 
from it, it could be helped by making it Memory-critical.

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

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