Re: Three questions about VM/CE (Left, middle, and right field question)

开云体育

The answer to your middle question is A LOT of work. ?All of it in C and coded to Hercules internal constructs.

However, there is no need to create a "new" device for Internet connectivity. ?The issue is not Hercules, but the guest OS (VM I am assuming) lacks TCP/IP intelligence. ?At this vintage of guest operating system, Hercules offers the TCPIP instruction. ?It allows non-privileged access to the host's native TCP interface for connecting to a host socket. ?This interface has been used to support TCP on MVS. ?What VM/370 work would be required to allow a CMS virtual machine to do the same is an unanswered question.

There are a number of "devices" already supported by Hercules for IP connectivity. ?Again, this vintage of VM knows nothing about these Hercules devices, per se. ?Someone who understands the internals of VM/370 would be able to assist with connecting such a device to a CMS guest. ?Some of these device uses CTC channel protocol that VM/370 understands. ?I think the work there is much less. ?Getting CMS the "intelligence" to use the CTC device is another challenge. ?The MVS programs that use the TCPIP instruction might provide a foundation for coding a server or client program.

Just a few thoughts on your "middle" question.

Harold Grovesteen

Show quoted text

On Mon, 2022-10-17 at 03:21 -0500, Bertram Moshier wrote:

Hi,

I have three questions.? As a side note, I'm a ham radio operator (WB8ERT) and use DMR.

My left field question would be for fellow ham radio operators.? I understand getting a PI-Raspberry to operate as? a transmit and receive DMR.? Just for fun, I'm wondering about doing the same using VM.? Is it possible, in theory?? I think it should be possible.? The DMR code is in C.? SIO to send and receive and yet . . .

Middle question:? What is involved in getting herc to see a new device that would then be seen by VM?? I know from my work at Cray Research, Inc, creating hardware for S/370 systems is possible.? We had two hardware devices to talk to a Cray.? One looked like a CTC to the S/370 and the other was by Network Systems.? To our Station software, they looked very similar.? I also worked on the Seagate STK4400 to Cray-1 and Cray-2 interface (using tape connected to the Cray and a 3270 hardware (as I remember) to control the STK for S/370 systems.

Right field:? Is there an HTTPD for VM/CE? By this I mean a HTTP server for VM/CE?? OH, is it possible again on VM/CE to run a line by line browser.? (Yeah, I remember using the Internet using a line by line browser (but not on VM).? We connected to an Unix system for our Internet work.

Thank you for your time and consideration.

Re: Possible bug in BREXX parse instruction

#4391

开云体育

Hello Martin,

thank you very much for this test tool. It’s working great on MVS, too.

?READY ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??

rx ptest $ % cats$dogs%wolves bears boars ? ? ? ? ?

?BREXX/370 V2R5M1 (Oct 14 2022) ? ? ? ? ? ? ? ? ? ?

?DELIMITER_1 = $ ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??

?DELIMITER_2 = % ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??

?TEMPLATE = OUTER_L'$'INNER_L INNER_R'%'OUTER_R ? ?

?STRING_TO_PARSE = cats$dogs%wolves bears boars ? ?

?OUTER_L = /cats/ ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?

?INNER_L = /dogs%wolves/ ? ? ? ? ? ? ? ? ? ? ? ? ??

?INNER_R = /bears boars/ ? ? ? ? ? ? ? ? ? ? ? ? ??

?OUTER_R = // ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?

?READY ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??

Best, Mike ?

Show quoted text

Am 17.10.2022 um 13:04 schrieb Martin Scheffler <San-Lorenzo@...>:

$ % cats$dogs%wolves bears boars

Re: Possible bug in BREXX parse instruction

#4390

A quick look into?????? Regina\parsing.c :

/*?????????????????????????????????????????????????????????????????????? ?
?* This implementation of the REXX parse template is quite near to?????? ?
?* what Cowlishaw specified in his book, but there is one very?????????? ?
?* important difference. Cowlishaw sees a template as patterns and?????? ?
?* variables, with patterns in each end (and some of the patterns??????? ?
?* and/or the variables might be empty).???????????????????????????????? ?
?*?????????????????????????????????????????????????????????????????????? ?
?* The concept here is any sequence of variables and patterns, and?????? ?
?* the system is parsed into two levels and interpreted as such.???????? ?
?* First there is the level of patterns, which is anchored to??????????? ?
?* particular locations in the string to be parsed.????????????????????? ?
?*?????????????????????????????????????????????????????????????????????? ?
?* When the anchor-points are determined, the variables are filled?????? ?
?* in with the parts of the string that comes between each anchor.?????? ?
?* Here is an example:?????????????????????????????????????????????????? ?
?*?????????????????????????????????????????????????????????????????????? ?
?*??? parse value 'That is a parse string!' with a b 'is' c d 'i' e????? ?
?*?????????????????????????????????????????????????????????????????????? ?
?* In this example, there are four anchors in the string, the two??????? ?
?* patterns 'is' and 'i', and the two implicit anchors start-of-string?? ?
?* and end-of-string. They anchor particular locations in the string???? ?
?* to the lists of variables: (a b), (c d) and (e). At the first level?? ?
?* the anchors are found and the text between them are deternmined?????? ?
?* (SOS=Start-Of-String, EOS=End-Of-String):???????????????????????????? ?
?*?????????????????????????????????????????????????????????????????????? ?
?*??????????????????????????? That is a parse string!??????????????????? ?
?*??? anchors??????????? (SOS)-----is------------i---(EOS)?????????????? ?
?*??? strings in-between????? <a b>? <<<<c d>>>>> <e>??????????????????? ?
?*?????????????????????????????????????????????????????????????????????? ?
?* Now, we have a set of substrings, and to each substring, there is???? ?
?* possibly empty set of variable which are to receive its value from??? ?
?* the contents of that substring. Doing that, we get:?????????????????? ?
?*?????????????????????????????????????????????????????????????????????? ?
?*??? (a b) = 'That '??????? ==> a='That'?? b=' '??????????????????????? ?
?*??? (c d) = ' a parse str' ==> c='a'????? c=' parse str'?????????????? ?
?*??? (e)?? = 'ng!'????????? ==> e='ng!'???????????????????????????????? ?
?*?????????????????????????????????????????????????????????????????????? ?
?* To some extent, one might say that there are one anchor between?????? ?
?* each variable, since these match a sequence of blank characters.????? ?
?* However, these have less priority than the explicit patterns.???????? ?
?*?????????????????????????????????????????????????????????????????????? ?
?* This file makes available three functions:??????????????????????????? ?
?*?????????????????????????????????????????????????????????????????????? ?
?*?? doparse()????? parses a single string into a single template??????? ?
?*?? parseargtree() parses a set of strings into a set of templates????? ?
?*?? bmstrstr()???? implementation of Boyer-Moore string search????????? ?
?*/????????????????????????????????????????????????????????????????????? ?

Re: Possible bug in BREXX parse instruction

#4389

Hi Bernd,

On VMCE 1.1.2:

1. Logon MAINTC.

2. The tools for maintaining the GCC runtime are on the 19c at filemode 'T'.

3. Establish the brexx code search?order with the command 'BRXSRCH'

? ? a. 193 is the C compiler output TEXT files for BREXX

? ? b. 393 is the compiler source

? ? c. 394 is the H files provided by the? GCC compiler

? ? d. 194 is the GCCLIB?MACLIB need to compile BREXX

4. The compiler is built with these tools:

? ? a. BRXASM?compiles the assembler code on the 393 disk

? ? b. BRXCOMP compiles the C code on the 393 disk

? ? c. BRXGEN?creates the executable output file: BREXX TEXT and BREXX MAP

5. BREXX is integrated into CMS, so perform these steps to install it on MAINT.

? ? LOGON MAINT

? ? DEFINE STOR 16M

? ? IPL 190 CLEAR

? ? NEWBREXX

? ? IPL 190 CLEAR

? ? SAVESYS CMS

? ? DEFINE STOR 15M

? ? IPL CMS

There are HELP files on the MAINTC T disk for these commands.

Before using them, rename the HELP files with filetype?'HELPCMD' to have

filetype 'HELPCM$'.

Bob Bolch

? ??

Show quoted text

On Sun, Oct 16, 2022, 5:20 PM Bernd Oppolzer via <berndoppolzer=[email protected]> wrote:

Hello Mark and Bob,

I would like to help you (if I can) with diagnosing the problem in BREXX.
Maybe we could switch this communication to private.

A list of all sources and includes (in C, AFAIK), which are needed to build BREXX,
would be very helpful. And the MDISK where it can be found (I guess it
is part of the VM distribution, or maybe Turnkey MVS - same version?).

Kind regards

Bernd

Am 16.10.2022 um 22:51 schrieb Bob Bolch:

Thanks, Mark.

I never found brexx debug to be very useful. I do remember that you put the BREXXD TEXT on your A-disk, renamed to BREXX TEXT, then IPL CMS.? Then the 'trace' statement, in an EXEC , turns the tracing on and off (I can't remember the exact operand.) The trace output shows you codepoints in the BREXX interpretor where the code flows. I will try to figure out the details and report back.

Bob

On Sun, Oct 16, 2022, 4:35 PM Mark A. Stevens via <marXtevens=[email protected]> wrote:

On Sun, Oct 16, 2022 at 10:36 AM, Bob Bolch wrote:

Which left parentheses?are you referring?to in that sentence?

?

Also, the WITH keyword is only valid in a parse of the form:

PARSE VALUE expression WITH template

The 'with' in Dave Mitchell's example is a variable name.

?

The correct result of the DAVEMTST?EXEC is the following:

Welcome back from your surgery.

Once again, I'm leaving out thoughts and not writing them down. Sorry.
I am referencing Mike's 2nd edition, also the ANSI X3J18-199X document. I will also eat my words about the parentheses. I was wrong. I had to walk away from this due to other challenges, and forgot.

From the ANSI document.

/* Note: The next section describes templates. */
template_list?????? := template | [template] ',' [template_list]
template??????????? := (trigger | target | Msg38.1)+
target????????????? := VAR_SYMBOL | '.'
trigger???????????? := pattern | positional
pattern???????????? := STRING | vrefp
vrefp?????????????? := '(' (VAR_SYMBOL | Msg19.7) (')' | Msg46.1)
positional????????? := absolute_positional | relative_positional
absolute_positional := NUMBER | '=' position
position??????????? := NUMBER | vrefp | Msg38.2
relative_positional := ('+' | '-') position

Concerning the use of 'WITH', I found I was misreading the code. You are correct.

address ??????????? := 'ADDRESS' [(taken_constant [expression]
??????????????????? | Msg19.1 | valueexp) [ 'WITH' connection]]
... and ...

parse_value???????? := 'VALUE' [expression] ('WITH' | Msg38.3)

I have been going through the C code to determine what is and is not happening. Not having a lot of luck, yet, as I get lost in the definitions of record constructs, and I don't understand why TEMPLATE C skips left paren while gathering symbols. Starting at line 35 and on.

/* ----------- vrefp --------- */
/* variable reference position */
static void
vrefp(void) {
??? Context *context = (Context *) CMSGetPG();
??? nextsymbol(); /* skip left parenthesis */

I also have not been able to activate the debug mode of bREXX, though I thought I followed the directions.

?... Mark S.
Boy, do I feel stupid today.

Re: Possible bug in BREXX parse instruction

#4388

Hi Mike,

I don't know where the bad code is, but I expect it is probably in the interpre.c piece.

There is no code that I could find to handle literals in the parse template.?

For example, if we have a string to parse like this one?defined in a variable 'x':

a b c ( d e f? g? h i? j? k?

And a parse template like:

Parse var x one '(' two three four five? ' g'? six?

REXX should:

1. Find the literals in the template. Here they are '(' and 'g'.

2. Separate the string into the literals and the parts that are not literals. Those are:

String:? a b c

Literal: (

String: d e f

Literal: g

String: h i j k

3. We should then assign the template variables, as follows:

Assign value 'a b c' to variable 'one'.

Assign value 'd' to variable 'two'.

Assign value 'e' to variable 'three'.

Assign value 'f' to variable 'four'.

Assign value '' to variable 'five'.

Assign value 'h i j k' to variable 'six'.

t test exec? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??

? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
/* */ ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
address COMMAND ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
x = 'a b c ( d e f ?g ?h i ?j ?k' ? ? ? ? ? ? ? ? ?
Parse var x one '(' two three four five ?' g' ?six
say one ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
say two ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
say three ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
say four ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
say five ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
say six ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
Ready; T=0.01/0.01 07:12:13?

? ? ? ? ? ? test? ? ? ? ? ? ? ? ? ? ? ??

a b c ? ? ? ? ? ? ? ? ? ? ?
d ? ? ? ? ? ? ? ? ? ? ? ? ?
e ? ? ? ? ? ? ? ? ? ? ? ? ?
f ? ? ? ? ? ? ? ? ? ? ? ? ?
? ? ? ? ? ? ? ? ? ? ? ? ? ?
? h i ?j ?k ? ? ? ? ? ? ? ?

Ready; T=0.01/0.01 07:12:34? ?

The key here is to parse subsections of the string by first separating?them,

using the literals found in the parse template.? ?

BREXX doesn't do that on VMCE, or MVS, or in the first implementation by the?

developer. BREXX produces:? ?

test ? ? ? ? ? ? ? ? ? ? ? ?
a b c ? ? ? ? ? ? ? ? ? ? ?
d ? ? ? ? ? ? ? ? ? ? ? ? ?
e ? ? ? ? ? ? ? ? ? ? ? ? ?
f ? ? ? ? ? ? ? ? ? ? ? ? ?
g ?h i ?j ?k ? ? ? ? ? ? ? ?
? ? ? ? ? ? ? ? ? ? ? ? ? ?
Ready; T=0.02/0.02 07:16:28

because it does not process the literals in the parse template correctly.

Bob Bolch?

Show quoted text

On Sun, Oct 16, 2022, 1:25 PM Mike Gro?mann <mike.grossmann.de@...> wrote:

Bob,

did you came closer to a c file, where the problem may occur?
I just reviewed my old mail, but can’t really remember. Something with
not finding the closing ?)“. Where do you think is the bug, I will
review the code.

Mike ?

Am 16.10.2022 um 19:18 schrieb Bob Bolch <Bob@...>:

Yes. The problem is that BREXX doesn't handle literals in the parse template!!
I just don't know enough C to find and fix it.
Bob Bolch

On Sun, Oct 16, 2022, 12:46 PM Martin Scheffler <San-Lorenzo@...> wrote:
Comparing with results from real iron (z/VM 6.4):

Ready; T=0.01/0.01 10:46:48?????????????????????????????????????? ?
?DAVEMTST???????????????????????????????????????????????????????? ?
z/VM Version 6 Release 4.0, service level 1701 (64-bit)?????????? ?
Generated at 04/24/17 16:30:42 EST??????????????????????????????? ?
IPL at 10/08/22 07:37:33 EST????????????????????????????????????? ?
CMS Level 28, Service Level 1701????????????????????????????????? ?
REXX370 4.02 01 Dec 1998????????????????????????????????????????? ?
test of () trial 1??????????????????????????????????????????????? ?
in1 = //????????????????????????????????????????????????????????? ?
in2 = //????????????????????????????????????????????????????????? ?
outer=/ trial 1/????????????????????????????????????????????????? ?
test of (1) trial 2?????????????????????????????????????????????? ?
in1 = /1/???????????????????????????????????????????????????????? ?
in2 = //????????????????????????????????????????????????????????? ?
outer=/ trial 2/????????????????????????????????????????????????? ?
test of (1 3) trial 3???????????????????????????????????????????? ?
in1 = /1/???????????????????????????????????????????????????????? ?
in2 = /3/???????????????????????????????????????????????????????? ?
outer=/ trial3/?????????????????????????????????????????????????? ?
Ready; T=0.01/0.01 10:46:51?????????????????????????????????????? ?
????????????????????????????????????????????????????????????????? ?
????????????????????????????????????????????????????????????????? ?
Written new file: DAVEMTST EXEC A1??????????????????????????????? ?
Ready; T=0.09/0.23 15:58:32?????????????????????????????????????? ?
DAVEMTST????????????????????????????????????????????????????????? ?
SYSTEM 4381-A???????????????????????????????????????????????????? ?
VM/370 Community Edition Version? 1 Release? 1.2 10/11/22 08:44:05?
VM/370 CMS Community Edition Version 1 Release 1.2??????????????? ?
CMS bREXX 1.0.1 Jul? 5 2022?????????????????????????????????????? ?
test of () trial 1??????????????????????????????????????????????? ?
in1 = /)/???????????????????????????????????????????????????????? ?
in2 = /trial 1/?????????????????????????????????????????????????? ?
outer=//????????????????????????????????????????????????????????? ?
test of (1) trial 2?????????????????????????????????????????????? ?
in1 = /1)/??????????????????????????????????????????????????????? ?
in2 = /trial 2/?????????????????????????????????????????????????? ?
outer=//????????????????????????????????????????????????????????? ?
test of (1 3) trial 3???????????????????????????????????????????? ?
in1 = /1/???????????????????????????????????????????????????????? ?
in2 = /3/???????????????????????????????????????????????????????? ?
outer=/ trial3/?????????????????????????????????????????????????? ?
Ready; T=0.08/0.12 15:58:38?????????????????????????????????????? ?
????????????????????????????????????????????????????????????????? ?
*** side by side:???????????????????????????????????????????????? ?
????????????????????????????????????????????????????????????????? ?
REXX370 4.02 01 Dec 1998? CMS bREXX 1.0.1 Jul? 5 2022???????????? ?
test of () trial 1??????? test of () trial 1????????????????????? ?
in1 = //????????????????? in1 = /)/?????????????????????????????? ?
in2 = //????????????????? in2 = /trial 1/???????????????????????? ?
outer=/?trial 1/????????? outer=//??????????????????????????????? ?
test of (1) trial 2?????? test of (1) trial 2???????????????????? ?
in1 = /1/???????????????? in1 = /1)/????????????????????????????? ?
in2 = //????????????????? in2 = /trial 2/???????????????????????? ?
outer=/?trial 2/????????? outer=//??????????????????????????????? ?
test of (1 3) trial 3???? test of (1 3) trial 3?????????????????? ?
in1 = /1/???????????????? in1 = /1/?????????????????????????????? ?
in2 = /3/???????????????? in2 = /3/?????????????????????????????? ?
outer=/ trial3/?????????? outer=/ trial3/???????????????????????? ?
????????????????????????????????????????????????????????????????? ?
?DAVEMTST EXEC???? A1? F 80? Trunc=80 Size=22 Line=11 Col=1 Alt=0 ?
====>???????????????????????????????????????????????????????????? ?
????0 * * * Top of File * * *???????????????????????????????????? ?
????1 /* test parse */??????????????????????????????????????????? ?
????2 "q cplevel"???????????????????????????????????????????????? ?
????3 "q cmslevel"??????????????????????????????????????????????? ?
????4 parse version v???????????????????????????????????????????? ?
????5 say v?????????????????????????????????????????????????????? ?
????6?? trest = '() trial 1'????????????????????????????????????? ?
????7?? say 'test of () trial 1'????????????????????????????????? ?
????8?? s = dotell(trest)???????????????????????????????????????? ?
????9?? trest = '(1) trial 2'???????????????????????????????????? ?
???10?? say 'test of (1) trial 2'???????????????????????????????? ?
???11?? s = dotell(trest)???????????????????????????????????????? ?
???12?? trest = '(1 3) trial3'??????????????????????????????????? ?
???13?? say 'test of (1 3) trial 3'?????????????????????????????? ?
???14?? s = dotell(trest)???????????????????????????????????????? ?
???15?? exit????????????????????????????????????????????????????? ?
???16???????????????????????????????????????????????????????????? ?
???17 dotell:???????????????????????????????????????????????????? ?
???18?? parse arg with '(' in1 in2 ')' outer????????????????????? ?
???19?? say 'in1 = /'in1'/'?????????????????????????????????????? ?
???20?? say 'in2 = /'in2'/'?????????????????????????????????????? ?
???21?? say 'outer=/'outer'/'???????????????????????????????????? ?
???22?? return 0????????????????????????????????????????????????? ?
???23 * * * End of File * * *???????????????????????????????????? ?

Re: Possible bug in BREXX parse instruction

#4387

I have rewritten the test tool: literal delimiters and string_to_parse are supplied as arguments.
Usage instructions included.

????????????????????????????????????????????????????????????????????????????????????????????????
?davtest?????????????????????????????????????????????????????????????????????????????????????? ?
CMS bREXX 1.0.1 Jul? 5 2022??????????????????????????????????????????????????????????????????? ?
CMS COMMAND davtest davtest??????????????????????????????????????????????????????????????????? ?
?????????????????????????????????????????????????????????????????????????????????????????????? ?
Test tool to research bREXX parsing error, see???????????????????????????????????????????????? ?
?/g/h390-vm/topic/87676003??????????????????????????????????????????????????? ?
?https://github.com/s390guy/vm370/issues/56??????????????????????????????????????????????????? ?
?????????????????????????????????????????????????????????????????????????????????????????????? ?
?????????????????????????????????????????????????????????????????????????????????????????????? ?
Usage:?? davtest???? delimiter_1?? delimiter_2????? string_to_parse??????????????????????????? ?
?????????????????????????????????????????????????????????????????????????????????????????????? ?
Example:?? davtest $ % cats$dogs%wolves bears boars??????????????????????????????????????????? ?
?????????????????????????????????????????????????????????????????????????????????????????????? ?
Ready(00001); T=0.03/0.04 08:53:16???????????????????????????????????????????????????????????? ?
?davtest $ % cats$dogs%wolves bears boars????????????????????????????????????????????????????? ?
CMS bREXX 1.0.1 Jul? 5 2022??????????????????????????????????????????????????????????????????? ?
delimiter_1 = $??????????????????????????????????????????????????????????????????????????????? ?
delimiter_2 = %??????????????????????????????????????????????????????????????????????????????? ?
template = outer_l'$'inner_l inner_r'%'outer_r???????????????????????????????????????????????? ?
string_to_parse = cats$dogs%wolves bears boars???????????????????????????????????????????????? ?
outer_l = /cats/?????????????????????????????????????????????????????????????????????????????? ?
inner_l = /dogs%wolves/??????????????????????????????????????????????????????????????????????? ?
inner_r = /bears boars/??????????????????????????????????????????????????????????????????????? ?
outer_r = //?????????????????????????????????????????????????????????????????????????????????? ?
Ready; T=0.03/0.03 08:53:28??????????????????????????????????????????????????????????????????? ?
?????????????????????????????????????????????????????????????????????????????????????????????? ?
?davtest?????????????????????????????????????????????????????????????????????????????????????? ?
REXX370 4.02 01 Dec 1998?????????????????????????????????????????????????????????????????????? ?
CMS COMMAND DAVTEST EXEC A1 davtest CMS??????????????????????????????????????????????????????? ?
?????????????????????????????????????????????????????????????????????????????????????????????? ?
Test tool to research bREXX parsing error, see???????????????????????????????????????????????? ?
?/g/h390-vm/topic/87676003??????????????????????????????????????????????????? ?
?https://github.com/s390guy/vm370/issues/56??????????????????????????????????????????????????? ?
?????????????????????????????????????????????????????????????????????????????????????????????? ?
?????????????????????????????????????????????????????????????????????????????????????????????? ?
Usage:?? DAVTEST???? delimiter_1?? delimiter_2????? string_to_parse??????????????????????????? ?
?????????????????????????????????????????????????????????????????????????????????????????????? ?
Example:?? DAVTEST $ % cats$dogs%wolves bears boars??????????????????????????????????????????? ?
?????????????????????????????????????????????????????????????????????????????????????????????? ?
Ready(00001); T=0.01/0.01 03:50:31???????????????????????????????????????????????????????????? ?
?DAVTEST $ % cats$dogs%wolves bears boars????????????????????????????????????????????????????? ?
REXX370 4.02 01 Dec 1998?????????????????????????????????????????????????????????????????????? ?
delimiter_1 = $??????????????????????????????????????????????????????????????????????????????? ?
delimiter_2 = %??????????????????????????????????????????????????????????????????????????????? ?
template = outer_l'$'inner_l inner_r'%'outer_r???????????????????????????????????????????????? ?
string_to_parse = cats$dogs%wolves bears boars???????????????????????????????????????????????? ?
outer_l = /cats/?????????????????????????????????????????????????????????????????????????????? ?
inner_l = /dogs/?????????????????????????????????????????????????????????????????????????????? ?
inner_r = //?????????????????????????????????????????????????????????????????????????????????? ?
outer_r = /wolves bears boars/???????????????????????????????????????????????????????????????? ?
Ready; T=0.01/0.01 03:50:41??????????????????????????????????????????????????????????????????? ?
?????????????????????????????????????????????????????????????????????????????????????????????? ?
*** side by side:????????????????????????????????????????????????????????????????????????????? ?
???????????????????????????????????????????????????????????????????????????????????????????????
?davtest $ % cats$dogs%wolves bears boars??????? DAVTEST $ % cats$dogs%wolves bears boars????? ?
CMS bREXX 1.0.1 Jul? 5 2022???????????????????? REXX370 4.02 01 Dec 1998?????????????????????? ?
delimiter_1 = $???????????????????????????????? delimiter_1 = $??????????????????????????????? ?
delimiter_2 = %???????????????????????????????? delimiter_2 = %??????????????????????????????? ?
template = outer_l'$'inner_l inner_r'%'outer_r? template = outer_l'$'inner_l inner_r'%'outer_r ?
string_to_parse = cats$dogs%wolves bears boars? string_to_parse = cats$dogs%wolves bears boars ?
outer_l = /cats/??????????????????????????????? outer_l = /cats/?????????????????????????????? ?
inner_l = /dogs%wolves/???????????????????????? inner_l = /dogs/?????????????????????????????? ?
inner_r = /bears boars/???????????????????????? inner_r = //?????????????????????????????????? ?
outer_r = //??????????????????????????????????? outer_r = /wolves bears boars/???????????????? ?
Ready; T=0.03/0.03 08:53:28???????????????????? Ready; T=0.01/0.01 03:50:41??????????????????? ?
?????????????????????????????????????????????????????????????????????????????????????????????? ?
File: DAVTEST? EXEC???? A1?????? RECFM: V LRECL: 125(255) Lines:??? 40 Current:??? 12????????? ?
====>????????????????????????????????????????????????????????????????????????????????????????? ?
??? 0 * * * Top of file * * *????????????????????????????????????????????????????????????????? ?
??? 1 /* REXX */?????????????????????????????????????????????????????????????????????????????? ?
??? 2 signal on novalue??????????????????????????????????????????????????????????????????????? ?
??? 3 parse version v????????????????????????????????????????????????????????????????????????? ?
??? 4 say v??????????????????????????????????????????????????????????????????????????????????? ?
??? 5 parse source? s????????????????????????????????????????????????????????????????????????? ?
??? 6????????????????????????????????????????????????????????????????????????????????????????? ?
??? 7 parse arg delimiter_1 delimiter_2 string_to_parse??????????????????????????????????????? ?
??? 8 if strip(string_to_parse) = "" then signal usage???????????????????????????????????????? ?
??? 9????????????????????????????????????????????????????????????????????????????????????????? ?
?? 10 template = "outer_l'"delimiter_1"'inner_l inner_r'"delimiter_2"'outer_r"???????????????? ?
?? 11 say "delimiter_1 =" delimiter_1????????????????????????????????????????????????????????? ?
?? 12 say "delimiter_2 =" delimiter_2????????????????????????????????????????????????????????? ?
?? 13 say "template =" template??????????????????????????????????????????????????????????????? ?
?? 14 say "string_to_parse =" string_to_parse????????????????????????????????????????????????? ?
?? 15????????????????????????????????????????????????????????????????????????????????????????? ?
?? 16 interpret "parse var string_to_parse" template?????????????????????????????????????????? ?
?? 17 say "outer_l = /"outer_l"/"????????????????????????????????????????????????????????????? ?
?? 18 say "inner_l = /"inner_l"/"????????????????????????????????????????????????????????????? ?
?? 19 say "inner_r = /"inner_r"/"????????????????????????????????????????????????????????????? ?
?? 20 say "outer_r = /"outer_r"/"????????????????????????????????????????????????????????????? ?
?? 21 exit 0?????????????????????????????????????????????????????????????????????????????????? ?
?? 22????????????????????????????????????????????????????????????????????????????????????????? ?
?? 23 usage:?????????????????????????????????????????????????????????????????????????????????? ?
?? 24 say s??????????????????????????????????????????????????????????????????????????????????? ?
?? 25 parse var s . . my_name .??????????????????????????????????????????????????????????????? ?
?? 26 say " "????????????????????????????????????????????????????????????????????????????????? ?
?? 27 say "Test tool to research bREXX parsing error, see"???????????????????????????????????? ?
?? 28 say " /g/h390-vm/topic/87676003"??????????????????????????????????????? ?
?? 29 say " https://github.com/s390guy/vm370/issues/56"??????????????????????????????????????? ?
?? 30 say " "????????????????????????????????????????????????????????????????????????????????? ?
?? 31 say " "????????????????????????????????????????????????????????????????????????????????? ?
?? 32 say "Usage:? " my_name "??? delimiter_1?? delimiter_2????? string_to_parse "???????????? ?
?? 33 say " "????????????????????????????????????????????????????????????????????????????????? ?
?? 34 say "Example:? " my_name "$ % cats$dogs%wolves bears boars"????????????????????????????? ?
?? 35 say " "????????????????????????????????????????????????????????????????????????????????? ?
?? 36 exit 1?????????????????????????????????????????????????????????????????????????????????? ?
?? 37 novalue:???????????????????????????????????????????????????????????????????????????????? ?
?? 38 say "*** ABORT: NOVALUE condition in line" sigl????????????????????????????????????????? ?
?? 39 say "***" sourceline(sigl)?????????????????????????????????????????????????????????????? ?
?? 40 exit 777???????????????????????????????????????????????????????????????????????????????? ?
????? * * * End of file * * *????????????????????????????????????????????????????????????????? ?
Unchanged?????????????????????????????????? ee V1.2.5_2022-10-08_12:50:00,? 5 File(s)????????? ?

Re: Three questions about VM/CE (Left, middle, and right field question)

#4386

On Mon, Oct 17, 2022 at 10:21 AM, Bertram Moshier wrote:

Right field:? Is there an HTTPD for VM/CE?

There is no TCP/IP in VM/CE.
See - an early IBM implementation.

Martin

Three questions about VM/CE (Left, middle, and right field question)

#4385

Hi,

I have three questions.? As a side note, I'm a ham radio operator (WB8ERT) and use DMR.

My left field question would be for fellow ham radio operators.? I understand getting a PI-Raspberry to operate as? a transmit and receive DMR.? Just for fun, I'm wondering about doing the same using VM.? Is it possible, in theory?? I think it should be possible.? The DMR code is in C.? SIO to send and receive and yet . . .

Middle question:? What is involved in getting herc to see a new device that would then be seen by VM?? I know from my work at Cray Research, Inc, creating hardware for S/370 systems is possible.? We had two hardware devices to talk to a Cray.? One looked like a CTC to the S/370 and the other was by Network Systems.? To our Station software, they looked very similar.? I also worked on the Seagate STK4400 to Cray-1 and Cray-2 interface (using tape connected to the Cray and a 3270 hardware (as I remember) to control the STK for S/370 systems.

Right field:? Is there an HTTPD for VM/CE? By this I mean a HTTP server for VM/CE?? OH, is it possible again on VM/CE to run a line by line browser.? (Yeah, I remember using the Internet using a line by line browser (but not on VM).? We connected to an Unix system for our Internet work.

Thank you for your time and consideration.

Re: Possible bug in BREXX parse instruction

#4384

开云体育

Hello,

I don’t think, the problem is related to template.c

In my understanding, this code used by the compiler?

and will just create the interpreter stack.

The Problem may occur in interpre.c.?

There is some logic to find the values between the literals?'('?and?')‘.?

OP_TR_LIT and OP_TR_SPACE.

I’m in debugging mode ;)

Mike ?

Show quoted text

Am 16.10.2022 um 22:35 schrieb Mark A. Stevens via <marXtevens@...>:

On Sun, Oct 16, 2022 at 10:36 AM, Bob Bolch wrote:

Which left parentheses?are you referring?to in that sentence?

?

Also, the WITH keyword is only valid in a parse of the form:

PARSE VALUE expression WITH template

The 'with' in Dave Mitchell's example is a variable name.

?

The correct result of the DAVEMTST?EXEC is the following:

Welcome back from your surgery.

Once again, I'm leaving out thoughts and not writing them down. Sorry.
I am referencing Mike's 2nd edition, also the ANSI X3J18-199X document. I will also eat my words about the parentheses. I was wrong. I had to walk away from this due to other challenges, and forgot.

From the ANSI document.

/* Note: The next section describes templates. */
template_list?????? := template | [template] ',' [template_list]
template??????????? := (trigger | target | Msg38.1)+
target????????????? := VAR_SYMBOL | '.'
trigger???????????? := pattern | positional
pattern???????????? := STRING | vrefp
vrefp?????????????? := '(' (VAR_SYMBOL | Msg19.7) (')' | Msg46.1)
positional????????? := absolute_positional | relative_positional
absolute_positional := NUMBER | '=' position
position??????????? := NUMBER | vrefp | Msg38.2
relative_positional := ('+' | '-') position

Concerning the use of 'WITH', I found I was misreading the code. You are correct.

address ??????????? := 'ADDRESS' [(taken_constant [expression]
??????????????????? | Msg19.1 | valueexp) [ 'WITH' connection]]
... and ...

parse_value???????? := 'VALUE' [expression] ('WITH' | Msg38.3)

I have been going through the C code to determine what is and is not happening. Not having a lot of luck, yet, as I get lost in the definitions of record constructs, and I don't understand why TEMPLATE C skips left paren while gathering symbols. Starting at line 35 and on.

/* ----------- vrefp --------- */
/* variable reference position */
static void
vrefp(void) {
??? Context *context = (Context *) CMSGetPG();
??? nextsymbol(); /* skip left parenthesis */

I also have not been able to activate the debug mode of bREXX, though I thought I followed the directions.

?... Mark S.
Boy, do I feel stupid today.

Re: Possible bug in BREXX parse instruction

#4383

Hello Mark,

For MVS there is another version:

This version is not based on gcclib.

The MVS version mentioned by you, is the original multi platform version of brexx.

Both versions, Bobs VM and my MVS, are forks

of this original one. But we dropped GCC as?

our compiler and switched to JCC.

Best, Mile?

Mark A. Stevens via <marXtevens=[email protected]> schrieb am Mo. 17. Okt. 2022 um 02:22:

Show quoted text

On Sun, Oct 16, 2022 at 04:20 PM, Bernd Oppolzer wrote:

I would like to help you (if I can) with diagnosing the problem in BREXX.
Maybe we could switch this communication to private.

A list of all sources and includes (in C, AFAIK), which are needed to build BREXX,
would be very helpful. And the MDISK where it can be found (I guess it
is part of the VM distribution, or maybe Turnkey MVS - same version?).

There are CMS & MVS versions on GitHub. They are not identical to each other. They both make use of GCCLIB, but I'm not sure if there is an exact, up to date copy of GCCLIB on GitHub for either CMS, or MVS. I'm pretty sure Dave W. or Bob B. would know the answer.

The URLs are:

CMS

MVS (There are several, so I'm guessing this is the correct one, based on references to the author in other discussions) A search for BREXX on all of GitHub will show the other contenders.

All the code that builds GCCLIB and BREXX for CMS are on the MAINTC minidisks.? There are a number of EXECs and HELPCMDs on the T disk to set up disk access, compile, and build. The file TOOLDISK MEMO T1, is the overview.

L MAINTC
ENTER PASSWORD:
?
DASD 190 LINKED R/O; R/W BY MAINT; R/O BY 005 USERS
DASD 19D LINKED R/O; R/W BY MAINT; R/O BY 003 USERS
DASD 19E LINKED R/O; R/W BY MAINT; R/O BY 005 USERS
FILES: 020 RDR,? NO PRT,? NO PUN
LOGON AT 19:15:07 GMT SUNDAY 10/16/22
VM Community Edition V1 R1.2
?
Y (19E) R/O
U (19D) R/O
Ready; T=0.01/0.01 19:15:09
q disk
Label? CUU M? Stat? Cyl Type Blksize?? Files? Blks Used-(%) Blks Left? Blk Total
MNT191 191 A?? R/W?? 50 3350? 800???????? 16?????? 2013-07????? 26487????? 28500
CMSDSK 190 S?? R/O?? 59 3350? 800??????? 172????? 19537-58????? 14093????? 33630
MNT19C 19C T?? R/W?? 50 3350? 800???????? 40??????? 159-01????? 28341????? 28500
MNT29D 19D U/S R/O?? 30 3350? 800??????? 407?????? 6242-37????? 10858????? 17100
MNT19E 19E Y/S R/O?? 70 3350? 800??????? 706????? 27458-69????? 12442????? 39900
Ready; T=0.01/0.01 19:15:12

I Hope This Helps.

?... Mark S.

--

Von Gmail Mobile gesendet

Re: Another Time Zone Question (Sorta)

#4382

Hello Mark,

Thank you so very much for your reply!? I will remove SixPack 1.3 in favor of the more recent VM/CE release.

I greatly appreciate knowing this information.

I don't know if someone here has the power, but it would be nice for the SixPack website to denote VM/CE supercedes it.

Thank you again.

Show quoted text

On Sun, Oct 16, 2022, 19:06 Mark A. Stevens via <marXtevens=[email protected]> wrote:

On Sun, Oct 16, 2022 at 06:44 PM, Bertram Moshier wrote:

I'm not finding anything about VM/CE 1.2 and if it came after SixPack 1.3 or before it.

?

Concerning Maint Memo B, unfortunately, the SixPack 1.3 version Maint ID doesn't have a 535 drive.??

Sixpack 1.3 preceded all the VM/370 CE releases. MAINT 535, a play on SES, by the way, was added to VM/370 CE V1R1... I forget which exact release. You are missing that minidisk on 1.3, so you won't see MAINT MEMO. On VM/370 CE you won't see SYSPROG MEMO, as it would confuse everyone, as it 'competes' with MAINT MEMO.

Should someone develop either CP or CMS code, how does the person make it available for either SixPack or VM/CE?

As an example, I posted ASSIST for VM/370 in the files section of this discussion group. Bob Bolch took that and added it to VM/370 CE V1R1.2.
An aside, that code should run on 1.3, but if it doesn';t, please let me know, and I will see what I can do to make it so.

Which one is better: SixPack 1.3 or VM/CE 1.2?

VM/370 CE V1... comes after the Sixpack 1.3 and contains almost everything the Sixpack has, with the exception of SYSPROG MEMO and some other files that were removed, because they were broken, or incomplete. ASSIST comes to mind.

?... Mark S.
Better? is the enemy of Good Enough. Jerry Pournelle

?

Re: Another Time Zone Question (Sorta)

#4381

Bertram, you did not read, listen or whatever ...

Dave Wade wrote:

Oct 16 ? #4356??

Bertram,

We handle most things folks throw at us. I’ve updated that page to point out later versions are elsewhere.

Dave

now tells you to go elsewhere:

VM/370 Downloads

*** Important ***?Please use VM/CE which you will find ?as it contains new features and fixes ****

On this page you will find some VM/370 downloads. These are listed with the most recent first:-

Six Pack 1.3

This is intended to be a final stable release of the 1.3 Betas that have been out in the wild for a long time and form a baseline for moving forward onto VM/370 Community Edition. It has changes by many people, see the "readme-1_3.txt" in the release for full details of all the changes. As usual report any issues on the H-390 list at groups.io?/g/h390-vm?

?

tells you:

VM/370 Releases

Here you will find the VM releases. See the menu to the left.?

We recommend that you use the latest release as it contains many fixes and enhancements.

Older releases are retained so that any regression issues may be checked,

Finally, I can't find Maint Memo B mentioned earlier.? ?What information am I?missing?

I kindly advise you to install

Re: Possible bug in BREXX parse instruction

#4380

On Sun, Oct 16, 2022 at 04:20 PM, Bernd Oppolzer wrote:

I would like to help you (if I can) with diagnosing the problem in BREXX.
Maybe we could switch this communication to private.

A list of all sources and includes (in C, AFAIK), which are needed to build BREXX,
would be very helpful. And the MDISK where it can be found (I guess it
is part of the VM distribution, or maybe Turnkey MVS - same version?).

There are CMS & MVS versions on GitHub. They are not identical to each other. They both make use of GCCLIB, but I'm not sure if there is an exact, up to date copy of GCCLIB on GitHub for either CMS, or MVS. I'm pretty sure Dave W. or Bob B. would know the answer.

The URLs are:

CMS

MVS (There are several, so I'm guessing this is the correct one, based on references to the author in other discussions) A search for BREXX on all of GitHub will show the other contenders.

All the code that builds GCCLIB and BREXX for CMS are on the MAINTC minidisks.? There are a number of EXECs and HELPCMDs on the T disk to set up disk access, compile, and build. The file TOOLDISK MEMO T1, is the overview.

L MAINTC
ENTER PASSWORD:
?
DASD 190 LINKED R/O; R/W BY MAINT; R/O BY 005 USERS
DASD 19D LINKED R/O; R/W BY MAINT; R/O BY 003 USERS
DASD 19E LINKED R/O; R/W BY MAINT; R/O BY 005 USERS
FILES: 020 RDR,? NO PRT,? NO PUN
LOGON AT 19:15:07 GMT SUNDAY 10/16/22
VM Community Edition V1 R1.2
?
Y (19E) R/O
U (19D) R/O
Ready; T=0.01/0.01 19:15:09
q disk
Label? CUU M? Stat? Cyl Type Blksize?? Files? Blks Used-(%) Blks Left? Blk Total
MNT191 191 A?? R/W?? 50 3350? 800???????? 16?????? 2013-07????? 26487????? 28500
CMSDSK 190 S?? R/O?? 59 3350? 800??????? 172????? 19537-58????? 14093????? 33630
MNT19C 19C T?? R/W?? 50 3350? 800???????? 40??????? 159-01????? 28341????? 28500
MNT29D 19D U/S R/O?? 30 3350? 800??????? 407?????? 6242-37????? 10858????? 17100
MNT19E 19E Y/S R/O?? 70 3350? 800??????? 706????? 27458-69????? 12442????? 39900
Ready; T=0.01/0.01 19:15:12

I Hope This Helps.

?... Mark S.

Re: Another Time Zone Question (Sorta)

#4379

On Sun, Oct 16, 2022 at 06:44 PM, Bertram Moshier wrote:

I'm not finding anything about VM/CE 1.2 and if it came after SixPack 1.3 or before it.

?

Concerning Maint Memo B, unfortunately, the SixPack 1.3 version Maint ID doesn't have a 535 drive.??

Sixpack 1.3 preceded all the VM/370 CE releases. MAINT 535, a play on SES, by the way, was added to VM/370 CE V1R1... I forget which exact release. You are missing that minidisk on 1.3, so you won't see MAINT MEMO. On VM/370 CE you won't see SYSPROG MEMO, as it would confuse everyone, as it 'competes' with MAINT MEMO.

Should someone develop either CP or CMS code, how does the person make it available for either SixPack or VM/CE?

As an example, I posted ASSIST for VM/370 in the files section of this discussion group. Bob Bolch took that and added it to VM/370 CE V1R1.2.
An aside, that code should run on 1.3, but if it doesn';t, please let me know, and I will see what I can do to make it so.

Which one is better: SixPack 1.3 or VM/CE 1.2?

VM/370 CE V1... comes after the Sixpack 1.3 and contains almost everything the Sixpack has, with the exception of SYSPROG MEMO and some other files that were removed, because they were broken, or incomplete. ASSIST comes to mind.

?... Mark S.
Better? is the enemy of Good Enough. Jerry Pournelle

?

Re: Another Time Zone Question (Sorta)

#4378

Hello Martin,

Thank you for your reply to my questions.

>? You can read these files before Hercules is running. This list is sorted by date.
>? readme-1_3.txt??was for SixPack 1.3? .

I'm not finding anything about VM/CE 1.2 and if it came after SixPack 1.3 or before it.

Concerning Maint Memo B, unfortunately, the SixPack 1.3 version Maint ID doesn't have a 535 drive.??

BTW, how did you get the screenshot you posted?? My copy and past?
How did you get color from TN3270?

The drives on Maint are:

q disk

Label ?CUU M ?Stat ?Cyl Type Blksize ? Files ?Blks Used-(%) Blks Left ?Blk Total

MNT191 191 A ? R/W ? 35 3350 ?800 ? ? ? ? 27 ? ? ? ?258-01 ? ? ?19692 ? ? ?19950 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?

MNT094 094 B/B R/O ? 40 3350 ?800 ? ? ? ?807 ? ? ? 7983-35 ? ? ?14817 ? ? ?22800 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
MNT194 194 D/D R/O ? 35 3350 ?800 ? ? ? ?245 ? ? ?10719-54 ? ? ? 9231 ? ? ?19950 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?

MNT294 294 E/E R/O ? 35 3350 ?800 ? ? ? 1594 ? ? ? 6177-31 ? ? ?13773 ? ? ?19950 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?

MNT394 394 F/F R/O ?110 3350 ?800 ? ? ? ?384 ? ? ?23381-37 ? ? ?39319 ? ? ?62700 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?

CMSDSK 190 S ? R/O ? 59 3350 ?800 ? ? ? ?165 ? ? ?19107-57 ? ? ?14523 ? ? ?33630 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?

MNT19D 19D U/S R/O ? 70 3350 ?800 ? ? ? ?375 ? ? ? 5170-13 ? ? ?34730 ? ? ?39900 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?

MNT19E 19E Y/S R/O ? 70 3350 ?800 ? ? ? ?670 ? ? ?23392-59 ? ? ?16508 ? ? ?39900 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?

Ready; T=0.01/0.01 23:13:15

q v dasd

DASD 093 3350 VM50-4 R/W 0040 CYL

DASD 094 3350 VM50-4 R/W 0040 CYL

DASD 09F 3350 VM50-2 R/W 0015 CYL

DASD 141 3350 VM50-1 R/W 0555 CYL

DASD 190 3350 VM50-1 R/W 0061 CYL

DASD 191 3350 VM50-1 R/W 0035 CYL ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??

DASD 193 3350 VM50-1 R/W 0035 CYL ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??

DASD 194 3350 VM50-1 R/W 0035 CYL ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??

DASD 19D 3350 VM50-2 R/W 0070 CYL ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??

DASD 19E 3350 VM50-2 R/W 0070 CYL ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??

DASD 232 3350 VM50-2 R/W 0555 CYL ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??

DASD 233 3350 VM50-3 R/W 0555 CYL ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??

DASD 234 3350 VM50-4 R/W 0555 CYL ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??

DASD 235 3350 VM50-5 R/W 0555 CYL ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??

DASD 294 3350 VM50-1 R/W 0035 CYL ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??

DASD 299 3350 VM50-1 R/W 0014 CYL ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??

DASD 393 3350 VM50-1 R/W 0085 CYL ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??

DASD 394 3350 VM50-1 R/W 0110 CYL ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??

DASD 39F 3350 VM50-2 R/W 0015 CYL ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??

DASD 494 3350 VM50-1 R/W 0017 CYL ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??

DASD 59F 3350 VM50-2 R/W 0005 CYL ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??

DASD 69F 3350 VM50-2 R/W 0005 CYL

Ready; T=0.01/0.01 23:15:41?

Should someone develop either CP or CMS code, how does the person make it available for either SixPack or VM/CE?

Which one is better: SixPack 1.3 or VM/CE 1.2?

Thank you.

Show quoted text

On Sun, Oct 16, 2022 at 5:58 PM Martin Scheffler <San-Lorenzo@...> wrote:

So which came first VM/CE 1.2 or SixPack 1.3?

?

I other words, which is the latest SixPack 1.3?? Is everything in VM/CE in SixPack 1.3?

You can read these files before Hercules is running. This list is sorted by date.
? readme-1_3.txt? was for SixPack 1.3? .

E:\Hercules\...\VM370CE.V1.R1.2>dir read* /o-d?????????????
????????????????????????????????????????????????????????? ?
?Directory of E:\Hercules\...\VM370CE.V1.R1.2???????????? ?
????????????????????????????????????????????????????????? ?
2022-07-17? 09:44??????????? 10,601 readme-vmce-1_1_2.txt ?
2021-05-03? 15:28???????????? 9,104 readme-vmce-1_1_1.txt ?
2021-05-03? 10:34???????????? 1,553 readme-cms67.txt????? ?
2021-04-28? 08:32???????????? 3,347 readme-virtreal.txt?? ?
2021-04-26? 15:57?????????????? 742 readme-TK4-.txt?????? ?
2021-04-26? 15:48???????????? 3,689 readme-dosvs.txt????? ?
2021-03-20? 08:14??????????? 13,739 readme-vmce-1_1_0.txt ?
2021-03-10? 17:06??????????? 11,090 readme-1_3.txt??????? ?
2018-01-08? 15:13???????????? 9,639 readme-1_2.txt??????? ?
?????????????? 9 File(s)???????? 63,504 bytes???????????? ?

Finally, I can't find Maint Memo B mentioned earlier.? ?What information am I?missing?
MAINT MEMO is on MAINT's 5E5 disk, accessed as B .

L MAINT CPCMS?????????????????????????????????????????????????????????????????????????
DASD 19D LINKED R/W; R/O BY 003 USERS??????????????????????????????????????????????? ?
DASD 19E LINKED R/W; R/O BY 005 USERS??????????????????????????????????????????????? ?
DASD 190 LINKED R/W; R/O BY 005 USERS??????????????????????????????????????????????? ?
DASD 194 LINKED R/W; R/O BY CPWATCH????????????????????????????????????????????????? ?
FILES: 001 RDR,? NO PRT,? NO PUN???????????????????????????????????????????????????? ?
LOGON AT 22:14:10 GMT SUNDAY 10/16/22??????????????????????????????????????????????? ?
VM Community Edition V1 R1.2???????????????????????????????????????????????????????? ?
???????????????????????????????????????????????????????????????????????????????????? ?
Y (19E) R/O????????????????????????????????????????????????????????????????????????? ?
U (19D) R/O????????????????????????????????????????????????????????????????????????? ?
B (5E5) R/O????????????????????????????????????????????????????????????????????????? ?
Ready; T=0.01/0.01 22:14:20????????????????????????????????????????????????????????? ?
q disk?????????????????????????????????????????????????????????????????????????????? ?
Label? CUU M? Stat? Cyl Type Blksize?? Files? Blks Used-(%) Blks Left? Blk Total???? ?
MNT191 191 A?? R/W?? 30 3350? 800????????? 4???????? 83-00????? 17017????? 17100???? ?
MNT5E5 5E5 B/B R/O?? 30 3350? 800???????? 11??????? 119-01????? 16981????? 17100???? ?
CMSDSK 190 S?? R/O?? 59 3350? 800??????? 172????? 19537-58????? 14093????? 33630???? ?
MNT29D 19D U/S R/O?? 30 3350? 800??????? 407?????? 6242-37????? 10858????? 17100???? ?
MNT19E 19E Y/S R/O?? 70 3350? 800??????? 710????? 28263-71????? 11637????? 39900???? ?
Ready; T=0.01/0.01 22:14:32????????????????????????????????????????????????????????? ?
l maint memo * ( l iso?????????????????????????????????????????????????????????????? ?
Filename Filetype Fm? Format??? Recs Blocks???? Date??? Time?? Label???????????????? ?
MAINT??? MEMO???? B1? V??? 80??? 490???? 24? 2021-03-03? 9:06? MNT5E5??????????????? ?
Ready; T=0.01/0.01 22:15:12????????????????????????????????????????????????????????? ?
???????????????????????????????????????????????????????????????????????????????????? ?
???????????????????????????????????????????????????????????????????????????????????? ?
File: MAINT??? MEMO???? B1?????? RECFM: V LRECL: 125(125) Lines:?? 490 Current:??? 11?
???????????????????????????????????????????????????????????????????????????????????? ?
00000 * * * Top of file * * *??????????????????????????????????????????????????????? ?
00001 ****?
00002 VM/370 Community Edition System Programming Notes????????????????????????????? ?
00003??????????????????????????????????????????????????????????????????????????????? ?
00004 Notes on generating the CMS nucleus, the CP nucleus, and the various saved???? ?
00005 systems and shared segments.? Thanks to Dave Wade, Kevin Leonard, Bob Bolch??? ?
00006 and Bob O'Hara.??????????????????????????????????????????????????????????????? ?
00007 ****?
00008 To establish a VM component service disk search order, issue?????????????????? ?
00009 one of these commands:???????????????????????????????????????????????????????? ?
00010??????????????????????????????????????????????????????????????????????????????? ?
00011 Component???? Setup command??????????????????????????????????????????????????? ?
00012 ---------???? -------------??????????????????????????????????????????????????? ?
00013 CP??????????? VMSETUP CP?????????????????????????????????????????????????????? ?
00014 CMS?????????? VMSETUP CMS????????????????????????????????????????????????????? ?
00015 RSCS????????? VMSETUP RSCS???????????????????????????????????????????????????? ?
00016??????????????????????????????????????????????????????????????????????????????? ?
00017 The "E" disk in each search order is used for????????????????????????????????? ?
00018 local modifications using an xxxLCL CNTRL file, where????????????????????????? ?
00019 xxx = DMK for CP?????????????????????????????????????????????????????????????? ?
00020?????? DMS for CMS????????????????????????????????????????????????????????????? ?
00021?????? DMT for RSCS???????????????????????????????????????????????????????????? ?
00022 Each of these CNTRL files use AUXLCL files to name the???????????????????????? ?
===>???????????????????????????????????????????????????????????????????????????????? ?
Unchanged????????????????????????????????????????????????????? ee V1.2.5,? 1 File(s) ?

Re: Another Time Zone Question (Sorta)

#4377

So which came first VM/CE 1.2 or SixPack 1.3?

?

I other words, which is the latest SixPack 1.3?? Is everything in VM/CE in SixPack 1.3?

You can read these files before Hercules is running. This list is sorted by date.
? readme-1_3.txt? was for SixPack 1.3? .

E:\Hercules\...\VM370CE.V1.R1.2>dir read* /o-d?????????????
????????????????????????????????????????????????????????? ?
?Directory of E:\Hercules\...\VM370CE.V1.R1.2???????????? ?
????????????????????????????????????????????????????????? ?
2022-07-17? 09:44??????????? 10,601 readme-vmce-1_1_2.txt ?
2021-05-03? 15:28???????????? 9,104 readme-vmce-1_1_1.txt ?
2021-05-03? 10:34???????????? 1,553 readme-cms67.txt????? ?
2021-04-28? 08:32???????????? 3,347 readme-virtreal.txt?? ?
2021-04-26? 15:57?????????????? 742 readme-TK4-.txt?????? ?
2021-04-26? 15:48???????????? 3,689 readme-dosvs.txt????? ?
2021-03-20? 08:14??????????? 13,739 readme-vmce-1_1_0.txt ?
2021-03-10? 17:06??????????? 11,090 readme-1_3.txt??????? ?
2018-01-08? 15:13???????????? 9,639 readme-1_2.txt??????? ?
?????????????? 9 File(s)???????? 63,504 bytes???????????? ?

Finally, I can't find Maint Memo B mentioned earlier.? ?What information am I?missing?

MAINT MEMO is on MAINT's 5E5 disk, accessed as B .

L MAINT CPCMS?????????????????????????????????????????????????????????????????????????
DASD 19D LINKED R/W; R/O BY 003 USERS??????????????????????????????????????????????? ?
DASD 19E LINKED R/W; R/O BY 005 USERS??????????????????????????????????????????????? ?
DASD 190 LINKED R/W; R/O BY 005 USERS??????????????????????????????????????????????? ?
DASD 194 LINKED R/W; R/O BY CPWATCH????????????????????????????????????????????????? ?
FILES: 001 RDR,? NO PRT,? NO PUN???????????????????????????????????????????????????? ?
LOGON AT 22:14:10 GMT SUNDAY 10/16/22??????????????????????????????????????????????? ?
VM Community Edition V1 R1.2???????????????????????????????????????????????????????? ?
???????????????????????????????????????????????????????????????????????????????????? ?
Y (19E) R/O????????????????????????????????????????????????????????????????????????? ?
U (19D) R/O????????????????????????????????????????????????????????????????????????? ?
B (5E5) R/O????????????????????????????????????????????????????????????????????????? ?
Ready; T=0.01/0.01 22:14:20????????????????????????????????????????????????????????? ?
q disk?????????????????????????????????????????????????????????????????????????????? ?
Label? CUU M? Stat? Cyl Type Blksize?? Files? Blks Used-(%) Blks Left? Blk Total???? ?
MNT191 191 A?? R/W?? 30 3350? 800????????? 4???????? 83-00????? 17017????? 17100???? ?
MNT5E5 5E5 B/B R/O?? 30 3350? 800???????? 11??????? 119-01????? 16981????? 17100???? ?
CMSDSK 190 S?? R/O?? 59 3350? 800??????? 172????? 19537-58????? 14093????? 33630???? ?
MNT29D 19D U/S R/O?? 30 3350? 800??????? 407?????? 6242-37????? 10858????? 17100???? ?
MNT19E 19E Y/S R/O?? 70 3350? 800??????? 710????? 28263-71????? 11637????? 39900???? ?
Ready; T=0.01/0.01 22:14:32????????????????????????????????????????????????????????? ?
l maint memo * ( l iso?????????????????????????????????????????????????????????????? ?
Filename Filetype Fm? Format??? Recs Blocks???? Date??? Time?? Label???????????????? ?
MAINT??? MEMO???? B1? V??? 80??? 490???? 24? 2021-03-03? 9:06? MNT5E5??????????????? ?
Ready; T=0.01/0.01 22:15:12????????????????????????????????????????????????????????? ?
???????????????????????????????????????????????????????????????????????????????????? ?
???????????????????????????????????????????????????????????????????????????????????? ?
File: MAINT??? MEMO???? B1?????? RECFM: V LRECL: 125(125) Lines:?? 490 Current:??? 11?
???????????????????????????????????????????????????????????????????????????????????? ?
00000 * * * Top of file * * *??????????????????????????????????????????????????????? ?
00001 ****?
00002 VM/370 Community Edition System Programming Notes????????????????????????????? ?
00003??????????????????????????????????????????????????????????????????????????????? ?
00004 Notes on generating the CMS nucleus, the CP nucleus, and the various saved???? ?
00005 systems and shared segments.? Thanks to Dave Wade, Kevin Leonard, Bob Bolch??? ?
00006 and Bob O'Hara.??????????????????????????????????????????????????????????????? ?
00007 ****?
00008 To establish a VM component service disk search order, issue?????????????????? ?
00009 one of these commands:???????????????????????????????????????????????????????? ?
00010??????????????????????????????????????????????????????????????????????????????? ?
00011 Component???? Setup command??????????????????????????????????????????????????? ?
00012 ---------???? -------------??????????????????????????????????????????????????? ?
00013 CP??????????? VMSETUP CP?????????????????????????????????????????????????????? ?
00014 CMS?????????? VMSETUP CMS????????????????????????????????????????????????????? ?
00015 RSCS????????? VMSETUP RSCS???????????????????????????????????????????????????? ?
00016??????????????????????????????????????????????????????????????????????????????? ?
00017 The "E" disk in each search order is used for????????????????????????????????? ?
00018 local modifications using an xxxLCL CNTRL file, where????????????????????????? ?
00019 xxx = DMK for CP?????????????????????????????????????????????????????????????? ?
00020?????? DMS for CMS????????????????????????????????????????????????????????????? ?
00021?????? DMT for RSCS???????????????????????????????????????????????????????????? ?
00022 Each of these CNTRL files use AUXLCL files to name the???????????????????????? ?
===>???????????????????????????????????????????????????????????????????????????????? ?
Unchanged????????????????????????????????????????????????????? ee V1.2.5,? 1 File(s) ?

Re: Possible bug in BREXX parse instruction

#4376

A list of all sources and includes (in C, AFAIK), which are needed to build BREXX,
would be very helpful. And the MDISK where it can be found (I guess it
is part of the VM distribution [...]).

bREXX is built by MAINTC in VM Community Edition V1 R1.2 :

L MAINTC MAINTC??????????????????????????????????????????????????????????????????
DASD 190 LINKED R/O; R/W BY MAINT; R/O BY 004 USERS???????????????????????????? ?
DASD 19D LINKED R/O; R/W BY MAINT; R/O BY 002 USERS???????????????????????????? ?
DASD 19E LINKED R/O; R/W BY MAINT; R/O BY 004 USERS???????????????????????????? ?
LOGON AT 21:24:04 GMT SUNDAY 10/16/22?????????????????????????????????????????? ?
VM Community Edition V1 R1.2??????????????????????????????????????????????????? ?
??????????????????????????????????????????????????????????????????????????????? ?
Y (19E) R/O???????????????????????????????????????????????????????????????????? ?
U (19D) R/O???????????????????????????????????????????????????????????????????? ?
Ready; T=0.01/0.01 21:24:11???????????????????????????????????????????????????? ?
q disk????????????????????????????????????????????????????????????????????????? ?
Label? CUU M? Stat? Cyl Type Blksize?? Files? Blks Used-(%) Blks Left? Blk Total?
MNT191 191 A?? R/W?? 50 3350? 800???????? 10?????? 1335-05????? 27165????? 28500?
CMSDSK 190 S?? R/O?? 59 3350? 800??????? 172????? 19537-58????? 14093????? 33630?
MNT19C 19C T?? R/W?? 50 3350? 800???????? 40??????? 124-00????? 28376????? 28500?
MNT29D 19D U/S R/O?? 30 3350? 800??????? 407?????? 6242-37????? 10858????? 17100?
MNT19E 19E Y/S R/O?? 70 3350? 800??????? 710????? 28263-71????? 11637????? 39900?
Ready; T=0.01/0.01 21:24:26???????????????????????????????????????????????????? ?
??????????????????????????????????????????????????????????????????????????????? ?
l br* exec t ( l iso??????????????????????????????????????????????????????????? ?
Filename Filetype Fm? Format??? Recs Blocks???? Date??? Time?? Label??????????? ?
BRXASM?? EXEC???? T1? V??? 49????? 5????? 1? 2021-04-14 12:18? MNT19C?????????? ?
BRXBUILD EXEC???? T1? V??? 72???? 45????? 2? 2021-04-14 12:18? MNT19C?????????? ?
BRXCOMP? EXEC???? T1? V??? 49????? 5????? 1? 2021-04-14 12:18? MNT19C?????????? ?
BRXCOMPD EXEC???? T1? V??? 49????? 5????? 1? 2021-04-14 12:18? MNT19C?????????? ?
BRXGEN?? EXEC???? T1? V??? 58??? 227???? 12? 2021-06-14? 9:46? MNT19C?????????? ?
BRXSRCH? EXEC???? T1? V??? 26????? 9????? 1? 2021-04-14 12:18? MNT19C?????????? ?
BRXSRCHD EXEC???? T1? V??? 32???? 11????? 1? 2021-04-14 12:18? MNT19C?????????? ?
Ready; T=0.01/0.01 21:26:39???????????????????????????????????????????????????? ?
??????????????????????????????????????????????????????????????????????????????? ?
BRXSRCH???????????????????????????????????????????????????????????????????????? ?
E (193) R/O???????????????????????????????????????????????????????????????????? ?
F (393) R/O???????????????????????????????????????????????????????????????????? ?
G (394) R/O???????????????????????????????????????????????????????????????????? ?
H (194) R/O???????????????????????????????????????????????????????????????????? ?
Ready; T=0.01/0.02 21:27:36???????????????????????????????????????????????????? ?
??????????????????????????????????????????????????????????????????????????????? ?
q disk????????????????????????????????????????????????????????????????????????? ?
Label? CUU M? Stat? Cyl Type Blksize?? Files? Blks Used-(%) Blks Left? Blk Total?
MNT191 191 A?? R/W?? 50 3350? 800???????? 10?????? 1335-05????? 27165????? 28500?
MNT193 193 E/A R/O?? 50 3350? 800??????? 105?????? 1167-04????? 27333????? 28500?
MNT393 393 F/A R/O?? 50 3350? 800??????? 218?????? 1468-05????? 27032????? 28500?
MNT394 394 G/A R/O?? 50 3350? 800???????? 20?????? 2252-08????? 26248????? 28500?
MNT194 194 H/A R/O?? 50 3350? 800????????? 1?????? 2515-09????? 25985????? 28500?
CMSDSK 190 S?? R/O?? 59 3350? 800??????? 172????? 19537-58????? 14093????? 33630?
MNT19C 19C T?? R/W?? 50 3350? 800???????? 40??????? 124-00????? 28376????? 28500?
MNT29D 19D U/S R/O?? 30 3350? 800??????? 407?????? 6242-37????? 10858????? 17100?
MNT19E 19E Y/S R/O?? 70 3350? 800??????? 710????? 28263-71????? 11637????? 39900?
Ready; T=0.01/0.01 21:28:41???????????????????????????????????????????????????? ?
??????????????????????????????????????????????????????????????????????????????? ?
l * h * ( l iso???????????????????????????????????????????????????????????????? ?
Filename Filetype Fm? Format??? Recs Blocks???? Date??? Time?? Label??????????? ?
BINTREE? H??????? F1? V??? 65???? 56????? 2? 2021-04-14 12:17? MNT393?????????? ?
BIO????? H??????? F1? V??? 68??? 108????? 3? 2021-04-14 12:17? MNT393?????????? ?
BMEM???? H??????? F1? V??? 71???? 73????? 3? 2021-04-14 12:17? MNT393?????????? ?
COMPILE? H??????? F1? V??? 96??? 227????? 8? 2021-04-14 12:17? MNT393?????????? ?
CONFIG?? H??????? F1? V??? 96??? 187????? 7? 2021-04-24 13:51? MNT393?????????? ?
CONTEXT? H??????? F1? V??? 87??? 152????? 7? 2021-04-14 12:17? MNT393?????????? ?
DQUEUE?? H??????? F1? V??? 70???? 55????? 2? 2021-04-14 12:17? MNT393?????????? ?
INTERPRE H??????? F1? V??? 54???? 43????? 2? 2021-04-14 12:17? MNT393?????????? ?
LDEFS??? H??????? F1? V??? 70??? 142????? 5? 2021-04-14 12:17? MNT393?????????? ?
LERROR?? H??????? F1? V??? 60??? 104????? 4? 2021-04-14 12:17? MNT393?????????? ?
LMVS???? H??????? F1? V??? 56???? 17????? 1? 2021-04-14 12:17? MNT393?????????? ?
LSTRING? H??????? F1? V?? 100??? 566???? 20? 2021-04-14 12:17? MNT393?????????? ?
NEXTSYMB H??????? F1? V??? 73??? 102????? 4? 2021-04-14 12:17? MNT393?????????? ?
OS?????? H??????? F1? V??? 73??? 319????? 9? 2021-04-14 12:17? MNT393?????????? ?
REXX???? H??????? F1? V??? 74??? 230????? 8? 2021-04-14 12:17? MNT393?????????? ?
RXCONIO? H??????? F1? V??? 59???? 48????? 2? 2021-04-14 12:17? MNT393?????????? ?
RXDEFS?? H??????? F1? V??? 75??? 173????? 6? 2021-04-14 12:17? MNT393?????????? ?
RXMVS??? H??????? F1? V??? 56???? 55????? 2? 2021-04-14 12:17? MNT393?????????? ?
STACK??? H??????? F1? V??? 66???? 42????? 2? 2021-04-14 12:17? MNT393?????????? ?
TRACE??? H??????? F1? V??? 70???? 86????? 3? 2021-04-14 12:17? MNT393?????????? ?
VARIABLE H??????? F1? V??? 71???? 98????? 4? 2021-04-14 12:17? MNT393?????????? ?
ASSERT?? H??????? G1? V??? 71???? 25????? 2? 2021-04-14 11:40? MNT394?????????? ?
CMSRUNTM H??????? G1? V?? 106??? 218???? 16? 2021-03-23? 8:13? MNT394?????????? ?
CMSSYS?? H??????? G1? V?? 108??? 862???? 89? 2022-05-16? 9:05? MNT394?????????? ?
CTYPE??? H??????? G1? V?? 100???? 62????? 3? 2021-04-14 11:40? MNT394?????????? ?
ERRNO??? H??????? G1? V??? 71???? 64????? 3? 2021-04-14 11:40? MNT394?????????? ?
FLOAT??? H??????? G1? V??? 75??? 127????? 5? 2021-04-14 11:40? MNT394?????????? ?
GCCCRAB? H??????? G1? V?? 100???? 68????? 4? 2021-03-23? 7:07? MNT394?????????? ?
LIMITS?? H??????? G1? V??? 71???? 49????? 3? 2021-04-14 11:40? MNT394?????????? ?
LOCALE?? H??????? G1? V??? 71???? 49????? 3? 2021-04-14 11:40? MNT394?????????? ?
MATH???? H??????? G1? V??? 71??? 113????? 4? 2021-04-14 11:40? MNT394?????????? ?
REXXSAA? H??????? G1? V??? 81??? 162???? 11? 2021-04-14 11:40? MNT394?????????? ?
SETJMP?? H??????? G1? V?? 100???? 42????? 5? 2021-04-14 11:40? MNT394?????????? ?
SIGNAL?? H??????? G1? V??? 71???? 33????? 2? 2021-04-14 11:40? MNT394?????????? ?
STDARG?? H??????? G1? V??? 73???? 22????? 2? 2021-04-14 11:40? MNT394?????????? ?
STDDEF?? H??????? G1? V??? 71???? 38????? 2? 2021-04-14 11:40? MNT394?????????? ?
STDIO??? H??????? G1? V?? 100??? 782???? 81? 2022-05-28 14:17? MNT394?????????? ?
STDLIB?? H??????? G1? V?? 100??? 381???? 20? 2021-04-14 11:40? MNT394?????????? ?
STRING?? H??????? G1? V??? 73??? 173????? 9? 2021-04-14 11:40? MNT394?????????? ?
TIME???? H??????? G1? V??? 71???? 65????? 3? 2021-04-14 11:40? MNT394?????????? ?
TSTS???? H??????? G1? V?? 125???? 98????? 5? 2021-04-14 11:40? MNT394?????????? ?
Ready; T=0.01/0.03 21:31:52???????????????????????????????????????????????????? ?
??????????????????????????????????????????????????????????????????????????????? ?
l * c * ( l iso???????????????????????????????????????????????????????????????? ?
Filename Filetype Fm? Format??? Recs Blocks???? Date??? Time?? Label??????????? ?
ABBREV?? C??????? F1? V??? 66???? 34????? 2? 2021-04-14 12:17? MNT393?????????? ?
ABS????? C??????? F1? V??? 52???? 34????? 1? 2021-04-14 12:17? MNT393?????????? ?
ADD????? C??????? F1? V??? 79???? 50????? 3? 2021-04-14 12:17? MNT393?????????? ?
ADDRESS? C??????? F1? V??? 87??? 396???? 14? 2021-04-14 12:17? MNT393?????????? ?
BINTREE? C??????? F1? V??? 72??? 398???? 15? 2021-04-14 12:17? MNT393?????????? ?
BITAND?? C??????? F1? V?? 105???? 55????? 2? 2021-04-14 12:17? MNT393?????????? ?
BITOR??? C??????? F1? V??? 55???? 47????? 2? 2021-04-14 12:17? MNT393?????????? ?
BITXOR?? C??????? F1? V??? 55???? 47????? 2? 2021-04-14 12:17? MNT393?????????? ?
BMEM???? C??????? F1? V??? 82??? 287???? 10? 2021-04-14 12:17? MNT393?????????? ?
BOOL???? C??????? F1? V??? 68???? 54????? 3? 2021-04-14 12:17? MNT393?????????? ?
BUILTIN? C??????? F1? V??? 87??? 938???? 39? 2021-04-14 12:17? MNT393?????????? ?
B2X????? C??????? F1? V??? 64???? 53????? 2? 2021-04-14 12:17? MNT393?????????? ?
CENTER?? C??????? F1? V??? 78???? 45????? 2? 2021-04-14 12:17? MNT393?????????? ?
CHANGEST C??????? F1? V??? 69???? 57????? 2? 2021-04-14 12:17? MNT393?????????? ?
CHARIN?? C??????? F1? V??? 73???? 22????? 1? 2021-04-14 12:17? MNT393?????????? ?
CHAROUT? C??????? F1? V??? 67???? 36????? 2? 2021-04-14 12:17? MNT393?????????? ?
CHARS??? C??????? F1? V??? 54???? 15????? 1? 2021-04-14 12:17? MNT393?????????? ?
CMSFUNC? C??????? F1? V??? 62??? 136????? 5? 2021-04-14 12:17? MNT393?????????? ?
COMPARE? C??????? F1? V??? 56???? 46????? 2? 2021-04-14 12:17? MNT393?????????? ?
COMPILE? C??????? F1? V?? 119?? 2016???? 94? 2021-04-14 12:17? MNT393?????????? ?
CONTEXT? C??????? F1? V??? 61???? 39????? 2? 2021-04-14 12:17? MNT393?????????? ?
COPIES?? C??????? F1? V??? 53???? 51????? 2? 2021-04-14 12:17? MNT393?????????? ?
COUNTSTR C??????? F1? V??? 66???? 36????? 2? 2021-04-14 12:17? MNT393?????????? ?
C2D????? C??????? F1? V??? 58???? 41????? 2? 2021-04-14 12:17? MNT393?????????? ?
C2X????? C??????? F1? V??? 50???? 38????? 2? 2021-04-14 12:17? MNT393?????????? ?
DATATYPE C??????? F1? V??? 68??? 119????? 5? 2021-04-14 12:17? MNT393?????????? ?
DATE???? C??????? F1? V??? 76??? 211????? 7? 2021-04-14 12:17? MNT393?????????? ?
DEC????? C??????? F1? V??? 49???? 29????? 1? 2021-04-14 12:17? MNT393?????????? ?
DELSTR?? C??????? F1? V??? 68???? 45????? 2? 2021-04-14 12:17? MNT393?????????? ?
DELWORD? C??????? F1? V??? 69???? 54????? 2? 2021-04-14 12:17? MNT393?????????? ?
DIV????? C??????? F1? V??? 65???? 33????? 2? 2021-04-14 12:17? MNT393?????????? ?
DQUEUE?? C??????? F1? V??? 67??? 122????? 4? 2021-04-14 12:17? MNT393?????????? ?
D2C????? C??????? F1? V??? 52???? 67????? 2? 2021-04-14 12:17? MNT393?????????? ?
D2X????? C??????? F1? V??? 53???? 54????? 2? 2021-04-14 12:17? MNT393?????????? ?
EQUAL??? C??????? F1? V??? 74??? 146????? 6? 2022-07-11 11:26? MNT393?????????? ?
ERROR??? C??????? F1? V??? 80??? 194????? 9? 2021-04-14 12:17? MNT393?????????? ?
ERRORTXT C??????? F1? V?? 160??? 528???? 30? 2021-04-14 12:17? MNT393?????????? ?
EXPOSE?? C??????? F1? V??? 55???? 64????? 2? 2021-04-14 12:17? MNT393?????????? ?
EXPR???? C??????? F1? V??? 76??? 498???? 20? 2021-04-14 12:17? MNT393?????????? ?
FORMAT?? C??????? F1? V??? 95??? 384???? 17? 2021-04-14 12:17? MNT393?????????? ?
HASHVALU C??????? F1? V??? 57???? 63????? 2? 2021-04-14 12:17? MNT393?????????? ?
INC????? C??????? F1? V??? 49???? 29????? 1? 2021-04-14 12:17? MNT393?????????? ?
INDEX??? C??????? F1? V??? 58???? 59????? 3? 2021-04-14 12:17? MNT393?????????? ?
INSERT?? C??????? F1? V??? 63???? 55????? 2? 2021-04-14 12:17? MNT393?????????? ?
INTDIV?? C??????? F1? V??? 65???? 35????? 2? 2021-04-14 12:17? MNT393?????????? ?
INTERPRE C??????? F1? V?? 121?? 2248??? 111? 2021-06-14? 5:50? MNT393?????????? ?
JUSTIFY? C??????? F1? V??? 67???? 99????? 4? 2021-04-14 12:17? MNT393?????????? ?
LASTPOS? C??????? F1? V??? 60???? 50????? 2? 2021-04-14 12:17? MNT393?????????? ?
LINEIN?? C??????? F1? V??? 68???? 48????? 2? 2021-04-14 12:17? MNT393?????????? ?
LINEOUT? C??????? F1? V??? 68???? 46????? 2? 2021-04-14 12:17? MNT393?????????? ?
LINES??? C??????? F1? V??? 53???? 15????? 1? 2021-04-14 12:17? MNT393?????????? ?
LOWER??? C??????? F1? V??? 65???? 30????? 1? 2021-04-14 12:17? MNT393?????????? ?
LSTRING? C??????? F1? V??? 94??? 837???? 32? 2021-04-14 12:17? MNT393?????????? ?
LTIME??? C??????? F1? V??? 93??? 289???? 12? 2021-04-14 12:17? MNT393?????????? ?
MAIN???? C??????? F1? V??? 78??? 170????? 6? 2021-04-14 12:17? MNT393?????????? ?
MOD????? C??????? F1? V??? 73???? 35????? 2? 2021-04-14 12:17? MNT393?????????? ?
MULT???? C??????? F1? V??? 64???? 36????? 2? 2021-04-14 12:17? MNT393?????????? ?
NEG????? C??????? F1? V??? 49???? 51????? 2? 2021-04-14 12:17? MNT393?????????? ?
NEXTSYMB C??????? F1? V?? 112??? 739???? 33? 2021-04-14 12:17? MNT393?????????? ?
OVERLAY? C??????? F1? V??? 64???? 48????? 2? 2021-04-14 12:17? MNT393?????????? ?
PRINT??? C??????? F1? V??? 71???? 49????? 2? 2021-04-14 12:17? MNT393?????????? ?
READ???? C??????? F1? V??? 75???? 61????? 3? 2021-04-14 12:17? MNT393?????????? ?
REVERSE? C??????? F1? V??? 53???? 37????? 1? 2021-04-14 12:17? MNT393?????????? ?
REXX???? C??????? F1? V??? 98??? 476???? 18? 2021-04-14 12:17? MNT393?????????? ?
REXXFUNC C??????? F1? V??? 94??? 456???? 14? 2021-04-14 12:17? MNT393?????????? ?
RIGHT??? C??????? F1? V??? 77???? 36????? 2? 2021-04-14 12:17? MNT393?????????? ?
RXCONV?? C??????? F1? V??? 80??? 212????? 9? 2021-04-14 12:17? MNT393?????????? ?
RXEXCOMM C??????? F1? V??? 69??? 133????? 7? 2021-04-14 12:17? MNT393?????????? ?
RXFILES? C??????? F1? V?? 101??? 442???? 20? 2021-04-14 12:17? MNT393?????????? ?
RXMATH?? C??????? F1? V??? 69??? 192????? 8? 2021-04-14 12:17? MNT393?????????? ?
RXSTR??? C??????? F1? V??? 78??? 546???? 22? 2021-04-14 12:17? MNT393?????????? ?
RXWORD?? C??????? F1? V??? 80???? 83????? 3? 2021-04-14 12:17? MNT393?????????? ?
SIGN???? C??????? F1? V??? 52???? 43????? 2? 2021-04-14 12:17? MNT393?????????? ?
SOUNDEX? C??????? F1? V??? 75???? 93????? 4? 2021-04-14 12:17? MNT393?????????? ?
SPACE??? C??????? F1? V??? 66???? 57????? 2? 2021-04-14 12:17? MNT393?????????? ?
STACK??? C??????? F1? V??? 66???? 92????? 3? 2021-04-14 12:17? MNT393?????????? ?
STRIP??? C??????? F1? V??? 76???? 75????? 3? 2021-04-14 12:17? MNT393?????????? ?
SUB????? C??????? F1? V??? 79???? 50????? 3? 2021-04-14 12:17? MNT393?????????? ?
SUBSTR?? C??????? F1? V??? 74???? 62????? 3? 2021-04-14 12:17? MNT393?????????? ?
SUBWORD? C??????? F1? V??? 65???? 58????? 2? 2021-04-14 12:17? MNT393?????????? ?
TEMPLATE C??????? F1? V??? 80??? 218???? 10? 2021-04-14 12:17? MNT393?????????? ?
TRACE??? C??????? F1? V??? 83??? 324???? 14? 2021-04-14 12:17? MNT393?????????? ?
TRANSLAT C??????? F1? V??? 73???? 60????? 3? 2021-04-14 12:17? MNT393?????????? ?
TRUNC??? C??????? F1? V??? 66???? 49????? 2? 2021-04-14 12:17? MNT393?????????? ?
UPPER??? C??????? F1? V??? 65???? 29????? 1? 2021-04-14 12:17? MNT393?????????? ?
VARIABLE C??????? F1? V?? 102?? 1158???? 47? 2021-04-14 12:17? MNT393?????????? ?
VERIFY?? C??????? F1? V??? 76???? 52????? 3? 2021-04-14 12:17? MNT393?????????? ?
WORD???? C??????? F1? V??? 50???? 34????? 1? 2021-04-14 12:17? MNT393?????????? ?
WORDIDX? C??????? F1? V??? 53???? 35????? 1? 2021-04-14 12:17? MNT393?????????? ?
WORDLEN? C??????? F1? V??? 53???? 30????? 1? 2021-04-14 12:17? MNT393?????????? ?
WORDPOS? C??????? F1? V??? 53???? 94????? 4? 2021-04-14 12:17? MNT393?????????? ?
WORDS??? C??????? F1? V??? 51???? 32????? 1? 2021-04-14 12:17? MNT393?????????? ?
WRITE??? C??????? F1? V??? 55???? 16????? 1? 2021-04-14 12:17? MNT393?????????? ?
XRANGE?? C??????? F1? V??? 53???? 45????? 2? 2021-04-14 12:17? MNT393?????????? ?
X2B????? C??????? F1? V??? 64???? 63????? 2? 2021-04-14 12:17? MNT393?????????? ?
X2C????? C??????? F1? V??? 80???? 68????? 3? 2021-04-14 12:17? MNT393?????????? ?
X2D????? C??????? F1? V??? 56???? 58????? 2? 2021-04-14 12:17? MNT393?????????? ?
HELLO??? C??????? U2? V??? 36????? 7????? 1? 2010-08-01 14:17? MNT29D?????????? ?
Ready; T=0.01/0.07 21:35:19???????????????????????????????????????????????????? ?
??????????????????????????????????????????????????????????????????????????????? ?
l * assemble * ( l iso????????????????????????????????????????????????????????? ?
Filename Filetype Fm? Format??? Recs Blocks???? Date??? Time?? Label??????????? ?
CMSDIAG? ASSEMBLE F1? F??? 80??? 109???? 11? 2021-04-14 12:17? MNT393?????????? ?
HOSTCMD? ASSEMBLE F1? F??? 80??? 372???? 38? 2021-06-18? 5:06? MNT393?????????? ?
HOSTFNC? ASSEMBLE F1? F??? 80??? 299???? 30? 2021-06-19? 5:00? MNT393?????????? ?
TESTEXC? ASSEMBLE F1? F??? 80??? 342???? 35? 2021-04-14 12:17? MNT393?????????? ?
Ready; T=0.01/0.01 21:36:27???????????????????????????????????????????????????? ?

Re: Possible bug in BREXX parse instruction

#4375

开云体育

Hello Mark and Bob,

I would like to help you (if I can) with diagnosing the problem in BREXX.
Maybe we could switch this communication to private.

A list of all sources and includes (in C, AFAIK), which are needed to build BREXX,
would be very helpful. And the MDISK where it can be found (I guess it
is part of the VM distribution, or maybe Turnkey MVS - same version?).

Kind regards

Bernd

Am 16.10.2022 um 22:51 schrieb Bob Bolch:

Show quoted text

Thanks, Mark.

I never found brexx debug to be very useful. I do remember that you put the BREXXD TEXT on your A-disk, renamed to BREXX TEXT, then IPL CMS.? Then the 'trace' statement, in an EXEC , turns the tracing on and off (I can't remember the exact operand.) The trace output shows you codepoints in the BREXX interpretor where the code flows. I will try to figure out the details and report back.

Bob

On Sun, Oct 16, 2022, 4:35 PM Mark A. Stevens via <marXtevens=[email protected]> wrote:

On Sun, Oct 16, 2022 at 10:36 AM, Bob Bolch wrote:

Which left parentheses?are you referring?to in that sentence?

?

Also, the WITH keyword is only valid in a parse of the form:

PARSE VALUE expression WITH template

The 'with' in Dave Mitchell's example is a variable name.

?

The correct result of the DAVEMTST?EXEC is the following:

Welcome back from your surgery.

Once again, I'm leaving out thoughts and not writing them down. Sorry.
I am referencing Mike's 2nd edition, also the ANSI X3J18-199X document. I will also eat my words about the parentheses. I was wrong. I had to walk away from this due to other challenges, and forgot.

From the ANSI document.

/* Note: The next section describes templates. */
template_list?????? := template | [template] ',' [template_list]
template??????????? := (trigger | target | Msg38.1)+
target????????????? := VAR_SYMBOL | '.'
trigger???????????? := pattern | positional
pattern???????????? := STRING | vrefp
vrefp?????????????? := '(' (VAR_SYMBOL | Msg19.7) (')' | Msg46.1)
positional????????? := absolute_positional | relative_positional
absolute_positional := NUMBER | '=' position
position??????????? := NUMBER | vrefp | Msg38.2
relative_positional := ('+' | '-') position

Concerning the use of 'WITH', I found I was misreading the code. You are correct.

address ??????????? := 'ADDRESS' [(taken_constant [expression]
??????????????????? | Msg19.1 | valueexp) [ 'WITH' connection]]
... and ...

parse_value???????? := 'VALUE' [expression] ('WITH' | Msg38.3)

I have been going through the C code to determine what is and is not happening. Not having a lot of luck, yet, as I get lost in the definitions of record constructs, and I don't understand why TEMPLATE C skips left paren while gathering symbols. Starting at line 35 and on.

/* ----------- vrefp --------- */
/* variable reference position */
static void
vrefp(void) {
??? Context *context = (Context *) CMSGetPG();
??? nextsymbol(); /* skip left parenthesis */

I also have not been able to activate the debug mode of bREXX, though I thought I followed the directions.

?... Mark S.
Boy, do I feel stupid today.

Re: Another Time Zone Question (Sorta)

#4374

Hello Dave,

So which came first VM/CE 1.2 or SixPack 1.3?

I other words, which is the latest SixPack 1.3?? Is everything in VM/CE in SixPack 1.3?

Finally, I can't find Maint Memo B mentioned earlier.? ?What information am I?missing?

Thanks.

Show quoted text

On Sun, Oct 16, 2022, 02:45 Dave Wade <dave.g4ugm@...> wrote:

Bertram,
We handle most things folks throw at us. I’ve updated that page to point out later versions are elsewhere.
Dave
?
From: [email protected] <[email protected]> On Behalf Of Bertram Moshier
Sent: 16 October 2022 06:50
To: [email protected]
Subject: Re: [h390-vm] Another Time Zone Question (Sorta)
?
Hello Dave,
?
I got my copy of VM/370 from:
?
?
It is Six Pack 1.3.
?
I got the URL from YouTube watching the Moshix channel.
?
If these are different, how are they different?
?
Does this group handle both or just one line (VM/CE or SixPack)?
?
Thank you,
?
Bertram Moshier
?
On Sat, Oct 15, 2022, 06:40 Dave Wade <dave.g4ugm@...> wrote:
Bertram (and Jim)
?
You don’t say which version of VM you are using! MAINT MEMO B is certainly there on CE1.2 from .
?
You still create modifications using update, its just on the latest CE we have provided a separate minidisk, so when we update the system you can quickly put your own modifications back.
?
For multiple time zones, you can’t just edit the source because you are using UPDATE. You can either have two mods, or just edit your mod. You could even write and EXEC that generates the update and re-builds the nucleus.
?
As for learning about the system, well the original manuals are on BITSAVERS here:-
?
?
and the various memos and help files describe what has been added.
?
In some ways its similar to the CMS in zVM but in other ways its quite different. So most command line commands in vm/370 are still in zVM but you may not need them.
Whilst it has REXX the codebase is totally different…..
?
Dave
?
From: [email protected] <[email protected]> On Behalf Of Bertram Moshier
Sent: 15 October 2022 05:52
To: [email protected]
Subject: Re: [h390-vm] Another Time Zone Question (Sorta)
?
Hello Jim,
?
I'm logged into Maint and can't find the file MAINT MEMO *.? The Syspro memo doesn't speak to maint memo.? I can't find the vmsetup command.
?
Like you I would create CP with local mods by modifying the source code using the update command, etc.
?
Where do I start to learn this new system.
?
Thank you.
?
On Fri, Oct 14, 2022, 22:30 Jim Snellen <jsnellen55@...> wrote:
Hello All,
I too, like Jay Maynard, am trying to specify the correct time zone for my location.? I know that DMKSYS is where it's specified, and I know that I want to change?
'SYSTIME ZONE=0,LOC=WEST,ID=GMT' to 'SYSTIME ZONE=5,LOC=WEST,ID=EDT'.? I also know the sequence number is 00220000.

In my past life, I would simply edit DMKSYS ASSEMBLE and be on my way.? Now that I know that's the wrong way to do it, I don't quite know the right way using the E-disk for local mods.

I see that MAINT MEMO B says to use VMSETUP CP to establish the search order.? OK, next I see that DMKLCL CNTRL E identifies where the local changes are (by way of filetype I presume).? ?DMKSYS AUXLCL E should contain an entry like 'LCLnnnDK xxx Change SYSTIME macro to reflect local time zone and ID'.? I don't know what values are supposed to be used for nnn and xxx.? What is the significance of DK? It also appears I need to create a file named 'LCLnnnDK MEMO E' which contains a lengthier description of the modification.? Finally, I assume another file is to be created named 'DMKSYS LCLnnnDK E' that contains:
,/ R 00220000 $ 00220000 1? ? ? ? ? ? ? ? ?mm/dd/yy? hh:mm:ss
? ? ? ? ?SYSTIME ZONE=5,LOC=WEST,ID=EDT? ? ? ? ?LCLnnnDK

I'm guessing on the replace statement, I'm sure there's an IBM manual that describes how to code these update statements.?
After all is done I simply
VMFASM DMKSYS DMKLCL
CP SPOOL PUN *
CP SPOOL PRT *
VMFLOAD CPLOAD DMKLCL
ORDER READER nnnn (for IPL deck)
IPL 00C CLEAR
CLOSE RDR
ORDER RDR nnnn (for print file)
READCARD CPLOAD MAP?
LOGOFF
Re-IPL.

So, that's where I am.? I hope somebody can correct my assumptions and put me on the path to righteousness. (LOL)

PS - Can I have two SYSTIME statements, one for EST and one for EDT?? Is the alternative to rebuild CP each time change?

Re: Possible bug in BREXX parse instruction

#4373

Thanks, Mark.

I never found brexx debug to be very useful. I do remember that you put the BREXXD TEXT on your A-disk, renamed to BREXX TEXT, then IPL CMS.? Then the 'trace' statement, in an EXEC , turns the tracing on and off (I can't remember the exact operand.) The trace output shows you codepoints in the BREXX interpretor where the code flows. I will try to figure out the details and report back.

Bob

Show quoted text

On Sun, Oct 16, 2022, 4:35 PM Mark A. Stevens via <marXtevens=[email protected]> wrote:

On Sun, Oct 16, 2022 at 10:36 AM, Bob Bolch wrote:

Which left parentheses?are you referring?to in that sentence?

?

Also, the WITH keyword is only valid in a parse of the form:

PARSE VALUE expression WITH template

The 'with' in Dave Mitchell's example is a variable name.

?

The correct result of the DAVEMTST?EXEC is the following:

Welcome back from your surgery.

Once again, I'm leaving out thoughts and not writing them down. Sorry.
I am referencing Mike's 2nd edition, also the ANSI X3J18-199X document. I will also eat my words about the parentheses. I was wrong. I had to walk away from this due to other challenges, and forgot.

From the ANSI document.

/* Note: The next section describes templates. */
template_list?????? := template | [template] ',' [template_list]
template??????????? := (trigger | target | Msg38.1)+
target????????????? := VAR_SYMBOL | '.'
trigger???????????? := pattern | positional
pattern???????????? := STRING | vrefp
vrefp?????????????? := '(' (VAR_SYMBOL | Msg19.7) (')' | Msg46.1)
positional????????? := absolute_positional | relative_positional
absolute_positional := NUMBER | '=' position
position??????????? := NUMBER | vrefp | Msg38.2
relative_positional := ('+' | '-') position

Concerning the use of 'WITH', I found I was misreading the code. You are correct.

address ??????????? := 'ADDRESS' [(taken_constant [expression]
??????????????????? | Msg19.1 | valueexp) [ 'WITH' connection]]
... and ...

parse_value???????? := 'VALUE' [expression] ('WITH' | Msg38.3)

I have been going through the C code to determine what is and is not happening. Not having a lot of luck, yet, as I get lost in the definitions of record constructs, and I don't understand why TEMPLATE C skips left paren while gathering symbols. Starting at line 35 and on.

/* ----------- vrefp --------- */
/* variable reference position */
static void
vrefp(void) {
??? Context *context = (Context *) CMSGetPG();
??? nextsymbol(); /* skip left parenthesis */

I also have not been able to activate the debug mode of bREXX, though I thought I followed the directions.

?... Mark S.
Boy, do I feel stupid today.