| DESCRIPTION OF ENHANCEMENTS |
Defect Tracking System Ticket(s) & Overview:
happen. The message included a last dispense date that was not actually
dispensed which caused some confusion.
Resolution:
-----------
Routines PSOERXU6 & PSOERXO1 are modified to send the most recent
RELEASED DATE/TIME field (#31) of the Prescription file (#52) in the
Current Status Details line of the message that reads 'First Fill:
##/##/##, Last Fill: ##/##/##, Refills Remaining:11'. If there is no
release date it will have spaces after Last Fill.
Technical Resolution:
---------------------
In routine PSOERXU6, at entry point BLDRESP+3 the code is changed to the
following:
; p715 Use last release date instead of last dispense date
S LRDATE=$$RXRLDT^PSOBPSUT(RXIEN),LRDATE=$$FMTE^XLFDT(LRDATE,"2D")
S FFILL=$$GET1^DIQ(52,RXIEN,22,"I"),FFILL=$$FMTE^XLFDT(FFILL,"2D")
S ACOM="First Fill:"_FFILL_", Last Fill:"_$S(LRDATE:LRDATE,1:" ")_",
1. INC24578457 - NCPDP CancelRxResponse message communicates incorrect
Refills Remaining:"_REFL
In routine PSOERXO1, at entry point CANDC+57 the code is changed to the
following:
..; p715 Use last release date instead of last dispense date
..S LRDATE=$$RXRLDT^PSOBPSUT(RXIEN),LRDATE=$$FMTE^XLFDT(LRDATE,"2D")
..S RESPONSE="First Fill:"_FFILL_", Last fill:"_$S(LRDATE:LRDATE,1:"
")_", Refills remaining:"_REFL
medication fill status to e-prescribers
Problem:
--------
VistA eRx pharmacy software sent CancelRxResponse messages that
misinformed electronic prescribers about medication fills that did not
|
