I attach a Rexx program to calculate and display the biorhythm values
for a given date of birth and current or whatever other date.
If 'management' complains that home workers are not putting enough
effort into their working-from-home time, they can run this thing and
send its output to 'manageme
One or the other, not both. It's OK to use either/or on a catalog by catalog
basis, but you cannot double down. Reference z/OS 2.2.0 DFSMS Managing
Catalogs - Accessing Catalogs for Record Level Sharing, Restrictions:
* Master catalogs are currently not supported in RLS mode. Ensure that any
ObTheElements And there may be many others but the haven't been discovard.
> byte sizes: 6, 8, 12 bits
byte sizes: 6, 8, 9, 12, 18 bits
In addition, the IBM 7030 could address to the bit level with byte size from
1-8 and both CDC 3600/3800 and DEC PDP-6/PDP-10 had special instruction with
vari
You are talking about packed unsigned math a that has been around in IBM CPCS
since forever
Sent from my iPhone
> On Apr 23, 2020, at 21:09, Charles Mills wrote:
>
> I believe the Enterprise COBOL 6 compiler generates code that takes
> advantage, assuming ARCH(12) is specified.
>
> If you
I believe the Enterprise COBOL 6 compiler generates code that takes advantage,
assuming ARCH(12) is specified.
If you are *not* specifying ARCH(nn) where 'nn' is the architecture level of
your oldest machine (don't forget DR!) then you are leaving MSU's on the table.
The ARCH(nn) level is two l
Just wondering if any shops have taken advantage of these new instructions
on the Z14 and Z15 and if so, how is your real world experience?
https://ibmsystemsmag.com/IBM-Z/01/2018/vector-facility-z14
Looking at IBM's benchmarks they look pretty good and could have a postive
effect on reducing you
From today's point of view some people think that 8 bit bytes and 32
bit words have existed forever.
In contrast:
byte sizes: 6, 8, 12 bits
word size: 16, 18, 22, 24, 32, 36, 48, 60, 64
address size: 16, 18, 22, 24, 31, 32, ...
number format: 2's complement, 1's complement, sign/magnitude
from
Search your console log for output like this (this is Dallas):
$HASP249 COMMAND RECEIVED FROM AUTO COMMAND ID=0007 204
$OS(1-)
$HASP003 RC=(52),O 205
$HASP003 RC=(52),O S(1-) - NO SELECTAB
To expand on this. If you look in the SYSLOG when the job purges, just before
that, you should see the action that changed its status.
> -Original Message-
> From: IBM Mainframe Discussion List On
> Behalf Of Lizette Koehler
> Sent: Thursday, April 23, 2020 3:17 PM
> To: IBM-MAIN@LISTSER
Basically SDSF does not purge output.
You should some $VS command in JES2 or an automation tool that would purge
output
Second you can code JES2 parms to HOLD KEEP PURGE functions for given Output
classes. Use the $DJOBCLASS(??),LONG to see what the DISP= is set at for that
class.
-Ori
In real life I'm a programmer and security jock, but one of the systems I run
RACF for is a small rented space at IBM's Dallas data center - "small" meaning
there are currently three users if you include me, four if you count an
inactive ID for the boss. None of us are systems programmers, but
You might like this website: https://mrxhist.org
Joe
On Thu, Apr 23, 2020 at 3:48 PM Christopher Y. Blaicher <
cblaic...@syncsort.com> wrote:
> At one point I worked on a Memorex 1380 (for Memorex). It was a
> programmable telecommunications front end like the IBM 3705.
> I wrote SDLC code for
?
Byte addressing on the 1106 was direct, specified in the j field of the
instruction. Indirect addressing only used the right 22 bits of the indirect
address word. At least on the 1106 you had a choice of byte sizes.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
__
If an LPAR that were soft-capped by PR/SM had capping "kick in"* would an
ENF 61 WLMENF61_CAPACITY_CHANGE be generated?
*I mean for example if an LPAR were soft-capped at 50 MSU/hour, and a single
short job consumed 200 MSU, pushing the R4HA over 50, and causing the LPAR
to be capped at 50 MSU for
At one point I worked on a Memorex 1380 (for Memorex). It was a programmable
telecommunications front end like the IBM 3705.
I wrote SDLC code for it. It had its own assembler. It was a fun machine, but
so long ago I can't remember much.
Chris Blaicher
Technical Architect
Syncsort, Inc.
---
It helps if you get the subject line spelled correctly.
As they say, "No brain, no pain.".
PF.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-
I remember one summer working on a Univac-1106 in assembler.
Ones complement, 36 bit-words.
Indirect addressing to a byte.
I wasn't crazy about it having come from the IBM world and direct byte
addressability.
But it was a job.
Pierre.
-
From IARST64 to BPX4RED.
I've obtained an above-the-bar area so that I can read into it using BPX4RED.
I have a valid address and buffer length.
When I issue the call in 64-bit mode, I get errno=118 meaning EFAULT (The
address is incorrect).
The errno Jr or reason code, for what it's worth, is EF
Peter,
Thanks for the help.
When I did a display of the X'8000' area above-the-bar, I was only
seeing the first 8K X'2000'.
I ran through the memory right after the IARST64 accessing each 8K. No
abends. When I browsed the memory in IPCS, I saw the entire X'8000'.
I conclude that if t
Where did you think I picked up the phrase? I've also used it for a 4Kx4K
monitor back when they cost as much as a house.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
I meant that CDC stopped being exclusively 1s' complement with the STAR-100
(which they later spun off, alas.)
Why should I breathe a sigh of relief? I hate lust in my heart for the 3600 and
would have been perfectly happy to see the Cyber line remain viable.
--
Shmuel (Seymour J.) Metz
http:/
> CDC until STAR-100
Well, actually CDC until the bitter end. Cyber 180s, introduced in the
early 1980s could do both.
The bitter end was last year, so you IBM guys can finally breathe a
sigh of relief with that bit of competition off the table.
--
Will
-
ITYM ECS. (Enahnced Catalog Sharing).
ECS is specific to catalogs and uses a structure for inter-image communication.
RLS uses a local address space (SMSVSAM) for local communication AND a
structure for inter-image communication.
Both are performance related.
IMO, RLS is more appropriate for a
> There are also possibilities that the switch from amode 31 to amode 64 was
> not preceded by making sure to zero the high halves of all relevant
> registers (whatever those registers might be).
LLGT(R) is your friend.
Charles
-Original Message-
From: IBM Mainframe Discussion List [m
On Thu, 23 Apr 2020 11:43:53 -0400, David Spiegel wrote:
>1s' complement as in ... CDC?
>(I used to program FORTRAN on CDC and had to deal with "Negative Zeroes".)
>
Also needs to be dealt with in sign-magnitude.
And sign-magnitude has a symmetric range, which numerical analysts
care about someho
Hi R'Shmuel,
You said: "... I had lust in my heart ..."
This is reminiscent of a former US president.
Regards,
David
On 2020-04-23 12:04, Seymour J Metz wrote:
CDC until STAR-100 and UNIVAC until 360 compatible line. There were some
smaller companies that used it, but I can't remember who the
CDC until STAR-100 and UNIVAC until 360 compatible line. There were some
smaller companies that used it, but I can't remember who they were. My hands-on
experience with 1s' complement was with the CDC 6400 and the UNIVAC 1230,
although I had lust in my heart for the CDC 3600..
--
Shmuel (Seymo
1s' complement as in ... CDC?
(I used to program FORTRAN on CDC and had to deal with "Negative Zeroes".)
On 2020-04-23 11:37, Seymour J Metz wrote:
Real programmers use ones' complement ;-)
I don't know of any machine that uses a ten's complement representation, but
the idea is appealing.
--
Real programmers use ones' complement ;-)
I don't know of any machine that uses a ten's complement representation, but
the idea is appealing.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV
On Thu, 23 Apr 2020 09:21:16 -0500, Paul Gilmartin wrote:
>I once wondered in these lists why, while F-type values wisely use
>2's complement, P-type values are sign magnitude where 10's
>complement would provide 5 times the range in the same storage
>and avoid the need for a possible recomplement
Ok, building parallel sysplex. For the catalogs I am planning on using ECS for
the shared catalogs (which is all of them).
What is the recommended method for handling the catalogs in a parallel sysplex,
ECS or VSAM RLS?
Thanks,
Peter
---
On Thu, 23 Apr 2020 13:50:48 +0200, R.S. wrote:
>
>It wasn't single byte per record in single table! It was (it *IS*)
>element of some culture - to avoid dummy characters.
>How many? It depends. For well constructed record the room for savings
>is zero or close to zero.
>For PFCSK ever date contain
[Default] On 22 Apr 2020 20:44:43 -0700, in bit.listserv.ibm-main
g...@gabegold.com (Gabe Goldberg) wrote:
>When I joined Mitre Corporation in 1971, my first TIAA-CREF end-of-year
>retirement statement predicted benefits I'd receive starting February 1,
>2012. I suspect they'd been calculating/s
Some other things I have observed. Sequentially searching large arrays
for each input record, when the input data set contained 100,000's of
records. Use of DISPLAY DECIMAL or COMP-3 subscripts instead of INDEX's
or at the very least using a COMP subscript.
Switching to SEARCH ALL and INDEX's
Fully agree with all of that. In addition, proper blocking will reduce CPU and
DASD connect time. The worst offenders, are the ones who hard code block
size in the COBOL programs. Case in point, application program specified a
block size equal to record length, writing to tape. The job ran for
W dniu 22.04.2020 o 22:04, Phil Smith III pisze:
I sure hope someone got a big bonus for saving that byte...
Oy. Did not mean to cause a firestorm over this. Sure, it can add up; but a big database
back then was what, 10M rows? So saving one byte was 10MB, not nothing, but still only 5%
of
Adam,
Believe me or not, but I (my folks) saved a lot of space by changing
BLKSIZE to correct one, means SDB. It was not only JCL, but also COBOL.
What is "a lot of space"? It was enough free space on our huge 500GB
DASD box to NOT PURCHASE ANOTHER BOX. Multiply it x2, because we used PPRC.
We a
On 2020-04-23 4:58 AM, Tony Harminc wrote:
So is that record of the previous allocation kept in some
private/undocumented place by allocation, or do TIOT entries remain in
place (perhaps flagged somehow) and provide all the necessary info?
Deconcatenation is pretty much just restoring the DD na
On Wed, Apr 22, 2020 at 6:16 AM Knutson, Samuel <
samuel.knut...@compuware.com> wrote:
> Hi John,
>
> z390 Portable Mainframe Assembler and Emulator
> http://z390.org/
I now remember looking at this long ago. It was nice, but not what I was
looking for. I was looking for something more "GUI inte
WTF? How is answering Gil's questions about CLIST dissecting your code? Would
you have answered RYFM?
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Wayne Bickerdike [
Thanks to all that contributed to this thread. We recently separated two lines
of business, each with its own sysplex, jesplex, etc.
As it turns out, I discovered the reason for the TGSIZE=24: tens of thousands
of small PRT jobs generated daily.
So while I won't be changed that JESPLEX environm
Fair play Wayne! At least you can still remember CLIST! I recently had
to convert some CLIST code to REXX and it was about as much fun as a
holiday in the Sahara!
On 2020-04-23 3:24 PM, Wayne Bickerdike wrote:
Wow, code an example and it gets totally dissected. I'll write the next
"you beaut
Wow, code an example and it gets totally dissected. I'll write the next
"you beaut line of code" and you guys can QA it. Is that how Oracle got so
big?
On Thu, Apr 23, 2020 at 1:27 PM Seymour J Metz wrote:
> EXIT leaves the CLIST.
>
> IF &NRSTR(&DS) THEN EXIT
>
> DO WHILE 1 = 1
>
>
> --
> Shm
43 matches
Mail list logo