PSO*7.0*602 (11743)    BUILD (9.6)

Name Value
NAME PSO*7.0*602
DATE DISTRIBUTED 2020-04-23 00:00:00
PACKAGE FILE LINK OUTPATIENT PHARMACY
TYPE SINGLE PACKAGE
ALPHA/BETA TESTING NO
DESCRIPTION OF ENHANCEMENTS
This patch addresses the following issue:
 
                           Digits 
         DESCRIPTION:      Price per dispense unit.  
 
         TECHNICAL DESCR:  This is the price per dispense unit (per ML/MG
                           etc.) that is calculated when entering the
                           price per order unit, e.g. Price per order unit
                           (bottle) =$0.49, dispense unit is ML & the
                           bottle has 1000ML. Price per dispense unit =
                           $(0.49/1000) = $0.00049 = $0.0005 (rounded to
                           the 4th decimal).  
   
 
 
Pre-Installation Instructions:
=============================
This patch may be loaded with users on the system. You may wish to 
install it during non-peak hours. Installation will take less than 1 
minute. 
 
 
Installation Instructions:
Files & Fields Associated:
=========================
   1. Choose the PackMan message containing this patch.
 
   2. Use the 'INSTALL/CHECK MESSAGE' option of the PackMan menu. This
      option will load the KIDS patch onto your system.
 
   3. On the 'Kernel Installation & Distribution System' Menu (KIDS),
      select the 'Installation' menu.
 
   4. From this menu, you may elect to use the following option. When 
 
      prompted for the INSTALL NAME select the package 'PSO*7.0*602':
 
      a. Print Transport Global - This option will allow you to print 
         only a summary of the patch, to print a summary of the patch and
         the routines in the transport global, or to print only the
         routines in the transport global.
 
      b. Compare Transport Global to Current System - This option will 
         allow you to view all changes that will be made when this patch
         is installed. It compares all components of this patch (routines,
File Name (Number)      Field Name (Number)          New/Modified/Deleted
         DDs, templates, etc.).
      
   5. From the Installation Menu, select Backup a Transport Global - This 
      option will create a backup message of any routines exported with 
      this patch. It will not backup any other changes such as DDs or
      templates.
 
   6. Use the 'Install Package(s)' option under the 'Installation' menu 
      and select the package 'PSO*7.0*602'.
 
------------------      --------------------------   --------------------
   7. When prompted 'Want KIDS to INHIBIT LOGONs during the install? 
      NO//', choose 'NO'.
 
   8. When prompted 'Want to DISABLE Scheduled Options, Menu Options, 
      and Protocols? NO//', choose 'NO'.
 
 
Installation Verification:
=========================
Review the Data Dictionary changes listed above using VA FileMan. 
PRESCRIPTION (#52)      UNIT PRICE OF DRUG (#17)     Modified
 
Select OPTION: 8  DATA DICTIONARY UTILITIES
Select DATA DICTIONARY UTILITY OPTION: 1  LIST FILE ATTRIBUTES
 START WITH What File: PRESCRIPTION//     (1863777 entries)
      GO TO What File: PRESCRIPTION//     (1863777 entries)
      Select SUB-FILE: 
Select LISTING FORMAT: STANDARD//   
Start with field: FIRST// 17  UNIT PRICE OF DRUG
Go to field: 17  UNIT PRICE OF DRUG
 
               
 
Back-out/Rollback Strategy:
==========================
In the event of a catastrophic failure, the Facility CIO may make the 
decision to back-out the patch.
 
The back-out plan is to edit the Data Dictionaries returning them to
original pre-install state.
 
To verify the back-out completed successfully, ensure the INPUT 
 
TRANSFORMS have been edited as follows.
 
Using FileMan, go to UTILITY FUNCTIONS, INPUT TRANSFORM (SYNTAX)
 
Select OPTION: 6  UTILITY FUNCTIONS
Select UTILITY OPTION: 5  INPUT TRANSFORM (SYNTAX)
 
Modify what File: PRESCRIPTION//          (1863777 entries)
Select FIELD: 17  UNIT PRICE OF DRUG
UNIT PRICE OF DRUG INPUT TRANSFORM: 
Associated ticket(s):
K:+X'=X!(X>999999)!(X<0)!(X?.E1"."5N.N) X
  Replace 999999 With 9999  Replace 
   K:+X'=X!(X>9999)!(X<0)!(X?.E1"."5N.N) X
'HELP'-PROMPT: Type a Number between 0 and 999999, 4 Decimal Digits
           Replace 999999 With 9999  Replace 
   Type a Number between 0 and 9999, 4 Decimal Digits
XECUTABLE 'HELP': 
 
=====================
 
1. INC9558577 Sites' seeing Not ECME Billable: Cannot find price for Item
 
 
Associated NSR(s):
==================
N/A
 
Participating Test Sites:
1. When the UNIT PRICE OF DRUG in the Drug file (#50) is set to a higher
=========================
TBD
 
 
Defect Tracking System Ticket(s) & Overview:
===========================================
 
1. INC9558577 Sites' seeing Not ECME Billable: Cannot find price for Item
 
   Problem:
value than 9999.00 then when a RX is entered the value is not filed into
   -------
 
   When the UNIT PRICE OF DRUG in the Drug file (#50) is set to a higher
   value than 9999.00 then when a RX is entered the value is not filed
   into the Prescription file and (if ECME is setup) the message 'Cannot
   find price for Item' is also displayed during the RX entry process
   (Patient Prescription Processing).   The Input Transform of the UNIT
   PRICE OF DRUG field in file 52 prevents a value from being stored when
   it is greater than 9999.0000.  During testing it was also found that 
   the field CURRENT UNIT PRICE OF DRUG (#1.2) in the Refill sub record
the Prescription file and (if ECME is setup) the message 'Cannot find
   allowed the price of the drug to be filled with a value greater than
   the input transform was defined to allow.
 
 
   Resolution:
   ----------
   The input Transform of the UNIT PRICE OF DRUG in the Prescription file
   (#52) is modified to allow a maximum value of 999999.0000.  This 
   matches the maximum values in fields PRICE PER ORDER UNIT, PRICE PER
   DISPENSE UNIT, and PRICE PER DISPENSE UNIT in the Drug File (#50)
price for Item' is also displayed during the RX entry process (Patient
   The input Transform of the CURRENT UNIT PRICE OF DRUG (#1.2) in the 
   Prescription file (#52) is also modified to allow a maximum value of 
   999999.0000.  Routine PSOR52 is also modified to not stuff the price of
   the drug into the refill field which avoided the input transform
   specifications. 
 
 
 
Test Sites:
==========
Prescription Processing).   The Input Transform of the UNIT PRICE OF DRUG
 
 
Data Dictionaries Before:
========================
 
52,17    UNIT PRICE OF DRUG     0;17 NUMBER (Required)
 
         INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<0)!(X?.E1"."5N.N) X
         LAST EDITED:      FEB 27, 2020 
         HELP-PROMPT:      Type a Number between 0 and 9999, 4 Decimal 
field in file 52 prevents a value from being stored when it is greater
                           Digits 
         DESCRIPTION:      Price per dispense unit.  
 
         TECHNICAL DESCR:  This is the price per dispense unit (per ML/MG
                           etc.) that is calculated when entering the
                           price per order unit, e.g. Price per order unit
                           (bottle) =$0.49, dispense unit is ML & the
                           bottle has 1000ML. Price per dispense unit =
                           $(0.49/1000) = $0.00049 = $0.0005 (rounded to
                           the 4th decimal).  
than 9999.0000
 
 
Data Dictionaries After:
=======================
 
52,17    UNIT PRICE OF DRUG     0;17 NUMBER (Required)
 
         INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."5N.N) X
         LAST EDITED:      FEB 27, 2020 
         HELP-PROMPT:      Type a Number between 0 and 999999, 4 Decimal 
TRACK PACKAGE NATIONALLY YES
XPI1 NO
XPO1 NO
XPZ1 NO
FILE
  • DD NUMBER:
    • DRUG (File-top level)
      FIELD NUMBER:
      • PRICE PER ORDER UNIT
    UPDATE THE DATA DICTIONARY:   YES
    SEND SECURITY CODE:   YES
    SEND FULL OR PARTIAL DD:   PARTIAL
    DATA COMES WITH FILE:   NO
    MAY USER OVERRIDE DATA UPDATE:   NO
  • DD NUMBER:
    • PRESCRIPTION (File-top level)
      FIELD NUMBER:
      • UNIT PRICE OF DRUG
    • REFILL (sub-file)
      FIELD NUMBER:
      • CURRENT UNIT PRICE OF DRUG
    UPDATE THE DATA DICTIONARY:   YES
    SEND SECURITY CODE:   YES
    SEND FULL OR PARTIAL DD:   PARTIAL
    DATA COMES WITH FILE:   NO
    MAY USER OVERRIDE DATA UPDATE:   NO
SEQ# 504
BUILD COMPONENTS