Losing virt-real setup upon rebuilding the nucleus...can't it be prevented?
Hi folks.
?
After yet another adventure messing with DMK*** stuff (now I've been playing with DMKBOX out of curiosity from the last threads), I have realized that, always, whenever I rebuild the nucleus, I get back to no virt-real storage.
So, whenever I tune DMKSYS, DMKRIO, DMKBOX, etc...after IPLing and checking that? the changes worked as intended and backing up stuff to minidisk 594 / E , then, I have to re-run the VRSIZE recipe once again to let the system as it was... so, the question is: could that be done somehow 'in a row'?
I mean, could one, after getting CPLOAD MAP, run VRSIZE and rebuild again to get VR? Or why is the VR setup lost in the first place?
?
Cheers!
--
Alejandro Olivan.
Spain.
|
Re: Let's Talk About RSCS
I still can't punch jobs to MVS from VM for some reason but, in tests today, output routed from MVS to VM transfers with no I/O errors.? So far, I have routed jobs with various amounts of output, from 153 lines of MVS output (90 records on the VM SPOOL) to 11071 lines (11145 records on VM).
?
In case the issue is not with the RSCS start command, here are my Hercules config statements for the link.? They seem to mirror yours though, so I don't think there's an issue here.
?
Note: Pi4 is the hostname for my Pi host OS.
?
MVS - 670 is JES2 line 1, the one I used for connecting to VM
670 2703 dial=no lport=37908 rhost=Pi4 rport=37913 # RJE to VM/370 (JES line 1)
?
VM - 040 is the CUA defined as NODEA in RSCS
040 2703 dial=no lport=37913 rhost=Pi4 rport=37908 # RJE link to JS08 (NODEA - SML mode to MVS RJE line)
?
As for routing the output to a specific user, the best I've been able to come up with is draining the VM printer or changing the output class or whatever so the output doesn't print by default and using the TRANSFER command to move the output file to the requestor's queue.
?
JES2 thinks it's talking to a dumb RJE workstation, not a smart system with an OS and multiple users.? If you had a level of JES2 that supported NJE, you could use that and Peter Coghlan's updated RSCS to set up an NJE link and get closer to what it sounds like you want.? I've used his modified RSCS to support both NJE and RJE links with good success, though I don't remember specifically testing RJE jobs with massive output for I/O errors.? Typically just IEFBR14s to see the connection works.
?
|
Re: Let's Talk About RSCS
Hi Jeff:
I've gone both up and down in buffer size.
I can send a short command or a short JCL from RSCS to JES. ?No problem there. ?But when I send a larger job, maybe 20 lines, the IO errors start. ?There seems to be something wrong in the way the BSC conversation over TCP is being handled.
Now in the case of the short JCL (an IEFBR14 job, for example), it will run and output will come back to RSCS. ?Since the output is not tagged in any way to go back to my user, it gets printed on PRT1. ?Aside from the IO issues, the next thing I need to figure out is if there is any JCL that could tell RSCS to route the job back to PRT on my userid.
On Sat, 2024-10-12 at 02:21 -0700, Jeff Snyder wrote: Hi Daniel, ? Try using the following for your RSCS link start command: ? START NODEA PARM H02 B999 ? Page 35 in the manual "GC20-1816-3 VM/370 Remote Spooling Communications Subsystem Users Guide, Release 3" documents the parms for the start command and describes the H parm as the line number of the JES2 remote line VM is connecting to.? I'm suggesting B999 to bump the buffer size up to possibly counteract the I/O errors on data flowing from JES2 to VM.? I've used that on other links with success, so it may work here as well. ? When I use this start command, I am able to start the RSCS link, followed by the JES2 line.? I get one I/O error when I start the JES2 line, but none after that. ? I am able to use the RSCS CMD command to send commands to JES2 and get the response files back.? I am getting an "invalid destination" when I punch files to RSCS with NODEA in the tag, but I suspect that's because the AXSROUTE COPY file is empty. ? Eventually, when I want to bring it down, I just $PLINE<n>.? When JES2 shuts down the line, RSCS detects that and deactivates the link. ? Jeff ?
|
Re: Let's Talk About RSCS
Hi Daniel,
?
Try using the following for your RSCS link start command:
?
START NODEA PARM H02 B999
?
Page 35 in the manual "GC20-1816-3 VM/370 Remote Spooling Communications Subsystem Users Guide, Release 3" documents the parms for the start command and describes the H parm as the line number of the JES2 remote line VM is connecting to.? I'm suggesting B999 to bump the buffer size up to possibly counteract the I/O errors on data flowing from JES2 to VM.? I've used that on other links with success, so it may work here as well.
?
When I use this start command, I am able to start the RSCS link, followed by the JES2 line.? I get one I/O error when I start the JES2 line, but none after that.
?
I am able to use the RSCS CMD command to send commands to JES2 and get the response files back.? I am getting an "invalid destination" when I punch files to RSCS with NODEA in the tag, but I suspect that's because the AXSROUTE COPY file is empty.
?
Eventually, when I want to bring it down, I just $PLINE<n>.? When JES2 shuts down the line, RSCS detects that and deactivates the link.
?
Jeff
?
|
Re: EE goes XEDIT - testing new features
#rexx
#VMCE
I am working on a prototype of RDRLIST+PEEK running inside EE. Which features are most important for you to have as a Proof Of Concept ?
EE does not have special functionality for RDRLIST+PEEK, just the infrastructure is used as it is done by IBM using XEDIT and REXX. Some tools present in VM/370 CE are used: EXECIO and EXECUTIL. which run in the transient area. The transient version of EXECIO is not on the S disk but it is on MAINT 093 .
?
listfile execio module * (label isodate ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
Filename Filetype Fm ?Format ? ?Recs Blocks ? ? Date ? ?Time ? Label ?
EXECIO ? MODULE ? F2 ?V ?7296 ? ? ?2 ? ? 10 ?2022-06-12 13:42 ?MNT093?
EXECIO ? MODULE ? I2 ?V ?7296 ? ? ?3 ? ? 10 ?2021-12-11 16:37 ?CMSDSK?
EXECIO ? MODULE ? S2 ?V ?7296 ? ? ?3 ? ? 10 ?2021-12-11 16:37 ?CMSDSK?
Ready; T=0.01/0.01 23:55:49 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
?
See an example below how an EE macro using the freshly implemented EXTRACT /CURSOR/ feature can be assigned to a PF key. Its standard task is SPLTJOIN but PEEK is called in RDRLIST.
?
Martin
?
?SJ ? ? ? EE ? ? ? A1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? V 255 ?Workl=125 Size=24 Line=13 ? ??
?====> ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ? 1 /* REXX */ ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ? 2 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ? 3 "extract /line/cursor/fname/ftype" ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ? 4 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ? 5 if (ftype.1 = "LISTING" & fname.1 = "LISTFILE") then do ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ? 6 ? if cursor.7 < 0 then exit cursor.7 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ? 7 ? "locate :"cursor.7 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ? 8 ? "extract /curline/" ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ? 9 ? parse var curline.3 fn ft fm . ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ?10 ? "xedit" fn ft fm ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ?11 ? exit rc ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ?12 end ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ?13 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ?14 if (ftype.1 = "LISTING" & fname.1 = "RDRLIST") then do ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ?15 ? if cursor.7 < 0 then exit cursor.7 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ?16 ? "locate :"cursor.7 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ?17 ? "extract /curline/" ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ?18 ? parse var curline.3 spoolid . ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ?19 ? "peek" spoolid ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ?20 ? exit rc ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ?21 end ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ?22 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ?23 "spltjoin" ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ?24 exit rc ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
Unchanged ? ? ? ? ? ? ? Load=0xD38000 ? ? ? ? ? ? ? x V1.3.2.0016_241005-1113 ? ? ? ? ? ?
?RDRLIST ?LISTING ?A1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? V 125 ?Workl=125 Size=113 Line=13 ? ?
?====> ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ? 1 1568 Z ? ?102 ?1 PRT NONE CPWATCH ? 2024-08-12 13:32:41 ? ? ? ? ? ? ? ? ? CPWATCH ?
? ? 2 1635 A ? ? 17 ?1 DSK NONE MECAFF ? ?2024-09-15 18:32:45 LISTFILE EE ? ? ? MECAFF ??
? ? 3 1689 N ? ?373 ?1 DSK NONE MECAFF ? ?2024-10-07 04:59:36 EESUBCOM ASSEMBLE MECAFF ??
? ? 4 1688 N ? ?232 ?1 RDR NONE MECAFF ? ?2024-10-07 04:59:19 EESUBCOM ASSEMBLE MECAFF ??
? ? 5 1687 N ? ?233 ?1 PUN NONE MECAFF ? ?2024-10-07 04:59:09 EESUBCOM ASSEMBLE MECAFF ??
? ? 6 1686 N ? ?241 ?1 RDR NONE MECAFF ? ?2024-10-07 04:58:42 EESUBCOM ASSEMBLE MECAFF ??
? ? 7 1604 A ? 1001 ?1 DSK NONE MECAFF ? ?2024-08-26 13:03:52 EESUBCOM LISTING ?MECAFF ??
? ? 8 1670 N ? 1934 ?1 RDR NONE MECAFF ? ?2024-10-05 20:33:03 SJ ? ? ? EE ? ? ? MECAFF ??
? ? 9 1296 A ? ? 31 ?1 RDR NONE CMSUSER ? 2022-09-22 14:27:49 ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ?10 1435 T ? ? ?6 ?1 CON NONE MAINT ? ? 2022-10-14 06:39:01 ? ? ? ? ? ? ? ? ? MAINT ? ?
? ?11 1290 T ? ? ?2 ?1 CON NONE MAINTC ? ?2022-09-17 20:20:36 ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ?12 1437 T ? ? ?3 ?1 CON NONE MAINT ? ? 2022-10-14 06:43:18 ? ? ? ? ? ? ? ? ? MAINT ? ?
? ?13 1685 N ? ?531 99 RDR NONE MECAFF ? ?2024-10-06 14:50:31 RXUSERFN ASSEMBLE DISTCODE?
? ?14 1352 N ? 4454 ?1 RDR NONE MAINT ? ? 2022-10-11 05:43:20 LDT ? ? ?DMSINIW ?MAINT ? ?
? ?15 1668 N ? ? 65 ?1 RDR NONE MECAFF ? ?2024-10-05 20:25:37 EE$MACRO EXEC ? ? MECAFF ??
? ?16 1675 N ? ?125 ?1 RDR NONE MECAFF ? ?2024-10-05 20:52:56 EEMAIN ? H ? ? ? ?MECAFF ??
? ?17 1696 A ? ?590 ?1 PUN NONE MECAFF ? ?2024-10-10 13:16:27 RECEIVE ?TEMP ? ? MECAFF ??
? ?18 1232 Z ? ?102 ?1 PRT NONE CPWATCH ? 2022-08-16 12:18:33 ? ? ? ? ? ? ? ? ? CPWATCH ?
? ?19 1383 A ? 6059 ?1 PRT NONE CMSBATCH ?2022-10-11 08:54:37 CMSBATCH JOB ? ? ?CMSBATCH?
? ?20 1665 A ? 3796 ?1 PRT NONE MAINT ? ? 2024-10-05 17:44:01 DMSXIO ? DMSHRC ? MAINT ? ?
? ?21 1346 A ? ? ?7 ?1 PRT NONE MAINT ? ? 2022-10-11 05:11:18 DMSLCL ? CNTRL ? ?MAINT ? ?
? ?22 1347 A ? ? ?7 ?1 PRT NONE MAINT ? ? 2022-10-11 05:11:25 DMSLCL ? CNTRL ? ?MAINT ? ?
? ?23 1375 A ? ?324 ?1 PRT NONE MAINT ? ? 2022-10-11 08:39:01 ? ? ? ? ? ? ? ? ? MAINT ? ?
? ?24 1397 A ? ?992 ?1 PRT NONE MAINT ? ? 2022-10-12 11:10:06 DMSEXC ? DMSLCL ? MAINT ? ?
Modified* ? ? ? ? ? ? ? Load=0xD38000 ? ? ? ? ? ? ? x V1.3.2.0016_241005-1113 ? ? ? ? ? ?
|
Re: Let's Talk About RSCS
Thanks for that pointer Mark...it is at least enlightening. ?Perhaps someone else can better interpret the message, but to me it looks like a read error on the JES2 side.
On Thu, 2024-10-10 at 11:48 -0700, Mark A. Stevens via groups.io wrote: On Thu, Oct 10, 2024 at 01:28 PM, Daniel L. Srebnick wrote:
Otherwise, we see the IO errors (which is what
I'm trying to resolve).
Look at the manual, and search for $HASP094, around page 98 of 416. There is an explanation of all the bits there. ? http://www.bitsavers.org/pdf/ibm/370/MVS/GC28-1374-1_MVS_370_Message_Library_System_Messages_Volume_1_AHL-IEA_Jan85.pdf ? $HASP-6 MVS/370 System Messages Volume 1 ? ?... Mark S. ?
|
Re: Let's Talk About RSCS
On Thu, Oct 10, 2024 at 01:28 PM, Daniel L. Srebnick wrote:
Otherwise, we see the IO errors (which is what
I'm trying to resolve).
Look at the manual, and search for $HASP094, around page 98 of 416. There is an explanation of all the bits there.
?
http://www.bitsavers.org/pdf/ibm/370/MVS/GC28-1374-1_MVS_370_Message_Library_System_Messages_Volume_1_AHL-IEA_Jan85.pdf
?
$HASP-6 MVS/370 System Messages Volume 1
?
?... Mark S.
?
|
Re: Let's Talk About RSCS
The /*ROUTE RPINT RMT1 is intentional, to not crash the connection back
to the VM/RSCS side. Otherwise, we see the IO errors (which is what
I'm trying to resolve).
toggle quoted message
Show quoted text
On Thu, 2024-10-10 at 11:26 -0700, Mark A. Stevens via groups.io wrote: On Mon, Oct 7, 2024 at 01:16 PM, Daniel L. Srebnick wrote:
However, if I include a /*ROUTE PRINT RMT1 to send the output to my
RJE80 remote, all is well.? This is just a guess, but perhaps there
is too much data too fast coming back over the line from JES2 to
RSCS and the code cannot handle it so it throw errors. IIRC when you submit from a remote station (VM, or RJE) and you want
the output back to that station, you need the /*ROUTE as you
specified, otherwise it will attempt to print on the "local" MVS
system, and it appears your LINE2 is set up for RMT02 not RMT1. Below
is the TK4- configuration.
?
?RFEVIEW ?SYS1.JES2PARM(JES2PARM) - 1.02 ? ? ? ? ? ? ? ? ? ? ? ? ?
Columns 1 72?
?Command ===> ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
?Scroll ===> CS
?000149 *** ? ? ? * ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ? ? ? ? ?
?000150 LINE2 ?
?UNIT=671,EBCDIC,TRANSP,HISPEED,FDUPLEX,NOADISC,CODEA,IFACEA ? ?
?000151 RMT2 ? ? 3780,NUMPR=1,LINE=2,NUMRD=1,NUMPU=1,TRANSP,NOTABS ?
? ? ? ? ? ?
?000152 R2.PR1 ? START,CLASS=XA,UCS=QN,FCB=6,SEP,AUTO,PRWIDTH=151 ? ?
? ? ? ? ??
?000153 R2.PU1 ? CLASS=B ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ? ? ? ? ?
?000154 R2.RD1 ? CLASS=A ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ? ? ? ? ?
?000155 DESTID NAME=RMT02,DEST=R2 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ? ? ? ??
?000156 *** ? ? ? * ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ? ? ? ? ?
?
I Hope This Helps
?
?... Mark S.
?
|
Re: Let's Talk About RSCS
On Mon, Oct 7, 2024 at 01:16 PM, Daniel L. Srebnick wrote:
However, if I include a /*ROUTE PRINT RMT1 to send the output to my RJE80 remote, all is well.? This is just a guess, but perhaps there is too much data too fast coming back over the line from JES2 to RSCS and the code cannot handle it so it throw errors.
IIRC when you submit from a remote station (VM, or RJE) and you want the output back to that station, you need the /*ROUTE as you specified, otherwise it will attempt to print on the "local" MVS system, and it appears your LINE2 is set up for RMT02 not RMT1. Below is the TK4- configuration.
?
?RFEVIEW ?SYS1.JES2PARM(JES2PARM) - 1.02 ? ? ? ? ? ? ? ? ? ? ? ? ? Columns 1 72?
?Command ===> ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?Scroll ===> CS
?000149 *** ? ? ? * ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
?000150 LINE2 ? ?UNIT=671,EBCDIC,TRANSP,HISPEED,FDUPLEX,NOADISC,CODEA,IFACEA ? ?
?000151 RMT2 ? ? 3780,NUMPR=1,LINE=2,NUMRD=1,NUMPU=1,TRANSP,NOTABS ? ? ? ? ? ? ?
?000152 R2.PR1 ? START,CLASS=XA,UCS=QN,FCB=6,SEP,AUTO,PRWIDTH=151 ? ? ? ? ? ? ??
?000153 R2.PU1 ? CLASS=B ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
?000154 R2.RD1 ? CLASS=A ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
?000155 DESTID NAME=RMT02,DEST=R2 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
?000156 *** ? ? ? * ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
?
I Hope This Helps
?
?... Mark S.
?
|
Re: Let's Talk About RSCS
The scenario posted is without tcpnje.
On the MVS side we have:
# RJE 0670 2703 dial=IN lport=3780 0671 2703 lport=3781 rhost=localhost rport=3880 dial=no
Device 671 is the RSCS connection.
On the VM side we have:
# RJE 0040 2703 lport=3880 rhost=localhost rport=3781 dial=no
On Thu, 2024-10-10 at 11:06 -0700, Mark A. Stevens via groups.io wrote: On Mon, Oct 7, 2024 at 01:16 PM, Daniel L. Srebnick wrote:
Next I configured RSCS (the one distributed with CE).? This connects just fine to MVS.? It took some head scratching, but determined that:
If you'd like to save some of us from losing more hair ;-) would you share your hercules configuration lines for VM and for MVS? ? I wasn't sure if I needed TCPNJE for both, either, or neither. ? ?... Mark S.
|
Re: Let's Talk About RSCS
On Mon, Oct 7, 2024 at 01:16 PM, Daniel L. Srebnick wrote:
Next I configured RSCS (the one distributed with CE).? This connects just fine to MVS.? It took some head scratching, but determined that:
If you'd like to save some of us from losing more hair ;-) would you share your hercules configuration lines for VM and for MVS?
?
I wasn't sure if I needed TCPNJE for both, either, or neither.
?
?... Mark S.
|
Re: Possible bug in BREXX parse instruction
Martin was correct. I have a fix under test right now that correctly parses the case this thread stated with, and every other PARSE instruction in all the Rexx code I have. It was particularly helpful to re-read both Mike's TRL2 and the ANSI Rexx standard side-by-side with the BREXX code. The fix hits both template.c and interpre.c.
I hope to have a Beta release out Real Soon, with the intent of getting it into the next VM/CE release.
Ross
|
I want to be able to submit jobs to JES2 (MVS 3.8j TK5) from VM/370 1.2 CE, but don't want to run MVS as a guest under VM/370.? I get much better performance running a separate Hercules SDL instance for each, and also can use 2 CPUs for MVS.
?
First I made sure RJE is working fine under MVS.? It is, and I can submit jobs and get output from RJE80 running under either Windows or Linux/Wine.
?
Next I configured RSCS (the one distributed with CE).? This connects just fine to MVS.? It took some head scratching, but determined that:
?
START NODEA PARM HASP
?
is what I needed to make the connection from the RSCS end.? I do the following:
?
TAG DEV PUN NODEA
SPOOL PUN RSCS
PUN TEST JCL
?
and my job immediately runs over on the MVS side.? However, the print dataset is not able to make the return trip.? The line "jams" as follows:
?
$HASP094 I/O ERROR ON LINE2??? 671,02,0C00,003D,B400
$HASP094 I/O ERROR ON LINE2??? 671,02,0E00,023D,B400
$HASP094 I/O ERROR ON LINE2??? 671,02,0C00,003D,B400
$HASP094 I/O ERROR ON LINE2??? 671,02,0E00,023D,B400
$HASP094 I/O ERROR ON LINE2??? 671,02,0C00,003D,B400
$HASP094 I/O ERROR ON LINE2??? 671,02,0E00,023D,B400
$HASP094 I/O ERROR ON LINE2??? 671,02,0C00,003D,B400
$HASP094 I/O ERROR ON LINE2??? 671,02,0E00,023D,B400
?
However, if I include a /*ROUTE PRINT RMT1 to send the output to my RJE80 remote, all is well.? This is just a guess, but perhaps there is too much data too fast coming back over the line from JES2 to RSCS and the code cannot handle it so it throw errors.
?
Anyway, I'd like for this to work better, and if I can provide any test data to someone capable and willing to persue the challenge, I'd be happy and greatful.
?
Dan
|
Re: Where is the source code of ASSEMBLER XF (IFOX00) in VM/370 Community Edition V1R1.2 ?
#VMCE
Hi Tony,
You must have missed my many posts over on the Turnkey Group!? For my IFOX00 refurbishment project I took the source code that was generated by Paul Gorlinsky¡¯s excellent work and merged in some later Usermod changes contributed by Greg Price. Additionally, I updated the code to address the problem introduced when the IFOX00 developers shipped an APAR that did not follow the rules for GETMAIN parameter lists as we discussed in previous postings years ago. We never really fully resolved that issue but at least the source was updated to avoid the Getmain Abend.
The IFOX00 refurbishment project was incredibly time consuming. For example, even a seemingly trivial change like supporting the _ underscore character in variable names took days of work due to some IFOX00 developers ignoring coding standards and hard coding values.
Subsequently, I put my IFOX00 refurbishment project on hold because I prioritized some later projects that would provide significant benefits to a larger number of MVS 3.8 users and enable the transition to 3390 DASD. Hence my contributions and postings on the Turnkey Group. After completion of a current large project I will return to the IFOX00 refurbishment project. So, nothing really to contribute at this time as the IFOX00 code is definitely WIP.
Regards
Tom
|
I think I have enough new building blocks in EE that RDRLIST should be doable in a similar way as XEDIT does. As a proof of concept, I have downstripped RECEIVE EXEC Y2 to use it as a PEEK macro. PEEK EE reads NETDATA from cards and places the decoded records into the editor.
Note that the currently uploaded bleeding edge preview of EE is significantly behind, see the EE thread for news to come.
?
Martin
?
On Tue, Jun 22, 2021 at 10:32 PM, Jim Salvino wrote:
In VM/370 CE 1.1.1 is there an EXEC, MODULE, etc that provide the functionality that RDRLIST provides?
Thanks!
On Tue, Jun 22, 2021 at 11:06 PM, Dave Wade wrote:
Jim,
No, just waiting for some one to write it.
Dave
|
Re: Where is the source code of ASSEMBLER XF (IFOX00) in VM/370 Community Edition V1R1.2 ?
#VMCE
On Sat, 5 Oct 2024 at 11:52, Mark A. Stevens via <marXtevens= [email protected]> wrote: On Wed, Oct 2, 2024 at 05:35 PM, laddiehanus wrote:
I thought someone updated the ASMXF source to reflect all the PTF¡¯s a number of years ago.?
?
Isn¡¯t there a S370 asm group? Probably there but I¡¯ll see if I have a copy.
I searched the files on that list
?
?
and did not find any source code for Assembler XF. Maybe someone has better eyes than I do?
?
In more searching I found this from Tony Harminc, concerning building Assembler XF and problems encountered.
?
?
The above is a HUGE chain of e-mails regarding discrepancies Tony H found. I haven't gotten to the end of the story, but there's lots of information in there.
Ah yes, that thread... It goes 100% off-topic at some point around 2 April so there's very little point reading all the stuff about nifty macros to generate zArch instructions and such. Keep in mind that it's also spread across at least three Hercules groups: H390-MVS, H390-VM, and
hercules-os38. Largely my fault for posting to all three groups because I mostly tend to treat all the Hercules groups as one.
Rereading it, I'm not sure that my question about a "definitive" location for PTF source was ever resolved. Certainly? Paul Gorlinsky did a huge amount of work, but he? may have been working with a base slightly earlier than the latest available.
The obvious place to start is the Jay Mosley stuff. Also asking Tom Armstrong (who I haven't seen posting anywhere Hercules for some time) wouldn't hurt, as he was working on major enhancements to IFOX around the time of that thread (2017).
Tony H.
|
Re: Where is the source code of ASSEMBLER XF (IFOX00) in VM/370 Community Edition V1R1.2 ?
#VMCE
On Wed, Oct 2, 2024 at 05:35 PM, laddiehanus wrote:
I thought someone updated the ASMXF source to reflect all the PTF¡¯s a number of years ago.?
?
Isn¡¯t there a S370 asm group? Probably there but I¡¯ll see if I have a copy.
I searched the files on that groups.io list
?
/g/hercules-s370asm/files
?
and did not find any source code for Assembler XF. Maybe someone has better eyes than I do?
?
In more searching I found this from Tony Harminc, concerning building Assembler XF and problems encountered.
?
https://h390-mvs.yahoogroups.narkive.com/5fkFKcen/ifox-assembler-source-troubles
?
The above is a HUGE chain of e-mails regarding discrepancies Tony H found. I haven't gotten to the end of the story, but there's lots of information in there.
?
?... Mark S.
?
|
Re: Where is the source code of ASSEMBLER XF (IFOX00) in VM/370 Community Edition V1R1.2 ?
#VMCE
On Tue, Oct 1, 2024 at 01:01 PM, Martin Scheffler wrote:
Is it possible to generate the complete VM/370 Community Edition including all the tools from source ?
Just about all the tools we have are available in source code, usually assembler, but some are in other languages.
?
I recently tried, and partially succeeded to install IOS3270. It does run, the only sample EXEC I have uses commands from VM/ESA, and I haven't got workarounds, yet.
?
That said, the PDF documenting the tools talks about building it from source, but none is provided from the IBM VM download site where I got the tool. This, then would be one we can not build from source.
?
?... Mark S.
|
Re: Where is the source code of ASSEMBLER XF (IFOX00) in VM/370 Community Edition V1R1.2 ?
#VMCE
On Fri, Oct 4, 2024 at 09:55 AM, Martin Scheffler wrote:
On Fri, Oct 4, 2024 at 10:01 AM, Dave Wade wrote:
The source is horrible, I have no idea why any one would torture themselves trying to re-assemble the assembler.?
Assembler XF is an essential tool to build VM/370, so I want to know if Assembler XF can assemble itself producing identical object code. Then I want to know if assembling CMS and CP using this freshly built assembler will produce identical object code.
?
Martin
?
What will you do if its different? I ran production VM systems for many years and always accepted that the Assembler worked, as we never had the source, or the space to fix it. Pretty sure if things were different some one would have noticed...
?
Dave
?
|
Re: Where is the source code of ASSEMBLER XF (IFOX00) in VM/370 Community Edition V1R1.2 ?
#VMCE
On Fri, Oct 4, 2024 at 10:01 AM, Dave Wade wrote:
The source is horrible, I have no idea why any one would torture themselves trying to re-assemble the assembler.?
Assembler XF is an essential tool to build VM/370, so I want to know if Assembler XF can assemble itself producing identical object code. Then I want to know if assembling CMS and CP using this freshly built assembler will produce identical object code.
?
Martin
?
|
Martin Scheffler
Mark A. Stevens