开云体育

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

Working on getting CMD1 installed on a freshly genned MVS 3.8 (Jay Moseley instructions). I am having trouble assembling; the job keeps asking me to mount a volume; the addresses are for 3350s, so apparently none of the 3350s I have mounted are appropriate, but I'll be darned if I can figure out what's wrong: The proc: //#ASML PROC MEMBER=, // ASMLIB='CBT249.FILE266', // LINKLIB='MVS.CMDSBSYS.LINKLIB' //#ASM EXEC PGM=IFOX00,PARM=(DECK,TERM,NOLIST) //SYSLIB DD DISP=SHR,DSN=&ASMLIB,DCB=BLKSIZE=32720 // DD DISP=SHR,DSN=SYS1.HASPSRC // DD DISP=SHR,DSN=SYS1.MACLIB // DD DISP=SHR,DSN=SYS1.AMODGEN //SYSUT1 DD UNIT=3390,VOL=SER=PUB001,SPACE=(TRK,(90,50)) //SYSUT2 DD UNIT=3390,VOL=SER=PUB001,SPACE=(TRK,(90,50)) //SYSUT3 DD UNIT=3390,VOL=SER=PUB001,SPACE=(TRK,(90,50)) //SYSTERM DD SYSOUT=* //SYSPRINT DD SYSOUT=* //SYSPUNCH DD DISP=(,PASS),UNIT=3350,VOL=SER=WORK00, // SPACE=(TRK,(90,50)) //SYSIN DD DISP=SHR,DSN=&ASMLIB.(&MEMBER.) //#LINK EXEC PGM=IEWL, // PARM='XREF,LET,LIST,AC=1,SIZE=(140K,6400)' //SYSLIN DD DISP=(OLD,DELETE),DSN=*.#ASM.SYSPUNCH // DD DDNAME=SYSIN //SYSLIB DD DISP=SHR,DSN=&LINKLIB. //SYSLMOD DD DISP=SHR,DSN=&LINKLIB.(&MEMBER.) //SYSUT1 DD UNIT=3350,VOL=SER=WORK00,SPACE=(TRK,(50,20)) //SYSPRINT DD SYSOUT=* // PEND The DASD allocations: IEE450I 17.00.54 UNIT STATUS 157 UNIT TYPE STATUS VOLSER VOLSTATE UNIT TYPE STATUS VOLSER VOLSTATE 150 3350 S MVSRES PRIV/RSDNT 151 3350 A MVS000 PRIV/RSDNT 152 3350 A PAGE00 PRIV/RSDNT 153 3350 A SPOOL1 PRIV/RSDNT 180 3380 O PUB000 PRIV/RSERV 190 3390 O PUB001 PRIV/RSERV 220 2314 O SORTW1 PUB/RSERV 221 2314 O SORTW2 PUB/RSERV 222 2314 O SORTW3 PUB/RSERV 223 2314 O SORTW4 PUB/RSERV 224 2314 O SORTW5 PUB/RSERV 225 2314 O SORTW6 PUB/RSERV 251 3350 O WORK00 STRG/RSDNT 252 3350 O WORK01 PRIV/RSDNT 350 3350 O SMP000 PRIV/RSDNT 700 3350 O JES200 PUB/RSDNT 701 3350 O JES201 PUB/RSDNT 702 3350 O JES202 PUB/RSDNT 750 3350 O CBT000 PRIV/RSDNT 751 3350 O CBT001 PRIV/RSDNT 752 3350 O CBT002 PRIV/RSDNT 753 3350 O CBT003 PRIV/RSDNT 754 3350 A SYSCPK PRIV/RSDNT and the request for allocation IEF677I WARNING MESSAGE(S) FOR JOB MVS0290 ISSUED $HASP373 MVS0290 STARTED - INIT 1 - CLASS A - SYS HMVS IEF403I MVS0290 - STARTED - TIME=17.01.11 IEF244I INIT MVS0290 - UNABLE TO ALLOCATE 1 UNIT(S) AT LEAST 1 OFFLINE UNIT(S) NEEDED. IEF489I INIT - 1 UNIT(S) NEEDED FOR SYS00001 IEF247I INIT - 154,155,156,157,250,253,254,255,256,257,351,352 OFFLINE IEF247I INIT - 353,354,355,356,357,358,359,35A,35B,35C,35D,35E OFFLINE IEF247I INIT - 35F,703,704,705,706,707,708,709,70A,70B,70C,70D OFFLINE IEF247I INIT - 70E,70F,755,756,757,758,759,75A,75B,75C,75D,75E OFFLINE IEF247I INIT - 75F OFFLINE *02 IEF238D INIT - REPLY DEVICE NAME OR 'CANCEL'. Those addresses are all 3350s... I suspect I don't have my VATLST set up correctly, but I've tried every combination of attributes that I can think off. WHAT AM I DOING WRONG?

Hello Group Is it possible to create a sysplex environment in hercules by running two different hercules environment in same PC and define them as SYSPEX ? if so kindly point me to the documentation which can help me to proceed ? Jake

Hi, Does anyone have a best method to transfer from z/OS to Hercules. One method is to use ADRDSSU to backup the dasd to a dataset, then TERSE that dataset to another tersed file and send it to your PC in binary format and then send that to Hercules via FTP also in binary format, then unterse it under Hercules, and then restore it via ADRDSSU, but I'm thinking there must be some better way to do this. The above process takes a lot of time and I have "heard" that there are other ways that work well, but don't know what they are. Can anyone enlighten me? Brian