Keyboard Shortcuts
Likes
- H390-MTS
- Messages
Search
|
Re: Anyone get PTR2 working
开云体育I hate to venture this, but – maybe you last line if you omit the Units part will work – not sure why you have that in there. Try: 000E????? 1403????? PRT2.txt ? See if that will start for you.? For fcb= and lpp= portions I have no knowedge of butit may just be the “Units/” that is causing your problem in the conf file. ? Dave ? From:
<[email protected]> on behalf of John Palmer <jpalmer@...> ? Has anyone gotten “PTR2” to work with any versioin of Hercules?? I’ve got 4.6 and have tried these settings: ? #000E 1403?? Units/PTR2.txt lpp=66 fcb=1:11,4:1,5:5,8:10,14:6,19:4,24:7,34:2,44:6,49:4,54:7,63:8,66:3 optprint # PTR2 000E 1403?? Units/PTR2.txt fcb=0111040105050810140619042407340244064904540763086603 #PTR2 #000E 1403?? Units/PTR2.txt nofcbcheck? # PTR2 #000E?? 1403?? Units/PTR2.txt???????????? # PTR2 ? But HASP won’t start the printer at all. ? Thanks |
|
Re: Anyone get PTR2 working
开云体育Yes, I have it working and it starts, but I can honestly say I use it, or to be more honest really know how to use it much.? It does work but I need a much better knowledge of MVS than I have to utilize it.?? It does however start just fine. I am using it as an Ip sockedev, and the IP address is due to my local configuration, it resides on a windows server utilizing hercprint, and the MVS instance is on a RaspberryPi running Linux. 000F????? 3211????? 172.30.0.181:3211 sockdev????????? #JES2 PRT2 ? For the primary printer I am using 000E????? 1403????? 172.30.0.181:1403 sockdev????????? #JES2 PRT1 ? If I can supply you any additional info I certainly will, but I honestly don’t have much and value the other members here that actually know what they are doing. ? Thanks, Dave ? From:
<[email protected]> on behalf of John Palmer <jpalmer@...> ? Has anyone gotten “PTR2” to work with any versioin of Hercules?? I’ve got 4.6 and have tried these settings: ? #000E 1403?? Units/PTR2.txt lpp=66 fcb=1:11,4:1,5:5,8:10,14:6,19:4,24:7,34:2,44:6,49:4,54:7,63:8,66:3 optprint # PTR2 000E 1403?? Units/PTR2.txt fcb=0111040105050810140619042407340244064904540763086603 #PTR2 #000E 1403?? Units/PTR2.txt nofcbcheck? # PTR2 #000E?? 1403?? Units/PTR2.txt???????????? # PTR2 ? But HASP won’t start the printer at all. ? Thanks |
|
Re: Anyone get PTR2 working
On Thu, Jun 29, 2023 at 08:14 PM, Fish Fish wrote:
A 1403 model printer does not use a FCB. Only 3203 and 3211 model printers use FCBs. Model 1403 printers use carriage control tapes:Now that you mention it, the definition below works fine with SDL Hercules 4.5 for me: 000E 3211 Units/PTR2.txt lpp=66 fcb=11:1,1:4,5:5,10:8,6:14,4:19,7:24,2:34,6:44,4:49,7:54,8:63,3:66 It will produce proper front/back pages. You might have to devise some mechanism to convert PTR2.txt to a PDF after a job, and reset it. In the past, I remember using a script to convert, and the HTTP server to reset. Cheers, Rene FERLAND, Montreal |
|
Re: Anyone get PTR2 working
John Palmer wrote:
Has anyone gotten "PTR2" to work with any versioin of Hercules?I don't know MTS, but I do know Hercules, and you're doing it wrong. A 1403 model printer does not use a FCB. Only 3203 and 3211 model printers use FCBs. Model 1403 printers use carriage control tapes: * * * * * Now whether that is causing your problem or not, I do not know. As I said, I don't know MTS! Sorry! I hope that helps some! P.S. Also, FWIW, in the SDL 4.x Hyperion version of Hercules, the 'nofcbcheck' option has been deprecated, and the 'optprint' option isn't supported at all. -- "Fish" (David B. Trout) Software Development Laboratories mail: fish@... |
|
Re: Anyone get PTR2 working
On Thu, Jun 29, 2023 at 07:10 PM, John Palmer wrote:
Has anyone gotten “PTR2” to work with any version of Hercules?? Yes, I have, both with Hercules 3.13 and SDL Hercules 4.5.
?
In my configuration file, I defined 00E as
?
00E 1403 1403 sockdev
?
to which I connect the virtual1403 program of Matthew Wilson:
?
https://github.com/racingmars/virtual1403
?
Once the IPL is finished (when message PEEK initialization complete appears), I type the following commands at the console:
?
hasp cold
mts *hsp
mts *las
$list 0
$release ex
%empty
?
I am not sure that virtual1403 produces the right spacing for the front/back pages, but the final output is quite satifying.
?
Cheers,
?
Rene FERLAND
? |
|
Anyone get PTR2 working
开云体育Has anyone gotten “PTR2” to work with any versioin of Hercules?? I’ve got 4.6 and have tried these settings: ? #000E 1403?? Units/PTR2.txt lpp=66 fcb=1:11,4:1,5:5,8:10,14:6,19:4,24:7,34:2,44:6,49:4,54:7,63:8,66:3 optprint # PTR2 000E 1403?? Units/PTR2.txt fcb=0111040105050810140619042407340244064904540763086603 #PTR2 #000E 1403?? Units/PTR2.txt nofcbcheck? # PTR2 #000E?? 1403?? Units/PTR2.txt???????????? # PTR2 ? But HASP won’t start the printer at all. ? Thanks |
|
Re: What changes were made to Assembler H to support MTS and can those be ported to, say Assembler G?
John,
toggle quoted message
Show quoted text
In that case move the files to be assembled to an environment where Java exists. Dave And to answer some other questions, Assembler H is discontinued as a product. The current product is the "High Level Assembler" which I assume is delivered as object code only so you cannot modify it. However, I believe it includes all the SLAC modifications:- As far as I know IBM never released anything, other than APL/360 which I don't believe was ever a program product. It is released with draconian licence restrictions so you can't distribute a modified version. Dave -----Original Message----- |
|
Re: What changes were made to Assembler H to support MTS and can those be ported to, say Assembler G?
Thanks for the info, Mike.
toggle quoted message
Show quoted text
Does IBM still have an "Assember H"? I see docs on their website for z/Architecture stuff that references "Assembler H". What version of "H" was the MTS version built off of? Has anyone asked IBM if they'll release that version for public consumption? Do they ever release anything? Thanks for the info on TCP/IP. I know that there is a TLNT Manager: - 00056 MTS 00059920 52 TLNT Manager HOST WMTS *TCM; But when I run *LAS, it says "No Telnet connections available". So, I'll wait for "d7.0". It would really be nice to get the Confer files, if someone could put them into an .AWS file. I'd be willing to try to get it working on d6.0. If I figure out how to get it working, I'll post notes here. I saw that Bon Parnes gave permission for this. I imagine that it’s just the files on user CNFR plus some hooks into the accounting system for the surcharge stuff. There aren't many of the old-timers still left. I think Tom Stevenson is still at WSU. We lost Lee Maschmeyer a few years ago (). He was a remarkable programmer who was blind from birth but still managed to master IBM assembler and worked at WSU for 43 years. John -----Original Message-----
From: [email protected] <[email protected]> On Behalf Of Mike Alexander Sent: Wednesday, June 7, 2023 00:11 To: [email protected] Subject: Re: [H390-MTS] What changes were made to Assembler H to support MTS and can those be ported to, say Assembler G? There are a number of interesting questions here, I'll see what I can do to answer some of them. Assembling parts of MTS with ASMG is not going to be easy, or even possible. There are other 370 assemblers that are closer to ASMH which might be a better starting point. There have been a number of discussions about this on various Hercules or MTS lists. The ASMH in MTS is about three generations removed from ASMG. First you have the extensive changes to the language IBM made. Then there are a number of changes made at Stanford University. The MTS version is based on the Stanford version with more changes. The update files in MTS go from the IBM version through all these changes to the MTS version. There are about 50 files containing well over 10,000 lines, probably at least twice that or more.. And tthe starting point (IBM ASMH) is only distantly related to ASMG. There is a list of all the changes to the language between the IBM and MTS versions of ASMH in MTS Volume 14 on page 18. It contains 27 items over 7 pages. Some are trivial, but some aren't, for example number 19 describes forward references on ORG statements which are used in a number of macros in MTS. The expression on an ORG statement can contain symbols not yetNumber 25 and 26 describe significant extensions to USING statements and the resolution of base/displacement values through them which are used extensively in MTS. These two points take up about 4 pages. This section of Vol 14 only describes language changes, not other changes such as the PEXIT parameter which is used to improve the printed listing. PISTLE is the Post IPL system loader. It loads code into shared VM during startup or later when run by a system programmer. It is not related to RAMROD. There is a command macro to invoke it somewhere, perhaps in MTS:CMDMACLIB. During startup it is invoked from *S2L. Installing something loaded by PISTLE simply means copying the new object to whatever file *S2L loads it from. PISTLE is related to the NAS loader which loads things into Named Address Spaces. NASes are preloaded segments of storage which can be attached to MTS tasks as required. For example ASMH is loaded into a NAS and *ASMH is a small driver program which attaches the NAX and calls it. I think these existed in D6, they are used extensively in the 1996 system. D6 doesn't have working IP support, the Internet was pretty new in 1988. As a side note it was sometime in 1989 that I put the first IP packets on an ethernet at the University of London, somewhat to the consternation of the local network support folks who thought that TCP/IP would swamp the ethernet and were surprised when it didn't The 1996 system has decent support for the Internet as it existed then (i.e. no encryption of any sort). This requires changes to Hercules which are almost done. I hope this helps a bit. Mike On 5 Jun 2023, at 22:09, John Palmer wrote: Just wondering what changes were made to Assembler-H to make it |
|
Re: What changes were made to Assembler H to support MTS and can those be ported to, say Assembler G?
I don't think anyone ever ported Java to MTS.
toggle quoted message
Show quoted text
It would be hard because the class layout in Java (i.e. "com.abc.package1.package2.class") requires a directory structure and MTS is "flat". I know there was the beginning of a design to implement a hierarchical directory system in MTS, but it never went anywhere. One funny note about that subject is that there was a whole Confer item where people debated endlessly about what the directory separator character should be ( ":", "/", "\", etc). More words were generated on that one point than on any other design aspect ? -----Original Message-----
From: [email protected] <[email protected]> On Behalf Of Dave Wade Sent: Wednesday, June 7, 2023 15:27 To: [email protected] Subject: Re: [H390-MTS] What changes were made to Assembler H to support MTS and can those be ported to, say Assembler G? Mike, Rather than mess with one of the assemblers running on the "Mainframe" would it be easier to modify the Z390 assembler which is written in Java and runs on any environment with java? Dave -----Original Message----- |
|
Re: What changes were made to Assembler H to support MTS and can those be ported to, say Assembler G?
Mike,
toggle quoted message
Show quoted text
Rather than mess with one of the assemblers running on the "Mainframe" would it be easier to modify the Z390 assembler which is written in Java and runs on any environment with java? Dave -----Original Message----- |
|
Re: What changes were made to Assembler H to support MTS and can those be ported to, say Assembler G?
There are a number of interesting questions here, I'll see what I can do to answer some of them. Assembling parts of MTS with ASMG is not going to be easy, or even possible. There are other 370 assemblers that are closer to ASMH which might be a better starting point. There have been a number of discussions about this on various Hercules or MTS lists. The ASMH in MTS is about three generations removed from ASMG. First you
have the extensive changes to the language IBM made. Then there are a
number of changes made at Stanford University. The MTS version is based
on the Stanford version with more changes. The update files in MTS go
from the IBM version through all these changes to the MTS version. There is a list of all the changes to the language between the IBM and MTS versions of ASMH in MTS Volume 14 on page 18. It contains 27 items over 7 pages. Some are trivial, but some aren't, for example number 19 describes forward references on ORG statements which are used in a number of macros in MTS.
Number 25 and 26 describe significant extensions to USING statements and the resolution of base/displacement values through them which are used extensively in MTS. These two points take up about 4 pages. This section of Vol 14 only describes language changes, not other changes such as the PEXIT parameter which is used to improve the printed listing. PISTLE is the Post IPL system loader. It loads code into shared VM
during startup or later when run by a system programmer. It is not
related to RAMROD. There is a command macro to invoke it somewhere,
perhaps in MTS:CMDMACLIB. During startup it is invoked from *S2L. PISTLE is related to the NAS loader which loads things into Named Address Spaces. NASes are preloaded segments of storage which can be attached to MTS tasks as required. For example ASMH is loaded into a NAS and *ASMH is a small driver program which attaches the NAX and calls it. I think these existed in D6, they are used extensively in the 1996 system. D6 doesn't have working IP support, the Internet was pretty new in 1988. As a side note it was sometime in 1989 that I put the first IP packets on an ethernet at the University of London, somewhat to the consternation of the local network support folks who thought that TCP/IP would swamp the ethernet and were surprised when it didn't The 1996 system has decent support for the Internet as it existed then (i.e. no encryption of any sort). This requires changes to Hercules which are almost done. I hope this helps a bit. Mike On 5 Jun 2023, at 22:09, John Palmer wrote:
|
|
What changes were made to Assembler H to support MTS and can those be ported to, say Assembler G?
开云体育Just wondering what changes were made to Assembler-H to make it support MTS and could those be ported to Assembler-G.
Are there any other assemblers that work on MTS that could be modified easier? ? I got a bunch of rates stuff assembled successfully with Assembler G after modifying some of the macros.? The final piece is RNBRSUB. I wrote a local copy with my own billing classes, but it Has a bunch of includes that I have to restore from the distribution tapes.? Not sure there are landmines in there. ? Comments in RNBRSUB say it can be installed with Pistle, which I assume is a way to hot-swap system components without an IPL. Is there some documentation on this? To install it permanently, I assume I use RAMROD.
On TCP/IP – are there any Telnet connections configured in the d6.0A TABLES?? If I use Mike Alexander’s current code, will I be able to test out internet stuff with d6.0A? ? Anxiously awaiting d7.0, especially Confer. ? |
|
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 |
René Ferland
Marco Antoniotti