++USERMOD(ZP60039)   REWORK(20220308)                      .
++VER(Z038) FMID(FBB1221)
  PRE(UZ62088,UZ31484)
  REQ(ZP60040)
  SUP(ZUM0013,TMVS805)
 /*
   PROBLEM DESCRIPTION:
     MESSAGE TEXT SUPPLIED TO THE WTO AND WTOR MACROS MUST BE INLINE.
       APPLICATIONS ISSUING WTO MESSAGES CANNOT SPECIFY DISPLAY
       TEXT WHICH IS REMOTE, THAT IS, NOT PHYSICALLY LOCATED
       WITHIN THE WTO OR WTOR PARAMETER LIST.

       CHANGES MADE BY THIS SYSMOD INCLUDE:
         - ENHANCE THE IEZWPL MACRO TO DESCRIBE THE EXTENDED WTO
           PARAMETER LIST (XWPL).
         - ENHANCE THE WTO MACRO TO ACCEPT THE TEXT= OPERAND AND
           CONSTRUCT A WPL OR XWPL AS REQUIRED.
         - ADD SUPPORT FOR THE XWPL INTO IEAVVWTO (SVC 35) AND
           IEAVMWTO (SVC 35 MULTI-LINE WTO SERVICE ROUTINE).
         - ALWAYS COPY THE WPL OR XWPL TO PROTECTED STORAGE,
           INSTEAD OF ONLY FOR UNAUTHORIZED CALLERS.
         - IMPROVED WPL VALIDATION TO AVOID INTERNAL ERRORS AND
           ISSUE SD23 ABENDS IN ACCORDANCE WITH DOCUMENTATION.
         - IMPROVE WTO MESSAGE CHARACTER RENDERING BY DISPLAYING
           MOST STANDARD KEYBOARD CHARACTERS UNTRANSLATED, AND
           SHOWING OTHER CODE POINTS AS A TILDE INSTEAD OF A BLANK.
         - SUBSUME THE FUNCTION OF USERMOD TMVS805 - ALSO WIDELY
           SHIPPED AS USERMOD ZUM0013 - BY KEVIN LEONARD, MAINLY
           BECAUSE THAT USERMOD WOULD NEED TO BE ADAPTED TO FIT THE
           UPDATES SHIPPED HERE.  THE TMVS805/ZUM0013 FUNCTION IS:
             - ALLOW IEECVXIT TO ACCESS "INTERNAL" MESSAGES, THEREBY
               FACILIATING MORE POWERFUL AUTOMATED OPERATIONS.
             - PREVENT HARDCOPY OF DELETED MESSAGES.
           NOTE THAT THE TMVS805/ZUM0013 CHANGES CAN BE DEACTIVATED
           BY ALTERING A SWITCH IN THE IEAVVWTO SOURCE CODE AND
           RECOMPILING.

   SPECIAL CONDITIONS:
     ACTION:
       A "CLPA" MUST BE PERFORMED AT IPL TIME FOR THIS SYSMOD TO
       BECOME ACTIVE.

   COMMENTS:
     PRYCROFT SIX P/L PUBLIC DOMAIN USERMOD FOR MVS 3.8 NUMBER 39.

     REWORK HISTORY:
       2018-08-20: INITIAL AVAILABILITY.
       2020-08-18: SILENTLY TRUNCATE EXCESSIVELY LONG TEXT.
       2022-03-08: REMOVE A BLANK LINE FROM THE WTO MACRO.

     THIS IS SYSMOD NUMBER 1 OF 2 IN A PACKAGE TO SUPPORT TEXT= ON
     WTO AND WTOR MACROS DEVELOPED BY TOM ARMSTRONG.  BOTH SYSMODS
     SHOULD BE ACTIVATED IN THE SAME IPL.  THE SYSMOD DETAILS ARE:
      +---------+---------+------+----------+-----------------------+
      I USERMOD I FMID    I COMP I PART     I DESCRIPTION           I
      +---------+---------+------+----------+-----------------------+
      I ZP60039 I FBB1221 I SU64 I IEAVMWTO I MLWTO SERVICE ROUTINE I
      I         I         I      I IEAVVWTO I WTO/WTOR PROCESSOR    I
      I         I         I      I IEZWPL   I WTO PARAMETER LIST    I
      I         I         I      I WTO      I INVOKE WTO SERVICE    I
      +---------+---------+------+----------+-----------------------+
      I ZP60040 I EBB1102 I BCP  I IGC0203E I WRITE TO PROGRAMMER   I
      I         I         I      I WTOR     I INVOKE WTOR SERVICE   I
      +---------+---------+------+----------+-----------------------+

     THE FOLLOWING MODULES AND/OR MACROS ARE AFFECTED BY THIS USERMOD:
     MODULES:
       IEAVMWTO
       IEAVVWTO
     MACROS:
       IEZWPL
       WTO
 */.