CPU Model Instruction set 6
Hi guys Does Hercules “respect” the instruction set that is present in each CPU Model? I.e: May I run a program with the newest instructions in an older model like 9672? TIA João -- att. João
Розпочато João Reginato @ · Останніх @
TK5 on Linux Ubuntu 24.04 ? 4
Hello Folks I have been running TK4 andTK5 on Windows for some years (TK4) without any real issues. This week I have been trying to get TK5 U3 to work on the latest Linux LTS Ubuntu Desktop 24.04 (I have also used Ubuntu for quite a while). During MVS IPL though I am getting reams of error messages on the console along the lines of: 11:45:15 HHC01023W Waiting for port 3270 to become free for console connections 11:45:15 HHC01003W 0:068E COMM: waiting 5 seconds for port 27417 to become available Needless to say I can't connect a localhost 3270 session to the instance either. I also tried TK4 and that is giving similar errors. I think it maybe a host (Linux) permission/security issue, anyone got any light to shine on this? Regards Neil
Розпочато Neil Miller @ · Останніх @
COBOL help iterating dataset member. 38
Hi folks. I'm on Tk5, and I'm trying to learn how to mess with dataset member records from COBOL. After some early successes on getting the compiler happy with accesing the dataset member itself (which has not been straightforward either) I'm getting to the point where I can't progress any longer. Now I'm just trying to simply print 'hello world' on output as a 'proof of iteration', while trying a PERFORM loop on the records of a member. The compiler COB step ends with code 0004 (LKED and GO got both 0000), and a pair of IKF warning error cards are printed (which I'm unable to find on any IBM book around) and the program just does nothing: IKF1043I-W END OF SENTENCE SHOULD PRECEDE END OF PROGRAM . ASSUMED PRESENT. IKF4072I-W EXIT FROM PERFORMED PROCEDURE ASSUMED BEFORE PROCEDURE-NAME . While the actual code looks like this: 000-ITERATE. OPEN INPUT IPBLKFILE. READ IPBLKFILE AT END MOVE HIGH-VALUES TO IPBLKDETAILS PERFORM 001-DISPLAY UNTIL IPBLKDETAILS = HIGH-VALUES CLOSE IPBLKFILE. STOP RUN. 001-DISPLAY. DISPLAY HELLO-CONST UPON CNSL. READ IPBLKFILE AT END MOVE HIGH-VALUES TO IPBLKDETAILS I'm really struggling with finding whether periods and closing statements such as END-READ, etc, have to be in place around (fought my way to here often by sheer try/error) since the 70s compiler on MVS seems to be quite different to most information I'm finding googling around. But now nothing seems to work. So I feel I'm missing semething else here. Any clues? Thanks.
Розпочато Alejandro olivan Alvarez @ · Останніх @
Private: Re: [H390-MVS] COBOL help iterating dataset member.
Ops, the right form is: If a=b Display a Else Display B. Exit-if. Exit. De: H390-MVS@groups.io <H390-MVS@groups.io> Em nome de João Reginato via groups.io Enviada em: quarta-feira, 10 de julho de 2024 18:28 Para: H390-MVS@groups.io Assunto: Re: Private: Re: [H390-MVS] COBOL help iterating dataset member. Prioridade: Baixa The suggestion was something like this: If a=b Display a Else Next sentence. But I think it won’t solve the warning msg. Case it is the last sentence in your code, you may add an “exit”. If a=b Display a Else Display B. Exit. -- att. João -- att. João
Розпочато João Reginato @
Private: Re: [H390-MVS] COBOL help iterating dataset member.
The suggestion was something like this: If a=b Display a Else Next sentence. But I think it won’t solve the warning msg. Case it is the last sentence in your code, you may add an “exit”. If a=b Display a Else Display B. Exit. -- att. João
Розпочато João Reginato @
File Notifications #file-notice
The following files and folders have been uploaded to the Files area of the H390-MVS@groups.io group. /1974_July 3_DPD Program Announcement_OS VS2 Release 2_5752-VS2_f6 MVS.pdf By: Mark Waterbury <mark.s.waterbury@...> Description: 50 years ago this month, MVS (OS/VS2 Rel. 2) was first announced. The following files and folders have been uploaded to the Files area of the H390-MVS@groups.io group. /Evolution of the MVS Operating System.pdf By: Mark Waterbury <mark.s.waterbury@...> Description: IBM Journal of Research & Development, September 1981 article describing the history and evolution of the IBM flagship mainframe OS.
Розпочато Group Notification @
File /MVS-SU Status 5-17-78 .pdf uploaded #file-notice
The following files and folders have been uploaded to the Files area of the H390-MVS@groups.io group. /MVS-SU Status 5-17-78 .pdf By: Mark Waterbury <mark.s.waterbury@...> Description: Summary of SUs available for MVS as of May 17, 1978. (a bit of MVS history)
Розпочато Group Notification @
Running 2 MVS under the same Windows 13
Hi How can I run 2 MVS under the same windows? Should I use 2 loopback adapters as different gateways? Is it possible? TIA João -- att. João
Розпочато João Reginato @ · Останніх @
Configuring a card reader 6
Hello, I want to add a card reader to OS/390 ADCD 2.10, working akin to what I'm used to from TK4-. For that I compared TK4- SYS1.JES2PARM(JES2PARM) to SYS1.ADCD10.PARMLIB(JES2PARM) and I'm lost because both files look very different. Google searches yielded nothing helpful (to me). May I kindly ask for a step by step advice how to add a card reader? I would really appreciate to postpone the indirection of learning how to configure JES2 to a later point in time. Thank you! Note: I have already added the definition in hercules.cnf (copied from TK4- configuration), with the TCP port incremented so the number is unique again. :wq! PoC
Розпочато Patrik Schindler @ · Останніх @
TSO TEST command on MVS TK5 6
Hi, I'm trying to use TEST to debug a simple assembler language program. TEST's LIST sub-command doesn't work. Is this a known problem? I can share my source code and the JCL I'm using to assemble the program if that word be useful. Mike KB2GHZ
Розпочато kb2ghz@... @ · Останніх @
REVEDIT Help 7
Hello all, I try to set the syntax coloring in REVEDIT, but do not know the relevant command (HILITE does not work). The HELP in REVEDIT shows only the first page. If I select say the item LINE COMMANDS, the mask is closed. My questions: - which command can I use for the syntax coloring? - why I can't select a menu item in HELP (see above)? - is there any (Web...?) documentation for the REVEDIT (as well for the REVIEW)? Thanks
Розпочато Gabor Markon @ · Останніх @
help with restoring a dasdi dump/restore tape 19
I have a file, fairly old, that looks like it is a DASDI dump restore tape. It is clearly an EBCIDIC tape. I am not even sure what is on it as I probably received this in the late 1990's. I would like to restore it, if possible. I'm guessing it is a dump of a 3330, but I don't know an do not know enough about the format of a DASDI dump/restore tape to figure it out. Also I'm not sure what format it is in as the filetype says TAP. So, how do I mount this on Hercules? Just like any other tape (het or aws) or something else. I'm presuming that once I get it mounted TAPEMAP will help me figure out what is on it and what DASD volume type I need to restore it. If it is a DASDI dump tape, I guessing I can just IPL from it and restore it to DASD as I would have years ago, but that may not be a correct/best approach in this instance. Guidance will be appreciated. By the way here is a png of the first part of the file. Thanks, - Mark
Розпочато mspitz@... @ · Останніх @
Using CBT Tape in particular the LISP CBT 476 issue 7
Short version: is the CBT 476 corrupted or there is a job to extract further, so that these PDS members of CBT429.FILE476 (such as MACLIB, CNTL,... etc.) is generated as library for me to use as LISP program and JCLLIB etc. ---- Longer version on accessing CBT tape mostly but NOT CBT 476 on Lisp: After 10 years (last time I found I am asking for this in a yahoo group!), I finally see some CBT tapes and hence for most it seems to work as follows: 1. Under TK5 update 3, you download the dasd and then follow the instruction to override the related .conf (by zip -o) 2. Then after running TK5 3. modify and submit the job as recommended (Strangely the ISPF cc-cc cut can cut to the clipboard but cannot insert ... hence have to retype some JCL). 4. All ok and catalog 5. ISPF =3.4 CBT429 6. Found all the CBT tape mostly work (in the sense you can see allocation result of them) 7. some of these have no allocation info and if you s it it got error and if you e it it will say dataset not on catalog 8. But for 476, it does have allocation info and one can get into it by e i.e. CBT429.FILE476(@FILE476) is readable 10. Now what to do next? In some other PDS I browse they are just some JCL, source etc. But the other files here are odd e.g. CBT429.FILE476(CNTL): CBT429.FILE476(MACLIB) ... many of these file names under this PDS seems to be itself also a library as well. 11. For this tape is there another step I need to run to extract these "libraries" into proper libraries. 12. I must have missed one tool or one JCL somewhere to extract these:
Розпочато kwccoin@... @ · Останніх @
MVS 3.8 TK5 Shutdown 6
Hello everyone! I'm running the fairly new TK5 release 3 under HercGUI version 1.19.0.5966. I've tried both the recommended "/f bsppilot,shutnow" as described in the TK5 Introduction and User Manual and the "s shutdown" command issued from the MVS console. Both begin the shutdown process but stops at IST127I SNASOL STILL ACTIVE- VTAM TERMINATION WAITING IST127I JRP STILL ACTIVE- VTAM TERMINATION WAITING and the system waits. What is the proper way to shutdown MVS and get "$HASP000 ALL AVAILABLE FUNCTIONS COMPLETE" so I can quiesce and terminate my system?
Розпочато Jim Snellen @ · Останніх @
MVS 38J JES2 Spool Unload/Reload
The public domain version of MVS 3.8J does not contain a utility to offload and reload the JES2 spool. I quickly looked at the CBTTAPE.org site and did not find any compatible solutions for 38J. Have any of you folks written such a utility for MVS 3.8J? Any pointers will be appreciated. Let me know if I missed something....?? Thanks in advance, Larry Belmontes
Розпочато Larry Belmontes @
Message HHC01448S Config file 12
Hi When I use the path “d:/mvs” in my Hercules config file definitions, it works fine. But when I use “d:/mvs_vxry” it crashes as shown in the log below I was lost and finally I tried to change the path and fortunately it worked. The message is weird “20:09:27 HHC01448S Config file[1] D:/MVS_VxRy/Parms/config.cnf: missing device number or device type” Because all devices are there. João 20:09:27 HHC00100I Thread id 00000b9c, prio 5, name 'impl_thread' started 20:09:27 HHC00100I Thread id 00001bec, prio 4, name 'logger_thread' started 20:09:27 HHC01413I Hercules version 4.6.0.10941-SDL-g65c97fd6 20:09:27 HHC01414I (C) Copyright 1999-2023 by Roger Bowler, Jan Jaeger, and others 20:09:27 HHC01417I ** The SDL 4.x Hyperion version of Hercules ** 20:09:27 HHC01415I Build date: Jun 8 2023 at 15:48:12 20:09:27 HHC01413I Hercules version 4.6.0.10941-SDL-g65c97fd6 20:09:27 HHC01414I (C) Copyright 1999-2023 by Roger Bowler, Jan Jaeger, and others 20:09:27 HHC01417I ** The SDL 4.x Hyperion version of Hercules ** 20:09:27 HHC01415I Build date: Jun 8 2023 at 15:48:12 20:09:27 HHC01417I Built with: Microsoft Visual Studio 2008 (MSVC 150030729 1) 20:09:27 HHC01417I Build type: Windows MSVC AMD64 host architecture build 20:09:27 HHC01417I Modes: S/370 ESA/390 z/Arch 20:09:27 HHC01417I Max CPU Engines: 64 20:09:27 HHC01417I Using shared libraries 20:09:27 HHC01417I Using Fish threads Threading Model 20:09:27 HHC01417I Using Error-Checking Mutex Locking Model 20:09:27 HHC01417I With Shared Devices support 20:09:27 HHC01417I With Dynamic loading support 20:09:27 HHC01417I With External GUI support 20:09:27 HHC01417I With Partial TCP keepalive support 20:09:27 HHC01417I With IPV6 support 20:09:27 HHC01417I With HTTP Server support 20:09:27 HHC01417I With sqrtl support 20:09:27 HHC01417I With Signal handling 20:09:27 HHC01417I With Watchdog monitoring 20:09:27 HHC01417I With CCKD BZIP2 support 20:09:27 HHC01417I With HET BZIP2 support 20:09:27 HHC01417I With ZLIB support 20:09:27 HHC01417I With Regular Expressions support 20:09:27 HHC01417I With Object REXX support 20:09:27 HHC01417I Without Regina REXX support 20:09:27 HHC01417I With Automatic Operator support 20:09:27 HHC01417I Without National Language Support 20:09:27 HHC01417I With CCKD64 Support 20:09:27 HHC01417I With Transactional-Execution Facility support 20:09:27 HHC01417I With "Optimized" instructions 20:09:27 HHC01417I With OPTION_USE_SKAIP_AS_LOCK 20:09:27 HHC01417I With OPTION_SIE2BK_FLD_COPY 20:09:27 HHC01417I Machine dependent assists: cmpxchg1 cmpxchg4 cmpxchg8 cmpxchg16 hatomics=msvcIntrinsics 20:09:27 HHC01417I Running on: DESKTOP-R22K5RK (Windows-6.2.9200 Intel(R) x64) LP=4, Cores=2, CPUs=1 20:09:27 HHC01417I Built with crypto external package version 1.0.0.52-ga5096e5 20:09:27 HHC01417I Built with decNumber external package version 3.68.0.102-g3aa2f45 20:09:27 HHC01417I Built with SoftFloat external package version 3.5.0.105-g4b0c326 20:09:27 HHC01417I Built with telnet external package version 1.0.0.63-g729f0b6 20:09:27 HHC00018W Hercules is NOT running in elevated mode 20:09:27 HHC00007I Previous message from function 'impl' at impl.c(1192) 20:09:27 HHC02323W This build of Hercules has only partial TCP keepalive support 20:09:27 HHC00007I Previous message from function 'impl' at impl.c(1238) 20:09:27 HHC00150I Crypto module loaded (C) Copyright 2003-2016 by Bernard van der Helm 20:09:27 HHC00151I Activated facility: Message Security Assist 20:09:27 HHC00151I Activated facility: Message Security Assist Extension 1, 2, 3 and 4 20:09:27 HHC17531W REXX(OORexx) dlopen 'rexx.dll' failed: Não foi possível encontrar o módulo especificado. 20:09:27 HHC00007I Previous message from function 'OORexxLoad' at hRexxapi.c(1340) 20:09:27 HHC17511E REXX() Could not enable either Rexx package 20:09:27 HHC00007I Previous message from function 'Enable' at hRexx.c(515) 20:09:27 HHC17511E REXX() Could not enable default Rexx package 20:09:27 HHC00007I Previous message from function 'InitializeRexx' at hRexx.c(262) 20:09:27 HHC17500I REXX() Mode : Command 20:09:27 HHC17500I REXX() MsgLevel :
Розпочато João Reginato @ · Останніх @
JES2 modification 3
I have developed and tested a modification for the JES2 output writer that issues a devinit command to Hercules for each print data set which splits up the output for printer and punch devices. I am not a system programmer but am good with assembler language. As a result I have no idea how to turn this coder into a usermod for general use. Entries look like If anyone is interested. I am more than willing to share this code. The code was developed from the system generated by Jay Maynard's excellent sysgen instructions. -- J. R. Michael Wegemer Mississauga ON, Canada -- J. R. Michael Wegemer Mississauga, ON
Розпочато Michael Wegemer @ · Останніх @
MVS 3.8j Master Console 7
Good afternoon. I am trying to use a 3278 model, 4 definition for my master console. The manual GC26-3792-8_OS_VS2_System_Generation_Reference_Release_3.8_Oct80 says that I can specify a 3278 model 4 (figure 8 part 2 of 2 on page 29) but when I try that I get an mnote saying that it is invalid. CONSMST CONSOLE C MCONS=010, C ALTCONS=009, C AREA=04, C PFK=12, C ROUTCDE=ALL MSTCONS IODEVICE C UNIT=3278, C MODEL=4, C ADDRESS=010, C FEATURE=(EBKY3277,DOCHAR,KB78KEY,AUDALRM,NUMLOCK, C SELPEN,PTREAD) * 73+ 5,* * * IEIIOD101 MSTCONS-UNIT VALUE 3278 INVALID Can someone please direct me to where I have gone wrong? Thanks -- J. R. Michael Wegemer Mississauga ON, Canada -- J. R. Michael Wegemer Mississauga, ON
Розпочато Michael Wegemer @ · Останніх @
set date and time on MVS-TK5 5
Okay, this is probably a stupid question, my I am very, very out of date. I left the MVS world in the early 1990's and remember that we used to set the date/tome with SYS1.PARMLIB(CLOCKnn). There is no CLOCKnn member in SYS1.PARMLIB in TK5. I am in California and it looks to me like the MVS clock is set to GMT or close to that. As I said it has been decade since I did any MVS system programmers type stuff. Can anyone tell me how to set the time/date on TK5? The SET CLOCK command will only take a two digit year. +
Розпочато mspitz@... @ · Останніх @
MVS 3.8J Turnkey 5 Update-3 announced. 8
Hi Folks, Today on the 57th birthday of our Dutch king I am pleased to announce the third update of MVS 3.8J Turnkey 5. This update contains many new components and a huge amount of changes. The summary of updates are: Larry Belmontes has developed a Tutorial for ISPF. This tutorial, LBTUTOR, can be accessed via ISPF option T. The installed REVIEW panels have been converted to ISPF 2.2 format. ISPF option 3.6 now provides a Hardcopy function (CPRT36). The TSO command TSOEXEC is now available. TSOEXEC was introduced with the TSO/E Program Product not available for TK5 users. To provide the same functionality for TK5 users Rob Prins has developed the TSOEXEC command. The purpose of TSOEXEC is to execute authorized TSO command processors in a non-authorized environment. The only restriction is that the TSO user should have access to resource SVC244 in the FACILITY class. If no security product is installed, then access is always granted. Usermod RP00003 has been applied to SVC 24 so that the device information returned by DEVTYPE now provides the correct number of cylinders for the various models of 3380 and 3390 DASD devices. See the document: “TK5 Usermod Directory”. Hercules has been upgraded from 4.6 to 4.7. Only the Windows 64 and Linux 64 binaries are upgraded. The bug in LOGON (,)APPLID=xxxxxxxx in ETHLOGVM has been resolved with a rework of usermod ZBP0002. SYS1.TK5.INSTALL.CNTL has been moved from TK5RES to TK5001 and renamed to TK5.INSTALL.CNTL to better reflect its purpose in providing the installation JCL used to install the packages on the TK5001 and TK5002 volumes. ISPF option 3.7.V package DVTOC updated to V1R0M03 to fix an ABEND0C4 when running authorized. Ed Liss has upgraded his MAP3270 package from 3.1.0 to 3.2.1. Bob Polmanter has upgraded NJE38 from 242 to 250. The most significant update is the MEMBERS keyword in the TRANSMIT command. With RECEIVE you can replace members in an existing partitioned dataset. Package BREXX/370 has been updated from V2R5M2 to V2R5M3L01. Rob Prins has updated RPF from V1R9M6 to V1R9M7. See RPF option 7.5 for a summary of the changes. Greg Price has updated Review 50.4 to 51.2. SPY full screen display of 3270 system console screens has been upgraded to support all terminal sizes. TK5 Introduction and User Manual page 5 PDS command package upgraded from 8.6.20.0 to 8.6.22.0. An I/O device system generation has been performed to include the following :- o 16 CTCs at unit addresses 700-708 and 710-717 o 16 CTCs at unit addresses 800-808 and 810-817 o 32 non shared 3380 DASD at unit addresses 1E0-1EF and 2E0-2EF o 32 non shared 3390 DASD at unit addresses 1F0-1FF and 2F0-2FF The 3390 DASD WORKnn volumes now have a use attribute of PUBLIC instead of STORAGE for standardized allocation of permanent data sets. ZP60009, a usermod essential for the successful operation of full screen TSO/VTAM applications, and with a long history of rework, has again been reworked by Greg Price. Some issues were found with 3270 data stream processing for large 3270 screens. Greg stated: “It's taken 21 years, but this time for sure!” From a suggestion by Volker Bandke, the initial CLIST ISPLOGON is updated and the (B)REXX exec $CONCAT is added. OS/360 Sort/Merge for MVS 3.8 updated to Version 1.03 to increase the seven digit record count fields in information messages to eleven digits. HTTPD server is upgraded from 1.0 to 2.0.0 Please download MVS-TK5 Update-3 or the complete MVS-TK5 system with Update-3 included from: https://www.prince-webdesign.nl/tk5 To install the system, please read page 22 of the Introduction and user manual. Please read also the Announcement Letter. Have a lot of fun with this "new" version of MVS 3.8J Cheers, Rob
Розпочато Rob Prins @ · Останніх @
Current Image
Image Name
Sat 8:39am