Re: How to insert records using EXECIO

2008-10-17 Thread Hunkeler Peter (KIUK 3)
Its alreqdy 8:30am here but it might still be too early
to understand your sample. The result shown indicates 
that you implemented an append, which of course is 
equal to insert after last record. Not what the OP 
wanted.

But why are you reading the data set in first? ALLOC
with MOD followed by EXECIO DISKW accomplishes the same.

I don't understand what the do loop is for.

-- 
Peter Hunkeler
CREDIT SUISSE

--
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: Message ICE099A ... Need Help

2008-10-17 Thread Hunkeler Peter (KIUK 3)
Yes, I'd agree that the most probable cause is a missing member.  
But I don't have any way of telling which member it is.

Any reason the message doesn't tell? After all, ICEMAN knows
what it was looking for. 

-- 
Peter Hunkeler
Credit Suisse

--
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: Message ICE099A ... Need Help

2008-10-17 Thread Hunkeler Peter (KIUK 3)
For a few bucks you can get the z/OS CD collection and you'll
be independent of unreliable internet services.

--
Peter Hunkeler
CREDIT SUISSE

--
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: REXX error

2008-10-17 Thread Hunkeler Peter (KIUK 3)
I don't see neither an error nor REXX code? What is your problem?
Pleaes take your time to write sufficient information so others
are able to help instead of wasting time trying to guess what
you want.

-- 
Peter Hunkeler
CREDIT SUISSE

--
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: Observations and Questions About Our Platform : Lenovo

2008-10-17 Thread Maarten Slegtenhorst
 
Why does IBM have their first question for Lenova, when they don't even
own the PC line anymore.
It is not an issue of the biggest moneymaker. Lenovo is probably first
because they get called more about Lenovo products than about z/OS
software problems.
Btw. Lenovo is still in IBM's products list on their frontpage.

Be glad that you can call about z/OS or maybe mainframes. 
My last two calls were about the service processor of my 3745's. ( yup,
still got a few )
I spoke to every department of IBM's except the right one.
As soon as I mention that the service processor is a PC belonging to
mainframe network equipment, they transfer me to either Lenovo Laptops,
Desktops, Midrange or to the networks-department.

At least it taught me to just tell them that my 3745 has a problem and
then wait for an engineer to call.


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

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

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



Re: Changing NSINTERADDR dynamically - URGENT

2008-10-17 Thread Jacky Bright

 You were correct. Thanks for that. with NSLOOKUP I have tested.

 What is surprising that I did not have to REFRESH the RESOLVER. I just
 changed the SYS1.TCPPARMS(TCPDATA) NSINTERADDR address and then issued the
 TSO NSLOOKUP and it was taking that new IP address value.

 Whatever IP address I mentioned same was being queried while performing
 operations related to NSLOOKUP.

 I could not find anything like this in manual. My OS is z/OS 1.7, is it
 that for 1.7 you just need to change the NSINTERADDR parm it will work ? No
 need to refresh RESOLVER.

 JAcky





   On Wed, Oct 15, 2008 at 10:34 AM, Chris Mason [EMAIL PROTECTED]wrote:

 Jacky

 With the introduction of the resolver function a few releases back, you
 got a
 new configuration data set called the resolver setup data set. It is the
 only
 data set which is used directly by the resolver procedure and, as I
 indicated
 before, it is optional since you can accept all the default values. The
 statements in this data set, even by default, refer in turn to the
 TCPIP.DATA
 [1] data set and the means by which you have defined it.

 Fear not, the new specifications you have entered into your TCPIP.DATA set
 are now in effect. The process of refreshing the resolver procedure
 causes
 the TCPIP.DATA data set to be revisited. The description under MODIFY
 command—Resolver address space in the IP System Administrator's
 Commands manual specifically assures us that the TCPIP.data information is
 refreshed.

 I tried to see if there was a command in the IP System Administrator's
 Commands which showed the current NSINTERADDR statement specifications -
 and failed! I do know that, when you use the NSLOOKUP command, you are
 told the name server - or, I believe, name servers - which are referenced
 in
 order to resolve the query. I also know that you get typically far more
 information than you thought you needed when you slip the TRACE RESOLVER
 statement into your TCPIP.DATA data set.

 As this is the first time you have encountered the revised resolver
 function,
 you have some reading to do. You should start with the
 section Understanding resolvers in Chapter 2, Configuration overview
 in the
 IP Configuration Guide manual. You will need a quick visit to the UNIX
 System
 Services Planning manual in order to find out precisely how to get your
 own
 RESOLVER procedure which will enable you to specify your own resolver
 setup
 statements, the ones you find so confusing!

 Of course, as usual, you will find details about the statements in the IP
 Configuration Reference manual - just before the TCPIP.DATA statements are
 explained.

 [1] You are probably aware that the TCPIP.DATA data set can be specified
 in
 a number of ways, including as SYS1.TCPPARMS(TCPDATA). The way to refer
 to the data set generically is to use the original name used by TCP/IP for
 VM,
 the product from which CP/IP for MVS was derived which, in turn became the
 Communications Server IP component.

 Chris Mason

 On Wed, 15 Oct 2008 07:43:36 +0100, Jacky Bright
  [EMAIL PROTECTED] wrote:

 Chris  thanks for that but I am getting some strange ouput when I am
 displaying the resolver stat
 
 F RESOLVER,DISPLAY
 EZZ9298I DEFAULTTCPIPDATA - None
 EZZ9298I GLOBALTCPIPDATA - None
 EZZ9298I DEFAULTIPNODES - None
 EZZ9298I GLOBALIPNODES - None
 EZZ9304I NOCOMMONSEARCH
 EZZ9293I DISPLAY COMMAND PROCESSED
 
 The GLOBALTCPIPDATA is not at all mentioning the SYS1.TCPPARMS
 (TCPDATA)
 member. How do I know which all DNS Servers I am using  and where is is
 mentioned ..
 
 JAcky
 
 On Tue, Oct 14, 2008 at 5:21 PM, Chris Mason
 [EMAIL PROTECTED]wrote:
 
  Jacky
 
  If you go to the description of the NSINTERADDR statement in the IP
  Configuration Reference, as with most statements, you will find a
  section Steps for modifying. However, unlike most of the statements
 in
  the
  manual with which I am familiar, the information here is just pathetic!
 All
  it
  does is point you to the MODIFY command in the IP System
 Administrator's
  Commands manual. It really should have gone the extra centimetre and
  mentioned that the particular flavour of MODIFY was MODIFY command—
  Resolver address space since not everyone will know that all these
  TCPIP.DATA statements fall under a topic called Resolver.
 
  Under MODIFY command—Resolver address space you will find the
 command
  John suggested described.
 
  John has a locally created RESOLVER started task procedure so he can
 start
  it
  with the S RESOLVER command. In case you do not have a locally created
  RESOLVER started task procedure, you can still stop and start the
 provided
  RESOLVER started task. You stop it with the P RESOLVER command, just as
  John again mentioned, but it all gets a bit subtle when you need to
 start
  it
  again.
 
  The command you need is START
  IEESYSAS.RESOLVER,PROG=EZBREINI,SUB=MSTR
 
  Not so very obvious is it?
 
  The reason for this command is twofold:
 
  1. You are using only default values for the 

Re: IBM PR: System z Announcement Webcast on October 21, 2008

2008-10-17 Thread R.S.

Rich Smrcina wrote:

John McKown wrote:


Thanks for the correction. But, from your comments, I would take it 
that the

System z is simply not worth using, except for z/OS (maybe z/VSE) legacy
work. If this is true, then I see no reason why any company would get a z
for new work. And, if a company could move its workload from, say, 
CICS to

WAS, it would be less expensive to run that work on Intel.


It makes you think that his purpose in life is to trash System z, at 
least by the tone of his posts.  This should not be the purpose of this 
list.


The purpose of this list is to discuss about mainframes. It's not 
required to present the only correct opinions.

I feel free to present my own view, despite of your opinion about me.
I consider your sentence above as simply offensive.

Last but not least: I justified my opinion with some arguments (the 
numbers). Maybe you want to assess the numbers? Did I make a mistake 
somewhere? Something to cheap or maybe to expensive?


BTW: I'm also considered as mainframe bigot and I don't like the opinion 
as well. I'm trying to be objective and assess things without any bias.

--
Radoslaw Skorupka
Lodz, Poland


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

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

NIP: 526-021-50-88
Wedug stanu na dzie 01.01.2008 r. kapita zakadowy BRE Banku SA  wynosi 
118.642.672 zote i zosta w caoci wpacony.

--
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: IBM PR: System z Announcement Webcast on October 21, 2008

2008-10-17 Thread R.S.

Ken Porowski wrote:

Look at licensing costs for Oracle (and other products licensed per
CPU).  Last I heard was around $40K per CPU.  If I can replace 4-5 Intel
servers with a single IFL software costs alone generate savings.

The larger question is can IFL/z/VM compete with Intel/Vmware (or
equivalent) when ALL costs are considered.  


Good argument for those who use Oracle ...and for now. License terms and 
conditions can change with time. Personally I wonder why Oracle price 
per CPU is the same for various CPU types. However it can justify choice 
of z/Linux.

As an mainframe guy I'm glad of that. g

--
Radoslaw Skorupka
Lodz, Poland


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

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

NIP: 526-021-50-88
Wedug stanu na dzie 01.01.2008 r. kapita zakadowy BRE Banku SA  wynosi 
118.642.672 zote i zosta w caoci wpacony.

--
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: Default class for JES2 SYSOUT

2008-10-17 Thread Sally Mason
Hi Mark,

Thanks very much for your reply.  That's actually one of the things that's 
confusing me as the MSGCLASS for our STCs is Z which is our purge class. The 
output from $DJOBCLASS(STC) is:-

JOBCLASS(STC)   TIME=(60,00),REGION=0001M,
COMMAND=DISPLAY,BLP=YES,AUTH=(ALL),
MSGLEVEL=(1,1),MSGCLASS=Z,
IEFUJP=YES,IEFUSO=YES,LOG=NO,
OUTDISP=(HOLD,HOLD),OUTPUT=YES,
PERFORM=000,PROCLIB=00,SWA=BELOW,
TYPE26=YES,TYPE6=YES,XEQCOUNT=(),
CONDPURG=NO,JESLOG=(NOSPIN)

The job display in IOF is as follows:-

--JOBNAME--JOBIDSTATUS---RAN/RECEIVED--DAY---DEST---
---
  IXRASUBS S020882  RUNNING   5:01  10/17/2008 TODAY N1
--RC--PGMSTEP-PRSTEP---PROC-COMMENTS
---
   @  £IXRMAIN   ASM2 STARTING IXRASUBS RETURN CODE NOT AVAILABLE
DDNAME---STEP-PRSTEP---STAT-ACT-C-GRP-D-SIZE-U-DEST

_1  LOG  *  Z  2 L
_2  JCL  *  Z 60 L
_3  MESSAGES *  Z  2 L
_4  IXRMAIN1 ASM2 STARTING  Z
_5  SYSPRINT ASM2 STARTING  X
_6  IXRPRINT ASM2 STARTING  X
_7  IXRINIT  ASM2 STARTING  X
_8  SYSMDUMP ASM2 STARTING  X
_9  ASM0 ASM2 STARTING  X
_   10  SYS1 ASM2 STARTING  A
_   11  SYS2 ASM2 STARTING  A
_   12  SYS3 ASM2 STARTING  A
_   13  SYS4 ASM2 STARTING  A


It's the SYS0001-SYS4 that we'd like to change from class A.

Thanks
Sally

--
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: Default class for JES2 SYSOUT

2008-10-17 Thread Hunkeler Peter (KIUK 3)
_   10  SYS1 ASM2 STARTING  A
_   11  SYS2 ASM2 STARTING  A
_   12  SYS3 ASM2 STARTING  A
_   13  SYS4 ASM2 STARTING  A

These look like dynamically allocated SYSOUT DD statements 
to me. I guess the program allocates them upon need with
sysout class A. 

--
Peter Hunkeler
CREDIT SUISSE

--
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: Virtual (was: IBM PR: System z Announcement ...)

2008-10-17 Thread Jan Vanbrabant
Re. Bruno Sugliani [EMAIL PROTECTED] 
saying Thu, 16 Oct 2008 12:02:54 -0500 
about VMWare:

It is an Hypervisor with some extremely sophisticated features ( drag
and drop of a partition from one machine to another ) 
http://www.vmware.com/products/vi/esx/
It helps us a lot to run servers without much dependance on the hardware
(quite great for disaster recovery plans)

Bruno, 
Is this within a single CEC or multi-CEC ?
Jan 

--
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: Default class for JES2 SYSOUT

2008-10-17 Thread Sally Mason
Hi Barry,

It's the STC for IXR.  In the STC, we set the DD for IXRMAIN1 to SYSOUT=Z, 
which is our purge class.  Also, in our JES parms, our JOBCLASS for STC sets 
MSGCLASS=Z.  In the proc, all other SYSOUT for IXR is set to X, which is our 
held class.  In IOF, the job display shows:-

 --JOBNAME--JOBIDSTATUS---RAN/RECEIVED--DAY---DEST--

   IXRASUBS S020882  RUNNING   5:01  10/17/2008 TODAY N1
 --RC--PGMSTEP-PRSTEP---PROC-COMMENTS
---
@  £IXRMAIN   ASM2 STARTING IXRASUBS RETURN CODE NOT AVAILABLE
 DDNAME---STEP-PRSTEP---STAT-ACT-C-GRP-D-SIZE-U-DEST---
-
 _1  LOG  *  Z  2 L
 _2  JCL  *  Z 60 L
 _3  MESSAGES *  Z  2 L
 _4  IXRMAIN1 ASM2 STARTING  Z
 _5  SYSPRINT ASM2 STARTING  X
 _6  IXRPRINT ASM2 STARTING  X
 _7  IXRINIT  ASM2 STARTING  X
 _8  SYSMDUMP ASM2 STARTING  X
 _9  ASM0 ASM2 STARTING  X
 _   10  SYS1 ASM2 STARTING  A
 _   11  SYS2 ASM2 STARTING  A
 _   12  SYS3 ASM2 STARTING  A
 _   13  SYS4 ASM2 STARTING  A


It's the SYS1-SYS4  that we'd like to change from class A.  They 
only have output in, and get printed, if anyone has actually brought any files 
back through IXR, but we'd prefer this output to be held, not printed.  It 
would 
be great if you know how we can change this.

Thanks
Sally

--
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: question about Oracle on the mainframe

2008-10-17 Thread David Crayford

R.S. wrote:

David Crayford wrote:
[...]
15 years ago I worked on one of the first mainframe DB2 data warehouse 
systems in the UK. We used SP2 AIX boxes for the mining, and they were 
very quick back then. I suppose it all depends on the z10 and how IBM 
prices them... 



They seem to be making an effort to bring to TCO down.

Well, at risk of going to new war I disagree. g
I don't see too much effort.
0.9 MSU is good thing to compete with second hand market.



Crossed wires me thinks! I was talking about z/Linux. IBM are giving 
away z/VM if you have a z10 and only want to run linux. I haven't done 
the math but that could make it a very competitive platform.


The z10 looks very good on paper, a speed demon. It needs to be, the 
current crop of high end *nix boxes are fast and reliable. IBM don't 
release bench-marketing like TPC for the mainframe so it's difficult to 
compare the platforms. All we have is stuff like this 
http://www.itjungle.com/big/big110706-story01-fig01.html.


It's pretty sad when the mainframes biggest iron is getting smashed by 
wintel...


The only thing I could consider as the effort are software tools, 
especially must have ones. IBM develops (or buys) many various tools 
IMHO not only to compete with large ISVs, but also to give customers 
real choice. Is CA-1 too expensive? Then choose RMM. Competition means 
lower prices even for those who stay with CA, BMC, others products.


We went far off original topic (but still about mainframes)


--
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 to insert records using EXECIO

2008-10-17 Thread Scott Ford
It was an example for Gil and I also included a url for the actual execio
diskru ..from IBM ...

Scott Ford
Senior Systems Engineer

 
[p] 678.266.3399 x304[m] 609-346-0399  identityforge.com



This message is for the designated recipient only and may contain
privileged, proprietary, or otherwise private information. If you have
received it in error, please notify the sender immediately or let us know at

[EMAIL PROTECTED] or [EMAIL PROTECTED], and then delete the
original.  Any other use of the email by you is prohibited.

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Hunkeler Peter (KIUK 3)
Sent: Friday, October 17, 2008 2:35 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: How to insert records using EXECIO

Its alreqdy 8:30am here but it might still be too early
to understand your sample. The result shown indicates 
that you implemented an append, which of course is 
equal to insert after last record. Not what the OP 
wanted.

But why are you reading the data set in first? ALLOC
with MOD followed by EXECIO DISKW accomplishes the same.

I don't understand what the do loop is for.

-- 
Peter Hunkeler
CREDIT SUISSE

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



FW: How to insert records using EXECIO

2008-10-17 Thread Scott Ford
Peter,
See below

Scott Ford
Senior Systems Engineer

 
[p] 678.266.3399 x304[m] 609-346-0399  identityforge.com



This message is for the designated recipient only and may contain
privileged, proprietary, or otherwise private information. If you have
received it in error, please notify the sender immediately or let us know at

[EMAIL PROTECTED] or [EMAIL PROTECTED], and then delete the
original.  Any other use of the email by you is prohibited.


-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Scott Ford
Sent: Thursday, October 16, 2008 9:17 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: How to insert records using EXECIO

Gil,

See this Share paper...

http://shareew.prod.web.sba.com/client_files/callpapers/attach/SHARE_in_San_
Jose/S8343WS150114.pdf


Scott Ford
Senior Systems Engineer

 
[p] 678.266.3399 x304[m] 609-346-0399  identityforge.com



This message is for the designated recipient only and may contain
privileged, proprietary, or otherwise private information. If you have
received it in error, please notify the sender immediately or let us know at

[EMAIL PROTECTED] or [EMAIL PROTECTED], and then delete the
original.  Any other use of the email by you is prohibited.

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Paul Gilmartin
Sent: Thursday, October 16, 2008 8:05 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: How to insert records using EXECIO

On Thu, 16 Oct 2008 18:53:48 -0400, Scott Ford wrote:

I understand what you said, my comments are that an insert was also very
doable in rexx..no more no less.

I'm intrigued.  Can you point us to some sample code?  or
is this just the copy-append-rename already posted a couple
times in this thread?

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

--
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: Virtual (was: IBM PR: System z Announcement ...)

2008-10-17 Thread Phil Smith III
Thomas Kern wrote, re guest migration:
I thought the early prototype of this was the Single-System-Image code
written at University of Waterloo back in the early 1980's.

Now why would you think that? Just because Romney wrote both of them... ;-)

The SSI SWITCH command was a lot of fun. It moved a VM from one machine in
an SSI cluster (only they weren't called clusters back then) to another;
we would do this so we could reIPL one of the boxes, or for load-balancing.
The problems were somewhat different from today: CP was less
well-structured; bandwidth between machines was lower; but guests were even
smaller than the bandwidth difference, so it was practical to simply suspend
the guest, move it, and resume. That's less advisable with an 8GB guest,
even over a fast OSA, so the current prototype does some interesting stuff
to move memory, then go back and re-move (not remove!) pages that changed
during the first move. It does this several times until it either gets a
clean pass or throws up its hands, stuns the guest, and moves the
remaining pages. So you can move an only moderately active, very large guest
without noticeable disruption.

Moving between CECs is an interesting concept; I'd imagine that getting the
functionality out there within a CEC would be the first priority for obvious
reasons, and then the inter-CEC problem could be examined. A reasonable
implementation would require a VLAN across the CECs for network
transparency.

For extra credit, while the guest is being containerized, it might be nice
to be able to store a copy of the state, a la the old VMSAVE facility. I'm
not sure how useful this actually is, since any changes to data on DASD
wouldn't be reflected in the state, so the saved image might not be usable.
But it's fun to think about...

...phsiii

--
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: IBM's 3Q2008 Earnings Results

2008-10-17 Thread Elardus Engelbrecht
Timothy Sipples wrote:

MIPS shipments grew 49 percent, including a whopping 120 percent growth 
in specialty engine MIPS. 

That is for system z as read in press release on the website. 

Question: How many % NEW customers are attributable to that growth?

Are the existing customers just upgrading their machines or just added new or 
enabled their CPUs (and thus MIPS)?

I'm more interested in the grow of actual system z customers or at least % of 
new customers.

Also what is the effect of Sub Capacity Reporting on IBM's results?

The rest of the '2008 THIRD-QUARTER RESULTS' are impressive, not bad.

Groete  / Greetings
Elardus Engelbrecht

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



Oracle Site License

2008-10-17 Thread Jim Marshall
Here the US, there is a Site license for Oracle or some call it, an Enterprise 
License. It works something like this. For something in the range of $1-2M per 
year you get to run an unlimited number of Oracle DB and Apps Server plus all 
of the features they offer; performance tool, track patches, etc BUT only 
running on internally facing systems within the Intranet. 

I understand here we have a limited number of external licenses which are 
organized in a very small number of 2-Core, 4-Core, 6-Core, 8-Core and I 
understand 10  12 Core licenses.  Keep in mind the 2-Core License runs 
around $50K on US GSA schedule. Back when we transferred a 2-Core license 
off a laptop over to one z900 IFL (238MIPS) and now am using it on on the 
upgraded z9BC (480 MIPS) to run 8-9 instances with more on the way; all 
with the same 2-Core license. 

Recently, in the hall the other side of support was unboxing a new 10 
processor (yes they called it processor and not Core) Intel blade and while 
snickering asked me what I have knowing I run a 2-CP and 3-CP z/OS z9BCs. 
They hurried it into the machine room to rack-it and went to plug it in only to 
see a strange plug. They asked what kind of a plug we thought it was and it 
was 220V (never seen by them before). Next day they were over to our side 
asking it they could plug it into one of our PDUs. Thus say it was a 10-Core, 
an externally facing Oracle license would be $250K+ and do you believe they 
have everything supporting that application living on one box and only one 
box. 

Some interesting dollars.  Am sure Oracle or some reseller would explain the 
pricing. 

jim 
  

--
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 to insert records using EXECIO

2008-10-17 Thread Hunkeler Peter (KIUK 3)
Scott,
I thought you wanted to demonstrate how to insert records
at the beginning of a file. I must have misunderstood. 

-- 
Peter Hunkeler
CREDIT SUISSE

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

2008-10-17 Thread Anne Lynn Wheeler
The following message is a courtesy copy of an article
that has been posted to bit.listserv.ibm-main as well.


re:
http://www.garlic.com/~lynn/2008o.html#55 Virtual
http://www.garlic.com/~lynn/2008o.html#56 Virtual
http://www.garlic.com/~lynn/2008o.html#57 Virtual

and from long ago and far away

To: wheeler
Date: 05/19/82  10:33:28

Lynn,
  The Endicott Prog Center has a proposal to support a collection of VM
systems with Single System Image and Continuous Availability for CMS and
VM Subsystem users.  The proposal is called VMC, for VM Clusters.

  , SPD High Availability Systems Project Office Manager, and I will
be in San Jose on 6/8/82 to (among other things) present VMC to
Research.  is hosting the meeting.  I hope you can attend.  If not
I'd like to make other arrangements to show you this proposal.

... snip ...

for other drift ... later in the decade, my wife  I started on the
ha/cmp (high-availability/cluster multiprocessor) product ... but
rs/6000 based ...
http://www.garlic.com/~lynn/subtopic.html#hacmp
some old email on ha/cmp cluster scaleup
http://www.garlic.com/~lynn/lhwemail.html#medusa

old post with mention of effort
http://www.garlic.com/~lynn/95.html#13

-- 
40+yrs virtualization experience (since Jan68), online at home since Mar70

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



C03 abend when omiting CEE.SCEERUN from JCL

2008-10-17 Thread BT İşletim ve Teknik Destek Bölümü
Hi,
We have a problem about CEE.SCEERUN usage. This LE dataset is in LINKLIST
and all users are able to use it. However a batch program, which is compiled
in Enterprise Cobol (V3.2) and make dynamic calls to ASM programs needs
CEE.SCEERUN dataset coded inside JCL (via joblib).

When we remove CEE.SCEERUN joblib statement from the JCL, the job abends
with C03:
IKJ56641I SYSTEM ABEND CODE C03   REASON CODE 0004

We cannot figure out, why program cannot call modules of CEE.SCEERUN from
LNKLST and needs it inside JCL(via joblib).
Anyone experienced same problem?

Thanks and regards.

Mürsel Taşgın
Akbank

Bu e-posta ve muhtemel eklerinde verilen bilgiler kişiye özel ve gizli olup, 
yalnızca mesajda belirlenen alıcı ile ilgilidir.Size yanlışlıkla ulaşmışsa 
lütfen göndericiye bilgi veriniz, mesajı siliniz ve içeriğini başka bir kişiye 
açıklamayınız, herhangi bir ortama kopyalamayınız. Bu mesaj aksi sözleşme ile 
belirtilmedikçe herhangi bir finansal işlem teklifi, alımı, satımı veya 
herhangi bir havalenin teyidi gibi bankacılık işlemi yapılması amacını 
taşımamaktadır.Verilen tüm bilgilerin doğruluğu ve bütünlüğünün garantisi 
verilmemekte olup, önceden bildirilmeksizin değiştirilebilecektir.Bu mesajın 
içeriği Bankamızın resmi görüşlerini yansıtmayabileceğinden Akbank T.A.Ş. 
hiçbir hukuki sorumluluğu kabul etmez.

--
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: Default class for JES2 SYSOUT

2008-10-17 Thread Mark Zelden
On Fri, 17 Oct 2008 03:58:16 -0500, Sally Mason [EMAIL PROTECTED]
wrote:

Hi Mark,

Thanks very much for your reply.  That's actually one of the things that's
confusing me as the MSGCLASS for our STCs is Z which is our purge class. The
output from $DJOBCLASS(STC) is:-

JOBCLASS(STC)   TIME=(60,00),REGION=0001M,
COMMAND=DISPLAY,BLP=YES,AUTH=(ALL),
MSGLEVEL=(1,1),MSGCLASS=Z,
IEFUJP=YES,IEFUSO=YES,LOG=NO,
OUTDISP=(HOLD,HOLD),OUTPUT=YES,
PERFORM=000,PROCLIB=00,SWA=BELOW,
TYPE26=YES,TYPE6=YES,XEQCOUNT=(),
CONDPURG=NO,JESLOG=(NOSPIN)

The job display in IOF is as follows:-

--JOBNAME--JOBIDSTATUS---RAN/RECEIVED--DAY---DEST---
---
  IXRASUBS S020882  RUNNING   5:01  10/17/2008 TODAY N1
--RC--PGMSTEP-PRSTEP---PROC-COMMENTS
---
   @  £IXRMAIN   ASM2 STARTING IXRASUBS RETURN CODE NOT AVAILABLE
DDNAME---STEP-PRSTEP---STAT-ACT-C-GRP-D-SIZE-U-DEST

_1  LOG  *  Z  2 L
_2  JCL  *  Z 60 L
_3  MESSAGES *  Z  2 L
_4  IXRMAIN1 ASM2 STARTING  Z
_5  SYSPRINT ASM2 STARTING  X
_6  IXRPRINT ASM2 STARTING  X
_7  IXRINIT  ASM2 STARTING  X
_8  SYSMDUMP ASM2 STARTING  X
_9  ASM0 ASM2 STARTING  X
_   10  SYS1 ASM2 STARTING  A
_   11  SYS2 ASM2 STARTING  A
_   12  SYS3 ASM2 STARTING  A
_   13  SYS4 ASM2 STARTING  A


It's the SYS0001-SYS4 that we'd like to change from class A.

Thanks
Sally


Then I'd go back to CA.  They must be allocating it with SYSOUT(A).  
I don't have any test programs dynamically allocating sysout to
play with, but if I do a TSO ALLOC for sysout without a class, it
goes to the MSGCLASS. 

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:[EMAIL PROTECTED]
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
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: Virtual

2008-10-17 Thread Chase, John
 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of Rich Smrcina
 
 Chase, John wrote:
 
  Does VMWare run on bare metal yet?
 
 
 Well, I guess that depends upon your definition of 'bare metal'. (What
 is 'is'?)
 
 For a very long time VMWare would install a modified pretty barebones
RH
 Linux and
 VMWare on top of that.  From there you could create/install virtual
 machines.  That is
 their VMWare ESX product.  Now they have a free version of it called
 VMware ESXi.
 
  -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of Wayne Driscoll
 
 In my opinion, Bare Metal means that the virtualization engine
provides an
 iplable (bootable) operating system, and does not require an OS
between it
 and the hardware.  By that definition, the requirement for a
barebones RH
 Linux causes VMWare to miss this requirement.

Agreed.  If it requires even the tiniest of independent operating
systems on which to run, then it is an application program.  To me,
bare metal on the x86 platform includes nothing beyond the BIOS
between the software and the hardware.

-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: C03 abend when omiting CEE.SCEERUN from JCL

2008-10-17 Thread Mark Zelden
On Fri, 17 Oct 2008 15:36:57 +0300, Mürsel Ta#351;g#305;n (BT 
#304;#351;letim ve Teknik
Destek  Bölümü) [EMAIL PROTECTED] wrote:

Hi,
We have a problem about CEE.SCEERUN usage. This LE dataset is in LINKLIST
and all users are able to use it. However a batch program, which is compiled
in Enterprise Cobol (V3.2) and make dynamic calls to ASM programs needs
CEE.SCEERUN dataset coded inside JCL (via joblib).

When we remove CEE.SCEERUN joblib statement from the JCL, the job abends
with C03:
IKJ56641I SYSTEM ABEND CODE C03   REASON CODE 0004

We cannot figure out, why program cannot call modules of CEE.SCEERUN from
LNKLST and needs it inside JCL(via joblib).
Anyone experienced same problem?

Thanks and regards.

Mürsel Taþgýn
Akbank


Silly question, but are you sure the one in the LNKLST matches the one in
your JCL?  VOLSER can be specified for the LNKLST so perhaps it is not
the cataloged version.   Also, maybe there is some set of options / CEEBINIT
or other LE modules ahead of the CEE.SCEERUN in the LNKLST and when
using joblib/steplib you are getting the options (or other LE modules) all
from the joblib/steplib. 

Try using DDLIST (ISRDDN) and see if you can find other LE modules 
coming from somewhere other than the LNKLST SCEERUN.

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:[EMAIL PROTECTED]
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
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: Virtual

2008-10-17 Thread Rich Smrcina

Chase, John wrote:


Agreed.  If it requires even the tiniest of independent operating
systems on which to run, then it is an application program.  To me,
bare metal on the x86 platform includes nothing beyond the BIOS
between the software and the hardware.



I would tend to agree, this would not qualify as 'bare metal'.  I would hazard a guess 
that VMWare is not interested in writing operating systems so they borrowed one.


Just to be perfectly clear, they provide the Linux with the ESX and ESXi products.  The 
customer is not required to acquire it as a prereq.


--
Rich Smrcina
VM Assist, Inc.
Phone: 414-491-6001
Ans Service:  360-715-2467
rich.smrcina at vmassist.com
http://www.linkedin.com/in/richsmrcina

Catch the WAVV!  http://www.wavv.org
WAVV 2009 - Orlando, FL - May 15-19, 2009

--
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: Virtual (was: IBM PR: System z Announcement ...)

2008-10-17 Thread Jon Brock
Can anybody get to this document?  It keeps coming up as corrupted for
me.

Musta been around Chuckie too long.  That would corrupt anybody.


Jon



snip
An early prototype of this sort of technology has been demonstrated at
the last few SHAREs.

z/VM Live Guest Migration:
http://www.linuxvm.org/Present/SHARE111/S9110rw.pdf
/snip

--
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: Default class for JES2 SYSOUT

2008-10-17 Thread Mark Zelden
On Fri, 17 Oct 2008 07:47:08 -0500, Mark Zelden [EMAIL PROTECTED]
wrote:



Then I'd go back to CA.  They must be allocating it with SYSOUT(A).
I don't have any test programs dynamically allocating sysout to
play with, but if I do a TSO ALLOC for sysout without a class, it
goes to the MSGCLASS.


To further support what I wrote and what the defaults are, here is
some doc from the Authorized Assembler Services Guide about 
the SVC99 parameter list:
 
26.4.4.24 SYSOUT Specification - Key = '0018' 
  
DALSYSOU specifies that a system output data set is to be allocated   
and defines the output class of the data set. When you code this key  
and want a class other than the default, # and LEN must be one, and   
PARM contains the output class. To use the default output class, code 
zero in the # field; LEN and PARM are not specified. The default  
output class is determined as follows:
  
   From the OUTPUT DD statement, if present   
   From the default message class, if there is no OUTPUT DD statement.
  
DALSTATS, DALNDISP and DALCDISP   
DALVLSER, DALPRIVT, DALVLSEQ, DALVLCNT, and DALVLRDS  
DALQNAME  
DALSSNM, DALSSPRM, and DALSSATT   
  
Note:  Using DALSYSOU with any of these keys will cause dynamic   
  allocation to issue an error code 0380. 
  
Example: To specify a SYSOUT data set in class A, code:   
  
  KEY   # LEN   PARM  
  0018  0001  0001  C1
  
Example: To specify a SYSOUT data set and to default the class, code: 
  
  KEY   # LEN  PARM   
  0018    --  


  
Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:[EMAIL PROTECTED]
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
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: Default class for JES2 SYSOUT

2008-10-17 Thread Paul Gilmartin
On Thu, 16 Oct 2008 19:19:20 -0500, Mark Zelden wrote:

Is this always the case, or only if the DD statement specifies
SYSOUT=*.  I believe in our lab configuration if I leave the
class empty on my DD SYSOUT statement, and omit the OUTPUT JCL
statement, the SYSOUT again goes to bit bucket.

What do you mean if you have a DD SYSOUT statement with the
class empty?  You have to specify something, don't you? At least
in JCL.  ...

Actually, you don't have to specify something:

   Linkname: 12.63.1 z/OS V1R10.0 MVS JCL Reference IBM Library Server
URL: 
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA2B680/12.63.1

But the syntax is convoluted (They don't even have it right in
the syntax diagram; they needed a verbal addition), or at best
unintuitive.   And IIRC they got even that right only in reaction
to my PMR complaining that there was no apparent way in a JCL DD
statement to exploit the DEFAULT= parameter of the JCL OUTPUT
statement; I had tried and failed with such as:

4 //SYSUTX   DD  SYSOUT=''
 STMT NO. MESSAGE
4 IEFC629I INCORRECT USE OF APOSTROPHE IN THE SYSOUT FIELD

and:

4 //SYSUTY   DD  SYSOUT=()
IEF210I TESTJOB STEP SYSUTY - UNIT FIELD SPECIFIES INCORRECT DEVICE NAME

??? !!!  (I thought this used to give INCORRECT USE OF PARENTHESIS IN
THE SYSOUT FIELD.)

But, hey, if none of the above were true, it would hardly qualify
as JCL, would it?

-- 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: How to insert records using EXECIO

2008-10-17 Thread Paul Gilmartin
On Fri, 17 Oct 2008 08:35:28 +0200, Hunkeler Peter (KIUK 3) wrote:

Its alreqdy 8:30am here but it might still be too early
to understand your sample. The result shown indicates

I didn't understand it last night.

that you implemented an append, which of course is
equal to insert after last record. Not what the OP
wanted.

But why are you reading the data set in first? ALLOC
with MOD followed by EXECIO DISKW accomplishes the same.

I don't understand what the do loop is for.

I don't understand what the parse instruction inside the
unnecessary do loop is for.

I was disappointed.  I had envisioned something like what
a colleague told me long ago.  As an undergraduate, he
had learned on a Scientific Data Systems (later XEROX)
Sigma system.  He explained that program source files,
necessarily line-numbered, were stored in something like
a VSAM KSDS file, with the line numbers as keys.  So it
was possible to update, insert, and delete records in
place.

Of course, this behavior is hard to distinguish from an
editor's reading the entire DSORG=PS file into main
storage, updating it in the buffer, and rewriting it.

-- 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: Virtual (was: IBM PR: System z Announcement ...)

2008-10-17 Thread Jan Vanbrabant
sent offline to Jon.
jan

- Oorspronkelijk bericht - 
Van : Jon Brock [mailto:[EMAIL PROTECTED]
Verzonden : vrijdag , oktober 17, 2008 03:02 PM 
Aan : IBM-MAIN@BAMA.UA.EDU
Onderwerp : Re: Virtual (was: IBM PR: System z Announcement ...)

Can anybody get to this document? It keeps coming up as corrupted for 
me. 
 
Musta been around Chuckie too long. That would corrupt anybody. 
 
 
Jon 
 
 
 
snip 
An early prototype of this sort of technology has been demonstrated at 
the last few SHAREs. 
 
z/VM Live Guest Migration: 
http://www.linuxvm.org/Present/SHARE111/S9110rw.pdf 
/snip 
 
-- 
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: Default class for JES2 SYSOUT

2008-10-17 Thread Sally Mason
Hi Peter and Mark,

I have a call logged with CA but their response is:-

'ASM2 does not ask for a specific SYSOUT class. No code within the product
asks for this. It appears that the operating system default is doing this
class definition for us.'

Hence why I was trying to establish if there is a default that I can change.  
They also appear to have a similar setup in their JES parms to us, but say that 
their SYS1-SYS4 goes to their MSGCLASS class, whereas ours 
doesn't and I have no idea why not.

Sally

--
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: Default class for JES2 SYSOUT

2008-10-17 Thread Mark Zelden
On Fri, 17 Oct 2008 08:16:22 -0500, Paul Gilmartin [EMAIL PROTECTED] wrote:



What do you mean if you have a DD SYSOUT statement with the
class empty?  You have to specify something, don't you? At least
in JCL.  ...

Actually, you don't have to specify something:

   Linkname: 12.63.1 z/OS V1R10.0 MVS JCL Reference IBM Library Server
URL:
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA2B680/12.63.1


Oh yes... forgot about that.  I do use it some times with OUTPUT JCL:

//SYSUT2   DD  SYSOUT=(,),OUTPUT=(*.OUT1,*.OUT2,*.OUT3)   

But isn't   (,)   something?  :-)

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:[EMAIL PROTECTED]
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
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: How to insert records using EXECIO

2008-10-17 Thread Howard Brazee
On 16 Oct 2008 14:06:57 -0700, [EMAIL PROTECTED] wrote:

I wonder - Why is it not possible to add records to the beginning of a 
data set?  Wouldn't it be possible for a sufficiently clever program to 
place the inserted records into a newly allocated area on disk, and then 
modify the VTOC to point to that new area first and the old first area 
next?  It might require rewriting a bunch of control blocks, and probably 
wouldn't work for some kinds of data sets (FBS comes to mind), but isn't 
it theoretically possible? 

That's why we have linked lists, for occasions where this kind of
overhead is worth while.

I've used relative files for the same kind of need, although these
days databases have taken over (which do all that and more).

There are trade-offs though.   That kind of processing requires
significant overhead that slows down processing and is less reliable.
It's easier and safer to write a new copy of the file with the
inserted records in it.

--
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: Default class for JES2 SYSOUT

2008-10-17 Thread Richard Peurifoy

Sally Mason wrote:

Hi Peter and Mark,

I have a call logged with CA but their response is:-

'ASM2 does not ask for a specific SYSOUT class. No code within the product
asks for this. It appears that the operating system default is doing this
class definition for us.'

Hence why I was trying to establish if there is a default that I can change.  
They also appear to have a similar setup in their JES parms to us, but say that 
their SYS1-SYS4 goes to their MSGCLASS class, whereas ours 
doesn't and I have no idea why not.


Sally


Is it possible they are using LE and something in the CEE parms
is setting a default?

--
Richard

--
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: IBM PR: System z Announcement Webcast on October 21, 2008

2008-10-17 Thread Howard Brazee
On 16 Oct 2008 17:40:00 -0700, [EMAIL PROTECTED] (Timothy
Sipples) wrote:

And so you do that. Within the contract period, the marginal
price for deploying additional licenses is zero.

Did you catch what I wrote, within the contract period? That gives you a
clue what happens next: contract renewal.

Doesn't most everybody do that?   Guaranteed license price forever and
ever are rare indeed.   Try buying lifetime tickets to your favorite
sports venue.

Personally, I find it a pain when I am trying to decide between Cable
TV and its alternatives - they all offer deals for new customers
encouraging switching, but not sticking around.

--
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: Default class for JES2 SYSOUT

2008-10-17 Thread Mark Zelden
On Fri, 17 Oct 2008 08:40:55 -0500, Sally Mason [EMAIL PROTECTED]
wrote:

Hi Peter and Mark,

I have a call logged with CA but their response is:-

'ASM2 does not ask for a specific SYSOUT class. No code within the product
asks for this. It appears that the operating system default is doing this
class definition for us.'

Hence why I was trying to establish if there is a default that I can change.
They also appear to have a similar setup in their JES parms to us, but say that
their SYS1-SYS4 goes to their MSGCLASS class, whereas ours
doesn't and I have no idea why not.

Sally


Any other output software that could have some hooks?  If no other
clue, all you could probably do is take a dump or GTFTRACE it to see 
if that gives a clue.

Of course CA's setup may not really be similar (perhaps they are using
a started job). 

Even if you don't have started jobs set up, I think you can include the
jobcard if you put the proc in a proclib defined to MSTJCL.  Or try
starting it with MSGCLASS=x and see what happens.   

I am assuming there are no PARMs to ASM2 that may control this...

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:[EMAIL PROTECTED]
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
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: C03 abend when omiting CEE.SCEERUN from JCL

2008-10-17 Thread BT İşletim ve Tek nik Destek Bölümü
Hi Mark,
We checked the CEE.SCEERUN dataset again to be sure. CEE.SCEERUN in LNKLST
and the one coded inside JCL are exactly the same(no volser is coded and the
dataset is accessed via MCAT). When we searched CEEBINIT it is found in
CEE.SCEERUN as well.

One further investigation; we listed all the module names and aliases that
reside in LNKLST datasets and try to find if there are any common module
names of aliases that are in different physical datasets. There are no
module names or alias names that reside in CEE.SCEERUN and any other dataset
inside linklist (regardless of dataset's position in LNKLST).

Thanks and regards.

Mürsel Taşgın
BT Sistem Yönetimi
Yönetici Yardımcısı

Akbank Genel Müdürlüğü
Sabancı Center 34330, İstanbul
Tel: + 90 212 385 53 85
Faks: +90 212  282 62 76
[EMAIL PROTECTED]


-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Mark Zelden
Sent: Friday, October 17, 2008 3:55 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: C03 abend when omiting CEE.SCEERUN from JCL

On Fri, 17 Oct 2008 15:36:57 +0300, Mürsel Ta#351;g#305;n (BT
#304;#351;letim ve Teknik
Destek  Bölümü) [EMAIL PROTECTED] wrote:

Hi,
We have a problem about CEE.SCEERUN usage. This LE dataset is in LINKLIST
and all users are able to use it. However a batch program, which is
compiled
in Enterprise Cobol (V3.2) and make dynamic calls to ASM programs needs
CEE.SCEERUN dataset coded inside JCL (via joblib).

When we remove CEE.SCEERUN joblib statement from the JCL, the job abends
with C03:
IKJ56641I SYSTEM ABEND CODE C03   REASON CODE 0004

We cannot figure out, why program cannot call modules of CEE.SCEERUN from
LNKLST and needs it inside JCL(via joblib).
Anyone experienced same problem?

Thanks and regards.

Mürsel Taþgýn
Akbank


Silly question, but are you sure the one in the LNKLST matches the one in
your JCL?  VOLSER can be specified for the LNKLST so perhaps it is not
the cataloged version.   Also, maybe there is some set of options / CEEBINIT
or other LE modules ahead of the CEE.SCEERUN in the LNKLST and when
using joblib/steplib you are getting the options (or other LE modules) all
from the joblib/steplib.

Try using DDLIST (ISRDDN) and see if you can find other LE modules
coming from somewhere other than the LNKLST SCEERUN.

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:[EMAIL PROTECTED]
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
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


Bu e-posta ve muhtemel eklerinde verilen bilgiler kişiye özel ve gizli olup, 
yalnızca mesajda belirlenen alıcı ile ilgilidir.Size yanlışlıkla ulaşmışsa 
lütfen göndericiye bilgi veriniz, mesajı siliniz ve içeriğini başka bir kişiye 
açıklamayınız, herhangi bir ortama kopyalamayınız. Bu mesaj aksi sözleşme ile 
belirtilmedikçe herhangi bir finansal işlem teklifi, alımı, satımı veya 
herhangi bir havalenin teyidi gibi bankacılık işlemi yapılması amacını 
taşımamaktadır.Verilen tüm bilgilerin doğruluğu ve bütünlüğünün garantisi 
verilmemekte olup, önceden bildirilmeksizin değiştirilebilecektir.Bu mesajın 
içeriği Bankamızın resmi görüşlerini yansıtmayabileceğinden Akbank T.A.Ş. 
hiçbir hukuki sorumluluğu kabul etmez.

--
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: question about Oracle on the mainframe

2008-10-17 Thread Timothy Sipples
I cannot speak for Oracle licensing terms obviously -- check with Oracle --
but z10 is quad core technology so would evidently use their 0.75 price
multiplier per core for licensing. For example, if you have 4 dual core
Intel/AMD CPUs then that would be 4 Oracle processor licenses (8 cores *
0.5 = 4). Four z10 IFLs, however, would be 3 Oracle processor licenses (4 *
0.75 = 3).

- - - - -
Timothy Sipples
IBM Consulting Enterprise Software Architect
Based in Tokyo, Serving IBM Japan / Asia-Pacific
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: C03 abend when omitting CEE.SCEERUN from JCL

2008-10-17 Thread Jakubek, Jan
A guess: 
You may have something in front of SCEERUN on your either LNKLST or LPA
that overrides SCEERUN...

--
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: Default class for JES2 SYSOUT

2008-10-17 Thread Mark Zelden
On Fri, 17 Oct 2008 08:57:54 -0500, Mark Zelden [EMAIL PROTECTED]
wrote:

On Fri, 17 Oct 2008 08:40:55 -0500, Sally Mason [EMAIL PROTECTED]
wrote:

Hi Peter and Mark,

I have a call logged with CA but their response is:-

'ASM2 does not ask for a specific SYSOUT class. No code within the product
asks for this. It appears that the operating system default is doing this
class definition for us.'

Hence why I was trying to establish if there is a default that I can change.
They also appear to have a similar setup in their JES parms to us, but say
that
their SYS1-SYS4 goes to their MSGCLASS class, whereas ours
doesn't and I have no idea why not.

Sally


Any other output software that could have some hooks?  If no other
clue, all you could probably do is take a dump or GTFTRACE it to see
if that gives a clue.

Of course CA's setup may not really be similar (perhaps they are using
a started job).

Even if you don't have started jobs set up, I think you can include the
jobcard if you put the proc in a proclib defined to MSTJCL.  Or try
starting it with MSGCLASS=x and see what happens.

I am assuming there are no PARMs to ASM2 that may control this...


Sally,

Because I am not doing any real work today grin because I will be
at zBLC next week, I downloaded the ASM2 manuals and took a look. 

Look at $SYSOUTC for $OPTIONS and see what you have coded.

If this turns out to be your problem, it would be really sad that a
CA ASM2 support person couldn't point you to it and I would raise
that fact up to the support manager.

I found this in the planning guide:

2.2.56 SYSOUTC  (SYSOUT Class)
 
 
Default:  DC  X'00'
 
This is the SYSOUT class used to dynamically allocate AMSOUT
and SYSPRINT for IXR.  If you specify X'00', you will allocate
to the default SYSOUT class for the IXR address space.  If you
want to specify a specific class; that is, for CLASS=A you
would change the above field to DC C'A'.


--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:[EMAIL PROTECTED]
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
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: How to insert records using EXECIO

2008-10-17 Thread Scott Ford
Peter,
Did you see the url I sent you...



Scott Ford
Senior Systems Engineer

 
[p] 678.266.3399 x304[m] 609-346-0399  identityforge.com



This message is for the designated recipient only and may contain
privileged, proprietary, or otherwise private information. If you have
received it in error, please notify the sender immediately or let us know at

[EMAIL PROTECTED] or [EMAIL PROTECTED], and then delete the
original.  Any other use of the email by you is prohibited.


-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Hunkeler Peter (KIUK 3)
Sent: Friday, October 17, 2008 8:14 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: How to insert records using EXECIO

Scott,
I thought you wanted to demonstrate how to insert records
at the beginning of a file. I must have misunderstood. 

-- 
Peter Hunkeler
CREDIT SUISSE

--
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: Observations and Questions About Our Platform

2008-10-17 Thread Timothy Sipples
Simple: call volume. Just in the U.S. there are a couple hundred million
people with PCs, and you want to get them shunted to the correct call queue
as quickly as possible. Statistically speaking, you're probably calling a
general IBM help number with a PC problem. I don't think the statistics are
even close on that question, actually.

A lot of people think of IBM as the universal help desk. On a trip a few
years ago the person sitting next to me on the airplane struck up a
conversation and eventually learned (because he asked) that I work for IBM.
Whereupon he asked me for help getting his HP printer working with his
Apple Macintosh. (And come to think of it you probably can sign a contract
with IBM for that sort of service. But he didn't sign a contract with
me. :-))

Another side reason is that z/OS doesn't fail an awful lot, and if your,
say, credit card transactions have stopped running you probably aren't
going to be unfamiliar with how to get ahold of IBM if necessary. IBM
doesn't have to do so much hand holding on a general 800 number, basically.

You wouldn't find myriad other IBM products first (or even second) in the
call queue voice prompts either.

As a rough comparison, when you call the GE Answer Center, is the first
thing you hear, Press 1 for assistance preventing a nuclear meltdown with
the GE Boiling Water Reactor? No, you're probably going to hear first
about toasters, microwave ovens, and refrigerators. (And I think GE sold
some of those to Black and Decker many years ago, if memory serves, so it's
an apt analogy.)

It's precisely because the product is so important (GE Boiling Water
Reactors and IBM z/OS) that you don't hear about it at the Press 1 level.
If you prefer, the vendor is trying to clear the riff raff out of the way
right away on the odd chance you're a VIP trying to stumble in through the
service entrance. :-)

- - - - -
Timothy Sipples
IBM Consulting Enterprise Software Architect
Based in Tokyo, Serving IBM Japan / Asia-Pacific
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: C03 abend when omiting CEE.SCEERUN from JCL

2008-10-17 Thread Mark Zelden
On Fri, 17 Oct 2008 17:18:20 +0300, Mürsel Taşgın (BT İşletim ve Tek
nik Destek Bölümü) [EMAIL PROTECTED] wrote:

Hi Mark,
We checked the CEE.SCEERUN dataset again to be sure. CEE.SCEERUN in LNKLST
and the one coded inside JCL are exactly the same(no volser is coded and the
dataset is accessed via MCAT). When we searched CEEBINIT it is found in
CEE.SCEERUN as well.

One further investigation; we listed all the module names and aliases that
reside in LNKLST datasets and try to find if there are any common module
names of aliases that are in different physical datasets. There are no
module names or alias names that reside in CEE.SCEERUN and any other dataset
inside linklist (regardless of dataset's position in LNKLST).

Thanks and regards.


Did you check LPA also when using ISRDDN?  If so, then get a dump and 
open a PMR with IBM.  

Just out of curisosity, what OS level is this for? 

I am assuming someone didn't just apply the LE support for that level 
of COBOL to the LE lib in the LNKLST.  If they did, of course you would
need an LLA UPDATE of that library  / REFRESH.

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:[EMAIL PROTECTED]
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
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: Virtual (was: IBM PR: System z Announcement ...)

2008-10-17 Thread Bruno Sugliani
On Fri, 17 Oct 2008 04:19:38 -0500, Jan Vanbrabant
[EMAIL PROTECTED] wrote:

Bruno,
Is this within a single CEC or multi-CEC ?
Multi CEC 
One physical server is in computer room 1 
the target server is in computer room 2 
( of course short distance between computer rooms because of latency) 
Dasds are shared and accessed by high speed fibers  ( in our case HDS
hardware)
the IP network is also virtualised by VMware so the user does not see/feel
the move 
This is based on a feature called Vmotion 
http://www.vmware.com/products/vi/vc/vmotion.html

Bruno Sugliani 
zxnetconsult(at)free(dot)fr

--
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: C03 abend when omitting CEE.SCEERUN from JCL

2008-10-17 Thread Big Iron
Further to that thought, you should also check for MLPAs or dynamic LPA
updates (via SETPROG).

Bill

On Fri, 17 Oct 2008 10:26:31 -0400, Jakubek, Jan [EMAIL PROTECTED] wrote:

A guess:
You may have something in front of SCEERUN on your either LNKLST or LPA
that overrides SCEERUN...


--
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: Message ICE099A ... Need Help

2008-10-17 Thread Frank Yaeger
Peter Hunkeler wrote on 10/16/2008 11:44:07 PM:
 Yes, I'd agree that the most probable cause is a missing member.
 But I don't have any way of telling which member it is.

 Any reason the message doesn't tell? After all, ICEMAN knows
 what it was looking for.

I don't know why we don't include the member name in the message.
I looked at the DFSORT code that issues the ICE099A message and
we do know the member name at that point, so we could include it.
I'll add this to our list of future enhancements.

Thanks for the suggestion.

Frank Yaeger - DFSORT Development Team (IBM) - [EMAIL PROTECTED]
Specialties: FINDREP, WHEN=GROUP, DATASORT, ICETOOL, Symbols, Migration

 = DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort/

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



Re: C03 abend when omiting CEE.SCEERUN from JCL

2008-10-17 Thread Jack Kelly
snip
We checked the CEE.SCEERUN dataset again to be sure. CEE.SCEERUN in LNKLST
and the one coded inside JCL are exactly the same(no volser is coded and 
the
dataset is accessed via MCAT). When we searched CEEBINIT it is found in
CEE.SCEERUN as well.
unsnip

Only time I see  things like this is when someone does maintenance to a 
lnklst lib and doesn't refresh. Using a JOBLIB will open the lib and all 
will be well.
Just a thought

Jack Kelly
202-502-2390 (Office)

--
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: C03 abend when omitting CEE.SCEERUN from JCL

2008-10-17 Thread Jakubek, Jan
And ... MXI LPD * displays what's in the current, in VStorage, active
LPA...

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Big Iron
Sent: October 17, 2008 10:57 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: C03 abend when omitting CEE.SCEERUN from JCL

Further to that thought, you should also check for MLPAs or dynamic LPA
updates (via SETPROG).

Bill

On Fri, 17 Oct 2008 10:26:31 -0400, Jakubek, Jan [EMAIL PROTECTED]
wrote:

A guess:
You may have something in front of SCEERUN on your either LNKLST or LPA
that overrides SCEERUN...


--
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: Shared PARMLIB placement

2008-10-17 Thread Arthur Gutowski
On Thu, 16 Oct 2008 09:15:07, Chase, John [EMAIL PROTECTED] wrote:

Are there any compelling reasons to place a shared PARMLIB on a volume
that holds a sysplex couple dataset?

Only if you haven't the DASD to put it anywhere else.

Are there any compelling reasons NOT to place it there?

As already mentioned, reserves  I/O contention can send the sysplex casters-
up.

All arguments to the contrary, we unfortunately do have a small, shared 
PARMLIB on one of our sysplex couple volumes.  We tend to be less than 
orthodox here, anyway, but allow me to explain...

We are what IBM affectionately calls a BronzePlex, split across two sites.  
The only shared DASD we have between our sysplex images are the couple 
volumes.  Our Storage folks claim the gave us all the spare custom volumes 
they had on globally shared control units (LSS') to carve out the six couple 
volumes for this BronzePlex.  (We have recently right-sized our DASD 
configuration.)

Only members that must be common to the sysplex are in the shared 
PARMLIB - IEASYM, IEASYS (PlexCFG, GRS, and Couple and RNL poitners), 
COUPLE, and GRSRNL.  Must is a strong word, but better to maintain one 
copy of these members, particularly Couple and GRSRNL, than forget to 
update a carbon copy after making a change.  All other members are taken 
from system-specific PARMLIB's.

We do not back up the PARMLIB nor the couple volumes.

We spread our primaries, alternates, and spares across the six volumes, three 
in each building, to minimize contention and maximize availability.  We tried 
to 
pick a couple volume for PARMLIB that would be less contentious (mostly 
alternates and spares, and if a primary, a low-use one like SFM or WLM).

Though I am sure others here can point out examples if they do in fact exist, I 
have yet to see a z/OS component or ISV product that puts a RESERVE on a 
PARMLIB volume (other than DSS/FDR/etc).  Note that we CONVERT SPFEDIT. 
Because we only keep those four members in PARMLIB, I/O is brief, and limited 
to IPL and SET GRSRNL=xx.

I realize the risks, and I realize some folks' heads are probably spinning, so 
I 
absolutely do not recommend anyone put PARMLIB on a couple volume.  We 
do it here because we painted ourselves into a corner.  Our IODF volumes are 
shared, but only within a site.  I'm trying to convince line management to take 
the next step into shared DASD (moving toward what IBM terms a GoldPlex), 
but it's a tough sell right now (just read the papers).  Once we get there, 
PARMLIB will be moved off.

BTW, BronzePlex and GoldPlex (as well as PlatinumPlex) are terms taken 
from IBM's Redpaper z/OS Systems Programmers Guide to: Sysplex
Aggregation.

Regards,
Art Gutowski
Ford Motor Company ITInfrastructure

--
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: Default class for JES2 SYSOUT

2008-10-17 Thread Chase, John
 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of Paul Gilmartin
 Subject: Re: Default class for JES2 SYSOUT
 
 On Thu, 16 Oct 2008 19:19:20 -0500, Mark Zelden wrote:
 
 Is this always the case, or only if the DD statement specifies
 SYSOUT=*.  I believe in our lab configuration if I leave the
 class empty on my DD SYSOUT statement, and omit the OUTPUT JCL
 statement, the SYSOUT again goes to bit bucket.
 
 What do you mean if you have a DD SYSOUT statement with the
 class empty?  You have to specify something, don't you? At least
 in JCL.  ...
 
 Actually, you don't have to specify something:
 
Linkname: 12.63.1 z/OS V1R10.0 MVS JCL Reference IBM Library
 Server
 URL: http://publibz.boulder.ibm.com/cgi-
 bin/bookmgr_OS390/BOOKS/IEA2B680/12.63.1
 
 But the syntax is convoluted (They don't even have it right in
 the syntax diagram; they needed a verbal addition), or at best
 unintuitive.   And IIRC they got even that right only in reaction
 to my PMR complaining that there was no apparent way in a JCL DD
 statement to exploit the DEFAULT= parameter of the JCL OUTPUT
 statement; I had tried and failed with such as:
 
 4 //SYSUTX   DD  SYSOUT=''
  STMT NO. MESSAGE
 4 IEFC629I INCORRECT USE OF APOSTROPHE IN THE SYSOUT FIELD
 
 and:
 
 4 //SYSUTY   DD  SYSOUT=()
 IEF210I TESTJOB STEP SYSUTY - UNIT FIELD SPECIFIES INCORRECT DEVICE
 NAME
 
 ??? !!!  (I thought this used to give INCORRECT USE OF PARENTHESIS IN
 THE SYSOUT FIELD.)
 
 But, hey, if none of the above were true, it would hardly qualify
 as JCL, would it?

Having a spare moment, I tried this (z/OS 1.9):

 2 //BR14 EXEC PGM=IEFBR14  
 3 //DD01 DD SYSOUT=  == nothing there

Result:

IGD101I SMS ALLOCATED TO DDNAME (DD01)

DSN (SYS08291.T094541.RA000.IEFBR14A.R0300267)

STORCLAS (SCTMP) MGMTCLAS () DATACLAS ()

VOL SER NOS= TMP411

IEF142I IEFBR14A BR14 - STEP WAS EXECUTED - COND CODE 

IGD105I SYS08291.T094541.RA000.IEFBR14A.R0300267 DELETED,
DDNAME=DD01

Normal specification:

 2 //BR14 EXEC PGM=IEFBR14 
 3 //DD01 DD SYSOUT=*  

Gave:

IEF237I JES2 ALLOCATED TO DD01
IEF142I IEFBR14A BR14 - STEP WAS EXECUTED - COND CODE  
IEF285I   userid.IEFBR14A.JOB06481.D101.? SYSOUT  

-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: C03 abend when omiting CEE.SCEERUN from JCL

2008-10-17 Thread BT İşletim ve Tek nik Destek Bölümü
Hi Mark,
We are at zOS 1.9. We put CEE.SCEERUN at the top of LNKLST and activate a
new set of LNKLST. We searched LPA and MLPA datasets as well for a module
having same name with the ones in CEE.SCEERUN but didn't find any.

Is there a quick way (a parameter or tracer) to list or report which call
sequence occurs during the execution of our problematic batch program?

Thanks and regards.

Mürsel Taşgın
BT Sistem Yönetimi
Yönetici Yardımcısı

Akbank Genel Müdürlüğü
Sabancı Center 34330, İstanbul
Tel: + 90 212 385 53 85
Faks: +90 212  282 62 76
[EMAIL PROTECTED]


-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Mark Zelden
Sent: Friday, October 17, 2008 5:45 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: C03 abend when omiting CEE.SCEERUN from JCL

On Fri, 17 Oct 2008 17:18:20 +0300, Mürsel Taşgın (BT İşletim ve Tek
nik Destek Bölümü) [EMAIL PROTECTED] wrote:

Hi Mark,
We checked the CEE.SCEERUN dataset again to be sure. CEE.SCEERUN in LNKLST
and the one coded inside JCL are exactly the same(no volser is coded and
the
dataset is accessed via MCAT). When we searched CEEBINIT it is found in
CEE.SCEERUN as well.

One further investigation; we listed all the module names and aliases that
reside in LNKLST datasets and try to find if there are any common module
names of aliases that are in different physical datasets. There are no
module names or alias names that reside in CEE.SCEERUN and any other
dataset
inside linklist (regardless of dataset's position in LNKLST).

Thanks and regards.


Did you check LPA also when using ISRDDN?  If so, then get a dump and
open a PMR with IBM.

Just out of curisosity, what OS level is this for?

I am assuming someone didn't just apply the LE support for that level
of COBOL to the LE lib in the LNKLST.  If they did, of course you would
need an LLA UPDATE of that library  / REFRESH.

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:[EMAIL PROTECTED]
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
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


Bu e-posta ve muhtemel eklerinde verilen bilgiler kişiye özel ve gizli olup, 
yalnızca mesajda belirlenen alıcı ile ilgilidir.Size yanlışlıkla ulaşmışsa 
lütfen göndericiye bilgi veriniz, mesajı siliniz ve içeriğini başka bir kişiye 
açıklamayınız, herhangi bir ortama kopyalamayınız. Bu mesaj aksi sözleşme ile 
belirtilmedikçe herhangi bir finansal işlem teklifi, alımı, satımı veya 
herhangi bir havalenin teyidi gibi bankacılık işlemi yapılması amacını 
taşımamaktadır.Verilen tüm bilgilerin doğruluğu ve bütünlüğünün garantisi 
verilmemekte olup, önceden bildirilmeksizin değiştirilebilecektir.Bu mesajın 
içeriği Bankamızın resmi görüşlerini yansıtmayabileceğinden Akbank T.A.Ş. 
hiçbir hukuki sorumluluğu kabul etmez.

--
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: C03 abend when omiting CEE.SCEERUN from JCL

2008-10-17 Thread Itschak Mugzach
Why not just take care of the C03 Abend? it is usualy relates to unclosed
datasets in the program. Check to see if the program or one of the routines
dosn't close files.

Itschak

2008/10/17 Mürsel Taşgın (BT İşletim ve Teknik Destek Bölümü) 
[EMAIL PROTECTED]

 Hi,
 We have a problem about CEE.SCEERUN usage. This LE dataset is in LINKLIST
 and all users are able to use it. However a batch program, which is
 compiled
 in Enterprise Cobol (V3.2) and make dynamic calls to ASM programs needs
 CEE.SCEERUN dataset coded inside JCL (via joblib).

 When we remove CEE.SCEERUN joblib statement from the JCL, the job abends
 with C03:
 IKJ56641I SYSTEM ABEND CODE C03   REASON CODE 0004

 We cannot figure out, why program cannot call modules of CEE.SCEERUN from
 LNKLST and needs it inside JCL(via joblib).
 Anyone experienced same problem?

 Thanks and regards.

 Mürsel Taşgın
 Akbank

 Bu e-posta ve muhtemel eklerinde verilen bilgiler kişiye özel ve gizli
 olup, yalnızca mesajda belirlenen alıcı ile ilgilidir.Size yanlışlıkla
 ulaşmışsa lütfen göndericiye bilgi veriniz, mesajı siliniz ve içeriğini
 başka bir kişiye açıklamayınız, herhangi bir ortama kopyalamayınız. Bu mesaj
 aksi sözleşme ile belirtilmedikçe herhangi bir finansal işlem teklifi,
 alımı, satımı veya herhangi bir havalenin teyidi gibi bankacılık işlemi
 yapılması amacını taşımamaktadır.Verilen tüm bilgilerin doğruluğu ve
 bütünlüğünün garantisi verilmemekte olup, önceden bildirilmeksizin
 değiştirilebilecektir.Bu mesajın içeriği Bankamızın resmi görüşlerini
 yansıtmayabileceğinden Akbank T.A.Ş. hiçbir hukuki sorumluluğu kabul etmez.

 --
 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: C03 abend when omitting CEE.SCEERUN from JCL

2008-10-17 Thread Roach, Dennis
The cause could be ANY duplicate module in SCEERUN that is in LPA or ahead of 
SCEERUN in linklist that gets invoked, directly or indirectly, by the
executing program.


And ... MXI LPD * displays what's in the current, in VStorage, active LPA...


Further to that thought, you should also check for MLPAs or dynamic LPA updates 
(via SETPROG).

Bill

On Fri, 17 Oct 2008 10:26:31 -0400, Jakubek, Jan [EMAIL PROTECTED]
wrote:

A guess:
You may have something in front of SCEERUN on your either LNKLST or LPA 
that overrides SCEERUN...


--
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: C03 abend when omiting CEE.SCEERUN from JCL

2008-10-17 Thread Mark Zelden
On Fri, 17 Oct 2008 18:09:30 +0300, Mürsel Taşgın (BT İşletim ve Tek
nik Destek Bölümü) [EMAIL PROTECTED] wrote:

Hi Mark,
We are at zOS 1.9. We put CEE.SCEERUN at the top of LNKLST and activate a
new set of LNKLST. We searched LPA and MLPA datasets as well for a module
having same name with the ones in CEE.SCEERUN but didn't find any.


Did you create a new LNKLST set in response to the problem, or prior
to it?   If prior to the problem, there have been bugs related to LLA 
before (I'm not saying this is one).  You could try to stop and restart LLA
or at least an entire LLA refresh. 

Is there a quick way (a parameter or tracer) to list or report which call
sequence occurs during the execution of our problematic batch program?


Some IEBIBALL methods have been mentioned and tried by you.  
Dump...   PMR time...

Mark  
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:[EMAIL PROTECTED]
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
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: Default class for JES2 SYSOUT

2008-10-17 Thread Tom Marchant
On Fri, 17 Oct 2008 10:07:50 -0500, Chase, John wrote:

 2 //BR14 EXEC PGM=IEFBR14
 3 //DD01 DD SYSOUT=  == nothing there

Result:

IGD101I SMS ALLOCATED TO DDNAME (DD01)


That's surprising.  Paul's SYSOUT=() does the same thing.  His SMS
configuration must be different.  It's as if SYSOUT is ignored.  Indeed, I
get the same thing if I specify

//DD01DD

with no operands.  I'm surprised that it doesn't cause a JCL error.

SYSOUT=(,) will allocate to JES, though.  I didn't try to send data to it,
or even to open it.  TFM says that it will default to class A.

-- 
Tom Marchant

--
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: C03 abend when omitting CEE.SCEERUN from JCL

2008-10-17 Thread John McKown
On Fri, 17 Oct 2008 10:20:44 -0500, Roach, Dennis
[EMAIL PROTECTED] wrote:

The cause could be ANY duplicate module in SCEERUN that is in LPA or ahead
of SCEERUN in linklist that gets invoked, directly or indirectly, by the
executing program.


And ... MXI LPD * displays what's in the current, in VStorage, active LPA...


Further to that thought, you should also check for MLPAs or dynamic LPA
updates (via SETPROG).

Bill

I find duplicates using DDLIST in ISPF. On any command line, enter DDLIST.
Then enter LINKLIST to add the current LNKLST to the display. Then enter
ONLY LINKLIST to exclude all other allocations. Then enter DUPLICATES to see
what is duplicated and where the duplicates exist.

--
John

--
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: Default class for JES2 SYSOUT

2008-10-17 Thread Chase, John
 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of Tom Marchant
 
 On Fri, 17 Oct 2008 10:07:50 -0500, Chase, John wrote:
 
  2 //BR14 EXEC PGM=IEFBR14
  3 //DD01 DD SYSOUT=  == nothing there
 
 Result:
 
 IGD101I SMS ALLOCATED TO DDNAME (DD01)
 
 
 That's surprising.  Paul's SYSOUT=() does the same thing.  His SMS
 configuration must be different.  It's as if SYSOUT is ignored.
 Indeed, I
 get the same thing if I specify
 
 //DD01DD
 
 with no operands.  I'm surprised that it doesn't cause a JCL error.

That's just a null override.  We use that technique in CICS JCL, to
extend the //DFHRPL concatenation with region-specific libraries (the
common libraries are coded in the startup PROC).  Of course, at CTS
3.2 the dynamic libraries function was introduced, so someday we
might pare the //DFHRPL concatenation down to only those libraries that
cannot be defined dynamically to CICS.

-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: C03 abend when omitting CEE.SCEERUN from JCL

2008-10-17 Thread Tom Marchant
On Fri, 17 Oct 2008 10:47:49 -0500, John McKown wrote:

I find duplicates using DDLIST in ISPF. On any command line, enter DDLIST.
Then enter LINKLIST to add the current LNKLST to the display. Then enter
ONLY LINKLIST to exclude all other allocations. Then enter DUPLICATES to see
what is duplicated and where the duplicates exist.

Cool!  Thanks John.

BTW, either LINKLIST or LPa will add both LPA and the current LNKLST.

-- 
Tom Marchant

--
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: C03 abend when omitting CEE.SCEERUN from JCL

2008-10-17 Thread Chase, John
 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of John McKown
 
 On Fri, 17 Oct 2008 10:20:44 -0500, Roach, Dennis wrote:
 
 The cause could be ANY duplicate module in SCEERUN that is in LPA or
ahead
 of SCEERUN in linklist that gets invoked, directly or indirectly, by
the
 executing program.
 
 I find duplicates using DDLIST in ISPF. On any command line, enter
DDLIST.
 Then enter LINKLIST to add the current LNKLST to the display. Then
enter
 ONLY LINKLIST to exclude all other allocations. Then enter DUPLICATES
to see
 what is duplicated and where the duplicates exist.

I wonder if everybody might be barking up the wrong tree?

The original complaint was this:

 When we remove CEE.SCEERUN joblib statement from the JCL, the job
abends with C03:
IKJ56641I SYSTEM ABEND CODE C03   REASON CODE 0004

Note the message ID:  It's a TSO message.  Leads me to believe more
needs to be known about just how the program is invoked.  Seems that
it's not via normal batch JCL; i.e., it's not via

//STEPNAME EXEC PGM=COBOLPGM

-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: Virtual (was: IBM PR: System z Announcement ...)

2008-10-17 Thread Mark Post
 On 10/17/2008 at  9:02 AM, in message
[EMAIL PROTECTED], Jon Brock
[EMAIL PROTECTED] wrote: 
 Can anybody get to this document?  It keeps coming up as corrupted for
 me.

When I uploaded the presentations for SHARE 111, I did a test download on all 
of them.  Somehow this one is now getting truncated.  I just now re-uploaded 
it, and it downloads fine once again.


Mark Post

--
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: C03 abend when omitting CEE.SCEERUN from JCL

2008-10-17 Thread Mark Zelden
On Fri, 17 Oct 2008 10:47:49 -0500, John McKown [EMAIL PROTECTED] wrote:

I find duplicates using DDLIST in ISPF. On any command line, enter DDLIST.
Then enter LINKLIST to add the current LNKLST to the display. Then enter
ONLY LINKLIST to exclude all other allocations. Then enter DUPLICATES to see
what is duplicated and where the duplicates exist.


I didn't spell out how to do it, but this is what I suggested earlier.  The
OP said they did it and found no duplicates... but perhaps they didn't
use the duplicate function and did it manually. 

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:[EMAIL PROTECTED]
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
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: C03 abend when omitting CEE.SCEERUN from JCL

2008-10-17 Thread Mark Zelden
On Fri, 17 Oct 2008 11:04:51 -0500, Chase, John [EMAIL PROTECTED] wrote:


 When we remove CEE.SCEERUN joblib statement from the JCL, the job
abends with C03:
IKJ56641I SYSTEM ABEND CODE C03   REASON CODE 0004

Note the message ID:  It's a TSO message.  Leads me to believe more
needs to be known about just how the program is invoked.  Seems that
it's not via normal batch JCL; i.e., it's not via

   //STEPNAME EXEC PGM=COBOLPGM

-jc-


Perhaps its a DB2 COBOL program.  But that shouldn't matter.  It should
run without the JOBLIB all things being equal.

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:[EMAIL PROTECTED]
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
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



Using RACF for Single Signon ( logon )

2008-10-17 Thread Marvin Lukasik
In thinking about uses for the mainframe to extend its life, one that came to
mind is using RACF as a password server so users need only a single password
to logon into the many systems they must access. Like most shops today,
we have a multitude of Microsoft  Unix servers, each having different
security and hence, different passwords. We have reviewed many offerings
from vendors and most ( if not all ) completely ignore the mainframe and
are ENORMOUSLY expensive. Also, their performance was disappointing
and their systems were buggy. I would be interested in hearing comments
about anyone who has heard of a RACF-based product or written something
of their own to accomplish this. Also comments about the general feasability
and difficulty of such an endeavor would be welcome. To do this relatively
inexpensively on the mainframe would be quite a coup for an 'obsolete' 
platform.
Marv Lukasik
Systems Programmer
Carle Clinic Association  

--
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: Using RACF for Single Signon ( logon )

2008-10-17 Thread Rich Smrcina

Marvin Lukasik wrote:

In thinking about uses for the mainframe to extend its life, one that came to
mind is using RACF as a password server so users need only a single password
to logon into the many systems they must access. Like most shops today,
we have a multitude of Microsoft  Unix servers, each having different
security and hence, different passwords. We have reviewed many offerings
from vendors and most ( if not all ) completely ignore the mainframe and
are ENORMOUSLY expensive. Also, their performance was disappointing
and their systems were buggy. I would be interested in hearing comments
about anyone who has heard of a RACF-based product or written something
of their own to accomplish this. Also comments about the general feasability
and difficulty of such an endeavor would be welcome. To do this relatively
inexpensively on the mainframe would be quite a coup for an 'obsolete' 
platform.

Marv Lukasik
Systems Programmer
Carle Clinic Association  


With the LDAP server on z/OS this is certainly possible.  But implementing it may go far 
beyond technology.  There may be political battles between your mainframe and 
distributed people that only management decree can solve.


There is a redbook published on the subject, see the redbooks site for the technical 
details.  It can't help you with the politics. :)


--

Rich Smrcina
VM Assist, Inc.
Phone: 414-491-6001
Ans Service:  360-715-2467
rich.smrcina at vmassist.com
http://www.linkedin.com/in/richsmrcina

Catch the WAVV!  http://www.wavv.org
WAVV 2009 - Orlando, FL - May 15-19, 2009

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



Concatenating TERSEd data?

2008-10-17 Thread Tim Hare
We need to TERSE a fairly large (for us) amount of data. This data is in 
multiple separate datasets now, but needs to be sent as one large sequential 
dataset.  We can TERSE the concatenated sequential input of course; but out 
of curiosity I'm wondering: can you TERSE the individual components, 
concatenate the results via IEBGENER, and the UNTERSE the resulting file on 
the other end? 

From what I remember about Lempel-Ziv, the dictionary is built as you go 
along but it might mean that the second and subsequent files concatenated 
would be read with incomplete information, resulting in erroneous 
decompression results?

--
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: Using RACF for Single Signon ( logon )

2008-10-17 Thread Jerry Fuchs
Marv,

We use Vanguard PSYNCH. All ID's and passwords are maintained in RACF and 
are propagated to other platforms when a password changes. I can't really 
address cost, but it interfaces with just about everything and our 
security people are very happy with it. 

Jerry 



Marvin Lukasik [EMAIL PROTECTED] 
Sent by: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU
10/17/2008 12:44 PM
Please respond to
IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Using RACF for Single Signon ( logon )






In thinking about uses for the mainframe to extend its life, one that came 
to
mind is using RACF as a password server so users need only a single 
password
to logon into the many systems they must access. Like most shops today,
we have a multitude of Microsoft  Unix servers, each having different
security and hence, different passwords. We have reviewed many offerings
from vendors and most ( if not all ) completely ignore the mainframe and
are ENORMOUSLY expensive. Also, their performance was disappointing
and their systems were buggy. I would be interested in hearing comments
about anyone who has heard of a RACF-based product or written something
of their own to accomplish this. Also comments about the general 
feasability
and difficulty of such an endeavor would be welcome. To do this relatively
inexpensively on the mainframe would be quite a coup for an 'obsolete' 
platform.
Marv Lukasik
Systems Programmer
Carle Clinic Association 

--
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: Using RACF for Single Signon ( logon )

2008-10-17 Thread Field, Alan C.
This is must not an easy project. 

I believe we are on our third attempt to do single signon. The first two
failed and I think I heard this one isn't going so well either. 

I also think we've tried three different solution providers. None of the
implementations are mainframe based.

Alan  


Subject: Using RACF for Single Signon ( logon )

In thinking about uses for the mainframe to extend its life, one that
came to
mind is using RACF as a password server so users need only a single
password
to logon into the many systems they must access. Like most shops today,
we have a multitude of Microsoft  Unix servers, each having different
security and hence, different passwords. We have reviewed many offerings
from vendors and most ( if not all ) completely ignore the mainframe and
are ENORMOUSLY expensive. Also, their performance was disappointing
and their systems were buggy. I would be interested in hearing comments
about anyone who has heard of a RACF-based product or written something
of their own to accomplish this. Also comments about the general
feasability
and difficulty of such an endeavor would be welcome. To do this
relatively
inexpensively on the mainframe would be quite a coup for an 'obsolete' 
platform.
Marv Lukasik
Systems Programmer
Carle Clinic Association  

--
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: Using RACF for Single Signon ( logon )

2008-10-17 Thread Jerry Fuchs
Oops I forgot. Here is Vanguard's contact info

VANGUARD Integrity Professionals
Enterprise Security Software
6625 S. Eastern Avenue, Suite 100
Las Vegas, Nevada 89119
Phone: (702)794.0014 | Fax: (702)794.0023

We also use their RIOVISON product to maintain RACF.

--
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: Concatenating TERSEd data?

2008-10-17 Thread Jürgen Kehr

Hi,

couldn't you put the sequential datasets into one large PO dataset and 
terse this one ? On the other side you unterse it to a PO file again and 
unload it with IEBGENER.


Tim Hare schrieb:
We need to TERSE a fairly large (for us) amount of data. This data is in 
multiple separate datasets now, but needs to be sent as one large sequential 
dataset.  We can TERSE the concatenated sequential input of course; but out 
of curiosity I'm wondering: can you TERSE the individual components, 
concatenate the results via IEBGENER, and the UNTERSE the resulting file on 
the other end? 

From what I remember about Lempel-Ziv, the dictionary is built as you go 
along but it might mean that the second and subsequent files concatenated 
would be read with incomplete information, resulting in erroneous 
decompression results?


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

  


--

___



Freundliche Gruesse / Kind regards



Dipl.Math. Juergen Kehr, IT Schulung  Beratung, IT Education + Consulting

Tel.  +49-561-9528788  Fax   +49-561-9528789  Mobil +49-172-5129389

ICQ 292-318-696 (JKehr)



mailto:[EMAIL PROTECTED]

mailto:[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: Concatenating TERSEd data?

2008-10-17 Thread John Kington
Tim,


 We need to TERSE a fairly large (for us) amount of data. This data is in
 multiple separate datasets now, but needs to be sent as one large
sequential
 dataset.  We can TERSE the concatenated sequential input of course; but
out
 of curiosity I'm wondering: can you TERSE the individual components,
 concatenate the results via IEBGENER, and the UNTERSE the resulting file
on
 the other end?

You should be able to experiment with this easily. When I need to xmit
multiple datasets from one z/OS environment to another, I always create a
DSS backup, terse it, xmit it, unterse it and run a DSS restore.
Regards,
John

--
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: Using RACF for Single Signon ( logon )

2008-10-17 Thread Mark Zelden
On Fri, 17 Oct 2008 12:50:49 -0400, Jerry Fuchs
[EMAIL PROTECTED] wrote:

Marv,

We use Vanguard PSYNCH. 

I thought it was from M-Tech? 

I just googled it and it looks like it is now  Hitachi ID Systems, not 
M-Tech Information Technology.   

Does Vanguard also have a product called PSYNC?  

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:[EMAIL PROTECTED]
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
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: Concatenating TERSEd data?

2008-10-17 Thread Tony Harminc
2008/10/17 Tim Hare [EMAIL PROTECTED]:
 We need to TERSE a fairly large (for us) amount of data. This data is in
 multiple separate datasets now, but needs to be sent as one large sequential
 dataset.  We can TERSE the concatenated sequential input of course; but out
 of curiosity I'm wondering: can you TERSE the individual components,
 concatenate the results via IEBGENER, and the UNTERSE the resulting file on
 the other end?

It's trivial to try, but I very much doubt it...

 From what I remember about Lempel-Ziv, the dictionary is built as you go
 along but it might mean that the second and subsequent files concatenated
 would be read with incomplete information, resulting in erroneous
 decompression results?

Terse appears to be Lempel-Ziv-Wegner (or Welch, depending on whose
expired patent you prefer W to stand for), but it is a particular
implementation of a general algorithm, and there are header and
trailer records, both undocumented. By inspection, the header is a
pretty straightforward 12 byte piece that describes both some original
dataset characteristics and some encoding method info, but the trailer
is longer and less obvious. It looks to me as though the trailer is
just informational, but I don't know if it contains enough information
to be skipped over reliably.

Regardless, the dictionary after the first compress/decompress
operation would not be the same as the initial dictionary, and you
would have no way to tell the decompressor to start with a virgin
dictionary.

Without knowing much about the encoding, you could terse and
concatenate the segments, and then at the other end run a splitter
program to scan through the compressed data looking for headers, and
invoked the deterse for each segment. Unfortunately the headers are
not uniquely identifiable, i.e. there is no eyecatcher, and a
syntactically correct header could occur within the compressed data
stream. So your splitter program would have to scan forward from the
13th byte, treating the data stream as 12-bit chunks, until you reach
a zero chunk, indicating logical EOF, then figure out how to skip over
the trailer, which doesn't appear to contain its own length, and scan
for the next header. It's always possible AMATERSE already does this.

Another approach might be to put the original multiple datasets into
members of a PDS, and terse that with AMATERSE, which understands
PDS[E]s. After the deterse, you would have an identical PDS, which
could be easily turned back into a sequential dataset. Or run a DSS
dump selecting your datasets, terse the output of that, then deterse
and DSS restore at the other end.

Tony 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: Concatenating TERSEd data?

2008-10-17 Thread John McKown
I would probably do the following:

1. TERSE each dataset to be transmitted.

2. Create a PDS large enough to contain each TERSEd dataset as a separate
member.

3. Put another member in that pds to restore the TERSEd datasets within it

4. XMIT that PDS (not TERSE).

Why the XMIT at the end instead of another TERSE? Because TERSE'ing the PDS
would likely just use CPU with little futher compression.

Why TERSE each dataset, then make each TERSE a member of a PDS instead of
using DFDSS of each dataset, then TERSE'ing the DFDSS dump? Because not
everybody has DFDSS.

Of course step 2 assumes that you have a single volume with enough space to
contain the PDS with all the members. If this is not true, then I'd likely
download each TERSE'd dataset to my desktop. Once on my desktop, I'd use
zip without compression to combine the TERSE'd datasets into a single
zip file.

--
John

--
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: Concatenating TERSEd data?

2008-10-17 Thread Paul Gilmartin
On Fri, 17 Oct 2008 14:23:44 -0500, John McKown wrote:

Why the XMIT at the end instead of another TERSE? Because TERSE'ing the PDS
would likely just use CPU with little futher compression.

Yes, but XMIT expands it somewhat with control sequences.

Of course step 2 assumes that you have a single volume with enough space to
contain the PDS with all the members. If this is not true, then I'd likely
download each TERSE'd dataset to my desktop. Once on my desktop, I'd use
zip without compression to combine the TERSE'd datasets into a single
zip file.

What's the advantage of zip without compression over pax?  tar?

Dammit! why won't AMATERSE tolerate HFS files, NFS files, or
POSIX pipes allocated with JCL or DYNALLOC as its TERSE'd
datasets?

-- 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: Using RACF for Single Signon ( logon )

2008-10-17 Thread John Giltner
As Rich Smrcina said, this can be accomplished by using LDAP.  For OS 
that support using NIS servers (Unix/Linux), you can even use LDAP on 
z/OS as a NIS server, thus you don't even have to add users to the local 
security database.


In addition to politics you may also run into password length problems. 
 Our distributed guys want 16 character passwords at a minimum.  They 
feel that 6 characters is too short (our current RACF minumum), even 
with a 4 tries and your revoked.




Marvin Lukasik wrote:

In thinking about uses for the mainframe to extend its life, one that came to
mind is using RACF as a password server so users need only a single password
to logon into the many systems they must access. Like most shops today,
we have a multitude of Microsoft  Unix servers, each having different
security and hence, different passwords. We have reviewed many offerings
from vendors and most ( if not all ) completely ignore the mainframe and
are ENORMOUSLY expensive. Also, their performance was disappointing
and their systems were buggy. I would be interested in hearing comments
about anyone who has heard of a RACF-based product or written something
of their own to accomplish this. Also comments about the general feasability
and difficulty of such an endeavor would be welcome. To do this relatively
inexpensively on the mainframe would be quite a coup for an 'obsolete' 
platform.

Marv Lukasik
Systems Programmer
Carle Clinic Association  



--
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: IBM DB2 Version 9 for z/OS

2008-10-17 Thread Jim Harrison
I'd like to clarify my note to Steve which I hadn't meant to send to the 
list -  The PA meetings are not better (how would I know if I hadn't 
been to Columbia), but based on topics presented in the meeting notices, 
the topics in Harrisburg have been more interesting to me.  Didn't mean 
to disparage the Balt-DC DB2 users group. 


Jim Harrison wrote:
Steve, is this for the Balt-DC DB2 user group??  I work about 15 
minutes from there.  I've never been to their meetings - where I live 
it's move convenient to attend the PA meetings in Harrisburg, which 
are free and usually better.  But if you are presenting, I may take 
the day and go to Columbia.


Steve Comstock wrote:




I have; works fine for BLOBs anyway. I'm giving a talk
on it in Columbia, MD on Thursday, so I thought it'd be
good to test it out. [Actually, I put the path on the
data statements.]




--
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: Concatenating TERSEd data?

2008-10-17 Thread Mark Zelden
On Fri, 17 Oct 2008 12:00:48 -0500, Tim Hare [EMAIL PROTECTED] wrote:

n Fri, 17 Oct 2008 12:00:48 -0500, Tim Hare [EMAIL PROTECTED] wrote:

We need to TERSE a fairly large (for us) amount of data. This data is in
multiple separate datasets now, but needs to be sent as one large sequential
dataset.  We can TERSE the concatenated sequential input of course; but out
of curiosity I'm wondering: can you TERSE the individual components,
concatenate the results via IEBGENER, and the UNTERSE the resulting file on
the other end?

On Fri, 17 Oct 2008 14:23:44 -0500, John McKown [EMAIL PROTECTED] wrote:

I would probably do the following:

1. TERSE each dataset to be transmitted.

2. Create a PDS large enough to contain each TERSEd dataset as a separate
member.


PDS?  If this a large amount of data (the OP didn't give a clue as to what
that really meant...) then it's not going to fit within the small (relatively)
size restriction of a PDS ( 64K tracks).  

Why not terse them (concatenated) and the output can be on a single
tape data set (multi-volume if required) if the size is too big for disk.
I've done that to deal with 15 volume 3390-3 SADUMP data sets.

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:[EMAIL PROTECTED]
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
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: Concatenating TERSEd data?

2008-10-17 Thread John McKown
On Fri, 17 Oct 2008, Paul Gilmartin wrote:

 What's the advantage of zip without compression over pax?  tar?

Most Windows people have zip and know what it is. But, in this case, it 
might be better to pax the files. Does pax read and write legacy datasets?

 
 Dammit! why won't AMATERSE tolerate HFS files, NFS files, or
 POSIX pipes allocated with JCL or DYNALLOC as its TERSE'd
 datasets?

Likely that header information referred to earlier specified things like 
DSORG, LRECL, RECFM, and other things that don't really apply to a UNIX 
file. Not that AMATERSE could not be expanded to support UNIX files by 
using some other values in that header information.

 
 -- gil

-- 
Q: What do theoretical physicists drink beer from?
A: Ein Stein.

Maranatha!
John McKown

--
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: Concatenating TERSEd data?

2008-10-17 Thread Paul Gilmartin
On Fri, 17 Oct 2008 18:09:43 -0500, John McKown wrote:

 What's the advantage of zip without compression over pax?  tar?

Most Windows people have zip and know what it is. But, in this case, it
might be better to pax the files. Does pax read and write legacy datasets?

I was thinking terse, then tar; even as you suggested terse, then zip.

Pax reads and writes legacy data sets on the archive side only.

 Dammit! why won't AMATERSE tolerate HFS files, NFS files, or
 POSIX pipes allocated with JCL or DYNALLOC as its TERSE'd
 datasets?

Likely that header information referred to earlier specified things like
DSORG, LRECL, RECFM, and other things that don't really apply to a UNIX
file. Not that AMATERSE could not be expanded to support UNIX files by
using some other values in that header information.

No, no; I was thinking UNIX files on the tersed side, not the
untersed.  Now, it's possible to terse and cp the archive to
a Unix file, and even unterse directly from the unix archive
provided you precatenate an empty legacy data set !?!?.

I.e. you'd like to terse to NFS files mounted from your
Linux system, then pax on Linux.

-- 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: [OT] Heart Surgery

2008-10-17 Thread Jim Harrison
Been meaning to jump on the bandwagon here -  I had two stents placed 2 
years ago (LAD  CFX).  So far, so good.


If you are at risk - smokers especially (my Dr. said 95% of his patients 
are smokers, as I was) you need a radiation stress test (or Thallium 
stress test).  Painless but a tad time consuming  do it now even if 
your insurance won't cover it.   If it shows a blockage, then you go on 
to the cath lab... no big deal either.  Painless.  If you are lucky, you 
get a stent, if not, bypass.  But at least you get it before it gets 
you.  Do it now if you think you need to.


Scott Ford wrote:

Shai,

Thanks, that how I lost my wife 5 yrs ago, type 1 diabetic, massive sudden 
Heart Attack at 49.



Scott Ford
Senior Systems Engineer

 
[p] 678.266.3399 x304[m] 609-346-0399  identityforge.com




This message is for the designated recipient only and may contain
privileged, proprietary, or otherwise private information. If you have
received it in error, please notify the sender immediately or let us know at

[EMAIL PROTECTED] or [EMAIL PROTECTED], and then delete the
original.  Any other use of the email by you is prohibited.

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of shai hess
Sent: Thursday, October 16, 2008 3:57 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: [OT] Heart Surgery

HI,

 I wish I could say that MFNetDisk can solved heart problems, but it is not,
Maybe next release (Ron I am joking!!!).

 Yes, many of my Friends (50+) had heart attacks and some have surgery. Also
my sister at age 45 had heart attack last year and now she is doing fine.

 I re joint the request to check your heart! Heart attack can happen without
any signs before. And even when it happen some people do not feel that this
is emergency and timing is critical.

 I assume that most of us, the MVS guys are 50+. Please check yourself.


 Thanks,
 Shai



On Thu, Oct 16, 2008 at 7:40 AM, Shmuel Metz (Seymour J.) 
[EMAIL PROTECTED] [EMAIL PROTECTED] wrote:

  

In [EMAIL PROTECTED], on
10/14/2008
  at 07:58 AM, Richards, Robert B. [EMAIL PROTECTED] said:



I hope your operation is a complete success. I had a quadruple coronary
artery bypass in March. What most people on this list do not know is that
I had a 2nd and a 3rd heart attack in July and August. Apparently one of
the graphs failed, causing the 2nd attack. They put in two stents. Two
weeks after that, those two stents collapsed, causing the 3rd
attack.
  

Ouch! I hpe that you've recovered completely.



My secondary reason for posting this to the list is to *encourage*
all of you old guys/gals to get a checkup.
  

Not just a checkup, but regular checkups at the interval suggested by your
doctor, probably annual with some procedures less often.



It may just save your life!
  

Indeed.

--
Shmuel (Seymour J.) Metz, SysProg and JOAT
ISO position; see http://patriot.net/~shmuel/resume/brief.html
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [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

--
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: REXX error

2008-10-17 Thread Claudio Marcio

when I run my exec REXX the error appears:
1 +++ ?
   IRX0013I Error running BRAS, line 1: Invalid character in program

see my program rexx BRAS:

/* REXX para mostrar o dia da semana que cai o natal. BY CLAUDIO MARCIO */
/***/
/* Say 'Calculate Christmas day in year ?' */
 Say 'Este programa informa em que dia da semana foi ou sera o Natal',
 'em determinado  ano, que ano quer saber ?'
 pull year
do until answer \= S
 if year =  then year = right(date(),4)
 dec25 = date(B,year1225,S)//7
 select
when dec25 = 0 then day = Segunda-feira
when dec25 = 1 then day = Terca-feira
when dec25 = 2 then day = Quarta-feira
when dec25 = 3 then day = Quinta-feira
when dec25 = 4 then day = Sexta-feira
when dec25 = 5 then day = Sabado
otherwise day = Domingo
 end
 if year  right(date(),4) then
say 'Em 'year', o natal foi 'day
else
say 'Em 'year', o natal sera 'day
 say 'Deseja saber mais algum ano ? (s/n)'
 pull answer
 if answer = 'S' then
Say 'Vamos la entao, qual outro ano voce gostaria de saber!!'
else
   do
 say 'BYE! BYE!'
 leave
   end
 pull year
end
exit
---
Very strange

Why runs in other dataset ??
in the dataset below, run ok..

VIEW  ZOS.CONTEST.JCL  other dataset
Command ===  Scroll ===
PAGE
  Name Prompt   Size   Created  Changed  ID
__ex_ BRAS *RC=0   11  2007/09/19  2007/09/21 14:36:53  BABEYS
 **End**


In the dataset below, not run, WHY??

I'm use the ex command in BRAS(member) of the my datset see;

VIEW  BRATIME.TIME.CHRIST--- my dataset
Command ===
  Name Prompt   Size   Created
___EX__ BRAS*Edited 34  2008/09/09  - member
member
   **End**

regards


- Original Message - 
From: Hunkeler Peter (KIUK 3) [EMAIL PROTECTED]

Newsgroups: bit.listserv.ibm-main
To: IBM-MAIN@BAMA.UA.EDU
Sent: Friday, October 17, 2008 4:52 AM
Subject: Re: REXX error



I don't see neither an error nor REXX code? What is your problem?
Pleaes take your time to write sufficient information so others
are able to help instead of wasting time trying to guess what
you want.

--
Peter Hunkeler
CREDIT SUISSE

--
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: REXX error

2008-10-17 Thread Scott Ford
Claudio,
How are you executing your clist ???

Option # 6 as   'exec clist-pds(clistname)' or

How ?

Also what are the dcb parameters of your clist pds ?  




Scott Ford
Senior Systems Engineer

 
[p] 678.266.3399 x304[m] 609-346-0399  identityforge.com



This message is for the designated recipient only and may contain
privileged, proprietary, or otherwise private information. If you have
received it in error, please notify the sender immediately or let us know at

[EMAIL PROTECTED] or [EMAIL PROTECTED], and then delete the
original.  Any other use of the email by you is prohibited.

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Claudio Marcio
Sent: Friday, October 17, 2008 8:08 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: REXX error

 when I run my exec REXX the error appears:
 1 +++ ?
IRX0013I Error running BRAS, line 1: Invalid character in program

see my program rexx BRAS:

/* REXX para mostrar o dia da semana que cai o natal. BY CLAUDIO MARCIO */
/***/
/* Say 'Calculate Christmas day in year ?' */
  Say 'Este programa informa em que dia da semana foi ou sera o Natal',
  'em determinado  ano, que ano quer saber ?'
  pull year
do until answer \= S
  if year =  then year = right(date(),4)
  dec25 = date(B,year1225,S)//7
  select
 when dec25 = 0 then day = Segunda-feira
 when dec25 = 1 then day = Terca-feira
 when dec25 = 2 then day = Quarta-feira
 when dec25 = 3 then day = Quinta-feira
 when dec25 = 4 then day = Sexta-feira
 when dec25 = 5 then day = Sabado
 otherwise day = Domingo
  end
  if year  right(date(),4) then
 say 'Em 'year', o natal foi 'day
 else
 say 'Em 'year', o natal sera 'day
  say 'Deseja saber mais algum ano ? (s/n)'
  pull answer
  if answer = 'S' then
 Say 'Vamos la entao, qual outro ano voce gostaria de saber!!'
 else
do
  say 'BYE! BYE!'
  leave
end
  pull year
end
exit

---
Very strange

Why runs in other dataset ??
in the dataset below, run ok..

VIEW  ZOS.CONTEST.JCL  other dataset
Command ===  Scroll ===
PAGE
   Name Prompt   Size   Created  Changed  ID
__ex_ BRAS *RC=0   11  2007/09/19  2007/09/21 14:36:53  BABEYS
  **End**


In the dataset below, not run, WHY??

I'm use the ex command in BRAS(member) of the my datset see;

VIEW  BRATIME.TIME.CHRIST--- my dataset
Command ===
   Name Prompt   Size   Created
___EX__ BRAS*Edited 34  2008/09/09  - member
member
**End**

regards


- Original Message - 
From: Hunkeler Peter (KIUK 3) [EMAIL PROTECTED]
Newsgroups: bit.listserv.ibm-main
To: IBM-MAIN@BAMA.UA.EDU
Sent: Friday, October 17, 2008 4:52 AM
Subject: Re: REXX error


I don't see neither an error nor REXX code? What is your problem?
 Pleaes take your time to write sufficient information so others
 are able to help instead of wasting time trying to guess what
 you want.

 -- 
 Peter Hunkeler
 CREDIT SUISSE

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

--
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: REXX error ***** I WIN!!!!!! ******

2008-10-17 Thread Claudio Marcio

I got it!!!

run the pack off command inside member
the now it´s OK!  very, very thank´s to all
what helped me!

regards

- Original Message - 
From: Hunkeler Peter (KIUK 3) [EMAIL PROTECTED]

Newsgroups: bit.listserv.ibm-main
To: IBM-MAIN@BAMA.UA.EDU
Sent: Friday, October 17, 2008 4:52 AM
Subject: Re: REXX error



I don't see neither an error nor REXX code? What is your problem?
Pleaes take your time to write sufficient information so others
are able to help instead of wasting time trying to guess what
you want.

--
Peter Hunkeler
CREDIT SUISSE

--
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: REXX error

2008-10-17 Thread Claudio Marcio

I got it!!!

run the pack off command inside member
the now it´s OK!  very, very thank´s to all
what helped me!

thank´s Scott and thank´s for all

regards

- Original Message - 
From: Scott Ford [EMAIL PROTECTED]

Newsgroups: bit.listserv.ibm-main
To: IBM-MAIN@BAMA.UA.EDU
Sent: Friday, October 17, 2008 11:47 PM
Subject: Re: REXX error



Claudio,
How are you executing your clist ???

Option # 6 as   'exec clist-pds(clistname)' or

How ?

Also what are the dcb parameters of your clist pds ?




Scott Ford
Senior Systems Engineer


[p] 678.266.3399 x304[m] 609-346-0399  identityforge.com



This message is for the designated recipient only and may contain
privileged, proprietary, or otherwise private information. If you have
received it in error, please notify the sender immediately or let us know 
at


[EMAIL PROTECTED] or [EMAIL PROTECTED], and then delete the
original.  Any other use of the email by you is prohibited.

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On 
Behalf

Of Claudio Marcio
Sent: Friday, October 17, 2008 8:08 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: REXX error

when I run my exec REXX the error appears:
1 +++ ?
   IRX0013I Error running BRAS, line 1: Invalid character in program

see my program rexx BRAS:

/* REXX para mostrar o dia da semana que cai o natal. BY CLAUDIO MARCIO */
/***/
/* Say 'Calculate Christmas day in year ?' */
 Say 'Este programa informa em que dia da semana foi ou sera o Natal',
 'em determinado  ano, que ano quer saber ?'
 pull year
do until answer \= S
 if year =  then year = right(date(),4)
 dec25 = date(B,year1225,S)//7
 select
when dec25 = 0 then day = Segunda-feira
when dec25 = 1 then day = Terca-feira
when dec25 = 2 then day = Quarta-feira
when dec25 = 3 then day = Quinta-feira
when dec25 = 4 then day = Sexta-feira
when dec25 = 5 then day = Sabado
otherwise day = Domingo
 end
 if year  right(date(),4) then
say 'Em 'year', o natal foi 'day
else
say 'Em 'year', o natal sera 'day
 say 'Deseja saber mais algum ano ? (s/n)'
 pull answer
 if answer = 'S' then
Say 'Vamos la entao, qual outro ano voce gostaria de saber!!'
else
   do
 say 'BYE! BYE!'
 leave
   end
 pull year
end
exit

---
Very strange

Why runs in other dataset ??
in the dataset below, run ok..

VIEW  ZOS.CONTEST.JCL  other dataset
Command ===  Scroll ===
PAGE
  Name Prompt   Size   Created  Changed 
ID

__ex_ BRAS *RC=0   11  2007/09/19  2007/09/21 14:36:53  BABEYS
 **End**


In the dataset below, not run, WHY??

I'm use the ex command in BRAS(member) of the my datset see;

VIEW  BRATIME.TIME.CHRIST--- my dataset
Command ===
  Name Prompt   Size   Created
___EX__ BRAS*Edited 34  2008/09/09  - member
member
   **End**

regards


- Original Message - 
From: Hunkeler Peter (KIUK 3) [EMAIL PROTECTED]

Newsgroups: bit.listserv.ibm-main
To: IBM-MAIN@BAMA.UA.EDU
Sent: Friday, October 17, 2008 4:52 AM
Subject: Re: REXX error



I don't see neither an error nor REXX code? What is your problem?
Pleaes take your time to write sufficient information so others
are able to help instead of wasting time trying to guess what
you want.

--
Peter Hunkeler
CREDIT SUISSE

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

--
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: REXX error

2008-10-17 Thread Paul Gilmartin
On Fri, 17 Oct 2008 22:08:19 -0200, Claudio Marcio wrote:

 when I run my exec REXX the error appears:
 1 +++ ?
IRX0013I Error running BRAS, line 1: Invalid character in program

Have you repaired the conflicts in DCB attributes?  The error above
could easily result from an RDW's being taken as data.  Fix that 
first, then get back to us.

-- 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: REXX error ***** I WIN!!!!!! ******

2008-10-17 Thread Kenneth E Tomiak
Don't change settings you don't understand.



On Fri, 17 Oct 2008 22:53:21 -0200, Claudio Marcio [EMAIL PROTECTED] 
wrote:

I got it!!!

run the pack off command inside member
the now it´s OK!  very, very thank´s to all
what helped me!

regards


--
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: REXX error

2008-10-17 Thread Kenneth E Tomiak
That depends on the Rexx interpreter being used. On my windows/XP system I 
need nothing on the first line. It is surprising how many people who know Rexx 
so well, know so little.


On Mon, 13 Oct 2008 06:21:22 -0400, Shmuel Metz (Seymour J.) 
[EMAIL PROTECTED] wrote:

I use Rexx on other platforms.

On other platforms you need an extroc, shebang or equivalent.


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



C03 abend when omiting CEE.SCEERUN from JCL

2008-10-17 Thread Bill Klein
I don't know if this will help or not, but can you tell us:

A) is the (dynamically called subprogram in) Assembler is LE-conforming or
not?

B) Do you have any other COBOL (older) run-times in the steplib or the
joblib of the program?

C) Does anything in the C03 output tell you which dataset was NOT closed at
the time of the ABEND?

D) Probably not relevant.  As soneone mentioned, you are getting an IKJ
message.  Is this a DB2 program?

Mürsel Tasgin (BT Isletim ve Teknik Destek  Bölümü)
[EMAIL PROTECTED] wrote in message
news:[EMAIL PROTECTED]...
 Hi,
 We have a problem about CEE.SCEERUN usage. This LE dataset is in LINKLIST
 and all users are able to use it. However a batch program, which is
compiled
 in Enterprise Cobol (V3.2) and make dynamic calls to ASM programs needs
 CEE.SCEERUN dataset coded inside JCL (via joblib).
 
 When we remove CEE.SCEERUN joblib statement from the JCL, the job abends
 with C03:
 IKJ56641I SYSTEM ABEND CODE C03   REASON CODE 0004
 
 We cannot figure out, why program cannot call modules of CEE.SCEERUN from
 LNKLST and needs it inside JCL(via joblib).
 Anyone experienced same problem?
 
 Thanks and regards.
 
 Mürsel Tasgin
 Akbank
 
 Bu e-posta ve muhtemel eklerinde verilen bilgiler kisiye özel ve gizli
olup, yalnizca mesajda belirlenen alici ile ilgilidir.Size yanlislikla
ulasmissa lütfen göndericiye bilgi veriniz, mesaji siliniz ve içerigini
baska bir kisiye açiklamayiniz, herhangi bir ortama kopyalamayiniz. Bu mesaj
aksi sözlesme ile belirtilmedikçe herhangi bir finansal islem teklifi,
alimi, satimi veya herhangi bir havalenin teyidi gibi bankacilik islemi
yapilmasi amacini tasimamaktadir.Verilen tüm bilgilerin dogrulugu ve
bütünlügünün garantisi verilmemekte olup, önceden bildirilmeksizin
degistirilebilecektir.Bu mesajin içerigi Bankamizin resmi görüslerini
yansitmayabileceginden Akbank T.A.S. hiçbir hukuki sorumlulugu kabul etmez.
 
 --
 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