开云体育

ctrl + shift + ? for shortcuts
© 2025 开云体育
CLIST and TEST subcommands 3
With a few MVS/ESA and /XA systems I used CLISTs under TEST (because CLIST could process the results of TEST subcommands). One command displayed PSW, disassembly, regs. Under TK5 I've tried to do the same thing, and my CLIST library is allocated to SYSPROC, but TEST doesn't execute them. Is there something I need to configure, please? Roops
Started by Rupert Reynolds @ · Most recent @
Re-create NJE38 Spool 9
I reorganized the work packs on my TK5 system and am now trying to re-create the NJE38 spool. Oddly, I can create and remove it just fine on a TSO pack, but it failed to create on a WORK pack. Here's what JOB0010 is telling me: IDCAMS SYSTEM SERVICES TIME: DEF CL ( NAME( NJE38.NETSPOOL ) /* <== VERIFY */ - RECSZ(4089,4089) - CYL(50) /* <== VERIFY */ - NUMBERED - CISZ(4096) - SHR(4 4) - FILE( SPLVOL ) - VOLUMES( WORK04)) /* <== VERIFY */ - DATA ( NAME( NJE38.NETSPOOL.DATA ) /* <== VERIFY */ - UNIQUE ) IDC3014I CATALOG ERROR IDC3009I ** VSAM CATALOG RETURN CODE IS 106 - REASON CODE IS IGG0CLAQ-4 IDC3003I FUNCTION TERMINATED. CONDITION CODE IS 12 IDC0002I IDCAMS PROCESSING COMPLETE. MAXIMUM CONDITION CODE WAS 12 What am I getting wrong?
Started by Daniel L. Srebnick @ · Most recent @
I wonder if there is a standard approved way to expand SYS2.LINKLIB? 11
Greetings. I am about to release some programs that need to use SYS2.LINKLIB, However, SYS2.LINKLIB has very little room for extra programs. I could add a space parameter to the IEBCOPY of the load modules to the installation procedures, and in fact this does work. However I think it would be preferable to expand Linklib so it stays in one extent. Does a safe way exist to do this? Thanks, Clem Clarke
Started by Clement Clarke @ · Most recent @
eqqdelds 9
Hi group members. I learned something new today: where I used to delete datasets (needed to be allocated later in the job) using IEFBR14 or IDCAMS, there is a program called EQQDELDS (part of TWS if I'm not mistaken) that can look at DD statements in following job steps and delete every dataset which already is catalogued, but will be allocated again with disp(new,delete) or disp(new,catlg). Is there a program with equivalent functionality in TK5? Outside of TK5? Or is somebody willing to look into that so I can upgrade some of my JCL and be quicker with new JCL? A quick web search turned up nothing. Please let me know. best regards, René Jansen.
Started by [email protected] @ · Most recent @
JCL Expert 19
Hi Does anyone know a utility to just check JCL syntax, like JCL Expert does? TIA Jo?o -- att. Jo?o
Started by Jo?o Reginato @ · Most recent @
MVS-TK5 IBM 3390 type 5
Hi :) Thank you very much for your answers to previous topics. I have a new questions. In MVS-TK5, the DASDs TSO001, TSO002 and TSO003 are 3390. Do all 3390 have 56,664 bytes/track? How can I know which 3390-N model is Hercules emulating? In the device list of the operator console I can see that TSO001, TSO002 and TSO003 have 1114 cyls. Is that the maximum cylinder count of the disk? In the Hercules documentation I found that 3390-1 uses 1113 cyls + 1 alt-cyls. Are all 3390 in MVS-TK5 3390-1? Is the maximum volume size for 3390 in MVS-TK5 (or Hercules) 946MB? Can Hercules emulate 3390-2, 3390-3, 3390-9, 3390-27, 3390-54? Kind Regards
Started by Sergio @ · Most recent @
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
Started by Sergio @ · Most recent @
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
Started by Sergio @ · Most recent @
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
Started by Mark Waterbury @ · Most recent @
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!
Started by Mike Ward @ · Most recent @
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
Started by Sergio @ · Most recent @
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
Started by Marco Antoniotti @ · Most recent @
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?
Started by Shawn Goodin @ · Most recent @
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)
Started by Michael Grom @ · Most recent @
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)
Started by Michael Grom @ · Most recent @
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.
Started by Vagner R. Bellacosa @ · Most recent @
[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@...
Started by Fish 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
Started by Frank R @
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
Started by Sergio @ · Most recent @
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/
Started by Sergio @ · Most recent @
Current Image
Image Name
Sat 8:39am