RFE: Some SuperC options should cater for longer lines

https://www.ibm.com/developerworks/rfe/execute?use_case=viewRfe&CR_ID=147550 Robert -- Robert AH Prins robert(a)prino(d)org The hitchhiking grandfather Some REXX code for use on z/OS ---

Re: XYplorer - EBCDIC to ASCII translation - CP500 or something better

On 2020-11-12 19:50, Robert Prins wrote: For those who don't know, XYplorer <https://www.xyplorer.com/> is a replacement for Windows' Explorer, with rather a lot more functionality, and that's a huge understatement. Like Tom Brennan's Vista TN3270, you can try

Re: XYplorer - EBCDIC to ASCII translation - CP500 or something better

On 2020-11-12 21:16, Paul Gilmartin wrote: On Thu, 12 Nov 2020 21:48:06 +, Robert Prins wrote: For those who don't know, XYplorer <https://www.xyplorer.com/> is a replacement ... Both can be used on all of your computers. One of my computers is a Raspberry Pi. Almost

XYplorer - EBCDIC to ASCII translation - CP500 or something better

For those who don't know, XYplorer is a replacement for Windows' Explorer, with rather a lot more functionality, and that's a huge understatement. Like Tom Brennan's Vista TN3270, you can try it free for 30 days, the "Standard License Pro" costs USD 39.95, never expir

Re: dataset allocation

On 2020-10-07 11:00, Jeremy Nicoll wrote: On Wed, 7 Oct 2020, at 04:03, Wayne Bickerdike wrote: On a different note. I just compared EDIT macro performance versus IPOUPDTE. IPOUPDTE was about 600 times faster. Is that a macro written in Assembler, or REXX? It's an IBM program, a "reconstitu

Re: dataset allocation

On 2020-10-07 03:03, Wayne Bickerdike wrote: Give us an idea of how big each file is. OPEN/CLOSE is expensive. QSAM with large buffers should go pretty quickly. LOCATE instead of MOVE mode can speed things up when you are reading. On a different note. I just compared EDIT macro performance vers

z/OS,Version 2 Release 4,Language Environment,Programming Reference - ceea300_v2r4.pdf

Just had a look at https://www-01.ibm.com/servers/resourcelink/svc00100.nsf/pages/zosv2r4sa380683/$file/ceea300_v2r4.pdf?OpenElement&xpdflink to find a country code that gives me dates in ISO8601 format (why isn't there a simple "LANGUAGE(my-country(ISO))" option to use a specific currency, but

LMINIT cannot handle concatenation with more than 16 data sets?

Came across this in an edit macro, and the existing code works around it by using QBASELIB and testing each dataset in the ISPPLIB concatenation separately for a selected member. Does anyone know if this limit of 16 is still present, I don't really have a way to test this right now. Thanks,

[OT] Rabies [Was: Ransoming a mainframe disk farm]

On 2020-09-08 10:15, R.S. wrote: W dniu 08.09.2020 o 14:09, Robert Prins pisze: On 2020-09-08 07:21, R.S. wrote: Well, I sustain my words: the only EFFECTIVE way is to prevent. All other ways are recipes what to do after failure happens, to minimize the impact. This resembles data loss

RFE 145094: No warning on "conflicting" use of "SEQ" keyword in SuperC

https://www.ibm.com/developerworks/rfe/execute?use_case=viewRfe&CR_ID=145094 You use SuperC from the ISPF menu, see that there are no differences, copy the generated JCL into a job, and suddenly there are differences, because you forgot to zap the "SEQ" process option. It does no harm, but resu

Re: Ransoming a mainframe disk farm

On 2020-09-08 07:21, R.S. wrote: Well, I sustain my words: the only EFFECTIVE way is to prevent. All other ways are recipes what to do after failure happens, to minimize the impact. This resembles data loss scenario. What to do when you lost your data? The answer is AVOID it. Use RAID arrays,

Re: Constant Identifiers

On 2020-09-06 13:07, Paul Gilmartin wrote: On Sun, 6 Sep 2020 17:25:45 +1000, Robin Vowels wrote: Beware! Than might left-associate as: volume = ( 4/3 ) * 3.14159 * radius**3 ... and the quotient of integers, 4/3, is 1. No it's not. 4/3 yields 1.33.. to 15 digits in PL/I. Y

Re: Pascal(was: Constant Identifiers)

On 2020-09-04 18:36, Paul Gilmartin wrote: On Fri, 4 Sep 2020 20:38:29 +, Robert Prins wrote: On 2020-09-04 17:01, Paul Gilmartin wrote: I see everything twice: On Fri, 4 Sep 2020 19:05:32 +, Robert Prins wrote: On Fri, 4 Sep 2020 19:06:49 +, Robert Prins wrote: Yes, problems

Re: Constant Identifiers

On 2020-09-04 17:01, Paul Gilmartin wrote: I see everything twice: On Fri, 4 Sep 2020 19:05:32 +, Robert Prins wrote: On Fri, 4 Sep 2020 19:06:49 +, Robert Prins wrote: Yes, problems posting. Should be OK now. And I don't think that anyone in their right mind would ever use any

Re: Constant Identifiers

On 2020-09-04 15:43, Paul Gilmartin wrote: > I'm a PL/I novice, or less. A recent thread here moved me > to browse the Ref., where I read that any constant used more > than once must be declared and the identifier used instead. > Sorta tyrannical enforcement of coding conventions. OK. > I agree

Re: Constant Identifiers

On 2020-09-04 15:43, Paul Gilmartin wrote: I'm a PL/I novice, or less. A recent thread here moved me to browse the Ref., where I read that any constant used more than once must be declared and the identifier used instead. Sorta tyrannical enforcement of coding conventions. OK. I agree that 6.62

Re: A little magic from Doug Nadel

On 2020-09-03 15:31, Tom Conley wrote: On 9/3/2020 6:11 AM, Robert Prins wrote: On 2020-09-03 09:10, Rob Scott wrote: Can I strongly advise that you do not modify the ISFPCU41 panel. If there is functionality that you require in SDSF, please consider raising an RFE. And how long would I

Doug Nadel's ISFPCU41 panel [Was: A little magic from Doug Nadel]

t;DDENDIF JCLLIBPROC" /* == End of Customization == */ FWIW, I have two versions of Doug's panel, one from 2006-05-17 and one from 2007-07-19, with minimal changes, and my own version that adds the above PL/I error-message highlig

Re: A little magic from Doug Nadel

On 2020-09-03 10:56, David Crayford wrote: On 2020-09-03 12:16 AM, Tom Conley wrote: ISPF HILITE is just that highlight. It do\es not do any parsing of the language. I think EDOEND predated HILITE, and it also has an option to just show all "myproc: proc;" ... 'end myproc;' statements You c

Re: A little magic from Doug Nadel

call addj "DDENDIF JCLLIBPROC" /* == End of Customization == */ FWIW, I have two versions of Doug's panel, one from 2006-05-17 and one from 2007-07-19, with minimal changes, and my own version that adds the above PL/I error

Doug Nadel's ISFPCU41 panel [Was: A little magic from Doug Nadel]

t;DDENDIF JCLLIBPROC" /* == End of Customization == */ FWIW, I have two versions of Doug's panel, one from 2006-05-17 and one from 2007-07-19, with minimal changes, and my own version that adds the above PL/I error-message highlig

Re: A little magic from Doug Nadel

11:30 AM, David Crayford wrote: On 2020-09-03 1:47 AM, Robert Prins wrote: This seems to go hand-in-hand with HILITE. Does it understand that PL/I has no reserved words and that any of the above might be merely identifiers? ISPF HILITE is just that highlight. It do\es not do any parsing of the

Re: A little magic from Doug Nadel

On 2020-09-02 17:46, Tom Conley wrote: On 9/2/2020 12:35 PM, Robert Prins wrote: On 2020-09-02 16:16, Tom Conley wrote: On 9/2/2020 11:30 AM, David Crayford wrote: On 2020-09-03 1:47 AM, Robert Prins wrote: This seems to go hand-in-hand with HILITE.  Does it understand that PL/I has no

Re: PL/I RFE to vote for (or not)

On 2020-09-02 17:02, Paul Gilmartin wrote: On Wed, 2 Sep 2020 19:17:21 + , Robert Prins wrote: quotient = QUOTREM(dividend, divisor, remainder), With quotient and remainder generated in one go by the execution of a DP instruction (and probably/possibly/maybe/likely also by the

Re: A little magic from Doug Nadel

On 2020-09-02 16:16, Tom Conley wrote: On 9/2/2020 11:30 AM, David Crayford wrote: On 2020-09-03 1:47 AM, Robert Prins wrote: This seems to go hand-in-hand with HILITE.  Does it understand that PL/I has no reserved words and that any of the above might be merely identifiers? ISPF HILITE is

Re: About Enterprise PL/I - barking (up the wrong tree?)

On 2020-09-02 16:34, Thomas David Rivers wrote: Robert Prins wrote: Dear all, A few days ago I posted the following to <news://comp.lang.pl1>, addressed specifically to Peter Elderon: "And the corresponding PL/I source is ?" Note for what follows: PL/I has a truc

Re: A little magic from Doug Nadel

On 2020-09-02 16:16, Tom Conley wrote: On 9/2/2020 11:30 AM, David Crayford wrote: On 2020-09-03 1:47 AM, Robert Prins wrote: This seems to go hand-in-hand with HILITE.  Does it understand that PL/I has no reserved words and that any of the above might be merely identifiers? ISPF HILITE is

PL/I RFE to vote for (or not)

quotient = QUOTREM(dividend, divisor, remainder), With quotient and remainder generated in one go by the execution of a DP instruction (and probably/possibly/maybe/likely also by the various other divide instructions) https://www.ibm.com/developerworks/rfe/execute?use_case=viewRfe&CR_ID=1450

Re: A little magic from Doug Nadel

On 2020-09-02 12:46, Paul Gilmartin wrote: On Wed, 2 Sep 2020 10:47:05 +, Robert Prins wrote: More than 20 years ago I wrote an edit macro "EDOEND", that lets me exclude, in PL/I source, all statements other than 'PACKAGE', 'PROC', 'PROCEDURE', &

About Enterprise PL/I - barking (up the wrong tree?)

Dear all, A few days ago I posted the following to , addressed specifically to Peter Elderon: Given part of a compiler listing (V5.2.2) below (and this is the code generated for the current source, which has been updated a bit over the weekend) 0038E8 D204 3AC0 BA0E

Old OS V2.3.0 PL/I Manuals in BookMaster format

Does anyone know if the following two PL/I V2.3.0 manuals are still somewhere around in BookMaster format: SC26-4311 - Installation and Customization under MVS LY27-9528 - Problem Determination Thanks, Robert -- Robert AH Prins robert.ah.prins(a)gmail.com The hitchhiking grandfather - https://

A little magic from Doug Nadel

More than 20 years ago I wrote an edit macro "EDOEND", that lets me exclude, in PL/I source, all statements other than 'PACKAGE', 'PROC', 'PROCEDURE', 'DO', 'BEGIN', 'SELECT', and 'END' and a few days ago, using it again, I realised that it could benefit from adding a bit of Doug Nadel magic t

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

On 2020-08-14 19:56, Gibney, Dave wrote: > I have this vague memory of being able to have data embedded inside a Rexx > Exec. Some manner of data start and end delimiting lines and accessed via > looping with PULL or PARSE. I know I can just PUSH or QUEUE data onto the > stack, but that's not wha

Re: IBM Personal Communications font

On 2020-07-04 08:31, kekronbekron wrote: Thank you Giliad, good to know that there's at least one other person who cares about fonts in 3270! From what I remember, PCOMM 13.x added support for font scaling, so that should help things look better, I'd assume. However, as for font choice itself, I

Re: LzLabs

On 2020-05-03 04:46, Mike Schwab wrote: Just one county, Germany. 1400KM, 12 hours drive. Than you're sticking to US type speed limits. ;) https://prino.neocities.org/blog/2020-02-07-uncanny.html Robert -- Robert AH Prins robert(a)prino(d)org The hitchhiking grandfather - https://prino.neoci

Re: Friday OT, cheerful program for gloomy times

s robert(a)prino(d)org The hitchhiking grandfather - https://prino.neocities.org/indez.html Some REXX code for use on z/OS - https://prino.neocities.org/zOS/zOS-Tools.html On 27/04/2020 15:29, Robert Prins wrote: On 2020-04-24 06:01, CM Poncelet wrote: I attach a Rexx program to calculate and disp

Re: Friday OT, cheerful program for gloomy times

On 2020-04-24 06:01, CM Poncelet wrote: I attach a Rexx program to calculate and display the biorhythm values for a given date of birth and current or whatever other date. And if you want to see some niche graphs, try "ecalc biog(dd.mm.)", where ecalc can be found (for now) @

Fwd: Re: ACM DIGITAL LIBRARY, free to download at the moment

Just for info, posted in comp.lang.pli Forwarded Message Subject: Re: ACM DIGITAL LIBRARY Date: Thu, 23 Apr 2020 19:58:40 -0700 From: Iron Spring Software Organization: A noiseless patient Spider Newsgroups: comp.lang.pl1 References: <0e68f5a9-bd4e-4453-b6ff-8aa76e309...@googl

Re: UPDTE - CBT tape 496

On 2020-04-22 14:06, Robert Prins wrote: I've been using this for quite a while to upload data from Windows to z/OS, merging in one case nearly 2,000 files into the required IEBUPDTE format, making the transfer rather a lot easier. It always worked, uploading the data to a VB/259/27998 da

UPDTE - CBT tape 496

I've been using this for quite a while to upload data from Windows to z/OS, merging in one case nearly 2,000 files into the required IEBUPDTE format, making the transfer rather a lot easier. It always worked, uploading the data to a VB/259/27998 dataset, but until now, Windows filenames have alw

Re: DB2 / DFSort question

On 2020-04-16 17:56, Sri h Kolusu wrote: It would be nice if this could execute before SYMNAMES is read, so the SELECT handler could create symbols for all of the columns in the result set. If your intention is to create DFSORT symbols from DB2 table definition then there are a couple of ways t

ACM Digital Library content available for free until 2020-06-30

From comp.lang.pl1: The Association for Computing Machinery (ACM) announces: "To help support our community working remotely during COVID-19, we are making all work published by ACM in our Digital Library freely accessible through June 30, 2020." e.g. http://dl.acm.org/citation.cfm?doid=3078

Re: About the "hello world" program

On 2020-04-12 14:18, Paul Gilmartin wrote: On Sat, 11 Apr 2020 15:23:47 +, Robert Prins wrote: On 2020-04-11 06:25, David Crayford wrote: On 2020-04-11 8:42 AM, Dale R. Smith wrote: After "Hello World!" maybe the next step would be "99 Bottles of Beer"!:-)> &g

Re: About the "hello world" program

On 2020-04-11 06:25, David Crayford wrote: On 2020-04-11 8:42 AM, Dale R. Smith wrote: After "Hello World!" maybe the next step would be "99 Bottles of Beer"!:-)> http://99-bottles-of-beer.net/ After a few real beers, the virtual beers would be a lot harder!  Ha Ha haha, some creative soul

Re: Bringing up skills learned on z/OS Hercules in interview?

On 2020-04-09 18:04, Paul Gilmartin wrote: On Thu, 9 Apr 2020 12:55:11 -0400, scott Ford wrote: Until Hercules is sanctioned by IBM I wouldnt mentioned it. On Wed, Apr 8, 2020 at 4:08 PM Grant Taylor wrote: On 4/8/20 1:13 PM, SUBSCRIBE IBM-MAIN Brandon Tucker wrote: I've always wondered if

Re: [ISPF-L] "macro_msg" edit macro command not working for "COMPARE" command?

On 2020-02-04 14:39, Jeremy Nicoll wrote: On Tue, 4 Feb 2020, at 13:19, Robert Prins wrote: On 2020-02-04 10:56, Jeremy Nicoll wrote: On Tue, 4 Feb 2020, at 11:44, Robert Prins wrote: It also updates the change-logs in each of the affected execs, and as we keep a few generations of older

Re: [ISPF-L] "macro_msg" edit macro command not working for "COMPARE" command?

On 2020-02-04 10:56, Jeremy Nicoll wrote: On Tue, 4 Feb 2020, at 11:44, Robert Prins wrote: It also updates the change-logs in each of the affected execs, and as we keep a few generations of older versions around, it's irritating that compares show that the change-log has been updated

Re: [ISPF-L] "macro_msg" edit macro command not working for "COMPARE" command?

e. Robert -- Robert AH Prins robert(a)prino(d)org The hitchhiking grandfather - https://prino.neocities.org/indez.html Some REXX code for use on z/OS - https://prino.neocities.org/zOS/zOS-Tools.html > -Original Message- From: ispf-l-l...@nd.edu [mailto:ispf-l-l...@nd.edu] On Behalf Of Robert P

"macro_msg" edit macro command not working for "COMPARE" command?

I've been using this for ages, and in case you've never heard of it: MACRO_MSG Set or Query the Macro Message switch The MACRO_MSG assignment statement sets or retrieves the value of the macro_msg switch, which controls whether macro processing delivers ISPF messages to the macro. Syntax >>--I

Re: [ISPF-L] Programmatically deleting ISPF Clipboards

On 2019-12-29 14:33, Lionel B Dyck wrote: > On 2019-12-29 09:38, Robert Prins wrote:> Does anyone know a way of deleting all the non-default ISPF clipboards, from> within an edit macro, without knowing their names?> > Reason? I've got an edit macro that creates half a dozen

Programmatically deleting ISPF Clipboards

Does anyone know a way of deleting all the non-default ISPF clipboards, from within an edit macro, without knowing their names? Reason? I've got an edit macro that creates half a dozen of internally used clipboards, and that obviously fails if there are already several clipboards created befor

Re: Looking for some large COBOL program examples

On 2019-12-10 18:45, Charles Mills wrote: I am looking for some sample COBOL programs of say 20,000 or more lines. I really don't care what they do, so long as they will compile (or could easily be made to compile) to an RC 0 or 4 under both Enterprise COBOL 4 and Enterprise COBOL 6. Among other

Re: Best way for a task to give up the CPU and let other tasks run?

On 2019-10-19 14:45, Charles Mills wrote: Others have given you good replies. I've been thinking about your question and thought I would summarize and re-phrase what has been said. You are not very specific in what your situation is, so let me offer three possible problem scenarios, each with its

Re: What is my home PC IP address

On 2019-07-28 09:59, tim.popes...@gmail.com wrote: I know what not to dobut I don't know what to do, that's the point. I installed a free VPN, used the 'what is my IP' and was able to PING to it from MVS. However when trying to open a FTP session I get Connecting to: xxx.xxx.xxx.xxx port:

Programmatically retrieving ISPF clipboard names

Does anyone know if there is a(n undocumented) method of retrieving the names of the ISPF clipboards in use? I'm not fussed about going through a series of control blocks within an edit macro. -- Robert AH Prins robert.ah.prins(a)gmail.com --

Two PL/I RFEs

New builtin to replace '' initialisations: http://www.ibm.com/developerworks/rfe/execute?use_case=viewRfe&CR_ID=133518 Enhance the sum() builtin function and add two siblings https://www.ibm.com/developerworks/rfe/execute?use_case=viewRfe&CR_ID=133641 If you think these RFEs are useful, please v

Re: Hex value for left slash EBCDIC

On 2019-04-21 21:39, Joel C. Ewing wrote: To me "left slash" is unfamiliar terminology --  I've always heard these two characters called slash ("/"), which is hex 61, and backward slash ("\") , which is hex E0. No, the backslash is not part of the EBCDIC invariant set. Counter examples are CP2

Re: ISPF development tips and tricks

On 2019-04-19 14:10, Lionel B. Dyck wrote: I am announcing a new, free, ebook with usable examples for all ISPF developers with tips and tricks to jump start or improve your dialog writing. It is 70+ pages and the zip includes to doc in pdf, ePub, and mobi formats so you can read it anywhere (or

Re: Source of green zebra paper

On 2019-02-25 02:53, Timothy Sipples wrote: You could check directly with the paper manufacturers if you haven't already. Q-Connect, headquartered in Belgium, seems to be one of the biggest OEM suppliers of "listing paper" in the United Kingdom. Here's their main Web site: https://www.q-connect.

Re: Source of green zebra paper

#: 177105 | Model #: 25515/45115/177 Not too useful when one is based in Belgium ;) Robert -- Robert AH Prins robert.ah.prins(a)gmail.com -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Robert Prins Sent: Saturday, February 23

Source of green zebra paper

Does anyone know of any suppliers in Europe that still sell 8.5 x 15" 17-hole, 67x5 bar green continuous stationary? Thanks, Robert -- Robert AH Prins robert.ah.prins(a)gmail.com -- For IBM-MAIN subscribe / signoff / archive a

Re: XMIT Manager and CP1047 (or rather CP1046.9921875)

erish itself, it only has to calculate the actual length in UFT-8 characters, and that's done using the translate and sum PL/I builtins, using metadata in the original (white box) input file. Robert -- Robert AH Prins robert(a)prino(d)org From: IBM Mainframe Discussion List on behalf

XMIT Manager and CP1047 (or rather CP1046.9921875)

Over the last week or so I've been having a discussion with Denis Molony about his XmitApp, a platform-agnostic, it's written in Java, viewer for XMIT files, see As is, it (currently) only shows the contents of the xmit file in one of the panels, and he's hit

Re: Crosshair cursor

On 2019-01-02 08:26, Styles, Andy , ITS zPlatform Services wrote: On 2018-12-29 17:46, zMan wrote: Does anybody here voluntarily use a crosshair cursor in your 3270 emulator? It was the second change I made after installing Vista, setting up the cursor to garish bright yellow cross-hairs. ;) (

Re: Crosshair cursor

On 2018-12-29 17:46, zMan wrote: Does anybody here voluntarily use a crosshair cursor in your 3270 emulator? It was the second change I made after installing Vista, setting up the cursor to garish bright yellow cross-hairs. ;) (The first change? A 62 x 160 screen-size) Robert -- Robert AH Pri

Fwd: Retrocomputing: SUNY Stony Brook Pascal compiler written in XPL

From news://comp.compilers: Forwarded Message Subject: Retrocomputing: SUNY Stony Brook Pascal compiler written in XPL Date: Mon, 24 Dec 2018 02:36:08 -0800 (PST) From: Shoefoot Organization: Compilers Central Newsgroups: comp.compilers The SUNY Stony Brook Pascal compiler was

Re: SPFLite goes Open Source

Just got this from George Deluca via the SPFLite mailing list, it's great news, but... Hi, I had always promised you wouldn't be bothered often by SPFLite announcements, but this one is a bit more important. Version 10.1.8350 has been made available on the Website. As of this release, SPFLite h

Re: IND$FILE -- where did the name come from?

On 2018-11-30 12:33, John Eells wrote: Seymour J Metz wrote: I believe that IND$FILE is included in your z/OS license. I also believe that it is long out of support and less efficient than, e.g., SFTP (yes, FTP is considered insecure these days.) IND$FILE, as part of z/OS, remains supporte

Re: Compute the maximum return code of all steps (so far)

Another one, in your favourite language, originally written by Simon Brown of Willis sometime in 1992: *process macro langlvl(os,sprog) test(all,sym); *process rules(laxif); -steps: proc(param) options(main) reorder; -dcl param char(100) var; - -/*

[SUSPECTED SPAM] Free, in need of a home - or the local recycle centre...

Copies of the "IBM Systems Journal", most in near mint condition, unless otherwise noted, years are complete: 71: 3+4 72: 1+2+3 73 74 75: 1+2 76: 1+4 77 78 79: 1+3+4 80 81 82 83 84 85 86 87: 1+3+4 88 89 90: 1+2+3 And a few loose copies of the IBM Personal Systems Journal from around 1990. Loca

[SPAM] Re: REXX as JCL replacement - Performance

On 2018-07-13 01:29, CM Poncelet wrote: What 'problem' with JCL is fixed by replacing it with REXX? REXX doesn't have a limit of 255 steps in a job, and that limit may be reached when doing regression tests. It also allows loops. Example I have is too long to post here (probably). Robert --

Re: REXX as JCL replacement - Performance

On 2018-07-13 01:29, CM Poncelet wrote: > What 'problem' with JCL is fixed by replacing it with REXX? REXX doesn't have a limit of 255 steps in a job, and that limit may be reached when doing regression tests. It also allows loops. Example I have is too long to post here (probably). Robert --

Re: REXX to change Date in PDS member

On 2018-06-11 19:11, saurabh khandelwal wrote: I am new to rexx and our new requirement Which PHB came up with this "requirement"? to edit one PDS member with previous day day date today's date on regular basis . Your scheduler should be able to do this. Robert -- Robert AH Prins robert.ah

[SUSPECTED SPAM] Re: Heretic alert: I really detest TSO REXX (the language)

On 2018-05-14 17:51, Phil Smith III wrote: Charles wrote, in part: I wrote a large set of applications in Rexx once. I put all of my "intended to be global" variable names into a single Rexx variable and exposed it with Procedure Expose (Rexx_Globals) Yep. That's one of the approaches;

Re: JCL "diagramming"?

On 2018-04-01 19:30, Charles Mills wrote: What would one do with JCL that had been converted to HTML? Serious question. Use it in presentations when you don't have access to a live z/OS system. Do you have an example screen shot? I did not see one on your site. I'll try to post some once w

Re: JCL "diagramming"?

On 2018-03-29 16:11, David Boyes wrote: On 3/29/18, 11:23 AM, "IBM Mainframe Discussion List on behalf of John McKown" wrote: This is a weird idea that is floating around in my head. I am wondering if there is any software which can create a "picture", "diagram", or "flowchart" of JCL? I'm no

Fwd: Feel free to reuse

Recently I got this (slightly edited) email: > I recently got into MVS/IBM z via [edited out], and was thinking of > writing about my progress. ~20 years of Unix is enough for anyone, I feel. > > Would it be OK to er... 'borrow' the CSS from > ? I'

Feel free to reuse

Hi all, Recently I got this (slightly edited) email: > I recently got into MVS/IBM z via [edited out], and was thinking of > writing about my progress. ~20 years of Unix is enough for anyone, I feel. > > Would it be OK to er... 'borrow' the CSS from >

Re: Question for COBOL users

On 2018-02-10 00:30, Charles Mills wrote: That is how the C/C++ compiler works. PARM='OPTF(DD:SYSOPTF)' or any other valid DD name, or DSN, or zFS name. Only one name, though. Enterprise PL/I allows multiple DD names, like: //IBMZPLI EXEC PGM=IBMZPLI, // REGION=0M, // P

WSA - codepages

Long shot, given its limited use, but does anyone know if there is an easy way of translating (some of) the usual suspects, in my case the "[" and "]" characters to the same on Windows, by actually querying in some way or another the codepage used by Windows? Rason? I'm working on updating the

Re: RDJFCB function in C++

On 2018-02-05 17:23, Bernd Oppolzer wrote: IIRC, I had a similar problem once, when trying to retrieve the DS name from a 3 byte item which was located in the TIOT near the DD name. This was not possible to do using pure C, because the 3 byte item (which was an address in early stages of MVS) now

Re: IBM does what IBM does best: Raises the chopper again

On 2017-11-30 09:46, Edward Gould wrote: On Nov 30, 2017, at 1:23 AM, Jack J. Woehr wrote: “42" I know I shouldn’t ask but what is “42”. The answer to everything - https://en.wikipedia.org/wiki/42_%28number%29#The_Hitchhiker.27s_Guide_to_the_Galaxy Robert -- Robert AH Prins robert(a)prino(

Re: IBM does what IBM does best: Raises the chopper again

On 2017-11-30 09:46, Edward Gould wrote: On Nov 30, 2017, at 1:23 AM, Jack J. Woehr wrote: “42" I know I shouldn’t ask but what is “42”. The answer to everything - https://en.wikipedia.org/wiki/42_%28number%29#The_Hitchhiker.27s_Guide_to_the_Galaxy -- Robert AH Prins robert(a)prino(d)org

Re: Shocking Bug in Latest PCOMM Release

On 2017-11-22 11:24, David Cole wrote: I simply don't understand why anyone would still be putting up with PCOMM. Tom Brennan Vista remains both well and fully supported. It is, was, and will always be the best. It probably is the best, but it also has, at least for me, a few annoying "featur

Re: UTF-8 woes on z/OS, a solution - comments invited

On 2017-09-05 15:41, Walt Farrell wrote: On Tue, 5 Sep 2017 10:19:45 -0500, Paul Gilmartin wrote: What language(s) cleanly handle vertical alignment of formatted text output when the text contains UTF-16 supplemental/surrogate (not in the BMP) characters? Here's an example of /bin/printf's fai

Re: UTF-8 woes on z/OS, a solution - comments invited

On 2017-09-04 19:24, Paul Gilmartin wrote: > On Mon, 4 Sep 2017 20:59:12 +0000, Robert Prins wrote I can probably find a set of code-pages that correctly translate the two byte UTF-8 "ü" character to a one byte EBCDIC "ü" character, but how would those same two code-pag

Re: UTF-8 woes on z/OS, a solution - comments invited

On 2017-09-04 19:24, Paul Gilmartin wrote: On Mon, 4 Sep 2017 20:59:12 +, Robert Prins wrote I can probably find a set of code-pages that correctly translate the two byte UTF-8 "ü" character to a one byte EBCDIC "ü" character, but how would those same two code-pages tra

Re: UTF-8 woes on z/OS, a solution - comments invited

the same PC-side file to one single character... And back to the correct UTF-8 character... That makes the problem maybe more understandable? Robert Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Robert Prins Sent: Monday, Sept

UTF-8 woes on z/OS, a solution - comments invited

OK, I solved the problem, but maybe someone here can come up with something a bit more efficient... There is a file in the non-z/OS world, that used to be pure ASCII (actually CP437/850), but that has now been converted to UTF-8, due to further internationalisation requirements. Said file was

Re: "break"

On 2017-08-05 08:45, Bernd Oppolzer wrote: some of the indentation in the first example, which was already awful, has been further damaged by my eMail program :-) That's why PL/I has the "SELECT" statement: do_something: proc; do_initialization; select; when (not condition 1);

Re: Someone just too smart for his or her own good?

On 2017-08-04 13:41, Charles Mills wrote: OK, I get it. (Way too much time spent on this now.) The sum is also to be printed if there are any zero values in a[whatever]. Is this a real business problem or an exercise in whatever? The original code actually fills a set of buckets with values (o

RFE submitted [WAS: Someone just too smart for his or her own good?]

On 2017-08-04 07:56, Robert Prins wrote: On 2017-08-04 00:31, Charles Mills wrote: Certainly if one is looking to save a cycle or two then if a(i) >= 0 then sum = sum + a(i); should be if a(i) > 0 then sum = sum + a(i); because adding a(i) to sum when a(i) == 0 is a wa

Re: Someone just too smart for his or her own good?

ainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Robert Prins Sent: Thursday, August 3, 2017 12:11 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Someone just too smart for his or her own good? Just came across the following, and please don't come back with pedantic remark

Someone just too smart for his or her own good?

Just came across the following, and please don't come back with pedantic remarks about undeclared variables, the code is just to show what's there: dcl sum fixed (7) init (-0.1); for i = 1 to whatever; if a(i) >= 0 then sum = sum + a(i); end; if substr(unspec(sum), 25, 8) ^= '0d'bx then

Re: Sorting a REXX STEM variable

On 2017-06-12 14:29, John Gateley wrote: Hi Last weeks discussion on sorting a REXX stem inspired me to write a program to do it. example call to sort ascending "ISPEXEC LIBDEF ISPLLIB DATASET ID ('my_loadlib') STACK" "ALLOC FI(SORTPRT) DUMMY" r_c = SORTSTEM(my_stem_name,'A') "FREE FI

Re: Sample JCL for file transfer using NJE/TCPIP

On 2017-05-20 17:17, Lizette Koehler wrote: TRSMAIN and TSO XMIT both take the input file and build it into fixed length records. The output file contains the information needed to reconstruct the file in its original format. So LRECL, BLKSIZE, DSORG, RECFM, etc... which it will use to restore

Re: "embedded" ISPF panels/message/etc

On 2017-03-14 15:27, John McKown wrote: I want to write an ISPF application which is self contained. I vaguely remembered that someone, sometime, said it is possible to "embed" the ISPF panels / message / et al in the REXX itself. The only thing that I've seen is more like an shell HERE document.

Re: Latest copy of Enterprise Tech Journal

The reply of ETJ, when I asked if they had a "Letters to the Editor" section: On 2017-01-26 01:31, Denny Yost wrote: > Since you are the owner of software/hardware/services company in the IT > industry, you can submit article for publication once you have signed an > annual promotion contract wit

The latest issue of Enterprise Tech Journal

Pages 58-66 contain an article by Lionel B. Dyck & William B. Smith, called "The ISPF Clipboard: Demystified". In response I've put my EDITCLIP routine on-line, it might be of some interest as it allows unattended access to ISPF clipboards from within edit macro's, and, if an appropriate comma

ISPF Panel suggestions

So I'm slowly releasing some of the REXX execs I wrote over the past 25+ years to all of you (see ) and the next in line is Formatted Browse itself, at the moment only RAP00110, the PL/I %include book parser is available, with three edit macros to s

<    1   2   3   >