Re: GRS/MIM contention problem

2008-05-09 Thread Beesley, Paul
Ulrich
I agree with you - the test system was in the sysplex before we
transitioned to another outsourcer; their (our) policy is not to have
test systems in the main plex :)
I have found the problem - exit ISGNQXIT was inadvertently added to the
system causing GRS/MIM no end of confusion.

Regards 


Paul 

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Ulrich Krueger
Sent: 08 May 2008 18:21
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: GRS/MIM contention problem

Paul,
IMHO, your Test system should fully participate in your GRS star and MIM
- configuration, since you said that you are sharing all DASD (and tape
drives, I suspect). This should prevent those ENQ issues that you are
seeing. 
And I do hope, that MIM is only used for allocation control of shared
tape drives (and not also processing ENQs).
I've been running a Prod. + Test environment like this for years and had
no issues. Of course, one _must_ take care when IPLing the Test system,
to correctly connect it to the GRS and MIM-plex and to issue the proper
commands to disconnect when shutting down the Test system. Not doing
this right will make the phones ring!


Regards,
Ulrich Krueger




___

Atos Origin and Atos Consulting are trading names used by the Atos Origin 
group.  The following trading entities are registered in England and Wales:  
Atos Origin IT Services UK Limited (registered number 01245534) and Atos 
Consulting Limited (registered number 04312380).  The registered office for 
each is at 4 Triton Square, Regents Place, London, NW1 3HG.

This e-mail and the documents attached are confidential and intended solely for 
the addressee, and may contain confidential or privileged information.  If you 
receive this e-mail in error, you are not authorised to copy, disclose, use or 
retain it.  Please notify the sender immediately and delete this email from 
your systems.   As emails may be intercepted, amended or lost, they are not 
secure.  Atos Origin therefore can accept no liability for any errors or their 
content.  Although Atos Origin endeavours to maintain a virus-free network, we 
do not warrant that this transmission is virus-free and can accept no liability 
for any damages resulting from any virus transmitted.   The risks are deemed to 
be accepted by everyone who communicates with Atos Origin by email. 
___

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



Re: APAR acronym

2008-05-09 Thread Shmuel Metz (Seymour J.)
In
[EMAIL PROTECTED],
on 05/06/2008
   at 08:07 PM, Ted MacNEIL [EMAIL PROTECTED] said:

They'd rather criticise and jump rather than constructively aid in
seeking the truth. 

PKB.

I try to be accurate and helpful,

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

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



Re: IEESYSAS and ARCNXXXX address spaces.

2008-05-09 Thread Casey Rhodes
Thanks to all for the input. I will ensure everyone here knows the unique 
situation surrounding these address spaces. 

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



HIPAA auditing (was:RE: VSAM / COBOL question - redux (fwd))

2008-05-09 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of Kenneth E Tomiak
 Sent: Thursday, May 08, 2008 7:10 PM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: Re: VSAM / COBOL question - redux (fwd)
 
 My understanding of HIPAA is access to data is not denied to 
 everyone, 
 knowing who accessed it is the requirement. For 
 'confidential' data, logging 
 who accessed it even if they are AUTHORIZED is done in some 
 hospitals. Think 
 audit trail. And of course they try to limit access. But if 
 the developers have 
 access to production does it matter what file it is in, they 
 still accessed it. 
 Proper logging would then have to log everyone that accesses 
 the copies. And 
 th snowball starts rolling. Once you give access to someone, 
 it is hard to 
 control what they do with it.
 

We do log all access to this data. We produced TONS of SMF data for this
(RACF auditing). Actually, we UAUDIT every ID which has any possibility
of accessing this data (e.g. TSO, ftp, HTTP, ...)

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

The information contained in this e-mail message may be privileged
and/or confidential.  It is for intended addressee(s) only.  If you are
not the intended recipient, you are hereby notified that any disclosure,
reproduction, distribution or other use of this communication is
strictly prohibited and could, in certain circumstances, be a criminal
offense.  If you have received this e-mail in error, please notify the
sender by reply and delete this message without copying or disclosing
it.  

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



Re: 3 Page Datasets on one Volume

2008-05-09 Thread Patrick Falcone
We did this, long ago far away, at our time share NVIP, IBM 3880-11 w/3350's. 
I'm with you on this Ted, I always liked to keep this, paging environment, 
simple as possible with paging with own volume. This may be a bit of old school 
thinking but when there are problems or potential data management issues I know 
straight away what it most probably is not.  But at this point horses for 
courses, if you will...

Ted MacNEIL [EMAIL PROTECTED] wrote:   There was a time that the 
recommendation was to put paging data sets on dedicated volumes attached to 
dedicated control units. I've never seen 
anyone do that with ordinary DASD.

I did it 3330's, 3350's,  3380's from 1981 to 1989.
Dedicated DASD, control units and channels.
With 3390's, and quad pathing, we started getting away from dedicated paths and 
control units.
But, we kept dedicated packs.

I'm still biased towards the last one.
(Except for the 1-Cyl PLPA 'trick')

-
Too busy driving to stop for gas!

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



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



Linux Operator Training on z

2008-05-09 Thread Jim Marshall
We have been running z/VM with SuSe Linux for quite a while and our 
operators believe there is Linux Operator training available somewhere. Has 
anyone found some form of training whether it would be formal in a classroom, 
CDROM's, etc. I looked into all the IBM course offerings and see nothing which 
would be operator oriented as a distinct course.  

Are there any suggestions as to what kind of things might be folded together 
to give them some blended course. 

jim 

p.s. already submitted this into the z/VM HILLGANG 

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



Re: ServerPac and zFS

2008-05-09 Thread Mark Zelden
On Thu, 8 May 2008 14:51:20 -0700, Skip Robinson [EMAIL PROTECTED]
wrote:

We do run with IOEPRMxx. The two parameters below--especially the second
one--were needed in order to get a zFS to expand with additional extents.
It may be that the default values are now similar to these, but until I
added these lines, an existing zFS would not take multiple extents if it
filled up required.


aggrfull(90,5)
aggrgrow=on

.

I don't use aggrfull since all my zFS files have secondary extents and I
specify aggrgrow=on.   A lot of our HFS data sets had the equivalent parm
on their mount - FSFULL(90,5) - per the group that requested us to mount
their HFS, and I found it annoying. The messages came up at IPL time and
were ignored.   These were mostly read only product root file systems
that purposely were allocated near full as to not waste space and being
read only meant they wouldn't grow.  

I do have one additional parm.

romount_recovery=on  /* see APAR OA22351 */  

See the APAR for details why.

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

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



Re: IPCS - where to get shop specific data

2008-05-09 Thread Mark Zelden
On Thu, 8 May 2008 17:01:41 -0500, Tom Schmidt [EMAIL PROTECTED]
wrote:

On Thu, 8 May 2008 16:24:29 -0500, Todd Burch wrote:

I’m making an assumption that somewhere in a control block somewhere
(maybe
the CVT, ECVT, or SMF control blocks?), there is a site/company name (like
“ACME Inc.”) that is defined at z/OS install time.

If this assumption is correct, where could I pick up that data in an IPCS
dump?  I’ve looked in the CVT, ECVT and SMCA but haven’t found anything
yet.

(Perspective: clients send in dumps, and I would like to output the client
data with our automated IPCS analysis routines.)


There is a 16-byte field in the CVT's prefix area, at -24 decimal from the CVT
base, which was set aside by IBM decades ago for such a purpose.  The field's
name is CVTVERID.  (FLCCVT-24)-CVTVERID

Please let us all know if you ever find any non-blank data in that field
from any
client site.  (I don't expect that you will find that many sites customize that
field.  I won't be surprised if many on this list are unaware of it.)


I do know shops that use it.  The one that asked me to add the display of
it to IPLINFO (which I do if it is non-blank) zapped it as part of their
cloning process and used it to help easily identify the maintenance level
of a particular system. Roland added the display to SHOWMVS (SHOWZOS) 
also IIRC.

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

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



Re: IFAQUAA layout for IFAQUERY

2008-05-09 Thread Peter Relson
This situation is hardly unique.  You just always have to plan not to use
two of such macros in the same module.

I'm sure that we could enhance IFAQUAA to support PREFIX= which will let
you code IFAQUAA PREFIX=abc and then all the field names will have abc
before their normal names (e.g., abcQUAAH#REC).

Peter Relson
z/OS Core Technology Design

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



absurd programs that used to be everywhere ...

2008-05-09 Thread F. J. Kelley
(Sincere apologies, I already hate myself for even asking this, but ...)
Our computer center is having its 50th anniversary and digging up all kinds of 
stuff from the old days.  The 3330 disk I had has already been grabbed.   

I am the last mf support person on the academic side (we still have a robust 
administrative side that uses the mainframe), but it is thought I have all 
sorts of programs from the 70's and 80's on hand.
(well, I do still have the startrek load module, but that's something of an 
accident)

Anyway, I've been asked if I can provide banners ... sheesh ...
The kind printed on fanfold (ie greenbar) paper.
(I'd settle for giving them a snoopy calendar, though they really want the 
banners)  I remember  SAS Proc GSLIDE was often used for this kind of stuff, 
but not on an impact printer.  Anyone still have one of those programs?
thanks and apologies for burdening the list with this silliness (but now I can 
say i asked).
-- Joe Kelley
   [EMAIL PROTECTED]

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



Re: absurd programs that used to be everywhere ...

2008-05-09 Thread CICS Guy
FWIW, I think (it's on an old tape) I still have a copy of three-dimensional 
Tic-Tac-Toe written by Bob Blair for CICS..
 
-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of F. 
J. Kelley
Sent: Friday, May 09, 2008 6:21 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: absurd programs that used to be everywhere ...
 
(Sincere apologies, I already hate myself for even asking this, but ...)
Our computer center is having its 50th anniversary and digging up all kinds of 
stuff from the old days. The 3330 disk I had has already been grabbed. 
snip
_
Stay in touch when you're away with Windows Live Messenger.
http://www.windowslive.com/messenger/overview.html?ocid=TXT_TAGLM_WL_Refresh_messenger_052008
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html



Re: ServerPac and zFS

2008-05-09 Thread Steven Conway
Mark Zelden wrote:
=
I do have one additional parm.

romount_recovery=on  /* see APAR OA22351 */ 

See the APAR for details why.


Great catch, Mark.  It is now on all my systems, as well.


Cheers,,,Steve

Steve Conway
Lead Systems Programmer
Information Systems  Services Division
Computer  Network Operations
Phone:   (703) 450-3156
Fax:(703) 450-3197

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



Re: IFAQUAA layout for IFAQUERY

2008-05-09 Thread Edward Jaffe

Peter Relson wrote:

This situation is hardly unique.  You just always have to plan not to use
two of such macros in the same module.
  


I remember decades ago, there used to be an issue between JES2 JCT and 
MVS JCT. For years, we edited the macros ourselves to resolve the 
conflict. For code compiled at customer site, we used hard-coded offsets 
for the MVS JCT.


The problem was eventually resolved by an IBM field name change one of 
the macros (IIRC the JES2 JCT).



I'm sure that we could enhance IFAQUAA to support PREFIX= which will let
you code IFAQUAA PREFIX=abc and then all the field names will have abc
before their normal names (e.g., abcQUAAH#REC).
  


All mapping macros would do well to have such a capability.

--
Edward E Jaffe
Phoenix Software International, Inc
5200 W Century Blvd, Suite 800
Los Angeles, CA 90045
310-338-0400 x318
[EMAIL PROTECTED]
http://www.phoenixsoftware.com/

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



Re: ServerPac and zFS

2008-05-09 Thread Mark Zelden
On Fri, 9 May 2008 10:28:47 -0400, Steven Conway
[EMAIL PROTECTED] wrote:

Mark Zelden wrote:
=
I do have one additional parm.

romount_recovery=on  /* see APAR OA22351 */

See the APAR for details why.


Great catch, Mark.  It is now on all my systems, as well.



I caught it all right!  :-)   Thankfully it was only in a sandbox sysplex.  That
is because we share the sysres set with our read only zFS files across 
sysplex boundaries in one environment and I always IPL in the sandbox 
first for testing.  The maintenance ZFS files are mounted R/W and we clone
from there, so that is what left us exposed.   

But I think this entire problem stemmed from the fact that FDR (which I 
use for my cloning) does not quiesce a ZFS when you use HFS=QUIESCE
as I thought it would (hopefully Innovation adds this support soon) on
the copy as it does for HFS.  DFSMSdss automatically quiesces both HFS and
zFS (I talked about this a couple of months ago in a another thread).

When I ran into this problem I not only put on the PTF and enabled the 
support in the ZFS parms, I also added ZFSADM QUIESCE and UNQUIESCE
steps to my cloning JCL before and after the zFS copy step.   

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

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



Performance report help

2008-05-09 Thread Jon Brock
We have a mystery that needs to be solved, and I am having trouble
coming up with a report that would help me do it.  Here are the
particulars along with a couple of questions:

Our CPU usage had been trending upward -- as it generally does -- for
several weeks, when we finally started hitting the wall hard during
first shift.  CICS transaction times were starting to elongate, batch
jobs were taking much, much longer to run than usual, etc.  We went a
couple of weeks trying to mitigate things as much as possible, when
suddenly, for no reason that we could detect, system usage dropped one
day and we have been OK ever since.  Naturally, upon inquiring we found
that no one had done anything.

Right.

Anyway, I am trying to create a report detailing CPU usage by job for
several of our heavy hitters during the days prior to the big drop.  We
have both RMF and TMON, but I am having little luck with either of them.


For RMF, it appears that SMF type 79 records might contain what I need,
but those appear to only be cut when RMF II is turned on, and we do not
have RMF II activated on a regular basis.  

For TMON, it appears that JD (Job Delta, IIRC) records would have what
we need, but, again, they are not generated on a regular basis.

Questions:
1) Are there other SMF records that could tell me what I want to
know?
2) Are there other TMON records that could tell me?
3) For those of you running RMF, do you have RMF II sessions
running at all times?  If so, does it consume a lot of overhead?
4) For those of you running TMON, do you cut JD records as a
usual thing?  If so, how much does it add to your TMON overhead?



Thanks,
Jon

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



Re: absurd programs that used to be everywhere ...

2008-05-09 Thread Matthew Stitt
If your copy of the TTT3D game ran on CICS, was written in COBOL, and
recognized light pen, then I wrote that one.  I still have the source on 80
column  cards.  Along with Abraham Lincoln (works great with impact
printers) and the Snoopy Calendar, and the Lunar Lander game in Fortran.

On Fri, 9 May 2008 07:18:18 -0700, CICS Guy [EMAIL PROTECTED] wrote:

FWIW, I think (it's on an old tape) I still have a copy of
three-dimensional Tic-Tac-Toe written by Bob Blair for CICS..
 
-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of F. J. Kelley
Sent: Friday, May 09, 2008 6:21 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: absurd programs that used to be everywhere ...
 
(Sincere apologies, I already hate myself for even asking this, but ...)
Our computer center is having its 50th anniversary and digging up all kinds
of stuff from the old days. The 3330 disk I had has already been grabbed. 
snip

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



Re: Linux Operator Training on z

2008-05-09 Thread Mark Post
 On Fri, May 9, 2008 at  8:41 AM, in message
[EMAIL PROTECTED], Jim Marshall
[EMAIL PROTECTED] wrote: 
 We have been running z/VM with SuSe Linux for quite a while and our 
 operators believe there is Linux Operator training available somewhere. Has 
 anyone found some form of training whether it would be formal in a 
 classroom, 
 CDROM's, etc. I looked into all the IBM course offerings and see nothing 
 which 
 would be operator oriented as a distinct course.  

What sort of things are they looking to learn?  Linux systems don't typically 
have operators looking after them, just system administrators.  Have them 
look at
SUSE Linux Administration
http://www.novell.com/training/courseware/ts_proj_info.jsp?pid=12579
and 
SUSE Linux Advanced Administration
http://www.novell.com/training/courseware/ts_proj_info.jsp?pid=11794
to see if that will meet their needs.


Mark Post

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



Re: Performance report help

2008-05-09 Thread Matthew Stitt
Take a look at the type 30 records.

CBT file 529 (among others) has a program which can print a report from the
type 30 data.

On Fri, 9 May 2008 11:06:12 -0400, Jon Brock [EMAIL PROTECTED] wrote:

We have a mystery that needs to be solved, and I am having trouble
coming up with a report that would help me do it.  Here are the
particulars along with a couple of questions:

Our CPU usage had been trending upward -- as it generally does -- for
several weeks, when we finally started hitting the wall hard during
first shift.  CICS transaction times were starting to elongate, batch
jobs were taking much, much longer to run than usual, etc.  We went a
couple of weeks trying to mitigate things as much as possible, when
suddenly, for no reason that we could detect, system usage dropped one
day and we have been OK ever since.  Naturally, upon inquiring we found
that no one had done anything.

Right.

Anyway, I am trying to create a report detailing CPU usage by job for
several of our heavy hitters during the days prior to the big drop.  We
have both RMF and TMON, but I am having little luck with either of them.


For RMF, it appears that SMF type 79 records might contain what I need,
but those appear to only be cut when RMF II is turned on, and we do not
have RMF II activated on a regular basis.

For TMON, it appears that JD (Job Delta, IIRC) records would have what
we need, but, again, they are not generated on a regular basis.

Questions:
   1) Are there other SMF records that could tell me what I want to
know?
   2) Are there other TMON records that could tell me?
   3) For those of you running RMF, do you have RMF II sessions
running at all times?  If so, does it consume a lot of overhead?
   4) For those of you running TMON, do you cut JD records as a
usual thing?  If so, how much does it add to your TMON overhead?



Thanks,
Jon


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



Re: absurd programs that used to be everywhere ...

2008-05-09 Thread John P Donnelly
.got one... 

//GOTHIC   EXEC PGM=GOTHIC,PARM='X ' 
 //SYSPRINT DD SYSOUT=*   
 //*  
 //*   PARM=FOREGROUND BLANK BACKGROUND   
 //*   PARM='X ' OR PARM='. MW*'  
 //*   X CREATES WHITE BACKGROUND WITH PRINTED LETTERS.   
 //*   . MW CREATES DARK BACKGROUND WITH BLANK LETTERS.   
 //*  
 //*   DATA CARDS 
 //*   TWO BLANKS TERMINATE CARD  
 //*   DEFAULT IS LOWER CASE. USE _LETTER FOR UPPER CASE. 
 //*  
 //SYSINDD *  
 1970 _MOI 
 /*  

...provide an address and preferred method of shipping...
...executes on our z/OS V1R7, but you gotta have the printers... 


-Original Message-
From: F. J. Kelley [mailto:[EMAIL PROTECTED] 
Sent: Friday, May 09, 2008 6:21 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: absurd programs that used to be everywhere ...

(Sincere apologies, I already hate myself for even asking this, but ...)
Our computer center is having its 50th anniversary and digging up all 
kinds of stuff from the old days.  The 3330 disk I had has already 
been grabbed.   

I am the last mf support person on the academic side (we still have a 
robust administrative side that uses the mainframe), but it is thought I 
have all sorts of programs from the 70's and 80's on hand.
(well, I do still have the startrek load module, but that's something of 
an accident)

Anyway, I've been asked if I can provide banners ... sheesh ...
The kind printed on fanfold (ie greenbar) paper.
(I'd settle for giving them a snoopy calendar, though they really want 
the banners)  I remember  SAS Proc GSLIDE was often used for this kind 
of stuff, but not on an impact printer.  Anyone still have one of those 
programs?
thanks and apologies for burdening the list with this silliness (but now 
I can say i asked).
-- Joe Kelley
   [EMAIL PROTECTED]

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

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



Re: absurd programs that used to be everywhere ...

2008-05-09 Thread F. J. Kelley
unfortunately (well, actually fortunately) we don't have a card reader anymore 
or I'd ask for a copy of the snoopy pgm.  
--Joe

 Original message 
Date: Fri, 9 May 2008 10:12:00 -0500
From: Matthew Stitt [EMAIL PROTECTED]  
Subject: Re: absurd programs that used to be everywhere ...  
To: IBM-MAIN@BAMA.UA.EDU

If your copy of the TTT3D game ran on CICS, was written in COBOL, and
recognized light pen, then I wrote that one.  I still have the source on 80
column  cards.  Along with Abraham Lincoln (works great with impact
printers) and the Snoopy Calendar, and the Lunar Lander game in Fortran.

On Fri, 9 May 2008 07:18:18 -0700, CICS Guy [EMAIL PROTECTED] wrote:

FWIW, I think (it's on an old tape) I still have a copy of
three-dimensional Tic-Tac-Toe written by Bob Blair for CICS..
 
-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of F. J. Kelley
Sent: Friday, May 09, 2008 6:21 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: absurd programs that used to be everywhere ...
 
(Sincere apologies, I already hate myself for even asking this, but ...)
Our computer center is having its 50th anniversary and digging up all kinds
of stuff from the old days. The 3330 disk I had has already been grabbed. 
snip

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


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



Re: Performance report help

2008-05-09 Thread Kelman, Tom
When I've had to determine what job(s) have caused a large CPU increase
over an interval I've used the SMF type 30 interval records.  If you
have Barry Merrill's MXG the information from them is in the SMFINTRV
dataset.  By using them you can limit the analysis to a short interval
rather than over the full time of the job.  Of course if you talking
about several days of data it would be a lot of information. 

Tom Kelman
Commerce Bank of Kansas City
(816) 760-7632
 -Original Message-
 From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
 Behalf Of Jon Brock
 Sent: Friday, May 09, 2008 10:06 AM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: Performance report help
 
 We have a mystery that needs to be solved, and I am having trouble
 coming up with a report that would help me do it.  Here are the
 particulars along with a couple of questions:
 
 Our CPU usage had been trending upward -- as it generally does -- for
 several weeks, when we finally started hitting the wall hard during
 first shift.  CICS transaction times were starting to elongate, batch
 jobs were taking much, much longer to run than usual, etc.  We went a
 couple of weeks trying to mitigate things as much as possible, when
 suddenly, for no reason that we could detect, system usage dropped one
 day and we have been OK ever since.  Naturally, upon inquiring we
found
 that no one had done anything.
 
 Right.
 
 Anyway, I am trying to create a report detailing CPU usage by job for
 several of our heavy hitters during the days prior to the big drop.
We
 have both RMF and TMON, but I am having little luck with either of
them.
 
 
 For RMF, it appears that SMF type 79 records might contain what I
need,
 but those appear to only be cut when RMF II is turned on, and we do
not
 have RMF II activated on a regular basis.
 
 For TMON, it appears that JD (Job Delta, IIRC) records would have what
 we need, but, again, they are not generated on a regular basis.
 
 Questions:
   1) Are there other SMF records that could tell me what I want to
 know?
   2) Are there other TMON records that could tell me?
   3) For those of you running RMF, do you have RMF II sessions
 running at all times?  If so, does it consume a lot of overhead?
   4) For those of you running TMON, do you cut JD records as a
 usual thing?  If so, how much does it add to your TMON overhead?
 
 
 
 Thanks,
 Jon
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html
 




*
If you wish to communicate securely with Commerce Bank and its
affiliates, you must log into your account under Online Services at 
http://www.commercebank.com or use the Commerce Bank Secure
Email Message Center at https://securemail.commercebank.com

NOTICE: This electronic mail message and any attached files are
confidential. The information is exclusively for the use of the
individual or entity intended as the recipient. If you are not
the intended recipient, any use, copying, printing, reviewing,
retention, disclosure, distribution or forwarding of the message
or any attached file is not authorized and is strictly prohibited.
If you have received this electronic mail message in error, please
advise the sender by reply electronic mail immediately and
permanently delete the original transmission, any attachments
and any copies of this message from your computer system.
*

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



Re: absurd programs that used to be everywhere ...

2008-05-09 Thread CICS Guy
IIRC, Algol(?) and no light pens anywhere...And, dang it, it usually 
wongrumble...
 
-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of 
Matthew Stitt
Sent: Friday, May 09, 2008 8:12 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: absurd programs that used to be everywhere ...
 
If your copy of the TTT3D game ran on CICS, was written in COBOL, and 
recognized light pen, then I wrote that one. I still have the source on 80 
column cards. Along with Abraham Lincoln (works great with impact
printers) and the Snoopy Calendar, and the Lunar Lander game in Fortran.
_
With Windows Live for mobile, your contacts travel with you.
http://www.windowslive.com/mobile/overview.html?ocid=TXT_TAGLM_WL_Refresh_mobile_052008
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html



Re: absurd programs that used to be everywhere ...

2008-05-09 Thread F. J. Kelley
nope, no such pgm found.  
--Joe

 Original message 
Date: Fri, 9 May 2008 15:17:00 +
From: John P Donnelly [EMAIL PROTECTED]  
Subject: Re: absurd programs that used to be everywhere ...  
To: IBM-MAIN@BAMA.UA.EDU

.got one... 

//GOTHIC   EXEC PGM=GOTHIC,PARM='X ' 
 //SYSPRINT DD SYSOUT=*   
 //*  
 //*   PARM=FOREGROUND BLANK BACKGROUND   
 //*   PARM='X ' OR PARM='. MW*'  
 //*   X CREATES WHITE BACKGROUND WITH PRINTED LETTERS.   
 //*   . MW CREATES DARK BACKGROUND WITH BLANK LETTERS.   
 //*  
 //*   DATA CARDS 
 //*   TWO BLANKS TERMINATE CARD  
 //*   DEFAULT IS LOWER CASE. USE _LETTER FOR UPPER CASE. 
 //*  
 //SYSINDD *  
 1970 _MOI 
 /*  

...provide an address and preferred method of shipping...
...executes on our z/OS V1R7, but you gotta have the printers... 


-Original Message-
From: F. J. Kelley [mailto:[EMAIL PROTECTED] 
Sent: Friday, May 09, 2008 6:21 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: absurd programs that used to be everywhere ...

(Sincere apologies, I already hate myself for even asking this, but ...)
Our computer center is having its 50th anniversary and digging up all 
kinds of stuff from the old days.  The 3330 disk I had has already 
been grabbed.   

I am the last mf support person on the academic side (we still have a 
robust administrative side that uses the mainframe), but it is thought I 
have all sorts of programs from the 70's and 80's on hand.
(well, I do still have the startrek load module, but that's something of 
an accident)

Anyway, I've been asked if I can provide banners ... sheesh ...
The kind printed on fanfold (ie greenbar) paper.
(I'd settle for giving them a snoopy calendar, though they really want 
the banners)  I remember  SAS Proc GSLIDE was often used for this kind 
of stuff, but not on an impact printer.  Anyone still have one of those 
programs?
thanks and apologies for burdening the list with this silliness (but now 
I can say i asked).
-- Joe Kelley
   [EMAIL PROTECTED]

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

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


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



Re: absurd programs that used to be everywhere ...

2008-05-09 Thread Steve Comstock

F. J. Kelley wrote:
unfortunately (well, actually fortunately) we don't have a card reader anymore or I'd ask for a copy of the snoopy pgm.  
--Joe


Cut and paste? Attachement? Embed in email?


Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

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

  z/OS Application development made easier
* Our classes include
   + How things work
   + Programming examples with realistic applications
   + Starter / skeleton code
   + Complete working programs
   + Useful utilities and subroutines
   + Tips and techniques

== Check out the Trainer's Friend Store to purchase z/OS  ==
== application developer toolkits. Sample code in four==
== programming languages, JCL to Assemble or compile, ==
== bind and test. ==
==   http://www.trainersfriend.com/TTFStore/index.html==



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



Re: absurd programs that used to be everywhere ...

2008-05-09 Thread John P Donnelly
.what was meant is will ship to you...

-Original Message-
From: F. J. Kelley [mailto:[EMAIL PROTECTED] 
Sent: Friday, May 09, 2008 8:29 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: absurd programs that used to be everywhere ...

nope, no such pgm found.  
--Joe

 Original message 
Date: Fri, 9 May 2008 15:17:00 +
From: John P Donnelly [EMAIL PROTECTED]  
Subject: Re: absurd programs that used to be everywhere ...  
To: IBM-MAIN@BAMA.UA.EDU

.got one... 

//GOTHIC   EXEC PGM=GOTHIC,PARM='X ' 
 //SYSPRINT DD SYSOUT=*   
 //*  
 //*   PARM=FOREGROUND BLANK BACKGROUND   
 //*   PARM='X ' OR PARM='. MW*'  
 //*   X CREATES WHITE BACKGROUND WITH PRINTED LETTERS.   
 //*   . MW CREATES DARK BACKGROUND WITH BLANK LETTERS.   
 //*  
 //*   DATA CARDS 
 //*   TWO BLANKS TERMINATE CARD  
 //*   DEFAULT IS LOWER CASE. USE _LETTER FOR UPPER CASE. 
 //*  
 //SYSINDD *  
 1970 _MOI 
 /*  

...provide an address and preferred method of shipping...
...executes on our z/OS V1R7, but you gotta have the printers...
 


-Original Message-
From: F. J. Kelley [mailto:[EMAIL PROTECTED] 
Sent: Friday, May 09, 2008 6:21 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: absurd programs that used to be everywhere ...

(Sincere apologies, I already hate myself for even asking this, but 
...)
Our computer center is having its 50th anniversary and digging up all 
kinds of stuff from the old days.  The 3330 disk I had has already 
been grabbed.   

I am the last mf support person on the academic side (we still have a 
robust administrative side that uses the mainframe), but it is thought 
I 
have all sorts of programs from the 70's and 80's on hand.
(well, I do still have the startrek load module, but that's something 
of 
an accident)

Anyway, I've been asked if I can provide banners ... sheesh ...
The kind printed on fanfold (ie greenbar) paper.
(I'd settle for giving them a snoopy calendar, though they really want 
the banners)  I remember  SAS Proc GSLIDE was often used for this kind 
of stuff, but not on an impact printer.  Anyone still have one of those 

programs?
thanks and apologies for burdening the list with this silliness (but 
now 
I can say i asked).
-- Joe Kelley
   [EMAIL PROTECTED]

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

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


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

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



Re: absurd programs that used to be everywhere ...

2008-05-09 Thread F. J. Kelley
well, I thought they were actually stored in a deck (I have friends with boxes 
of cards).  heck, if the code is machine-readable form, then maybe i can get 
out of this banner stuff by giving them a snoopy calendar.

 Original message 
Date: Fri, 9 May 2008 09:28:11 -0600
From: Steve Comstock [EMAIL PROTECTED]  
Subject: Re: absurd programs that used to be everywhere ...  
To: IBM-MAIN@BAMA.UA.EDU

F. J. Kelley wrote:
 unfortunately (well, actually fortunately) we don't have a card reader 
 anymore or I'd ask for a copy of the snoopy pgm.  
 --Joe

Cut and paste? Attachement? Embed in email?


Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

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

   z/OS Application development made easier
 * Our classes include
+ How things work
+ Programming examples with realistic applications
+ Starter / skeleton code
+ Complete working programs
+ Useful utilities and subroutines
+ Tips and techniques

== Check out the Trainer's Friend Store to purchase z/OS  ==
== application developer toolkits. Sample code in four==
== programming languages, JCL to Assemble or compile, ==
== bind and test. ==
==   http://www.trainersfriend.com/TTFStore/index.html==



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


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



Re: absurd programs that used to be everywhere ...

2008-05-09 Thread F. J. Kelley
yes, thanks!!

 Original message 
Date: Fri, 9 May 2008 15:32:45 +
From: John P Donnelly [EMAIL PROTECTED]  
Subject: Re: absurd programs that used to be everywhere ...  
To: IBM-MAIN@BAMA.UA.EDU

.what was meant is will ship to you...

-Original Message-
From: F. J. Kelley [mailto:[EMAIL PROTECTED] 
Sent: Friday, May 09, 2008 8:29 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: absurd programs that used to be everywhere ...

nope, no such pgm found.  
--Joe

 Original message 
Date: Fri, 9 May 2008 15:17:00 +
From: John P Donnelly [EMAIL PROTECTED]  
Subject: Re: absurd programs that used to be everywhere ...  
To: IBM-MAIN@BAMA.UA.EDU

.got one... 

//GOTHIC   EXEC PGM=GOTHIC,PARM='X ' 
 //SYSPRINT DD SYSOUT=*   
 //*  
 //*   PARM=FOREGROUND BLANK BACKGROUND   
 //*   PARM='X ' OR PARM='. MW*'  
 //*   X CREATES WHITE BACKGROUND WITH PRINTED LETTERS.   
 //*   . MW CREATES DARK BACKGROUND WITH BLANK LETTERS.   
 //*  
 //*   DATA CARDS 
 //*   TWO BLANKS TERMINATE CARD  
 //*   DEFAULT IS LOWER CASE. USE _LETTER FOR UPPER CASE. 
 //*  
 //SYSINDD *  
 1970 _MOI 
 /*  

...provide an address and preferred method of shipping...
...executes on our z/OS V1R7, but you gotta have the printers...
 


-Original Message-
From: F. J. Kelley [mailto:[EMAIL PROTECTED] 
Sent: Friday, May 09, 2008 6:21 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: absurd programs that used to be everywhere ...

(Sincere apologies, I already hate myself for even asking this, but 
...)
Our computer center is having its 50th anniversary and digging up all 
kinds of stuff from the old days.  The 3330 disk I had has already 
been grabbed.   

I am the last mf support person on the academic side (we still have a 
robust administrative side that uses the mainframe), but it is thought 
I 
have all sorts of programs from the 70's and 80's on hand.
(well, I do still have the startrek load module, but that's something 
of 
an accident)

Anyway, I've been asked if I can provide banners ... sheesh ...
The kind printed on fanfold (ie greenbar) paper.
(I'd settle for giving them a snoopy calendar, though they really want 
the banners)  I remember  SAS Proc GSLIDE was often used for this kind 
of stuff, but not on an impact printer.  Anyone still have one of those 

programs?
thanks and apologies for burdening the list with this silliness (but 
now 
I can say i asked).
-- Joe Kelley
   [EMAIL PROTECTED]

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

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


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

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


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



Z10 and ICSF

2008-05-09 Thread Magen Margalit
Hi List

Yestarday night we did a CPC migration from Z9 to Z10.
After we IPLed on the new CPC we had a problem
with the ICSF proc - CSFSTART (abend 0C4-4).

After a while we have managed to start the proc
after adding parameter: Domain(1) into the csfparms member.
but we can't understand why...

The same procedure (without the parm) worked ok on the Z9 system.
We know that this parameter has a relation to the 
LPAR crypto domain index under the activation profile 
but can't fully understand what the relations are...

Does anybody know?

Thanks 
Magen  

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



Re: absurd programs that used to be everywhere ...

2008-05-09 Thread Tom Marchant
On Fri, 9 May 2008 09:28:11 -0600, Steve Comstock wrote:

F. J. Kelley wrote:
 unfortunately (well, actually fortunately) we don't have a card reader 
anymore or I'd ask for a copy of the snoopy pgm.

Cut and paste? Attachement? Embed in email?

Oh, sure.  Scan (or photograph) the cards, import the images into a PDF file 
and email it...

Then some poor sucker can write a program to process the images and 
recreate the data, kind of like OCR.

-- 
Tom Marchant

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



Re: Z10 and ICSF

2008-05-09 Thread Mark Jacobs
Magen Margalit wrote:
 Hi List

 Yestarday night we did a CPC migration from Z9 to Z10.
 After we IPLed on the new CPC we had a problem
 with the ICSF proc - CSFSTART (abend 0C4-4).

 After a while we have managed to start the proc
 after adding parameter: Domain(1) into the csfparms member.
 but we can't understand why...

 The same procedure (without the parm) worked ok on the Z9 system.
 We know that this parameter has a relation to the 
 LPAR crypto domain index under the activation profile 
 but can't fully understand what the relations are...

 Does anybody know?

 Thanks 
 Magen  

   

It sounds like the lpar definition for the crypto resources specifies
more than one cryptographic domain. That is valid, but if you do specify
more than one domain the icsf parmlib member must specify which one to use.

I would have expected ICSF to give an error message and not take an
abend however.
 

-- 
Mark Jacobs
Time Customer Service
Tampa, FL


Progress doesn't come from early risers - progress is made 
by lazy men looking for easier ways to do things.

Robert A. Heinlein - Time Enought for Love(1973)

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



Re: Performance report help

2008-05-09 Thread Jack Kelly
snip
 I am trying to create a report detailing CPU usage by job for
 several of our heavy hitters during the days prior to the big drop.
snip
If you don't have MXG or SAS, you can get some rough SMF 4,5,30 info from 
Mr. Yaeger's do anything to anything ICEMAN, eg 
http://bama.ua.edu/cgi-bin/wa?A2=ind0507L=ibm-mainP=R15258I=1X=4FA88C76F3FC5F13F7
 
  (LIST archive)


Jack Kelly
202-502-2390 (Office)

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



Re: absurd programs that used to be everywhere ...

2008-05-09 Thread John P Donnelly
ok, now ...provide an address and preferred method of 
shipping...FTP? 

-Original Message-
From: F. J. Kelley [mailto:[EMAIL PROTECTED] 
Sent: Friday, May 09, 2008 8:35 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: absurd programs that used to be everywhere ...

yes, thanks!!

 Original message 
Date: Fri, 9 May 2008 15:32:45 +
From: John P Donnelly [EMAIL PROTECTED]  
Subject: Re: absurd programs that used to be everywhere ...  
To: IBM-MAIN@BAMA.UA.EDU

.what was meant is will ship to you...

-Original Message-
From: F. J. Kelley [mailto:[EMAIL PROTECTED] 
Sent: Friday, May 09, 2008 8:29 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: absurd programs that used to be everywhere ...

nope, no such pgm found.  
--Joe

 Original message 
Date: Fri, 9 May 2008 15:17:00 +
From: John P Donnelly [EMAIL PROTECTED]  
Subject: Re: absurd programs that used to be everywhere ...  
To: IBM-MAIN@BAMA.UA.EDU

.got one... 

//GOTHIC   EXEC PGM=GOTHIC,PARM='X ' 
 //SYSPRINT DD SYSOUT=*   
 //*  
 //*   PARM=FOREGROUND BLANK BACKGROUND   
 //*   PARM='X ' OR PARM='. MW*'  
 //*   X CREATES WHITE BACKGROUND WITH PRINTED LETTERS.   
 //*   . MW CREATES DARK BACKGROUND WITH BLANK LETTERS.   
 //*  
 //*   DATA CARDS 
 //*   TWO BLANKS TERMINATE CARD  
 //*   DEFAULT IS LOWER CASE. USE _LETTER FOR UPPER CASE. 
 //*  
 //SYSINDD *  
 1970 _MOI 
 /*  

...provide an address and preferred method of shipping...
...executes on our z/OS V1R7, but you gotta have the printers...   
 
 


-Original Message-
From: F. J. Kelley [mailto:[EMAIL PROTECTED] 
Sent: Friday, May 09, 2008 6:21 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: absurd programs that used to be everywhere ...

(Sincere apologies, I already hate myself for even asking this, but 
...)
Our computer center is having its 50th anniversary and digging up all 
kinds of stuff from the old days.  The 3330 disk I had has already 
been grabbed.   

I am the last mf support person on the academic side (we still have a 
robust administrative side that uses the mainframe), but it is thought 

I 
have all sorts of programs from the 70's and 80's on hand.
(well, I do still have the startrek load module, but that's something 
of 
an accident)

Anyway, I've been asked if I can provide banners ... sheesh ...
The kind printed on fanfold (ie greenbar) paper.
(I'd settle for giving them a snoopy calendar, though they really want 

the banners)  I remember  SAS Proc GSLIDE was often used for this kind 

of stuff, but not on an impact printer.  Anyone still have one of 
those 

programs?
thanks and apologies for burdening the list with this silliness (but 
now 
I can say i asked).
-- Joe Kelley
   [EMAIL PROTECTED]

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

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


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

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


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

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



Re: Performance report help

2008-05-09 Thread Rick Fochtman

--snip---
We have a mystery that needs to be solved, and I am having trouble 
coming up with a report that would help me do it. Here are the 
particulars along with a couple of questions:


Our CPU usage had been trending upward -- as it generally does -- for 
several weeks, when we finally started hitting the wall hard during 
first shift. CICS transaction times were starting to elongate, batch 
jobs were taking much, much longer to run than usual, etc. We went a 
couple of weeks trying to mitigate things as much as possible, when 
suddenly, for no reason that we could detect, system usage dropped one 
day and we have been OK ever since. Naturally, upon inquiring we found 
that no one had done anything.


Right.

Anyway, I am trying to create a report detailing CPU usage by job for 
several of our heavy hitters during the days prior to the big drop. We 
have both RMF and TMON, but I am having little luck with either of them.


For RMF, it appears that SMF type 79 records might contain what I need, 
but those appear to only be cut when RMF II is turned on, and we do not 
have RMF II activated on a regular basis.


For TMON, it appears that JD (Job Delta, IIRC) records would have what 
we need, but, again, they are not generated on a regular basis.


Questions:
   1) Are there other SMF records that could tell me what I want to know?
   2) Are there other TMON records that could tell me?
   3) For those of you running RMF, do you have RMF II sessions running 
at all times? If so, does it consume a lot of overhead?
   4) For those of you running TMON, do you cut JD records as a usual 
thing? If so, how much does it add to your TMON overhead?

unsnip--
You really need to look at the SMF-30 records, at a job-step level. 
IIRC, Berry Merrill's package can help you in the analysis. I'll look 
around to see if I have anything that might be helpful and forward it to 
you off-list. You might need a pl/1 compiler (IEL00AA).


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



Re: absurd programs that used to be everywhere ...

2008-05-09 Thread Ed Finnell
 
In a message dated 5/9/2008 10:30:36 A.M. Central Daylight Time,  
[EMAIL PROTECTED] writes:

nope, no such pgm found.  



Down at the bottom, a valid shipping address  is requested???







**Wondering what's for Dinner Tonight? Get new twists on family 
favorites at AOL Food.  
(http://food.aol.com/dinner-tonight?NCID=aolfod000301)

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



Re: Performance report help

2008-05-09 Thread Pinnacle
- Original Message - 
From: Jon Brock [EMAIL PROTECTED]

Newsgroups: bit.listserv.ibm-main
Sent: Friday, May 09, 2008 11:08 AM
Subject: Performance report help



We have a mystery that needs to be solved, and I am having trouble
coming up with a report that would help me do it.  Here are the
particulars along with a couple of questions:

Our CPU usage had been trending upward -- as it generally does -- for
several weeks, when we finally started hitting the wall hard during
first shift.  CICS transaction times were starting to elongate, batch
jobs were taking much, much longer to run than usual, etc.  We went a
couple of weeks trying to mitigate things as much as possible, when
suddenly, for no reason that we could detect, system usage dropped one
day and we have been OK ever since.  Naturally, upon inquiring we found
that no one had done anything.

Right.

Anyway, I am trying to create a report detailing CPU usage by job for
several of our heavy hitters during the days prior to the big drop.  We
have both RMF and TMON, but I am having little luck with either of them.


For RMF, it appears that SMF type 79 records might contain what I need,
but those appear to only be cut when RMF II is turned on, and we do not
have RMF II activated on a regular basis.

For TMON, it appears that JD (Job Delta, IIRC) records would have what
we need, but, again, they are not generated on a regular basis.

Questions:
1) Are there other SMF records that could tell me what I want to
know?
2) Are there other TMON records that could tell me?
3) For those of you running RMF, do you have RMF II sessions
running at all times?  If so, does it consume a lot of overhead?
4) For those of you running TMON, do you cut JD records as a
usual thing?  If so, how much does it add to your TMON overhead?



Jon,

FWIW, I always run RMFMON II.  The overhead is minimal compared to when I 
use it, which is often.


YMMV,
Tom Conley 


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



Re: Xephon, are they still in business? NOT ANYMORE!!!

2008-05-09 Thread Mark T. Regan, K8MTR
FYI, with Bob's permission, here's the e-mail I received from him about Xephon. 
Bob also responded to a suggestion I had made about making all of the past 
issues available on their web site, Your suggestion is excellent and we are 
starting to prepare the website today so that all Updates published will be 
available at no cost to anyone who is interested as of Monday, May 17.
===
Date: Wed, 7 May 2008 17:16:05 -0500
From: Bob Thomas [EMAIL PROTECTED]
Subject: RE: XephonMark:I apologize for not responding to you sooner regarding 
your inquiry about the status of Xephon but we have been agonizing for some 
time about what to do with it. Very soon after we launched z/Journal little 
over five years ago, I was approached by the head of Xephon, Chris Bunyan. He 
wanted to retire after running Xephon for more than 25 years and after a period 
of discussion we agreed to take over Xephon and we set it up as a separate 
corporation and continued its operation, knowing full well that the subscriber 
base for the Xephon Update newsletters had been in a steady decline for several 
years. With the continued growth of the Internet and powerful search 
capabilities, the need for a technical newsletter series such as the Xephon 
Updates became less necessary and subscriptions continued to freefall. Xephon 
has been operating at a loss for more than two years. We attempted to turn 
things around by offering the Xephon Update
 newsletters in digital form to eliminate the heavy costs of printing and 
postage. That move did reduce costs significantly -- but the number of paid 
subscriptions continued to deteriorate.In a nutshell, we have made the decision 
that we (TCI) cannot afford to continue to prop up Xephon; so therefore Xephon 
has been discontinued.I will appreciate your understanding of this 
situation.Sincerely,
Bob Thomas__Bob Thomas | TCI 
Publications | [EMAIL PROTECTED] LBJ Freeway, Suite 800 | Dallas, TX 75243 | 
214-340-2147

 Mark T. Regan, K8MTR
CTO1 USNR-Retired (1969-1991)



- Original Message 
From: Mark T. Regan, K8MTR [EMAIL PROTECTED]
To: IBM-MAIN@BAMA.UA.EDU
Sent: Thursday, May 8, 2008 7:49:13 AM
Subject: Fw: Xephon, are they still in business?

To follow-up on my attempts to contact someone at Xephon, I finally got a 
response back from someone at TCI. According to them, the decision has been 
made to discontinue all of the Xephon publications. 
Thanks.

Mark T. Regan, K8MTR
CTO1 USNR-Retired (1969-1991)



- Forwarded Message 
From: Mark T. Regan, K8MTR [EMAIL PROTECTED]
To: IBM-MAIN Mailinglist ibm-main@BAMA.UA.EDU
Sent: Monday, April 14, 2008 9:17:31 AM
Subject: Xephon, are they still in business?

Is Xephon still in business? I'm subscribed to their TCP/SNA quarterly, but I 
have not received the March 2008 issue yet. It's not posted to their web site 
either and so far I have not had any response from them when I asked about it 
via their contact page.
 
Thanks

Mark T. Regan, K8MTR
CTO1 USNR-Retired (1969-1991)


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



Re: Xephon, are they still in business? NOT ANYMORE!!!

2008-05-09 Thread Daniel McLaughlin
Sorry to hear about Xephon as I sent them some PROFS and VM programs years 
ago.

Any chance some of the archived stuff could be put in a DB or on a CBT 
somewhere?

Daniel McLaughlin
Z-Series Systems Programmer
Information  Communications Technology
Crawford  Company
4680 N. Royal Atlanta
Tucker GA 30084 
phone: 770-621-3256 
fax: 770-621-3237
email: [EMAIL PROTECTED]
web: www.crawfordandcompany.com 




Best Overall Third-Party Claims Administrator - 2007 Business Insurance 
Readers Choice Awards
 
Consider the environment before printing this message.

This transmission is intended exclusively for the individual or entity to which 
it is addressed. This communication may contain information that is 
confidential, proprietary, privileged or otherwise exempt from disclosure. If 
you are not the named addressee, you are NOT authorized to read, print, retain, 
copy or disseminate this communication, its attachments or any part of them. If 
you have received this communication in error, please notify the sender 
immediately and delete this communication from all computers.  This 
communication does not form any contractual obligation on behalf of the sender, 
the sender's employer, or the employer's parent company, affiliates or 
subsidiaries.

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



Re: absurd programs that used to be everywhere ...

2008-05-09 Thread HUTCHISON Gregory
This makes box letters out of a text string of up to 6 words but width
of box letter is just 1 letter.
I tweaked it a little, Frank was the mastermind.

/* REXX  */ 
/*~~~*/ 
/*   */ 
/*   */ 
/* Name:NAME OF REXX */ 
/* Type:TSO  exec*/ 
/* Author:  Frank Clarke, Oldsmar, FL.   */ 
/* Requires:-*/ 
/* Description:  */ 
/*   */ 
/* Invocation :  TSO BLOX 'what you want in box letters' */

/* trace Ir  */ 
/*~~~*/ 

   arg p1 p2 p3 p4 p5 p6 p7 p8  

   instr = p1 p2 p3 p4 p5 p6 p7 p8  
   Signal On Failure
   Signal On Syntax 
   Signal On Novalue
   Signal On Error  
   Signal On Halt   

   Call Main_Routine

/*~~~*/ 
/*  Normal Finish*/ 
/*~~~*/ 
   Signal Off Failure   
   Signal Off Syntax
   Signal Off Novalue   
   Signal Off Error 
   Signal Off Halt  

 DELSTACK 
Exit RC 

/*~~~*/ 
/*  Error handling   */ 
/*~~~*/ 
 Failure:  Say Command failed on line  Sigl; Call Cleanup; Exit(12);  
 Syntax:   Say Syntax error on lineSigl; Call Cleanup; Exit(12);  
 Novalue:  Say Novalue used on lineSigl; Call Cleanup; Exit(12);  
 Error:Say Command error on line   Sigl; Call Cleanup; Exit(12);  
 Halt: Say User terminated on line Sigl; Call Cleanup; Exit(12);  
 Cleanup: 
   Say '*** 'SYSVAR('SYSICMD')' failed'

 Return
   
/*~~~*/
/* Driver*/
/*~~~*/
 Main_Routine: 
   
If instr='' then Do
  Say 'enter TSO BLOX then up to 6 words(character strings) to box'
  End  
   
DSN   = USERID().SYSVAR('SYSICMD').FORMAT  
SC = LISTDSI('DSN')
If SC = 0  Then
  DELETE 'DSN' 
   Address TSO ALLOC F(BLOXDD) DA('DSN')
NEW CATALOG UNIT(3390) 
RECFM(F B) LRECL(480) BLKSIZE(24000)  
/* ALLOC FI(BLOXDD) DA(*) SHR REU to the terminal */ 
/* FREE FILE(BLOXDD)  */ 
If rc  0 then do  
   say Allocation failed for 

Re: absurd programs that used to be everywhere ...

2008-05-09 Thread Arthur T.
On 9 May 2008 06:21:05 -0700, in bit.listserv.ibm-main 
(Message-ID:[EMAIL PROTECTED]) 
[EMAIL PROTECTED] (F. J. Kelley) wrote:


Anyway, I've been asked if I can provide banners ... 
sheesh ...

The kind printed on fanfold (ie greenbar) paper.


 Have you considered the CBT tape?  File 88 contains 
program poster.  I found a few other possible programs 
mentioned in CBT file 1.


File88: http://www.cbttape.org/ftp/cbt/CBT088.zip


--
I cannot receive mail at the address this was sent from.
To reply directly, send to ar23hur at intergate dot com

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



Re: Xephon, are they still in business? NOT ANYMORE!!!

2008-05-09 Thread Jim Harrison

That's cool, but I'm sorry to see them go.

Mark T. Regan, K8MTR wrote the following on 5/9/2008 12:18 PM:

FYI, with Bob's permission, here's the e-mail I received from him about Xephon. Bob 
also responded to a suggestion I had made about making all of the past issues 
available on their web site, Your suggestion is excellent and we are starting 
to prepare the website today so that all Updates published will be available at no 
cost to anyone who is interested as of Monday, May 17.
===
Date: Wed, 7 May 2008 17:16:05 -0500
From: Bob Thomas [EMAIL PROTECTED]
Subject: RE: XephonMark:I apologize for not responding to you sooner regarding 
your inquiry about the status of Xephon but we have been agonizing for some 
time about what to do with it. Very soon after we launched z/Journal little 
over five years ago, I was approached by the head of Xephon, Chris Bunyan. He 
wanted to retire after running Xephon for more than 25 years and after a period 
of discussion we agreed to take over Xephon and we set it up as a separate 
corporation and continued its operation, knowing full well that the subscriber 
base for the Xephon Update newsletters had been in a steady decline for several 
years. With the continued growth of the Internet and powerful search 
capabilities, the need for a technical newsletter series such as the Xephon 
Updates became less necessary and subscriptions continued to freefall. Xephon 
has been operating at a loss for more than two years. We attempted to turn 
things around by offering the Xephon Update
 newsletters in digital form to eliminate the heavy costs of printing and 
postage. That move did reduce costs significantly -- but the number of paid 
subscriptions continued to deteriorate.In a nutshell, we have made the decision 
that we (TCI) cannot afford to continue to prop up Xephon; so therefore Xephon 
has been discontinued.I will appreciate your understanding of this 
situation.Sincerely,
Bob Thomas__Bob Thomas | TCI 
Publications | [EMAIL PROTECTED] LBJ Freeway, Suite 800 | Dallas, TX 75243 | 
214-340-2147

 Mark T. Regan, K8MTR
CTO1 USNR-Retired (1969-1991)



- Original Message 
From: Mark T. Regan, K8MTR [EMAIL PROTECTED]
To: IBM-MAIN@BAMA.UA.EDU
Sent: Thursday, May 8, 2008 7:49:13 AM
Subject: Fw: Xephon, are they still in business?

To follow-up on my attempts to contact someone at Xephon, I finally got a response back from someone at TCI. According to them, the decision has been made to discontinue all of the Xephon publications. 
Thanks.


Mark T. Regan, K8MTR
CTO1 USNR-Retired (1969-1991)



- Forwarded Message 
From: Mark T. Regan, K8MTR [EMAIL PROTECTED]
To: IBM-MAIN Mailinglist ibm-main@BAMA.UA.EDU
Sent: Monday, April 14, 2008 9:17:31 AM
Subject: Xephon, are they still in business?

Is Xephon still in business? I'm subscribed to their TCP/SNA quarterly, but I 
have not received the March 2008 issue yet. It's not posted to their web site 
either and so far I have not had any response from them when I asked about it 
via their contact page.
 
Thanks


Mark T. Regan, K8MTR
CTO1 USNR-Retired (1969-1991)


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



  


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



Re: 3 Page Datasets on one Volume

2008-05-09 Thread Ted MacNEIL
Ted, I always liked to keep this, paging environment, simple as possible with 
paging with own volume. This may be a bit of old school thinking but when 
there are problems or potential data management issues I know straight away 
what it most probably is not.

I agree, obviously.
But, some people want to put multiple data-types on page packs.
I'm not one of them.
We are going to start paging, again, sometime in the future.
And, with the reduction in mainframe staff  skills, why invite problems down 
the line?


-
Too busy driving to stop for gas!

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



Re: Performance report help

2008-05-09 Thread Ted MacNEIL
Questions:
   1) Are there other SMF records that could tell me what I want to know?

Yes.
Job/Step Accounting -- SMF Type 30.
If you have/had interval accounting turned on.


-
Too busy driving to stop for gas!

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



HFS file compression

2008-05-09 Thread Mike Myers
Hi:
 
Is there something that one needs to do to reclaim space in an HFS file in 
z/OS? I have deleted several files and subdirectories, yet when I attempt to 
add a new directory, I get error 85x, and a message that indicates there is no 
space left on the device.
 
I would have thought an HFS file wouldn't behave like a PDS, but more like a 
UNIX device.
 
Any ideas?
 
Mike Myers
Pitt County Memorial Hospital

--
The contents of this e-mail (and any attachments) are confidential, may be 
privileged and may contain copyright material. You may only reproduce or 
distribute material if you are expressly authorized by us to do so. If you are 
not the intended recipient, any use, disclosure or copying of this email (and 
any attachments) is unauthorized. If you have received this e-mail in error, 
please notify the sender and immediately delete this e-mail and any copies of 
it from your system.
==

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



Re: HFS file compression

2008-05-09 Thread Veilleux, Jon L
There could be someone who has the file open even though you have
deleted it. I have run into this in the past. We had a WebSphere region
that filled up an HFS. I deleted the file that was consuming the space,
but it didn't get released until the WebSphere region came down. This is
a security 'feature' of UNIX. 


Jon L. Veilleux 
[EMAIL PROTECTED] 
(860) 636-2683 


-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Mike Myers
Sent: Friday, May 09, 2008 1:59 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: HFS file compression

Hi:
 
Is there something that one needs to do to reclaim space in an HFS file
in z/OS? I have deleted several files and subdirectories, yet when I
attempt to add a new directory, I get error 85x, and a message that
indicates there is no space left on the device.
 
I would have thought an HFS file wouldn't behave like a PDS, but more
like a UNIX device.
 
Any ideas?
 
Mike Myers
Pitt County Memorial Hospital


--
The contents of this e-mail (and any attachments) are confidential, may
be privileged and may contain copyright material. You may only reproduce
or distribute material if you are expressly authorized by us to do so.
If you are not the intended recipient, any use, disclosure or copying of
this email (and any attachments) is unauthorized. If you have received
this e-mail in error, please notify the sender and immediately delete
this e-mail and any copies of it from your system.

==

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

This e-mail may contain confidential or privileged information. If
you think you have received this e-mail in error, please advise the
sender by reply e-mail and then delete this e-mail immediately.
Thank you. Aetna   

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



Re: ServerPac and zFS

2008-05-09 Thread John Mattson
Jumping from OS390 2.10 to zOS 1.08.   I have a sandbox LPAR 
pretty much running everything, and now I am trying to put on some bells 
and whistles.   I have followed this thread with GREAT interest and I am 
working thru the RedBook right now.  First I thought I would get zFS up 
and working, on the old HFS files.   Naturally, something else has broken, 
TCPIP. 
1) I Put in the PARMLIB(IOEPRM00) discussed in this thread,  and checked 
my PROCLIB(ZFS)  
2) I Updated BPXPRM__) with the ZFS and things got messy.  By the way, 
using SETOMVS RESET=(F0)  does NOT work the same as an IPL.  Just FYI. You 
can RESET a parmlib member that will cause everything to work, but that 
does not mean that the same parmlib member will work on IPL.  I think 
because RESET just ADDs and/or replaces, but does not delete.  Might 
investigate this later. 
My old BPXPRM__ had  FILESTYPE's like this. 
FILESYSTYPE TYPE(UDS) ENTRYPOINT(BPXTUINT) 
FILESYSTYPE TYPE(CINET) ENTRYPOINT(BPXTCINT) /* MULTI IP STACKS   */
SUBFILESYSTYPE NAME(TCPIP) TYPE(CINET) ENTRYPOINT(EZBPFINI) DEFAULT 
SUBFILESYSTYPE NAME(TCPMQ) TYPE(CINET) ENTRYPOINT(EZBPFINI) 
I tried add/replace 
FILESYSTYPE TYPE(ZFS) ENTRYPOINT(IOEFSCM) 
ASNAME(ZFS,'SUB=MSTR') PARM('PRM=(00)')
 In every combination I can think of and ZFS subsystem does start. 
 But when I try to start TCPIP I get 
EZZ4203I Z/OS UNIX - TCP/IP CONNECTION ERROR FOR 
TCPIP-BPX1PCT,800D,,0079,11B3005A
EZZ4203I Z/OS UNIX - TCP/IP CONNECTION ERROR FOR 
TCPIP-BPX1PCT,C005,,0079,11B3005A
EZZ9315E TCP/IP WAITING FOR RESOLVER TO INITIALIZE
Messages not much help. Anyone have a quick and dirty answer for 
this? 

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



Re: Performance report help

2008-05-09 Thread Jon Brock
Take a look at the type 30 records.

Ah, yes.  That would be the section in the book on my desk with a
sticky-label bookmark . . . that says, Type 30 CPU.  In my own
handwriting. 

Heavy sigh  Perhaps I should just give up now.



CBT file 529 (among others) has a program which can print a report from
the
type 30 data.

OK, thanks for that tip.  I have downloaded and compiled it and have it
running now.  I'll see what it gives me. 


Thanks,
Jon

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



Re: Performance report help

2008-05-09 Thread Jon Brock
It has been a long time since I looked at it, but I don't think we can
use MXG.  We don't have SAS, and isn't that an MXG requirement?


Thanks,
Jon


 

snip
When I've had to determine what job(s) have caused a large CPU increase
over an interval I've used the SMF type 30 interval records.  If you
have Barry Merrill's MXG the information from them is in the SMFINTRV
dataset.  By using them you can limit the analysis to a short interval
rather than over the full time of the job.  Of course if you talking
about several days of data it would be a lot of information. 
/snip

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



Re: ServerPac and zFS

2008-05-09 Thread Mark Zelden
On Fri, 9 May 2008 11:56:51 -0700, John Mattson [EMAIL PROTECTED]
wrote:

Jumping from OS390 2.10 to zOS 1.08.   I have a sandbox LPAR
pretty much running everything, and now I am trying to put on some bells
  By the way,
using SETOMVS RESET=(F0)  does NOT work the same as an IPL.  

No, but F OMVS,SHUTDOWN and F OMVS,RESTART does do the same 
thing.  


 I think
because RESET just ADDs and/or replaces, but does not delete.  Might
investigate this later.

I tried add/replace
FILESYSTYPE TYPE(ZFS) ENTRYPOINT(IOEFSCM)
ASNAME(ZFS,'SUB=MSTR') PARM('PRM=(00)')

Did you REPLACE anything or just add this?

 In every combination I can think of and ZFS subsystem does start.

Is the ZFS proc in a library included in MSTJCLxx?

Any other message in the syslog at IPL time?

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

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



Re: Performance report help

2008-05-09 Thread Jon Brock
Thanks for that information, Tom.  I think I might start running it on a
full-time basis.  I'll need to check the parms first, though.

Jon



snip
Jon,

FWIW, I always run RMFMON II.  The overhead is minimal compared to when
I 
use it, which is often.

YMMV,
Tom Conley 
/snip

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



Re: Performance report help

2008-05-09 Thread Jon Brock
OK, thanks for that.  I'm having vague memories (the only kind I have
any more) about going through this exercise before.  I can't find any of
the jobs I had worked up, though; it may be that I didn't get any useful
information at the time.  I'll see what I get, though.

Thanks,
Jon



snip
Yes.
Job/Step Accounting -- SMF Type 30.
If you have/had interval accounting turned on.
/snip

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



Re: Performance report help

2008-05-09 Thread Gary Green
Yes, SAS is a pre-req for MXG.

Have you looked at the RMF Spreadsheet Reporter?

It's a bit high-level for what I think you need, but the process of
acquiring the data, getting it into the spreadsheets and preparing the
charts may give you some insight on how to take a left turn at Albuquerque
and perhaps roll your own to get the info you need.

Earlier, I think I read a post by another forum member to look at DFSORT to
produce something.  That is a very good idea.


Gary Green
I can use all the help I can get with my fight against cancer!
Please support my efforts!
Thank you.
http://www.active.com/donate/tntsonj/tntsonjGGreen 

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Jon Brock
Sent: Friday, May 09, 2008 3:10 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Performance report help

It has been a long time since I looked at it, but I don't think we can use
MXG.  We don't have SAS, and isn't that an MXG requirement?


Thanks,
Jon


 

snip
When I've had to determine what job(s) have caused a large CPU increase over
an interval I've used the SMF type 30 interval records.  If you have Barry
Merrill's MXG the information from them is in the SMFINTRV dataset.  By
using them you can limit the analysis to a short interval rather than over
the full time of the job.  Of course if you talking about several days of
data it would be a lot of information. 
/snip

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

No virus found in this incoming message.
Checked by AVG. 
Version: 8.0.100 / Virus Database: 269.23.14/1425 - Release Date: 5/9/2008
12:38 PM

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



Save area types

2008-05-09 Thread Steve Comstock

I'm trying to track down something I seem to recall
reading about but I can't find. [Must be searching
in the wrong places or in the wrong way.]

I know z/OS has defined F4SA and F5SA save areas, but
I thought I saw something on ibm-main, or maybe mainframe
assembler, that mentioned F6SA or F7SA. Do either of these
ring a bell for anyone? If so, where are they documented?

If not, have have nice weekend. Oh, what the H: have a
nice weekend either way.


Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

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

  z/OS Application development made easier
* Our classes include
   + How things work
   + Programming examples with realistic applications
   + Starter / skeleton code
   + Complete working programs
   + Useful utilities and subroutines
   + Tips and techniques

== Check out the Trainer's Friend Store to purchase z/OS  ==
== application developer toolkits. Sample code in four==
== programming languages, JCL to Assemble or compile, ==
== bind and test. ==
==   http://www.trainersfriend.com/TTFStore/index.html==



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



How to cancel with just the JES jobid?

2008-05-09 Thread Mark Jones
From an authorized assembler program, I've got just a JES jobid (JOBn) 
and need to cancel it.  This needs to work with both JES2 and JES3.

There are two possible ways to do this, z/OS cancel or JES cancel.  Build a 
command and issue SVC 34.

z/OS Cancel

A z/OS cancel (C jobname,A=asid) would be easiest since it works for both 
JES2 and JES3, but since the jobname is used (not JES jobid), the jobname 
might not be unique and require the additional A=asid parameter.  The 
jobname can be looked up from the JES jobid using the subsystem interface, 
but the asid is not available through this interface.  I'm not sure how to 
start 
with JES jobid (JOBn) and get the asid, although I can get the jobname.  
Any ideas?

I've hit a dead end with this one, without the asid, I can't do a z/OS cancel.

JES Cancel

JES2 and JES3 have completely different syntax for cancel, so I have to know 
which type I'm talking to.  The CVT points to the JESCT (the main JES 
controlblock) which has a flag to test for JES2/JES3.  That's not too hard.

However, the JES2/JES3 commands are normally prefixed with $ (JES2) or * 
(JES3), but that is really just the subsystem command prefix and could be 
anything.

I can't find the subsystem command character.  It isn't in the JESCT or any 
obvious place.  Any notion where that might be kept?  Maybe it can be gotten 
through a subsystem interface call?

Without knowing what command character is used for the primary JES, I can 
just default to $ for JES2 and * for JES3, but if a customer has changed that 
from the norm, it won't work.

Any help on these issues or other approaches for cancelling jobs would be 
much appreciated.

 - Mark

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



Re: Save area types

2008-05-09 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of Steve Comstock
 Sent: Friday, May 09, 2008 2:41 PM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: Save area types
 
 I'm trying to track down something I seem to recall
 reading about but I can't find. [Must be searching
 in the wrong places or in the wrong way.]
 
 I know z/OS has defined F4SA and F5SA save areas, but
 I thought I saw something on ibm-main, or maybe mainframe
 assembler, that mentioned F6SA or F7SA. Do either of these
 ring a bell for anyone? If so, where are they documented?
 
 If not, have have nice weekend. Oh, what the H: have a
 nice weekend either way.
 
 
 Kind regards,
 
 -Steve Comstock

Try:

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA2A671/2.6.
1

Assembler Services Guide (z/OS 1.9).

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

The information contained in this e-mail message may be privileged
and/or confidential.  It is for intended addressee(s) only.  If you are
not the intended recipient, you are hereby notified that any disclosure,
reproduction, distribution or other use of this communication is
strictly prohibited and could, in certain circumstances, be a criminal
offense.  If you have received this e-mail in error, please notify the
sender by reply and delete this message without copying or disclosing
it.  

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



Red Alert: OA24741 Sysplex-wide impact due to loop in GRS on z/OS 1.9 and higher

2008-05-09 Thread Knutson, Sam
Sysplex-wide impact due to loop in GRS on z/OS 1.9 and higher 
 
In z/OS 1.9 GRS recovery for GQSCAN retries with incorrect registers.
This can result in an ABEND0A0 followed by repetitive ABEND0C6 or
ABEND0C4 in ISGQNX. 

As a result of the program check loop in ISGQNX's recovery no GRS work
is able to run on the failing system. This may cause sysplex-wide impact
for the following reasons: 
- Global resources held by the failing system cannot be released causing
tasks that request the resources on other systems to wait.
- If the failing system is a GRS Lock Manager, other systems may not be
able to complete their XES requests.
- Global GQSCANs may time out.
- Global TEST ENQs cannot be processed.
- No list ENQ requests can be processed on other systems if the failing
system is holding the GRS list lock.


Symptoms may also include:
- High CPU usage in GRS and *MASTER* on the failing system.
- Message ISG361I indicating delays on other systems in the Sysplex.
- D GRS, C is unable to complete on the problem system and Message
ISG343I only returns local resource data on other systems.


Please see APAR OA24741 for further details. 

Recommended Actions: 
- Apply the PTFs for OA24741 

View all bulletins at
https://www14.software.ibm.com/webapp/set2/sas/f/redAlerts/home.html 




This email/fax message is for the sole use of the intended
recipient(s) and may contain confidential and privileged information.
Any unauthorized review, use, disclosure or distribution of this
email/fax is prohibited. If you are not the intended recipient, please
destroy all paper and electronic copies of the original message.

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



Re: How to cancel with just the JES jobid?

2008-05-09 Thread McKown, John
From looking at the documentation on the IAZXJSAB macro, you can step
through the ASVT and get information about the job running in that
address space. Including the JOBNAME, JOBID (JES job number JOBn,
STCn, TSUn).

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

The information contained in this e-mail message may be privileged
and/or confidential.  It is for intended addressee(s) only.  If you are
not the intended recipient, you are hereby notified that any disclosure,
reproduction, distribution or other use of this communication is
strictly prohibited and could, in certain circumstances, be a criminal
offense.  If you have received this e-mail in error, please notify the
sender by reply and delete this message without copying or disclosing
it.  

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



Re: Z10 and ICSF

2008-05-09 Thread Greg Boyd
Mark is right, it does sound like the LPAR has multiple Domains configured, but 
I would have expected ICSF to issue CSFM409E 'Multiple Domains Available 
Select One in Options Data Set', not an Abend.  You should probably open a 
problem with the Support Center to get to the bottom of the problem.

Greg Boyd
IBM WSC, System z Crypto 


On Fri, 9 May 2008 11:43:05 -0400, Mark Jacobs 
[EMAIL PROTECTED] wrote:

Magen Margalit wrote:
 Hi List

 Yestarday night we did a CPC migration from Z9 to Z10.
 After we IPLed on the new CPC we had a problem
 with the ICSF proc - CSFSTART (abend 0C4-4).

 After a while we have managed to start the proc
 after adding parameter: Domain(1) into the csfparms member.
 but we can't understand why...

 The same procedure (without the parm) worked ok on the Z9 system.
 We know that this parameter has a relation to the
 LPAR crypto domain index under the activation profile
 but can't fully understand what the relations are...

 Does anybody know?

 Thanks
 Magen



It sounds like the lpar definition for the crypto resources specifies
more than one cryptographic domain. That is valid, but if you do specify
more than one domain the icsf parmlib member must specify which one to 
use.

I would have expected ICSF to give an error message and not take an
abend however.


--
Mark Jacobs
Time Customer Service
Tampa, FL


Progress doesn't come from early risers - progress is made
by lazy men looking for easier ways to do things.

Robert A. Heinlein - Time Enought for Love(1973)

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

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



Re: ServerPac and zFS

2008-05-09 Thread Bob Rutledge

bpxmtext 11B3005A
 BPXVFPCT 10/25/06
 JRFSNotStart: The file system specified was not started

 Action: The File_system_type specified must match one of the FILESYSTYPE
 statements in the BPXPRMxx parmlib member.

Does D OMVS,PFS show all the FILSYSTYPEs you think it should?

Bob

John Mattson wrote:
Jumping from OS390 2.10 to zOS 1.08.   I have a sandbox LPAR 
pretty much running everything, and now I am trying to put on some bells 
and whistles.   I have followed this thread with GREAT interest and I am 
working thru the RedBook right now.  First I thought I would get zFS up 
and working, on the old HFS files.   Naturally, something else has broken, 
TCPIP. 
1) I Put in the PARMLIB(IOEPRM00) discussed in this thread,  and checked 
my PROCLIB(ZFS)  
2) I Updated BPXPRM__) with the ZFS and things got messy.  By the way, 
using SETOMVS RESET=(F0)  does NOT work the same as an IPL.  Just FYI. You 
can RESET a parmlib member that will cause everything to work, but that 
does not mean that the same parmlib member will work on IPL.  I think 
because RESET just ADDs and/or replaces, but does not delete.  Might 
investigate this later. 
My old BPXPRM__ had  FILESTYPE's like this. 
FILESYSTYPE TYPE(UDS) ENTRYPOINT(BPXTUINT) 
FILESYSTYPE TYPE(CINET) ENTRYPOINT(BPXTCINT) /* MULTI IP STACKS   */
SUBFILESYSTYPE NAME(TCPIP) TYPE(CINET) ENTRYPOINT(EZBPFINI) DEFAULT 
SUBFILESYSTYPE NAME(TCPMQ) TYPE(CINET) ENTRYPOINT(EZBPFINI) 
I tried add/replace 
FILESYSTYPE TYPE(ZFS) ENTRYPOINT(IOEFSCM) 
ASNAME(ZFS,'SUB=MSTR') PARM('PRM=(00)')
 In every combination I can think of and ZFS subsystem does start. 
 But when I try to start TCPIP I get 
EZZ4203I Z/OS UNIX - TCP/IP CONNECTION ERROR FOR 
TCPIP-BPX1PCT,800D,,0079,11B3005A
EZZ4203I Z/OS UNIX - TCP/IP CONNECTION ERROR FOR 
TCPIP-BPX1PCT,C005,,0079,11B3005A

EZZ9315E TCP/IP WAITING FOR RESOLVER TO INITIALIZE
Messages not much help. Anyone have a quick and dirty answer for 
this? 


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



Re: How to cancel with just the JES jobid?

2008-05-09 Thread Edward Jaffe

Mark Jones wrote:
From an authorized assembler program, I've got just a JES jobid (JOBn) 
and need to cancel it.  This needs to work with both JES2 and JES3.


There are two possible ways to do this, z/OS cancel or JES cancel.  Build a 
command and issue SVC 34.
  


Are you able to use SSI function code 2 (CANCEL)? IEFSSCS has the SSOB 
mapping.


--
Edward E Jaffe
Phoenix Software International, Inc
5200 W Century Blvd, Suite 800
Los Angeles, CA 90045
310-338-0400 x318
[EMAIL PROTECTED]
http://www.phoenixsoftware.com/

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



Re: Red Alert: OA24741 Sysplex-wide impact due to loop in GRS on z/OS 1.9 and higher

2008-05-09 Thread Mariuca Iftime
It is no PTF available for ZOS 1.9, only ZOS 1.4

Mariuca Iftime
Systems Programmer
Colonial Bank N.A.
[EMAIL PROTECTED]
Ph#   334-954-1759
Fax# 334-954-1717

The information transmitted is intended only for the person or entity to
which it is addressed and may contain confidential and/or privileged
material. Any review, retransmission, dissemination or other use of, or
taking any action in reliance upon this information by persons or
entities other than the intended recipient is prohibited. If you
received this message in error, please contact the sender and delete the
material from all computers.


-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Knutson, Sam
Sent: Friday, May 09, 2008 2:48 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Red Alert: OA24741 Sysplex-wide impact due to loop in GRS on
z/OS 1.9 and higher

Sysplex-wide impact due to loop in GRS on z/OS 1.9 and higher 
 
In z/OS 1.9 GRS recovery for GQSCAN retries with incorrect registers.
This can result in an ABEND0A0 followed by repetitive ABEND0C6 or
ABEND0C4 in ISGQNX. 

As a result of the program check loop in ISGQNX's recovery no GRS work
is able to run on the failing system. This may cause sysplex-wide impact
for the following reasons: 
- Global resources held by the failing system cannot be released causing
tasks that request the resources on other systems to wait.
- If the failing system is a GRS Lock Manager, other systems may not be
able to complete their XES requests.
- Global GQSCANs may time out.
- Global TEST ENQs cannot be processed.
- No list ENQ requests can be processed on other systems if the failing
system is holding the GRS list lock.


Symptoms may also include:
- High CPU usage in GRS and *MASTER* on the failing system.
- Message ISG361I indicating delays on other systems in the Sysplex.
- D GRS, C is unable to complete on the problem system and Message
ISG343I only returns local resource data on other systems.


Please see APAR OA24741 for further details. 

Recommended Actions: 
- Apply the PTFs for OA24741 

View all bulletins at
https://www14.software.ibm.com/webapp/set2/sas/f/redAlerts/home.html 




This email/fax message is for the sole use of the intended
recipient(s) and may contain confidential and privileged information.
Any unauthorized review, use, disclosure or distribution of this
email/fax is prohibited. If you are not the intended recipient, please
destroy all paper and electronic copies of the original message.

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

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



Re: Red Alert: OA24741 Sysplex-wide impact due to loop in GRS on z/OS 1.9 and higher

2008-05-09 Thread Brian Peterson
Not true.

PTF List: 
Release 740   : UA40682 available 08/05/07 (1000 )
Release 750   : PTF not available yet 

UA40682 is the z/OS 1.9 level fix.  The other PTF listed is the one for z/OS 
1.10.

Brian

On Fri, 9 May 2008 14:55:24 -0500, Mariuca Iftime 
[EMAIL PROTECTED] wrote:

It is no PTF available for ZOS 1.9, only ZOS 1.4

Mariuca Iftime

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



Re: ServerPac and zFS

2008-05-09 Thread John Mattson
Mark !!! 
Thanks for the commands, I will give them a try. 
Finally figured it out.  I tried most every possible combinations 
of FILESTYPE but in the end the problem was 
NETWORK DOMAINNAME(AF_UNIX) DOMAINNUMBER(1) MAXSOCKETS(1) TYPE(UDS)
 
So by replaceing the FILESYSTYPE TYPE(UDS) with FILESYSTYPE 
TYPE(ZFS) as per your example, and changing to NETWORK TYPE(UDS) 
Everything seems to be up and running. 
Thanks to all. 



Mark Zelden [EMAIL PROTECTED] 
Sent by: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU
05/09/2008 12:14 PM
Please respond to
IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: ServerPac and zFS




On Fri, 9 May 2008 11:56:51 -0700, John Mattson 
[EMAIL PROTECTED]
wrote:
Jumping from OS390 2.10 to zOS 1.08.   I have a sandbox LPAR
pretty much running everything, and now I am trying to put on some bells
  By the way,
using SETOMVS RESET=(F0)  does NOT work the same as an IPL. 
No, but F OMVS,SHUTDOWN and F OMVS,RESTART does do the same 
thing.   I think
because RESET just ADDs and/or replaces, but does not delete.  Might
investigate this later.
I tried add/replace
FILESYSTYPE TYPE(ZFS) ENTRYPOINT(IOEFSCM)
ASNAME(ZFS,'SUB=MSTR') PARM('PRM=(00)')

Did you REPLACE anything or just add this?
 In every combination I can think of and ZFS subsystem does 
start.
Is the ZFS proc in a library included in MSTJCLxx? YUP, 
Any other message in the syslog at IPL time? 
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:[EMAIL PROTECTED]
z/OS Systems Programming expert at 
http://expertanswercenter.techtarget.com/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html




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



FTP VB dataset

2008-05-09 Thread Mullen, Patrick
I thought this would be straight forward, but I can't get it to work
correctly. Trying to FTP a DSORG=VB dataset from one z/OS 1.7 system to
another z/OS 1.7 system. The dataset contains alphabetic and packed
decimal data. 

With no special commands, some of the packed data comes out translated
into different hex values. Adding a 'bin' command resolves the
translation, but now record structure is lost. Adding a 'quote site rdw'
doesn't make any difference, but maybe that syntax is incorrect.

Any ideas? 

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



Re: FTP VB dataset

2008-05-09 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of Mullen, Patrick
 Sent: Friday, May 09, 2008 3:20 PM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: FTP VB dataset
 
 I thought this would be straight forward, but I can't get it to work
 correctly. Trying to FTP a DSORG=VB dataset from one z/OS 1.7 
 system to
 another z/OS 1.7 system. The dataset contains alphabetic and packed
 decimal data. 
 
 With no special commands, some of the packed data comes out translated
 into different hex values. Adding a 'bin' command resolves the
 translation, but now record structure is lost. Adding a 
 'quote site rdw'
 doesn't make any difference, but maybe that syntax is incorrect.
 
 Any ideas? 

discussed many time. Use the ftp command:

MODE B

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

The information contained in this e-mail message may be privileged
and/or confidential.  It is for intended addressee(s) only.  If you are
not the intended recipient, you are hereby notified that any disclosure,
reproduction, distribution or other use of this communication is
strictly prohibited and could, in certain circumstances, be a criminal
offense.  If you have received this e-mail in error, please notify the
sender by reply and delete this message without copying or disclosing
it.  

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



Where do I find Instruction/Function Defs

2008-05-09 Thread Thompson, Steve
I have been searching IBM-Main, and the current PoOP, as well as a few
Migration manuals.

Where does IBM state that this or that feature/function is the minimum
requirement for a given release of z/OS?

I am trying to take advantage of some new instructions, but I have to
make sure that they match up with the O/S requirements.

What I am looking for, specifically is, the EXTENDED IMMEDIATE
group/function/feature.

Regards,
Steve Thompson

-- All opinions expressed by me are my own and may not necessarily
reflect those of my employer. --


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



Re: FTP VB dataset

2008-05-09 Thread Mullen, Patrick
Thanks, found it in the archives.


-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of McKown, John
Sent: Friday, May 09, 2008 3:28 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: FTP VB dataset


 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of Mullen, Patrick
 Sent: Friday, May 09, 2008 3:20 PM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: FTP VB dataset
 
 I thought this would be straight forward, but I can't get it to work
 correctly. Trying to FTP a DSORG=VB dataset from one z/OS 1.7 
 system to
 another z/OS 1.7 system. The dataset contains alphabetic and packed
 decimal data. 
 
 With no special commands, some of the packed data comes out translated
 into different hex values. Adding a 'bin' command resolves the
 translation, but now record structure is lost. Adding a 
 'quote site rdw'
 doesn't make any difference, but maybe that syntax is incorrect.
 
 Any ideas? 

discussed many time. Use the ftp command:

MODE B

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

The information contained in this e-mail message may be privileged
and/or confidential.  It is for intended addressee(s) only.  If you are
not the intended recipient, you are hereby notified that any disclosure,
reproduction, distribution or other use of this communication is
strictly prohibited and could, in certain circumstances, be a criminal
offense.  If you have received this e-mail in error, please notify the
sender by reply and delete this message without copying or disclosing
it.  

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

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



Re: Where do I find Instruction/Function Defs

2008-05-09 Thread Edward Jaffe

Thompson, Steve wrote:

I have been searching IBM-Main, and the current PoOP, as well as a few
Migration manuals.

Where does IBM state that this or that feature/function is the minimum
requirement for a given release of z/OS?

I am trying to take advantage of some new instructions, but I have to
make sure that they match up with the O/S requirements.

What I am looking for, specifically is, the EXTENDED IMMEDIATE
group/function/feature.
  


Sorry to disappoint. The most-recent level set was z/OS 1.6 requiring 
z/Architecture. No operating system release requires machines that 
implement the extended-immediate facility (z9 and higher).


With the lack of interconnect between z10 and z900/z800, some have 
speculated that z900/z800 will be dropped by upcoming releases of (at 
least) some middleware products if not the operating system itself. So 
far, nothing is announced.


--
Edward E Jaffe
Phoenix Software International, Inc
5200 W Century Blvd, Suite 800
Los Angeles, CA 90045
310-338-0400 x318
[EMAIL PROTECTED]
http://www.phoenixsoftware.com/

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



Re: FTP VB dataset

2008-05-09 Thread Ted MacNEIL
I know it's BF to reply to one's own post, but I guess I don't know the 
difference.
Is there a difference between:

BIN

MODE B

The OP said BIN wasn't working.

-
Too busy driving to stop for gas!

-Original Message-
From: Ted MacNEIL [EMAIL PROTECTED]

Date: Fri, 9 May 2008 20:37:43 
To:IBM Mainframe Discussion List ibm-main@bama.ua.edu
Subject: Re: FTP VB dataset


discussed many time. Use the ftp command:

MODE B

Maybe I read this wrong; didn't the OP say he was doing that and it didn't work?

-
Too busy driving to stop for gas!

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



Re: FTP VB dataset

2008-05-09 Thread Mansell, George R.
Since both are IBM mainframes try this, I've had good luck with it.
   Menu  Utilities  Compilers  Help 
 ¢¢¢
 BROWSETECGRM.JCL.PDS(FTPEXAMP) - 01.99   Line 0001 Col 001 080 
 Command ===  Scroll === CSR  
//TECGRMF  JOB 5740TC,G.MANSELL,MSGCLASS=O,PRTY=9,CLASS=3,  
//NOTIFY=SYSUID  TYPRUN=SCAN   
//STEP01   EXEC PGM=FTP,
// PARM='198.176.221.9  (EXIT TIMEOUT 20'   
//NETRCDD  DUMMY
//OUTPUT   DD  SYSOUT=* 
//INPUTDD  *
TECGRM  

BLOCK   
EBCDIC  
GET 'TES.CONNECT.DIRECT' 'TES.CONNECT.DIRECT.COPY'  
QUIT
/*  
//STEP02   EXEC PGM=FTP,COND=(0,NE,STEP01), 
// PARM='198.176.221.9  (EXIT TIMEOUT 20'   
//NETRCDD  DUMMY
//OUTPUT   DD  SYSOUT=* 
//INPUTDD  *
TECGRM  

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of 
Mullen, Patrick
Sent: Friday, May 09, 2008 3:30 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: FTP VB dataset

Thanks, found it in the archives.


-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of McKown, John
Sent: Friday, May 09, 2008 3:28 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: FTP VB dataset


 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of Mullen, Patrick
 Sent: Friday, May 09, 2008 3:20 PM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: FTP VB dataset
 
 I thought this would be straight forward, but I can't get it to work
 correctly. Trying to FTP a DSORG=VB dataset from one z/OS 1.7 
 system to
 another z/OS 1.7 system. The dataset contains alphabetic and packed
 decimal data. 
 
 With no special commands, some of the packed data comes out translated
 into different hex values. Adding a 'bin' command resolves the
 translation, but now record structure is lost. Adding a 
 'quote site rdw'
 doesn't make any difference, but maybe that syntax is incorrect.
 
 Any ideas? 

discussed many time. Use the ftp command:

MODE B

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

The information contained in this e-mail message may be privileged
and/or confidential.  It is for intended addressee(s) only.  If you are
not the intended recipient, you are hereby notified that any disclosure,
reproduction, distribution or other use of this communication is
strictly prohibited and could, in certain circumstances, be a criminal
offense.  If you have received this e-mail in error, please notify the
sender by reply and delete this message without copying or disclosing
it.  

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

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


--
NOTICE:  This electronic mail message and any attached files are confidential.  
The information is exclusively for the use of the individual or entity intended 
as the recipient.  If you are not the intended recipient, any use, copying, 
printing, reviewing, retention, disclosure, distribution or forwarding of the 
message or any attached file is not authorized and is strictly prohibited.  If 
you have received this electronic mail message in error, please advise the 
sender by 

Re: FTP VB dataset

2008-05-09 Thread Ted MacNEIL
discussed many time. Use the ftp command:

MODE B

Maybe I read this wrong; didn't the OP say he was doing that and it didn't work?

-
Too busy driving to stop for gas!

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



Re: Where do I find Instruction/Function Defs

2008-05-09 Thread Steve Comstock

Edward Jaffe wrote:

Thompson, Steve wrote:

I have been searching IBM-Main, and the current PoOP, as well as a few
Migration manuals.

Where does IBM state that this or that feature/function is the minimum
requirement for a given release of z/OS?

I am trying to take advantage of some new instructions, but I have to
make sure that they match up with the O/S requirements.

What I am looking for, specifically is, the EXTENDED IMMEDIATE
group/function/feature.
  


Sorry to disappoint. The most-recent level set was z/OS 1.6 requiring 
z/Architecture. No operating system release requires machines that 
implement the extended-immediate facility (z9 and higher).


With the lack of interconnect between z10 and z900/z800, some have 
speculated that z900/z800 will be dropped by upcoming releases of (at 
least) some middleware products if not the operating system itself. So 
far, nothing is announced.




It sounds to me like Steve was after some point in time
where he could use extended immediate instructions. The
answer is: it's not in the software but in the hardware.
As you pointed out, if you are running a z9 or z10, the
instructions are available, regardless of what release
of z/OS you are running.

You could use the TM instruction to see if the hardware
has the feature. For example:

 tm   202,x'02'
 jo   extend_imm_here
* fall through, and extended immediate instructions are not
  available.




Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

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

  z/OS Application development made easier
* Our classes include
   + How things work
   + Programming examples with realistic applications
   + Starter / skeleton code
   + Complete working programs
   + Useful utilities and subroutines
   + Tips and techniques

== Check out the Trainer's Friend Store to purchase z/OS  ==
== application developer toolkits. Sample code in four==
== programming languages, JCL to Assemble or compile, ==
== bind and test. ==
==   http://www.trainersfriend.com/TTFStore/index.html==



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



How to allocate multiple uncataloged datasets?

2008-05-09 Thread Ron MacRae
Ladies and gents,

If I want to ALLOCATE an uncataloged dataset in a rexx exec I can issue -
alloc dataset('DSN1') file(MYDD) volume(VOL1) shr.

How do I ALLOCATE multiple uncataloged datasets?
alloc dataset('DSN1' 'DSN2') file(MYDD) volume(VOL1 VOL2) shr
doesn't work. 

If I allocate either file individually I get the correct, uncataloged, files 
allocated.
If I allocate both together I get the cataloged versions. 

What am I doing wrong?
How do you allocate multiple uncataloged versions of datasets?

Thanks in advance,
Ron MacRae.

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



Re: FTP VB dataset

2008-05-09 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of Ted MacNEIL
 Sent: Friday, May 09, 2008 3:38 PM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: Re: FTP VB dataset
 
 discussed many time. Use the ftp command:
 
 MODE B
 
 Maybe I read this wrong; didn't the OP say he was doing that 
 and it didn't work?
 
 -

NO. 

The bin ftp command and the mode b command are different. mode b
implies bin, but does more.

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

The information contained in this e-mail message may be privileged
and/or confidential.  It is for intended addressee(s) only.  If you are
not the intended recipient, you are hereby notified that any disclosure,
reproduction, distribution or other use of this communication is
strictly prohibited and could, in certain circumstances, be a criminal
offense.  If you have received this e-mail in error, please notify the
sender by reply and delete this message without copying or disclosing
it.  

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



Re: Where do I find Instruction/Function Defs

2008-05-09 Thread Thompson, Steve
-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Steve Comstock
Sent: Friday, May 09, 2008 3:55 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Where do I find Instruction/Function Defs

Edward Jaffe wrote:
 Thompson, Steve wrote:
 I have been searching IBM-Main, and the current PoOP, as well as a 
 few Migration manuals.
SNIP

It sounds to me like Steve was after some point in time
where he could use extended immediate instructions. The
answer is: it's not in the software but in the hardware.
As you pointed out, if you are running a z9 or z10, the
instructions are available, regardless of what release
of z/OS you are running.
SNIP

Yes, that is what I was after, but I thought I might find it listed in
some pre-reqs for a release level of z/OS.

So, I have to drop those instructions until the O/S requires a hardware
level that includes them.

Thank you all for your quick replies.

Regards,
Steve Thompson

-- All opinions expressed by me are my own and may not necessarily
reflect those of my employer. --

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



Re: How to cancel with just the JES jobid?

2008-05-09 Thread Mark Jones
On Fri, 9 May 2008 13:06:08 -0700, Edward Jaffe 
[EMAIL PROTECTED] wrote:

Mark Jones wrote:
 From an authorized assembler program, I've got just a JES jobid 
(JOBn)
 and need to cancel it.  This needs to work with both JES2 and JES3.

 There are two possible ways to do this, z/OS cancel or JES cancel.  Build a
 command and issue SVC 34.


Are you able to use SSI function code 2 (CANCEL)? IEFSSCS has the SSOB
mapping.


Yes I guess, but it isn't documented in the MVS Using the Subsystem 
Interface manual.  I could try to figure it out based on similar SSI calls, 
but 
would rather use a documented interface.

I'll check into the SSOB mapping and see if I can figure it out.

Thanks for the idea.

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



Re: Where do I find Instruction/Function Defs

2008-05-09 Thread Tom Marchant
On Fri, 9 May 2008 14:55:05 -0600, Steve Comstock wrote:

You could use the TM instruction to see if the hardware
has the feature. For example:

  tm   202,x'02'
  jo   extend_imm_here

Yuck!

ITYM
 TMFLCEFACILITIESLISTBYTE2,FLCEEXTENDEDIMMEDIATE

X'02' is FLCEETF3, signifying Extended Translation Facility 3

-- 
Tom Marchant

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



Re: How to allocate multiple uncataloged datasets?

2008-05-09 Thread Lizette Koehler
I guess you are using TSO ALLOCATE Command but I am not sure if this is
CLIST or REXX or some other process.

But basically you will need to allocate each individual data set on a
separate DD then concatenate the DDs.

For example

TSO ALLOCATE DD(DD1) DA(dsn1) VOL(vol1) SHR 
TSO ALLOCATE DD(DD2) DA(dsn2) VOL(vol2) SHR
And so on 

Then the input file of your dreams would be 

TSO CONCAT(DD1 DD2 etc...)  

The CONCAT is on the CBT TAPE File 535

Lizette

[]  --  SNIP



If I want to ALLOCATE an uncataloged dataset in a rexx exec I can issue -
alloc dataset('DSN1') file(MYDD) volume(VOL1) shr.

How do I ALLOCATE multiple uncataloged datasets?
alloc dataset('DSN1' 'DSN2') file(MYDD) volume(VOL1 VOL2) shr
doesn't work. 

If I allocate either file individually I get the correct, uncataloged, files

allocated.
If I allocate both together I get the cataloged versions. 

What am I doing wrong?
How do you allocate multiple uncataloged versions of datasets?


[]  --  UnSnip

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



Re: How to allocate multiple uncataloged datasets?

2008-05-09 Thread Ted MacNEIL
TSO CONCAT(DD1 DD2 etc...)  

I don't think that's the exact syntax... 'command(...' is not valid.
 
The CONCAT is on the CBT TAPE File 535

Also, didn't CONCAT have some issues with FREE?
Mind you, I haven't used it since 1988, so I could be wrong in my recollection 
(... or 'blowing smoke' ...).

-
Too busy driving to stop for gas!

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



Re: FTP VB dataset

2008-05-09 Thread Dave Kopischke
On Fri, 9 May 2008 15:19:53 -0500, Mullen, Patrick wrote:

I thought this would be straight forward, but I can't get it to work
correctly. Trying to FTP a DSORG=VB dataset from one z/OS 1.7 system to
another z/OS 1.7 system. The dataset contains alphabetic and packed
decimal data.

With no special commands, some of the packed data comes out translated
into different hex values. Adding a 'bin' command resolves the
translation, but now record structure is lost. Adding a 'quote site rdw'
doesn't make any difference, but maybe that syntax is incorrect.

Any ideas?


Try quote site recfm=vb and see if it preserves it. You might also have to 
add LRECL and BLKSIZE.

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



Re: Where do I find Instruction/Function Defs

2008-05-09 Thread Steve Comstock

Tom Marchant wrote:

On Fri, 9 May 2008 14:55:05 -0600, Steve Comstock wrote:

You could use the TM instruction to see if the hardware
has the feature. For example:

 tm   202,x'02'
 jo   extend_imm_here


Yuck!


Well, eye of the beholder.




ITYM
 TMFLCEFACILITIESLISTBYTE2,FLCEEXTENDEDIMMEDIATE


Yuck!



X'02' is FLCEETF3, signifying Extended Translation Facility 3



You're right. My eye slid down one entry while reading my notes.
Advantage of using symbolic equates, of course.



Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

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

  z/OS Application development made easier
* Our classes include
   + How things work
   + Programming examples with realistic applications
   + Starter / skeleton code
   + Complete working programs
   + Useful utilities and subroutines
   + Tips and techniques

== Check out the Trainer's Friend Store to purchase z/OS  ==
== application developer toolkits. Sample code in four==
== programming languages, JCL to Assemble or compile, ==
== bind and test. ==
==   http://www.trainersfriend.com/TTFStore/index.html==



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



Re: Where do I find Instruction/Function Defs

2008-05-09 Thread Edward Jaffe

Tom Marchant wrote:

Yuck!

ITYM
 TMFLCEFACILITIESLISTBYTE2,FLCEEXTENDEDIMMEDIATE
  


Personally, I prefer to use the mixed case symbols from the PL/X expansions:

TMFlceFacilitiesListByte2,FlceExtendedImmediate

IT'S BEEN SO LONG SINCE ANY MAINFRAME ASSEMBLER REQUIRED UPPERCASE 
SYMBOLS, I DON'T KNOW WHY SO MANY PEOPLE (IBM INCLUDED) PERSIST IN USING 
THEM. THEY REALLY MAKE THINGS HARD TO READ. EVEN IBM'S CONVERSION TOOL, 
USED TO GENERATE BILINGUAL MAPPINGS FROM PL/X DECLARES, DOES THIS. IT'S 
REALLY UNFAIR TO BURDEN ASSEMBLER LANGUAGE PROGRAMMERS WITH THIS 
CONSTANT SHOUTING!


--
Edward E Jaffe
Phoenix Software International, Inc
5200 W Century Blvd, Suite 800
Los Angeles, CA 90045
310-338-0400 x318
[EMAIL PROTECTED]
http://www.phoenixsoftware.com/

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



Re: FTP VB dataset

2008-05-09 Thread John McKown
On Fri, 9 May 2008, Dave Kopischke wrote:

 
 Try quote site recfm=vb and see if it preserves it. You might also have to 
 add LRECL and BLKSIZE.

That should not be necessary when transferring between z/OS images. The 
z/OS ftp client sends a site command with the source dataset's 
attributes to the server, unless that has been turned off.

-- 
Q: What do theoretical physicists drink beer from?
A: An EIN stein.

Maranatha!
John McKown

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



Re: IFAQUAA layout for IFAQUERY

2008-05-09 Thread Roland Schiradin
Yes of course not a common problem.

I believe a PREFIX= is a real good idea but lets see how the PMR goes

Tnx
Roland

This situation is hardly unique.  You just always have to plan not to use
two of such macros in the same module.

I'm sure that we could enhance IFAQUAA to support PREFIX= which will let
you code IFAQUAA PREFIX=abc and then all the field names will have abc
before their normal names (e.g., abcQUAAH#REC).


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



Re: FTP VB dataset

2008-05-09 Thread Brian Peterson
If you are using a z/OS FTP client to PUT a file onto a z/OS FTP server:

Just use:
TYPE E
MODE B
PUT local_name [remote_name if different]

You will notice when you run the PUT command that the z/OS FTP client will 
automatically generate a SITE command telling the remote FTP server what 
DCB characteristics this file needs.  For example:

 EZA1460I Command: 
type e 
 EZA1701I  TYPE E 
 200 Representation type is Ebcdic NonPrint  
 EZA1460I Command: 
mode b 
 EZA1701I  MODE B   
 200 Data transfer mode is Block   
 EZA1460I Command: 
put local_name remote_name
 EZA1701I  SITE VARrecfm LRECL=27994 RECFM=VB BLKSIZE=27998
 200 SITE command was accepted
 EZA1701I  PORT 192,168,nn,nnn,14,100  
 200 Port request OK.
 EZA1701I  STOR remote_name   
 125 Storing data set remote_name   
 250 Transfer completed successfully.   
 EZA1617I 211 bytes transferred in 0.010 seconds.  Transfer rate 21.10 
Kbytes/sec.  
 EZA1460I Command:   


If you are using a z/OS FTP client to GET a file from a z/OS FTP server:

Use:
TYPE E
MODE B
LOCSITE all dcb information such as LRECL=nnn RECFM=VB BLKSIZE=27998
GET remote name [local_name if different]

The GET command does not generate an automatic LOCSITE command, so you 
have to specify the correct DCB characteristics before issuing the GET 
command, using LOCSITE.  Here's an example:

 EZA1460I Command: 
mode b
 EZA1701I  MODE B 
 200 Data transfer mode is Block  
 EZA1460I Command: 
type e   
 EZA1701I  TYPE E
 200 Representation type is Ebcdic NonPrint 
 EZA1460I Command: 
locsite lrecl=27994 blksize=27998 recfm=vb   
 EZA1460I Command:   
get remote_name local_name
 EZA1701I  PORT 192,168,nn,nnn,13,127
 200 Port request OK. 
 EZA1701I  RETR remote_name
 125 Sending data set remote_name
 250 Transfer completed successfully.   
 EZA1617I 211 bytes transferred in 0.060 seconds.  Transfer rate 3.52 
Kbytes/sec.

Bits and pieces of this are scattered throughout the z/OS IP User's Guide.  
From the Guide:

Table 12. Recommended methods for data transfer
Transfer between host types  TYPE MODE
EBCDIC and EBCDIC -- binary data   EBCDIC Block

and:

Sometimes the client requires DCB information before it opens a data set. 
Among the situations where this is true are:

o  Reading and writing variable-length records while preserving the RDW 

Brian

On Fri, 9 May 2008 17:07:24 -0500, Dave Kopischke wrote:

On Fri, 9 May 2008 15:19:53 -0500, Mullen, Patrick wrote:

I thought this would be straight forward, but I can't get it to work
correctly. Trying to FTP a DSORG=VB dataset from one z/OS 1.7 system to
another z/OS 1.7 system. The dataset contains alphabetic and packed
decimal data.

With no special commands, some of the packed data comes out translated
into different hex values. Adding a 'bin' command resolves the
translation, but now record structure is lost. Adding a 'quote site rdw'
doesn't make any difference, but maybe that syntax is incorrect.

Any ideas?


Try quote site recfm=vb and see if it preserves it. You might also have to
add LRECL and BLKSIZE.

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



Re: Call XMIT from batch program

2008-05-09 Thread Mike Baldwin
On Mon, 5 May 2008 05:19:25 -0500, Jan MOEYERSONS 
[EMAIL PROTECTED] wrote:

  TRANSMIT NATSTAR +
 NOCOPYLIST +
 DDNAME(DDIN) +
 NOEPILOG +
 NOLOG +
 NONOTIFY +
 OUTDDNAME(DDOUT) +
 PDS +
 NOPROLOG
//

Mind you, for this to work, you need a userid.NAMES.TEXT, where userid
is the userid of the one submitting the job. Then again, you need that when
you use xmit from the TSO ready...

A clarification - If you use an addressee list like:

node/userid   
node.userid   

rather than nickname or distribution list (e.g. NATSTAR), then you should not 
need a NAMES dataset.

Regards,
Mike Baldwin
Cartagena Software Ltd.
www.cartagena.com

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



Re: FTP VB dataset

2008-05-09 Thread Dave Kopischke
On Fri, 9 May 2008 17:58:09 -0500, John McKown wrote:

On Fri, 9 May 2008, Dave Kopischke wrote:


 Try quote site recfm=vb and see if it preserves it. You might also have to
 add LRECL and BLKSIZE.

That should not be necessary when transferring between z/OS images. The
z/OS ftp client sends a site command with the source dataset's
attributes to the server, unless that has been turned off.


Very true. But something was amiss with that conversation. This was intended 
as one way to get beyond it.

I always thought the z/OS ftp client would be able to automatically sense 
another z/OS client and act accordingly. Apparently not in this case.

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



Case-osity preferences (was summit else entirely)

2008-05-09 Thread Shane
On Fri, 2008-05-09 at 15:49 -0700, Edward Jaffe wrote:

 Personally, I prefer to use the mixed case symbols from the PL/X expansions:
 
  TMFlceFacilitiesListByte2,FlceExtendedImmediate

Mmmm - having spent some time of late in *nix environs where case is
relevant, I grew to detest this mixing of case. In anything.
Try it in a job that includes JCL as well as in-line (assembler) sysin,
when you need a change command.

Upper case reigns.

Shane ...
{ta-da ... cue entry for gil, stage right ...}

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



Re: Case-osity preferences (was summit else entirely)

2008-05-09 Thread Steve Comstock

Shane wrote:

On Fri, 2008-05-09 at 15:49 -0700, Edward Jaffe wrote:


Personally, I prefer to use the mixed case symbols from the PL/X expansions:

 TMFlceFacilitiesListByte2,FlceExtendedImmediate


Mmmm - having spent some time of late in *nix environs where case is
relevant, I grew to detest this mixing of case. In anything.
Try it in a job that includes JCL as well as in-line (assembler) sysin,
when you need a change command.

Upper case reigns.

Shane ...
{ta-da ... cue entry for gil, stage right ...}


Well, I don't know about gil (Paul), but I've come to prefer
mixed case. But I really like that COBOL, Assembler, and PL/I
are simply case insensitive. [Unless you're processing XML
files, which need to be case sensitive, then COBOL and PL/I
are aware of the distinctions.] I'm with Ed J. on this one.


Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

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

  z/OS Application development made easier
* Our classes include
   + How things work
   + Programming examples with realistic applications
   + Starter / skeleton code
   + Complete working programs
   + Useful utilities and subroutines
   + Tips and techniques

== Check out the Trainer's Friend Store to purchase z/OS  ==
== application developer toolkits. Sample code in four==
== programming languages, JCL to Assemble or compile, ==
== bind and test. ==
==   http://www.trainersfriend.com/TTFStore/index.html==



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



Re: HFS file compression

2008-05-09 Thread Paul Gilmartin
On Fri, 9 May 2008 14:09:24 -0400, Veilleux, Jon L wrote:

There could be someone who has the file open even though you have
deleted it. I have run into this in the past. We had a WebSphere region
that filled up an HFS. I deleted the file that was consuming the space,
but it didn't get released until the WebSphere region came down. This is
a security 'feature' of UNIX.

Call it security; call it integrity; call it convenience.
I cherish the behavior and rely on it regularly.  Because:

o UNIX rename() is preemptive -- I needn't delete an existing
  file before I rename another to its name.

o UNIX rename() is atomic -- when I perform a rename() no other
  process will observe an interval, however small, when the
  file appears not to exist.

o UNIX unlink() (and rename()) have a sort of low-grade work unit
  isolation -- as you observe, when I unlink(), any other process
  (or my own) can continue to operate on that file without
  encountering an invalid mixture of versions until it closes it.

In some cases when I wish to replace a file on a server, I write
to a temporary filename; close() and rename() to the actual target
name.  This means that any other user is guaranteed to observe
either the entire new version or the entire old version with
integrity.

On many UNIX systems the tmpfile() function creates the file by
opening it, and immediately unlinks it.  This leaves only the
tiniest window during which abnormal termination of the process
leaves the temporary file dangling.  z/OS, OTOH, employs a
contrary design.  It's very easy to kill -KILL a z/OS process
and leave a residual temporary file; very difficult on other
UNIX systems.

PDSEs exhibit much of the same behavior; perhaps even worse in
some respects -- closing and deleting a single member may not
reclaim the space until the directory is closed.

-- gil

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



Re: FTP VB dataset

2008-05-09 Thread Paul Gilmartin
On Fri, 9 May 2008 16:05:22 -0500, McKown, John wrote:

 -Original Message-
 [mailto:[EMAIL PROTECTED] On Behalf Of Ted MacNEIL
 Sent: Friday, May 09, 2008 3:38 PM

 discussed many time. Use the ftp command:

 MODE B

 Maybe I read this wrong; didn't the OP say he was doing that
 and it didn't work?

No.  IIRC, the OP said he did something like QUOTE SITE MODE B,
which puts the server but not the client in that mode; trouble is
almost certain.

BTW, IIRC, the OP said his data set was DSORG=VB.  I was unaware
that DSORG was supported.

 -

NO.

The bin ftp command and the mode b command are different. mode b
implies bin, but does more.

No.  BIN is TYPE I; EBCDIC is TYPE E; BLOCK is MODE B.  the
combination:
   EBCDIC  (or TYPE E) and
   BLOCK   (or MODE B)

... are compatible, and recommended.

(Did I get that right?)

-- gil

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



Re: How to cancel with just the JES jobid?

2008-05-09 Thread Kenneth E Tomiak
How is it you came to have a jobid and not know the jobname? Maybe instead 
of fighting to find the name you can backtrack to what captured the jobid, it 
must have had a jobname at that point too.

On Fri, 9 May 2008 14:34:39 -0500, Mark Jones [EMAIL PROTECTED] 
wrote:

From an authorized assembler program, I've got just a JES jobid (JOBn)
and need to cancel it.  This needs to work with both JES2 and JES3.


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



Re: How to cancel with just the JES jobid?

2008-05-09 Thread Edward Jaffe

Mark Jones wrote:
On Fri, 9 May 2008 13:06:08 -0700, Edward Jaffe 
[EMAIL PROTECTED] wrote:
  

Are you able to use SSI function code 2 (CANCEL)? IEFSSCS has the SSOB
mapping.




Yes I guess, but it isn't documented in the MVS Using the Subsystem 
Interface manual.  I could try to figure it out based on similar SSI calls, but 
would rather use a documented interface.


I'll check into the SSOB mapping and see if I can figure it out.

Thanks for the idea.
  


I never really noticed, until you mentioned it, that SSI function code 2 
(CANCEL) wasn't documented. In fact, I now see lots of ordinary, 
every-day SSI calls aren't in Using the SSI. That's ridiculous.


Perhaps the authors of the book weren't particularly proud of the 
interfaces they neglected to mention. (A lot of it is pretty gross.) 
Or maybe they only had so much time  money to devote. Or maybe they 
were just lazy.


In the old days, there was no book. The SSI documentation was the JES 
source code. And, for me it still is...


--
Edward E Jaffe
Phoenix Software International, Inc
5200 W Century Blvd, Suite 800
Los Angeles, CA 90045
310-338-0400 x318
[EMAIL PROTECTED]
http://www.phoenixsoftware.com/

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