About IBM 3390 and blocks - fixed typos and formatting
17
Hi :) Following my first question about how MVS OS family allocates in integer number of tracks, I am reading https://bitsavers.org/pdf/ibm/dasd/GC20-1649-9_Introduction_to_IBM_Direct-Access_Storage_Devices_and_Organization_Methods_Dec75.pdf But, I find this: Reasons for Blocking Records The primary reason for blocking records is to pack direct access storage more efficiently. With blocked records, there is an Address Marker, Count Area, Key Area, and gaps for each block of records rather than for each logical record. Another reason for blocking is that it may save time. If records are processed consecutively, there is only one rotational delay before reading or writing a block of records. If records are not processed consecutively, however, blocking may be a disadvantage, since it takes longer to be processed. Is IBM 3390 is a CKD disk? If I allocate a data set with block size 512B, it will be read and written in chunks of 512B at a time? if I give a data set a block size of 4KB, it will be read and written in chunks of 4KB at a time? Do all tracks in a CKD disk have the same amount of bytes? The reason why we need set a BLKSIZE is to make the maximum integer number of those user-defined blocks fit in each track? Kind Regards Sergio Lindo Mansilla
|
About IBM 3390 and blocks
2
Hi :) Following my first questions about how MVS OS family allocates in integer number of racks, I am reading https://bitsavers.org/pdf/ibm/dasd/GC20-1649-9_Introduction_to_IBM_Direct-Access_Storage_Devices_and_Organization_Methods_Dec75.pdf But, I find this: """ Reasons for Blocking Records The primary reason for blocking records is to pack direct access storage more efficiently. With blocked records, there is an Address Marker, Count Area, Key Area, and gaps for each block of records rather than for each logical record. Another reason for blocking is that it may save time. If records are processed consecutively, there is only one rotational delay before reading or writing a block of records. If records are not processed consecutively, however, blocking may be a disadvantage, since it takes longer to be processed. """ Is IBM 3390 is a CKD disk? If I allocate a data set with block size 512B, it will be read and written in chunks of 512B at a time? if I give a data set a block size of 4KB, it will be read and written in chunks of 4KB at a time? Do all tracks in a CKD disk have the same amount of bytes? The reason why we need set a BLKSIZE is to make the maximum integer number of those user-defined blocks fit in each track? Kind Regards Sergio Lindo Mansilla
|
what version(s) of Hercules-390 support the CMPSC opcode?
2
Hi, all: What version(s) of Hercules-390 support the 390/ESA and newer z/arch. CMPSC opcode (Compression Call)? (Apparently this was a microcode-assisted implementation of LZ1 on S/390 models, and millicode on z/arch. models) On this page: https://sdl-hercules-390.github.io/html/ I scrolled down to the "Hercules Frequently-Asked Questions" link. I selected question 5.01: "What architectural features are implemented? I see: The following features of ESA/390 have been implemented: ... Compression and The following features of z/Architecture have been implemented: ... CMPSC-Enhancement Facility ... But, further down the page, it says: The following features of z/Architecture have not yet been implemented: ... DEFLATE-Conversion Facility Regarding: The following features of ESA/390 have been implemented: and The following features of z/Architecture have been implemented: Approx. when was each of these features or facilities implemented and in what version/release of Hercules-390. Or, asking another way: can someone tell me where to find such information? Thanks in advance. Mark S. Waterbury
|
CICS Map generator
13
Hello all, anyone know of a good BMS MAP generator software that¡¯s fairly reasonable or free? I don¡¯t need anything like microfocus or some other MF software vendor. Thanks Mike!
|
Allocating data set - block vs track vs cylinder
5
Hi, When using in MVS-TK5 the panel 3.2 to allocate a sequential data set Record format: FB Logical record length: 80 Physical block size: 27920 Volume: TSO001 Then I get to allocate in Tracks, Cylinders or Blocks. I wanted to find out the smallest data set that I can create in an IBM 3390. When I try to allocate 1 block, DSLIST shows ALTRK=1 I thought that the minimum allocation in disks was 1 block. But, in MVS-TK5, is 1 track the smallest I can allocate? I have tried to look for more information about it, without success. Could you clarify or point me to the a documentation that explains which component is responsible for that limit? Is it MVS, the disk controller or the disk itself? Kind regards Sergio Lindo Mansilla
|
C stack/heap memory model assumption and TSO TCB memory model
6
Hi In a different thread, in a different group (the Turnkey one) somebody mentioned (sorry, I forgot who) that there is a difference between the C (GCC) memory model (stack plus heap) and the TSO (and I presume other programs) memory model based on Task (?) Control Block. As I was brainwashed by Unix at a very early age (let's say, about 20kgs ago) I found this intriguing, as most OS books I knew of did not mention anything of the kind. Did I read too much in that off-hand comment? If there is a difference, what would be a good pointer to a summary of the topic before losing oneself in the overall IBM documentation? Thanks. Any help appreciated, even "don't bother!" :) PS I am asking because I teach, and I want students to at least know what happens (or happened) -- Marco Antoniotti Somewhere over the rainbow
|
NJE38 Usage
5
I've played with NJE38, but it's name implies that it can do NJE to a more modern JES2 system. I tried defining a connection between a TK5 system to a z/OS system at a friend's company without success. Despite the fact that NJE38 can use TCP/IP to communicate to another TK5 system, it doesn't seem to work with a modern TCP/IP NJE connection. I'm aware of the lack of SNA facilities in 3.8's VTAM. I don't know if there's a way to RJE to a TK5 system via Hercules and have a modern system connect via RJE instead. Any thoughts? Or is this a fool's errand?
|
NJE38 - talking from TK5 update 3 to TK4- with an older version of NJE
3
Dear Forum, so far, I have setup the copy of TK4- from my cloud system on the same Pi 5 where the new install of TK5 is running. Now I try to have them talk to each other via NJE38. There is an older (2.2.x I guess) install of NJE38 on the TK4- system and a more recent version (2.5.0) on TK5 update 3. Having set up the config like this: *NOTE: archives on github and here claim NJE38 Version 2.4.2, however, NJE38 identifies itself as 2.5.0 in the syslog on TK5). Node X484 (TK4-) 094 tcpnje 2703 lnode=X484 rnode=X406 lport=1175 rport=2175 rhost=x406.fritz.box Node X406 (TK5-) 094 tcpnje 2703 lnode=X406 rnode=X484 lport=2175 rport=1175 rhost=x406.fritz.box The syslog of X406 complains about with the following message to syslog HHCTN049E 0094:TCPNJE - Attempt to write 455 bytes to output socket only wrote 0 bytes. Error: Bad file descriptor The Link on the TK5 node is shown "inactive" while the link on TK4- is active. Could it be that running the NJE38 hosts on the very same machine is not supported? Or do I need to upgrade the NJE38 on TK4- to the same level? Nota bene: when issuing /S SHUTDOWN, the NJE38 STC gets purged on the TK4- node but then there is no further progress. TK5- shuts down a whole lot more including VTAM but also does not exit the Hercules emulator. Hmm... -- TK5 on Raspberry Pi 5 with Raspberry OS "bookworm" TK4- on Raspberry Pi 5 with Raspberry OS "bookworm" VM/370 on Raspberry Pi 5 with Raspberry OS "bookworm" Lime and limpid green, a second scene Now fights between the blue you once knew Floating down, the sound resounds Around the icy waters underground Jupiter and Saturn, Oberon, Miranda and Titania Neptune, Titan, stars can frighten (Syd Barrett of Pink Floyd)
|
TK5 NETSOL screen
12
Dear Group Members, my apologies if that question has already been answered. I completed setting up my new Raspberry Pi 5 (8GB) and compiled Hercules for it and downloaded TK5 for it. In TK5.CNTL is a member named TK5$LOGO which looks to me like some screen def that can be interpreted to generate some Assembler code that assembles into a new NETSOL. However, I haven't found that "interpreter". Does this interpreter even exist and if yes, where do I find it? I remember that I customized my TK4- NETSOL before and using some scripting as well, but would love to do it the "standard" way. kind regards Michael -- TK4- on virtual x86 Ubuntu LTS 22.04 TK5 on Pi 5 Raspberry OS "Bookworm" VM/370 on virtual x86 Ubuntu LTS 22.04 Die Katze l?sst das Mausen nicht, Die Jungfern bleiben Coffeeschwestern. Die Mutter liebt den Coffee Brauch, Die Gro?mama trank solchen auch. Wer will da auf die T?chter l?stern? J.S.Bach "Kaffee-Kantate" (BWV 211)
|
DB2 with error
5
I am having difficulty compiling a COBOL program with DB2. When I bind, I get a message that the file was not found. I am a newbie in database administration. I would like to know if there is a checklist for DB2 DATASETs so that I can identify which file is missing and proceed with its recovery. I would be very grateful if you could point me to a jcl/proc to validate the DB2 structure and ensure that it is working. I read somewhere that the IBMUSER user was not recommended for accessing DB2. Is this correct? Thank you for your attention.
|
[hercules-390] zOS Disabled Wait 05D During Initialization
(CC: H390-MVS) PEBKAC: * https://github.com/SDL-Hercules-390/hyperion/issues/373 * https://github.com/SDL-Hercules-390/hyperion/issues/663 -- "Fish" (David B. Trout) Software Development Laboratories http://www.softdevlabs.com mail: fish@...
|
zOS Disabled Wait 05D During Initialization
Hi All, When returning from a wonderful vacation, I have encountered a head scratching problem that hopefully someone can help me with. When I try and IPL (using HercGUI and Hercules 4.7, I am gettin the following messages: 2024/09/25 17:25:29.723 0x00001294 IEA371I SYS1.IPLPARM ON DEVICE 0A82 SELECTED FOR IPL PARAMETERS 2024/09/25 17:25:29.752 0x00001294 IEA246I LOAD ID 00 SELECTED 2024/09/25 17:25:29.752 0x00001294 IEA246I NUCLST ID 00 SELECTED 2024/09/25 17:25:29.753 0x00001294 IEA519I IODF DSN = SYS1.IODF01 2024/09/25 17:25:29.753 0x00001294 IEA520I CONFIGURATION ID = CBIPO . IODF DEVICE NUMBER = 0A82 2024/09/25 17:25:29.754 0x00001294 IEA091I NUCLEUS 1 SELECTED 2024/09/25 17:25:30.772 0x00001294 IEA370I MASTER CATALOG SELECTED IS CATALOG.Z113F.MASTER 2024/09/25 17:25:30.834 0x00001294 HHC01315I 0:0A82 CHAN: ccw E7600044 7FD025A4=>01800000 00000000 00000000 00E00000 00000000 00000000 0D0A0000 00000000 00000000 80000000 00000000 06800001 00000001 00000001 01FF0060 00000000 .............\.............................................-.... 2024/09/25 17:25:30.834 0x00001294 HHC01312I 0:0A82 CHAN: stat 0E00, count 0000 2024/09/25 17:25:30.834 0x00001294 HHC01313I 0:0A82 CHAN: sense 80000000 00000001 00000000 00000000 00000000 00000000 00000080 00000000 2024/09/25 17:25:30.834 0x00001294 HHC01314I 0:0A82 CHAN: sense CMDREJ 2024/09/25 17:25:30.835 0x00001294 IEA306I 0A82,0A, I/O ERROR, **,0E00,8000,FDSYS1 2024/09/25 17:25:30.836 0x00001294 HHC00809I Processor CP00: disabled wait state 0002000080000000 000000000000005D 2024/09/25 17:25:30.836 0x00001294 HHC00826W Processor CP00: processor auto-stopped due to disabled wait 2024/09/25 17:25:30.836 0x00001294 HHC00007I Previous message from function 'z900_process_interrupt' at cpu.c(1876) This happens for all the zOS systems that I have (1.11, 1.13, 2.1 and 2.2). It is always on the volume that contains the IODF file. I don't know if this is a Hercules related problem, or an MVS related problem. It happens on both native Windows-10 and Windows-11 running under Parallels on my Mac-M2. Any guidance would be most appreciated. I have a running zOS 2.5 under test with Hercules 4.8 (development) on an external USB drive and can attach the above volumes and read them with no problem. I will also post this to the Hercules-390 group. Thanks... Frank
|
What is the meaning of ICKDSF INIT OWNERID?
3
Hello there :) I am trying to understand the following command to initialize a DASD //EXAMPLE JOB // EXEC PGM=ICKDSF //SYSPRINT DD SYSOUT=A //SYSIN DD * INIT UNITADDRESS(0353) NOVERIFY VOLID(VOL123) - OWNERID(PAYROLL) /* What is the purpose of the OWNERID? Does it have any effect in MVS or is it just a piece of text for humans? Kind Regards
|
MVS-TK5 Update-3: help menu not working
2
Hi Rob, Thank you very much for your work on MVS-TK5! I have a problem with the help menu. Using: - MVS-TK5 Update 3 - c3270 - HERC01 When I am editing a dataset in REVEDIT and then execute the global command help, I get the index of the help page, but no matter which key I press, or which option I select, it always exits back to REVEDIT without showing the expected help page. Is that behavior known? Is it a bug? Kind Regards Sergio Lindo Mansilla Software developer with DevOps tendencies Portfolio: https://binary-sequence.github.io/
|
HDR-30 and AWSCKD disk images
9
I though I was really confused and now I know I am, not only are there CKD, and CCKD, but also HDR-30 disk images, and also an AWSCKD disk image. What are these used for? Very little information online about these. I didn¡¯t get any answers in H390-Herc so I¡¯m going to try here. Thanks in advance.
|
Aethra release date
5
Hello Everyone! I am just interested in progress of Hercules Aethra, what is the release date? I hope it was not abandoned. Best wishes, Andre
|
Question about TSO commands
20
Hello Everyone! I have a (stupid) question about TK5 TSO commands. When i type HELP in TSO first four lines read: ASM INVOKE ASSEMBLER PROMPTER AND ASSEMBLER F COMPILER. CALC INVOKE ITF:PL/1 PROCESSOR FOR DESK CALCULATOR MODE. COBOL INVOKE COBOL PROMPTER AND ANS COBOL COMPILER. FORT INVOKE FORTRAN PROMPTER AND FORTRAN IV G1 COMPILER. But only ASM is working. If i try to enter CALC, COBOL or FORT - system responds with COMMAND NOT FOUND. I know that TK5 has COBOL and FORTRAN compilers, why then those commands do not work? Best wishes, Andre
|
Editing Sys1.Parmlib
6
Hi Is there a way to update or replace a sys1.parmlib member using some Hercules batch utility program? TIA Joao -- att. Jo?o
|
MVS 3.8j (TK5) under VM/CE 1.2 Abend on Z EOD
The subject says almost all. I have an MVS 3.8 (TK5) image that, when run under VM/370 CE 1.2, abends upon receiving a Z EOD: z eod 20.16.17 IEE480I HALT COMMAND ABEND 800, TERMINATED This does not, however, occur when I don't run in a VM guest. Any thoughts on this?
|
Type 3/4 user SVCs in 21J
7
I¡¯m looking for some information about installing a type 3/4 SVC on MVS 3.8J. I have started a little project, and I decided that part of it needs a type 3 or 4 SVC, but I¡¯m having all sorts of unexpected problems. Back in the 1960s and 1970s I created and used my own user SVCs on various platforms, such as PCP, MFT, VS1, SVS, and early MVS. But it seems that things have changed since then, and MVS 3.8J is unhappy with my efforts. Obviously there were changes in the late 1970s or maybe early 1980s, and MVS is just not recognising that I have added SVCs to the system. I have found newer instructions for creating user SVCs in z/OS, but they are not very useful as they talk about PARMLIB members that don¡¯t exist in 3.8J. So they¡¯re too new! I wonder if there¡¯s anyone out there in MVS Hercules-land who has done this successfully in TK4- or TK5, or similar. Ideally I¡¯d love a series of instructions such as (1) do this (2) do that (3) do¡. But really any pertinent advice would be useful. By the way, can I take it as read that the available user SVCs in TK4- are as listed in SYS1.SYSGEN.CNTL(IOGEN), and that they are (type 3) numbers 231/2/3/4 and (type 4) numbers 241/2/3/4/8? Many thanks to anybody who can advise, JJ P.S. Apolgies for "21J" in the subject heading and in the original posting. I don't kinow where that came from, I meant 3.8J of course.
|