开云体育

I have Hercules-4.3.0.10296-SDL I run z/OS 2.4 my PC has a fixed IP address of 192.168.0.69 My z/OS IP address is 192.168.0.66 my router gateway address is 192.168.0.254 my PC is connected via wifi in my hercules.cnf file i have: 0600.3 OSD ipaddr 192.168.0.66/24 iface 192.168.0.69 chpid 06 Everything seems to be ok on (trl,tcpip dev,..) the z/OS side, except the interface stats show a bytes in/out count of 0. and I cannot ping the z/OS address from my PC, nor my PC from z/OS On TSO: ===> tso ping 192.168.0.69 CS V2R4: Pinging host 192.168.0.69 Ping #1 timed out *** From my PC: C:\Users\tcmau>ping 192.168.0.66 Envoi d’une requête 'Ping' 192.168.0.66 avec 32 octets de données : Réponse de 192.168.0.69 : Impossible de joindre l’h?te de destination. Réponse de 192.168.0.69 : Impossible de joindre l’h?te de destination. Réponse de 192.168.0.69 : Impossible de joindre l’h?te de destination. Réponse de 192.168.0.69 : Impossible de joindre l’h?te de destination. Statistiques Ping pour 192.168.0.66: Paquets : envoyés = 4, re?us = 4, perdus = 0 (perte 0%), ipconfig on my pc returns; C:\Users\tcmau>ipconfig Configuration IP de Windows Carte inconnue Connexion au réseau local : Statut du média. . . . . . . . . . . . : Média déconnecté Suffixe DNS propre à la connexion. . . : Carte réseau sans fil Connexion au réseau local* 1 : Statut du média. . . . . . . . . . . . : Média déconnecté Suffixe DNS propre à la connexion. . . : Carte réseau sans fil Connexion au réseau local* 2 : Statut du média. . . . . . . . . . . . : Média déconnecté Suffixe DNS propre à la connexion. . . : Carte réseau sans fil Wi-Fi : Suffixe DNS propre à la connexion. . . : Adresse IPv6. . . . . . . . . . . . . .: 2a01:e0a:55e:a470:702:6f38:5328:bc4b Adresse IPv6 temporaire . . . . . . . .: 2a01:e0a:55e:a470:58a5:6b9:bbbf:73f5 Adresse IPv6 de liaison locale. . . . .: fe80::c37:a2cf:2bb3:3878%3 Adresse IPv4. . . . . . . . . . . . . .: 192.168.0.69 Masque de sous-réseau. . . . . . . . . : 255.255.0.0 Passerelle par défaut. . . . . . . . . : fe80::6aa3:78ff:fe7a:c39b%3 192.168.0.254 Carte Ethernet Connexion réseau Bluetooth : Statut du média. . . . . . . . . . . . : Média déconnecté Suffixe DNS propre à la connexion. . . : in VTAM i have defined: BROWSE SYS1.VTAMLST(TRL600) - 01.00 Line 0000000000 Col 0 *** Top of Data ** TRL600 VBUILD TYPE=TRL TRL6 TRLE LNCTL=MPC, X READ=(0600), X WRITE=(0601), X DATAPATH=(0602), X PORTNAME=OSA0001, X MPCLEVEL=QDIO * in TCPIP config i have: ; ---------------------------------------------------------------------- ; Hardware definitions: ; ; ---------------------------------------------------------------------- INTERFace OSA0001PHIL DEFINE IPAQENET CHPIDTYPE OSD PORTNAME OSA0001 IPADDR 192.168.0.66/28 NONROUTER ; BEGINRoutes ROUTE 192.168.0.0 255.255.0.0 = OSA0001PHIL MTU 1492 ROUTE DEFAULT 192.168.0.254 OSA0001PHIL MTU 1492 ENDRoutes ; START OSA0001PHIL D NET,TRL gives me: D NET,TRL,TRLE=TRL6 IST097I DISPLAY ACCEPTED IST075I NAME = TRL6, TYPE = TRLE 309 IST1954I TRL MAJOR NODE = TRL600 IST486I STATUS= ACTIV, DESIRED STATE= ACTIV IST087I TYPE = LEASED , CONTROL = MPC , HPDT = YES IST1715I MPCLEVEL = QDIO MPCUSAGE = SHARE IST1716I PORTNAME = OSA0001 LINKNUM = 0 OSA CODE LEVEL = C3F1 IST2337I CHPID TYPE = OSD CHPID = 06 PNETID = **NA** IST1577I HEADER SIZE = 4096 DATA SIZE = 0 STORAGE = ***NA*** IST1221I WRITE DEV = 0601 STATUS = ACTIVE STATE = ONLINE IST1577I HEADER SIZE = 4092 DATA SIZE = 0 STORAGE = ***NA*** IST1221I READ DEV = 0600 STATUS = ACTIVE STATE = ONLINE IST924I ------------------------------------------------------------- IST1221I DATA DEV = 0602 STATUS = ACTIVE STATE = N/A IST1724I I/O TRACE = OFF TRACE LENGTH = *NA* IST1717I ULPID = TCPIP ULP INTERFACE = OSA0001PHIL IST2310I ACCELERATED ROUTING DISABLED IST2331I QUEUE QUEUE READ QUEUE IST2332I ID TYPE STORAGE STATUS IST2205I ------ -------- --------------- ---------------------- IST2333I RD/1 PRIMARY 4.0M(64 SBALS) ACTIVE IST2333I RD/1 PRIMARY 4.0M(64 SBALS) ACTIVE IST2305I NUMBER OF DISCARDED INBOUND READ BUFFERS = 0 IST2386I NUMBER OF DISCARDED OUTBOUND WRITE

Hello, I'm trying to learn how to use (virtual) tapes with OS/390 ADCD running on Hercules Hyperion Release 4.7. I'd prefer to minimize switching between windows to type commands, even if this is much less labor than decades ago when inserting a tape meant running around a lot. Hence I want to avoid having yet another shell window open to create an already initialized tape, but use the MVS way. My Hercules.cnf definition is: 0560 3480 * So, I submit this job (job card omitted deliberately): //INZTAP EXEC PGM=IEHINITT //SYSPRINT DD SYSOUT=* //DEV0560 DD UNIT=(560,,DEFER) //SYSIN DD * DEV0560 INITT SER=BKTAP1,DISP=REWIND,OWNER='P390' /* After confirming the mount request on the MVS console, I load the tape: devinit 560 bktap1.aws Note: bktap1.aws does not exist prior. The tape is then labeled as requested, and unloaded, RC=0. The DISP=REWIND seems to be ignored, though. For the next job step (ADRDSSU) to proceed, I must reload the tape again (devinit). I found this: https://www.ibm.com/docs/en/zos/2.4.0?topic=statements-initt-statement Stating: > Tapes in a Tape Library Dataserver are unconditionally unloaded regardless of the specification for this parameter. Now I wonder if this sentence is applicable to the 3380 emulation in Hercules 4.7. How can I prevent the tape from being unloaded after IEHINITT finished its job? Thank you! :wq! PoC

hI everay one, fresh installation of TK5 to use Hercules, i have gotten this compiler error LINE 23 IKF1017I-E FILE INVALID IN SELECT CLAUSE here is the cobol code about it - - - - - - - - - - - - - - - - 20 line(s) excluded 000021 SELECT I-ACCOUNT-FILE 000022 ASSIGN TO UT-S-ACCOUNT 000023 FILE STATUS IS IND-I-CODE-READING. and so IN DATA DIV 0056 IND-I-CODE-READING PIC 9(2) VALUE ZEROS. here is the setup Hercules Version : 4.7.0.11119-SDL-gf7d2360a with upgrade 4 installed . . . . TT TT TT KK KK 55 Update 4 on : Windows 10 Can help me please

Hi All, I’m just writing as a newbie who has recently discovered that BookManager Read for MVS works extremely well with my screen reading technology, as do many ISPf utilities, to be fair. That being said, I wondered if anyone has OS390 or MVS-era bookshelves anywhere? I know I can find some of this stuff in PDF, but I’d love to get the original formats as well, if only for interest’s sake and to give me practice mucking around with loading it onto the emulator and so on. Thanks for any thoughts. ? Best, Zack.

Hi I run a version of TK4- (I know: I should move on to TK5). This happens on a Mac, Mac OS Sequoia and Intel machine. I start TK4- and run a couple of simple things (these days I am fooling around with COBOL). Now. First of all I do not seem to be able to get anything "printed" on the files `prt/prt???.txt`. From QUEUE or OUTLIST, I try to "release" the output but nothing happens. Next, I issue `shutdown` an the system hangs after `$HASP395 BSPPILOT ENDED` because `PRINTER1` and `PRINTER2` are draining. To move on I have to issue `/$e prt1` `/$e prt2` `/$c prt1` `/$c prt2` After that the system moves on and terminates (although sometimes it crashes). Note the ``` HHC01250E 0:000E Printer: error in function write(): Operation timed out HHC00007I Previous message from function 'write_buffer' at printer.c(264) ``` error messages (this is obviously from Hercules). I am attaching the logs of a typical interaction. All the best Marco -- Marco Antoniotti Somewhere over the rainbow

Hi it looks like the `geronimo370.nl` site is down. Or it is just me? Thanks Marco -- Marco Antoniotti Somewhere over the rainbow

Running Hyperion dev branch 4.8 on Apple M2 hardware and can successfully start z/OS (V2.2, 2.5 & 3.1) but can't shut any of them down cleanly. Issuing S SHUTSYS fails on every system - see below:- - 19.27.49 s shutsys - 19.27.49 IRR812I PROFILE * (G) IN THE STARTED CLASS WAS USED - TO START SHUTSYS WITH JOBNAME SHUTSYS. 19.27.49 STC02511 IEFC452I SHUTSYS - JOB NOT RUN - JCL ERROR 19.27.49 IEE122I START COMMAND JCL ERROR I must be doing something wrong with. Any suggestions? Thanks

Hello I am on Windows 11, and I am looking for a way to extract the OS39RA.A80 file from a ZIP archive consisting of two files OS39RA_1.A80 and OS39RA_2.A80 which are contained in the OS39RA.ZIP archive. I tried with winrar without success. It does not consider it as a multi-file archive. I also used the unzip program of the iso file, but it does not work because it's a 32bits Thanks in advance CHL

Running Hyperion dev branch 4.8 on Apple M2 hardware and can successfully start z/OS (V2.2, 22.5 & 3.1) but can't shut them down cleanly. Issuing S SHUTSYS fails on every system - see below - 19.27.49 s shutsys - 19.27.49 IRR812I PROFILE * (G) IN THE STARTED CLASS WAS USED - TO START SHUTSYS WITH JOBNAME SHUTSYS. 19.27.49 STC02511 IEFC452I SHUTSYS - JOB NOT RUN - JCL ERROR 19.27.49 IEE122I START COMMAND JCL ERROR I must be doing something wrong with. Any suggestions?

Hello All, does the version of PL/I that Hercules/MVS38 use support the SELECT/WHEN statement? I get a compile errors on any SELECT statement. Thank you, Dennis

Hello guys, Just wanted to share with you this publicly available NASA documents: Mission and data operations IBM 360: User's guide (1971) https://ntrs.nasa.gov/api/citations/19720007517/downloads/19720007517.pdf Mission and data operations IBM 360 user's guide (1973) https://ntrs.nasa.gov/api/citations/19740006808/downloads/19740006808.pdf Earth Observations Division version of the Laboratory for Applications of Remote Sensing system (EOD-LARSYS) user guide for the IBM 370/148. Volume 1: System overview (1978) https://ntrs.nasa.gov/api/citations/19800018225/downloads/19800018225.pdf Earth Observations Division version of the Laboratory for Applications of Remote Sensing system (EOD-LARSYS) user guide for the IBM 370/148. Volume 2: User's reference manual (1978) https://ntrs.nasa.gov/api/citations/19800018226/downloads/19800018226.pdf Earth Observations Division version of the Laboratory for Applications of Remote Sensing System (EOD-LARSYS) user guide for the IBM 370/148. Volume 3: As-built documentation (sections 1-12) 1980 https://ntrs.nasa.gov/api/citations/19800019274/downloads/19800019274.pdf Earth Observations Division version of the Laboratory for Applications of Remote Sensing System (EOD-LARSYS) user guide for the IBM 370/148. Volume 3: As-built documentation (sections 13-23) 1980 https://ntrs.nasa.gov/api/citations/19800019275/downloads/19800019275.pdf Earth Observations Division verison of the Laboratory for Applications of remote Sensing system (EOD-LARSYS) user guide for the IBM 370/148. Volume 4: Program listings https://ntrs.nasa.gov/api/citations/19800018227/downloads/19800018227.pdf If you like stuff like that, please search for "IBM" on this site and you will find dozens of programs for IBM 360/370 that NASA used in 60s-70s. https://ntrs.nasa.gov/ Best wishes, Andre

Hi Can somebody please explain, whats the purpose of the DD DDNAME=SYSIN statement here? What does it reference to? SYSIN was used as source input dataset for the COBOL compiler and SYSLIN is the object module. I don't understand that. Thank you very much. COBUCL procedure: //COBUCL PROC CPARM1='LOAD,SUPMAP', // CPARM2='SIZE=2048K,BUF=1024K', // LKEDPGM='IEWL' //COB EXEC PGM=IKFCBL00,REGION=4096K, // PARM='&CPARM1,&CPARM2' //SYSPRINT DD SYSOUT=* //SYSUT1 DD UNIT=SYSDA,SPACE=(460,(700,100)) //SYSUT2 DD UNIT=SYSDA,SPACE=(460,(700,100)) //SYSUT3 DD UNIT=SYSDA,SPACE=(460,(700,100)) //SYSUT4 DD UNIT=SYSDA,SPACE=(460,(700,100)) //SYSLIN DD DSN=&LOADSET,DISP=(MOD,PASS),UNIT=SYSDA, // SPACE=(80,(500,100)) //LKED EXEC PGM=&LKEDPGM, // PARM='LIST,XREF,LET',COND=(5,LT,COB),REGION=96K //SYSLIN DD DSN=&LOADSET,DISP=(OLD,DELETE) // DD DDNAME=SYSIN //SYSLMOD DD DDNAME=SYSLMOD //SYSLIB DD DSN=SYS1.COBLIB,DISP=SHR //SYSUT1 DD UNIT=SYSDA,SPACE=(1024,(50,20)) //SYSPRINT DD SYSOUT=*

I am trying to find info on building Herc for macOS Sonoma on a 16 inch M2 ... the Github Herc info seems way out of date - latest RC version is 4.0.0 from 2016 or so. I can build it from source, just want to find any gotchas that may have been documented. I am only going to build an ARM64 version for MacOS. If someone wants a AMD64 version I suppose I could build it too. As a general comment the documentation seems to have fallen on hard times lately. Way back when ( Hercules 3-13 or so) there was a coherent way to find info and good links in the web pages. I have hit some 404 pages trying to dig around. I just filed a git ticket about the Mac How To having Windows references and assumptions in it.

Hi - just a note to document a small error in the above remarkably detailed and comprehensive instructions. SMPJOB04 instruction section requests tape j90012.het - this is present but appears to be completely blank and the job actually specifies j90009.het. The illustrations show j90012.het being mounted so SMPJOB04 has been changed at some time. Might save someone some head scratching if they are trying to learn the intricacies of system generation. Amazing job Jay - thanks Bill

The following items have been added to the Files area of the [email protected] group. /tapemgr.tgz By: Stephen Dennis <afflictedunlivablejubilant@...> Description: This scans, creates, extracts uncompressed AWS tape files. JSON configuration is created and used to coordinate the above. Supports conversion between EBCDIC (CP037, CP273, CP277, and CP285) and Unicode (UTF-8). Binary pass-through. AWs creation generates a RESTORE.JCL starting point for MVS 3.8j. Built for Linux. Dockerfile included. Tests for F, FB, V, VS, VB, and VBS formats. Unix files can be NL-terminated text, fixed-length binary, or RDW-prefixed variable length binary. I needed this to create multi-file tapes with different LRECL/BLKSIZE attributes. I tried to understand and test the F, V, VS, VB, and VBS formats as well. Ad-hoc testing on extracting files from AWS files out and AWS files created by TK5. Bugs happen. No warranty for any use is provided. It's not hard to add new code pages, but no promises.

Hi, REVIEW release 51.6 is out now. I finally got around to displaying program link edit dates and times in the member list, so a SORT CHA is now possible. A bit of fun if you're interested in that sort of thing. Cheers, Greg

Hello guys, good news indeed. My dreams come true, i don't need to search answers in documentation anymore, because there is AI Helper from IBM itself, which will explain to me in detail anything and everything mainframe related. He can even help with JCL, HLASM or COBOL programming. And the best part of it - you can run it locally, on your machine, completely for free! Very easy setup for Windows 10 users, also available for Linux and Mac. 1. You need VideoCard with at least 6GB of video memory. Well, i use NVIDIA GeForce RTX 2080 SUPER 8GB. 2. You need middle class 64bit PC with at least 16GB of RAM and multicore CPU. The more the better. 3. Go to https://lmstudio.ai/ and download installer for your system. 4. Run it, open 'Discover' panel and search for "Granite 3.1 8B", it is LLM from IBM supporting up to 128K context length, trained on 500B tokens. 5. Download it and after that you can launch it from inside your video memory! It is trained on IBM stuff, and answers pretty quickly. No more waiting for someone on the forum to answer your stupid question. Now you can get the answer almost instantly from AI. What i know, is that you can access this same model online at IBM cloud through watsonx, but it will cost you money. Best wishes, Andre

Does anyone have a sample of how to download the latest CBTTAPE to a version of z/OS. I am trying to follow the example from the CBT website, and, having never used the z/OS FTP facility, I'm at a loss. I have everything set up on my z/OS system, but I'm falling deeper down a rabbit hole. I've downloaded the files before, using my PC as intermediate storage and then sending the file to z/OS using my 3270 emulator (VISTA3270), but that seems like an added unnecessary step. Thanks... Frank