| 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
|