How can I read a file with RECFM=U in MUSIC/SP?
Unfortunately, using Waterloo C is not possible (see for ex. ).
I have also tried using REXX but to no avail (see for ex. "The MUSIO command in Rexx" in the rexx help file).

(2nd try at posting this)

I think I figured out how to do this once but it was a long time ago and
I don't remember the details. Maybe calling subroutine MFIO with
type options set to something like 'UIO RD.' might be the way to go?

Try looking up MFIO in the administrator reference manual eg: MANX AR MFIO
if you have the online manuals installed.

I don't know if it is possible to call MFIO from Waterloo C, it might be
necessary to call it from FORTRAN instead.

It has to be possible with the assembly language interface too using
MFARG / MFGEN / MFREQ and friends but I don't know how exactly. There
should be something about this in the administrator reference manual too
if you want to go that way.

Regards,
Peter Coghlan.

Is my earlier suggestion completely without merit or
or can nobody (who uses gmail probably) see my posts
or what?

Regards,
Peter Coghlan.

I assume you want to read a load module ... why do you want to read the load module,
what information do you want to get from there? Maybe there are other (simpler) ways
to do what you want to do .... ???

We could probably help you more if you tell us more about the problem you want to solve.

Kind regards

Bernd


Am 04.08.2024 um 18:53 schrieb Aigor via groups.io:

How can I read a file with RECFM=U in MUSIC/SP?
Unfortunately, using Waterloo C is not possible (see for ex. ).
I have also tried using REXX but to no avail (see for ex. "The MUSIO command in Rexx" in the rexx help file).

I think I figured out how to do this once but it was a long time ago and
I don't remember the details. Maybe calling subroutine MFIO with
type options set to something like 'UIO RD.' might be the way to go?

Try looking up MFIO in the administrator reference manual eg: MANX AR MFIO
if you have the online manuals installed.

I don't know if it is possible to call MFIO from Waterloo C, it might be
necessary to call it from FORTRAN instead.

It has to be possible with the assembly language interface too using
MFARG / MFGEN / MFREQ and friends but I don't know how exactly. There
should be something about this in the administrator reference manual too
if you want to go that way.

Regards,
Peter Coghlan.

Bernd Oppolzer wrote:

[...]

My HERCMUS.RC file now looks like this:

pause 1
sh rem start telnet 127.0.0.1 3270 <telnet_mus.inp &
ipl 201
pause 5
/

I left the telnet command in the file, but commented it out
using rem ... who knows :-)

Wouldn't commenting it out in the script file itself be better? e.g.:

# sh start telnet 127.0.0.1 3270 < telnet_mus.inp &

AFAIK Hercules treats both '*' and '#' (and, I believe, ';' too) in the first column as a comment. An '*' is a "loud" comment that will be echoed to the panel, whereas a '#' is a "silent" comment that is not. This allows you to add silent comments to your scripts for your own benefit to make maintaining them easier for yourself, while also allowing you to have your scripts also issue "comment messages" to the panel to keep the Hercules user informed as to what your script is doing or about to do.

HTH!

--
"Fish" (David B. Trout)
Software Development Laboratories

mail: fish@...

Hi Peter,

thank you very much !

It worked like a charm;

I even don't have to enter the slash manually, if I put another pause into the RC file.
This way, the MUSIC system comes up completely without any other action than double click
on the "Start MUSIC" button. Ok, I add the TN3270 session with another double click,
but that's what I do on MVS etc., too.

My HERCMUS.RC file now looks like this:

pause 1
sh rem start telnet 127.0.0.1 3270 <telnet_mus.inp &
ipl 201
pause 5
/

I left the telnet command in the file, but commented it out using rem ... who knows :-)

But this is now much simpler.

Thanks again,
kind regards

Bernd



Am 15.01.2023 um 23:37 schrieb Peter Coghlan:

* Operator console, Telnet client connection (connect before IPL):
*? For Hummingbird HostExplorer: VT220; Keybd Opt: Send Enter as CR-LF;
*??? Preferences: Local Echo; VT model options: VT 220, 8-bit.
*? You can also use the Windows telnet client (telnet.exe).
00F 3215

It has just dawned on me that you could eliminate the need for the
VT220 telnet connection for the MUSIC console by using the Hercules
integrated console instead.

Code the MUSIC console device in the Hercules configuration file like this:

00F 3215-C

Then after you ipl 201, enter the command

/

on the Hercules console to answer the "M077 Enter operator id or special options or HELP" prompt.

You can also enter MUSIC console commands later on by prefixing them with /
and entering them on the Hercules console instead. The / tells Hercules
to send the command to MUSIC. So, to issue the "/STOP" MUSIC console command,
you need to issue the command //STOP on the Hercules console.

Regards,
Peter Coghlan.

开云体育

Hello Henry,

I used the conf file, which is on the SIM390 website; this is not much different from the one I already had.

It looks now (after some minor modifications, made by me) like this:

* Hercules sample config file for 1-vol demo MUSIC/SP system.
* First, start the Hercules emulator, specifying this config file.
* Then: (1) Connect telnet client as console, port 3270 - see notes below.
*?????? (2) ipl 201 (as a Hercules command).
*?????? (3) Press Enter on telnet console, to complete MUSIC/SP IPL.
*?????? (4) Connect tn3270 client (for MUSIC/SP sign-on), port 3270.
* To exit Hercules: exit (as a Hercules command)

ARCHMODE ESA/390
CPUSERIAL 000611
CPUMODEL 3090
CPUVERID FD
MAINSIZE 16
XPNDSIZE 0
NUMCPU 1
NUMVEC 0
SYSEPOCH 1900

* Time zone: use -0400 for EDT, -0500 for EST, etc.
TZOFFSET -0500
CNSLPORT 3270

* Card reader:
00C 3505

* Operator console, Telnet client connection (connect before IPL):
*? For Hummingbird HostExplorer: VT220; Keybd Opt: Send Enter as CR-LF;
*??? Preferences: Local Echo; VT model options: VT 220, 8-bit.
*? You can also use the Windows telnet client (telnet.exe).
00F 3215

* User terminals, tn3270 client connection:
*? For Hummingbird HostExplorer: e.g. 3279 model 4 ExtAttr.
*? You can also use other tn3270 clients such as QWS3270.
0F0-0F7 3270

* FBA-512 disk (copied exactly from Sim390 FBA volume file):
201 3370 c:\sim390dm\musicxd.vol

... the volume in the last line is the volume which came 10 years ago with SIM390
and which had some modifications, because I did my Pascal work there (I wrote a program
to transfer the Pascal compiler object codes and sources from MUSIC/SP to Hercules in 2011).
But this does not affect the MUSIC/SP startup procedure.

Then I had to decide, which Hercules version to use; I had two choices:

- a Hercules 3.07 version, which I use for VM/370 (it was part of the VM sixpack, and I installed it in 2011 or earlier)
- a Hercules 4.0 version, which comes with Turnkey TK4- (I installed it in 2017)

I decided to use the 4.0 version. BTW: I tested today to run VM/370 with both versions, and the same Pascal compile
(of 26.000 lines) needed 15 seconds with 4.0 and 9 seconds with 3.07; so it seems that the old Hercules version
is faster.

The main problem was that two console programs are needed: one to enter an empty line into the MUSIC/SP
systems console, and another one for the "normal" MUSIC/SP user screen. The first one must be a VT200 session,
NOT a tn3270 session. I used Windows telnet to do this. To have Telnet on my Windows system, I had to enable it first.
Telnet is normally disabled in Windows (today), but can be enabled without problems.

For the second one I used wc3270. See the comments above; they are from the original config file.

I ended up with the following components:

1) Windows CMD file STARTHM.CMD:

@ECHO OFF
copy hercmus.rc hercules.rc /y
setlocal
SET ARCH=32
IF DEFINED ProgramFiles(x86) SET ARCH=64
c:\tk4\hercules\windows\%ARCH%\hercules -f music.cnf

note: the TK4 hercules is not in my path, so I had to specify the path explicitly. This is most certain different on your installation.
I'm not sure if MUSIC/SP will also work with the 3.07 version of hercules.

and: hercules, AFAIK, will always use the file hercules.rc, if present. I always copy the releant RC-file to hercules.rc before
starting hercules. Maybe there are other ways to do this, but this works for me.

2) RC-File hercmus.rc:

pause 1
sh start telnet 127.0.0.1 3270 <telnet_mus.inp &
pause 2
ipl 201

this file is copied to hercules.rc, see above;
it starts telnet first with the appropriate options and then after two seconds it IPLs MUSIC/SP (device 201)

3) for Telnet, the input file telnet_mus.inp is needed:

set crlf
set term vtnt

When issuing STARTHM.CMD, two windows should open; one with Hercules, where the IPL is executed
and another one with Telnet; in the Telnet Window, you will have to enter a blank line to complete the IPL

4) When the IPL is completed, you can open the WC3270 session; im my case, this is done by this command file:

set PATH=%PATH%;c:\wc3270
wc3270 -model 3279-2 127.0.0.1 3270

Again: because wc3270 is not in the path, I add its directory to the path before calling it.
This is in a CMD file which is started by double-click in a Hercules folder.

I hope this helps you to install your own MUSIC/SP version on Hercules.

Have a nice day,
kind regards

Bernd

Hi Bernd,

I sent you an email in response to your posting on h390-vm but I
guess you haven't seen it yet.

But: where do I get a list of ALL the directories on the system?

On $000, the command

flib $*:

will list all the files on the system.

There are a small number of important files belonging to users that do not
begin with $ which will not get listed by this, CCDE: for example.

I would have suggested:

FLIB *:*

except that if you have loaded a lot of files on your system, FLIB may
run out of memory trying to display them all. So instead, I would suggest:

LIBRARY *:*

which will just produce a list of the files and not place them in a
full screen environment.

And maybe a map of used space vs. free space etc.?

The LIBSPACE command will tell you about free space, used space and
space fragmentation in the save library file system.

Regards,
Peter Coghlan.

Bernd,

If it helps, I think the only way to get a dataset to Music/SP on
Hercules, is to use the Sim390 version as a middleman .. (using FTP).

Pete Coghlan (softwarebeyondthepale.ie) was experimenting to get music's
tcpip working on hercules.

Chris
--
<cjar1950@...>



----------------------------------------------------------------------------------------------------------------------------------
On Sun, 15 Jan 2023 17:41:44 +0100
"Bernd Oppolzer via groups.io" <berndoppolzer@...> wrote:

Hello,

today I registered to this group just to see if there is someone listening and if I probably find
answers to some of my questions.

I found Music/SP and the SIM390 emulator in 2011 and I took the Stanford Pascal compiler
from there and converted it into a much larger and more powerful product, called the New Stanford Pascal compiler.
The original compiler had 6.000 lines, and the new compiler today has 26.000 lines.
The new compiler is part of the VMCE distribution, and it works with VM, MVS and with
Windows, Unix, Linux, OS/2 etc., because I ported it to the non-mainframe platforms in 2016.

I did not really use Music/SP from 2011 until today, because I did not manage to get it running
with Hercules, and the SIM390 solution seemed too insecure for me ... until today; today I finally
managed to get Music/SP running with Hercules.

Now Hercules in my environment runs VM/370, MVS and MUSIC/SP and (someday hopefully) VSE.

The Pascal compiler on my Music/SP system is still the old 1982 variant which was only corrected
a little bit by Dave Edwards in 2007. But it is very different from the actual New Stanford 2023.01 variant.
Here are some informations regarding the new compiler:

I would like to send the new compiler back to Music/SP, if there is some interest in THIS community.

Now for the start some questions:

I enter Music/SP as user $000 with a modified password;
when I look into the file system, I see files in directory $000 and in directory $PSC (Pascal),
if I specify the directory name in the FLIB command. I know, that there are other
directories, for example $ADM for APL.

But: where do I get a list of ALL the directories on the system?
And maybe a map of used space vs. free space etc.?

Thank you very much in advance for your help,
kind regards

Bernd

On Sun, Jan 15, 2023 at 08:55 AM, Bernd Oppolzer wrote:

But: where do I get a list of ALL the directories on the system?

On $000, the command

flib $*:

will list all the files on the system. On the ADMIN main menu, you can also select option 3, then option 8 to get more information.

And maybe a map of used space vs. free space etc.?

In the ADMIN main menu, select option 1, then option 3. You might be interested in other options in that sub-menu.

Cheers,

Rene FERLAND, Montreal