Re: Some fun with IBM acronyms and jargon (was Re: Auditors Don't Know Squat!)

Does anyone have a copy of the old JARGON FILE that buzzed around the IBM VM network in the '90s when i was working in Portsmouth North Harbour? I'd love to see it again. I think it included discussion of Bubblegum vs. Boeblingen.

Re: Some fun with IBM acronyms and jargon (was Re: Auditors Don't Know Squat!)

Many thanks. This is odd. I have searched several times over the years and found poor imitations ir just snippets. This week i have only the phone to use, but i did search before posting. Oh well, i'm happy now:-) Thanks again!

Re: Dynamic Alocation question

I am a bit rusty, but I think you allocate it first (get a SYSn DD name) before CONCAT with other dataset/s. On 4 Aug 2014 02:45, MichealButz michealb...@comcast.net wrote: I keep on getting 0360 In the S99ERROR filed Invalid text key I have the following question can I dynamically

List mail being marked as spam

Gmail tells me it is marking as spam because other people are marking it as spam. So if you know anyone who marks it as spam instead of sending an unsubscribe request, perhaps you would let them know there's a better way? :-) On Nov 29, 2014 4:49 PM, Donald Likens dlik...@infosecinc.com wrote:

Re: John Ehrman Assembler Book

No 'Update tree' instruction? ;-) Only kidding! This is a really useful doc for me, as I am a little rusty since my MVS/ESA days :-) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to

Re: Where can a running TSO program get its terminal name

Many years ago I had an MVS/ESA control block map from a course run by IMI. It got lost during a house move. Does anyone know anything that could replace it, please? Even if it only goes as far as 24-bit MVS it would be a big help right now :-)

Re: Strange 047 abend

From memory, S047 could be from any restricted SVC, so your dump would finger a x'0A' op code. I used TESTAUTH at one site, as you might guess an authorised version of the TEST command. Is it generally available? Otherwise, if you can't make progress any other way, could you run it in a safe

Re: COBOL Code Gened for MOVE COMP-3 S9(9) to S9(8)

> "That should be ZAP 3672(5,5),1971(1,5) or you will only get the first byte of the source field." I may be rusty, but surely the ZAP overlapping byte-for-byte with both operands 3672(5,5) will simply work as if processed from right to left, changing nothing apart from perhaps the sign, as

Re: Privately owned mainframes (Was Re: I just bought an IBM z890)

I have a yearning for a S/360 box to keep my garage/workshop warm in Winter. I already have some mods to MVS 3.8J under Hercules, to make it feel more like home :-) -- For IBM-MAIN subscribe / signoff / archive access

Re: WAIT >1 (Friday type question, a day late)

I think I used WAIT with a handful of ECBs in a started task. But it was many years ago and I don't remember details. At 14:41 -0700 on 06/18/2016, Charles Mills wrote about WAIT >1 (Friday type question, a day late): I just had occasion to RTFM on WAIT. I'm sure WAIT with an event count >

Re: [EXTERNAL] RFE opened on IEBGENER and PDS Corruption

I can see an obvious need to avoid corruption of the directory. Yet there is (or was) valid code (using BLKSIZE=256 from memory) to access a PDS directly. And wasn't IEBGENER with a dummy SYSUT1 used to repair the DSORG=PO of a PDS damaged in this way? So I think it would be difficult to make

Re: Logrec Analysis

I am rusty, but I think I saw this from a product trying to allocate a console. On 19 May 2016 9:06 a.m., "Jake Anderson" wrote: > Hi, > > One of our sandbox system took an outage, During the Outage period I found > the below messages in Logrec. > > ABEND S077 PSW

Re: TCB reference following DETACH

I'm very rusty (as in MVS/ESA), but I'd say yes. I'd normally grab any info I want before DETACH. On 3 Aug 2016 9:10 p.m., "Charles Mills" wrote: > I am trying to shoot a problem. The code in question makes reference to a > TCB shortly after issuing a DETACH for that TCB. Am I

Re: TSO TEST and SYSOUTTRAP/SYSOUTLINE

TEST behaves differently (or did, when I used it in the 90s) in CLIST. As I remember it, the CLIST that starts TEST keeps running for the TEST session, so the next line of a CLIST after the TEST command itself can be subcommands such as AT and GO. As I remember it, there were important

Re: Passings

I remember David online and his style was easily recognised. Whiskey in glass for toast right now. So long, David... To absent friends and family! On 25 Feb 2017 01:49, "David Purdy" < 00ac4b1d56b3-dmarc-requ...@listserv.ua.edu> wrote: > With deepest sorrow, I regret to say that David

Re: What is the STCB?

Related to this, does anyone have a scan of a big control block map, of the sort IMI Computing gave on their sysprog courses? Can be very useful for finding a CB or seeing where one can take you next :-) I lost mine :-( On 12 Sep 2016 15:16, "Charles Mills" wrote: > What is

Re: Question About ATTACHX and ECB

To get things clear, what's the RC from ATTACHX? Rupert On 1 Oct 2016 00:05, "Steve Thompson" wrote: > I'm doing some work and needed to do an ATTACHX with an ECB. > > So for test purposes I'm attaching IDCAMS. It runs and gives CC=0. > > Ok, in the main task, I've done the

Re: Dummy question on ISPF command

And in an edit macro, you can (well, you could a few years ago) access the counts of changes and errors using Address 'ISREDIT' (ChgC, ErrC) = CHANGE_COUNTS and I assume there is an ISPF variable already set for display in the long message from . On 2 Dec 2016 05:26, "Chris Hoelscher"

Re: 3270 emulator display/translation oddity with windows 10

I remember seeing something similar many years when an emulator was connecting using LOGON with APPLID and LOGMODE parameters. The wrong LOGMODE was the problem, in the end. Is that still a relevant issue? Rupert On 10 Mar 2017 14:00, "Pommier, Rex" wrote: > > Hello

Re: EXEC CICS ABEND PROCESSING, R13 clobbered.

Obvious question: was R13 ever set to a valid working storage address? Rupert On 14 Jul 2017 21:09, "Richard Craven" wrote: > This has me stumped (although that may not be too hard to do). > > I'm debugging an assembly program that has an EXEC CICS READ UPDATE... >

Re: Example of TSO Test call subcommand

TSO-REXX mailing list sounds like a good plan, but note the behaviour of Rexx and CLISTs is very different (at least, it was years ago when I did this). Briefly you can CALL an address, or module.entrypoint or just .entrypoint and you probably need to load it explicitly first. I think you can

Re: Unreadable code (Was: Concurrent Server Task Dispatch issue multitasking issue)

Fancy code? I remember once wanting to set a flag under certain circs, and I considered something like: /* Rexx */ TRUE = 1=1 FALSE = \TRUE . . . flag = TRUE I can't remember now whether I used it, or hated it. Rupert On Sat, 12 Jan 2019, 18:42 scott Ford, wrote: > Tony, > > I used Rexx

Re: Unreadable code (Was: Concurrent Server Task Dispatch issue multitasking issue)

On Sat, 12 Jan 2019, 23:43 Paul Gilmartin, < 000433f07816-dmarc-requ...@listserv.ua.edu> wrote: > > > More concisely: > TRUE = 1 > FALSE = 0 > > These are in he Rexx Standard; you may rely on them. Nonetheless, you > may choose to assign those mnemonics for clarity. > Yes, in the

Re: mainframe hacking "success stories"?

Old spool exit hack MVS/ESA and JES3, UK big bank Nasty Wetmonster. We had the usual assortment of exits and mods. We had a problem with jobs throwing excessive amounts of output to spool. The answer was surprisingly simple--put a STIMER (not STIMERM SET) in the exit, which slowed down that job

Amateur project: microcode emulation

Any advice, please? (apart from MVS 3.8J with Hercules. I already have that. But I lost the automation interface I wrote years ago) It's been many years since I was an IBM geek. MVS/ESA and JES3, with Z/OS on the horizon. Is there any microcode available (functionally equiv, if not the genuine

Re: What is my home PC IP address

Indeed, setting up a VPN can play havoc with the routing table, for example. I was hoping my reply would help to bring such issues to light. Roops On Mon, 29 Jul 2019, 16:23 Paul Gilmartin, < 000433f07816-dmarc-requ...@listserv.ua.edu> wrote: > On Mon, 29 Jul 2019 13:51:07 +010

Re: What is my home PC IP address

In the general case, your PC has an IP address for each interface. I don't know your example setup, but I hope this helps to pose the right questions:- It depends on where your VPN endpoint is. If you VPN to the site where MVS is running, then you should have an IP address on that subnet, as

Re: WTO

Perhaps I misunderstood, but it seems more likely that WTO has changed registers and affected the processing of the exit. Obvious candidates are condition code and regs 0,1,15 (I can't remember whether R0 is used). Are you using MF=(E, PARMLIST)? Time for a test module to run the edit where you

Re: Misuse of the word hexadecimnal (Was RE: COPYING PDS TO PDS ...)

>From "any hexadecimal character" my first guess would be "any character in the ranges 0 to 9 and A to F", with a further guess about whether it accepts both upper and lower case. Nothing else makes much sense to me :-) Rupert On Wed, 4 Dec 2019, 19:09 Gord Tomlin, wrote: > On 2019-12-04

Most-used instructions? Just for fun.

Has anyone seen a list of the most-used machine instructions? Rupert -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Most-used instructions? Just for fun.

t the most used instruction, not about the most popular > instruction is the code. ;-) > > BTW: the name (NOP) is just common name in IT world, not necessarily > official name from mainframe realm. > > -- > Radoslaw Skorupka > Lodz, Poland > > > > > > W dniu 2019-

Re: Most-used instructions? Just for fun.

The last time I looked (many years ago) there wasn't a NOP! We used BCR 0,0 On Mon, 9 Dec 2019, 15:42 R.S., wrote: > W dniu 2019-12-09 o 11:05, Rupert Reynolds pisze: > > Has anyone seen a list of the most-used machine instructions? > I know first one: NOP > > -- > Rad

Re: Backward compat--how far?

> If you think about it, it is a subset of the conditions allowed by AMODE > 31, RMODE ANY. > > Charles > > > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of Rupert Reynolds > Sent: Monday, D

Backward compat--how far?

Another question, purely out of interest: Can the old MVS/SP code still run unchanged? I reminisced with a friend about the day he whinged about a 64k code segment size on Intel micros and I out-whinged him with a 4k code CSECT :-) Can a modern z/OS installation still assemble, link and run the

Re: Backward compat--how far?

uture_Systems_project if you don't > know what I am referring to, especially the last paragraph under Project > End. > > Charles > > > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of Rupert Reynolds >

Re: Backward compat--how far?

"whigning"? (if y'all > insist on having a silent 'g' in there). That's rhetorical; the spelling > is "whinging" regardless. > > sas > > > On Mon, Dec 16, 2019 at 3:48 PM Rupert Reynolds > wrote: > > > Another question, purely out of interest: >

Re: WTO

Whatever happened to CVTUSR? Back in the 1990s we used to have (from memory) a started task that came up briefly during IPL and it allocated storage (I forget what key, but read only in the general case) for a vector table, pointed CVTUSR at that, and then it stopped itself. So if I was (say) at

Re: WTO

ahem! I meant to say CVTUSER, a very different field from CVTUSR :-) On Sat, 30 Nov 2019, 15:17 Rupert Reynolds, wrote: > Whatever happened to CVTUSR? Back in the 1990s we used to have (from > memory) a started task that came up briefly during IPL and it allocated > storage (I forget

Re: WTO

Yes, using CVTUSER sensibly for a whole organisation requires authorised code to run at IPL time, which must allocate a USERVT in common storage and point CVTUSER at that. There will be other ways, but once that work is done, it is relatively little work to use it for each product that needs an

Re: WTO

I confess I thought we were talking about a single installation. But as I said, I was asking mainly out if interest, and to see whether IBM have done anything with it, rather than making a recommendation. Ruz On Sun, 1 Dec 2019, 14:28 Peter Relson, wrote: > Regarding CVTUSER, the problem, as

Re: unpack ispf table for ISPT037 error

I searched and found "ISPT037 Library format error - Invalid record: Table= TTRN= Offset=." So if you still have the message, you could perhaps estimate where the error is in the member. Packed? Back in the day, when I was a sysprog, we didn't pack tables. I have no idea

Re: IP 0.0.0.0

On Mon, 23 Dec 2019, 10:12 Joe Monk, wrote: > "0.0.0.0 is non-routable and a typical use in traffic would be in DHCP, in > which an adaptor doesn't have an address assigned yet and the device sends > out a DHCP request from 0.0.0.0 asking to be assigned a proper address." > > PCs dont send DHCP

Re: IP 0.0.0.0

clue why it has traffic with Mainframe IP when it is > not even listening on any application > > On Mon, 23 Dec, 2019, 12:28 PM Rupert Reynolds, > wrote: > > > 0.0.0.0 is a special "no address" or "any address", depending on context. > > > >

Re: it was 20 years ago today ....

. . . "Sgt Pepper taught the band to play" :-) On Tue, 31 Dec 2019, 18:26 Chris Hoelscher, wrote: > Has it been 20 years since Y2K?? sometimes it seems like last year, other > times seems like another lifetime . > > Thank You, > Chris Hoelscher| Lead Database Administrator | IBM Global

Re: it was 20 years ago today ....

Ah . . . sigh . . . A story I can tell now: One night around the new year, at the end of 1999. I was wondering around (client) with a bottle of nice sparkling wine, looking for somewhere to keep it cool. It was a special one-off night shift tacked onto the ml llend of a contract. I was to stay

Re: IP 0.0.0.0

0.0.0.0 is a special "no address" or "any address", depending on context. If a listening server socket binds to 0.0.0.0 then it listens on any interfaces present, which might be two adaptors with addresses 192.168.something and 10.something, for example. 0.0.0.0 is non-routable and a typical use

Re: About the "hello world" program

Talking of "Hello, world!", I remember working in ISPF/TSO, when a line-mode message filled the screen. A text rendering of a ghost and "Nasty Wetmonster* phantom strikes again!". Everyone in the office got it. I looked up the TPUT macro and found the USERIDL= parameter. Some clown was scanning

Re: Here we go again

On Wed, 22 Apr 2020, 19:29 Seymour J Metz, wrote: > True, but as an amusing side note there were Y2K bugs that were not worth > fixing, like displaying the year as 100 instead of 00. Unfortunately, most > were not like that. > And thus was born the "Year 19100 bug" :-) Rupert

Re: REXX true/false (was Constant Identifiers)

Writing Rexx for myself (therefore no local standards to follow) I had to set an internal boolean in a few places. So I started it with TRUE = (1=1) FALSE = \TRUE That's partly because I couldn't find doc on Rexx standards (no WWW yet) and I didn't like to assume that 1 and 0 were always valid

Re: REXX true/false (was Constant Identifiers)

days later they cancelled the software licence over a different, bigger bug. Ho-hum :-) Rupert On Sat., Sep. 5, 2020, 23:56 Paul Gilmartin, < 000433f07816-dmarc-requ...@listserv.ua.edu> wrote: > On Sat, 5 Sep 2020 23:36:37 +0100, Rupert Reynolds wrote: > > >Writing Rexx for

Re: Constant Identifiers

As I remember PL/1 from the 1980s (and very definitely pre-LE) the rules for implicit conversions were well-defined, but needed care. Simply adding parentheses would allow me to control the use of integer operations. I'll be watching for more recent (relevant) exerience :-) Rupert On Sun., Sep.

Re: REXX true/false (was Constant Identifiers)

Loss of Internet access would have been sheer luxury! (insert The Four Yorkshiremen sketch here) as this was the 1980s :-) The Internet was there, but nobody had heard of it unless he was the sort of geek who soldered his own modem cable, and WWW was probably not even a twinkle in timbl's eye

Re: REXX true/false (was Constant Identifiers)

mason.gmu.edu/~smetz3 > > > > From: IBM Mainframe Discussion List on behalf > of Rupert Reynolds > Sent: Sunday, September 6, 2020 4:48 PM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: REXX true/false (was Constant Identifiers) > > Loss of Internet access would have

Re: REXX true/false (was Constant Identifiers)

I don't see any advantage in 'Y', because then you have to code IF or WHEN variable = 'Y'. The advantage of Boolean is clarity in something like:- /* Rexx */ TRUE = (1=1) ... SELECT WHEN logmode = "D4A32782" & (GotASCII & GotVBMrecord) THEN do (from a similar exec I found in archives, not the

Re: REXX true/false (was Constant Identifiers)

ice for clarity. > > > -- > Shmuel (Seymour J.) Metz > http://mason.gmu.edu/~smetz3 > > > > From: IBM Mainframe Discussion List on behalf > of Rupert Reynolds > Sent: Sunday, September 6, 2020 12:43 PM > To: IBM-MAIN@L

Re: REXX true/false (was Constant Identifiers)

Confused? Difficult to say--the brash nature of this debate is clouding things. There is an example above which uses something like ''0001'B to initialise a variable. In Rexx, that is not a boolean value. Depending on which interpreter you use, it is either a byte with contents x'01', which

Re: EBCDIC and other systems

; Charles > > > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of Rupert Reynolds > Sent: Thursday, August 20, 2020 5:55 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: EBCDIC and other systems > > I'm writing a

Re: EBCDIC and other systems

China, Korea and Vietnam. > Our Japanese customers use EBCDIC codepage 930. Our Taiwanese customers > use EBCDIC codepage 937. > > > Sent from my iPhone > > > On Aug 20, 2020, at 8:54 AM, Rupert Reynolds > wrote: > > > > I'm writing a new OS for PC hard

EBCDIC and other systems

I'm writing a new OS for PC hardware (an exercise started during lockdown/furlough) and I wondered about files from other systems. Is there much in DBCS on mainframe systems these days, or is it still mainly the same old 8-bit EBCDIC, please? I still have to decide whether to support UTF-8 and/or

Re: SVC 99 unallocating a concatenated dataset

I'm very rusty (MVS/ESA) but from my POV it seems to me that you need to free each DDNAME that you concatenated, individually after decat. Unless you can simply FREE the DDNAME of the concatenation? Rupert On Thu., Oct. 1, 2020, 18:25 Joseph Reichman, wrote: > I’m running the program under

Re: Goodbye.

Kees, your contribution over the years has been a joy to behold, and I hope you will consider subscribing with a personal e-mail address, even if you only drop in occasionally to say "Hi" Rupert On Mon., Aug. 3, 2020, 21:55 willie bunter, < 001409bd2345-dmarc-requ...@listserv.ua.edu> wrote:

Re: ISPF development question

Back in the old daze, simply entering option 7 once (and then exiting) was enough to make panels re-load each time they were updated for the rest of that session. Roops On Thu, 30 Jul 2020 at 07:49, Itschak Mugzach < 0305158ad67d-dmarc-requ...@listserv.ua.edu> wrote: > PDF is an alias of

Re: Assembler question

The question on my mind is "What did you want to achieve?" If you wanted an aligned fullword for OW0007AC then you need to decide whether to align REPORT07 2 bytes after a fullword boundary (precede it with CNOP 2,4 from memory) or whether you want slack bytes in the record. Back in the olde

Re: Goto Statements AND COBOL OPTIMIZATION

I lost faith COBOL and finallly became a PL/1 biggot when I was told that ALTER GOTO was introduced to help support structured programmng :-) Rupert On Thu, Jun 11, 2020, 01:07 Tom Ross wrote: > >The addition of EXIT PARAGRAPH > >and EXIT SECTION have eliminated most of the reasons for use of

Re: Goto Statements AND COBOL OPTIMIZATION

ask yourself: Is it possible that point > already arrived, but it happened too slowly to notice? -Chris Evans */ > > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of Rupert Reynolds > Sent: Thursday, June 11, 2020

Re: Still COBOL After All These Years?

Yup. I'm a C, PL/1, assembly and C bigot myself, but the plain truth is that COBOL is mostly just a wordier way of doing the same things that other languages do. And re-writing, if it isn't done very thoughfully, tends to make things worse in my experience. Rupert On Thu, 16 Jul 2020 at

Re: Assembler question

OW... are the output fields i defined it exactly as in the DSECT got from the macros. > As it is an output field, the position is important (and it is why i > detected a problem in the positions of my fields) > Its is OK now with OW... variables defined as characters CLx > If it works, it

Re: Rexx detail, or things I dont do often enough

I'm glad you asked, because I'm rusty and I recently used "parse source" to get the name of the running Rexx file and then read it line-by-line. (Regina Rexx, just for my own use. I wanted a model input file available from comments in the source). I think sourceline() is likely to be more

Re: Ibm macro instructions code clarification

Are there any other messages issued at the same time? Also, by "our product" do you mean it is written by your organisation? Roops On Tue., Jan. 12, 2021, 06:54 Jake Anderson, wrote: > Hello > > Apologies for my ignorance. One of our product failed with FDBWD : 00141300 > FDBK2. > > I am not

Re: Preparing for a short z/OS contract

SERV.UA.EDU] On > Behalf Of Joe Monk > Sent: Sunday, November 29, 2020 9:38 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: Preparing for a short z/OS contract > > you will not have any problems. MVS is MVS. > > Joe > > On Sun, Nov 29, 2020 at 11:31 AM Rupert Reynolds

Preparing for a short z/OS contract

A client from my contracting days has contacted me out of the blue. Perhaps only a week, but work is work, right? :-) Does anyone have advice they can offer on what to expect these days? When I last worked for them, it was ESA/390, ISPF :-) Does a lot of PL/1, Assembler and Rexx programming

Have I misunderstood TOD clock & leap seconds?

I did look for IBM docs online, but I haven't found anything very helpful. I read of someone using STCK and converting (the hard way!) to display time, instead of using TIME DEC. So I tried it on my Hercules/MVS 3.8 setup. I was expecting to have to account for all the leap seconds since 1972. I

Re: Is there a JES2 command to submit a job?

Ah yes //MYJOB DD SYSOUT=(A,INTRDR) looks like a. In fact I've used that from TSO, lthough I can't remember whether the ALLOC command hndles INTRDR, or whether I used SVC 99. If the job can justifiably be in something like SYS1.PROCLIB, it's even easier. S MYJOB :-) Roops On Thu., Nov. 19,

Re: Is there a JES2 command to submit a job?

-) accepts this happily, as I start my own code from SYS1.PARMLIB(COMMNDxx) to create an extra control block and then exit. Roops On Thu., Nov. 19, 2020, 13:05 Paul Gilmartin, < 000433f07816-dmarc-requ...@listserv.ua.edu> wrote: > On Thu, 19 Nov 2020 11:04:32 +0000, Rupert Reynolds wr

Re: Is there a JES2 command to submit a job?

Most people I mention it to are surprised, and they expect it keep running until a modiFy or stoP tells it otherwise. That's the reason I mentioned it :-) Roops On Thu., Nov. 19, 2020, 14:22 Jeremy Nicoll, wrote: > On Thu, 19 Nov 2020, at 14:12, Rupert Reynolds wrote: > > Off the

Re: Have I misunderstood TOD clock & leap seconds?

. And I suspect H merely naively converts the Linux(?) system clock > to TOD format (add 1970 years; etc.) > > > >On Thu, Nov 12, 2020 at 2:13 PM Rupert Reynolds wrote: > > > >> I did look for IBM docs online, but I haven't found anything very > helpful. > >> &g

Re: Have I misunderstood TOD clock & leap seconds?

On Thu., Nov. 12, 2020, 14:59 Peter Relson, wrote: > >> Perhaps the TOD clock is slowed or stalled for leap seconds, to keep > >> TOD-derived date and time in synch with solar time? > >> > >Correct. > > I'd have answered "Not correct". When the leap second change is > introduced, yes, this sort

Re: EBCDIC-ASCII converter and other tools

often. Perhaps the NOPs sbould be in a do forever :-) Roops On Wed., Dec. 30, 2020, 17:43 Jeremy Nicoll, wrote: > On Tue, 29 Dec 2020, at 19:25, Rupert Reynolds wrote: > > > novalue: > > error: > > trace R > > xxErrL = ERL > > xxErrN = RC > >

Re: EBCDIC-ASCII converter and other tools

Alternative: if you are comfortable with Rexx, Regina 3.9.3 has been very stable under Win64 here. From a typical text-bashing example I inherited :- /* Rexx */ call on notready name notready signal on novalue signal on error address SYSTEM "CLS" fexist = stream(infile, 'C', 'QUERY EXISTS') if

Re: ISPF Edit: Introduce New SUBMIT Module

> > > If I read this right, OP is asking for a replacement for the edit SUB command, which does some alternative processing before the job is submitted, but is basically quite similar to the original SUB. If a Rexx EDIT macro is not acceptable, my first instinct is to look for a zOS exit that

Re: Currently executing TCB in a address space

I'm rusty, but my understanding from MVS/ESA days is that PSATOLD is always set as the current task becomes active, and there is one PSA for each 'engine', so by definition if your code is running under a TCB, it always gets its own TCB address from that field. Also, I haven't seen a TCB virtual

Re: Pronunciations (spun off of another thread)

Being English by birth, I remember working in Holland, and meeting someone with the nickname "Suzie Did It On The Roof" (I didn't ask what she did on that roof :-) ). The short "oo" as in "woof" caught me by surprise. Every day is a school day, etc. But the UK/US one that gets me every time is

Re: Diagram of MVS Control Blocks

For the avoidance of doubt, my comment was in search of a seriously useful control block map for MVS, around the /XA or /ESA times. It listed only control blocks, naming mapping macros and important offsets starting from PSACVT->CVT, PSATOLD->TCB, how to find ASCB and ASXB etc. IMI Computing did

Re: Diagram of MVS Control Blocks

I have been looking for mine. I was given a map by IMI Computing. I think it got lost during a stressful house move! Roops On Fri., Apr. 23, 2021, 20:43 PINION, RICHARD W., wrote: > Many years ago, 1982, I took my first MVS class, MVS Structure and Logic. > One of > the first handouts our

Re: Diagram of MVS Control Blocks

Thanks. That last image is a Doozy :-) Roops. On Fri., Apr. 23, 2021, 23:12 Steve Horein, wrote: > The one on page 12 is what I have thumbtacked to my wall at work: > > http://zseries.marist.edu/pdfs/ztidbitz/31%20zNibbler%20%28zOS%20Control%20Blocks%29.pdf > > >

Re: This Call-Assembler-inside-COBOL technique works, but is it risky to use?

I tried something similar in PL/1, many years ago. If I remember right, I had to have two pointers, one based(addr(other_pointer)). All this to achieve R1 -> ptr -> list of TUPs for SVC 99. One of them was a pointer to a function. It looked dirty to me, but... I showed the guy running the team,

Re: Rexx Detecting Value of MSG

Reading that page, MSG seems to revert to default if you use EXEC to start a new script. Pass it in as a parameter from CLIST and set it again? Roops On Wed., Oct. 20, 2021, 03:45 David Spiegel, wrote: > Hi Steve. > I read that too, but, it does not seem to work in my case (Rexx Exec > called

Re: EXTERNAL EMAIL: Re: System Programmer Titles

Oh good--it's Friday, a good day to mention that I was once titled "OS Whisperer", but not for long :-) Roops On Fri., Oct. 15, 2021, 05:30 Bruce Hewson, wrote: > Hi Chris, > > In which country or countries is your statement correct? > > > On Thu, 14 Oct 2021 21:25:10 +0100, CM Poncelet >

Re: PL/I vs. JCL

I have this awkward feeling that we're fonder of boilerplate code than we realise :-) On Tue., Sep. 28, 2021, 21:54 Bob Bridges, wrote: > Purely by the way, but I've never really understood why so many REXX > modules I see start like this: > > /* REXX */ > /* Module: Name > Author: Bob

Re: PL/I vs. JCL

>From memory, at the time Rexx first came to TSO/E the documented requirement was that line 1 must have a /* comment that included "Rexx", not case sensitive. I'm not sure, but I think line 1 could also contain code! I can't imagine why z/OS would be more finicky, unless the z/OS people saw so

Re: IBM JCL Expert preview in today's announcement letter

>From memory, I'm pretty sure I've done the same thing (LRECL and BKSIZE 256) in compiled code, allocated both via JCL and via SVC 99. Out of date, I'm guessing there are handy routines to read PDS directories for us these days, and PDSE too? (Newer than ISPF LM*, I mean). Roops On Wed., Oct.

Re: PL/I vs. JCL

I remember when MVS was affectionately called "Mine's Very Slow". I'm writing an OS for x86 (as an exercise) which aims to learn some of the lessons grown-up systems, such as MVS, could have taught x86 systems ever since MS-DOS. I'm calling it MES (Mine's Even Slower") :-) Roops On Mon., Oct.

Re: Mainframe ransomware solution

Shops I've worked at have mostly relied on the general protections against intrusion, plus good (frequently tested) backup copies. I'd go further and say that a proper archive (write once, can't update) is essential if you rely on old data. Roops On Tue., Oct. 5, 2021, 14:24 Tommy Tsui, wrote:

Re: Sockets?

Just a thought... I'm not sure how much experience you have with sockets in general, but if you want a high level view, languages such as Python make that quicker on Windows and Linux. I wrote a simple Python script to process print output from MVS under Hercules and I remember it being fairly

Re: specific purpose for the REUS parameter in a binder operation

Thanks for the reminder of REUS. If I may test my memory here, the difference between REUS and RENT is declaring to system that the program does not modify any local storage at all, (obtaining any storage needed at run time), and if it is loaded from an APF-authorised library it should be loaded

Re: PL/I question

I think the days of trying to say there is only one correct way to write its name are long gone! On Wed., Mar. 23, 2022, 00:52 Phil Smith III, wrote: > Bob Bridges wrote: > > > PL/1 was my first language. > > > > Only it's "PL/I". "Programming Language/One", but "PL/I". Just sayin'. > >

Re: PL/I question

Vaguely related, can anyone comment on the assertions that PL/I was considered "too slow" back in the old days, and that it was "too verbose for writing system code"? Excuse me? MVS system macros are stuffed with its close relative, PL/S! I can see its size would make compiling slow on limited

Re: PL/I question

Thanks. That's encouraging. I really must try to stay up to date :-) Roops On Sun., Mar. 27, 2022, 18:02 Tony Harminc, wrote: > On Sun, 27 Mar 2022 at 11:45, Rupert Reynolds wrote: > > > > Related: how does LE handle strings with embedded troublesome bytes suc

Re: PL/I question

ength may be > determined at, e.g. compile time, block entry, or may be dynamic (VARYING). > > > -- > Shmuel (Seymour J.) Metz > http://mason.gmu.edu/~smetz3 > > > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf >

Re: PL/I question

That's a common problem, certainly, but if we include the wider world of micros and minis, I'd bet that buffer overuns related to null-teminated strings (BLEAH!) are in the lead :-) I once saw a report quoting Microsoft that half of all vulnerabilities were buffer overruns. I also saw a Dave

  1   2   >