Keyboard Shortcuts
Likes
- H390-MUSIC
- Messages
Search
Re: On aplying updates to Music 6.2
Leven. 10 juil. 2020 à17:07, carlos feldman <carlfelster@...> a écrit: >> I feel happy, applied updates 1 to 4, installed Wat C, Pl/I, Fortran and Assembler. >> Also could run OK, some programs I had in my files, from a few years ago. >> Now I need to re-study Music's JCL, Rexx, and how to use a second disk I have >> formatted and mounted, with no data on it.It was a productive day. Celine Dion was singing: "It was lost long ago but it's all coming back to me." :-) Have fun! Rene FERLAND, Montreal |
Re: On aplying updates to Music 6.2
I feel happy, applied updates 1 to 4, installed Wat C, Pl/I, Fortran and Asembler. Also could run OK, some programs I had in my files, from a few years ago. Now I need to re-study Music's JCL, Rexx, and how to use a second disk I have formatted and mounted, with no data on it. It was a productive day Carlos Argentina |
Re: On aplying updates to Music 6.2
Good deal. I have the vid’s queued up. I was a fresh out of college admin of our music system for about 9 years at Transylvania university in Lexington ky. I think music went in my sophomore year, but other than some fortran programs as a cs major, and e-mail, that was about all we dealt with it. Administratively, we had almost all our offices running home grown apps, registrar, admissions, dept of public safety, residence life, community education, admissions, and student recruiting. My first job was to maintain/re-write a lot of that code and be the music system admin. I have the ‘b� version on simm390. I tried to see if the school had any of our old backups. Would have great to resurrect that. But, looking forward to see what I may have missed being such a noob at the time. From: [email protected] [mailto:[email protected]] On Behalf Of René Ferland >> Did I miss something? |
Re: On aplying updates to Music 6.2
the log looks like this: Microsoft Windows [Versión 10.0.19041.329] (c) 2020 Microsoft Corporation. Todos los derechos reservados. j:\MusicB\Updates\gccmu11>m_send gccmu11.mfarc ftp> Open localhost 621 Conectado a CARLOS-PC-I5. 220 UNIX dir list format - MUSIC / SP FTP Server - Ready 530 Not logged in Usuario (CARLOS-PC-I5:(none)): 331 Please send password for $000. Challenge: A553A57B55ACF0B2 230 User $000 logged in ftp> cd updts 200 Command ok ftp> type binary 200 Command ok ftp> quote allo 4000000 200 Command ok ftp> quote recfm fc 200 Command ok ftp> quote lrecl 80 200 Command ok ftp> hash Impresión de marcas "hash" Activo ftp: (2048 bytes/marca "hash") . ftp> put gccmu11.mfarc 200 Command ok 150 Sending file "$000:UPDTS\GCCMU11.MFARC" #################################################################################################################################################################################################################################################################################################################################################################################################################################################################################################################################################### 226 Data transfer finished, data connection closed. ftp: 1090080 bytes enviados en 0.15segundos 7267.20a KB/s. ftp> bye 221 Goodbye, closing control connection file sent j:\MusicB\Updates\gccmu11> -- Carlos Argentina |
Re: On aplying updates to Music 6.2
Hey guys !! I forgot I was talking to an old lady used to be talked in 80 column cards !!!I I normally use total commander or other two column file manager ( BTW from the time of CMS ), and work with local and remote directories as if they were local. In case someone may find it helpful I wrote a windows scripr to automate the transfer of binary mode files. @echo off @ rem M_SEND filename C.Feldman. July 9 2020 rem sends binary filename to a music/sp HOST rem using ftp protocol rem check parameters rem todo check the file exists and report error if not IF "%~1"=="" goto noparms if exist %1 ( rem ***ensamble the ftp dialog text*** echo Open localhost 621 > s.txt echo $000 >> s.txt echo music >> s.txt echo cd updts >> s.txt echo type binary >> s.txt echo quote allo 4000000 >> s.txt echo quote recfm fc >> s.txt echo quote lrecl 80 >> s.txt echo hash >> s.txt echo put %1 >> s.txt echo bye >> s.txt ftp -s:s.txt echo file % sent rem delete s.txt ) ELSE ( echo %1 does not exist echo file was not sent ) goto :eof rem ***if there's no parameter*** :noparms echo m_send, sends a binary filename to a music/sp HOST echo use: m_send file EXIT /B 1
Open localhost 621 $000 music cd updts type binary quote allo 4000000 quote recfm fc quote lrecl 80 hash put upd1.mfarc bye when using ftp -s:s.txt it thansfers ok the binary update file to the /updts directory, which now is executing properly. Thanks again for your help, I'm trying to figure to do things I did 30 years ago, with tools I don't use since 15 years ago LOL.
BTW I remember that at IBM someone asked to punch hundreds of cards for doing some file catalog, and we wrote a PL/I program that generated this huge JCL lot on a tape, which was sent in a day to be processed instead the couple of weeks needed to punch tha cards.
-- Carlos Argentina |
Re: On aplying updates to Music 6.2
toggle quoted message
Show quoted text
From: [email protected] [mailto:[email protected]] On Behalf Of carlos feldman Hi everyone ! With this covid bussiness, I'm stucked at home under querantine, so I'm bac with Music/SP environment. I was member od the original MUSIC/SP on yahoo, and mr René Ferland invited me to this group. Being back to the basic, I jave 2 systems up and running, version 6.2 (B), one on SIM390 version 17 and the other on Hercules, 64 bit. I also ran mr. Ferland's more complete system,. wit no problem. For a starting practice I decided to apply the updates mr. Dave Edwards left, so I downloaded the updates from internet, checked the MD signatures and FTPe'd to the virtual machine disk, wit no problem. Thing is than I'm trying to apply the first patch UPD1, and I'm getting some errors First I ran the mfarc file with error "045 file not found" Then I tryed,uUsing this script /INC *COM:MFREST IN=1,ALL=T,REPL=F,FIXUP=' ',LIST=T,SETUI=T I Get the following error: -- FILE RESTORE (MFREST) --
INPUT = 1 TAPFIL = 1 FIXUP=' ' CTLREC=T ALL=T RLSE=F REPL=F LIST=T SETUI=T SETBUP=F FIXUCR=F REPNWR=T (CRDIN ROUTINE) READ ERROR 045 ON UNIT 001. JOB TERMINATED. /file 1 n($000:upd1.mfarc) /inc *com:mfchek units=1,names=t,info=f CHECKING FILE SYSTEM ARCHIVE UNITS= 1, 0 TAPFIL= 1 NFILES= 1 (CRDIN ROUTINE) READ ERROR 045 ON UNIT 001. JOB TERMINATED. Clearly it does not find the tape unit. Any suggestion ? (ps, I also tryed on Hercules using a copy od the disk, wit the update files in, with similar results ) |
Re: On aplying updates to Music 6.2
In addition to Rene's excellent advice which I'm sure will sort out the problem, when confronted with a MUSIC error number, I suggest: HELP ERRORS 3 which should give some meaningful text which may help explain the error. Regards, Peter Coghlan. |
On aplying updates to Music 6.2
Hi everyone ! With this covid bussiness, I'm stucked at home under querantine, so I'm bac with Music/SP environment. I was member od the original MUSIC/SP on yahoo, and mr René Ferland invited me to this group. Being back to the basic, I jave 2 systems up and running, version 6.2 (B), one on SIM390 version 17 and the other on Hercules, 64 bit. I also ran mr. Ferland's more complete system,. wit no problem. For a starting practice I decided to apply the updates mr. Dave Edwards left, so I downloaded the updates from internet, checked the MD signatures and FTPe'd to the virtual machine disk, wit no problem. Thing is than I'm trying to apply the first patch UPD1, and I'm getting some errors First I ran the mfarc file with error "045 file not found" Then I tryed,uUsing this script /INC *COM:MFREST IN=1,ALL=T,REPL=F,FIXUP=' ',LIST=T,SETUI=T I Get the following error: -- FILE RESTORE (MFREST) --
INPUT = 1 TAPFIL = 1 FIXUP=' ' CTLREC=T ALL=T RLSE=F REPL=F LIST=T SETUI=T SETBUP=F FIXUCR=F REPNWR=T (CRDIN ROUTINE) READ ERROR 045 ON UNIT 001. JOB TERMINATED. /file 1 n($000:upd1.mfarc) /inc *com:mfchek units=1,names=t,info=f CHECKING FILE SYSTEM ARCHIVE UNITS= 1, 0 TAPFIL= 1 NFILES= 1 (CRDIN ROUTINE) READ ERROR 045 ON UNIT 001. JOB TERMINATED. Clearly it does not find the tape unit. Any suggestion ? (ps, I also tryed on Hercules using a copy od the disk, wit the update files in, with similar results ) |
Re: is anybody here?
The programming facilities available on MUSIC/SP are/were mostly available on MVS and VM/CMS as well. Manuals for Assembler F, Fortran G, REXX etc on other platforms would be applicable to MUSIC/SP too. There may be some MUSIC specific details for these langauges in the online help on MUSIC, especially REXX as the I/O is different on MUSIC to the other platforms. Depends on what instructions you are looking at. I doubt there have been any changes to "production" Hercules 3.x that would affect using MUSIC/SP. I have patches for Hercules that enable the MUSIC/SP TCP/IP networking to (mostly) work when running under Hercules. You need to be able to build Hercules from source to use this, probably on Linux or some Unix variant. Regards, Peter Coghlan |
Re: is anybody here?
Mark,
I'm here. On Fri, Jun 12, 2020 at 11:31:49PM -0700, Mark Waterbury wrote: I see no messages posted in this list.I see 795 messages from this list, but I have my local archive from the old Yahoo list going back to 2004. What's going on?Not much. I can't remember how long it's been since I tried doing anything with Music. Actually I haven't done much with any OSes under Hercules lately. Most recently I've been exploring NOS under the DtCYBER emulator, and before that Multics under the DPS8/M SIMH emulator and PRIMOS under the Prime emulator. So many emulators and OSes, so little time. :-) -- Kevin Bruceville, TX What's the definition of a legacy system? One that works! Errare humanum est, ignoscere caninum. |
Re: is anybody here?
Rene |