PSB*3.0*132 (12642)    BUILD (9.6)

Name Value
NAME PSB*3.0*132
DATE DISTRIBUTED 2021-09-01 00:00:00
PACKAGE FILE LINK BAR CODE MED ADMIN
REQUIRED BUILD
  • PSB*3.0*106
    ACTION:   Don't install, leave global
TYPE SINGLE PACKAGE
ALPHA/BETA TESTING NO
DESCRIPTION OF ENHANCEMENTS
This patch addresses the following issues:
Problem:
--------
The "B" index for fields ADDITIVES or SOLUTIONS is not created when the 
IEN of either is 1.  The ADDITIVES field points to the IV ADDITIVES file 
#52.6 and the SOLUTIONS field points to the IV SOLUTIONS file #52.7.  In 
routine PSBMD these fields are set to a value of 1 as a placeholder 
before the filer routine (FILE^DIE) is called.  When the IEN of the field 
is also 1 (pointer in file #52.6 or file #52.7) the index does not get 
created because the filer routine doesn't detect a change and doesn't set 
the index.  This issue was found while analyzing another ticket. 
 
 
 
Resolution:
-----------
Routine PSBMD is modified to set the value of the placeholder to 0 
instead of 1.  This ensures that the filer routine will create the "B" 
index correctly. 
 
Technical Resolution:
---------------------
1. INC19372204 - Missing "B" index for solution, Addictive in File 53.68
Lines modified: RPC+37, RPC+39, RPC+42, RPC+43
Before this patch these lines set the following
   ^PSB(53.68,+PSBIENS,.6,I,0)=I
   ^PSB(53.68,+PSBIENS,.7,I,0)=I
   ^PSB(53.68,+PSBIENS,.6,I,0)=X
   ^PSB(53.68,+PSBIENS,.7,I,0)=X
After the patch these lines set the following:
   ^PSB(53.68,+PSBIENS,.6,I,0)=0
   ^PSB(53.68,+PSBIENS,.7,I,0)=0
   ^PSB(53.68,+PSBIENS,.6,I,0)=0
 
   ^PSB(53.68,+PSBIENS,.7,I,0)=0
 
Defect Tracking System Ticket(s) & Overview:
 
1.  INC19372204 - Missing "B" index for solution, Addictive in File 53.68
 
TRACK PACKAGE NATIONALLY YES
XPI1 NO
XPO1 NO
XPZ1 NO
SEQ# 115
BUILD COMPONENTS
  • ENTRIES:
    • PSBMD
      ACTION:   SEND TO SITE
      CHECKSUM:   B176508243