I joined IBM after college, summer of '68, spent six months in various classes
before joining the OS/360 System Design Department as a junior programmer. Bill
Collier was one of the instructors, an amazing/brilliant motivated and
motivating teacher. Coincidentally, I very recently saw a referen
- Original Message -
From: "John Mattson"
Newsgroups: bit.listserv.ibm-main
Sent: Tuesday, January 19, 2010 7:46 PM
Subject: REXX to delete all members of a PDS... serverpac CPPEDELM
Some folks have asked about how to delete all members from a PDS without
deleting the PDS. I just stu
Chokalingam Thangavelu
I would have thought that if this was *urgent*, you would have responded to
my last post explaining how you had resolved the problem or posting your
ICC "session" parameters.
Some time ago I assisted with an ICC problem in the VSE-L list. It was also a
case of not being
m...@mentor-services.com (Mike Myers) writes:
> On thinking it over some, it had to be early 1968, ending around March
> or so (I just reviewed my CV and found I went to FE education in April
> of 1968). So maybe it was closer to Release 11 or 12. Wasn't release
> 14 actually 14/15 (not that that m
> Freedom of speech and all that?
> Perhaps all COBOL questions can stay in a single thread too?
Common sense and all that?
On Tue, 19 Jan 2010 06:19:27 +1100, Wayne Bickerdike
wrote:
>It wasn't ignorance of the original thread.
>
>Freedom of speech and all that?
>
>Raising the cover is an in
Yes, it was. The idea came up somewhere after release 1 was in the field
a while and APARs had come in against it and PTFs had been applied and
update releases fixed problems.
I was just a junior programmer at the time, so it wasn't even my idea, I
was just the guy who implemented MEMMAP. So,
In <4b561b06.1050...@mentor-services.com>, on 01/19/2010
at 03:50 PM, Mike Myers said:
>So I saw OS/360 release 1 run sometime in mid 1968.
Wasn't that kind of long in the tooth by then? As I recall, 1968 was when
Release 14 came out.
--
Shmuel (Seymour J.) Metz, SysProg and JOAT
On Wed, 20 Jan 2010 01:23:17 +, Ted MacNEIL wrote:
>>Some folks have asked about how to delete all members from a PDS without
>deleting the PDS. I just stumbled across this while doing a receive from
>ServerPac CPP.
>
>IDCAMS:
>
>DELETE MY.PDS(*)
>
>I have a few REXX programmes using that.
>
Adauto wrote:
... I have an assembler batch program where I need to obtain
this kind of information. I would like to take this information through same
macro or control block or ...
What can I do in this case ?
You get this information using the GETATTR function of FAMS. It's use is
docume
>Some folks have asked about how to delete all members from a PDS without
deleting the PDS. I just stumbled across this while doing a receive from
ServerPac CPP.
IDCAMS:
DELETE MY.PDS(*)
I have a few REXX programmes using that.
-
Too busy driving to stop for gas!
Some folks have asked about how to delete all members from a PDS without
deleting the PDS. I just stumbled across this while doing a receive from
ServerPac CPP. I noticed this REXX in and amongst the JCL.
SCPPCENU(CPPEDELM) Everyone who has used CPP should have a copy. Its only
about 100 line
I had a look & it seems
%80+ JES inits
%20- WLM inits
Also a HOTBATCH SC is used, so 7 SC is used for all batch.
Rgds,
Rez
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu wi
> Why does the percent of page slots keep increasing over time.
That got me too. First I thought we had a bug. But it appears to be a feature.
It seems that not all page-outs would be brought in, unless they are wanted.
I like the idea of NOT running the big sort jobs at the same time.
Rez
Me
We had a problem with a system with not enough page space defined. I remember
discussions a long time ago on IBM-Main saying that if you have local page
datasets of differing sizes, that you will never use all of the space on the
larger page datasets if you add a larger page dataset. Is that s
Hi List,
Being an MQ novice (OK, blatantly clueless about it) I have what could
be a rather simple question on it. MQ was set up here by a contractor
so I really don't know much about the setup. I can get queue names and
so on.
I am migrating from z/OS 1.7 to 1.10, and part of this is upgrading
Lindy:
I found it fascinating back then in the 60's and, like you, I still do.
Though I've done less programming recently than back in the good old
days, I still look for (and take) any opportunities that come along. :-)
Mike Myers
Mentor Services Corporation
Lindy Mayfield wrote:
Seriously
---
I have an old assembler program which we call numerous times from a rexx
script. There seems to be an issue introduced with our z/OS 1.10 upgrade
which did not previously exist... the memory usage builds up and
eventually abend
Seriously, you guys are so so cool. Back in the good ol days when a system
programmer was actually a programmer and not simply a sysadmin.
Me I'm just a young kid that finds this stuff fascinating. really fascinating.
-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-
Alan Altmark wrote:
A DAT-off operating system with 370ACCOM ON just might work. 370ACCOM
doesn't just cover I/O, but also handles BC-mode PSWs, storage key
management, the interval timer, interruption parameters, and other
S/360-S/370 widgets.
See Ch. 27 or so in the CP Programming Services b
If Lindy actually comes up with a working version of PCP, that would be
something I would like to see, just for old time's sake. It's been a
long time since I last saw it run.
I started IBM programming school the day after OS/360 release 1 (PCP)
went GA, and it was the first system ever progr
On Mon, 18 Jan 2010 15:19:50 -0500, P S wrote:
>Ah, true, if SIE handles it, you're SOL. But since 370ACCOM works, I
>*think* an invalid opcode gets to CP. Would have to look; as you say,
>in the (bad) old days, we know CP would have been handling it for
>sure! SIE is pretty amazing...
A DAT-off
Jeffrey Deaver of the IBM Mainframe Discussion List
wrote on 01/19/2010 01:34:11 PM:
> STR5,SAVER5
> GETMAIN EC,LV=(5),A=TABLADDR,SP=2
>
> L R5,SAVER5
> FREEMAIN R,LV=(5),A=TABLADDR,SP=2
>
> SAVER5 DCF'0'
>
> So I think I have the form right, its not complaining about the FREEMAIN
Lindy Mayfield wrote:
Lindy is only trying to understand the code that Fred and his team spent a portion of a billion dollars writing. I fear that getting it running on Hercules would be a wonderful challenge, but in the end a letdown because once it is running I wouldn't be able to do much. I'm
Lindy is only trying to understand the code that Fred and his team spent a
portion of a billion dollars writing. I fear that getting it running on
Hercules would be a wonderful challenge, but in the end a letdown because once
it is running I wouldn't be able to do much. I'm happy traipsing thr
Do you have any OPEN's for DCBs using QSAM? That will acquire buffers, I think
that they're in SP0. You need to do a FREEPOOL immediately after you CLOSE the
DCB to release them.
--
John McKown
Systems Engineer IV
IT
Administrative Services Group
HealthMarkets(r)
9151 Boulevard 26 * N. Richl
After executing a DESERV macro with the function GET_ALL, a (possibly
large) memory area is returned headed by the DESB with the remainder
populated by SMDE's representing each member. From reading the FM, it
looks like the DESERV function RELEASE is intended to be used to release
this storage.
D
Shedlock, George wrote:
Then there is the possibility that you can write your own macro to handle these issues.
That is if you know what it is "supposed" to do in the first place.
The issue is more complicated than that.
If Lindy intends to port OS/360 to the ESA/390 architecture, it's going
STR5,SAVER5
GETMAIN EC,LV=(5),A=TABLADDR,SP=2
L R5,SAVER5
FREEMAIN R,LV=(5),A=TABLADDR,SP=2
SAVER5 DCF'0'
So I think I have the form right, its not complaining about the FREEMAIN
being invalid anymore, but its also not working as I would expect it.
Initially, it was complaining b
Then there is the possibility that you can write your own macro to handle these
issues. That is if you know what it is "supposed" to do in the first place.
George Shedlock Jr
AEGON Information Technology
AEGON USA
502-560-3541
-Original Message-
From: IBM Mainframe Discussion List [mailto
I can't see that you have allocated the input KSDS.
Add
ALLOC F(VSAMKSDS) DA('MY.VSAM.FILE') SHR REUSE
On Wed, Jan 20, 2010 at 12:47 AM, Rich Smrcina wrote:
> On 01/19/2010 06:16 AM, Lizette Koehler wrote:
>>
>> Have a look at file 268 on the CBTTAPE. It is a rexx that reads VSAM
>> datasets.
Jeffrey Deaver wrote:
GETMAIN EC,LV=(5),A=TABLADDR
TABLADDR DCA(0)
And I was thinking that the freemain would just be
FREEMAIN R,LV=(0),A=TABLADDR
But that results in:
IEA705I ERROR DURING FREEMAIN SYS CODE = 30A-1C
The contents of R0, for your form, must be the same as R5 for
the G
I have an old assembler program which we call numerous times from a rexx
script. There seems to be an issue introduced with our z/OS 1.10 upgrade
which did not previously exist... the memory usage builds up and eventually
abends. There is no freemain in the program, so I'm thinking adding one at
Jan,
A program can be fetched by one module [during the first CALL] and then also
get called by other modules. I don't know how to track the FETCHER, but I
have an Assembler subroutine that returns a module name of the current
CALLER.
If you are interested, please, contact me offline.
-Victo
-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
Behalf Of esmie moo
Sent: Tuesday, January 19, 2010 8:28 AM
To: IBM-MAIN@bama.ua.edu
Subject: LOOKING FOR DOC ON NOTE/POINT LOGIC
Good Morning Gentle Readers,
=A0
I am trying to trouble shoot a problem
Sam,
Thanks for the info. I will check it out.
--- On Wed, 1/20/10, Sam Siegel wrote:
From: Sam Siegel
Subject: Re: LOOKING FOR DOC ON NOTE/POINT LOGIC
To: IBM-MAIN@bama.ua.edu
Received: Wednesday, January 20, 2010, 3:33 AM
On Tue, Jan 19, 2010 at 2:28 PM, esmie moo wrote:
> Good Mornin
On Tue, Jan 19, 2010 at 2:28 PM, esmie moo wrote:
> Good Morning Gentle Readers,
>
> I am trying to trouble shoot a problem which invokes NOTE/POINT LOGIC. I
> GOOGLED it but I didn't find what I was looking for. Would anyone know who
> the vendor is or if there is a site that I could look at?
Good Morning Gentle Readers,
I am trying to trouble shoot a problem which invokes NOTE/POINT LOGIC. I
GOOGLED it but I didn't find what I was looking for. Would anyone know who the
vendor is or if there is a site that I could look at?
Thanks in advance.
_
Penny,
The following somewhat dated manual has sample code for JES Exit 6 that
should do what you want.
GG66-3218 - RACF Security Administrator's Quick Reference
Regards, Bob
Robert S. Hansel
Lead RACF Specialist
RSH Consulting, Inc.
www.rshconsulting.com
617-969-8211
-Original Message
Hi Barbara,
I know it doesn't count as an official publication, but the additional 2gb
in the high common are actually documented in the z/OS v1r10 implementation
redbook (sg24-7605).
Gil.
On Mon, Jan 18, 2010 at 7:43 AM, Barbara Nitz wrote:
> Elpida,
>
> >z/OS adds 2G (for system use) to the a
On Mon, 18 Jan 2010 03:36:10 -0600, Penny Kay wrote:
>Historically at our site we checked the jobcard in Exit 2 which had
>time specifications in the accounting field and then added time and class
>according to those specifications.
>Finally, we are moving from z/os 1.6 to 1.8 and have to eit
My response is not directly to this posting, just my comments to the original
question. I do not have the original post.
First, I have to ask what is more important to you? Is it SORTs or your online
systems?
I will assume online.
We had problems with large sorts impacting our online. CICS is
I use this JCL:
//SMPEEXEC PGM=GIMSMP
//SYSPRINT DD SYSOUT=*
//SMPOUT DD SYSOUT=*
//SMPRPT DD SYSOUT=*
//SMPSNAP DD SYSOUT=*
//SMPCSI DD DISP=SHR,DSN=SYS1.MVST.CSI
//SMPCNTL DD *
SET BDY(??).
LIST DDDEF.
/*
My question is there any
On Sun, 17 Jan 2010 23:20:05 -0600, R Hey wrote:
>I know WLM & JES inits should not use the same SC, but what would be
>the 'cost' of doing so?
>
>Like have 3 SC : BAThi/md/lo for both WLM & JES inits.
It depends. With WLM inits the queue delay is part of the equation in
determining the PI.
On 01/19/2010 06:16 AM, Lizette Koehler wrote:
Have a look at file 268 on the CBTTAPE. It is a rexx that reads VSAM
datasets.
Lizette
If that's the RXVSAM package/function, I've made good use of it. Good
stuff, I highly recommend it.
--
Rich Smrcina
Phone: 414-491-6001
http://www.lin
On Mon, 18 Jan 2010 10:47:30 +0100, Miklos Szigetvari
wrote:
>Hi
>
>Do we need a JES COLD start to changed some classes to WLM managed ?
>(according the book yes we need)
>
The manual is correct. You need a cold start for a change made via PARMLIB
to take effect. However, if you read a little
On Sun, 17 Jan 2010 20:54:52 -0600, R Hey wrote:
>
>> It's a side issue... but if they
>
>I didnt get your point here.
>Are you saying I should use less SC for JES inits alone?
>
My point was this: Most shops who convert to WLM INITs do it for all work
or the vast majority of their work.
Page out is asynchronous and will only affect paging performance to the
extent that the channel/device is not available for demand page-in.
By %USE I meant page slots used, meaning increase in page out.
> Why does workflow drop from %use?
too much juice wasted on paging out/in.
The issue is no
I'm curious. Why does the percent of page slots keep increasing over time.
I would think that when a job ends, all its page slots would dropped, and all
the space taken in the page dataset would be released. I have noticed that kind
of behaviour also. I suspect that long running started tasks ar
Rather than using OUTTRAP allow the output to go to your terminal with trace
?i. This way you can see what is or is not working.
With vsam all messages that go to SYSPRINT could help in identifying your
issue. It maybe that you did not do an ALLOC DD(VSAMKSDS) or freed
SYSPRINT.
The messages wo
In <45d79eacefba9b428e3d400e924d36b902fa5...@iwdubcormsg007.sci.local>, on
01/18/2010
at 05:35 PM, "Thompson, Steve" said:
>And you have hit upon another problem. Certain instructions used in
>macros from the F Assembler days won't work in the H-ASM or HL-ASM
>environments (macro debug that F
In <0377b9a583fd0e4aacd676ee33ee994b2abbc...@sdkmail13.emea.sas.com>, on
01/17/2010
at 06:08 PM, Lindy Mayfield said:
>I was looking for the 1st OS, which I think is PCP. Is that correct?
No. The first OS predates the S/360. PCP is just a sysgen option of
OS/360. On S/360 I believe that BOS/
Check maybe the SYSPRINT VSAMKSDS allocation ?
Umamaheshwar Iyer wrote:
Friends, Friends
I am trying to read a VSAM KSDS file thru REXX. Here is what I have
"ALLOC ds('"tempfile"') dd(tempdd) new SPACE(5,5) DSORG(ps)",
"RECFM(f,b) LRECL(80)"
Friends, Friends
I am trying to read a VSAM KSDS file thru REXX. Here is what I have
"ALLOC ds('"tempfile"') dd(tempdd) new SPACE(5,5) DSORG(ps)",
"RECFM(f,b) LRECL(80)"
if rc/=0 then do
say
> Subject: How to obtain "TGTZONE
> From: Hilario
> Subject: How to obtain "TGTZONENAME" in an existing SMPE dataset
> My question is there any way to obtain this name ?
using your very JCL, you could list all zones (target & DLIBs) related to your
GLOBAL zone :
//SMPCNTL DD *
SET BDY(GLO
Hi,
I will try to list the DDDEF of a target SMP/E. Problem is that the file were
created for a person that left the company and there isn't any documentation
about it. I tried with the most usual names: MVST, MVST100, TGT1, and
so on.
I use this JCL to do this:
//SMPEEXEC PGM=G
Reza,
What does it matter if the slot count grows the way you described> the slot
count does not affect performance, nor does writing those slots. Apart from
keeping slot allocation efficient you should not be concerned with a slot
usage less than 30%.
So what you are saying is that when the larg
56 matches
Mail list logo