The @@TIAUL USERMOD Patch

This topic lists the @@TIAUL USERMOD for IBM DB2 UDB for z/OS. Before copying the following code and applying the USERMOD, change the modification control statements to reflect the applicable maintenance level of the existing DSNTIAUL utility; comments in the @@TIAUL USERMOD provide specific instructions.

Note: Sequence numbers must start in column 72.

++ USERMOD (@@TIAUL) REWORK(2010007)
  /*
  USERMOD @@TIAUL:
  ALLOW RETCODE 0 EVEN WHEN SELECTING LIMITED COLUMNS.
  THIS USERMOD WILL CAUSE ONE SECTION OF CODE TO BE BYPASSED.

  THIS SECTION SETS RETURN CODE 4 IN THE CASE OF A SELECT NOT BEING A FULL SELECT WITH "*". THE CHANGE WILL NO LONGER FORCE A RETURN CODE 4.

 THE CHANGE ALSO INCLUDES AN "ORACLE81" EYECATCHER.
  
NOTE:
  THE PRE-REQUISITE (PRE) OPERAND <<MUST>> BE CHANGED ON THE
  ++VER CONTROL STATEMENT TO REFLECT CURRENT MAINTENANCE LEVEL.

  MACRO DETAILS:

  MACRO    FMID    RMID    SYSLIB   DISTLIB  DATE
  DSNTIAUL HDB8810 UK50731 SDSNSAMP ADSNMACS 2010.01.07

  */ .
++ VER (P115)
  FMID(HDB8810)
  PRE  (UK50731)
  /*
  ***************************************************************
  * DO NOT ADD LINE NUMBERS TO THIS USERMOD!                    *
  ***************************************************************
  * REP  LINE  WITH SEQ NUMBERS 04600000                        *
  * SKIP LINES WITH SEQ NUMBERS 11900000 TO 11930000            *
  ***************************************************************
  */ .
++MACUPD(DSNTIAUL) DISTLIB(ADSNMACS) .
./ CHANGE NAME=DSNTIAUL
     SAVE  (14,12),,'DSNTIAULORACLE81&SYSDATE.&SYSTIME'     @ORACLE 04600000
***  DO NOT SET WARNING RETURN CODE ***                     @ORACLE 11895000
     AGO   .NOSLCT_BYPASS                                   @ORACLE 11895001
.NOSLCT_BYPASS ANOP ,                                       @ORACLE 11935000
./ ENDUP