++USERMOD(ZP60004)       /* 3277 CONSOLE I/O */  .
++VER(Z038) FMID(EBB1102) PRE(UZ35462)
 /*
   PROBLEM DESCRIPTION:
     3270 HIGH INTENSITY IS NOT USED FOR IMMEDIATE ACTION MESSAGES.
       ALL CONSOLE MESSAGES DISPLAYED USING THE SHIPPED 3277
       CONSOLE SUPPORT ARE SHOWN IN LOW INTENSITY, WHEREAS THE
       EXPECTED BEHAVIOUR FOR 3270 OS CONSOLES IS THAT 3270
       DUAL INTENSITY IS EXPLOITED SO THAT IMMEDIATE MESSAGES
       INCLUDING WTORS ARE DISPLAYED IN HIGH INTENSITY UNTIL
       PROCESSED BY DOM.

       THIS USERMOD UPDATES THE 3277 CONSOLE WRITE MODULE TO
       UPDATE THE 3270 FIELD ATTRIBUTE BYTE FOR EACH IN-LINE
       MESSAGE LINE ACCORDING TO THE ACTION MESSAGE STATUS OF
       THE MESSAGE SHOWN ON THAT LINE BEFORE THE SCREEN IS
       WRITTEN.

   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 NO. 4.

     THE FOLLOWING MODULES AND/OR MACROS ARE AFFECTED BY THIS USERMOD:
     MODULES:
       IEECVETV
 */.