REVIEW R51.5
Hi Rob, Then you should be able to make that 51.5 at that time. :) Review 51.5 includes enhancements to the previously undocumented HI COBOL. Cheers, Greg
|
REVIEW R51.4
4
Hi, Just to announce that the subject release is now available from https://www.prycroft6.com.au/REVIEW/index.html and https://www.prycroft6.com.au/vs2sw/index.html#review Main changes pertain to formatting improvements for binary integers and hexadecimal floating point in FORMAT ON (which uses the REVFMTS DD) and ZOOM displays. Cheers, Greg
|
error when running ipling on ubuntu 22.04 24.04 22.10 and rhel 9.4
5
when running ./mvs with or without sudo I get the following error. mvs_ipl: line 57: 5577 Illegal instruction (core dumped) $force_arch hercules $DAEMON -f conf/tk5.cnf > log/3033.log log contains no data, this could very well be something I'm doing wrong, but I'm not sure what as I'm following the only installation instructions I can find.
|
MVS 3.8J Turnkey 5 Update-3 announced.
23
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
|
Running MVS tk5 upt3 on Apple M2
4
Must have asked before but cannot search the topic. Sorry to ask again how to start tk5 update 3 under MacOS Arm M2. Got these message: ./start_herc: line 17: readelf: command not found arch: Unknown architecture: i386 if I tried mac_osx it is not even allowed to run. Somehow I recalled running ok in the past under macOS.
|
How to mount a tape dynamically
2
currently I have the tape hard coded in the config file. ie 0565 3480 A02000.aws I would like to know the command to dynamically mount a tape to tape drive that is defined as 0560 3480 * regards; Rahim
|
LCS statement for windows CTC
2
Hello I am working on to establish communication between two hercules in same PC. I can see the LCS statement for Linux but my PC is on windows. Does someone has sample LCS statement to create a CTC between two hercules in same PC ? Jake
|
Tape mount UNIT not brought online
4
I do devinit 550 tape01.aws then .v 550,online The config file: 0550 3420 tape01.aws # tape 0551 3420 tape02.aws # tape The system log file: 17:36:39 HHC01603I ipl 1c0 17:36:39 HHC00811I Processor CP00: architecture mode ESA/390 17:36:45 HHC00006I SCLP console interface active 17:37:00 HHC00004I Control program identification: type MVS, name DEMOPKG, sysplex TESTPLX, level FFFFFF80A0000000 17:37:00 HHC00006I SCLP console interface active 17:42:53 HHC01603I devinit 550 tape01.aws 17:42:53 HHC00201I 0:0550 Tape file tape01.aws, type aws: tape closed 17:42:53 HHC00221I 0:0550 Tape file tape01.aws, type AWS: format type AWS Format tape file 17:42:53 HHC02245I 0:0550 device initialized 17:43:08 HHC00160I SCP command: v 550,online 17:43:08 IEE624I SYSTEM CONSOLE INPUT REJECTED, ISSUE VARY CN(*),ACTIVATE COMMAND TO ENABLE SYSTEM CONSOLE COMMUNICATIONS 17:43:23 HHC00160I SCP command: v cn(*),act 17:43:23 IEE712I VARY CN PROCESSING COMPLETE 17:43:33 HHC00160I SCP command: v 550,online 17:43:33 IEE103I UNIT 0550 NOT BROUGHT ONLINE 17:43:33 IEE763I NAME= IECTDSRV CODE= 0000000800000000 17:43:33 IEA436I I/O ERROR DURING DEVICE INITIALIZATION 17:43:33 IEE764I END OF IEE103I RELATED MESSAGES regards; Rahim Azizarab 312-973-6203
|
Unzipping MVS .ZIP data sets
2
Dear all, I'm trying to unzip some of the .ZIP files on the TK5 system but with no success. Does somebody have a working sample how this can be done successfully. Many thanks in advance. Silvio
|
MVS 3.8j (TK5) Crashes on Massive SORT
10
I've been playing with a SORT job to stress test my system. It sorts 99,999,999 random 80 byte records. The job works just fine if I am running with 1 CPU. Run MVS with 2 CPUs and it typically locks up, clocks, and sometimes I have to clear SYS1.LOGREC after an IPL. As far as I have read, MVS 3.8j ought to work fine with 2 CPUs but I've verified this enough to know that I can reliably reproduce the issue. If anyone has any ideas and would like me to produce some debug data to sift through, please let me know. In the meantime, I'll run MVS with 1 CPU.
|
SORT, REGION and MAIN
3
How do the values of REGION JCL paramater and the SORT parameter MAIN relate to one another. I suspect that REGION might need to be a bit larger than MAIN, but I cannot find any specific explanation. I'm playing around with a SORT of 99,999,999 randomly generated records. To get things work, I set the REGION to 2048K and MAIN to 1984K. The SORT works, but I'd like to be able to come up with the required values more scientifically. Running TK5/Update 3
|
Understanding PDS in MVS 3.8
40
Hi :) I am trying to understand how PDSs are allocated in a 3390. Facts: https://www.ibm.com/docs/en/zos/3.1.0?topic=pds-structure https://www.ibm.com/docs/en/zos/3.1.0?topic=pds-directory TSO001: 3390-1, 56,664 bytes/track PDS directory block: 256 bytes/dirBlock PDS EOF record: unknown Sequential Data Set With attributes: Record format: FB LRECL: 80 BLKSZ: 27,920 Primary space: 1 track Secondary space: 0 My expectations: Blocks per track: 2 56,664 bytes/track / 27,920 bytes/block = 2.0295 blocks/track Logical records per block: 349 27,920 bytes/block / 80 bytes/record = 349 records/block Max. logical records per track: 698 349 records/block * 2 blocks = 698 records I am able to confirm my expectations with the following card decks (please, find attached): fill-seq-ds-rc0.jcl (Creates a sequential data set with 698 logical records. RC=0) fill-seq-ds-sb37.jcl (Creates a sequential data set with 698 logical records, and ABENDs when inserting the logical record 699. SB37) Partitioned Data Set With attributes: Record format: FB LRECL: 80 BLKSZ: 27,920 Primary space: 1 track Secondary space: 0 Directory blocks: 1 Directory Blocks Space My expectations: 1 dirBlock = 256 bytes Min. dirEntry = 8+3+1=12 Max. entries = 21 256 / 12 = 21.333 I am able to get 20 members with the following card decks (please, find attached): fill-pds-dblk-rc0.jcl (Creates a PDS with 20 members, 1 logical record each. RC=0) fill-pds-dblk-sb14.jcl (Creates a PDS with 20 members, and ABENDs when creating the 21st member. SB14) Why 20 and not 21? What am I missing? Member Space My expectations: Space taken by directory blocks: 4 records 256 bytes / 80 bytes/record = 3.2 records Seq. DS max. logical records = 698 PDS max. logical records = 694 698 records/track - 4 records = 694 records I am able to create one member with max. 667 records with the following card decks (please, find attached): fill-pds-1member-rc0.jcl (Creates a PDS with 1 member with 667 records. RC=0) fill-pds-1member-sb37.jcl (Creates a PDS but ABENDs adding the member with 668 records. SB37) Why 31 records less? What am I missing? I am only able to create 14 members with 460 records total. 13 members with 34 records and 1 member with 18 records (please, find attached): fill-pds-20members-rc0.jcl (Creates a PDS with 14 members. RC=0) fill-pds-20members-sb37.jcl (Creates a PDS with 13 members, but ABENDs adding the 14th member with 19 records. SB37) Why 238 records less? What am I missing? Kind Regards
|
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
|
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?
|
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
|
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.
|
JCL Expert
19
Hi Does anyone know a utility to just check JCL syntax, like JCL Expert does? TIA João -- att. João
|
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
|
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
|
1 - 20 з 593