Usermods for OS/VS2 MVS 3.8J
Non-SMP ModificationsUpdate the subcommand table of TSO TEST. (Nov. 2002)
Add new subcommands to TEST, and register TSO commands to be available from within TEST sessions.
Increase maximum XF Assembler ESD count. (Jan. 2004) (Cover Letter)
An SMP version of this is available below as usermod ZP60024.
Alter IFOX41 and IFOX42 to support an increased maximum ESD count. The change shipped here increases the value from 399 to 511.
Additional information is contained in the cover letter included in each USERMOD.
ZAP by Shelby Beach to allow M as the megabyte scaling indicator for the REGION parameter in JCL.
Reinstall the UZ55134 level of IKTVTGET over the version shipped by UZ57385. If UZ57385 has not been accepted then do not install this USERMOD, but simply RESTORE UZ57385.
The older level of IKTVTGET allows the display of TPUT output asynchronously after TGET NOWAIT processing without waiting for the terminal user to press ENTER.
The newer level of IKTVTGET was meant to fix a "problem" (OZ60978) where the keyboard was not unlocked on non-SNA 3270 terminals after a TGET NOWAIT. Of course, the application programmer could have circumvented this problem by unlocking the keyboard with the correct Write Control Character (WCC) in the preceding TPUT. In any event, a side-effect of this fix is that TPUT data after a TGET NOWAIT is not displayed until the user presses ENTER (or another attention input key).
The function of this USERMOD is now subsumed by USERMOD ZP60009 (see below).
IEECVXIT WTO Exit to automatically start TSO whenever the IST020I VTAM INITIALIZATION COMPLETE message is issued.
ZP60002a - ZIP file of ASCII job stream. (Nov. 2002) (Cover Letter)
ZAP reworked for Volker Bandke's MVS Turnkey CD # 3.
ZAP to stop TSO TEST 'LIST .... I' stopping at an invalid op-code.
ZP60003 - ZIP file of ASCII job stream. (Oct. 2001)
ZAP to allow the XF Assembler (PGM=IFOX00) to accept blank input records as valid just like HLASM (PGM=ASMA90).
ZP60004 - ZIP file of ASCII job stream. (Nov. 2001)
ZAP to show WTORs and immediate action messages on 3270 consoles in high intensity.
ZP60005a - ZIP file of ASCII job stream. (Nov. 2002) (Cover Letter)
ZAP reworked for Volker Bandke's MVS Turnkey CD # 3.
ZAP to enable IOS SIO counts for channels and devices all the time, even if MF/1 is not running.
ZAP to show EXCP count in data set disposition messages. (The Sam Golob rework of the famous "I/O count ZAP".)
SYSMOD to support the CONFTXT TSO/VTAM PARMLIB setting. Setting this to NO allows a VTAM trace to report the data going to and from a TSO terminal.
(Updated Jan. 2003 to remove a blank line from source code.)
SYSMOD to add EWA (Erase/Write Alternate) and WSF (Write Structured Field) support for local non-SNA 3270 terminals to VTAM.
SYSMOD to upgrade TSO/VTAM 3270 screen handling to a TSO/E-compatible level (almost). This sysmod is to be applied to systems at a software level equivalent to Volker Bandke's Turnkey CD #3. If you have applied VZ55134 above then RESTORE it first. In order to be able to back-out this system software update, set up JCL to restore this usermod which can submitted without TSO, because this usermod affects TSO terminal communication - otherwise you might have to resort to that usually superfluous overhead: the system backup. Be aware that this sysmod uses data in column 80, so do not submit it with old versions of Hercrdr. This sysmod uses function supplied by ZP60008.
5th March 2003 - Fixed keyboard lock/unlock problems arising from the display of asynchronous line mode messages during processing by a fullscreen application using NOEDIT TPUTs (such as QUEUE when the screen size is larger than 4096 locations).
30th March 2003 - Changed TPUT FULLSCR when standard WRITE (x'F1') and no-op WCC (x'40') such that the inclusion of an IC order is no longer forced, thus allowing asynchronous partial screen updates which do not move the cursor and so allow text input to continue without disruption.
14th August 2005 - Changed to allow line mode messages to extend beyond column 80 without forcing a line wrap when the screen is wider than 80 columns.
1st June 2009 - Changed extended logon routine to check for SNA session bind data, and if found extract the screen sizes and Query bit setting from the bind. If the Query bit is off in the SNA bind then the Query of the terminal is not done.
7th November 2009 - Changed logon reconnect routine to store the new primary and alternate screen size dimensions so that TSO applications can use GTTERM to detect dynamic screen size changes caused by reconnecting to a disconnected session using a terminal with a different screen size.
28th April 2012 - Improve the interoperability of TPUT NOEDIT (with the x'02' "unlock keyboard" bit set in the WCC) and TGET NOWAIT to match that of TPUT FULLSCR and TGET NOWAIT.
20th April 2019 - Improve IKTVTGET modifications to allow TGET NOWAIT to become active without actual data transfer being required to set up the process, remove unnecessary debug code including flag bytes from the IKT3270O CSECT, and remove all code point restrictions from TPUT FULLSCR data.
21st June 2020 - Change IKJ3270I so that the number of lines that line mode input is assumed to occupy is based on that actual screen width rather than 80 columns.
26th November 2022 - Basically this update fixes the changes made to IKTVTGET in 2019 where the zap was replaced by source code changes so that other source code changes could be made. The source code change version did not correctly implement the change that the zap made which resulted in TPUT HOLD processing experiencing intermittent endless wait states, so this has now been corrected. The other source code change to fix the auto-update of cases such as IM G from the READY prompt has now be redone so that it also works correctly.
ZP60011 - ZIP file of ASCII job stream. (Mar. 2003)
SYSMOD to capture channel programs (that is, the CCWs) in SIO GTF Trace records. Not quite a CCW trace since there is no guarantee that the channel will execute all of the CCWs passed to SIO, but the next best thing. CCW capture may be less than 100%. 25 CCW limit per SIO. The appropriate routine of AMDPRDMP shipped here will format the extra data in the SIO records - one print line per CCW - with not only the raw data but with command code category, flags set, and decimal byte count all broken out. Up to eight (8) bytes of write data may also be captured for non-DASD (because it is stored in the seek address field). Mod goes on to base level FBB1221 and is good for CD#3.
SYSMOD to alter the TSO TMP ESTAI and ESTAE routines to report the Program Interrupt Code as the abend reason code for program check abends, instead of whatever happens to be in register 15 at the time. (The abend code and the reason code are reported by the TMP in the second level of the IKJ56641I message. Second level messages are displayed when a question mark is entered. The availability of such second level messages is indicated when messages end with a plus sign.) This will aid in locating the failing instruction which is especially helpful during TEST debugging sessions, or when TEST is to be started immediately after such an abend.
ZP60013 - ZIP file of ASCII job stream. (Jan. 2005)
SYSMOD to alter the SVC FLIH to maintain event counts for each of the 256 SVC numbers in a contiguous table. This table can be accessed by monitors or any other software to get the current SVC event counts since IPL. Also, issuing an SVC in cross-memory mode will now cause an S0F8 abend.
ZP60014 - ZIP file of ASCII job stream. (Sep. 2005 - updated Dec. 2020)
SYSMOD to add 20 control variable and built-in function extensions to TSO CLISTs. Additions include extra date and time formats, more environmental variables, the SYSDSN built-in function to check data set availability, the NRSTR built-in function to suppress rescans and retain double ampersands, and the SYSOUTTRAP facility where line mode output can be trapped and placed into CLIST variables.
The latest addition is the SYSISPF variable to report whether ISPF is active or not.
ZP60015 - ZIP file of ASCII job stream. (Sep. 2005)
SYSMOD to alter JES2 to expand the power of the default search of the TSO STATUS command. Normally a TSO STATUS command without operands will report jobs with names equal to the userid plus one character. With this change JES2 will collect the status of jobs with names equal to the userid plus 0, 1, 2 and 3 characters. This update is designed to operate with ZP60016.
ZP60016 - ZIP file of ASCII job stream. (Sep. 2005)
SYSMOD to alter the TSO STATUS command to report extra information collected by JES2 to expand the power of the default search of the TSO STATUS command. Normally a TSO STATUS command without operands will report jobs with names equal to the userid plus one character. With this change STATUS can list jobs with names equal to the userid plus 0, 1, 2 and 3 characters. This update is designed to operate with ZP60015.
The ZP60015 and ZP60016 usermods were developed to increase the usefullness of the REVOUT command when no job name is specified.
ZP60017 - ZIP file of ASCII job stream. (Nov. 2006)
SYSMOD to alter the Master Trace Table initialization to place the MTT into CSA (instead of private storage of ASID 1) so that it can be readily displayed (such as by IMON/370 option OT) for diagnostic and operational purposes.
ZP60018 - ZIP file of ASCII job stream. (Jan. 2007)
SYSMOD to alter the the formatting of System Trace table entries in a dump.
ZP60019 - ZIP file of ASCII job stream. (Jun. 2007)
SYSMOD to record CPU time used by jobs with TIME=1440 specified.
ZP60020 - ZIP file of ASCII job stream. (Nov. 2007)
SYSMOD to remove Linkage Editor block size limit of 3200 for the SYSLIN file. (Enrico Sorichetti rework of old zap for the Turnkey system.)
ZP60021 - ZIP file of ASCII job stream. (Nov. 2007)
SYSMOD to show keyboard characters in a SYSUDUMP storage dump instead of periods for all character code points except a space, numbers and upper case letters.
ZP60022 - ZIP file of ASCII job stream. (Dec. 2007)
SYSMOD to allow STAX to detect and process the Format 1 parameter list introduced with MVS/XA. This means that code assembled with later STAX macro versions without SPLEVEL being set to 1 will correctly pass the user parameter to the attention exit after PA1 is pressed in a TSO session, thereby avoiding incorrect processing which typically results in abends such as S0C4.
If a PA1 at the PDS subcommand prompt gives you an S0C4 abend then this fix is for you!
ZP60023 - ZIP file of ASCII job and EBCDIC MCS. (Nov. 2008)
SYSMOD to introduce OS support of the Dual Address Space (DAS) facility with the secondary address space of a task being automatically restored by the system whenever a task is dispatched. Both locked and unlocked tasks can set the secondary address space (using the SSAR instruction) and have it restored by the system, but system support of secondary address space private page fault resolution (other than SASN=PASN) only extends to unlocked tasks. Unlocked tasks taking secondary address space private page faults (other than SASN=PASN) need to guarantee they will not be swapped out. The system will set the key mask for the task's key (or SRB's PSW key) during SSAR and task restore processing.
This rework (August 2016) removes OS simulation of post-370 instructions such as the halfword immediate instructions. This feature has been removed because:
An old version of this SYSMOD is available here for reference purposes in case you want to see how to (not?) add instruction simulation to the PCFLIH.
SMP packaging of the non-SMP mod above to increase the maximum XF Assembler (IFOX00) external symbol count from 399 to 511.
SYSMOD to add support for the BAS and BASR instruction mnemonics to the XF Assembler (IFOX00).
A zip of an XMIT file containing the updated source is also available for download.
ZP60026 - ZIP file of ASCII job stream. (Jan. 2010)
SYSMOD to add support for the REUSE operand of the TSO ALLOCATE command.
27th February 2010 - Reworked to also update the ALLOCATE TSO HELP member.
ZP60027 - ZIP file of ASCII job stream. (Mar. 2010)
SYSMOD from Tom Armstrong to apply a couple of zaps in support of including the time of day in the IDR created by the Linkage Editor.
One zap is to the Linkage Editor so that the IDR it creates will now be four bytes longer. The four bytes added to the end will be the link edit time (0hhmmssF) in packed decimal. This makes the IDR the same format as produced by the modern Program Binder.
Another zap is to the AMBLIST service aid which allows the LISTIDR report to format and output the link edit time when processing a program's identification records.
ZP60028 - ZIP file of ASCII job stream. (Mar. 2010)
SYSMOD to improve the formatting of module headers when the register save area chain is processed when writing formatted dumps. Similar to ZP60021 in that it reduces the "periods frenzy" but for a different part of the dump.
ZP60029 - ZIP file of ASCII job stream. (Jul. 2010)
SYSMOD to customize the translation tables used by the XLATE macro when translating data between the EBCDIC and ASCII character sets. (XLATE is used by the OPTCD=Q DCB setting and by REVIEW with ASCII ON.) Customize the tables for your usage before applying.
ZP60030 - ZIP file of ASCII job stream. (Jan. 2011)
SYSMOD to correct MF/1 channel measurement and thus also supply correct data in type 73 SMF records.
ZP60031 - ZIP file of ASCII job stream. (Dec. 2011)
SYSMOD to change JES2 to allow SMF type 6 and type 26 records and the IEFUSO and IEFUJP SMF exits for started tasks. That is, the relevant settings on the &STC JES2 parameter statement can now be used to control these aspects of started task SMF processing.
ZP60032 - ZIP file of ASCII job stream. (Apr. 2012)
SYSMOD to ship an updated GTTERM macro which supports the TERMID operand and so exploit new function delivered by ZP60009. [A separate usermod is required because the GTTERM macro is owned by TIOC (FMID ETI1106) while ZP60009 updated parts of TSO/VTAM (FMID ETV0108).]
ZP60033 - ZIP file of ASCII job stream. (Jan. 2017)
SYSMOD to ship an updated GETMAIN macro which supports the LOC operand. This should help reduce the effort required to migrate and maintain software written for newer versions of the operating system. This is also the version of GETMAIN used to assemble the MVS/370 version of REVIEW.
ZP60034 - ZIP file of ASCII job stream. (Mar. 2017)
SYSMOD to ship an updated IKJEFF10 SUBMIT exit. This version is based on a much older version which automatically appended USER= and PASSWORD= on to the JOB statement to effectively deliver automatic security user ID propagation for batch jobs submitted using the TSO SUBMIT command. The change added to this version is to allow the system JCL symbol &SYSUID to be resolved at SUBMIT time, which should help reduce the local customization needed when running local versions of sample job streams.
ZP60035 - ZIP file of ASCII job stream. (Aug. 2017)
The first in a set of three SYSMODs containing updates by Tom Armstrong to generalize DASD device support for LOGREC by using system services instead of separately maintained hard-coded values for each supported device type. Since MVS 3.8 requires that LOGREC resides on the IPL volume, this removes a barrier to migrating the IPL volume to any newer device type that MVS now supports.
This SYSMOD ships the updated IFBSVC76 module which is the LOGREC writer (SVC 76). An IPL with a CLPA is needed to activate this one.
ZP60036 - ZIP file of ASCII job stream. (Aug. 2017)
(Reissued 2017-11-02 to change the only BASR instruction to BALR.)
The second in a set of three SYSMODs containing updates by Tom Armstrong to generalize DASD device support for LOGREC by using system services instead of separately maintained hard coded values for each supported device type. Since MVS 3.8 requires that LOGREC resides on the IPL volume, this removes a barrier to migrating the IPL volume to any newer device type that MVS now supports.
This SYSMOD ships the updated IFCDIP00 module which is the program used to initialize the SYS1.LOGREC data set. In fact, this module still contains one hard-coded device dependent artefact: a table of 4-byte character values which are used to report the device type that was processed.
ZP60037 - ZIP file of ASCII job stream. (Aug. 2017)
The third in a set of three SYSMODs containing updates by Tom Armstrong to generalize DASD device support for LOGREC by using system services instead of separately maintained hard coded values for each supported device type. Since MVS 3.8 requires that LOGREC resides on the IPL volume, this removes a barrier to migrating the IPL volume to any newer device type that MVS now supports.
This SYSMOD ships the updated IFCIOHND module which handles the I/O to the LOGREC data set for EREP.
ZP60038 - ZIP file of ASCII job stream. (Jan. 2018 - updated Jul. 2019)
Ths modification adds module IKJCT441 to MVS which provides an API for application programs running in a CLIST environment to process CLIST symbolic variables. The names and values of CLIST symbolic variables can be retrieved, new variables can be created, and values of variables can be updated. The new IKJCT441 module resides in PLPA. The API is compatible with documentation available for similarly named modules from elsewhere.
ZP60039 & ZP60040 - ZIP file of ASCII job stream. (Aug. 2018 -> May 2023)
A 2-SYSMOD set of updates by Tom Armstrong to add support for the TEXT= operand of the WTO and WTOR macros. ZP60039 updates modules IEAVVWTO and IEAVMWTO as well as macros IEZWPL and WTO, all owned by FMID FBB1221, while ZP60040 updates module IGC0203E and macro WTOR owned by FMID EBB1102.
April 2019 update fixes TPUT of WTP messages.
August 2020 update removes abend SD23 when text exceeds the maximum supported length - the text is now silently truncated.
March 2022 update removes a blank line from the WTO macro and the WTOR macro.
May 2023 update moves a sequence symbol from a machine instruction to an unlabelled ANOP.
A 3-SYSMOD set of updates including contributions from Tom Armstrong to add support for referring the current IPL (or system residence) volume by using 6 asterisks in catalog entries and SYS1.PARMLIB members, as well as adding support for generic volume masks in the VATLSTxx member of SYS1.PARMLIB.
FeedbackFor enquiries or feedback please email Greg Price.
Copyright © 2003 Prycroft Six Pty Ltd - ABN 17 006 544 636 - All rights reserved.