Keyboard Shortcuts
Likes
- H390-MTS
- Messages
Search
A bit of info on Rates
开云体育I know some people were poking around with rates. ? After digging extensivly, I discovered that you cannot have a rate for terminal time that is less than 3.6 cents per hour. ? In the W013 (Engler) code, RATEGEN claims that terminal time is represented in $/hr * 1000, so to specify $2/hr, I would enter 2000 (decimal) as the first rate element. ? However…. MTS has another idea when it uses those rates. ? Bottom line – it takes the value you specify and divides it by 36. If you specify less than 18 decimal, you always get zero. ? Anything over that? - it adjusts to the nearest 3.6 cents per hour. ? Relevant code from GETRATES#SA: ? repeat when Cvttbl(J) < 0;???????????????????????????? Cost := Ratefile_Rates(K) + Ratefile_Rates(K + 1) +??? ???Ratefile_Rates(K + 2);????????????????????????????? if Cost > 0??????????????????????????????????????????? then?????????????????????????????????????????????????? ???variable Long_Cost is bit(64),??????????????? ?????? ??????Remainder is bit(32);??????????????????????????? ???Multiply_Long_Integer(Cost, Cvttbl(J), Long_Cost);? ???Divide_Long_Integer(Long_Cost, Cvttbl(J + 1), Cost, ??????Remainder);????????????????????????????????????? ???Remainder *:= 2;??????????????????????????????????? ???if Remainder >= Cvttbl(J + 1)?????????????????????? ???then??????????????????????????????????????????????? ??????Cost +:= 1;??????????????? /* Round */?????????? ???end if;????????????????????? ??????????????????????? end if;???????????? ? The Cvttbl is an integer array – for each rate element, the first one is a Muliplication factor, the second one is what you divide the rate by. ? For TT (terminal time) – it multiplies by 1 and divides by 36. ? So, If I specify 10 (what I think should be a penny per hour), it: ? Takes 10 * 1 = 10 ? Then 10 / 36 (integer divide) and gets 0 with a ?remainder of 10. ? If I multiply that by 2, it comes out to 20 which is less than 36 so the rate gets forced to 0. ? So, it converts the rate you gave it to that rate / 36 and then supposably later, multiplies it by 36 again, but it make the rate a multiple of $0.036 / hr ? Not sure what the meaning of this code is, but bottom line: ? No TT rate < ?$0.036 / hr AND ? All rates are forced to be a multiple of $0.036 / hr for terminal time. ? My next question is:? When I log on, Log off or say $DISPLAY COST, it says “No Charges”, which isn’t true since, if I? have rates and a MAXCHG > 0 on my ID, I get charged. ? What controls this “No Charge” message and what does it really mean. Rich accounts can always sign on, but ARE charged, that is, if they have a MAXCHG > $0.0. ? Probably too much deep geek for most people…. ? ? ?????????????????????????????????? |
Re: Which Hercules version for d7.0?
开云体育Off topic I know, but running MTS under Hercules and getting a week of uptime probably pretty much matches the real mainframe experience. At UBC the maximum uptime was something like 7 days when the system shutdown to clients ?for a total (weekly) file save followed by an IPL.?
|
Re: Which Hercules version for d7.0?
Hi
I do not know any detail, but I understand the issues, which have been reported before here. I can just tell you that I have been running 6.0a on SDL Hercules/Hyperion 4.5 on a W11 machine with no apparent problems, at least in a short time frame (between IPL and shutdown).? I have no experience on Linux. I guess the best thing to do is to post this issue on the Hercules forum and see what the people there (mostly Fish) say.? If I remember correctly a rather obscure bug was discovered and fixed in 4.5 a couple of months ago. All the best Marco |
Re: Which Hercules version for d7.0?
开云体育MTS requires special code because of how it interfaced with the internet. It used specialized hardware. ?Work is being done to add support into Hercules for this hardware. Other systems can already use networking with Hercules, MTS cannot yet do this. ? The work is being done as part of the release of the last MTS version that was in use before U of M shut it down. This is being called ‘d7.0’. ? The issue I had with Hercules 4.5 is that MTS would crash anywhere from 2 minutes to a week after IPL. It may be my combination of OS (Linux), gcc compiler, etc. ? My question was to determine if the networking changes were already checked in to the current (4.6?) version of Hercules.? If so, I was going to download that onto a CentOS 9 vm to see if it had the crash problem. ? From: [email protected] <[email protected]> On Behalf Of Marco Antoniotti
Sent: Sunday, April 9, 2023 04:30 To: [email protected] Subject: Re: [H390-MTS] Which Hercules version for d7.0? ? ... AFAIK, SDL 4.5 has all the necessary socket support.? FTP runs on MVS3.8j for example. |
Which Hercules version for d7.0?
开云体育In preparation for d7.0, I was wondering which version of Hercules has the mods to allow networking (FTP, Telnet, etc)?? ? Mike, I know you mentioned that you had to check in changes. ? I still can’t get d6.0 to work with Hercules 4.5 – it super-dumps from 30 seconds to 1 week after IPL. ? I may upgrade to CentOs 9 and all of the latest utilities. My VM machine is CentOs 7.0. ? John |
Question about Rates: Editing Rates and Testing with Rates Enabled
开云体育Does anyone know what tool can be used to look and edit the system rates in *RATEFILE? ? Is there a document that describes the format of the file? ? I would like to experiment with setting different rates. Is there anything else that I need to do to turn on real rates? ? I’m also not sure I understand the difference between IDR number , University Account Number and Unit code. Do any one of those provide a key value into rates? There isn’t much descriptive info on these in the ACCOUNTING documentation, other than that these three are apparently integers.? Also, when I create new ID’s, ACCMAINT sometimes barks at me about the “Account Number appears to be Invalid”.? I assume that ACCMAINT has some hard coded relationship between the 1st letter of the ID and an allowable account number. ? Also, interesting that the BLOCK=xxxx parameter on ACCMAINT can only be used with IDs that start with certain letters. I assume this is some sort of U of M business office convention. ? ? Also, I know at WSU, they excluded all of the vowels as being allowed as the 2nd, 3rd and 4th character of the IDs, whereas it looks like the U of M convention was to just exclude I’s and O’s (so as not to mix them up with the numerals 0 and 1). ? Thanks John |
Re: archive.michigan-terminal-system.org seems to have been deleted from Google Sites...
开云体育Yup – just wanted to alert someone in case something was deleted by accident. ? From: [email protected] <[email protected]> On Behalf Of Mark Waterbury
Sent: Thursday, March 9, 2023 19:36 To: [email protected] Subject: Re: [H390-MTS] archive.michigan-terminal-system.org seems to have been deleted from Google Sites... ? You can always use the Internet Wayback machine at archive.org ... |
archive.michigan-terminal-system.org seems to have been deleted from Google Sites...
开云体育Looks like the archive site is gone, unless I am using the wrong URL… |
Re: Question about the availability of several things
sir, I would very interested, if possible. Thank you tom c On Mon, Mar 6, 2023 at 11:15?AM John Palmer <jpalmer@...> wrote:
|
Re: Question about the availability of several things
开云体育If you guys want anyone to test Confer out on 6.0, I can do so if someone can copy the files into an .AWS tape file. ? From: [email protected] <[email protected]> On Behalf Of Mike Alexander
Sent: Sunday, February 26, 2023 16:09 To: [email protected] Subject: Re: [H390-MTS] Question about the availability of serveral things ? Most of these issues would be addressed by a release of the 1996 system (maybe D7.0). You're more or less right about the status of various pieces of software. PascalJB would be easy to install, but Confer requires a bit more work since it requires various userIDs and files in obscure locations. I know that Jeff Ogden has looked into this and thinks it is possible, but it hasn't been done. There is no interest in MTS at UM and no one is running or studying it officially. Most people aren't aware that it existed. I don't know if there is any interest in Software Archaeology here. A couple of years ago I gave a short talk in Newcastle about the history of MTS. I know the CS department there has a significant interest in the history of IT. II was impressed that the Mayor of Newcastle attended, complete with his regalia, and said he remembered using MTS when he aws a student at Newcastle. Thanks for nudging me about the 1996 system. I really want to get that done but I have a few higher priority things to clear up first. Mike On 26 Feb 2023, at 15:15, John Palmer wrote:
|
Re: Question about the availability of several things
Drew Derbyshire
Does the LCM even exist anymore? iIRC, the folks who control the Allen estate used COVID as an excuse kill off all of Paul's passion projects including the the LCM and the Seattle Cinerama theater. As near I can tell, the division is dormant, not dead. Various news reports have pointed out the estate is to be disposed of with the profits going to Paul Allen's passion projects (???), but for example one does not run randomly a yard sale at Lumen Field to turn the Seahawks into cash.? And in fact, the estate needs to hold on to to the team for another year:? The LCM+L does have a skeleton staff (I'm not part of it) and many systems (some emulated) are accessible by "ssh?menu@..." Your friendly 4361 valet, -ahd- p.s. my standard disclaimer: (All together now …) I do not work for the LCM+L and I do not speak for them. |
Re: Question about the availability of several things
开云体育Thanks – found it. Works great – searching the system for documentation. I need to know how to call system subroutines from Pascal. ? I know that with *PascalVS, ?you declared them as “Fortran” instead of “External” to make it use the proper calling convention. Not sure what the syntax is for UBC Pascal. ? John ? From: [email protected] <[email protected]> On Behalf Of Rob Ballantyne
Sent: Monday, February 27, 2023 17:41 To: [email protected] Subject: Re: [H390-MTS] Question about the availability of several things ? I think you can find UBC Pascal (which I recall using as an undergraduate in the early 1980s) in the UNSP: directory.? I don't have my MTS running currently but UNSP:PAS.BC seems familiar. ? Rob ? On Mon, Feb 27, 2023 at 12:22 PM John Palmer <jpalmer@...> wrote:
|
Re: Question about the availability of several things
Well, Vulcan is still managing an instance of Hercules...that's about it. I'm told the collection is safe, for the time being. But given that the aircraft museum was sold off, that doesn't bode well for the hardware at LCM.
toggle quoted message
Show quoted text
-Dave On 2/28/23 11:20, Michael Kerpan wrote:
Does the LCM even exist anymore? iIRC, the folks who control the Allen estate used COVID as an excuse kill off all of Paul's passion projects including the the LCM and the Seattle Cinerama theater. --
Dave McGuire, AK4HZ New Kensington, PA |
Re: Question about the availability of several things
Does the LCM even exist anymore? iIRC, the folks who control the Allen estate used COVID as an excuse kill off all of Paul's passion projects including the the LCM and the Seattle Cinerama theater. Mike On Tue, Feb 28, 2023, 10:55 AM Drew Derbyshire <swhobbit@...> wrote:
|