Re: JES2 Exit6 - Changing Class= Based on PGM=

2005-09-30 Thread Robert A. Rosenberg
At 08:24 -0500 on 09/30/2005, Adam Floro wrote about Re: JES2 Exit6 - 
Changing Class= Based on PGM=:



MSG901 prints out in my listing ok, so it found the 'PGM=' key (hex 8A) in
the C/I text string.

  CLC   3(6,R1),=X'C9C5C6C2D9F1'  PROGRAM FOUND?

Here's where the whole thing goes to hell in a handbasket.  As a test, I'm
using program IEFBR14 and checking only for 'IEFBR1'.  Later I will check
for the real program (OLQ).  Anyway, what I get is:

10.48.09 JOB08625  THURSDAY,  29 SEP 2005 
10.48.09 JOB08625  $HASP900 FOUND EXEC KEY.
10.48.09 JOB08625  $HASP901 FOUND PGM= KEY.
10.48.11 JOB08625  IEA794I SVC DUMP HAS CAPTURED:  395
395 DUMPID=008 REQUESTED BY JOB (JES2)
395 DUMP TITLE=CONVERTER
ABENDED,ISSUER=IEFCNREX,ERRCSECT=IEFCNWRT,
10.48.11 JOB08625  IEFC683I CONVERTER TERMINATED DUE TO S0C4 ABEND
REASON=0010
10.48.11 JOB08625  $HASP904 CONVERSION COMPLETE.

I've tried various versions of the abending CLC command and am 
getting nowhere.


It's as if the C/I text is not as expected.


Try putting a LR R10,R1 before the $$WTO and use this R10 in the CLC 
- I think the $$WTO is destroying your R1 value so preserve it in R10 
(which is safe to use since it will then get used for the JCT 
Address).


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


SMPE DDDEF DSNTYPE Query

2005-09-30 Thread Robert A. Rosenberg
In reviewing the DDDEFs for a newly created set of Zones, I noticed 
that there was a DSNTYPE parm that has LIBRARY (ie: PDSE) defined for 
some of them. What is the significance for SMPE of having this set. 
IOW: Will I get into trouble if I have DDDEFs that are PDSEs but lack 
this setting?


Thank you.

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


Defining DASD-Only MVS Logging Streams

2005-09-30 Thread Robert A. Rosenberg
I am in the process of migrating come CICS/ESA 4.1 regions to CICS/TS 
2.3 and have run into a GOTCHA. CICS/TS 2.3 does not support CICS 
Controlled Journals but uses MVS Logging Streams for this purpose. In 
looking at the documentation  all of the descriptions and JCL 
Examples of MVS Logging Streams talk about using the Coupling 
Facility (although the is some mention of a DASD-Only alternative). I 
can find no examples or descriptions (I might have missed something) 
of how to go the DASD-Only route (we do not have a CF). Can someone 
please point me at the correct manual with samples of the needed JCL 
(or email me examples) to define the Stream as well as allocate the 
needed Datasets (if the Logger does not allocate/create them 
on-the-fly as needed). We need this for User Journals.


Thank you.

--
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: Squeezing defined capacity

2005-09-30 Thread ibm-main
From: "Gil Peleg"

: The perfect solution would have been to define a Defined Capacity to the
: entire machine and then define weights and no capping as usual, within
this
: defined capacity (I heard something about being able to do this on System
z9
: running z/OS 1.8 ??).

Capping LPARs anytime is bad - in the case of defined capacity, probably BAD
(broken as designed).
Just a monumental example of marketing apparently over-riding the techos.
The contortions customers have to perform to use the machinery they paid for
is mind-numbingly stupid.
The "perfect solution" Gil mentions, is surely the only common-sense
design - *from day 1*.
I too have a customer that moves MSUs around - although with less
regularity; end of month/quarter, that sort of thing.

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: Plan Now (Budget) for 2006 zSeries/z9 Summer Interns at Your Company/Gov't

2005-09-30 Thread ibm-main
Mmmm - maybe it's just my jaundiced eye, but this seems like platitude.
None of us are going to debate the need for training (generally), and/or the
need to introduce new blood.
Those of us actually on the shop-floor have been espousing this for years.

The belated discovery by IBM that maybe that golden goose they have been
strenuously throttling for years may in fact die, and take their business
with it, is hardly likely to engender sympathy.
Especially from those of us that have been struggling to keep businesses
going, despite IBMs (lack of) efforts.

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: Plan Now (Budget) for 2006 zSeries/z9 Summer Interns at Your Company/Gov't

2005-09-30 Thread Ed Gould

On Sep 30, 2005, at 2:56 PM, Timothy Sipples wrote:


Wow.  Guess I've got two "great mentor" candidates. :-)

Steve Comstock writes:

ROTFL!
Dream on! Most the companies I see today are
1. Trying to move off the mainframe
2. Trying to outsource their IT staff
3. Not spending any (or much) money on training.
You live in a dream world. I wish it were not so.
Those of us in the z/OS training world are dying a
[not so] slow death here.


So wouldn't it make sense to have more people to train?  Where do 
trainees
come from?  My market view happens to differ 180 degrees from yours, 
but

we're on the same side here, aren't we?

For those companies trying to "move off the mainframe," what they 
really

mean is they're trying to move off inflexible applications -- maybe
inflexible IT staff thinking, too -- that are not meeting business 
needs,
regardless of platform.  Who can blame them?  I recommend including 
college

interns in your efforts to modernize applications.

I'm hoping you have classes to offer on WebSphere Application Server 
for
z/OS, WebSphere Message Broker for z/OS, CICS 3.1 Web Services, 
WebSphere

Developer for zSeries, WebSphere Portal for z/OS, WebSphere Business
Integration Server Foundation for z/OS (and WebSphere Process Server 
for

z/OS), WebSphere HATS, Linux under z/VM, and many of the other new
middleware products, especially if those classes are focused on helping
companies modernize and integrate mainframe applications using SOA
principles.  If so, excellent.  I am seeing particularly strong 
training

demand in those areas.

Ed Gould writes:

I to thought it was funny. Here IBM wins a MAJOR outsourcing contract
to INDIA (no less) and they want us to help them out? Chuckle
chuckle...


My (first person pronoun not IBM) suggestion has everything to do with
helping YOU and much less to do with helping IBM.  Offshoring is 
pervasive
throughout the IT industry.  However, I do know that companies which 
can

recruit and retain home country talent are less likely to offshore.  If
you're concerned about offshoring you ought to be hiring college 
interns,

among other things.


Yes but here IBM is laying thousands off and then you want "others" to 
train people so IBM can take advantage of the training  and hire them 
so they can outsource even more companies/ There is something wrong in 
this picture, no?


Do get me wrong I am all for training a person so he/she will stick 
around a company not to just be there for when IBM gets the pick of the 
"litter"


One of the ideas behind training employees so they can better help the 
company he/she is working for NOT a company (like IBM) that comes in 
and takes over the processing of the same company.





I have never been more serious.  Either plant seeds now or you will 
soon
have a dead field with nothing to harvest.  Your dead field, in your 
own

country.  Yes, that's serious.

They way it is going soon IBM will be the mega employer and the only 
player in town, talk about dangerous.  Of course who is going to pay 
for all the fibre that will have to be laid to India and who will pay 
for that?


I'd also point out that running a reasonable college internship 
program is

inexpensive.





One final point.  Very recently I've mentored two college interns, and 
I

thoroughly enjoyed it -- and look forward to repeating the experience.
True, it's a big responsibility, and there are times when you think, 
"Could
he/she have possibly asked a more stupid question?" :-)  But, with a 
little
patience and a lot of concern for the intern, it's an experience that 
makes

me that much more enthusiastic about coming into the office.  I can't
recommend it enough.  Those of you involved in current college 
internship

programs at your companies know what I mean, I'm sure.

---SNIP-


While I am sure there are a few interns out there, IBM cut their own 
throat (we have talked about this in the past on here) by doing away 
with the educational discount. *IF* they have restarted it (and I am 
not sure they have) it will take at least 4-5 years for students to 
start graduating. But between now and then (maybe) . IBM seems to have 
finally awakened but the dishwater is gone and they will have to pay 
catch up by hiring the people that IBM help put on umemployment. What 
irony.


Ed (signed in dripping sarcasm)

--
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: How Many Jobcards in a JCL?

2005-09-30 Thread Ted MacNEIL
>The initial response to any query is "Why do you want to know?"
...

It took me a few years to learn that.
But, now it's my first question.
Lately, I've had so many 'solutions' and very few 'problems'.

-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: How Many Jobcards in a JCL?

2005-09-30 Thread Leonard Woren
On Thu, Sep 29, 2005 at 11:22:40AM -0400, Jon Brock ([EMAIL PROTECTED]) wrote:
> My answer would be, "Why do you want to know?"

Isn't that how you determine that someone is a systems programmer?
The initial response to any query is "Why do you want to know?"

It's actually an appropriate response since so many people ask the 
wrong question.


/Leonard

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


Germany-Frankfurt und Umgebung (german only)

2005-09-30 Thread Schiradin,Roland HG-Dir itb-db/dc
Hallo, 

am 07.10. findet in Frankfurt ein Treffen von ein paar Mainframe-Geeks statt. 
Bei Interesse bitte kurze Mail.
Anlass ist der Besuch von Ray Mullins in Deutschland. 

Wer kommt:

Ich 
Martin Trübner 
Ray Mullins (kommt aus den USA zum Kurzbesuch)
Joerg Berning 
Barbara Nitz 

Eingeladen sind noch weitere die ich in der näheren Umgebung kenne aber ich 
habe dazu noch keine Bestätigung.




Roland Schiradin
ALTE LEIPZIGER Lebensversicherung auf Gegenseitigkeit
IT Betrieb - DB/DC
Tel. (06171) 66-4095, Fax (06171) 66-7500-4095
mailto:[EMAIL PROTECTED]
http://www.Alte-Leipziger.de

--
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: Are there any mainframe sites out there that don't use JCLCHECK/JCLPREP or equivalent?

2005-09-30 Thread Bill Godfrey
On Fri, 30 Sep 2005 15:39:20 -0400, Farley, Peter x23353
<[EMAIL PROTECTED]> wrote:

>Am I the only one who gets a lot of weird characters trying to read the
two
>supposed EXEC's at that link?  Both valJCL.txt and jproc.txt (links on
that
>page) appear not to be EXEC source at all.
>
>Even uploaded in binary, they do not appear to be EBCDIC, nor do they look
>like an XMI file, nor do they look like compiled REXX, so I am at a loss
how
>to run them or customize them.
>
>Are these by any chance compressed or "tersed" files?  The author
certainly
>doesn't say so on that website.
>
>Peter
>
>> http://www-106.ibm.com/developerworks/eserver/articles/valjcl.html

You are not the only one. Using "wget" on linux to retrieve those two
links, I got them in "gzip" compressed format. I repeated the "wget" 3
more times. Once out of the four attempts it came in ascii text form. When
it came in "gzip" form the http headers preceding it included "Content-
Encoding: gzip".

Bill Godfrey

--
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: Plan Now (Budget) for 2006 zSeries/z9 Summer Interns at Your Company/Gov't

2005-09-30 Thread Bill Seubert
On Fri, 30 Sep 2005 15:08:44 -0500, Chase, John <[EMAIL PROTECTED]> wrote:
>
>Out here on "Planet Earth" it seems that most of the companies trying to
>"move off the mainframe" are doing so to save copious amounts of money in
>the short term (the "long term" seems no longer to exist).

Of course based upon the flawed assumption that such a move actually will
save their company money.  Which, in the vast majority of cases is pure
fiction.  It's usually because of bizarrely-flawed chargeback mechanisms
that grossly misrepresent the actual cost-of-ownership and make that cheap
Intel server in the corner look like a bargin (until they look to see that
it actually takes 10 or 20 of those servers to host one application, and
several people to do the same level of administration that is done by half
that many for the mainframe equivalent).

---
Bill Seubert
zSeries Software I/T Architect
[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: Plan Now (Budget) for 2006 zSeries/z9 Summer Interns at Your Company/Gov't

2005-09-30 Thread Steve Comstock

Steve Comstock wrote:

[snip-it-all]

Whoa! Did I say that out loud?

Sorry. I seem to recall I pledged not to whine
anymore this year.

It won't happen again.

Kind regards,

-Steve Comstock

--
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: Plan Now (Budget) for 2006 zSeries/z9 Summer Interns at Your Company/Gov't

2005-09-30 Thread Bill Seubert
Guys, Tim and I each talk to dozens of companies every year.  And I know
that he and I and our colleagues see/hear the same thing over and over -
"help us with this skills problem".  Every time, *without fail*, that I
mention the Academic Initiative zSeries Program (aka "zScholars"), my
customers just fall over themselves to learn more about it.  Companies WANT
to hire young people who have zSeries skill - but they are few and far
between.  If you/we grow them, they will be very valuable.

This is a classic chicken/egg situation.  If there aren't enough skills,
companies will go elsewhere to find them.  Without skills, we/you cannot put
more stuff on the mainframe and/or maintain what's there, so there is a net
movement away from the platform, and the skills become less of an issue.
What Tim is suggesting is that you should act (with IBM's help, I might add)
to introduce new blood to the platform.  Encourage young people to join the
mainframe support teams.  Get your alma mater involved in the Academic
Initiative.

This is not just a "zSeries Software Architect Preservation Program".  We
both happen to also have skills in Java development, Linux, web application
architecture, etc. to go along with our mainframe skills (after all, girls
like guys with good skills... :-) )  But we both also are rabid zSeries/z9
evangelists and sincerely believe (as does the IBM Corporation) that this is
a vital platform to the business success of those companies that run z
(which happen to be the vast majority of the Fortune 500).  Getting new
mainframe-skilled staff is critical.  Anyone who is truly interested in the
vitality of the platform should be eager to do whatever they can to build
interest and skills in college students and/or anyone new to I/T.

An interesting story from search390:
http://search390.techtarget.com/qna/0,,sid10_gci536224,00.html

All I can say is: this is a lot more fun than working with (as a friend of
mine refers to them) "gaming servers"...

---
Bill Seubert
zSeries Software I/T Architect
[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: LRAL and GOFF

2005-09-30 Thread john gilmore
Miklos has said that the target is on a fullword boundary, which is a 
fortiori a halfword boundary too.


I have not, however, been able to reproduce his problem.  We need more 
information to help, and to clarify exactly what the HLASM thinks the GOFF 
option in effect is, I suggest the addition of the following mnote


|  mnote  1,'The current effective value of the  GOFF option is 
&SYSOPT_XOBJECT..'


beinserrtedinto the assembly.

John Gilmore
Ashland, MA 01721
USA

_
Is your PC infected? Get a FREE online computer virus scan from McAfee® 
Security. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963


--
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: Plan Now (Budget) for 2006 zSeries/z9 Summer Interns at Your Company/Gov't

2005-09-30 Thread Steve Comstock

Timothy Sipples wrote:

Wow.  Guess I've got two "great mentor" candidates. :-)

Steve Comstock writes:


ROTFL!
Dream on! Most the companies I see today are
1. Trying to move off the mainframe
2. Trying to outsource their IT staff
3. Not spending any (or much) money on training.
You live in a dream world. I wish it were not so.
Those of us in the z/OS training world are dying a
[not so] slow death here.



So wouldn't it make sense to have more people to train?  


Huh? How does that follow?


Where do trainees
come from?  


What do you mean? Companies who want to train their
existing staff or new hires or people moving into
IT from other parts of the company. It's not
happening.

My market view happens to differ 180 degrees from yours, but

we're on the same side here, aren't we?


Maybe, but not on the same team. You get a paycheck
twice a month, regardless of what you do, including
vactions, sick leave, meetings, goofing off, etc.

No one held a gun to my head to tell me to be
self-employed, but we have a different motivation,
by definition.



For those companies trying to "move off the mainframe," what they really
mean is they're trying to move off inflexible applications -- maybe
inflexible IT staff thinking, too -- that are not meeting business needs,
regardless of platform.  


_Maybe_  that's what they mean. But it looks to me like
they just want to get costs down for the near term
so they can get their quarterly bonus. [Management,
I'm talking about, of course.] [And, of course, there
are some exceptions, but not many.]


Who can blame them?  I recommend including college

interns in your efforts to modernize applications.



Excuse me? I know I need to continually update my
curriculum, but I cannot pay any interns, and no
young college student is interested in learning
mainframe skills. The University of Colorado (or
was it Colorado State University? help me out here
Howard or Paul) offers a degree in computer gaming,
and they are dropping their degree program in
IT itself: enrollments too low.




I'm hoping you have classes to offer on WebSphere Application Server for
z/OS, WebSphere Message Broker for z/OS, CICS 3.1 Web Services, WebSphere
Developer for zSeries, WebSphere Portal for z/OS, WebSphere Business
Integration Server Foundation for z/OS (and WebSphere Process Server for
z/OS), WebSphere HATS, Linux under z/VM, and many of the other new
middleware products, especially if those classes are focused on helping
companies modernize and integrate mainframe applications using SOA
principles.  If so, excellent.  I am seeing particularly strong training
demand in those areas.


Yeah, that's nice. We offer CICS Web stuff, and we are
writing courses for WS4z; there's only two of us
writing materials, and there's a lot of learning curve.
In the past several years we have added courses in Java,
XML, z/OS UNIX, and I've updated all the classic courses
to reflect the latest Assembler, compilers, DB2, etc.
We're working hard, trying to work smart, and trying to
keep up (or get ahead).

I have had 28 billable days all year, my colleague a
few more. There is nothing else on the books right now
- forever. Well, that gives me lots of time to write
new courses.



Kind regards,

-Steve Comstock

--
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: Plan Now (Budget) for 2006 zSeries/z9 Summer Interns at Your Company/Gov't

2005-09-30 Thread Chase, John
> -Original Message-
> From: IBM Mainframe Discussion List On Behalf Of Timothy Sipples
> 
> Wow.  Guess I've got two "great mentor" candidates. :-)
> 
> Steve Comstock writes:
> >ROTFL!
> >Dream on! Most the companies I see today are 1. Trying to move off the 
> >mainframe 2. Trying to outsource their IT staff 3. Not spending any (or 
> >much) money on training.
> >You live in a dream world. I wish it were not so.
> >Those of us in the z/OS training world are dying a [not so] slow death 
> >here.
> 
> So wouldn't it make sense to have more people to train?  
> Where do trainees come from?  My market view happens to 
> differ 180 degrees from yours, but we're on the same side 
> here, aren't we?
> 
> For those companies trying to "move off the mainframe," what 
> they really mean is they're trying to move off inflexible 
> applications -- maybe inflexible IT staff thinking, too -- 
> that are not meeting business needs, regardless of platform.

Out here on "Planet Earth" it seems that most of the companies trying to
"move off the mainframe" are doing so to save copious amounts of money in
the short term (the "long term" seems no longer to exist).

-jc-

--
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: Are there any mainframe sites out there that don't use JCLCHECK/JCLPREP or equivalent?

2005-09-30 Thread Imbriale, Donald (Exchange)
They look fine to me.  Here's the first few lines of valJCL.txt after
the opening comment header:

MM = 1
 PRCLINE = " "
 SEP_EQ = "="
 PLC1 = 1
 PLC2 = 0
 CTR  = 1
T1 = TIME('R')
CALL INIT
CALL JPROC
CALL SHOW
CALL WRITE_FILE
SIGNAL QUIT

And this is the start of jproc after the comment header:

T1 = TIME('R')
CALL INIT
CALL JCLLIB_CHECK
CALL PRC_CHECK
SIGNAL QUIT
INIT:
   PRCLINE = " "
   SEP_EQ = "="

Don Imbriale

>-Original Message-
>From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf
>Of Farley, Peter x23353
>Sent: Friday, September 30, 2005 3:39 PM
>To: IBM-MAIN@BAMA.UA.EDU
>Subject: Re: Are there any mainframe sites out there that don't use
>JCLCHECK/JCLPREP or equivalent?
>
>Am I the only one who gets a lot of weird characters trying to read the
two
>supposed EXEC's at that link?  Both valJCL.txt and jproc.txt (links on
that
>page) appear not to be EXEC source at all.
>
>Even uploaded in binary, they do not appear to be EBCDIC, nor do they
look
>like an XMI file, nor do they look like compiled REXX, so I am at a
loss how
>to run them or customize them.
>
>Are these by any chance compressed or "tersed" files?  The author
certainly
>doesn't say so on that website.
>
>Peter
>


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

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


Re: Plan Now (Budget) for 2006 zSeries/z9 Summer Interns at Your Company/Gov't

2005-09-30 Thread McKown, John
> -Original Message-
> From: IBM Mainframe Discussion List 
> [mailto:[EMAIL PROTECTED] On Behalf Of Steve Comstock
> Sent: Friday, September 30, 2005 11:28 AM
> To: IBM-MAIN@BAMA.UA.EDU
> Subject: Re: Plan Now (Budget) for 2006 zSeries/z9 Summer 
> Interns at Your Company/Gov't
> 
> 
> Timothy Sipples wrote:
> > I know IBM is in the midst of an annual budget planning 
> cycle.  While 
> > many of the companies and governments we work for are going 
> through a 
> > similar process, it's important to plan ahead, just as we do for 
> > disaster recovery, capacity upgrades, and new applications. 
>  IT talent 
> > retention and recruitment also requires careful planning.
> > 
> 
> [snip]
> 
> ROTFL!
> 
> Dream on! Most the companies I see today are
> 1. Trying to move off the mainframe
> 2. Trying to outsource their IT staff
> 3. Not spending any (or much) money on training.
> 
> You live in a dream world. I wish it were not so.
> 
> Those of us in the z/OS training world are dying a
> [not so] slow death here.
> 
> Kind regards,
> 
> -Steve Comstock
> 

At our installation, this is true of even on the "dark side" as well.
Everybody here is expected to know everything, when needed. We
__almost__ got some training on Java technologies when we acquired
another company. But that died quickly. "We are not a training
institution!"

--
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: Plan Now (Budget) for 2006 zSeries/z9 Summer Interns at Your Company/Gov't

2005-09-30 Thread Timothy Sipples
Wow.  Guess I've got two "great mentor" candidates. :-)

Steve Comstock writes:
>ROTFL!
>Dream on! Most the companies I see today are
>1. Trying to move off the mainframe
>2. Trying to outsource their IT staff
>3. Not spending any (or much) money on training.
>You live in a dream world. I wish it were not so.
>Those of us in the z/OS training world are dying a
>[not so] slow death here.

So wouldn't it make sense to have more people to train?  Where do trainees
come from?  My market view happens to differ 180 degrees from yours, but
we're on the same side here, aren't we?

For those companies trying to "move off the mainframe," what they really
mean is they're trying to move off inflexible applications -- maybe
inflexible IT staff thinking, too -- that are not meeting business needs,
regardless of platform.  Who can blame them?  I recommend including college
interns in your efforts to modernize applications.

I'm hoping you have classes to offer on WebSphere Application Server for
z/OS, WebSphere Message Broker for z/OS, CICS 3.1 Web Services, WebSphere
Developer for zSeries, WebSphere Portal for z/OS, WebSphere Business
Integration Server Foundation for z/OS (and WebSphere Process Server for
z/OS), WebSphere HATS, Linux under z/VM, and many of the other new
middleware products, especially if those classes are focused on helping
companies modernize and integrate mainframe applications using SOA
principles.  If so, excellent.  I am seeing particularly strong training
demand in those areas.

Ed Gould writes:
>I to thought it was funny. Here IBM wins a MAJOR outsourcing contract
>to INDIA (no less) and they want us to help them out? Chuckle
>chuckle...

My (first person pronoun not IBM) suggestion has everything to do with
helping YOU and much less to do with helping IBM.  Offshoring is pervasive
throughout the IT industry.  However, I do know that companies which can
recruit and retain home country talent are less likely to offshore.  If
you're concerned about offshoring you ought to be hiring college interns,
among other things.

I have never been more serious.  Either plant seeds now or you will soon
have a dead field with nothing to harvest.  Your dead field, in your own
country.  Yes, that's serious.

I'd also point out that running a reasonable college internship program is
inexpensive.

One final point.  Very recently I've mentored two college interns, and I
thoroughly enjoyed it -- and look forward to repeating the experience.
True, it's a big responsibility, and there are times when you think, "Could
he/she have possibly asked a more stupid question?" :-)  But, with a little
patience and a lot of concern for the intern, it's an experience that makes
me that much more enthusiastic about coming into the office.  I can't
recommend it enough.  Those of you involved in current college internship
programs at your companies know what I mean, I'm sure.

- - - - -
Timothy F. Sipples
Consulting Enterprise Software Architect
IBM Americas zSeries/z9 Software
Phone: +1 312 529 1612
E-Mail: [EMAIL PROTECTED]
who speaks for himself unless writing something like "IBM says...," in
which case I'm only quoting others :-)
--
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: Are there any mainframe sites out there that don't use JCLCHECK/JCLPREP or equivalent?

2005-09-30 Thread Paul Gilmartin
In a recent note, Steve Grimes said:

> Date: Fri, 30 Sep 2005 13:23:22 -0500
> 
> Here's the doc from the free one (member $$DOCJCL).   It's called JCLSCAN.
>  The CBT references are at the bottom.
> 
> -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
> 
>   DOCUMENTATION FOR JCLSCAN TSO COMMAND PROCESSOR
> 
>   This highly convenient program calls MVS's JCL converter
>  to report JCL errors in a jobstream on your TSO tube.  It is the
>  same program which checks the errors when you run a real jobstream
>  with TYPRUN=SCAN.  The output has been massaged to make it more
>  convenient to display on the terminal.  All syntax errors are found,
> 
... which is sheer nonsense.  The following DD statement passes
TYPRUN=SCAN with no exception reported:

4 //SYSUT1DD   DISP=(MOD,DELETE),
  //  DSN=X2345678.X2345678.X2345678.X2345678.X2345678.X2345678

... whereas with the TYPRUN omitted it properly gets:

13.33.35 JOB08407  IEF452I SCAN - JOB NOT RUN - JCL ERROR
13.33.35 JOB08407  $HASP396 SCAN TERMINATED
...
4 //SYSUT1DD   DISP=(MOD,DELETE),
  //  DSN=X2345678.X2345678.X2345678.X2345678.X2345678.X2345678

 STMT NO. MESSAGE
4 IEF642I EXCESSIVE PARAMETER LENGTH IN THE DSNAME FIELD

Clearly, since the IEF452I message says the job was not run,
this is a syntax error, not a semantic error, but TYPRUN=SCAN
fails to report it.

TYPRUN=SCAN is worse than worthless; it's a WOMBAT for anyone
who relies on its output.  A sensibly designed SCAN would process
up to the point at which the decision is made to issue or not
issue the IEF452I message, and bypass execution if SCAN is
specified and IEF452I is not issued.

-- 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: Are there any mainframe sites out there that don't use JCLCHECK/JCLPREP or equivalent?

2005-09-30 Thread Farley, Peter x23353
Am I the only one who gets a lot of weird characters trying to read the two
supposed EXEC's at that link?  Both valJCL.txt and jproc.txt (links on that
page) appear not to be EXEC source at all.

Even uploaded in binary, they do not appear to be EBCDIC, nor do they look
like an XMI file, nor do they look like compiled REXX, so I am at a loss how
to run them or customize them.

Are these by any chance compressed or "tersed" files?  The author certainly
doesn't say so on that website.

Peter

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] 
Sent: Friday, September 30, 2005 2:41 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Are there any mainframe sites out there that don't use
JCLCHECK/JCLPREP or equivalent?

In August 2004, Herman Stocker posted the following information about
another JCL checker:

Have you tried the FREE JCL Checker valJCL from:

G.VenkataKrishnan ([EMAIL PROTECTED])
Senior Software Engineer, IBM Global Services India

 http://www-106.ibm.com/developerworks/eserver/articles/valjcl.html

The price is right and you can customize it.

Don Imbriale

_
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: WTO Problem

2005-09-30 Thread Shmuel Metz (Seymour J.)
In <[EMAIL PROTECTED]>, on 09/30/2005
   at 07:49 AM, Jerry Ragland <[EMAIL PROTECTED]> said:

>This is the part of part of source code where I get the error -

> STR14,VTMPARM+12
> LAR01,VTMPARM
> WTO   'B BPXI'
> L R15,=V(BPX1MPI)
> BALR  R14,R15

Why do you expect R1 to be intact after the WTO?
 
-- 
 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: Are there any mainframe sites out there that don't use JCLCHECK/JCLPREP or equivalent?

2005-09-30 Thread Imbriale, Donald (Exchange)
In August 2004, Herman Stocker posted the following information about
another JCL checker:

Have you tried the FREE JCL Checker valJCL from:

G.VenkataKrishnan ([EMAIL PROTECTED])
Senior Software Engineer, IBM Global Services India

 
http://www-106.ibm.com/developerworks/eserver/articles/valjcl.html

The price is right and you can customize it.


Don Imbriale

>-Original Message-
>From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf
>Of Steve Grimes
>Sent: Friday, September 30, 2005 2:23 PM
>To: IBM-MAIN@BAMA.UA.EDU
>Subject: Re: Are there any mainframe sites out there that don't use
>JCLCHECK/JCLPREP or equivalent?
>
>Here's the doc from the free one (member $$DOCJCL).   It's called
JCLSCAN.
> The CBT references are at the bottom.
>


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

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


Re: Are there any mainframe sites out there that don't use JCLCHECK/JCLPREP or equivalent?

2005-09-30 Thread Steve Grimes
Here's the doc from the free one (member $$DOCJCL).   It's called JCLSCAN. 
 The CBT references are at the bottom.

-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=

  DOCUMENTATION FOR JCLSCAN TSO COMMAND PROCESSOR


  This highly convenient program calls MVS's JCL converter
 to report JCL errors in a jobstream on your TSO tube.  It is the
 same program which checks the errors when you run a real jobstream
 with TYPRUN=SCAN.  The output has been massaged to make it more
 convenient to display on the terminal.  All syntax errors are found,
 but "DATASET NOT FOUND"-type errors, which are produced by the
 JCL interpreter, are not shown by this processing, which is done
 by the JCL CONVERTER.

  The program consists of two parts:  the TSO command processor
called JCLSCAN, and a user SVC, which does all the dirty work of calling
the MVS JCL CONVERTER.  The SVC is type 4.

  To use the program, just execute the TSO command:

JCLSCAN 'dataset-name'

  This program was found on a large file of utilities submitted to
the CBT tape from MEMOREX.  It may be found on versions 260 and older.
The file was file 313 on those versions of the CBT tape.  That file
contained over 100,000 lines of code, and contains many old but still
useful utilities.  You may have to tell some of them that 3380 or even
3350 disk drives exist, but once this is done, many of these programs
still work.  The file is much worth exploring.  It was deleted from
version 261 of the CBT tape.


  Version 249 of the CBT tape, which may be obtained from SHARE,
(see file 1 of the current CBT tape for instructions how to order it)
has this material on file 313.

-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
And here are the install instructions from the same PDS (member: $INSJCLS)
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=

  INSTALLATION INSTRUCTIONS FOR JCLSCAN


JCLSCAN IS A TSO COMMAND PROCESSOR WHICH EXECUTES THE IBM JCL CONVERTER
  IN THE FOREGROUND.  YOU POINT IT TO A DATASET OF JCL (A JOB) AND
  IT RETURNS YOUR JCL ERRORS TO THE TERMINAL AS THOUGH IT WERE EXECUTED
  WITH TYPRUN=SCAN.  THIS IS ESPECIALLY VALUABLE WHEN MAKING NEW JCL.
  YOU CAN TEST THE JCL WITHOUT USING AN INITIATOR.  THE CONVERTER RUNS
  COMPLETELY IN THE FOREGROUND.

THE JCLSCAN PROCESSOR WORKS WITH AN SVC WHICH ACTUALLY CALLS THE JCL
  CONVERTER.  OUTPUT FROM THE CONVERTER IS RETURNED TO THE COMMAND
  PROCESSOR, WHICH FORMATS IT FOR THE SCREEN.

HELP INFORMATION FOR THE TSO COMMAND JCLSCAN IS INCLUDED IN THE SOURCE
  CODE.  COPY THAT INFORMATION INTO A TSO HELP DATASET AND EDIT IT
  SO IT FITS THE HELP FORMAT.

TO INSTALL :

   A.  ASSEMBLE THE JCLSCAN COMMAND AND THE SVC INTO AN AUTHORIZED
 LOAD LIBRARY.  (PICK AN UNUSED TYPE 3 OR TYPE 4 SVC NUMBER.)

   B.  IF YOU HAVE MODREP OR THE EQUIVALENT (TO MLPA THE SVC
 DYNAMICALLY) THEN MLPA THE SVC FOR TESTING.  MODREP IS ON
 JIM MARSHALL'S FILE 316 OF THE CBT TAPE OR RICE UNIVERSITY
 FILE 336.  WHEN IT WORKS TO YOUR SATISFACTION, COPY THE SVC
 INTO SYS1.LPALIB AND IPL MVS WITH CLPA.




--
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: ftp restart data transfer

2005-09-30 Thread Martin Kline
> Is there any way to restart a ftp data transfer from a mainframe
> to a server after a server timeoout?

In the spirit of so many of this lists members, the answer is to simply 
restart it - from the beginning. I suspect, however, that you want to 
resume the process. For that, I have no solution.
CONFIDENTIALITY NOTICE:  This electronic transmission (including any
accompanying attachments) is intended solely for its authorized
recipient(s), and may contain confidential and/or legally privileged
information.  If you are not an intended recipient, or responsible for
delivering some or all of this transmission to an intended recipient, be
aware that any review, copying, printing, distribution, use or disclosure of
the contents of this message is strictly prohibited.  If you have received
this electronic message in error, please contact us immediately by
electronic mail at [EMAIL PROTECTED] or notify us
immediately by telephone at 1-800-345-2021 or 816-531-5575 and destroy the
original and all copies of this transmission (including any attachments).
Thank you.



--
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: ftp restart data transfer

2005-09-30 Thread John S. Giltner, Jr.

Pilar Izquierdo Ibañez wrote:

Is there any way to restart a ftp data transfer from a mainframe to a
server after a server timeoout?
Thanks



Check the TCP/IP books for z/OS.  There is a restart feature/function, 
however IIRC it only works if the other side is also z/OS.


--
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: Squeezing defined capacity

2005-09-30 Thread Bruno Sugliani
On Fri, 30 Sep 2005 18:58:38 +0200, Gil Peleg <[EMAIL PROTECTED]> wrote:


>of cpu. What we would like to do is to detect this situation and
>automatically change the MSUs in favour of the LPAR running at 100% cpu. For
>example - if the PROD is at 100% during the night, we would like to take 20
>more MSUs from the DEV LPAR and add them to the PROD. We dont want to breach
e 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

Hi
In order to detect , use RMFM3B ( ERBR3CPC)  that is what we do and it works
In order to change without SAO  i don't know ... i guess  API  to HMC is the
solution
Bruno

--
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: Are there any mainframe sites out there that don't use

2005-09-30 Thread Paul Gilmartin
In a recent note, Howard Brazee said:

> Date: Fri, 30 Sep 2005 09:33:33 -0600
> 
> On 30 Sep 2005 07:32:56 -0700, "sekisho" <[log in to unmask]> wrote:
> 
> >Despite massive user objection, we've just de-installed JCLCHECK and
> >are now back in the 1980's dark days of TYPRUN=SCAN. Apparantly we
> >don't need JCL checking software. Are we now the only z/os site in the
> >world that doesn't have JCL checking software?
> 
This was what motivated me, a few weeks ago to get into a rant
about the JCL "IF" statement.  I had discovered that wrapping
the entire job with a "IF FALSE THEN" ... ENDIF provides more
thorough checking than "TYPRUN=SCAM^HN".  But unless I precede
the "IF" with an IEFBR14 step, the first job step in the "THEN"
part executes regardless.  It's a shabby design.  (Yes, I
know that "IF FALSE" is technically forbidden by the syntax in
the RM.  It works regardless.  That's a shabby implementation
of a shabby design.)

> I never figured out what the advantage of JCLCHECK was.   It's part of
> the procedure before jobs get migrated, but new jobs find a bunch of
> errors anyway as it doesn't find stuff in their post-migration
> locations.
> 
> Testing should find errors before it gets to this stage.What kind
> of error will JCLCHECK find that matter?

-- 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: Plan Now (Budget) for 2006 zSeries/z9 Summer Interns at Your Company/Gov't

2005-09-30 Thread Ed Gould

On Sep 30, 2005, at 11:27 AM, Steve Comstock wrote:




---SNIP---

ROTFL!

Dream on! Most the companies I see today are
1. Trying to move off the mainframe
2. Trying to outsource their IT staff
3. Not spending any (or much) money on training.

You live in a dream world. I wish it were not so.

Those of us in the z/OS training world are dying a
[not so] slow death here.

Kind regards,

-Steve Comstock



Steve,

I to thought it was funny. Here IBM wins a MAJOR outsourcing contract 
to INDIA (no less) and they want us to help them out? Chuckle 
chuckle...


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


Squeezing defined capacity

2005-09-30 Thread Gil Peleg
Hello all,
 We are running 2084-303 which provides us 191 MSUs. We have 4 LPARs.
Only in a couple of months new workload will start running in production on
this machine that will actually require all 191 MSUs, so meanwhile each LPAR
has its own Defined Capacity defined.
 The defined capacity during the day is curretly:
PROD - 30
TEST - 15
DEV - 50
SANDBOX - 5
Which adds up to 100 MSUs -- so we are actually using a little over half the
machine.
 Before the night shift, we change the MSUs to:
 PROD - 55
TEST - 10
DEV - 30
SANDBOX - 5
Which still adds up to 100 MSUs.
 Currently, the change is done manually by the operators.
 From time to time we notice that one LPAR is using 100% cpu for long
periods of time and is WLM Capped 100%, while other LPARs arent using a lot
of cpu. What we would like to do is to detect this situation and
automatically change the MSUs in favour of the LPAR running at 100% cpu. For
example - if the PROD is at 100% during the night, we would like to take 20
more MSUs from the DEV LPAR and add them to the PROD. We dont want to breach
the 100 MSUs limit, it is more than enough, we just need to change MSU
"weight" within these 100 MSUs.
 The perfect solution would have been to define a Defined Capacity to the
entire machine and then define weights and no capping as usual, within this
defined capacity (I heard something about being able to do this on System z9
running z/OS 1.8 ??).
While writing these lines i'm thinking we just shouldnt have enabled that
3rd CP yet.. but thats the situation now.
 We dont use System Automation, so what would you recommend as the best
solution to dynamically change the Defined Capacity in that case? Currently,
the best idea I got is to write a program which uses the HMC API to change
the Defined Capacity according to some simple predefined rules.
 Thanks,
Gil.

--
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: Are there any mainframe sites out there that don't use JCLCHECK/JCLPREP or equivalent?

2005-09-30 Thread Farley, Peter x23353
Do you by chance remember the name or file number on CBT, or any key string
one could use to find it in the CBTF1 doc?

Peter 

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Steve Grimes
Sent: Friday, September 30, 2005 11:55 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Are there any mainframe sites out there that don't use
JCLCHECK/JCLPREP or equivalent?


There is a free one out there (CBT has it, I think,) 

_
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: Are there any mainframe sites out there that don't use JCLCHECK/JCLPREP or equivalent?

2005-09-30 Thread Julian Levens
Back in 1997 I finally managed to convince the powers that be where I worked
at that time, to instigate a new JCL standard. This consisted of using JOBs
that looked something like this.

//PAA123  JOB (ACC),'A JOB',CLASS=C,MSGCLASS=S
//*
//JCLLIB ORDER=(HLQ.PROD.PROCLIB)
//*
//INCLUDE MEMBER=PROD
//*
//INCLUDE MEMBER=AA123

The PROD member was known as the environment member as it would contain a
JOBLIB and a whole load of SET statements to describe the nature of the
environment the job would run under. The point being that there were any
number of TESTxx environment members describing different environments.

The AA123 type members were logically speaking PROCs except that they were
not EXECed. This allowed PROCs to be called within this member. For example
there was a PROC called RUNDB2 to run a COBOL DB2 program something like:

//STEPC   EXEC RUNDB2,PROG=ABC1234
//FILEIN  DD DSN=&FILEPREF..SOME.DSN.QUALS,DISP=SHR
//OTHER   DD STUFF etc

The RUNDB2 was of course carefully coded to run using the right DB2
sub-system, the correct PLAN etc for the environment in question. Another
useful PROC was one that took SYSIN members (from a concatenation to support
test environments and source control tools (SCLM)) and substituted any
environment symbols with the correct value. There were a number of standard
PROCs that enabled relatively simple application JCL to be written.

To run a job in non-production environment the JOB would need to change as
follows:

//OAA123  JOB (ACC),'A JOB',CLASS=C,MSGCLASS=S
  + Different letter for start of jobname
//*
//JCLLIB ORDER=(HLQ.OTEST.PROCLIB,HLQ.PROD.PROCLIB)
+ Different concatenation of PROCLIBs

//*
//INCLUDE MEMBER=OTEST
//*
//INCLUDE MEMBER=AA123
//*

It was trivial to write an ESUB edit macro to handle this (the original
version was only 10 lines of rexx IIRC).

We ended up with developers using production JCL with a quick ESUB to test
their programs. The same JCL was then used by test teams with ESUB used to
select a different environment. Basically, we ended up with Witty-Wiggle:
WITIWGL - What Is Tested Is What Goes Live. Also, once created the JOB was
used again by developers when doing further development and testing of their
programs, ESUB made this easy.

I had previously worked at sites that used PROCedural JCL, but due to its
limitations JOBs were hacked a little in each test environment to get them
to work. Therefore, as JOBs hit production there were often problems!

Our User Test departments loved it. Previously it took days to copy
production JCL to their test libraries and hack around with it to get it to
work, and they still found problems after that. After the change, we simply
copied the JOB library, PROClib and SYSIN library across to their libraries,
which only took minutes. Then we told the users to use ESUB
 instead of SUB, they picked this up immediately
especially as they found there were were no JCL problems anymore!

Now the pedants/observant amongst you will realise that the JOB deck itself
was in a sense hacked from environment to environment. However, the standard
production job were generated in a standard form to eliminate errors.
Similarly, the changes made by the ESUB edit macro were very simple, whereas
the changes made by other tools (JCLPREP et al) has to be more extensive.
The core logic of the job to be performed was in the 'PROC' that was
executed and this was never touched from environment to environment.

This was one of the best pieces of work I have put together and implemented
and I believe it could benefit many other sites. However, the biggest
barrier to adoption is the initial conversion and testing.

I wonder if other sites have done something similar?

Cheers

Julian



>
> On 30 Sep 2005 07:32:56 -0700, "sekisho" <[EMAIL PROTECTED]> wrote:
>
> >Despite massive user objection, we've just de-installed JCLCHECK and
> >are now back in the 1980's dark days of TYPRUN=SCAN. Apparantly we
> >don't need JCL checking software. Are we now the only z/os site in the
> >world that doesn't have JCL checking software?
>
> I never figured out what the advantage of JCLCHECK was.   It's part of
> the procedure before jobs get migrated, but new jobs find a bunch of
> errors anyway as it doesn't find stuff in their post-migration
> locations.
>
> Testing should find errors before it gets to this stage.What kind
> of error will JCLCHECK find that matter?
>


Try Capscan's new online bureau at http://www.capscanintegrity.com

*  Matchcode International "Best International Product" at IDMF  *

***
This e-mail is confidential and intended solely for the use of the individual 
to whom it was addressed. If you are not the intended recipient, you are hereby 
notified that any dissemination, distribution or copying of  this message is 
strictly prohibited. Please delete any copies you may have, on any c

Re: Plan Now (Budget) for 2006 zSeries/z9 Summer Interns at Your Company/Gov't

2005-09-30 Thread Steve Comstock

Timothy Sipples wrote:

I know IBM is in the midst of an annual budget planning cycle.  While many
of the companies and governments we work for are going through a similar
process, it's important to plan ahead, just as we do for disaster recovery,
capacity upgrades, and new applications.  IT talent retention and
recruitment also requires careful planning.



[snip]

ROTFL!

Dream on! Most the companies I see today are
1. Trying to move off the mainframe
2. Trying to outsource their IT staff
3. Not spending any (or much) money on training.

You live in a dream world. I wish it were not so.

Those of us in the z/OS training world are dying a
[not so] slow death here.

Kind regards,

-Steve Comstock

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


Re: OT The Original MF?

2005-09-30 Thread Bruce Black

more like the original "palm PC"

--
Bruce A. Black
Senior Software Developer for FDR
Innovation Data Processing 973-890-7300
personal: [EMAIL PROTECTED]
sales info: [EMAIL PROTECTED]
tech support: [EMAIL PROTECTED]
web: www.innovationdp.fdr.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


Plan Now (Budget) for 2006 zSeries/z9 Summer Interns at Your Company/Gov't

2005-09-30 Thread Timothy Sipples
I know IBM is in the midst of an annual budget planning cycle.  While many
of the companies and governments we work for are going through a similar
process, it's important to plan ahead, just as we do for disaster recovery,
capacity upgrades, and new applications.  IT talent retention and
recruitment also requires careful planning.

The ongoing knowledge and vitality of your IT staff is critical to your
companies' success.  The ability to maintain and enhance core business
applications and systems is well worth protecting.  That's why now's the
time to recruit and cultivate the next generation of talented IT
professionals.  Many of them are enrolled in colleges and universities
around the world, and some of them need to work for you next summer.  So
here are some suggestions:

1.  Ask your management to hire two or more college interns in 2006 for a
zSeries/z9 experience.

2.  Volunteer to become a mentor to one or more interns.  (It can be
tremendously rewarding.)

3.  Contact one or more universities and colleges now to let them know that
your company/government is eager to hire the most talented students as
summer interns.  You can get more information on the colleges and
universities with zSeries/z9 programs by visiting:

  http://www.developer.ibm.com/university/scholars/products/zseries/

If your favorite institution is not on the "Participating Universities"
list, don't panic.  That list keeps growing, and you should work with IBM
and your preferred university to see whether they would like to
participate.

I suggest "two or more" interns to avoid the "lonely intern" experience.
Interns often need peer support.  They also need real, challenging
assignments that will help them become excited about the field, and that
requires a great mentor like you.  Mentors set reasonable objectives,
provide advice and coaching, and help clear bureaucratic obstacles that
might prevent an intern from a true work experience.  I recommend NOT
hiring interns simply to move tapes, deliver printouts, or perform data
entry.  The best summer experience encourages interns to contribute in some
meaningful way to your company's success, to gain access to a variety of
people, to work with customers (with reasonable supervision), and to learn
-- about your company and about the important work you do to keep the
business running smoothly.

Have a great summer!

- - - - -
Timothy F. Sipples
Consulting Enterprise Software Architect
IBM Americas zSeries/z9 Software
Phone: +1 312 529 1612
E-Mail: [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: Are there any mainframe sites out there that don't use JCLCH ECK/JCLPREP or equivalent?

2005-09-30 Thread Craig Kittendorf
We do not have any of these tools either.

-Original Message-


>Despite massive user objection, we've just de-installed JCLCHECK and
>are now back in the 1980's dark days of TYPRUN=SCAN. Apparantly we
>don't need JCL checking software. Are we now the only z/os site in the
>world that doesn't have JCL checking software?

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


Re: Are there any mainframe sites out there that don't use JCLCHECK/JCLPREP or equivalent?

2005-09-30 Thread Steve Grimes
We do not have such a tool in place.

Well, technically, we have something built into the Roscoe side, but I'm 
pushing everyone who'll listen over to TSO and PDS's, where we have none.

There is a free one out there (CBT has it, I think,) that I thought I 
might get installed and then wrap in a Rexx to add functionality. However, 
this requires a USER SVC.   This was a brick wall that I could not scale 
with our systems group.  (FUDSI.)

Stg

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


Old COBOL and 64-bit ???

2005-09-30 Thread Bill Klein
Sounds like it is time for you to read both the COBOL and LE "Migration
Guides".

Short Answer(s):

1) OS/VS COBOL code runs "fine" under LE and, in fact, migrating to LE for
your run-time and link-edit libraries SHOULD be your first step.  (There are
some "gotchas" - but I won't go into these in a short answer).

2) Neither new or old PL/I or COBOL (or Fortran) *currently* use the 64-bit
version of LE.  (Only C/C++ and Assembler do).  However, this isn't a
"separate" product.  All of these run on 64-bit machines.

3) There is at least one company that can "semi-recover" COBOL source code
from OS/VS COBOL object code.

4) BY the way, OS/VS COBOL code doesn't (itself) even run in 31-bit "mode" -
but does provide interoperability with languages that do (unlike 64-bit
where no such interpretability is currently available)

3) You do NOT need to recompile existing OS/VS COBOL program (unless you are
looking for things like CICS TS 3.1).

  

Lots and LOTS more to say about all of this, but read the migration guides
first.

<[EMAIL PROTECTED]> wrote in message
news:<[EMAIL PROTECTED]>...
> Quick question: Do old COBOL (OS/VS and COBOL II) programs run in
> 64-bit mode?  Do they need recompiled or do we have to figure out how
> to get them to work with LE?
> 
> We don't have the source to some of our older programs, so recompiling
> them is not an option.
> 
> Yeah, quit laughing... I bet we're not the only shop with this "issue".
> ;-) 

--
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: Are there any mainframe sites out there that don't use JCLCHECK/JCLPREP or equivalent?

2005-09-30 Thread Howard Brazee
On 30 Sep 2005 07:32:56 -0700, "sekisho" <[EMAIL PROTECTED]> wrote:

>Despite massive user objection, we've just de-installed JCLCHECK and
>are now back in the 1980's dark days of TYPRUN=SCAN. Apparantly we
>don't need JCL checking software. Are we now the only z/os site in the
>world that doesn't have JCL checking software?

I never figured out what the advantage of JCLCHECK was.   It's part of
the procedure before jobs get migrated, but new jobs find a bunch of
errors anyway as it doesn't find stuff in their post-migration
locations.

Testing should find errors before it gets to this stage.What kind
of error will JCLCHECK find that matter?

--
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: ICSF Verification

2005-09-30 Thread Paul Gilmartin
In a recent note, Bruce Black said:

> Date: Thu, 29 Sep 2005 20:04:25 -0400
> 
> >Really?  I don't see it on my z/OS 1.6 system.  What CSF FMID
> >do you have?
> >
> HCR7720.   I see it has a date of 2004 and is only in our z/OS 1.7
> SAMPLIB, not the 1.6 which is HCR770A, so it must be new
> 
Thanks for the pointer; just what I need.

And it runs with IRXJCL; no TSO required.  Thanks, IBM!

And we have it on our 1.5 system, which lacks a Cryptographic
Coprocessor, but it's absent on our 1.6 system, which has the
Cryptographic Coprocessor, although several other CSF* members
are present.  Our sysprog mumbled a couple FMIDs which I ignored.
I'll ask him again later today.  I just copied it to a private
SYSEXEC.

But on the 1.6 system on which I have been successfully testing
SMP/E RECEIVE FROMNETWORK and GIMZIP, I get:

Executing multiple clear key import ...

ICSF is not started or the DES/symmetric-key master key
is not set

... apparently it tests more functions than I need.  But that's
OK.  Now that I have a prototype, I can monkey-see monkey-doo:

//STEP2EXEC  PGM=IKJEFT01
//SYSEXEC   DD   DISP=(,DELETE),UNIT=&VIO,
//  RECFM=FB,LRECL=80,
//  DSN=&&SYSEXEC,
//  SPACE=(CYL,(1,,5)),DSORG=PO,DSNTYPE=PDS
//REXXOUT   DD   DISP=(OLD,PASS),DSN=&&SYSEXEC(HASH),
//  UNIT=&VIO,VOL=REF=*.SYSEXEC
//SYSTSPRT  DD   SYSOUT=(,)
//SYSTSIN   DD   *
repro infile(rexxin) outfile(rexxout)
%HASH
//REXXINDD   DATA,DLM=ZZ
/* Rexx */ 
/*/
/*   */
/*  Adapted from SYS1.SAMPLIB(CSFTEST)   */
/*   */
/*  Licensed Materials - Property of IBM */
/*  5694-A01 */
/*  (C) Copyright IBM Corp. 2004 */
/*   */
/*/
signal on novalue
trace Err

/*---*/
/* Call One-Way Hash Generate.   */
/*---*/

Hshrc  = ''x ;
Hshrs  = ''x ;
ExitLength = ''x ;
ExitData   = '' ;
RuleArrayCount = '0001'x ;
RuleArray  = 'SHA-1   ';
text   = 'Hello, ICSF World!'
text_length= right( d2c( length( text ) ), 4, '00'x )
chaining_vector_length = '0080'x
chaining_vector = right( '', c2x( chaining_vector_length ), '00'x )
HashLength = '0020'x ;   /* 32 decimal */
Hash   = right( '', c2x( HashLength ), '00'x )

say 'Executing SHA-1 ...'
say
address linkpgm 'CSNBOWH'   ,
'Hshrc' ,
'Hshrs' ,
'ExitLength',
'ExitData'  ,
'RuleArrayCount',
'RuleArray' ,
'text_length'   ,
'text'  ,
'chaining_vector_length' ,
'chaining_vector'   ,
'HashLength',
'Hash'  ,

say 'RC =' c2x(Hshrc) ' RSN =' c2x(Hshrs) ' Hash =' c2x( Hash )

exit( c2d( Hshrc ) )
ZZ

... which seems to test the function required by SMP/E.  Of
course, I'm now in the SAMPLIB Copyright bind.  In principle,
I'm forbidden to distribute a derivative work (oops! I just
did!) Do I have to use development "clean room" practices
whenever I base anything on SAMPLIB?

Thanks again,
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: OT The Original MF?

2005-09-30 Thread Fletcher, Kevin
Ed,

I remember these from highschool, now I do feel old. LOL.

Thanks,
 
Fletch 


-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Ed Gould
Sent: Thursday, September 29, 2005 10:25 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: OT The Original MF?


http://www.bellsystemmemorial.com/belllabs_kits_cardiac.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: How Many Jobcards in a JCL?

2005-09-30 Thread Fletcher, Kevin
The same number as the number of "B's" and "2's", ;-)

Hey its fridays, now is a good time to over state the obvious :-)

Thanks,
 
Fletch


-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of John S. Giltner, Jr.
Sent: Thursday, September 29, 2005 8:43 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: How Many Jobcards in a JCL?


How many "D's" in DB2?

Zafiropoulos Konstantinos wrote:
> Hi all,
> 
> Here in my office there is a crazy DB2 admin who asks me every day the

> same question. Instead of saying a good morning to me, he always asks 
> me: What is the max number of job cards in a JCL?
> 
> Please, what is the answer to the above question? I want to stop this 
> guy bugging me every morning...
> 
> 
> 
> Zafiropoulos Konstantinos
> 
> Main Systems support sector
> 
> E.F.G. Eurobank-Ergasias
> 
> 1-3 Lyssikratous Str,
> 
> 17674 Kallithea Attikis, Hellas
> 
> Tel: +30 (10) 9474082
> 
> E-mail: [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: JES2 Exit6 - Changing Class= Based on PGM=

2005-09-30 Thread Adam Floro
Hey, all.  So I've been playing with the sample IBM JES2 Exit6 in 
SYS1.AHASSAMP(HASX06A).  I'm on z/OS 1.4.  I want to scan the C/I text, and 
when I find PGM=program, then I want to set the jobclass when I get a match 
on the program.  I left the original exit intact, except when it branches 
to XEXEC. Here's the new code for XEXEC.  I changed MSG900, MSG901, and 
MSG902 to say 'FOUND EXEC KEY.', 'FOUND PGM= KEY.', and 'PGM FOUND.' 
respectively.  Here's how it goes:


XEXECMVC   X6MSG(MSG900L),MSG900  COPY MESSAGE TO BUFFER
 SPACE 1
$$WTO  X6MSGISSUE MESSAGE
 SPACE 1

MSG900 prints out in my listing ok.

 LAR2,STREKEY LOAD START OF TRUE TEXT
 SLR   R7,R7  GET LENGTH OF
 ICR7,2(,R2)  EXEC TEXT
 LAR1,3(,R2)  POINT TO START OF STEPNAME ON EXEC
 LAR1,0(R7,R1)POINT PAST STEPNAME TO NEXT KEYWORD
 CLI   0(R1),PGMEKSEE IF PGM= KEY
 BNE   RETURN NO, BYE
 MVC   X6MSG(MSG901L),MSG901  COPY MESSAGE TO BUFFER
 SPACE 1
$$WTO  X6MSG  ISSUE MESSAGE
 SPACE 1

MSG901 prints out in my listing ok, so it found the 'PGM=' key (hex 8A) in 
the C/I text string.


 CLC   3(6,R1),=X'C9C5C6C2D9F1'  PROGRAM FOUND?

Here's where the whole thing goes to hell in a handbasket.  As a test, I'm 
using program IEFBR14 and checking only for 'IEFBR1'.  Later I will check 
for the real program (OLQ).  Anyway, what I get is:


10.48.09 JOB08625  THURSDAY,  29 SEP 2005 
10.48.09 JOB08625  $HASP900 FOUND EXEC KEY.
10.48.09 JOB08625  $HASP901 FOUND PGM= KEY.
10.48.11 JOB08625  IEA794I SVC DUMP HAS CAPTURED:  395
   395 DUMPID=008 REQUESTED BY JOB (JES2)
   395 DUMP TITLE=CONVERTER 
ABENDED,ISSUER=IEFCNREX,ERRCSECT=IEFCNWRT,
10.48.11 JOB08625  IEFC683I CONVERTER TERMINATED DUE TO S0C4 ABEND 
REASON=0010

10.48.11 JOB08625  $HASP904 CONVERSION COMPLETE.

I've tried various versions of the abending CLC command and am getting nowhere.

It's as if the C/I text is not as expected.

3 off from R1 ought to give me the program name (according to the manual 
and other exits I've seen on CBT), but it's taking me to some bad address.


Here's the rest of the code that I plan on using to set the class to 'O' 
when I get a match on program name:


 BNE   RETURN  NO, BYE
 MVC   X6MSG(MSG902L),MSG902  COPY MESSAGE TO BUFFER
 SPACE 1
$$WTO  X6MSGISSUE MESSAGE
 SPACE 1
 L R10,JCTADDR LOAD THE JCT ADDRESS
 USING JCT,R10 POINT TO JCT
 MVC   JCTJCLAS,=C'O'  SET CLASS TO 'O'
 DROP  R10 DROP JCT
 SPACE 1
 B RETURN  LEAVE THE EXIT.

Can someone provide with me a way to print out the C/I text string while in 
the exit?  I know I'm supposed to use the CNMB, but I'm having trouble 
figuring out the CNMB code in the exit.


Can one of you assembler gurus help me out?  Thanks...

Adam


---
Adam Floro
Southern Illinois University Carbondale
Information Technology, Wham B15
Carbondale, IL 62901  Mailcode: 4622
[EMAIL PROTECTED]  618-453-6238

--
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: DAE Question

2005-09-30 Thread Dean Montevago
Thank you

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Robert Wright
Sent: Thursday, September 29, 2005 3:55 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: DAE Question


Dean Montevago wrote on 09/29/2005 03:35:56 PM:

> I'm in IPCS looking at DAE data. I want to know what the * next to the

> Date of the DUMP means. I did a help and the last line starts to 
> explain it, but I can't figure out how to advance to the next page. 
> I've tried everything I could think of and all I keep getting is the 
> ISPF help tutorial. Can someone help ?

The last person to update the tutorial panel forgot the guidelines about
the maximum number of lines on a tutorial panel.  Lines 23 and 24 read
as
follows:

Note: a trailing asterisk (*) in the Date of Dump field means
  SYMPTOM STRING TRUNCATED.

I know who originally wrote the dialog, and I think that between us we
can locate the current owner and get it updated for a future release.

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

--
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: WTO Problem

2005-09-30 Thread Binyamin Dissen
On Fri, 30 Sep 2005 07:49:18 -0500 Jerry Ragland <[EMAIL PROTECTED]>
wrote:

:>This is the part of part of source code where I get the error -

:> STR14,VTMPARM+12
:> LAR01,VTMPARM
:> WTO   'B BPXI'
:> L R15,=V(BPX1MPI)
:> BALR  R14,R15

:>I can able to see "B BPXI" in the JESSYSMSG ..

:>So is there any possible way where I can able to display messages in the 
spool.

As I said, WTO messes with R14-R1.

Move 

   LAR01,VTMPARM

after the WTO.

--
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: WTO Problem

2005-09-30 Thread Jerry Ragland
Hi Binyamin,

This is the part of part of source code where I get the error -

 STR14,VTMPARM+12
 LAR01,VTMPARM
 WTO   'B BPXI'
 L R15,=V(BPX1MPI)
 BALR  R14,R15

I can able to see "B BPXI" in the JESSYSMSG ..

So is there any possible way where I can able to display messages in the spool.

regards,
Jerry.

--
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: WTO Problem

2005-09-30 Thread Binyamin Dissen
On Fri, 30 Sep 2005 07:04:39 -0500 Jerry Ragland <[EMAIL PROTECTED]>
wrote:

:> I have a product source code and it has a few assembler modules in it. I
:>need to understand the flow of the assembler code, for that I introduced
:>some WTO messages in the code . The compilation and build was successful.
:>When I try to run the product with the modified(WTO introduced) code the
:>product crashed.

Show the code.

WTO will mess with R14-R1.

And if you use the MF=E form certain storage areas will change as well.

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


SmartTune evaluation

2005-09-30 Thread Zafiropoulos Konstantinos
Hi all,

Is there someone experienced with the ASG SmartTune? What is the
architecture of this product? 

Do we have to install it not only in Test but also in Production
environment?

 

Best Regards,

Zafiropoulos Konstantinos

Main Systems support sector   

E.F.G. Eurobank-Ergasias 

1-3 Lyssikratous Str,

17674 Kallithea Attikis, Hellas

Tel: +30 (10) 9474082

E-mail: [EMAIL PROTECTED]

 


Disclaimer:
This e-mail is confidential. If you are not the intended recipient, you should 
not copy it, re-transmit it, use it or disclose its contents, but should return 
it to the sender immediately and delete the copy from your system.
EFG Eurobank Ergasias S.A. is not responsible for, nor endorses, any opinion, 
recommendation, conclusion, solicitation, offer or agreement or any information 
contained in this communication.
EFG Eurobank Ergasias S.A. cannot accept any responsibility for the accuracy or 
completeness of this message as it has been transmitted over a public network. 
If you suspect that the message may have been intercepted or amended, please 
call the sender.


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


WTO Problem

2005-09-30 Thread Jerry Ragland
Hi all,

 I have a product source code and it has a few assembler modules in it. I
need to understand the flow of the assembler code, for that I introduced
some WTO messages in the code . The compilation and build was successful.
When I try to run the product with the modified(WTO introduced) code the
product crashed.

But I can see a few WTO messages in the JESYSMSG and I can see an error and
the error is -

SYSTEM COMPLETION CODE=EC6  REASON CODE=0F02C00E

In the IBM site I found the explation for EC6 and Code explanation -

##
EC6

Explanation: An error occurred during processing of a callable service to
z/OS UNIX System Services (z/OS UNIX). The callable service may have been
originally issued as a function in a program or as a shell command.

A hexadecimal reason code in register 15 describes the error. The reason
codes are in the form  , where  represents internal information
(not described here) and  represents external information shown below.

Only external reason codes are documented. There are many other possible
reason codes for internal errors. The internal errors should be reported to
IBM.

Code Explanation

 C00E
An incorrect address was encountered when trying to move user parameter
data.

System Action: The system abnormally ends the program issuing the callable
service.

Code Response

 C00E
An error occurred while accessing the user parameter data. This can be
caused by one of the following conditions:

* The total number of parameters is incorrect for the callable
service being issued.

* There is an error in one of the passed user parameters causing
z/OS UNIX to program check when the parameter is accessed. Check for the
following conditions:

  o A parameter that points to non-existent storage.

  o A parameter that cannot be accessed in the current user PSW key.

Check for incorrect input parameters passed to the callable service.

##

I also find that I am using an Z/OS UNIX callable service in my code which
is BPX1MPI.

But when I try to run my product with out any WTO messages in the code it
works really fine and I find no error.

Please help me to understand why I get errors when I introduced WTO
statements in the code(eventhough the compilation is successful) and how can
I resolve it to understand the flow.


Thanks in advance.
Jerry

--
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: How Many Jobcards in a JCL?

2005-09-30 Thread Shmuel Metz (Seymour J.)
In <[EMAIL PROTECTED]>,
on 09/29/2005
   at 12:29 PM, Zafiropoulos Konstantinos <[EMAIL PROTECTED]>
said:

>Here in my office there is a crazy DB2 admin who asks me every day
>the same question. Instead of saying a good morning to me, he always
>asks me: What is the max number of job cards in a JCL? 

>Please, what is the answer to the above question?

"What is the maximum number of trucks in an English?"

"What are you trying to ask and why?"

If he wants to know how many JOB statements in a job, the answer is
one, by definition. If he's trying to ask something else, then you
need to find out what he's trying to ask.

There is a limit of 255 steps and a PARMLIB limit on the size of the
TIOT, but I don't know that either is what he's asking about.

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


ftp restart data transfer

2005-09-30 Thread Pilar Izquierdo Ibañez
Is there any way to restart a ftp data transfer from a mainframe to a
server after a server timeoout?
Thanks

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