开云体育

ctrl + shift + ? for shortcuts
© 2025 开云体育

Re: Where is the source code of ASSEMBLER XF (IFOX00) in VM/370 Community Edition V1R1.2 ? #VMCE

 

On 01/10/2024 19:01, Martin Scheffler via groups.io wrote:
Is it possible to generate the complete VM/370 Community Edition including all the tools from source ?
Almost all..
I have looked at some disk of MAINT, but I did not find the complete source of the CMS ASSEMBLE command, including the core of Assembler XF (IFOX00).
The Assembler is the XF assembler is common to MVS, VM and DOS and you need the MVS source disks to re-build it. There is a file here:-

/g/h390-vm/files/GCCCMS/ifmods.zip

with brief instructions and EXECs to re-build the assembler, however I think additional fixes may have been applied after I wrote those instructions.

I guess there should be notes about this on MAINTs CMS disk...

Martin
Dave


Where is the source code of ASSEMBLER XF (IFOX00) in VM/370 Community Edition V1R1.2 ? #VMCE

 

Is it possible to generate the complete VM/370 Community Edition including all the tools from source ?
?
I have looked at some disk of MAINT, but I did not find the complete source of the CMS ASSEMBLE command, including the core of Assembler XF (IFOX00).
?
Martin
?


Re: EE goes XEDIT - testing new features #rexx #VMCE

 

开云体育

Hi Martin,

I unpacked the new code drop and am very happy with the progress. Because of other obligations at the moment I only want to report this after I close EE:

** freeMem: ignored attempt to free NULL ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
Memory overwrite detected by __DMSFRT at E8DBA0. ? ? ? ? ? ? ? ? ? ? ? ??
DLMALLOC PANIC LINE 3540 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
ABNORMAL TERMINATION (NO RESOURCE CLEANUP) ERRNO 430 DLMalloc aborted. ??
Ready(00012); T=0.21/0.33 08:40:50 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
It does not hurt anything though.

best regards,

搁别苍é.

On 30 Sep 2024, at 07:49, Martin Scheffler <San-Lorenzo@...> wrote:

On Mon, Sep 30, 2024 at 02:34 AM, Mark A. Stevens wrote:
Have it loaded on my dev system. LISTFILE EE is working!
?
An interesting side-effect when using XLIST
?
XLIST: * EXEC A ? ? ? ? ? ? ? ? ? ? ?Lines 1-7/7 ?XLIST V1.3.2.0012_240924-1417
? Filename Filetype Fm ?Format ? ?Recs Blocks ?Date ? ? ? Time ? Label
===== ATTDASD ?EXEC ? ? A1 ?V ? ?72 ? ? 18 ? ? ?2 ?2021-02-11 03:10 ?MNT191
===== CPEREP01 EXEC ? ? A1 ?V ? ?35 ? ? ?8 ? ? ?1 ?2024-09-11 19:19 ?MNT191
===== GETFMADR EXEC ? ? A1 ?F ? ?80 ? ? 60 ? ? ?6 ?2021-12-16 20:58 ?MNT191
===== PROFILE ?EXEC ? ? A1 ?V ? ?71 ? ? 26 ? ? ?1 ?2024-09-07 20:03 ?MNT191
===== RSDIRUPD EXEC ? ? A1 ?V ?4560 ? ? ?1 ? ? ?6 ?2019-05-23 00:01 ?MNT191
===== SNOBOL4 ?EXEC ? ? A1 ?F ? ?80 ? ?121 ? ? 13 ?2024-02-19 10:56 ?MNT191
===== VMSETUP ?EXEC ? ? A1 ?V ? ?72 ? ?377 ? ? 34 ?2022-04-30 15:00 ?MNT191
?
I have seen this already, this happens because I have changed the PREFIX and NUMBER commands to "view" level and changed the defaults as in XEDIT.
?
Martin
?
On Tue, Sep 24, 2024 at 04:15 PM, Martin Scheffler wrote:
How important are the "side modes" of EE like FSLIST and FSVIEW ? I did not care of these up to now. I have reworked EE focussed on XEDIT as it was in VM/SP 1 (that means no FILELIST, RDRLIST ...).
?
Actually I have a Proof of Concept to have several UI Elements controlled by a "view" ... which means "file" as there is only one view per file now. A repeatable macro PROFILER EE written in REXX can decide by checking filename and filetype to set PREFIX to OFF, LEFT or RIGHT and NUMBER to ON or OFF. This setting will be tied to this one view/file and will not be affected by other files in the ring.
?
I might have broken something in FSLIST, I have not done much research how FSLIST internally works.


Re: EE goes XEDIT - testing new features #rexx #VMCE

 

On Mon, Sep 30, 2024 at 02:34 AM, Mark A. Stevens wrote:
Have it loaded on my dev system. LISTFILE EE is working!
?
An interesting side-effect when using XLIST
?
XLIST: * EXEC A ? ? ? ? ? ? ? ? ? ? ?Lines 1-7/7 ?XLIST V1.3.2.0012_240924-1417
? Filename Filetype Fm ?Format ? ?Recs Blocks ?Date ? ? ? Time ? Label
===== ATTDASD ?EXEC ? ? A1 ?V ? ?72 ? ? 18 ? ? ?2 ?2021-02-11 03:10 ?MNT191
===== CPEREP01 EXEC ? ? A1 ?V ? ?35 ? ? ?8 ? ? ?1 ?2024-09-11 19:19 ?MNT191
===== GETFMADR EXEC ? ? A1 ?F ? ?80 ? ? 60 ? ? ?6 ?2021-12-16 20:58 ?MNT191
===== PROFILE ?EXEC ? ? A1 ?V ? ?71 ? ? 26 ? ? ?1 ?2024-09-07 20:03 ?MNT191
===== RSDIRUPD EXEC ? ? A1 ?V ?4560 ? ? ?1 ? ? ?6 ?2019-05-23 00:01 ?MNT191
===== SNOBOL4 ?EXEC ? ? A1 ?F ? ?80 ? ?121 ? ? 13 ?2024-02-19 10:56 ?MNT191
===== VMSETUP ?EXEC ? ? A1 ?V ? ?72 ? ?377 ? ? 34 ?2022-04-30 15:00 ?MNT191
?
I have seen this already, this happens because I have changed the PREFIX and NUMBER commands to "view" level and changed the defaults as in XEDIT.
?
Martin
?
On Tue, Sep 24, 2024 at 04:15 PM, Martin Scheffler wrote:
How important are the "side modes" of EE like FSLIST and FSVIEW ? I did not care of these up to now. I have reworked EE focussed on XEDIT as it was in VM/SP 1 (that means no FILELIST, RDRLIST ...).
?
Actually I have a Proof of Concept to have several UI Elements controlled by a "view" ... which means "file" as there is only one view per file now. A repeatable macro PROFILER EE written in REXX can decide by checking filename and filetype to set PREFIX to OFF, LEFT or RIGHT and NUMBER to ON or OFF. This setting will be tied to this one view/file and will not be affected by other files in the ring.
?
I might have broken something in FSLIST, I have not done much research how FSLIST internally works.


Re: CMS BREXX Question #VMCE

 

On Mon, Sep 30, 2024 at 02:34 AM, Mark A. Stevens wrote:
Have it loaded on my dev system. LISTFILE EE is working!
Nice to read ! But let us discuss development and testing of EE on "EE goes XEDIT - testing new features":
?
Martin
?


EE goes XEDIT - testing new features #rexx #VMCE

 

It seems that the previous thread on EE is difficult to handle after it has reached more than 100 posts. If this helps to get more feedback, here is a new thread with a slightly changed name.
?
On Thu, Sep 26, 2024 at 02:54 PM, Martin Scheffler wrote:
I have uploaded a bleeding edge preview of EE into the Files section:
?
?
Please play with the beast !
?
Martin
?
What is in this archive ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
README ? MEMO ? ? A1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
this file, same as README ? HELPEE ? A1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
EE$D ? ? MODULE ? A1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
executable module, DYNAMICally linked, runs in user area at 0x020000 ? ? ? ? ??
? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
EE$S ? ? MODULE ? A1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
executable module, STATICally linked, runs in user area at 0x020000 ? ? ? ? ? ?
? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
EE$D ? ? MAP ? ? ?A5 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
EE$S ? ? MAP ? ? ?A5 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
load maps for DYNAMICally linked and STATICally linked module ? ? ? ? ? ? ? ? ?
? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
EERESLIB TEXT ? ? A1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
relocatable object code to load EE in high memory via RESLIB ? ? ? ? ? ? ? ? ??
? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
EER$LOAD EXEC ? ? A1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
REXX exec to load EE in high memory via RESLIB ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
EE$MACRO EXEC ? ? A1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
REXX exec that handles EE's new macro facility, necessary for REXX integration?
? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
SYSPROF ?EE ? ? ? A1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
PROFILE ?EE ? ? ? A1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
simple EE macros run once at startup ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
PROFILER EE ? ? ? A1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
repeatable profile, called after file has been loaded into storage ? ? ? ? ? ??
? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
LISTFILE EE ? ? ? A1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
REXX macro: load output of CMS LISTFILE into the editor ? ? ? ? ? ? ? ? ? ? ? ?
? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
REVERSER EE ? ? ? A1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
REXX macro: A demonstration how a macro can modify file contents ? ? ? ? ? ? ??
? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
$EE ? ? ?HELP$EE ?A1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
README ? HELPEE ? A1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
CURSOR ? HELPEE ? A1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
EE$BUGS ?HELPEE ? A1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
EE$HELP ?HELPEE ? A1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
EE$IBM ? HELPEE ? A1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
EE$NEW ? HELPEE ? A1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
EE$NOTES HELPEE ? A1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
EE$WISH ?HELPEE ? A1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
work in progress, small help files for EE's internal help ? ? ? ? ? ? ? ? ? ? ?
Note: CMS HELP can be called when EE is loaded into high memory ? ? ? ? ? ? ? ?
? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
/* work in progress, numbers may differ */ ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
Filename Filetype Fm ?Format ? ?Recs Blocks ? ? Date ? ?Time ? Label ? ? ? ? ??
README ? MEMO ? ? A1 ?V ? ?78 ? ? 74 ? ? ?4 ?2024-09-26 12:22 ?MCF191 ? ? ? ? ?
EE$D ? ? MODULE ? A1 ?V 65535 ? ? ?6 ? ?322 ?2024-09-24 12:25 ?MCF191 ? ? ? ? ?
EE$S ? ? MODULE ? A1 ?V 65535 ? ? ?8 ? ?452 ?2024-09-24 12:25 ?MCF191 ? ? ? ? ?
EE$D ? ? MAP ? ? ?A5 ?F ? 100 ? ?460 ? ? 58 ?2024-09-24 12:25 ?MCF191 ? ? ? ? ?
EE$S ? ? MAP ? ? ?A5 ?F ? 100 ? ?466 ? ? 59 ?2024-09-24 12:25 ?MCF191 ? ? ? ? ?
EERESLIB TEXT ? ? A1 ?F ? ?80 ? 5570 ? ?557 ?2024-09-24 12:25 ?MCF191 ? ? ? ? ?
EER$LOAD EXEC ? ? A1 ?V ? ?70 ? ? 36 ? ? ?2 ?2024-09-14 11:59 ?MCF191 ? ? ? ? ?
EE$MACRO EXEC ? ? A1 ?V ? 109 ? ?194 ? ? ?7 ?2024-09-25 11:50 ?MCF191 ? ? ? ? ?
SYSPROF ?EE ? ? ? A1 ?V ? ?34 ? ? ?9 ? ? ?1 ?2024-09-14 ?9:47 ?MCF191 ? ? ? ? ?
PROFILE ?EE ? ? ? A1 ?V ? ?42 ? ? 38 ? ? ?1 ?2024-08-13 11:20 ?MCF191 ? ? ? ? ?
PROFILER EE ? ? ? A1 ?V ? ?71 ? ? 57 ? ? ?4 ?2024-09-25 ?9:43 ?MCF191 ? ? ? ? ?
LISTFILE EE ? ? ? A1 ?V ? ?52 ? ? 30 ? ? ?1 ?2024-09-04 ?9:51 ?MCF191 ? ? ? ? ?
REVERSER EE ? ? ? A1 ?V ? ?64 ? ? 41 ? ? ?2 ?2024-09-26 11:23 ?MCF191 ? ? ? ? ?
$EE ? ? ?HELP$EE ?A1 ?V ? ?84 ? ? 27 ? ? ?2 ?2024-08-08 21:28 ?MCF191 ? ? ? ? ?
README ? HELPEE ? A1 ?V ? ?78 ? ? 74 ? ? ?4 ?2024-09-26 12:22 ?MCF191 ? ? ? ? ?
CURSOR ? HELPEE ? A1 ?V ? ?75 ? ? ?4 ? ? ?1 ?2024-08-10 ?5:33 ?MCF191 ? ? ? ? ?
EE$BUGS ?HELPEE ? A1 ?V ? 114 ? ?120 ? ? ?6 ?2024-08-10 ?6:03 ?MCF191 ? ? ? ? ?
EE$HELP ?HELPEE ? A1 ?V ? ? 8 ? ? ?1 ? ? ?1 ?2024-08-08 20:19 ?MCF191 ? ? ? ? ?
EE$IBM ? HELPEE ? A1 ?V ? ?51 ? ? 14 ? ? ?1 ?2024-08-08 22:13 ?MCF191 ? ? ? ? ?
EE$NEW ? HELPEE ? A1 ?V ? ?76 ? ? 38 ? ? ?2 ?2024-08-09 ?1:46 ?MCF191 ? ? ? ? ?
EE$NOTES HELPEE ? A1 ?V ? ? 7 ? ? ?1 ? ? ?1 ?2024-08-08 21:25 ?MCF191 ? ? ? ? ?
EE$WISH ?HELPEE ? A1 ?V ? ? 6 ? ? ?1 ? ? ?1 ?2024-08-08 21:25 ?MCF191 ? ? ? ? ?
? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?


Re: CMS BREXX Question #VMCE

 

On Sun, Sep 29, 2024 at 03:29 PM, Martin Scheffler wrote:
I am trying to improve that situation ... but play with the beast please.
Here's a QUERY DISK based on your LISTFILE.

type QDISK EE D
?
/* REXX */
?
address "COMMAND" "SENTRIES"
stacked_old = rc
address "COMMAND" "MAKEBUF"
new_buffer_id = rc
?
address "COMMAND" "QUERY DISK * ( FIFO"
rc_listfile = rc
if rc_listfile <> 0 then do
? address "COMMAND" "DROPBUF" new_buffer_id
? exit rc_listfile
end
?
address "COMMAND" "SENTRIES"
stacked_new = rc
address "EE" "X QDISK ? ?LISTING A1"
address "EE" "EXTRACT line"
line_old = line.1
do i = 1 to stacked_new-stacked_old
? parse pull from_listfile
? address "EE" "INPUT" ?from_listfile
end
address "COMMAND" "DROPBUF" new_buffer_id
?
address "EE" "LOCATE :"line_old
exit rc_listfile
?
Ready; T=0.01/0.01 19:08:29
?
?... Mark S.


Re: CMS BREXX Question #VMCE

 

On Sun, Sep 29, 2024 at 03:29 PM, Martin Scheffler wrote:
I am trying to improve that situation ... but play with the beast please.
Have it loaded on my dev system. LISTFILE EE is working!
?
An interesting side-effect when using XLIST
?
XLIST: * EXEC A ? ? ? ? ? ? ? ? ? ? ?Lines 1-7/7 ?XLIST V1.3.2.0012_240924-1417
? Filename Filetype Fm ?Format ? ?Recs Blocks ?Date ? ? ? Time ? Label
===== ATTDASD ?EXEC ? ? A1 ?V ? ?72 ? ? 18 ? ? ?2 ?2021-02-11 03:10 ?MNT191
===== CPEREP01 EXEC ? ? A1 ?V ? ?35 ? ? ?8 ? ? ?1 ?2024-09-11 19:19 ?MNT191
===== GETFMADR EXEC ? ? A1 ?F ? ?80 ? ? 60 ? ? ?6 ?2021-12-16 20:58 ?MNT191
===== PROFILE ?EXEC ? ? A1 ?V ? ?71 ? ? 26 ? ? ?1 ?2024-09-07 20:03 ?MNT191
===== RSDIRUPD EXEC ? ? A1 ?V ?4560 ? ? ?1 ? ? ?6 ?2019-05-23 00:01 ?MNT191
===== SNOBOL4 ?EXEC ? ? A1 ?F ? ?80 ? ?121 ? ? 13 ?2024-02-19 10:56 ?MNT191
===== VMSETUP ?EXEC ? ? A1 ?V ? ?72 ? ?377 ? ? 34 ?2022-04-30 15:00 ?MNT191
?
?... Mark S.
?
?


Re: CMS BREXX Question #VMCE

 

On Sun, Sep 29, 2024 at 08:37 PM, Ross Patterson wrote:
I'm much more comfortable with XEDIT than with EE [...]
I am trying to improve that situation ... but play with the beast please.
?
/g/h390-vm/message/6160
?
Martin


Re: CMS BREXX Question #VMCE

 

On Sun, Sep 29, 2024 at 01:37 PM, Ross Patterson wrote:
I'm much more comfortable with XEDIT than with EE, but I believe the command you want is:
You are correct. I was remembering the MVS/RPF change command. I wish I could use just one editor across all Operating Systems :-(
?
?... Mark S.


Re: CMS BREXX Question #VMCE

 

On Sun, Sep 29, 2024 at 13:26 Mark A. Stevens via <marXtevens=[email protected]> wrote:
I tried changing them with EE.
?
change /?=/ /<>/ * *
?
It changed one to blanks and quit.

I'm much more comfortable with XEDIT than with EE, but I believe the command you want is:

change /?=/<>/ * *

Ross?


Re: CMS BREXX Question #VMCE

 

On Sun, Sep 29, 2024 at 11:50 AM, Ross Patterson wrote:
Without having checked, I'll guess it's the not-sign character that's the problem.? You can replace "?="?with "<>". ?
I figured it was the & as I was in an EBCDIC environment (VM/370 CE).
?
I tried changing them with EE.
?
change /?=/ /<>/ * *
?
It changed one to blanks and quit. I was thinking earlier, this is not my day. Now I'm beginning to think this is not my week. Sorry to be whining.
?
I guess I will transfer the EXEC to Linux, edit it there and transfer back.
?
?... Mark S.


Re: CMS BREXX Question #VMCE

 

On Sun, Sep 29, 2024 at 12:37 Mark A. Stevens via <marXtevens=[email protected]> wrote:
What is the equivalent for & since BREXX doesn't like that? This drives me nuts, since I expect this to work. By-the-bye, the & works on VM/SP 5 at SDF.org.
?
Ready; T=0.13/0.22 21:17:13
GRAPHDEM
? ? 52 *-* ?= 'ATTRY1' & attry1 ?= ' '
Error 13 running GRAPH1, line 52: Invalid character in program

Without having checked, I'll guess it's the not-sign character that's the problem.? You can replace "?="?with "<>". ?

The Rexx language got its start in an EBCDIC environment.? Every ?implementation written by anyone except Mike Cowlishaw got its start in an ASCII environment, where there is no?not-sign character.? Dealing with that has been a compatibility issue ever since.

Ross


Re: CMS BREXX Question #VMCE

 

What is the equivalent for & since BREXX doesn't like that? This drives me nuts, since I expect this to work. By-the-bye, the & works on VM/SP 5 at SDF.org.
?
Ready; T=0.13/0.22 21:17:13
GRAPHDEM
? ? 52 *-* ?= 'ATTRY1' & attry1 ?= ' '
Error 13 running GRAPH1, line 52: Invalid character in program

?... Mark S.


Re: CMS BREXX Question #VMCE

 

On Sat, Sep 28, 2024 at 06:40 PM, Martin Scheffler wrote:
Mark, you run into GRAPHDEM EXEC line 23, a label "L0" is not defined there
Martin,
?
THANK YOU! I was not looking at GRAPHDEM.
?
?... Mark S.


Re: CMS BREXX Question #VMCE

 

Mark, you run into GRAPHDEM EXEC line 23, a label "L0" is not defined there
?
Martin
?
Ready; T=0.01/0.01 23:21:00 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
GRAPHDEM ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ? 15 *-* ea = bitand(substr(diag('8C'),1,1),'40'x) = '40'x; ? ? ??
Error 43 running GRAPH1, line 15: Routine not found ? ? ? ? ? ? ? ??
? ? 23 *-* signal l0; ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
Error 16.1 running GRAPHDEM, line 23: Label "L0" not found ? ? ? ? ?
Ready(20016); T=0.27/0.28 23:21:03 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
q stor ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
STORAGE = 16384K ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
Ready; T=0.01/0.01 23:21:07 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
id ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
MECAFF ? AT VM370CE ?VIA RSCS ? ? 23:21:17 09/28/24 GMT ? ? SATURDAY
Ready; T=0.01/0.01 23:21:17 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ?GRAPHDEM EXEC ? ? A1 ? ? ??
?====> all/l0 ? ? ? ? ? ? ? ??
? ? 0 * * * Top of File * * *?
? ?23 signal l0; ? ? ? ? ? ? ?
? ?78 * * * End of File * * *?


File Notifications #file-notice

Group Notification
 

Mark A. Stevens <marXtevens@...> added folder /IOS3270_Use_Attempt

Description:
Contains the IOS3270 VMARC file from IBM VM Download site. Also contains files from CBT XEPHON VM Update articles demonstrating use of IOS3270. Intended destination is VM/370 CE


The following items have been added to the Files area of the [email protected] group.

By: Mark A. Stevens <marXtevens@...>

Description:
IOS3270, Documentation, and VM Update Example


Re: CMS BREXX Question #VMCE

 

On Sat, Sep 28, 2024 at 03:39 PM, Martin Scheffler wrote:
Can you post the complete source ? I could run it to check if I see the "L0 error" too.
I will create a VMARC of the files and post in the Files section as soon as I can manage.
?
?... Mark S.


Re: CMS BREXX Question #VMCE

 

This is not something that I can run on my (untouched) system.
?
Martin


Re: CMS BREXX Question #VMCE

 

On Sat, Sep 28, 2024 at 03:33 PM, Mark A. Stevens wrote:
I tried the workaround. No fix for the L0 error ...
Also tried a different label, to no positive effect. Still at 16M, too.

Ready; T=0.28/0.29 14:40:29
type graph1 exec a 20 25
?
say 'Screen is too small. Must be at least 32 lines.';
signal outahere;
end;
/*
* Get data from calling EXEC: *
* X. data for x-axis. *
?
Ready; T=0.01/0.01 14:40:37
graphdem
? ? 15 *-* ea = bitand(substr(diag('8C'),1,1),'40'x) = '40'x;
Error 43 running GRAPH1, line 15: Routine not found
? ? 23 *-* signal l0;
Error 16.1 running graphdem, line 23: Label "L0" not found
Ready(20016); T=0.25/0.26 14:40:47
?
?... Mark S.