Re: HOWTO question: Linking non-XPLINK C with a shared object (.so) library

2011-07-14 Thread Miklos Szigetvari

Hi

The idea was from Don, but even I can't compile without DLL.
Happy to hear it works now

On 7/13/2011 6:51 PM, Farley, Peter x23353 wrote:

Thank you Miklos, using the DLL compiler option was the key.  I've got the 
non-XPLINK sample working now.

Peter


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Miklos Szigetvari
Sent: Wednesday, July 13, 2011 12:18 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: HOWTO question: Linking non-XPLINK C with a shared object
(.so) library

  Hi

Sorry didn't read everything
Now I  compiled the SAMPLE with EDCCB and DLL option , and in z/OS 1.12
it is o.k. for me (Without DLL even not compile for me)

On 7/13/2011 3:15 PM, Farley, Peter x23353 wrote:

I do not want to mix XPLINK and non-XPLINK code, I want to write non-

XPLINK C code to use the non-XPLINK shared-object API subroutines.  IBM
supplies both an XPLINK shared-object file (iewbnddx.so) AND a non-XPLINK
shared-object file (iewbndd.so).  IBM provides sample JCL showing how to
use only the XPLINK shared-object file.

Peter

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On

Behalf Of Miklos Szigetvari

Sent: Wednesday, July 13, 2011 5:49 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: HOWTO question: Linking non-XPLINK C with a shared object

(.so) library

   Hi

Don't understand why do you want to link together XPLINK and NON XPLINK
code, and not call the DLL.
The boundary for XPLINK  NON XPLINK code is a DLL, so a DLL is XPLINK or
not.
In SHARE there was a number of very good presentations about the DLL's
and XPLINK

--

This message and any attachments are intended only for the use of the addressee 
and may contain information that is privileged and confidential. If the reader 
of the message is not the intended recipient or an authorized representative of 
the intended recipient, you are hereby notified that any dissemination of this 
communication is strictly prohibited. If you have received this communication 
in error, please notify us immediately by e-mail and delete the message and any 
attachments from your system.


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



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


Re: Servicelink

2011-07-14 Thread Barbara Nitz
Just called the helpdesk and opened a problem. They assured me that servicelink 
wasn't terminated while I wasn't looking. 

Got a callback that IBM has storage problems in Boulder (as in DASD). So no SIS 
for us. Apparently they are working on it.

Barbara

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


Re: Packet Trace by specific jobname

2011-07-14 Thread Ravi Gaur
Not sure if you can do it for a particular job however indeed yes for a 
particular IP address or Port it's possible..if you need procedure..contact me 
offline..thanks

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


Re: DS8100 HDD failures

2011-07-14 Thread R.S.

W dniu 2011-07-13 16:14, Steve Dover pisze:

On Tue, 12 Jul 2011 13:50:33 -0500, Fred Lupher  
wrote:


When an HDD fails, the data is replicated to a spare HDD, and our CE extracts the failed 
component and ships it back to IBM to be either refurbished or destroyed.  The failed HDD 
"might" contain sensitive information, e.g. personal tax returns, and thus 
Federal auditors view this as unauthorized persons (IBM) having access.  I'd like to hear 
how other shops have addressed this.


I know of one bank that "owns" every disk drive in the data center.  If a drive 
goes bad, a security guard accompanies the engineer to swap the drive, then the bad drive 
platter is drilled, before being shredded, all in house.  If an array leaves the data 
center, all drives are removed.  This even goes for HMC hard drives.


I "like" such rules!
What about disks in SE?
Usually such mainframe worth dozens of thousands $$$. A mainframe 
without working SE's and HMC is worth much, much less.
Yeah, I know - security. But here we have STUPIDITY. They pay for 
unreasonable "blind' decision. There is nothing secure in destroing 
device which does not hold any important information.
BTW: Nowadays more and more non-disk media are present in office 
environment. It can be memory stick (pendrive), it can be HDD or non-HDD 
memory in a printer or fax, etc. etc. It can happend they are not aware 
about such embedded media.


Of course I agree that one should take care about HDD from arrays.

My €0.02
--
Radoslaw Skorupka
Lodz, Poland


--
Tre tej wiadomoci moe zawiera informacje prawnie chronione Banku 
przeznaczone wycznie do uytku subowego adresata. Odbiorc moe by jedynie 
jej adresat z wyczeniem dostpu osób trzecich. Jeeli nie jeste adresatem 
niniejszej wiadomoci lub pracownikiem upowanionym do jej przekazania 
adresatowi, informujemy, e jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne dziaanie o podobnym charakterze jest prawnie zabronione i moe by 
karalne. Jeeli otrzymae t wiadomo omykowo, prosimy niezwocznie 
zawiadomi nadawc wysyajc odpowied oraz trwale usun t wiadomo 
wczajc w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorised to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. 


BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00, fax 
+48 (22) 829 00 33, e-mail: i...@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.2011 r. kapita zakadowy BRE Banku SA (w caoci wpacony) wynosi 168.346.696 zotych.


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


Re: 9840 error code

2011-07-14 Thread R.S.

W dniu 2011-07-13 21:50, Nigel Salway pisze:

Can anyone point me to an online resource for 9840 error codes? We have a drive 
that won't connect and it shows 2C11:Dmp1 in the display.


:Dmpyy Alternates with an “*” after
completion of an IPL,
where =the FSC of
last dump data saved to the
EEPROM, (FFFC indicates
last dump was forced) and
yy= number of uncollected
dumps in the EEPROM.
Optionally move dump/s to tape, file, or to
the host. See various dump instructions in
this chapter.

The above comes from T1 Service Manual.
I think you need such Service Manual for your 9840
It should be (still) available for STK customers.

--
Radoslaw Skorupka
Lodz, Poland


--
Tre tej wiadomoci moe zawiera informacje prawnie chronione Banku 
przeznaczone wycznie do uytku subowego adresata. Odbiorc moe by jedynie 
jej adresat z wyczeniem dostpu osób trzecich. Jeeli nie jeste adresatem 
niniejszej wiadomoci lub pracownikiem upowanionym do jej przekazania 
adresatowi, informujemy, e jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne dziaanie o podobnym charakterze jest prawnie zabronione i moe by 
karalne. Jeeli otrzymae t wiadomo omykowo, prosimy niezwocznie 
zawiadomi nadawc wysyajc odpowied oraz trwale usun t wiadomo 
wczajc w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorised to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. 


BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00, fax 
+48 (22) 829 00 33, e-mail: i...@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.2011 r. kapita zakadowy BRE Banku SA (w caoci wpacony) wynosi 168.346.696 zotych.


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


Re: JCL Question

2011-07-14 Thread R.S.

W dniu 2011-07-13 14:52, McKown, John pisze:

I'd likely use JES exit 2 to insert

// SET DATE=...
// SET TIME=...

and so on into the JCL stream immediately after the JOB card.


And I like Job Scheduler Utilities for such purposes. For example 
ControlM has %%variables, with strong support for date, time, day of 
week, days since, etc. but not only. And you can do some simple 
calculations, string operations, IF, CASE operators, etc. etc.

That makes any homegrown tricks much much less sexy.
I believe that competition products have similar faicilities.

I believe this is main reason why JCL haven't been enhanced to have such 
facilities. BIG customers - those which IBM listen to - already have 
such facilities (in Job Scheduler) and have no reason to push IBM.

I also think the above is also reason for uchanged limit for GDG - 255.

--
Radoslaw Skorupka
Lodz, Poland


--
Tre tej wiadomoci moe zawiera informacje prawnie chronione Banku 
przeznaczone wycznie do uytku subowego adresata. Odbiorc moe by jedynie 
jej adresat z wyczeniem dostpu osób trzecich. Jeeli nie jeste adresatem 
niniejszej wiadomoci lub pracownikiem upowanionym do jej przekazania 
adresatowi, informujemy, e jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne dziaanie o podobnym charakterze jest prawnie zabronione i moe by 
karalne. Jeeli otrzymae t wiadomo omykowo, prosimy niezwocznie 
zawiadomi nadawc wysyajc odpowied oraz trwale usun t wiadomo 
wczajc w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorised to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. 


BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00, fax 
+48 (22) 829 00 33, e-mail: i...@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.2011 r. kapita zakadowy BRE Banku SA (w caoci wpacony) wynosi 168.346.696 zotych.


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


Re: Java 1.4 and zOS 1.12

2011-07-14 Thread Brian Westerman
On 4 separate conversions to 1.12 the client had issues with some of their Java 
applications that ran "fine" under 1.4 at the old release of z/OS.  We reran 
with Java 1.6 and the problems no longer existed.  The problems had something 
to do with the way classes are obtained or maintained when a lot of passing 
object back and forth went on, but I can't remember exactly.  I do remember 
that it didn't appear to matter whether they used the 64bit version of 1.6 or 
not, both of them executed the code fine.

Most of their Java code ran fine, but there was no reason, once we found some 
that didn't work, to put any effort into not changing to 1.6.

I'm not that good of a Java programmer, but I "think" that there was no 
functionality lost in 1.6 which was there in 1.4, and I don't think they had to 
alter their code at all.  The stuff I write doesn't really seem to mind what 
version it runs on, but it's admittedly not that complex.

Brian

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


Re: Not able to login to OMVS

2011-07-14 Thread Ravi Gaur
did you check if all files are mounted and on correct mount point?

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


Re: performance differences between java versions

2011-07-14 Thread Scott Chapman
At the risk of taking this thread too far afield: 

Well there's always room for personal opinion for which tools you use.  Some 
people may prefer a Bosch driver over a Makita and others will happily pay for 
the Festool.  Any of them will put screws in boards.  But some hands will 
prefer different drivers for various reasons.  Nothing wrong with that.  

Personally, as a programming language, I don't care for Java.  I've written 
some code in it and will undoubtedly write more.  But, IMO, it's difficult to 
use well if you aren't using it all the time.  OTOH, for those who do use it 
all the time it's probably second nature and know that class X is better than 
class Y for the particular problem at hand, even though both do very similar 
things.  For those people, Java is probably a fine choice.  

But the concept of the JVM to enable portability across a wide range of 
platforms and architectures is a good one.  And from the mainframe perspective, 
getting work on the zAAPs is potentially good.  And as it turns out Java6 
contains Rhino, so I can write code in one of my favorite languages 
(JavaScript) on the mainframe.  That is another benefit of the JVM: if you have 
a language that runs in the JVM, it should run on the mainframe.  So if Groovy 
feels right in your hands, I believe you should be able to use that on the 
mainframe.

> I really, really don't understand objections to particular programming 
> languages. 

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


Re: 2074 console - messages not displayed

2011-07-14 Thread Dana Mitchell
The command  V CN(*),ACTIVATE is normally needed when starting to use the 
Operating System Message function from the HMC. 
This causes the system to activate problem determination mode for the specified 
system console.

Dana 

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


How to control in an JCL that a file is empty or not exist ?

2011-07-14 Thread Hilario G.
Hello folks,

I have several batch processes that contain empty files or files that do not 
exist. 

I need to control the execution of certain programs based on the existence of 
these files (including files created empty).

I try to used IDCAMS but didn't work in my tests. 

Thank you very much everyone. 

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


Cluster is Open during backup

2011-07-14 Thread jagadishan perumal
Hi Group,

During the back up  I see some Cluster are open during Backup. To close the
CLUSTER i use the VERIFY command and after that the Cluster gets closed
properly. Are there any way where i can close all the CLUSTERS which were
not closed properly and run the back up successfully. Please advise me your
expert comment on this .

Regards,
Jags

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


Finding abnormal events

2011-07-14 Thread Miklos Szigetvari

Hi

Try to find all abends for a specific time in the system .
Would be something with the mysterious CEA, but as I see,  it is still a 
secret.
Another option would be to notice every abend , dump message from the 
SYSLOG.


Maybe someone has a better idea.

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


Re: How to control in an JCL that a file is empty or not exist ?

2011-07-14 Thread Vernooij, CP - SPLXM
"Hilario G."  wrote in message
news:<0942850873937644.wa.librafegmail@bama.ua.edu>...
> Hello folks,
> 
> I have several batch processes that contain empty files or files that
do not exist. 
> 
> I need to control the execution of certain programs based on the
existence of these files (including files created empty).
> 
> I try to used IDCAMS but didn't work in my tests. 
> 
> Thank you very much everyone. 
> 

IDCAMS LISTC will give a returncode based on the result, i.e. the
existence of the file.

Kees.

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

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



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


Re: How to control in an JCL that a file is empty or not exist ?

2011-07-14 Thread McKown, John
You say "in JCL". The only way that I can think of, off hand, is to run an 
IEFBR14 step at the beginning of the job similar to:

//STEP0001 EXEC PGM=IEFBR14
//DD1 DD DSN=first.file,DISP=(MOD,CATLG),
// UNIT=SYSDA,SPACE=(TRK,1),
// DCB=(...dcb parameters,DSORG=PS)
//DD2 DD DSN=second.file,DISP=(MOD,CATLG),
// UNIT=SYSDA,SPACE=(TRK,1),
// DCB=(...dcb parameters,DSORG=PS)

As I understand it anymore, if the dataset does not exist, this will allocate 
it, catalog it, AND write an EOF record on it. If the dataset already exists, 
it just allocates it, but does nothing else. The writing of the EOF record for 
a new allocation may require that the dataset be SMS managed. I forget if that 
is still a requirement. We do this all the time here. 

--
John McKown 
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone * 
john.mck...@healthmarkets.com * www.HealthMarkets.com

Confidentiality Notice: This e-mail message may contain confidential or 
proprietary information. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the original message. 
HealthMarkets(r) is the brand name for products underwritten and issued by the 
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance 
Company(r), Mid-West National Life Insurance Company of TennesseeSM and The 
MEGA Life and Health Insurance Company.SM

> -Original Message-
> From: IBM Mainframe Discussion List 
> [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Hilario G.
> Sent: Thursday, July 14, 2011 7:40 AM
> To: IBM-MAIN@bama.ua.edu
> Subject: How to control in an JCL that a file is empty or not exist ?
> 
> Hello folks,
> 
> I have several batch processes that contain empty files or 
> files that do not exist. 
> 
> I need to control the execution of certain programs based on 
> the existence of these files (including files created empty).
> 
> I try to used IDCAMS but didn't work in my tests. 
> 
> Thank you very much everyone. 
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
> 
> 

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


Re: Servicelink

2011-07-14 Thread Chase, John
> -Original Message-
> From: IBM Mainframe Discussion List On Behalf Of Barbara Nitz
> 
> Has Servicelink for EMEA now been completely dismantled? Is anyone
able to access SIS or ETR this
> morning? All I get is an internal server error 500 and the usual
stupid 'sorry' page that tries to
> direct me to lenovo. Or something.
> 
> It is not the authentification server, that one works. And IBM cannot
be called for at least an hour
> to ask what's wrong.

Working fine here in Chicago, USA.

-jc-

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


Re: JCL Question

2011-07-14 Thread Shmuel Metz (Seymour J.)
In
,
on 07/13/2011
   at 09:04 PM, Mike Schwab  said:

>I have done an IEBGENER to a INTRDR to run the same job until I broke
>the loop.

That's not iteration in JCL.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see  
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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


Re: Binder error in SMPE Apply of IBM PTF

2011-07-14 Thread Shmuel Metz (Seymour J.)
In
,
on 07/13/2011
   at 11:40 AM, "Schwarz, Barry A"  said:

>As I stated above, there was a ++MOD, not a ++SRC

No, you stated only that there was a ++MOD, not that there was not
++SRC.

>How would that affect a Binder run with NCAL specified?

I missed that. You're right, of course.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see  
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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


Re: Packet Trace by specific jobname

2011-07-14 Thread Chris Mason
Ravi

This topic was raised in IBMTCP-L and there were a few responses but then I 
*think* I appreciated what the underlying problem was and so I provided the 
response below.

One of the responses from John Donnelly indicated that he had discovered the 
z/OS Communications Server (CS) IP command:

>...> Start the Packet Trace processing in TCPIP. IP is the IP address of the 
>remote host.

>...> VARY TCPIP,tcpipprocname,PKT,ON,IP=xx.xx.xx.xx

but he seemed not to want to believe that there was no "jobname" specified in 
the description of the VARY PKTTRACE command - and I just checked V1R12 and 
it's true! The closest I could manage was the suggestion to use the "known" 
port number used by the "job" with the "jobname" assuming, as seemed likely, it 
was the server function which needed to be traced.


 
John

> Wish to establish a packet trace for the indicated jobname...this does not 
> seem to do anything...what are we missing?

I wonder if you are going to consider this a polite reply!

What you are *missing* is that the sort of tracing to which message IEE843I 
refers is nothing whatsoever at all on this planet to do with the tracing of IP 
packets!

This is z/OS to which z/OS UNIX System Services is a very late add-on from the 
mid-90s to an operating system that got by very happily without any mention of 
IP for very, very many years - since the mid-60s taking in all its various 
flavours. When IP was tentatively introduced in the early 90s it was also an 
add-on, just another address space or half a dozen or so, which did not then 
and still does not now eat away at the very heart of the operating system - 
like your traditional UNIX system, the sort on which you were no doubt educated 
and from which your understanding of operating systems derives I expect.

So I'm sorry I just didn't look at your messages in your post in IBM-MAIN, 
reproduced here, in order to appreciate the massive misunderstanding that a 
very slightly closer look would have revealed.

So now that you know you need to start from the beginning as far as tracing IP 
packets managed by the IP component of Communications Server (CS), an "element" 
or "feature" of z/OS and by no means the whole monty.

Perhaps you can take another look at my earlier post in IBM-MAIN and set up an 
IP packet trace based on the listening port of the server program which 
corresponds to this important "jobname".

If a z/OS message starts with "IEE" it's quite close to the guts of z/OS. If a 
message refers to some function related to the IP component of z/OS CS, it will 
have messages starting with EZA, EZB, EZD, EZY or EZZ.

Chris Mason



Chris Mason

On Thu, 14 Jul 2011 02:53:19 -0500, Ravi Gaur  wrote:

>Not sure if you can do it for a particular job however indeed yes for a 
>particular IP address or Port it's possible..if you need procedure..contact me 
>offline..thanks

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


Re: How to control in an JCL that a file is empty or not exist ?

2011-07-14 Thread R.S.

In JCL ? Impossible or very hard.

However it it perfectly possible and IMHO convenient to add a step to 
your JCL. In this step you have to run some utility. If you don't have 
such utility, then I would suggest to use REXX script with LISTDSI.


--
Radoslaw Skorupka
Lodz, Poland



-Original Message-

From: IBM Mainframe Discussion List
[mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Hilario G.
Sent: Thursday, July 14, 2011 7:40 AM
To: IBM-MAIN@bama.ua.edu
Subject: How to control in an JCL that a file is empty or not exist ?

Hello folks,

I have several batch processes that contain empty files or
files that do not exist.

I need to control the execution of certain programs based on
the existence of these files (including files created empty).

I try to used IDCAMS but didn't work in my tests.

Thank you very much everyone.




--
Tre tej wiadomoci moe zawiera informacje prawnie chronione Banku 
przeznaczone wycznie do uytku subowego adresata. Odbiorc moe by jedynie 
jej adresat z wyczeniem dostpu osób trzecich. Jeeli nie jeste adresatem 
niniejszej wiadomoci lub pracownikiem upowanionym do jej przekazania 
adresatowi, informujemy, e jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne dziaanie o podobnym charakterze jest prawnie zabronione i moe by 
karalne. Jeeli otrzymae t wiadomo omykowo, prosimy niezwocznie 
zawiadomi nadawc wysyajc odpowied oraz trwale usun t wiadomo 
wczajc w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorised to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. 


BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00, fax 
+48 (22) 829 00 33, e-mail: i...@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.2011 r. kapita zakadowy BRE Banku SA (w caoci wpacony) wynosi 168.346.696 zotych.


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


Re: How to control in an JCL that a file is empty or not exist ?

2011-07-14 Thread Walter Marguccio
> I need to control the execution of certain programs based on the existence of 
> these files (including files created empty).

> I try to used IDCAMS but didn't work in my tests. 

IDCAMS should work fine when you need to know if a given dataset exists or not:
    LISTC ENT('A.B.C')
If A.B.C does not exist, you would get a rc=4, and you can 
execute the next step conditionally with the IF-THEN-ELSE capability.

Likewise, if you want to check if a dataset is empty, IDCAMS is your friend:
    REPRO IDS('A.B.C')  OFILE(DD1) COUNT(1)  
If A.B.C is empty, you receive a rc=4.

HTH

Walter Marguccio
z/OS Systems Programmer
BELENUS LOB Informatic GmbH
Munich - Germany

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


Re: How to control in an JCL that a file is empty or not exist ?

2011-07-14 Thread Greg Shirey
As mentioned, LISTC will test for whether a file exists;  ICETOOL provides a 
method to test if a file is empty.  

>From "Smart DFSORT tricks" 
>(ftp.software.ibm.com/storage/dfsort/mvs/sorttrck.pdf)

For example, in the following ICETOOL job, the EMPTY operand of COUNT is used 
to stop STEP2 from being executed if the IN data set is empty. ICETOOL sets 
RC=8 (because the RC8 operand is specified) if the IN data set is empty, or 
RC=0 if the IN data set is not empty. ICETOOL only reads one record to 
determine if the data set is empty or not empty, regardless of how many records 
there are in the data set.

//STEP1 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN DD DSN=...
//TOOLIN DD *
* SET RC=8 IF THE 'IN' DATA SET IS EMPTY, OR
* SET RC=0 IF THE 'IN' DATA SET IS NOT EMPTY
COUNT FROM(IN) EMPTY RC8
/*
// IF STEP1.RC = 0 THEN
//*** STEP2 WILL RUN IF 'IN' IS NOT EMPTY
//*** STEP2 WILL NOT RUN IF 'IN' IS EMPTY
//STEP2 EXEC ...
...
// ENDIF


HTH,
Greg Shirey
Ben E. Keith Company 


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Hilario G.
Sent: Thursday, July 14, 2011 7:40 AM
To: IBM-MAIN@bama.ua.edu
Subject: How to control in an JCL that a file is empty or not exist ?

Hello folks,

I have several batch processes that contain empty files or files that do not 
exist. 

I need to control the execution of certain programs based on the existence of 
these files (including files created empty).

I try to used IDCAMS but didn't work in my tests. 

Thank you very much everyone. 

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

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


Re: Cluster is Open during backup

2011-07-14 Thread Hal Merritt
I'd look for the root problem - why the clusters are not being closed properly 
by the last to access them. This could be a window for logical corruption. 

 


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
jagadishan perumal
Sent: Thursday, July 14, 2011 7:51 AM
To: IBM-MAIN@bama.ua.edu
Subject: Cluster is Open during backup

Hi Group,

During the back up  I see some Cluster are open during Backup. To close the 
CLUSTER i use the VERIFY command and after that the Cluster gets closed 
properly. Are there any way where i can close all the CLUSTERS which were not 
closed properly and run the back up successfully. Please advise me your expert 
comment on this .

Regards,
Jags

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at 
http://bama.ua.edu/archives/ibm-main.html
NOTICE: This electronic mail message and any files transmitted with it are 
intended
exclusively for the individual or entity to which it is addressed. The message, 
together with any attachment, may contain confidential and/or privileged 
information.
Any unauthorized review, use, printing, saving, copying, disclosure or 
distribution 
is strictly prohibited. If you have received this message in error, please 
immediately advise the sender by reply email and delete all copies.

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


Re: SHOWMVS and DFSORT 1.10 ICEPRMxx

2011-07-14 Thread Randy Hoekstra
ICETOOL "DEFAULTS" provided the confirmation I needed. We were just confused by 
the SHOWMVS DFSORT information.

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


FW: Mysterious Email (original had no subject)

2011-07-14 Thread Chase, John
Anybody ever gotten anything like this before?  We don't run VM, and
I've not sent any files to IBM since April, when I last opened a PMR.

-jc-


> -Original Message-
> From: rscs.system.at.s39...@d03av06.boulder.ibm.com
> [mailto:rscs.system.at.s39...@d03av06.boulder.ibm.com]
> Sent: Thursday, July 14, 2011 8:12 AM
> To: undisclosed-recipients
> Subject:
> 
> Regarding:  File sent to JDC1 at S390VM on 07/14/11 at  9:06:41
> File sent from JCHASE at INTERNET
> File name: JCHASE NOTE, size: 17 records
> 
>We have received the file shown above because it was sent to an
> unknown user ID.  This file cannot be delivered because the JDC1
> ID is not known at node S390VM.  The file has not been purged, but
> is being held for you for correction.  If you take no action, the
> file will be purged in 4 days.
>If the file was sent from a VM system, you can transfer or purge
the
> file by using one of the following commands.  If the file was sent
from
> on MVS or AIX system, PLEASE RESEND IT, or contact the CUSTOMER
ASSISTANce
> CENTER for further assistance asking them to TRANSFER or PURGE the
file
> for you.  They will need to know the RSCS machine the file is
currently
> on is S390VM, the spoolid is 4546, and the correct destination
> NODEID and USERID so they can also do the following HELPDESK commands.
> 
> FROM ORIGINATING VM USERID -
> 
> Transfer:SM RSCS CMD S390VM TRANSFER 4546 TO newnode newuser
> Purge:   SM RSCS CMD S390VM PURGE 4546
> 
> HELPDESK commands to be done from NODEID that the &localnode. RSCS is
on
> 
> Transfer:SM RSCS TRANSFER *NOTHERE 4546 TO newnode newuser
> Purge:   SM RSCS PURGE *NOTHERE 4546
> 
>Note to PROFS/OFFICE VISION users:
>The above commands must be issued from the PROFS/OV main menu, or
> from the CMS command line.
> 
>Note to non-ER customers:
>If your system netid is not RSCS, replace RSCS with your system
>netid in the above Transfer/Purge commands.

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


FW: Another Mysterious Email from IBM

2011-07-14 Thread Chase, John
This time it's from POK.  Again addressed to "undisclosed recipients".

-jc-

> -Original Message-
> From: rscs.system.at.s39...@d01av02.pok.ibm.com
[mailto:rscs.system.at.s39...@d01av02.pok.ibm.com]
> Sent: Thursday, July 14, 2011 8:53 AM
> To: undisclosed-recipients
> Subject:
> 
> Regarding:  File sent to JDC1 at S390VM on 07/14/11 at  9:52:13
> File sent from JCHASE at INTERNET
> File name: JCHASE NOTE, size: 36 records
> 
>We have received the file shown above because it was sent to an
> unknown user ID.  This file cannot be delivered because the JDC1
> ID is not known at node S390VM.  The file has not been purged, but
> is being held for you for correction.  If you take no action, the
> file will be purged in 4 days.
>If the file was sent from a VM system, you can transfer or purge
the
> file by using one of the following commands.  If the file was sent
from
> on MVS or AIX system, PLEASE RESEND IT, or contact the CUSTOMER
ASSISTANce
> CENTER for further assistance asking them to TRANSFER or PURGE the
file
> for you.  They will need to know the RSCS machine the file is
currently
> on is S390VM, the spoolid is 4796, and the correct destination
> NODEID and USERID so they can also do the following HELPDESK commands.
> 
> FROM ORIGINATING VM USERID -
> 
> Transfer:SM RSCS CMD S390VM TRANSFER 4796 TO newnode newuser
> Purge:   SM RSCS CMD S390VM PURGE 4796
> 
> HELPDESK commands to be done from NODEID that the &localnode. RSCS is
on
> 
> Transfer:SM RSCS TRANSFER *NOTHERE 4796 TO newnode newuser
> Purge:   SM RSCS PURGE *NOTHERE 4796
> 
>Note to PROFS/OFFICE VISION users:
>The above commands must be issued from the PROFS/OV main menu, or
> from the CMS command line.
> 
>Note to non-ER customers:
>If your system netid is not RSCS, replace RSCS with your system
>netid in the above Transfer/Purge commands.

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


Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

2011-07-14 Thread Barkow, Eileen
Thanks again Peter.
I passed this info along to the programmers as well - I think that they want to 
convert the assembler program to 31 bit.

Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Farley, Peter x23353
Sent: Wednesday, July 13, 2011 4:53 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

Option #1 is simpler, that is true.  I also forgot to say that the COBOL 
compiler option DYNAM will also be required so that if the 24-bit assembler 
program is called using CALL literal (like CALL 'MYASMIO'), then it will be 
loaded at run time instead of linked in statically.  I assume from your 
original post that this must be your case, otherwise the programmers would not 
be worrying about including the 24-bit program as part of the link step.

However, Option #2 does have the advantage of allowing the WORKING-STORAGE of 
the COBOL programs to grow much larger in 31-bit storage without worrying about 
using up all available 24-bit storage.  If growth of internal tables or data in 
the COBOL programs over time is a possible future maintenance headache for 
using DATA(24), it might be better (though more work) to bite the bullet and 
take option #2 now instead of later.

OTOH getting that 24-bit assembler I/O program correctly converted to 31-bit is 
the better long-term option over all, and DATA(24) plus DYNAM gives you time to 
do that as a priority.  When that is done you can switch the COBOL compiles to 
DATA(31) and you're done.

Good luck, and feel free to ask more questions if you need to.

HTH

Peter

> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
> Behalf Of Barkow, Eileen
> Sent: Wednesday, July 13, 2011 4:06 PM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY
> 
> Thank you Peter.
> I missed your post yesterday morning as well as some others.
> I am beginning to think that there was delay in the email yesterday
> morning and the msgs were delivered later in the
> Day so I did not notice the earlier ones.
> 
> Option #1 sounds simpler than 2 since it does not require any code
> changes.
--

This message and any attachments are intended only for the use of the addressee 
and may contain information that is privileged and confidential. If the reader 
of the message is not the intended recipient or an authorized representative of 
the intended recipient, you are hereby notified that any dissemination of this 
communication is strictly prohibited. If you have received this communication 
in error, please notify us immediately by e-mail and delete the message and any 
attachments from your system.


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

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


Re: FW: Another Mysterious Email from IBM

2011-07-14 Thread John Chase
Don't know yet if it's related, but I was in the midst of a ShopzSeries session 
and "suddenly" any navigation attempts in Shopz give "500 Internal Server 
Error".  Can't even sign out.

   -jc-


On Thu, 14 Jul 2011 08:57:06 -0500, Chase, John wrote:

>This time it's from POK.  Again addressed to "undisclosed recipients".
>
>-jc-
>
>> -Original Message-
>> From: rscs.system.at.s39...@d01av02.pok.ibm.com
>[mailto:rscs.system.at.s39...@d01av02.pok.ibm.com]
>> Sent: Thursday, July 14, 2011 8:53 AM
>> To: undisclosed-recipients
>> Subject:
>>
>> Regarding:  File sent to JDC1 at S390VM on 07/14/11 at  9:52:13
>> File sent from JCHASE at INTERNET
>> File name: JCHASE NOTE, size: 36 records
>>
>>We have received the file shown above because it was sent to an
>> unknown user ID.  This file cannot be delivered because the JDC1
>> ID is not known at node S390VM.  The file has not been purged, but
>> is being held for you for correction.  If you take no action, the
>> file will be purged in 4 days.
>>If the file was sent from a VM system, you can transfer or purge
>the
>> file by using one of the following commands.  If the file was sent
>from
>> on MVS or AIX system, PLEASE RESEND IT, or contact the CUSTOMER
>ASSISTANce
>> CENTER for further assistance asking them to TRANSFER or PURGE the
>file
>> for you.  They will need to know the RSCS machine the file is
>currently
>> on is S390VM, the spoolid is 4796, and the correct destination
>> NODEID and USERID so they can also do the following HELPDESK commands.
>>
>> FROM ORIGINATING VM USERID -
>>
>> Transfer:SM RSCS CMD S390VM TRANSFER 4796 TO newnode newuser
>> Purge:   SM RSCS CMD S390VM PURGE 4796
>>
>> HELPDESK commands to be done from NODEID that the &localnode. RSCS is
>on
>>
>> Transfer:SM RSCS TRANSFER *NOTHERE 4796 TO newnode newuser
>> Purge:   SM RSCS PURGE *NOTHERE 4796
>>
>>Note to PROFS/OFFICE VISION users:
>>The above commands must be issued from the PROFS/OV main menu, or
>> from the CMS command line.
>>
>>Note to non-ER customers:
>>If your system netid is not RSCS, replace RSCS with your system
>>netid in the above Transfer/Purge commands.
>
>--
>For IBM-MAIN subscribe / signoff / archive access instructions,
>send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
>Search the archives at http://bama.ua.edu/archives/ibm-main.html

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


Re: Cluster is Open during backup

2011-07-14 Thread jagadishan perumal
Hi,

As part of backup we find almost 400-500 Clusters in Open status and due to
which Logical Back up is not really successful.

Regards,
Jags

On Thu, Jul 14, 2011 at 7:04 PM, Hal Merritt  wrote:

> I'd look for the root problem - why the clusters are not being closed
> properly by the last to access them. This could be a window for logical
> corruption.
>
>
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
> Behalf Of jagadishan perumal
> Sent: Thursday, July 14, 2011 7:51 AM
> To: IBM-MAIN@bama.ua.edu
> Subject: Cluster is Open during backup
>
> Hi Group,
>
> During the back up  I see some Cluster are open during Backup. To close the
> CLUSTER i use the VERIFY command and after that the Cluster gets closed
> properly. Are there any way where i can close all the CLUSTERS which were
> not closed properly and run the back up successfully. Please advise me your
> expert comment on this .
>
> Regards,
> Jags
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email
> to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the
> archives at http://bama.ua.edu/archives/ibm-main.html
> NOTICE: This electronic mail message and any files transmitted with it are
> intended
> exclusively for the individual or entity to which it is addressed. The
> message,
> together with any attachment, may contain confidential and/or privileged
> information.
> Any unauthorized review, use, printing, saving, copying, disclosure or
> distribution
> is strictly prohibited. If you have received this message in error, please
> immediately advise the sender by reply email and delete all copies.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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


Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

2011-07-14 Thread Barkow, Eileen
The programmer has a question about possible TCB switching:

Option 2 seems better. DATA(31) should allow most of the callers storage to 
reside above the line, and switch to below the line processing only when 
calling the assembler routine. Would excessive TCB switching result if the 
assembler program is invoked repeatedly for file i/o, or does that not come 
into play?

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Farley, Peter x23353
Sent: Wednesday, July 13, 2011 4:53 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

Option #1 is simpler, that is true.  I also forgot to say that the COBOL 
compiler option DYNAM will also be required so that if the 24-bit assembler 
program is called using CALL literal (like CALL 'MYASMIO'), then it will be 
loaded at run time instead of linked in statically.  I assume from your 
original post that this must be your case, otherwise the programmers would not 
be worrying about including the 24-bit program as part of the link step.

However, Option #2 does have the advantage of allowing the WORKING-STORAGE of 
the COBOL programs to grow much larger in 31-bit storage without worrying about 
using up all available 24-bit storage.  If growth of internal tables or data in 
the COBOL programs over time is a possible future maintenance headache for 
using DATA(24), it might be better (though more work) to bite the bullet and 
take option #2 now instead of later.

OTOH getting that 24-bit assembler I/O program correctly converted to 31-bit is 
the better long-term option over all, and DATA(24) plus DYNAM gives you time to 
do that as a priority.  When that is done you can switch the COBOL compiles to 
DATA(31) and you're done.

Good luck, and feel free to ask more questions if you need to.

HTH

Peter

> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
> Behalf Of Barkow, Eileen
> Sent: Wednesday, July 13, 2011 4:06 PM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY
> 
> Thank you Peter.
> I missed your post yesterday morning as well as some others.
> I am beginning to think that there was delay in the email yesterday
> morning and the msgs were delivered later in the
> Day so I did not notice the earlier ones.
> 
> Option #1 sounds simpler than 2 since it does not require any code
> changes.
--

This message and any attachments are intended only for the use of the addressee 
and may contain information that is privileged and confidential. If the reader 
of the message is not the intended recipient or an authorized representative of 
the intended recipient, you are hereby notified that any dissemination of this 
communication is strictly prohibited. If you have received this communication 
in error, please notify us immediately by e-mail and delete the message and any 
attachments from your system.


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

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


Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

2011-07-14 Thread Steve Comstock

On 7/14/2011 8:30 AM, Barkow, Eileen wrote:

The programmer has a question about possible TCB switching:

Option 2 seems better. DATA(31) should allow most of the
callers storage to reside above the line, and switch to
below the line processing only when calling the assembler
routine. Would excessive TCB switching result if the assembler
program is invoked repeatedly for file i/o, or does that not come into play?


Your programmer is mis-speaking. I don't know what "TCB switching" is;
they probably mean AMODE switching. And, yes, there is some penalty
for AMODE switching.

I thought you mentioned the programmer was going to re-write the
Assembler code, in which case it can be setup to be AMODE 31 and
stay that way and there is no such problem.




-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Farley, Peter x23353
Sent: Wednesday, July 13, 2011 4:53 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

Option #1 is simpler, that is true.  I also forgot to say that the COBOL 
compiler option DYNAM will also be required so that if the 24-bit assembler 
program is called using CALL literal (like CALL 'MYASMIO'), then it will be 
loaded at run time instead of linked in statically.  I assume from your 
original post that this must be your case, otherwise the programmers would not 
be worrying about including the 24-bit program as part of the link step.

However, Option #2 does have the advantage of allowing the WORKING-STORAGE of 
the COBOL programs to grow much larger in 31-bit storage without worrying about 
using up all available 24-bit storage.  If growth of internal tables or data in 
the COBOL programs over time is a possible future maintenance headache for 
using DATA(24), it might be better (though more work) to bite the bullet and 
take option #2 now instead of later.

OTOH getting that 24-bit assembler I/O program correctly converted to 31-bit is 
the better long-term option over all, and DATA(24) plus DYNAM gives you time to 
do that as a priority.  When that is done you can switch the COBOL compiles to 
DATA(31) and you're done.

Good luck, and feel free to ask more questions if you need to.

HTH

Peter


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Barkow, Eileen
Sent: Wednesday, July 13, 2011 4:06 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

Thank you Peter.
I missed your post yesterday morning as well as some others.
I am beginning to think that there was delay in the email yesterday
morning and the msgs were delivered later in the
Day so I did not notice the earlier ones.

Option #1 sounds simpler than 2 since it does not require any code
changes.

--

This message and any attachments are intended only for the use of the addressee 
and may contain information that is privileged and confidential. If the reader 
of the message is not the intended recipient or an authorized representative of 
the intended recipient, you are hereby notified that any dissemination of this 
communication is strictly prohibited. If you have received this communication 
in error, please notify us immediately by e-mail and delete the message and any 
attachments from your system.


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

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




--

Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

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

* Special promotion: 15% off on all DB2 training classes
scheduled by September 1, taught by year end 2011

* Check out our entire DB2 curriculum at:
http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm

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


Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

2011-07-14 Thread Barkow, Eileen
The programmers are still considering all of the options.
I told them to join IBM-MAIN themselves and ask the questions - I am just a 
go-between.

But thanks for the info Steve. I sent the users the info about your papers and 
will pass this info about
Amode switching onto them as well.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Steve Comstock
Sent: Thursday, July 14, 2011 10:41 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

On 7/14/2011 8:30 AM, Barkow, Eileen wrote:
> The programmer has a question about possible TCB switching:
>
> Option 2 seems better. DATA(31) should allow most of the
> callers storage to reside above the line, and switch to
> below the line processing only when calling the assembler
> routine. Would excessive TCB switching result if the assembler
> program is invoked repeatedly for file i/o, or does that not come into play?

Your programmer is mis-speaking. I don't know what "TCB switching" is;
they probably mean AMODE switching. And, yes, there is some penalty
for AMODE switching.

I thought you mentioned the programmer was going to re-write the
Assembler code, in which case it can be setup to be AMODE 31 and
stay that way and there is no such problem.


>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf 
> Of Farley, Peter x23353
> Sent: Wednesday, July 13, 2011 4:53 PM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY
>
> Option #1 is simpler, that is true.  I also forgot to say that the COBOL 
> compiler option DYNAM will also be required so that if the 24-bit assembler 
> program is called using CALL literal (like CALL 'MYASMIO'), then it will be 
> loaded at run time instead of linked in statically.  I assume from your 
> original post that this must be your case, otherwise the programmers would 
> not be worrying about including the 24-bit program as part of the link step.
>
> However, Option #2 does have the advantage of allowing the WORKING-STORAGE of 
> the COBOL programs to grow much larger in 31-bit storage without worrying 
> about using up all available 24-bit storage.  If growth of internal tables or 
> data in the COBOL programs over time is a possible future maintenance 
> headache for using DATA(24), it might be better (though more work) to bite 
> the bullet and take option #2 now instead of later.
>
> OTOH getting that 24-bit assembler I/O program correctly converted to 31-bit 
> is the better long-term option over all, and DATA(24) plus DYNAM gives you 
> time to do that as a priority.  When that is done you can switch the COBOL 
> compiles to DATA(31) and you're done.
>
> Good luck, and feel free to ask more questions if you need to.
>
> HTH
>
> Peter
>
>> -Original Message-
>> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
>> Behalf Of Barkow, Eileen
>> Sent: Wednesday, July 13, 2011 4:06 PM
>> To: IBM-MAIN@bama.ua.edu
>> Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY
>>
>> Thank you Peter.
>> I missed your post yesterday morning as well as some others.
>> I am beginning to think that there was delay in the email yesterday
>> morning and the msgs were delivered later in the
>> Day so I did not notice the earlier ones.
>>
>> Option #1 sounds simpler than 2 since it does not require any code
>> changes.
> --
>
> This message and any attachments are intended only for the use of the 
> addressee and may contain information that is privileged and confidential. If 
> the reader of the message is not the intended recipient or an authorized 
> representative of the intended recipient, you are hereby notified that any 
> dissemination of this communication is strictly prohibited. If you have 
> received this communication in error, please notify us immediately by e-mail 
> and delete the message and any attachments from your system.
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>


-- 

Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

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

* Special promotion: 15% off on all DB2 training classes
 scheduled by September 1, taught by year end 2011

* Check out our entire DB2 curriculum at:
 http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm

--
For IBM-MAIN s

Re: Cluster is Open during backup

2011-07-14 Thread Ted MacNEIL
>As part of backup we find almost 400-500 Clusters in Open status and due to
which Logical Back up is not really successful.

While the number may sound interesting, have you EVEN considered the suggestion 
to find out why?

IBM-MAIN only helps those who hep themselves!
-
Ted MacNEIL
eamacn...@yahoo.ca
Twitter: @TedMacNEIL

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


Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

2011-07-14 Thread Chase, John
How would TCB switching occur at all?  Are these programs running in
CICS?  If so, you cannot use the DYNAM compiler option for COBOL.

-jc-

> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Barkow, Eileen
> Sent: Thursday, July 14, 2011 9:30 AM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY
> 
> The programmer has a question about possible TCB switching:
> 
> Option 2 seems better. DATA(31) should allow most of the callers
storage to reside above the line, and
> switch to below the line processing only when calling the assembler
routine. Would excessive TCB
> switching result if the assembler program is invoked repeatedly for
file i/o, or does that not come
> into play?
> 
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Farley, Peter x23353
> Sent: Wednesday, July 13, 2011 4:53 PM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY
> 
> Option #1 is simpler, that is true.  I also forgot to say that the
COBOL compiler option DYNAM will
> also be required so that if the 24-bit assembler program is called
using CALL literal (like CALL
> 'MYASMIO'), then it will be loaded at run time instead of linked in
statically.  I assume from your
> original post that this must be your case, otherwise the programmers
would not be worrying about
> including the 24-bit program as part of the link step.
> 
> However, Option #2 does have the advantage of allowing the
WORKING-STORAGE of the COBOL programs to
> grow much larger in 31-bit storage without worrying about using up all
available 24-bit storage.  If
> growth of internal tables or data in the COBOL programs over time is a
possible future maintenance
> headache for using DATA(24), it might be better (though more work) to
bite the bullet and take option
> #2 now instead of later.
> 
> OTOH getting that 24-bit assembler I/O program correctly converted to
31-bit is the better long-term
> option over all, and DATA(24) plus DYNAM gives you time to do that as
a priority.  When that is done
> you can switch the COBOL compiles to DATA(31) and you're done.
> 
> Good luck, and feel free to ask more questions if you need to.
> 
> HTH
> 
> Peter
> 
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
> > Behalf Of Barkow, Eileen
> > Sent: Wednesday, July 13, 2011 4:06 PM
> > To: IBM-MAIN@bama.ua.edu
> > Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY
> >
> > Thank you Peter.
> > I missed your post yesterday morning as well as some others.
> > I am beginning to think that there was delay in the email yesterday
> > morning and the msgs were delivered later in the
> > Day so I did not notice the earlier ones.
> >
> > Option #1 sounds simpler than 2 since it does not require any code
> > changes.
> --
> 
> This message and any attachments are intended only for the use of the
addressee and may contain
> information that is privileged and confidential. If the reader of the
message is not the intended
> recipient or an authorized representative of the intended recipient,
you are hereby notified that any
> dissemination of this communication is strictly prohibited. If you
have received this communication in
> error, please notify us immediately by e-mail and delete the message
and any attachments from your
> system.
> 
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html

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


Re: Cluster is Open during backup

2011-07-14 Thread jagadishan perumal
Most of the cases are due to the Users Improper close.

On Thu, Jul 14, 2011 at 8:13 PM, Ted MacNEIL  wrote:

> >As part of backup we find almost 400-500 Clusters in Open status and due
> to
> which Logical Back up is not really successful.
>
> While the number may sound interesting, have you EVEN considered the
> suggestion to find out why?
>
> IBM-MAIN only helps those who hep themselves!
> -
> Ted MacNEIL
> eamacn...@yahoo.ca
> Twitter: @TedMacNEIL
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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


Re: FW: Mysterious Email (original had no subject)

2011-07-14 Thread Walt Farrell
On Thu, 14 Jul 2011 08:45:06 -0500, Chase, John  wrote:

>Anybody ever gotten anything like this before?  We don't run VM, and
>I've not sent any files to IBM since April, when I last opened a PMR.
>

Apparently a former IBMer was subscribed to IBM-MAIN and left without 
unsubscribing, and you (and maybe other posters) are getting the delivery 
failure notices. Darren can remove him. I'll contact Darren privately about 
this.

-- 
Walt

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


Re: FW: Mysterious Email (original had no subject)

2011-07-14 Thread Walt Farrell
On Thu, 14 Jul 2011 09:53:00 -0500, Walt Farrell  wrote:

>On Thu, 14 Jul 2011 08:45:06 -0500, Chase, John  wrote:
>
>>Anybody ever gotten anything like this before?  We don't run VM, and
>>I've not sent any files to IBM since April, when I last opened a PMR.
>>
>
>Apparently a former IBMer was subscribed to IBM-MAIN and left without 
>unsubscribing, and you (and maybe other posters) are getting the delivery 
>failure notices. Darren can remove him. I'll contact Darren privately about 
>this.
>

Or, at least an IBMer who no longer has the ID he subscribed from. And I'm only 
guessing it's an IBM-MAIN subscription, too. If you're active on other lists 
the messages could be coming from them. But I've sent a note to Darren.

-- 
Walt

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


Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

2011-07-14 Thread Barkow, Eileen
These are batch programs that they are working on (I hope, since they are 
invoking MVS IO routines directly).
However, this group of programmers are also heavy CICS users - I did not ask if 
the programs were CICS or not.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Chase, John
Sent: Thursday, July 14, 2011 10:39 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

How would TCB switching occur at all?  Are these programs running in
CICS?  If so, you cannot use the DYNAM compiler option for COBOL.

-jc-

> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Barkow, Eileen
> Sent: Thursday, July 14, 2011 9:30 AM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY
> 
> The programmer has a question about possible TCB switching:
> 
> Option 2 seems better. DATA(31) should allow most of the callers
storage to reside above the line, and
> switch to below the line processing only when calling the assembler
routine. Would excessive TCB
> switching result if the assembler program is invoked repeatedly for
file i/o, or does that not come
> into play?
> 
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Farley, Peter x23353
> Sent: Wednesday, July 13, 2011 4:53 PM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY
> 
> Option #1 is simpler, that is true.  I also forgot to say that the
COBOL compiler option DYNAM will
> also be required so that if the 24-bit assembler program is called
using CALL literal (like CALL
> 'MYASMIO'), then it will be loaded at run time instead of linked in
statically.  I assume from your
> original post that this must be your case, otherwise the programmers
would not be worrying about
> including the 24-bit program as part of the link step.
> 
> However, Option #2 does have the advantage of allowing the
WORKING-STORAGE of the COBOL programs to
> grow much larger in 31-bit storage without worrying about using up all
available 24-bit storage.  If
> growth of internal tables or data in the COBOL programs over time is a
possible future maintenance
> headache for using DATA(24), it might be better (though more work) to
bite the bullet and take option
> #2 now instead of later.
> 
> OTOH getting that 24-bit assembler I/O program correctly converted to
31-bit is the better long-term
> option over all, and DATA(24) plus DYNAM gives you time to do that as
a priority.  When that is done
> you can switch the COBOL compiles to DATA(31) and you're done.
> 
> Good luck, and feel free to ask more questions if you need to.
> 
> HTH
> 
> Peter
> 
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
> > Behalf Of Barkow, Eileen
> > Sent: Wednesday, July 13, 2011 4:06 PM
> > To: IBM-MAIN@bama.ua.edu
> > Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY
> >
> > Thank you Peter.
> > I missed your post yesterday morning as well as some others.
> > I am beginning to think that there was delay in the email yesterday
> > morning and the msgs were delivered later in the
> > Day so I did not notice the earlier ones.
> >
> > Option #1 sounds simpler than 2 since it does not require any code
> > changes.
> --
> 
> This message and any attachments are intended only for the use of the
addressee and may contain
> information that is privileged and confidential. If the reader of the
message is not the intended
> recipient or an authorized representative of the intended recipient,
you are hereby notified that any
> dissemination of this communication is strictly prohibited. If you
have received this communication in
> error, please notify us immediately by e-mail and delete the message
and any attachments from your
> system.
> 
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html

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

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

Re: Cluster is Open during backup

2011-07-14 Thread Ted MacNEIL
>Most of the cases are due to the Users Improper close.

Now you have an education, or dismissal, opportunity.

It's like the old joke:

"Doctor, it hurts when I do this".

'Well, don't do that'!
-
Ted MacNEIL
eamacn...@yahoo.ca
Twitter: @TedMacNEIL

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


Re: Cluster is Open during backup

2011-07-14 Thread jagadishan perumal
Ted,

Thanks. Apology for raising the question without much into the details.. I
can understand your Concern and Well let me again dig the manuals.

On Thu, Jul 14, 2011 at 8:36 PM, Ted MacNEIL  wrote:

> >Most of the cases are due to the Users Improper close.
>
> Now you have an education, or dismissal, opportunity.
>
> It's like the old joke:
>
> "Doctor, it hurts when I do this".
>
> 'Well, don't do that'!
>  -
> Ted MacNEIL
> eamacn...@yahoo.ca
> Twitter: @TedMacNEIL
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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


Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

2011-07-14 Thread Charles Mills
Getting the old QSAM assembler code to run in AMODE 31 is fairly trivial
(probably -- I have not seen the code). Best case no code changes whatsoever
are necessary.

It is RMODE ANY that takes some effort.

So you should be able to make AMODE switching a non-event.

Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf
Of Barkow, Eileen
Sent: Thursday, July 14, 2011 10:30 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

The programmer has a question about possible TCB switching:

Option 2 seems better. DATA(31) should allow most of the callers storage to
reside above the line, and switch to below the line processing only when
calling the assembler routine. Would excessive TCB switching result if the
assembler program is invoked repeatedly for file i/o, or does that not come
into play?
HTH

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


Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

2011-07-14 Thread Schumacher, Otto
If the assembler program is not LE compliant and Reentrant and Reuseable there 
will be a performance issue when the module is called Dynamically. 

Regards
Otto Schumacher
 
HP Enterprise Services
Infrastructure Specialist
Ahold Account
CICS & Capacity Technical Support
P.O. Box 6462
2000 Wade Hampton Blvd.
LC1-302
Greenville,  South Carolina, 29606
Cell: 864 569--5338
Tel: 864 987-1417
Fax: 864 987-4500
E-mail: otto.schumac...@hp.com


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Barkow, Eileen
Sent: Thursday, July 14, 2011 11:05 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

These are batch programs that they are working on (I hope, since they are 
invoking MVS IO routines directly).
However, this group of programmers are also heavy CICS users - I did not ask if 
the programs were CICS or not.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Chase, John
Sent: Thursday, July 14, 2011 10:39 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

How would TCB switching occur at all?  Are these programs running in
CICS?  If so, you cannot use the DYNAM compiler option for COBOL.

-jc-

> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Barkow, Eileen
> Sent: Thursday, July 14, 2011 9:30 AM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY
> 
> The programmer has a question about possible TCB switching:
> 
> Option 2 seems better. DATA(31) should allow most of the callers
storage to reside above the line, and
> switch to below the line processing only when calling the assembler
routine. Would excessive TCB
> switching result if the assembler program is invoked repeatedly for
file i/o, or does that not come
> into play?
> 
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Farley, Peter x23353
> Sent: Wednesday, July 13, 2011 4:53 PM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY
> 
> Option #1 is simpler, that is true.  I also forgot to say that the
COBOL compiler option DYNAM will
> also be required so that if the 24-bit assembler program is called
using CALL literal (like CALL
> 'MYASMIO'), then it will be loaded at run time instead of linked in
statically.  I assume from your
> original post that this must be your case, otherwise the programmers
would not be worrying about
> including the 24-bit program as part of the link step.
> 
> However, Option #2 does have the advantage of allowing the
WORKING-STORAGE of the COBOL programs to
> grow much larger in 31-bit storage without worrying about using up all
available 24-bit storage.  If
> growth of internal tables or data in the COBOL programs over time is a
possible future maintenance
> headache for using DATA(24), it might be better (though more work) to
bite the bullet and take option
> #2 now instead of later.
> 
> OTOH getting that 24-bit assembler I/O program correctly converted to
31-bit is the better long-term
> option over all, and DATA(24) plus DYNAM gives you time to do that as
a priority.  When that is done
> you can switch the COBOL compiles to DATA(31) and you're done.
> 
> Good luck, and feel free to ask more questions if you need to.
> 
> HTH
> 
> Peter
> 
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
> > Behalf Of Barkow, Eileen
> > Sent: Wednesday, July 13, 2011 4:06 PM
> > To: IBM-MAIN@bama.ua.edu
> > Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY
> >
> > Thank you Peter.
> > I missed your post yesterday morning as well as some others.
> > I am beginning to think that there was delay in the email yesterday
> > morning and the msgs were delivered later in the
> > Day so I did not notice the earlier ones.
> >
> > Option #1 sounds simpler than 2 since it does not require any code
> > changes.
> --
> 
> This message and any attachments are intended only for the use of the
addressee and may contain
> information that is privileged and confidential. If the reader of the
message is not the intended
> recipient or an authorized representative of the intended recipient,
you are hereby notified that any
> dissemination of this communication is strictly prohibited. If you
have received this communication in
> error, please notify us immediately by e-mail and delete the message
and any attachments from your
> system.
> 
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
> 
> -

Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

2011-07-14 Thread Victor Gil
Just wanted to add a bit to Peter's advice -

The LE option ALL31(OFF) instructs [or at least used to] LE to perform AMODE 
switching on every dynamic call, AND also to allocate the COBOL EXTERNAL data 
in storage BELOW the line.

So, if you define something like this 

001100 01 BELOWEXTERNAL.  
00120005 AMODE24-PARM-1PIC X(08).
00120005 AMODE24-PARM-2PIC X(44).
  ...  
 
the called AMODE24 program should have no problems accessing these PARMs.

HTH,
-Victor-  

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


Re: How to control in an JCL that a file is empty or not exist ?

2011-07-14 Thread Ed Gould
John,

It depends. Iefbr14 itself does not open close the data set so no EOF is 
written, except if it's a SMS dataset AND the right parameter in IGDSMSxx 
parmlib member.

Ed

Sent from my iPad

On Jul 14, 2011, at 8:01 AM, "McKown, John"  
wrote:

> You say "in JCL". The only way that I can think of, off hand, is to run an 
> IEFBR14 step at the beginning of the job similar to:
> 
> //STEP0001 EXEC PGM=IEFBR14
> //DD1 DD DSN=first.file,DISP=(MOD,CATLG),
> // UNIT=SYSDA,SPACE=(TRK,1),
> // DCB=(...dcb parameters,DSORG=PS)
> //DD2 DD DSN=second.file,DISP=(MOD,CATLG),
> // UNIT=SYSDA,SPACE=(TRK,1),
> // DCB=(...dcb parameters,DSORG=PS)
> 
> As I understand it anymore, if the dataset does not exist, this will allocate 
> it, catalog it, AND write an EOF record on it. If the dataset already exists, 
> it just allocates it, but does nothing else. The writing of the EOF record 
> for a new allocation may require that the dataset be SMS managed. I forget if 
> that is still a requirement. We do this all the time here. 
> 
> --
> John McKown 
> Systems Engineer IV
> IT
> 
> Administrative Services Group
> 
> HealthMarkets(r)
> 
> 9151 Boulevard 26 * N. Richland Hills * TX 76010
> (817) 255-3225 phone * 
> john.mck...@healthmarkets.com * www.HealthMarkets.com
> 
> Confidentiality Notice: This e-mail message may contain confidential or 
> proprietary information. If you are not the intended recipient, please 
> contact the sender by reply e-mail and destroy all copies of the original 
> message. HealthMarkets(r) is the brand name for products underwritten and 
> issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake 
> Life Insurance Company(r), Mid-West National Life Insurance Company of 
> TennesseeSM and The MEGA Life and Health Insurance Company.SM
> 
>> -Original Message-
>> From: IBM Mainframe Discussion List 
>> [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Hilario G.
>> Sent: Thursday, July 14, 2011 7:40 AM
>> To: IBM-MAIN@bama.ua.edu
>> Subject: How to control in an JCL that a file is empty or not exist ?
>> 
>> Hello folks,
>> 
>> I have several batch processes that contain empty files or 
>> files that do not exist. 
>> 
>> I need to control the execution of certain programs based on 
>> the existence of these files (including files created empty).
>> 
>> I try to used IDCAMS but didn't work in my tests. 
>> 
>> Thank you very much everyone. 
>> 
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
>> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>> 
>> 
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html

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


Re: How to control in an JCL that a file is empty or not exist ?

2011-07-14 Thread Ed Gould
Kees,

In an ideal world yes. However just because a data set is cataloged, it doesn't 
necessarily exist ie space allocated on a dataset and or cataloged to a tape 
but the tape is not might now "belong" to someone see.

Ed

Sent from my iPad

On Jul 14, 2011, at 7:58 AM, "Vernooij, CP - SPLXM"  
wrote:

> "Hilario G."  wrote in message
> news:<0942850873937644.wa.librafegmail@bama.ua.edu>...
>> Hello folks,
>> 
>> I have several batch processes that contain empty files or files that
> do not exist. 
>> 
>> I need to control the execution of certain programs based on the
> existence of these files (including files created empty).
>> 
>> I try to used IDCAMS but didn't work in my tests. 
>> 
>> Thank you very much everyone. 
>> 
> 
> IDCAMS LISTC will give a returncode based on the result, i.e. the
> existence of the file.
> 
> Kees.
> 
> For information, services and offers, please visit our web site: 
> http://www.klm.com. This e-mail and any attachment may contain confidential 
> and privileged material intended for the addressee only. If you are not the 
> addressee, you are notified that no part of the e-mail or any attachment may 
> be disclosed, copied or distributed, and that any other action related to 
> this e-mail or attachment is strictly prohibited, and may be unlawful. If you 
> have received this e-mail by error, please notify the sender immediately by 
> return e-mail, and delete this message. 
> 
> Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its 
> employees shall not be liable for the incorrect or incomplete transmission of 
> this e-mail or any attachments, nor responsible for any delay in receipt. 
> Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch 
> Airlines) is registered in Amstelveen, The Netherlands, with registered 
> number 33014286
> 
>
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html

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


CEEXOPT macro ..where reside ?

2011-07-14 Thread Manuel Tabares Solórzano
 
 Hello List:
 
  I have a question, our customer has  zOS V1.11m and we need to compile a 
source which uses CEEXOPT (LE Macro), but I don't found where is located.
 
  I did a look on SYS1.maclib,  I don't see any cee.maclib
 
  ny hep will be appreciated..
 
  TIA.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

2011-07-14 Thread Barkow, Eileen
Maybe ALL31(OFF) would be the simplest thing to use -
Although the programmers may not be looking for the simplest solution.

Thanks for this info Victor

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Victor Gil
Sent: Thursday, July 14, 2011 11:18 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

Just wanted to add a bit to Peter's advice -

The LE option ALL31(OFF) instructs [or at least used to] LE to perform AMODE 
switching on every dynamic call, AND also to allocate the COBOL EXTERNAL data 
in storage BELOW the line.

So, if you define something like this 

001100 01 BELOWEXTERNAL.  
00120005 AMODE24-PARM-1PIC X(08).
00120005 AMODE24-PARM-2PIC X(44).
  ...  
 
the called AMODE24 program should have no problems accessing these PARMs.

HTH,
-Victor-  

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

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


Re: CEEXOPT macro ..where reside ?

2011-07-14 Thread Larry Macioce
CEE.SCEEMAC 

mace

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


Re: CEEXOPT macro ..where reside ?

2011-07-14 Thread Barkow, Eileen
Maybe you le maclib is called SYS1.CEE.SCEEMAC  or something like it.
CEEXOPT is in the LE maclib.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Manuel Tabares Solórzano
Sent: Thursday, July 14, 2011 11:27 AM
To: IBM-MAIN@bama.ua.edu
Subject: CEEXOPT macro ..where reside ?

 
 Hello List:
 
  I have a question, our customer has  zOS V1.11m and we need to compile a 
source which uses CEEXOPT (LE Macro), but I don't found where is located.
 
  I did a look on SYS1.maclib,  I don't see any cee.maclib
 
  ny hep will be appreciated..
 
  TIA.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

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


Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

2011-07-14 Thread Victor Gil
Sure!

One more thing - the LE stack must say BELOW for the parameter list [pointed by 
R1] to be accessible by the AMODE24 routine 

E.g. STACK(131072,131072,BELOW,KEEP,524288,131072)

On Thu, 14 Jul 2011 11:28:07 -0400, Barkow, Eileen  
wrote:

>Maybe ALL31(OFF) would be the simplest thing to use -
>Although the programmers may not be looking for the simplest solution.
>
>Thanks for this info Victor
>
>-Original Message-
>From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
>Victor Gil
>Sent: Thursday, July 14, 2011 11:18 AM
>To: IBM-MAIN@bama.ua.edu
>Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY
>
>Just wanted to add a bit to Peter's advice -
>
>The LE option ALL31(OFF) instructs [or at least used to] LE to perform AMODE 
>switching on every dynamic call, AND also to allocate the COBOL EXTERNAL data 
>in storage BELOW the line.
>
>So, if you define something like this
>
>001100 01 BELOWEXTERNAL.
>00120005 AMODE24-PARM-1PIC X(08).
>00120005 AMODE24-PARM-2PIC X(44).
>  ...
>
>the called AMODE24 program should have no problems accessing these PARMs.
>
>HTH,
>-Victor-
>
>--
>For IBM-MAIN subscribe / signoff / archive access instructions,
>send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
>Search the archives at http://bama.ua.edu/archives/ibm-main.html
>
>--
>For IBM-MAIN subscribe / signoff / archive access instructions,
>send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
>Search the archives at http://bama.ua.edu/archives/ibm-main.html

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


Re: CEEXOPT macro ..where reside ?

2011-07-14 Thread Schumacher, Otto
Check in you sceemac library. 

Regards
Otto Schumacher
 
HP Enterprise Services
Infrastructure Specialist
Ahold Account
CICS & Capacity Technical Support
P.O. Box 6462
2000 Wade Hampton Blvd.
LC1-302
Greenville,  South Carolina, 29606
Cell: 864 569--5338
Tel: 864 987-1417
Fax: 864 987-4500
E-mail: otto.schumac...@hp.com


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Manuel Tabares Solórzano
Sent: Thursday, July 14, 2011 11:27 AM
To: IBM-MAIN@bama.ua.edu
Subject: CEEXOPT macro ..where reside ?

 
 Hello List:
 
  I have a question, our customer has  zOS V1.11m and we need to compile a 
source which uses CEEXOPT (LE Macro), but I don't found where is located.
 
  I did a look on SYS1.maclib,  I don't see any cee.maclib
 
  ny hep will be appreciated..
 
  TIA.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

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


Re: CEEXOPT macro ..where reside ?

2011-07-14 Thread Skip Robinson
Let's teach a man to fish. In SMPE Dialog, in your target zone...

1. query MAC CEEXOPT. You will see SYSLIB   SCEEMAC
2. query DDDEF  SCEEMAC. You will see your SMPE install library
3. translate the install name into your production name 

.
.
JO.Skip Robinson
SCE Infrastructure Technology Services
Electric Dragon Team Paddler 
SHARE MVS Program Co-Manager
626-302-7535 Office
323-715-0595 Mobile
jo.skip.robin...@sce.com



From:   "Schumacher, Otto" 
To: IBM-MAIN@bama.ua.edu
Date:   07/14/2011 08:42 AM
Subject:Re: CEEXOPT macro ..where reside ?
Sent by:IBM Mainframe Discussion List 



Check in you sceemac library. 

Regards
Otto Schumacher
 
HP Enterprise Services
Infrastructure Specialist
Ahold Account
CICS & Capacity Technical Support
P.O. Box 6462
2000 Wade Hampton Blvd.
LC1-302
Greenville,  South Carolina, 29606
Cell: 864 569--5338
Tel: 864 987-1417
Fax: 864 987-4500
E-mail: otto.schumac...@hp.com


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On 
Behalf Of Manuel Tabares Solórzano
Sent: Thursday, July 14, 2011 11:27 AM
To: IBM-MAIN@bama.ua.edu
Subject: CEEXOPT macro ..where reside ?

 
 Hello List:
 
  I have a question, our customer has  zOS V1.11m and we need to compile a 
source which uses CEEXOPT (LE Macro), but I don't found where is located.
 
  I did a look on SYS1.maclib,  I don't see any cee.maclib
 
  ny hep will be appreciated..
 
  TIA.  



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


Re: Cluster is Open during backup

2011-07-14 Thread Hal Merritt
That's actually not that easy to do. Not something an end user should be able 
to do. 

If this is really an improper close, then the offending program(s) should be 
considered defective and repairs scheduled. If the programmer(s) plead 
otherwise, then is becomes a political issue. 

Any file must be closed properly to insure logical integrity.  

There is a very good reason the backups are failing. 
 



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
jagadishan perumal
Sent: Thursday, July 14, 2011 9:47 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Cluster is Open during backup

Most of the cases are due to the Users Improper close.

On Thu, Jul 14, 2011 at 8:13 PM, Ted MacNEIL  wrote:

> >As part of backup we find almost 400-500 Clusters in Open status and 
> >due
> to
> which Logical Back up is not really successful.
>
> While the number may sound interesting, have you EVEN considered the 
> suggestion to find out why?
>
> IBM-MAIN only helps those who hep themselves!
> -
> Ted MacNEIL
> eamacn...@yahoo.ca
> Twitter: @TedMacNEIL
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO 
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at 
http://bama.ua.edu/archives/ibm-main.html
NOTICE: This electronic mail message and any files transmitted with it are 
intended
exclusively for the individual or entity to which it is addressed. The message, 
together with any attachment, may contain confidential and/or privileged 
information.
Any unauthorized review, use, printing, saving, copying, disclosure or 
distribution 
is strictly prohibited. If you have received this message in error, please 
immediately advise the sender by reply email and delete all copies.

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


Re: CEEXOPT macro ..where reside ?

2011-07-14 Thread Chase, John
> -Original Message-
> From: IBM Mainframe Discussion List On Behalf Of Manuel Tabares Solórzano
> 
> 
>  Hello List:
> 
>   I have a question, our customer has  zOS V1.11m and we need to compile a 
> source which uses CEEXOPT
> (LE Macro), but I don't found where is located.
> 
>   I did a look on SYS1.maclib,  I don't see any cee.maclib

CEE.SCEEMAC

-jc-

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


Re: SHOWMVS and DFSORT 1.10 ICEPRMxx

2011-07-14 Thread Frank Yaeger
Randy Hoekstra at IBM Mainframe Discussion List 
wrote on 07/14/2011 06:25:31 AM:
> ICETOOL "DEFAULTS" provided the confirmation I needed.

Good.

>We were just confused by the SHOWMVS DFSORT information.

Hopefully, the owners of SHOWMVS will comment on that here.  If not,
perhaps
you could contact them offline.

Frank Yaeger - DFSORT Development Team (IBM) - yae...@us.ibm.com
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Language Environment and z196

2011-07-14 Thread Herring, Bobby
We just recently installed a z196.
At IBM's BCRS, we will be running on a z10 or possibly as old as a z900. 
Management is questioning our Language Environment settings.  They are afraid 
that if we use the new LE Cobol compiler, the load modules might be 
incompatible with the older machine at the DR site.

Is there a parm setting in LE that says compile at the z900 level as opposed to 
the most current, ie z196?

I can't find one and Google isn't coming up with anything I recognize.

If someone can just point me in the right direction, the name of a parm or a 
manual, that would be greatly appreciated.

Bobby Herring
Systems Programmer - Information Systems
Texas Farm Bureau Insurance Companies
Waco, TX
CONFIDENTIALITY STATEMENT: The foregoing message (including attachments) is 
covered by the Electronic Communication Privacy Act, 18 U.S.C. sections 
2510-2521, and is CONFIDENTIAL. If you believe that it has been sent to you in 
error, do not read it. If you are not the intended recipient, you are hereby 
notified that any retention, dissemination, distribution, or copying of this 
communication is strictly prohibited. Please reply to the sender that you have 
received the message in error, then delete it. Thank you.

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


Re: CEEXOPT macro ..where reside ?

2011-07-14 Thread Mark Zelden
On Thu, 14 Jul 2011 08:53:17 -0700, Skip Robinson  
wrote:

>Let's teach a man to fish. In SMPE Dialog, in your target zone...
>
>1. query MAC CEEXOPT. You will see SYSLIB   SCEEMAC
>2. query DDDEF  SCEEMAC. You will see your SMPE install library
>3. translate the install name into your production name 
>
>.

Education is nice, but probably TMI.   Most likely an application type if they 
are
using CEEXOPT and don't already know how to find it.   If so, there could be
no access to SMP/E  - especially given IBM's recent (ahem) enhancement.  

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS   
mailto:m...@mzelden.com
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html 
Systems Programming expert at http://expertanswercenter.techtarget.com/

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


Re: Language Environment and z196

2011-07-14 Thread Mark Zelden
On Thu, 14 Jul 2011 11:24:01 -0500, Herring, Bobby  
wrote:

>We just recently installed a z196.
>At IBM's BCRS, we will be running on a z10 or possibly as old as a z900. 
>Management is questioning our Language Environment settings.  They are afraid 
>that if we use the new LE Cobol compiler, the load modules might be 
>incompatible with the older machine at the DR site.
>
>Is there a parm setting in LE that says compile at the z900 level as opposed 
>to the most current, ie z196?
>
>I can't find one and Google isn't coming up with anything I recognize.
>
>If someone can just point me in the right direction, the name of a parm or a 
>manual, that would be greatly appreciated.
>

It's not relevant to LE (run time), it is relevant to the compiler. 

You didn't say what version of COBOL compiler, but I don't think it matters 
even with
Enterprise COBOL 4.2.   Someone can correct me if I'm wrong, but I don't think 
there 
are any considerations beyond having zArchitecture.   For C++ there is the 
ARCH(n) 
parms used at compile time and as long as you don't change your compiler 
options, the new instructions would not be used. 

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS   
mailto:m...@mzelden.com
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html 
Systems Programming expert at http://expertanswercenter.techtarget.com/

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


Re: Language Environment and z196

2011-07-14 Thread Chase, John
> -Original Message-
> From: IBM Mainframe Discussion List On Behalf Of Herring, Bobby
> 
> We just recently installed a z196.
> At IBM's BCRS, we will be running on a z10 or possibly as old as a
z900. Management is questioning our
> Language Environment settings.  They are afraid that if we use the new
LE Cobol compiler, the load
> modules might be incompatible with the older machine at the DR site.
> 
> Is there a parm setting in LE that says compile at the z900 level as
opposed to the most current, ie
> z196?
> 
> I can't find one and Google isn't coming up with anything I recognize.
> 
> If someone can just point me in the right direction, the name of a
parm or a manual, that would be
> greatly appreciated.

I think you have nothing to worry about.  If the D/R machine can run
your version of z/OS and/or z/VSE, your COBOL (and other LE-conforming)
programs should also run "just like at home" (maybe a little slower :-)
).

-jc-

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


Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

2011-07-14 Thread Farley, Peter x23353
Actually not true.  I have done it frequently when it made sense to do so.  
COBOL dynamic CALL in CICS has been supported for quite some time now.  The 
trick is to limit the use to subprograms that don't need to use CICS calls, but 
even that is possible if you pass the EIB along.

Of course, you do NOT want a QSAM I/O module being invoked under CICS, that 
would be quite bad.  Nor do you want any subprogram that invokes any z/OS 
services directly to be called, but that has always been true.

Nonetheless, dynamic COBOL calls are supported and useful in CICS.  What you 
lose is debugging information from CICS in the event of any abend or failure in 
the subprogram, because CICS thinks that the calling program is the one in 
control and not the dynamically called subprogram, since CICS LINK was not used 
to invoke it.

HTH

Peter

> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
> Behalf Of Chase, John
> Sent: Thursday, July 14, 2011 10:39 AM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY
> 
> How would TCB switching occur at all?  Are these programs running in
> CICS?  If so, you cannot use the DYNAM compiler option for COBOL.
--

This message and any attachments are intended only for the use of the addressee 
and may contain information that is privileged and confidential. If the reader 
of the message is not the intended recipient or an authorized representative of 
the intended recipient, you are hereby notified that any dissemination of this 
communication is strictly prohibited. If you have received this communication 
in error, please notify us immediately by e-mail and delete the message and any 
attachments from your system.


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


Re: CEEXOPT macro ..where reside ?

2011-07-14 Thread Paul Gilmartin
On Thu, 14 Jul 2011 11:23:23 -0500, Mark Zelden wrote:
>
>Education is nice, but probably TMI.   Most likely an application type if they 
>are
>using CEEXOPT and don't already know how to find it.   If so, there could be
>no access to SMP/E  - especially given IBM's recent (ahem) enhancement.
> 
Aren't the LIST and query type functions exempt from the "enhancement"?
Or are they merely controlled by separate rules?  Can one with no special
privilege even enter the SMP/E panels?  I suppose "need to know" comes
into play at many sites.

I can't experiment on my ID because my job requires considerable SMP/E
privileges.  I wish merely that IBM would provide me some guidance about
what actions I must avoid in order that I not present the much-discussed
integrity threat.

-- gil

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


Re: CEEXOPT macro ..where reside ?

2011-07-14 Thread Lizette Koehler
> 
>  Hello List:
> 
>   I have a question, our customer has  zOS V1.11m and we need to compile a
source
> which uses CEEXOPT (LE Macro), but I don't found where is located.
> 
>   I did a look on SYS1.maclib,  I don't see any cee.maclib
> 
>   ny hep will be appreciated..
> 
>   TIA.

Manuel,

What SOURCE is being compiled?  Are you using the shipped compiler procs?  

What language is being compileted?

If this is for CEEDOPT or other CEE Options, you can code most of those in
the SYS1.PARMLIB Lib dataset in CEEPRMxx 

You would no longer need to do the include of the cee options modules in a
program.

Lizette 

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


Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

2011-07-14 Thread Chase, John
One need not specify compiler option DYNAM in order to use dynamic COBOL
calls, which indeed work "just fine and dandy" in CICS.  Now, that said:

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IGY3CG40/2.23

Last note on the page.

Also:

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DFHP3C00/1.3.
1

Scroll down to "Compiler Options".

-jc-

> -Original Message-
> From: IBM Mainframe Discussion List On Behalf Of Farley, Peter x23353
> 
> Actually not true.  I have done it frequently when it made sense to do
so.  COBOL dynamic CALL in CICS
> has been supported for quite some time now.  The trick is to limit the
use to subprograms that don't
> need to use CICS calls, but even that is possible if you pass the EIB
along.
> 
> Of course, you do NOT want a QSAM I/O module being invoked under CICS,
that would be quite bad.  Nor
> do you want any subprogram that invokes any z/OS services directly to
be called, but that has always
> been true.
> 
> Nonetheless, dynamic COBOL calls are supported and useful in CICS.
What you lose is debugging
> information from CICS in the event of any abend or failure in the
subprogram, because CICS thinks that
> the calling program is the one in control and not the dynamically
called subprogram, since CICS LINK
> was not used to invoke it.
> 
> HTH
> 
> Peter
> 
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
> > Behalf Of Chase, John
> > Sent: Thursday, July 14, 2011 10:39 AM
> > To: IBM-MAIN@bama.ua.edu
> > Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY
> >
> > How would TCB switching occur at all?  Are these programs running in
> > CICS?  If so, you cannot use the DYNAM compiler option for COBOL.
> --
> 
> This message and any attachments are intended only for the use of the
addressee and may contain
> information that is privileged and confidential. If the reader of the
message is not the intended
> recipient or an authorized representative of the intended recipient,
you are hereby notified that any
> dissemination of this communication is strictly prohibited. If you
have received this communication in
> error, please notify us immediately by e-mail and delete the message
and any attachments from your
> system.
> 
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html

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


GETMSG rutine Abend 0C4 Reason 17 in REXX Called with IRXJCL

2011-07-14 Thread Alvaro Quintupray B.
Hi,

   I'm getting  IRX0250E System abend code 0C4, reason code 0017  when in 
Batch I use the IRXJCL  to run rexx ( $COREXXB )   . . .So I don't know what I 
doing bad . . .

The REXX  Source is :

 ADDRESS  TSO   
 Dsname = 'DADM.CICSTS.V320.FILEA  '
 Dsname = Strip(Dsname) 

 Comando = 'D GRS,RES=(*,'Dsname')' 

 say ' Address  is = ' ADDRESS()
 say ' '

 ADDRESS  TSO "CONSPROF SOLDISPLAY(NO)" 

 say ' Address  is = ' ADDRESS()
 say ' '

 "CONSOLE ACTIVATE NAME(MYCONSO)"   

 say ' Address  is = ' ADDRESS()
 say ' '

 ADDRESS CONSOLE "SYSCMD("Comando") CART(APPL0001)" 

 say ' Address  is = ' ADDRESS()
 say ' '

 getcode =  GETMSG('Mensa.','SOL','APPL0001',05)

- - - - - - - - - - - - - - - - - - - - - - - - - - - -- - - - - - -- - - - - 
And  the result is :

 Address  is =  TSO
   
16 *-* ADDRESS  TSO "CONSPROF SOLDISPLAY(NO)"  
   +++ RC(-3) +++  
 Address  is =  TSO
   
21 *-* "CONSOLE ACTIVATE NAME(MICONSO)"
   +++ RC(-3) +++  
 Address  is =  TSO
   
26 *-* ADDRESS CONSOLE "SYSCMD("Comando") CART(APPL0001)"  
   +++ RC(-3) +++  
 Address  is =  TSO
   
IRX0250E System abend code 0C4, reason code 0017.  
IRX0253E Abend in external function GETMSG.
31 +++ getcode =  GETMSG('Mensa.','SOL','APPL0001',05) 
IRX0040I Error running $COREXXB, line 31: Incorrect call to routine


Someone can help me  . . .? 
Thank in advance.

Alvaro.

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


Re: GETMSG rutine Abend 0C4 Reason 17 in REXX Called with IRXJCL

2011-07-14 Thread Starr, Alan
Hi Alvaro,

I believe that GETMSG is having the vapors because a "CONSOLE" environment has 
not been established; granted, it should NOT die with an ABEND (very messy).

I believe that CONSPROF and CONSOLE are not working because IRXJCL does not 
establish a true TSO environment and these TSO CPs depend upon certain TSO 
control blocks (the UPT and possibly the PSCB too, I believe).

I suggest that you run this REXX under IKJEFT01 or IKJEFT1A (rather than 
IRXJCL) in batch.  I believe that that may work.

Alan





-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Alvaro Quintupray B.
Sent: Thursday, July 14, 2011 10:20 AM
To: IBM-MAIN@bama.ua.edu
Subject: GETMSG rutine Abend 0C4 Reason 17 in REXX Called with IRXJCL

Hi,

   I'm getting  IRX0250E System abend code 0C4, reason code 0017  when in 
Batch I use the IRXJCL  to run rexx ( $COREXXB )   . . .So I don't know what I 
doing bad . . .

The REXX  Source is :

 ADDRESS  TSO   
 Dsname = 'DADM.CICSTS.V320.FILEA  '
 Dsname = Strip(Dsname) 

 Comando = 'D GRS,RES=(*,'Dsname')' 

 say ' Address  is = ' ADDRESS()
 say ' '

 ADDRESS  TSO "CONSPROF SOLDISPLAY(NO)" 

 say ' Address  is = ' ADDRESS()
 say ' '

 "CONSOLE ACTIVATE NAME(MYCONSO)"   

 say ' Address  is = ' ADDRESS()
 say ' '

 ADDRESS CONSOLE "SYSCMD("Comando") CART(APPL0001)" 

 say ' Address  is = ' ADDRESS()
 say ' '

 getcode =  GETMSG('Mensa.','SOL','APPL0001',05)

- - - - - - - - - - - - - - - - - - - - - - - - - - - -- - - - - - -- - - - - 
And  the result is :

 Address  is =  TSO
   
16 *-* ADDRESS  TSO "CONSPROF SOLDISPLAY(NO)"  
   +++ RC(-3) +++  
 Address  is =  TSO
   
21 *-* "CONSOLE ACTIVATE NAME(MICONSO)"
   +++ RC(-3) +++  
 Address  is =  TSO
   
26 *-* ADDRESS CONSOLE "SYSCMD("Comando") CART(APPL0001)"  
   +++ RC(-3) +++  
 Address  is =  TSO
   
IRX0250E System abend code 0C4, reason code 0017.  
IRX0253E Abend in external function GETMSG.
31 +++ getcode =  GETMSG('Mensa.','SOL','APPL0001',05) 
IRX0040I Error running $COREXXB, line 31: Incorrect call to routine


Someone can help me  . . .? 
Thank in advance.

Alvaro.

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

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


Z196 Cobol pgm with higher CPU

2011-07-14 Thread David Mingee
Hello,  We recently installed a Z196 and we have one COBOL DB2 program that is 
using twice the CPU time as before the new CPU.  The program has not been 
recompiled and the data volume is the same.  IBM has found nothing, yet.  
Strobe has not revealed any answers.  All other programs use about 1/2 of the 
CPU time now.  Any help would be greatly appreciated.

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


Re: Z196 Cobol pgm with higher CPU

2011-07-14 Thread Staller, Allan
My first thought is data proximity to instructions.

That is data being modified within the width of the processor I-cache. 

The data modification will cause cache flush of the I-cache, and many
processor cycles to re-establish the cache and various pipelines.

This happened with SAS when the z/900 (?) processors came out.

There should be a discussion in the archives about the SAS version of
this issue.

The solution is to move the data far enough away from the instructions
so that the modification does not cause the cache to be flushed.

 
HTH,



Hello,  We recently installed a Z196 and we have one COBOL DB2 program
that is using twice the CPU time as before the new CPU.  The program has
not been recompiled and the data volume is the same.  IBM has found
nothing, yet.  Strobe has not revealed any answers.  All other programs
use about 1/2 of the CPU time now.  Any help would be greatly
appreciated.


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


Re: How to control in an JCL that a file is empty or not exist ?

2011-07-14 Thread Vernooij, CP - SPLXM
Ed,

I don't consider this exceptionally ideal, only normal practice. In our
systems, all datasets are SMS managed and therefor cataloged. All tapes
are supposed to be cataloged and in fact, we have no processes running
with uncataloged tapes. Even tapes coming from our TPF systems are
administrated in the CA1 TMC and cataloged in the catalogs, so they can
also be processed them as normal, cataloged datasets.

Hillario does not mention what his normal situation is and if he needs
to be able to handle exotic circumstances, but if not, I consider IDCAMS
LISTC the right tool.

Kees.


"Ed Gould"  wrote in message
news:<877469a4-08fc-4afb-a310-f4acf539b...@yahoo.com>...
> Kees,
> 
> In an ideal world yes. However just because a data set is cataloged,
it doesn't necessarily exist ie space allocated on a dataset and or
cataloged to a tape but the tape is not might now "belong" to someone
see.
> 
> Ed
> 
> Sent from my iPad
> 
> On Jul 14, 2011, at 7:58 AM, "Vernooij, CP - SPLXM"
 wrote:
> 
> > "Hilario G."  wrote in message
> > news:<0942850873937644.wa.librafegmail@bama.ua.edu>...
> >> Hello folks,
> >> 
> >> I have several batch processes that contain empty files or files
that
> > do not exist. 
> >> 
> >> I need to control the execution of certain programs based on the
> > existence of these files (including files created empty).
> >> 
> >> I try to used IDCAMS but didn't work in my tests. 
> >> 
> >> Thank you very much everyone. 
> >> 
> > 
> > IDCAMS LISTC will give a returncode based on the result, i.e. the
> > existence of the file.
> > 
> > Kees.
> > 
> > For information, services and offers, please visit our web site:
http://www.klm.com. This e-mail and any attachment may contain
confidential and privileged material intended for the addressee only. If
you are not the addressee, you are notified that no part of the e-mail
or any attachment may be disclosed, copied or distributed, and that any
other action related to this e-mail or attachment is strictly
prohibited, and may be unlawful. If you have received this e-mail by
error, please notify the sender immediately by return e-mail, and delete
this message. 
> > 
> > Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries
and/or its employees shall not be liable for the incorrect or incomplete
transmission of this e-mail or any attachments, nor responsible for any
delay in receipt. 
> > Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal
Dutch Airlines) is registered in Amstelveen, The Netherlands, with
registered number 33014286
> > 
> >
> > 
> >
--
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@bama.ua.edu with the message: GET IBM-MAIN
INFO
> > Search the archives at http://bama.ua.edu/archives/ibm-main.html
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html

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

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



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


TASKLIB search order question

2011-07-14 Thread Dave Day
I know this is probably already answered in the manuals, but I did not find 
it.

,TASKLIB=dcb addr 
Specifies the address of the DCB for the library to be used as the attached 
task's library. Otherwise, the task library is propagated from the originating 
task. (Note: The DCB must be opened before the ATTACH macro is executed.) 
SYS1.LINKLIB is the last library searched. If the DCB address specifies 
SYS1.LINKLIB, the search begins with SYS1.LINKLIB, goes through other 
libraries, and ends with SYS1.LINKLIB. The system abnormally terminates the 
attached task with a completion code of X'806' if the requested module is not 
in the task library and is not in the other libraries searched. 

The above from the description of parameters for ATTACH.  The load module 
for TASKB is in the steplib. If task TASKA allocates a library as a tasklib for 
an attach, where the library does not contain the load module for TASKB, opens 
a DCB, and then does the ATTACH for TASKB with the TASKLIB pointing to the 
library that does not contain load module TASKB, does ATTACH find it in the 
steplib, or 806? 

--Dave

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


Re: Z196 Cobol pgm with higher CPU

2011-07-14 Thread Mike Bell
just a guess but I expect the program does dynamic SQL.  That is the
only way you can get a different access path without a manual rebind.
CPU speed is part of the DB2 optimization so you should expect some
issues when you do rebinds and install new versions of programs.

And there is more expertise on DB2 listserv db...@lists.idug.org

Mike

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


Re: Finding abnormal events

2011-07-14 Thread Elardus Engelbrecht
Miklos Szigetvari wrote:
>Try to find all abends for a specific time in the system .
>Would be something with the mysterious CEA, but as I see,  it is still a 
>secret.
>Another option would be to notice every abend , dump message from the SYSLOG.

>Maybe someone has a better idea.

Two methods:

Use DFSORT on SYSLOG and search for ABEND. 

//ST1 EXEC PGM=SORT   
//SORTIN   DD DISP=SHR,DSN= 
//SORTOUT  DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//SYSINDD *   
 SORT FIELDS=(COPY)   
 INCLUDE COND=(1,,SS,EQ,C'ABEND') 

Ugly, but you can try searching for those IEF450I instead, for example.

Or collect SMF record 30, subtype 5 and look for abnormal jobend. Some 
programming skills are needed.

Groete / Greetings
Elardus Engelbrecht

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


Does SMS 'guaranteed space' attribute affect extents of data after Rep ro with 'reuse'

2011-07-14 Thread akoc...@netzero.net
What affect is there when using an SMS storage group with the 'guaranteed 
space' option with respect to performing an IDCAMS REPRO (with the REUSE 
option)? 

I am interested in knowing if the location of the extents would or (would not) 
change depending on whether or not the 'guaranteed space' option is specified.

Thanks for any input.


President Lowers Rates
Mortgage Rates Hit 2.75%. As Seen On Good Morning America!
http://thirdpartyoffers.netzero.net/TGL3231/4e1f36e9e26b7403d49st02duc

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


Re: CEEXOPT macro ..where reside ?

2011-07-14 Thread Mark Zelden
On Thu, 14 Jul 2011 11:51:42 -0500, Paul Gilmartin  wrote:

>On Thu, 14 Jul 2011 11:23:23 -0500, Mark Zelden wrote:
>>
>>Education is nice, but probably TMI.   Most likely an application type if 
>>they are
>>using CEEXOPT and don't already know how to find it.   If so, there could be
>>no access to SMP/E  - especially given IBM's recent (ahem) enhancement.
>>
>Aren't the LIST and query type functions exempt from the "enhancement"?
>Or are they merely controlled by separate rules?  Can one with no special
>privilege even enter the SMP/E panels?  I suppose "need to know" comes
>into play at many sites.
>
>I can't experiment on my ID because my job requires considerable SMP/E
>privileges.  I wish merely that IBM would provide me some guidance about
>what actions I must avoid in order that I not present the much-discussed
>integrity threat.
>

I can't test either, but according to APAR IO12263 :

"The functions being controlled are all
  the SMP/E commands processed by program GIMSMP (for example,
  SET, RECEIVE, APPLY, ACCEPT, UCLIN, LIST, REPORT, etc.), the
  GIMZIP and GIMUNZIP service routines, and the GIMIAP copy
  utility invocation program."

Which includes LIST and REPORT for example.   It goes on to list some
specific functions that should be controlled "very carefully":

  "These functions, and the corresponding SAF FACILITY class resources
  that SMP/E checks, are as follows:
  
 
Function:Resource name:
RECEIVE command  GIM.CMD.RECEIVE
APPLY commandGIM.CMD.APPLY
ACCEPT command   GIM.CMD.ACCEPT
RESTORE command  GIM.CMD.RESTORE
REJECT command   GIM.CMD.REJECT
LINK command GIM.CMD.LINK
CLEANUP command  GIM.CMD.CLEANUP
Program GIMZIP   GIM.PGM.GIMZIP
Program GIMUNZIP GIM.PGM.GIMUNZIP
Program GIMIAP   GIM.PGM.GIMIAP   "


Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS   
mailto:m...@mzelden.com
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html 
Systems Programming expert at http://expertanswercenter.techtarget.com/

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


Re: CEEXOPT macro ..where reside ?

2011-07-14 Thread Mark Jacobs
I asked IBM specifically whether the then new SAF profiles were used 
while using the query functions in the SMP/E ISPF interface and their 
answer was no.


Mark Jacobs

On 07/14/11 14:27, Mark Zelden wrote:

On Thu, 14 Jul 2011 11:51:42 -0500, Paul Gilmartin  wrote:

   

On Thu, 14 Jul 2011 11:23:23 -0500, Mark Zelden wrote:
 

Education is nice, but probably TMI.   Most likely an application type if they 
are
using CEEXOPT and don't already know how to find it.   If so, there could be
no access to SMP/E  - especially given IBM's recent (ahem) enhancement.

   

Aren't the LIST and query type functions exempt from the "enhancement"?
Or are they merely controlled by separate rules?  Can one with no special
privilege even enter the SMP/E panels?  I suppose "need to know" comes
into play at many sites.

I can't experiment on my ID because my job requires considerable SMP/E
privileges.  I wish merely that IBM would provide me some guidance about
what actions I must avoid in order that I not present the much-discussed
integrity threat.

 

I can't test either, but according to APAR IO12263 :

"The functions being controlled are all
   the SMP/E commands processed by program GIMSMP (for example,
   SET, RECEIVE, APPLY, ACCEPT, UCLIN, LIST, REPORT, etc.), the
   GIMZIP and GIMUNZIP service routines, and the GIMIAP copy
   utility invocation program."

Which includes LIST and REPORT for example.   It goes on to list some
specific functions that should be controlled "very carefully":

   "These functions, and the corresponding SAF FACILITY class resources
   that SMP/E checks, are as follows:


 Function:Resource name:
 RECEIVE command  GIM.CMD.RECEIVE
 APPLY commandGIM.CMD.APPLY
 ACCEPT command   GIM.CMD.ACCEPT
 RESTORE command  GIM.CMD.RESTORE
 REJECT command   GIM.CMD.REJECT
 LINK command GIM.CMD.LINK
 CLEANUP command  GIM.CMD.CLEANUP
 Program GIMZIP   GIM.PGM.GIMZIP
 Program GIMUNZIP GIM.PGM.GIMUNZIP
 Program GIMIAP   GIM.PGM.GIMIAP   "


Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS
mailto:m...@mzelden.com
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html
Systems Programming expert at http://expertanswercenter.techtarget.com/

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

   



--
Mark Jacobs
Time Customer Service
Tampa, FL


Some people are electrifying, they light up
a room when they leave.

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


Re: FW: Mysterious Email (original had no subject)

2011-07-14 Thread Elardus Engelbrecht
Chase, John wrote:

>Anybody ever gotten anything like this before?  We don't run VM, and
>I've not sent any files to IBM since April, when I last opened a PMR.

Give Walter Farrell the full e-mail header. That will give you and him the 
trail from where that mail is coming from.

The part '@d03av06.' is smelling like rotten fish to me, but the text and usage 
of abbreviations are both looking 'IBM official to me'??? ()

(PROFS is indeed an IBM product. Is it still in use?)

HTH!

Groete / Greetings
Elardus Engelbrecht

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


Re: TASKLIB search order question

2011-07-14 Thread Dave Day
Thanks Alan.  I'll code it that way.  If it turns out not to be the case, 
I'll let you know.


   --Dave
- Original Message - 
From: "Starr, Alan" 

Newsgroups: bit.listserv.ibm-main
To: 
Sent: Thursday, July 14, 2011 12:58 PM
Subject: Re: TASKLIB search order question



I believe that this may address your question:

1) STEPLIB may always be searched for all program fetch done by the "job 
step" TCB and all its subtasks.
2) TASKLIB, if specified for the active task (or propagated from the 
parent task), is searched before STEPLIB.


Caveat: I didn't look this up; the above is from my memory of how it 
works.


Alan

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On 
Behalf Of Dave Day

Sent: Thursday, July 14, 2011 10:48 AM
To: IBM-MAIN@bama.ua.edu
Subject: TASKLIB search order question

   I know this is probably already answered in the manuals, but I did not 
find it.


,TASKLIB=dcb addr
Specifies the address of the DCB for the library to be used as the 
attached task's library. Otherwise, the task library is propagated from 
the originating task. (Note: The DCB must be opened before the ATTACH 
macro is executed.) SYS1.LINKLIB is the last library searched. If the DCB 
address specifies SYS1.LINKLIB, the search begins with SYS1.LINKLIB, goes 
through other libraries, and ends with SYS1.LINKLIB. The system abnormally 
terminates the attached task with a completion code of X'806' if the 
requested module is not in the task library and is not in the other 
libraries searched.


   The above from the description of parameters for ATTACH.  The load 
module for TASKB is in the steplib. If task TASKA allocates a library as a 
tasklib for an attach, where the library does not contain the load module 
for TASKB, opens a DCB, and then does the ATTACH for TASKB with the 
TASKLIB pointing to the library that does not contain load module TASKB, 
does ATTACH find it in the steplib, or 806?


   --Dave

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


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


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


Re: GETMSG rutine Abend 0C4 Reason 17 in REXX Called with IRXJCL

2011-07-14 Thread Quintupray Burgos Alvaro
Hi  Alan.

You are right,   the REXX  with getmsg  run fine under TSO  or  
IKJEFT1A  . . .  but I saw in "saint google"  some REXX samples and   that they 
say run fine under IRXJCL  . . .?

Anyway,  Thank you very much for your help


Atte.,
 Alvaro Quintupray Burgos
Administración de Sistemas Mainframes
BancoEstado  - Chile
Morandé 25, piso 3 - Santiago
F:(56-2) 970-3023 Anexo: 23023

-Mensaje original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] En nombre de 
Starr, Alan
Enviado el: Jueves, 14 de Julio de 2011 13:38
Para: IBM-MAIN@bama.ua.edu
Asunto: Re: GETMSG rutine Abend 0C4 Reason 17 in REXX Called with IRXJCL

Hi Alvaro,

I believe that GETMSG is having the vapors because a "CONSOLE" environment has 
not been established; granted, it should NOT die with an ABEND (very messy).

I believe that CONSPROF and CONSOLE are not working because IRXJCL does not 
establish a true TSO environment and these TSO CPs depend upon certain TSO 
control blocks (the UPT and possibly the PSCB too, I believe).

I suggest that you run this REXX under IKJEFT01 or IKJEFT1A (rather than 
IRXJCL) in batch.  I believe that that may work.

Alan





-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Alvaro Quintupray B.
Sent: Thursday, July 14, 2011 10:20 AM
To: IBM-MAIN@bama.ua.edu
Subject: GETMSG rutine Abend 0C4 Reason 17 in REXX Called with IRXJCL

Hi,

   I'm getting  IRX0250E System abend code 0C4, reason code 0017  when in 
Batch I use the IRXJCL  to run rexx ( $COREXXB )   . . .So I don't know what I 
doing bad . . .

The REXX  Source is :

 ADDRESS  TSO
 Dsname = 'DADM.CICSTS.V320.FILEA  '
 Dsname = Strip(Dsname)

 Comando = 'D GRS,RES=(*,'Dsname')'

 say ' Address  is = ' ADDRESS()
 say ' '

 ADDRESS  TSO "CONSPROF SOLDISPLAY(NO)"

 say ' Address  is = ' ADDRESS()
 say ' '

 "CONSOLE ACTIVATE NAME(MYCONSO)"

 say ' Address  is = ' ADDRESS()
 say ' '

 ADDRESS CONSOLE "SYSCMD("Comando") CART(APPL0001)"

 say ' Address  is = ' ADDRESS()
 say ' '

 getcode =  GETMSG('Mensa.','SOL','APPL0001',05)

- - - - - - - - - - - - - - - - - - - - - - - - - - - -- - - - - - -- - - - - 
And  the result is :

 Address  is =  TSO

16 *-* ADDRESS  TSO "CONSPROF SOLDISPLAY(NO)"
   +++ RC(-3) +++
 Address  is =  TSO

21 *-* "CONSOLE ACTIVATE NAME(MICONSO)"
   +++ RC(-3) +++
 Address  is =  TSO

26 *-* ADDRESS CONSOLE "SYSCMD("Comando") CART(APPL0001)"
   +++ RC(-3) +++
 Address  is =  TSO

IRX0250E System abend code 0C4, reason code 0017.
IRX0253E Abend in external function GETMSG.
31 +++ getcode =  GETMSG('Mensa.','SOL','APPL0001',05)
IRX0040I Error running $COREXXB, line 31: Incorrect call to routine


Someone can help me  . . .?
Thank in advance.

Alvaro.

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

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


La información contenida en este correo electrónico, así como en cualquiera de 
sus adjuntos, es confidencial y está dirigida exclusivamente a el o los 
destinatarios indicados. Cualquier uso, reproducción, divulgación o 
distribución por otras personas distintas de el o los destinatarios está 
estrictamente prohibida. Si ha recibido este correo por error, por favor 
notifíquelo inmediatamente al remitente y bórrelo de su sistema sin dejar copia 
del mismo. BancoEstado no acepta responsabilidad alguna por cualquier perdida o 
daño como consecuencia, directa o indirecta, del uso indebido de este e-mail o 
de los adjuntos al mismo.

The information contained in this e-mail message may be privileged, 
confidential and protected from disclosure. If you are not the intended 
recipient, any further disclosure or use, dissemination, distribution or 
copying of this message or any attachment is strictly prohibited. If you think 
you have received this e-mail message in error, please E-mail the sender and 
delete the e-mail. BancoEstado is not liable for any loss or damage resulting 
from illegal use of this E-mail or any attachment.

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


Re: JCL Question

2011-07-14 Thread Elardus Engelbrecht
R. Skorupka wrote:

>I believe this is main reason why JCL haven't been enhanced to have such 
>facilities. BIG customers - those which IBM listen to - already have such 
>facilities (in Job Scheduler) and have no reason to push IBM. 

Partly true, but the actual reason has been stated many times here on IBM-MAIN:

Reason - where and when do you want variables substituted? On the system where 
JCL is submitted or on the system where the JCL is to be executed? Before you 
yell at me that date/time is universal on any machine, take in account the 
local time of the machine where you want date/time substitution... 

About when - at submission or at job start or what? 

Who do you want the actual work to be done: JES2 at interpretation or when the 
resource manager gets the DD statements?

Forget for now about the possibility that the date/time variables are 
substituted in next day or week... :-)

Also forget for a moment about possible mixup of local times and/or Zulu time 
(greenwich time) ;-D

Groete / Greetings
Elardus Engelbrecht

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


Schwab members on the list

2011-07-14 Thread Steve Comstock

Anyone on the list from Charles Schwab located in the
Denver area? Please contact me off list.


--

Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

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

* Special promotion: 15% off on all DB2 training classes
scheduled by September 1, taught by year end 2011

* Check out our entire DB2 curriculum at:
http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm

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


Re: Z196 Cobol pgm with higher CPU

2011-07-14 Thread Skip Robinson
I know of a case where one specific COBOL application went to h*ll in a 
h*nd basket on z196 after performing satisfactorily for years on z10 and 
earlier. The problem turned out to be handling of MVCL, which this 
application was replete with. The problem was fixed in a microcode level 
that I would expect everyone to have by now. 


.
.
JO.Skip Robinson
SCE Infrastructure Technology Services
Electric Dragon Team Paddler 
SHARE MVS Program Co-Manager
626-302-7535 Office
323-715-0595 Mobile
jo.skip.robin...@sce.com



From:   "Staller, Allan" 
To: IBM-MAIN@bama.ua.edu
Date:   07/14/2011 10:52 AM
Subject:Re: Z196 Cobol pgm with higher CPU
Sent by:IBM Mainframe Discussion List 



My first thought is data proximity to instructions.

That is data being modified within the width of the processor I-cache. 

The data modification will cause cache flush of the I-cache, and many
processor cycles to re-establish the cache and various pipelines.

This happened with SAS when the z/900 (?) processors came out.

There should be a discussion in the archives about the SAS version of
this issue.

The solution is to move the data far enough away from the instructions
so that the modification does not cause the cache to be flushed.

 
HTH,



Hello,  We recently installed a Z196 and we have one COBOL DB2 program
that is using twice the CPU time as before the new CPU.  The program has
not been recompiled and the data volume is the same.  IBM has found
nothing, yet.  Strobe has not revealed any answers.  All other programs
use about 1/2 of the CPU time now.  Any help would be greatly
appreciated.


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


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


Re: TASKLIB search order question

2011-07-14 Thread Starr, Alan
I believe that this may address your question:

1) STEPLIB may always be searched for all program fetch done by the "job step" 
TCB and all its subtasks.
2) TASKLIB, if specified for the active task (or propagated from the parent 
task), is searched before STEPLIB.

Caveat: I didn't look this up; the above is from my memory of how it works.

Alan

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Dave Day
Sent: Thursday, July 14, 2011 10:48 AM
To: IBM-MAIN@bama.ua.edu
Subject: TASKLIB search order question

I know this is probably already answered in the manuals, but I did not find 
it.

,TASKLIB=dcb addr
Specifies the address of the DCB for the library to be used as the attached 
task's library. Otherwise, the task library is propagated from the originating 
task. (Note: The DCB must be opened before the ATTACH macro is executed.) 
SYS1.LINKLIB is the last library searched. If the DCB address specifies 
SYS1.LINKLIB, the search begins with SYS1.LINKLIB, goes through other 
libraries, and ends with SYS1.LINKLIB. The system abnormally terminates the 
attached task with a completion code of X'806' if the requested module is not 
in the task library and is not in the other libraries searched. 

The above from the description of parameters for ATTACH.  The load module 
for TASKB is in the steplib. If task TASKA allocates a library as a tasklib for 
an attach, where the library does not contain the load module for TASKB, opens 
a DCB, and then does the ATTACH for TASKB with the TASKLIB pointing to the 
library that does not contain load module TASKB, does ATTACH find it in the 
steplib, or 806? 

--Dave 

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

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


Re: Z196 Cobol pgm with higher CPU

2011-07-14 Thread Vernooij, CP - SPLXM
So, since it is Cobol, would just a recompile with a recent compiler be
sufficient to generate an efficient loadmodule?

We discussed a similar issue internally recently with regards to the new
instructions that are available on today's machines and were not 10 or
20 years ago when an old module was compiled. Also for this reason,
recompiling it could make it more efficient.

Kees.


"Staller, Allan"  wrote in message
news:<45e5f2f45d7878458ee5ca679697335502e25...@usdaexch01.kbm1.loc>...
> My first thought is data proximity to instructions.
> 
> That is data being modified within the width of the processor I-cache.

> 
> The data modification will cause cache flush of the I-cache, and many
> processor cycles to re-establish the cache and various pipelines.
> 
> This happened with SAS when the z/900 (?) processors came out.
> 
> There should be a discussion in the archives about the SAS version of
> this issue.
> 
> The solution is to move the data far enough away from the instructions
> so that the modification does not cause the cache to be flushed.
> 
>  
> HTH,
> 
> 
> 
> Hello,  We recently installed a Z196 and we have one COBOL DB2 program
> that is using twice the CPU time as before the new CPU.  The program
has
> not been recompiled and the data volume is the same.  IBM has found
> nothing, yet.  Strobe has not revealed any answers.  All other
programs
> use about 1/2 of the CPU time now.  Any help would be greatly
> appreciated.
> 
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html

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

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



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


ACF2 SVCs -- Required?!?

2011-07-14 Thread Tom Sims

Greetings,

Yesterday we entertained a group of vendor representatives who presented 
their assessment of our implementation of ACF2.  Among their key 
findings and recommendations was a high-criticality suggestion to remove 
the ACF2 "alter SVC," which was characterized as a dangerous back door 
around access control, the removal of which would substantially reduce 
our exposure to its malicious use.


I have been through the Installation, Auditor, Administrator, Systems 
Programmer _and_ Best Practices manuals for our current release, as well 
as the next, and I can find no indication that defining this SVC to the 
product is in any way optional.  Nor is there any documentation in the 
online vendor bookshelves that either supports this assessment or 
details alternatives.


Any ACF2 gurus out there with ideas?  They are appreciated in advance!

Tom Sims

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


Re: GETMSG rutine Abend 0C4 Reason 17 in REXX Called with IRXJCL

2011-07-14 Thread Elardus Engelbrecht
Quintupray Burgos Alvaro wrote:

>You are right,   the REXX  with getmsg  run fine under TSO  or  
> IKJEFT1A  . . .  

This is expected. WAD. Thanks for letting u know. I was a little worried...

>but I saw in "saint google"  some REXX samples and   that they say run fine 
>under IRXJCL  . . .?

Saint what? What sources found by that search engine is showing you that bad 
samples? Did you compared that sources with IBM official manuals?

Groete / Greetings
Elardus Engelbrecht

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


Re: GETMSG rutine Abend 0C4 Reason 17 in REXX Called with IRXJCL

2011-07-14 Thread Paul Gilmartin
On Thu, 14 Jul 2011 14:16:17 -0400, Quintupray Burgos Alvaro wrote:
>
>You are right,   the REXX  with getmsg  run fine under TSO  or  
> IKJEFT1A  . . .  but I saw in "saint google"  some REXX samples and   that 
> they say run fine under IRXJCL  . . .?
>
Simply, "address TSO" is not available under IRXJCL.  That's the reason
for the (-3).

>16 *-* ADDRESS  TSO "CONSPROF SOLDISPLAY(NO)"
>   +++ RC(-3) +++
> Address  is =  TSO

-- gil

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


Re: Z196 Cobol pgm with higher CPU

2011-07-14 Thread Elardus Engelbrecht
David Mingee wrote:

>Hello,  We recently installed a Z196 and we have one COBOL DB2 program that is 
>using twice the CPU time as before the new CPU.  The program has not been 
>recompiled and the data volume is the same.  

Did you do any z/OS and/or DB2 upgrade too? What versions are you having now 
when having this problem?

>IBM has found nothing, yet.  Strobe has not revealed any answers.  All other 
>programs use about 1/2 of the CPU time now. 

Why not re-check that program?

If you can recompile that program with the latest LE + DB2 libraries and still 
having CPU time problem, you need to sail away to PTF and APAR land using a PMR 
... ;-D

Groete / Greetings
Elardus Engelbrecht

"Don't smoke in bed. And don't sleep in ashtrays!" ;-D

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


Re: How to control in an JCL that a file is empty or not exist ?

2011-07-14 Thread Paul Gilmartin
On Thu, 14 Jul 2011 19:48:36 +0200, Vernooij, CP - SPLXM wrote:
>
>I don't consider this exceptionally ideal, only normal practice. In our
>systems, all datasets are SMS managed and therefor cataloged. All tapes
>are supposed to be cataloged and in fact, we have no processes running
>with uncataloged tapes. Even tapes coming from our TPF systems are
>administrated in the CA1 TMC and cataloged in the catalogs, so they can
>also be processed them as normal, cataloged datasets.
> 
Do you use no tapes as an interchange medium?

-- gil

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


Re: Does SMS 'guaranteed space' attribute affect extents of data after Rep ro with 'reuse'

2011-07-14 Thread Starr, Alan
The short answer to your question is YES, there is a difference between how a 
dataset expands into secondary extents when its SC specifies "guaranteed space".

I don't have time to look this up but I believe it works as follows (i.e. AFTER 
the primary space amount has been allocated on a volume):

1) Allocate additional secondary extents (specified secondary size) on the 
primary volume.
2) When the primary volume has no more space, search for a "candidate with 
space" (i.e. another volume in the same SG that can accommodate all of the 
space currently allocated on the primary volume [both the primary and secondary 
extents]). There may be a difference between VSAM and non-VSAM (i.e. for 
non-VSAM it may look only for the primary quantity, I can't recall exactly).
3) Without "guaranteed space", it looks for a candidate volume that can 
accommodate the specified secondary quantity.

That's how I believe it works.  You can verify in the "Using Datasets" manual.

Cheers,
Alan 

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
akoc...@netzero.net
Sent: Thursday, July 14, 2011 11:34 AM
To: IBM-MAIN@bama.ua.edu
Subject: Does SMS 'guaranteed space' attribute affect extents of data after Rep 
ro with 'reuse'

What affect is there when using an SMS storage group with the 'guaranteed 
space' option with respect to performing an IDCAMS REPRO (with the REUSE 
option)? 

I am interested in knowing if the location of the extents would or (would not) 
change depending on whether or not the 'guaranteed space' option is specified.

Thanks for any input.


President Lowers Rates
Mortgage Rates Hit 2.75%. As Seen On Good Morning America!
http://thirdpartyoffers.netzero.net/TGL3231/4e1f36e9e26b7403d49st02duc

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

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


Re: GETMSG rutine Abend 0C4 Reason 17 in REXX Called with IRXJCL

2011-07-14 Thread Quintupray Burgos Alvaro
Hi Paul.

Humm . . . . O.K   Thanks

Is there a way to obtain ADDRESS TSO under IRXJCL ?

Alvaro.


-Mensaje original-
De: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] En nombre de 
Paul Gilmartin
Enviado el: Jueves, 14 de Julio de 2011 14:54
Para: IBM-MAIN@bama.ua.edu
Asunto: Re: GETMSG rutine Abend 0C4 Reason 17 in REXX Called with IRXJCL

On Thu, 14 Jul 2011 14:16:17 -0400, Quintupray Burgos Alvaro wrote:
>
>You are right,   the REXX  with getmsg  run fine under TSO  or  
> IKJEFT1A  . . .  but I saw in "saint google"  some REXX samples and   that 
> they say run fine under IRXJCL  . . .?
>
Simply, "address TSO" is not available under IRXJCL.  That's the reason
for the (-3).

>16 *-* ADDRESS  TSO "CONSPROF SOLDISPLAY(NO)"
>   +++ RC(-3) +++
> Address  is =  TSO

-- gil

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


La información contenida en este correo electrónico, así como en cualquiera de 
sus adjuntos, es confidencial y está dirigida exclusivamente a el o los 
destinatarios indicados. Cualquier uso, reproducción, divulgación o 
distribución por otras personas distintas de el o los destinatarios está 
estrictamente prohibida. Si ha recibido este correo por error, por favor 
notifíquelo inmediatamente al remitente y bórrelo de su sistema sin dejar copia 
del mismo. BancoEstado no acepta responsabilidad alguna por cualquier perdida o 
daño como consecuencia, directa o indirecta, del uso indebido de este e-mail o 
de los adjuntos al mismo.

The information contained in this e-mail message may be privileged, 
confidential and protected from disclosure. If you are not the intended 
recipient, any further disclosure or use, dissemination, distribution or 
copying of this message or any attachment is strictly prohibited. If you think 
you have received this e-mail message in error, please E-mail the sender and 
delete the e-mail. BancoEstado is not liable for any loss or damage resulting 
from illegal use of this E-mail or any attachment.

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


Re: Cluster is Open during backup

2011-07-14 Thread Elardus Engelbrecht
jagadishan perumal wrote:

>Most of the cases are due to the Users Improper close.

Please define your statement with more details or examples. How do you know 
that your users is causing trouble? What are they using?

I'm smelling something bad. Very bad.

If I have it my way, I could revoke their user ids with RACF, but this is a 
career ending thing... :-D

Groete / Greetings
Elardus Engelbrecht

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


Re: FW: Mysterious Email (original had no subject)

2011-07-14 Thread August Carideo
PROFS was Ollie North's downfall



   
 Elardus   
 Engelbrecht   
IBM-MAIN@bama.ua.edu
 Sent by: IBM   cc 
 Mainframe 
 Discussion List   Subject 
  had no subject) 
   
   
 07/14/2011 02:30  
 PM
   
   
 Please respond to 
   IBM Mainframe   
  Discussion List  

   
   




Chase, John wrote:

>Anybody ever gotten anything like this before?  We don't run VM, and
>I've not sent any files to IBM since April, when I last opened a PMR.

Give Walter Farrell the full e-mail header. That will give you and him the
trail from where that mail is coming from.

The part '@d03av06.' is smelling like rotten fish to me, but the text and
usage of abbreviations are both looking 'IBM official to me'??? ()

(PROFS is indeed an IBM product. Is it still in use?)

HTH!

Groete / Greetings
Elardus Engelbrecht

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

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


SMP/E SAF Enhancement (was Re: CEEXOPT macro ...)

2011-07-14 Thread Mark Zelden
On Thu, 14 Jul 2011 14:37:29 -0400, Mark Jacobs  
wrote:

>I asked IBM specifically whether the then new SAF profiles were used
>while using the query functions in the SMP/E ISPF interface and their
>answer was no.
>

(I hate mixing top posting and bottom posting, so I snipped the prior
context ... sorry.  Also changed the subject).

If that is true, it sounds inconsistent with what the enhancement is
doing (unless things like LIST and REPORT aren't protected).  So 
you protect the LIST command, but don't specifically protect the
ISPF libraries because the HLQs are SYS1 and everyone has read
access to SYS1.  Then someone can just execute the ISPF interface
and do the equivalent of LIST.  

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS   
mailto:m...@mzelden.com
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html 
Systems Programming expert at http://expertanswercenter.techtarget.com/

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


Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

2011-07-14 Thread Tom Marchant
On Thu, 14 Jul 2011 08:40:37 -0600, Steve Comstock wrote:

>yes, there is some penalty
>for AMODE switching.

What penalty is that, Steve?  Do BASSM and BSM run significantly 
slower than BASR/BALR and BR?

-- 
Tom Marchant

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


Re: ACF2 SVCs -- Required?!?

2011-07-14 Thread Binyamin Dissen
On Thu, 14 Jul 2011 11:55:07 -0700 Tom Sims  wrote:

:>Yesterday we entertained a group of vendor representatives who presented 
:>their assessment of our implementation of ACF2.  Among their key 
:>findings and recommendations was a high-criticality suggestion to remove 
:>the ACF2 "alter SVC," which was characterized as a dangerous back door 
:>around access control, the removal of which would substantially reduce 
:>our exposure to its malicious use.

:>I have been through the Installation, Auditor, Administrator, Systems 
:>Programmer _and_ Best Practices manuals for our current release, as well 
:>as the next, and I can find no indication that defining this SVC to the 
:>product is in any way optional.  Nor is there any documentation in the 
:>online vendor bookshelves that either supports this assessment or 
:>details alternatives.

:>Any ACF2 gurus out there with ideas?  They are appreciated in advance!

It is NOT at all optional. The alter-svc is used to alter the acf2 database,
i.e., insert, delete and change user ids, resources, etc.

acf2 IS your access control.

Who were these vendor representatives? What are their motivations? What are
they trying to sell you?

--
Binyamin Dissen 
http://www.dissensoftware.com

Director, Dissen Software, Bar & Grill - Israel


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

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

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


Re: GETMSG rutine Abend 0C4 Reason 17 in REXX Called with IRXJCL

2011-07-14 Thread Paul Gilmartin
On Thu, 14 Jul 2011 15:08:15 -0400, Quintupray Burgos Alvaro wrote:
>
>Is there a way to obtain ADDRESS TSO under IRXJCL ?
> 
I suppose if you want a Rube Goldberg (See St. Google), you might
use "address SYSCALL spawn" to launch a second EXEC under Unix
System Services, which could use the surrogate "address TSO" to
launch your payload (third) EXEC.  But to what end?

Have you some fundamental objection to using using IKJEFT%%?
They're there; they suit your purpose.

-- gil

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


Re: ACF2 SVCs -- Required?!?

2011-07-14 Thread Tony Harminc
On 14 July 2011 14:55, Tom Sims  wrote:

> Yesterday we entertained a group of vendor representatives who presented
> their assessment of our implementation of ACF2.  Among their key findings
> and recommendations was a high-criticality suggestion to remove the ACF2
> "alter SVC," which was characterized as a dangerous back door around access
> control, the removal of which would substantially reduce our exposure to its
> malicious use.

Oh my... Did they also suggest restricting use of AMASPZAP because
it's a dangerous and powerful utility that allows (shock, horror)
updating datasets?

> I have been through the Installation, Auditor, Administrator, Systems
> Programmer _and_ Best Practices manuals for our current release, as well as
> the next, and I can find no indication that defining this SVC to the product
> is in any way optional.  Nor is there any documentation in the online vendor
> bookshelves that either supports this assessment or details alternatives.

If the ACF2 SVC allowed just anyone to run a program update the ACF2
database, there would be a problem. But pretty obviously it has access
controls, just as the RACF SVC and callable services have access
controls.

If these advisors believe there is a problem, ask them to spell it out
in detail, giving at least one scenario showing malicious use.

Oh by the way, a number of vendor products would stop working if you
managed to remove the SVC. To say nothing of the ACF command.

Tony H.

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


Re: GETMSG rutine Abend 0C4 Reason 17 in REXX Called with IRXJCL

2011-07-14 Thread Ted MacNEIL
>Is there a way to obtain ADDRESS TSO under IRXJCL ?

NO.
Read the Doc.
What's wrong with using IKJEFT**?
-
Ted MacNEIL
eamacn...@yahoo.ca
Twitter: @TedMacNEIL

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


Re: SMP/E SAF Enhancement (was Re: CEEXOPT macro ...)

2011-07-14 Thread Walt Farrell
On Thu, 14 Jul 2011 14:22:46 -0500, Mark Zelden  wrote:

>On Thu, 14 Jul 2011 14:37:29 -0400, Mark Jacobs  
>wrote:
>
>>I asked IBM specifically whether the then new SAF profiles were used
>>while using the query functions in the SMP/E ISPF interface and their
>>answer was no.
>>
>
>(I hate mixing top posting and bottom posting, so I snipped the prior
>context ... sorry.  Also changed the subject).
>
>If that is true, it sounds inconsistent with what the enhancement is
>doing (unless things like LIST and REPORT aren't protected).  So
>you protect the LIST command, but don't specifically protect the
>ISPF libraries because the HLQs are SYS1 and everyone has read
>access to SYS1.  Then someone can just execute the ISPF interface
>and do the equivalent of LIST.

It is true.

Remember that the SMP/E enhancement was made to close a system integrity 
exposure, which existed because SMP/E runs authorized. 

The query function via the ISPF panels does not run authorized, and does not 
participate in the integrity exposure, and so did not need that enhancement. 

And in any case, because the query function does not run authorized, if we had 
put a security check in it to allow control of the query function it would not 
be fully effective; a somewhat clever user would be able to bypass it.

-- 
Walt Farrell
IBM STSM, z/OS Security Design

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


Re: ACF2 SVCs -- Required?!?

2011-07-14 Thread Tom Sims
Before anyone else responds to my original post, let me thank those who 
already have!  Shortly after the post I also received a phone call from 
one of the ACF2 software architects.  He, too, assured me that BOTH SVCs 
are required, NOT OPTIONAL, as I suspected (and as the Fine Manuals had 
pretty much already confirmed).


Tom Sims

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


Re: SMP/E SAF Enhancement (was Re: CEEXOPT macro ...)

2011-07-14 Thread Paul Gilmartin
On Thu, 14 Jul 2011 14:22:46 -0500, Mark Zelden wrote:

>On Thu, 14 Jul 2011 14:37:29 -0400, Mark Jacobs  
>wrote:
>
>>I asked IBM specifically whether the then new SAF profiles were used
>>while using the query functions in the SMP/E ISPF interface and their
>>answer was no.
>
>(I hate mixing top posting and bottom posting, so I snipped the prior
>context ... sorry.  Also changed the subject).
>
I whitewash with the (implied) phrase, "comments inline".  Thanks for
changing the subject.

>If that is true, it sounds inconsistent with what the enhancement is
>doing (unless things like LIST and REPORT aren't protected).  So
>you protect the LIST command, but don't specifically protect the
>ISPF libraries because the HLQs are SYS1 and everyone has read
>access to SYS1.  Then someone can just execute the ISPF interface
>and do the equivalent of LIST.
>
You're both right.  In:

SMP/E for z/OS
User's Guide
Document Number SA22-7773-15

I read:

3.1 Authorizing use of SMP/E commands and services

The System Authorization Facility (SAF) restricts the use of
certain SMP/E functions to users who have appropriate access to
the SAF resources that protect those functions. The functions
being controlled are all the SMP/E commands processed by program
GIMSMP (for example, SET, RECEIVE, APPLY, ACCEPT, UCLIN, LIST,
REPORT, and so on), the GIMZIP and GIMUNZIP service routines,
and the GIMIAP copy utility invocation program.
...

However, of all the functions described above, several need to be
controlled very carefully. Users who are granted access to these
resources have the potential to undermine system security regardless
of any data set protections you may have in place. Therefore, they
should be as trusted, for example, as users who have authority to
update APF authorized libraries. These functions, and the
corresponding SAF FACILITY class resources that SMP/E checks,
are as follows:

Table 2. Function and resource name
 that SMP/E checks

Function  Resource name

RECEIVE command   GIM.CMD.RECEIVE
APPLY command GIM.CMD.APPLY
ACCEPT commandGIM.CMD.ACCEPT
RESTORE command   GIM.CMD.RESTORE
REJECT commandGIM.CMD.REJECT
LINK command  GIM.CMD.LINK
CLEANUP command   GIM.CMD.CLEANUP
Program GIMZIPGIM.PGM.GIMZIP
Program GIMUNZIP  GIM.PGM.GIMUNZIP
Program GIMIAPGIM.PGM.GIMIAP

So, apparently, while LIST and REPORT are not in the list
of functions having the "potential to undermine system
security regardless ...", there are nonetheless SAF resources
restricting access to them (smokescreen).

Which brings to mind another question:  I have experimentally
built and tested simple GIMZIP-style archives outside SMP/E,
using conventional utilities not SAF-controlled, such as
IEBCOPY, IEBGENER, SHA-1, ...  By doing this and eschewing
GIMZIP do I gain security by eliminating the possibility that
I might inadvertently activate the ineffable security threat?
Or, since I am performing functions equivalent to GIMZIP's,
do I incur an equivalent risk?

With great curiosity,
gil

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


  1   2   >