| EN |
This entry point returns medication information for a
patient. Medication are comprised of Outpatient Pharmacy (Prescription detail
includes Partials fills, Refills, and CMOP data), Non-VA Medications, and
Pending Medications.
Note: This API has defined one entry point by parameter passing, to return
data from available data nodes from the PRESCRIPTION file (#52), Pharmacy
Patient file (#55)and the Pending Outpatient Order file (#52.41).
ZE - returns the Zero node TW - returns the Two node TH -returns the Three
node RF - returns all refills for a prescription PF - returns all partial
fills for a prescription CM - returns CMOP data AT - returns the Activity Logs
for a prescription OI - returns the Orderable Item for a prescription MI -
returns the medication instructions (SIG) NVA - returns the Non-VA Medications
PEND - returns the pending outpatient orders
Outpatient Pharmacy/Prescription Data - File 52
-----------------------------------------------------------
LIST="RX" to indicate a Outpatient pharmacy prescription IEN - File 52 IEN
Pointer
^TMP("MHV",$J,LIST,0)=Total RX entries returned by patient
or -1^NO DATA FOUND
^TMP("MHV",$J,LIST,IEN,.01)=RX #(52,.01)
^TMP("MHV",$J,LIST,IEN,1)=ISSUE DATE (52,1)^External Format
(ex: Sep. 12, 1999)
^TMP(,IEN,2)=PATIENT (52,2)^NAME (2,.01)
^TMP("MHV",$J,LIST,IEN,3)=PATIENT STATUS (52,3)
^TMP("MHV",$J,LIST,IEN,4)=PROVIDER (52,4)^NAME (200,.01)
^TMP("MHV",$J,LIST,IEN,5)=CLINIC (52,5)^NAME(44,.01)
^TMP("MHV",$J,LIST,IEN,6)=DRUG (52,6)^GENERIC NAME(50,.01)
^TMP("MHV",$J,LIST,IEN,6.5)=TRADE NAME (52,6.5)
^TMP("MHV",$J,LIST,IEN,7)=QTY (52,7)
^TMP("MHV",$J,LIST,IEN,8)=DAYS SUPPLY (52,8)
^TMP($"MHV",$J,LIST,IEN,9)=# OF REFILLS (52,9)
^TMP($"MHV",$J,LIST,IEN,10.3)=ORDER CONVERTED
(52,10.3)^External Format for the Set of Codes
^TMP("MHV",$J,LIST,IEN,10.6)=COPIES (52,10.6)
^TMP("MHV",$J,LIST,IEN,11)=MAIL/WINDOW (52,11)^External
Format for the Set of Codes
^TMP("MHV",$J,LIST,IEN,14)=ADMINISTERED IN CLINIC
^TMP("MHV",$J,LIST,IEN,16)=ENTERED BY (52,16)^NAME (200,.01)
^TMP("MHV",$J,LIST,IEN,17)=UNIT PRICE OF DRUG (52,17)
^TMP("MHV",$J,LIST,IEN,20)=DIVISION (52,20)^NAME(59,.01)
^TMP("MHV",$J,LIST,IEN,21)=LOGIN DATE (52,21)^External
Format (ex: Sep. 12, 1999)
^TMP("MHV",$J,LIST,IEN,22)=FILL DATE (52,22)^External Format
(ex: Sep. 12, 1999)
^TMP("MHV",$J,LIST,IEN,23)=PHARMACIST (52,23)^NAME (200,.01)
^TMP("MHV",$J,LIST,IEN 24)=LOT # (52,24)
^TMP("MHV",$J,LIST,IEN 25)=DISPENSED DATE (52,25)^External
Format (ex: Sep. 12, 1999)
^TMP("MHV",$J,LIST,IEN,26)=EXPIRATION DATE (52,26)^External
Format (ex: Sep. 12, 1999)
^TMP("MHV",$J,LIST,IEN,27)=NDC (52,27)
^TMP("MHV",$J,LIST,IEN,28)=MANUFACTURER (52,28)
^TMP("MHV",$J,LIST,IEN,29)=DRUG EXPIRATION DATE
(52,29)^External Format (ex: Sep. 12, 1999)
^TMP("MHV",$J,LIST,IEN,30)=GENERIC PROVIDER (52,30)
^TMP("MHV",$J,LIST,IEN,31)=RELEASE DATE/TIME (52,31)
^External Format (ex: Sep. 12, 1999)
^TMP("MHV",$J,LIST,IEN 32.1)=RETURNED TO STOCK
(52,32.1)^External Format (ex: Sep. 12, 1999)
^TMP("MHV",$J,LIST,IEN,32.2)=REPRINT (52,32.2)^External
Format for the Set of Codes
^TMP("MHV",$J,LIST,IEN,32.3)=BINGO WAIT TIME (52,32.3)
^TMP("MHV",$J,LIST,IEN,104)=VERIFYING PHARMACIST (52,104)
^NAME (200,.01)
^TMP("MHV",$J,LIST,IEN,12)=REMARKS (52,12)
^TMP("MHV",$J,LIST,IEN,26.1)=CANCEL DATE (52,26.1)^External
Format (ex: Sep. 12, 1999)
^TMP("MHV",$J,LIST,IEN,34.1)=DRUG ALLERGY INDICATION
(52,34.1)^External Format for the Set of Codes
^TMP("MHV",$J,LIST,IEN,39.3)=PLACER ORDER #
^TMP("MHV",$J,LIST,IEN,100)=STATUS (52,100)^External Format
for the Set of Codes
^TMP("MHV",$J,LIST,IEN,101)=LAST DISPENSED DATE
(52,101)^External Format (ex: Sep. 12, 1999)
^TMP("MHV",$J,LIST,IEN,102)=NEXT POSSIBLE FILL
(52,102)^External Format (ex: Sep. 12, 1999)
^TMP("MHV",$J,LIST,IEN,102.1)=PRIOR FILL DATE
(52,102.1)^External Format (ex: Sep. 12, 1999)
^TMP("MHV",$J,LIST,IEN,102.2)=PENDING NEXT POSSIBLE FILLDATE
(52,102.2) ^External Format (ex: Sep. 12, 1999)
^TMP("MHV",$J,LIST,IEN,109)=COSIGNING PHYSICIAN (52,109)
^NAME (200,.01)
^TMP("MHV",$J,LIST,IEN,112)=ORIGINAL QTY (52,112)
Prescription Refill - File 52 fld 52 (DD 52.1)
-------------------
LIST="RX" to indicate a Outpatient pharmacy prescription IEN - File 52 IEN
Pointer SUB = "RF" to indicate Refill multiple n = 52.1 mulitple pointer value
^TMP("MHV",$J,LIST,IEN,SUB,n,.01)=REFILL DATE
(52.1,.01)^External Format (ex: Sep. 12, 1999)
^TMP("MHV",$J,LIST,IEN,SUB,n,1)=QTY (52.1,1)
^TMP("MHV",$J,LIST,IEN,SUB,n,1.1)=DAYS SUPPLY (52.1,1.1)
^TMP("MHV",$J,LIST,IEN,SUB,n,1.2)=CURRENT UNIT PRICE
OF DRUG (52.1,1.2)
^TMP("MHV",$J,LIST,IEN,SUB,n,2)=MAIL/WINDOW (52.1,2)
^External Format for the Set of Codes
^TMP("MHV",$J,LIST,IEN,SUB,n,3)=REMARKS (52.1,3)
^TMP("MHV",$J,LIST,IEN,SUB,n,4)=PHARMACIST NAME (52.1,4)
^NAME(200,.01)
^TMP("MHV",$J,LIST,IEN,SUB,n,5)=LOT # (52.1,5)
^TMP("MHV",$J,LIST,IEN,SUB,n,6)=CLERK CODE (52.1,6)^NAME
(200,.01)
^TMP("MHV",$J,LIST,IEN,SUB,n,7)=LOGIN DATE (52.1,7)
^External Format (ex: Sep. 12, 1999)
^TMP("MHV",$J,LIST,IEN,SUB,n,8)=DIVISION (52.1,8)^NAME
(59,.01)
^TMP("MHV",$J,LIST,IEN,SUB,n,10.1)=DISPENSE DATE
(52.1,10.1)^External Format (ex: Sep. 12, 1999)
^TMP("MHV",$J,LIST,IEN,SUB,n,11)=NDC
^TMP("MHV",$J,LIST,IEN,SUB,n,12)=MANUFACTURER (52.1,12)
^TMP("MHV",$J,LIST,IEN,SUB,n,13)=DRUG EXPIRATION DATE
(52.1,13)^External Format (ex: Sep. 12, 1999)
^TMP("MHV",$J,LIST,IEN,SUB,n,14)=RETURNED TO STOCK
(52.1,14)External Format (ex: Sep. 12, 1999)
^TMP("MHV",$J,LIST,IEN,SUB,n,15)=PROVIDER (52.1,15)^NAME
(200,.01)
^TMP("MHV",$J,LIST,IEN,SUB,n,17)=RELEASED DATE/TIME
(52.1,17)^External Format (ex: Sep. 12, 1999)
^TMP("MHV",$J,LIST,IEN,SUB,n,23)=ADMINISTERED IN CLINIC
Prescription Partial fill- File 52 fld 60 (DD 52.2)
-------------------
LIST="RX" to indicate a Outpatient pharmacy prescription IEN - File 52 IEN
Pointer SUB = "PF" to indicate Refill multiple n = 52.2 mulitple pointer value
^TMP("MHV",$J,LIST,0)=Total entries returned by patient or
-1^NO DATA FOUND
^TMP("MHV",$J,LIST,IEN,100)=STATUS (52,100)^External Format
for the Set of Codes
^TMP("MHV",$J,LIST,IEN,SUB,0)= Total entries returned
or -1^NO DATA FOUND
^TMP("MHV",$J,LIST,IEN,SUB,n,.01)=PARTIAL DATE
(52.2,.01)^External Format (ex: Sep. 12, 1999)
^TMP("MHV",$J,LIST,IEN,SUB,n,.02)=MAIL/WINDOW
(52.2,.02)^External Format for the Set of Codes
^TMP("MHV",$J,LIST,IEN,SUB,n,.03)=REMARKS (52.2,.03)
^TMP("MHV",$J,LIST,IEN,SUB,n,.04)=QTY (52.2,.04)
^TMP("MHV",$J,LIST,IEN,SUB,n,.041)=DAYS SUPPLY (52.2,.041)
^TMP("MHV",$J,LIST,IEN,SUB,n,.042)=CURRENT UNIT PRICE
OF DRUG (52.2,.042)
^TMP("MHV",$J,LIST,IEN,SUB,n,.05)=PHARMACIST NAME
(52.2,.05)^NAME (200,.01)
^TMP("MHV",$J,LIST,IEN,SUB,n,.06)=LOT # (52.2,.06)
^TMP("MHV",$J,LIST,IEN,SUB,n,.08)=LOGIN DATE
(52.2,.08)^External Format (ex: Sep. 12, 1999)
^TMP("MHV",$J,LIST,IEN,SUB,n,.09)=DIVISION (52.2,.09)^NAME
(59.2,.01)
^TMP("MHV",$J,LIST,IEN,SUB,n,1)=NDC (52.2,1)
^TMP("MHV",$J,LIST,IEN,SUB,n,5)=RETURNED TO STOCK
(52.2,5)^External Format (ex: Sep. 12, 1999)
^TMP("MHV",$J,LIST,IEN,SUB,n,6)=PROVIDER (52.2,6)^NAME
(200,.01)
^TMP("MHV",$J,LIST,IEN,SUB,n,7.5)=DISPENSED DATE
^TMP("MHV",$J,LIST,IEN,SUB,n,8)=RELEASE DATE/TIME
(52.2,8)^External Format (ex: Sep. 12, 1999)
^TMP("MHV",$J,LIST,IEN,SUB,n,12)=DRUG EXPIRATION DATE
Prescription SIG (Medication Instructions) - File 52 Fld 10
-------------------
LIST="RX" to indicate a Outpatient pharmacy prescription IEN - File 52 IEN
Pointer SUB = "M" to indicate SIG multiple n = multiple line value
^TMP("MHV",$J,LIST,IEN,SUB,0)=Total entries returned
-1^NO DATA FOUND
^TMP("MHV",$J,LIST,IEN,SUB,n,0)=MEDICATION
INSTRUCTIONS(52.04,.01)
Prescription CMOP - File 52,400 (DD 52.01)
-----------------
LIST="RX" to indicate a Outpatient pharmacy prescription IEN - File 52 IEN
Pointer SUB = "C" to indicate CMOP data n = multiple line value
^TMP("MHV",$J,LIST,IEN,SUB,0)=Total entries returned or
-1^NO DATA FOUND
^TMP("MHV",$J,LIST,IEN,SUB,n,2)=RX INDICATOR (52.01,2)
^TMP("MHV",$J,LIST,IEN,SUB,n,3)=STATUS (52.01,3)^External
Format for the Set of Codes
^TMP("MHV",$J,LIST,IEN,SUB,n,4)=NDC (52.10,4)
^TMP("MHV",$J,LIST,IEN,SUB,n,9)=DATE SHIPPED
^TMP("MHV",$J,LIST,IEN,SUB,n,10)=CARRIER
^TMP("MHV",$J,LIST,IEN,SUB,n,11)=PACKAGE ID
^TMP("MHV",$J,LIST,IEN,SUB,n,12)=NDC SENT
Prescription Activity Log- Pulled from File 52 fld 40 (DD 52.3)
-----------------
LIST="RX" to indicate a Outpatient pharmacy prescription IEN - File 52 IEN
Pointer SUB = "A" to indicate Activity Log data n = 52.3 mulitple pointer
value
^TMP("MHV",$J,LIST,IEN,"A",0)=Total entries returned
or -1^NO DATA FOUND
^TMP("MHV",$J,LIST,IEN,"A",n,.01)=ACTIVITY LOG
(52.3,.01)^External Format (ex: Sep. 12, 1999)
^TMP("MHV",$J,LIST,IEN,"A",n,.02)=REASON (52.3,.02)
^External Format for the Set of Codes
^TMP("MHV",$J,LIST,IEN,"A",n,.03)=INITIATOR OF ACTIVITY
(52.3,.03)^NAME (200,.01)
^TMP("MHV",$J,LIST,IEN,"A",n,.04)=RX REFERENCE (52.3,.04)
^TMP("MHV",$J,LIST,IEN,"A",n,.05)=COMMENTS (52.3,.05)
Pharmacy Orderable Item- Pulled from File 52 fld 39.2 (DD 50.7)
-----------------
LIST="RX" to indicate a Outpatient pharmacy prescription IEN - File 52 IEN
Pointer SUB = "OI" to indicate Activity Log data n = 52.3 mulitple pointer
value
^TMP("MHV",$J,LIST,IEN,SUB)=IEN(52,39.2)^NAME(50.7,.01)^DOSAGE
FORM(50.7,.02)^NAME (50.606,.01)
Non-VA Medications- Pulled from File 55 fld 52.2 DD(55.05)
-----------------
LIST="NV" to indicate a Non-VA Meds IEN - 55.05 multiple pointer
^TMP("MHV",$J,LIST,0)=Total entries returned by patient or
-1^NO DATA FOUND
^TMP("MHV",$J,LIST,IEN,.01)=ORDERABLE ITEM
^TMP("MHV",$J,LIST,IEN,1)=DISPENSED DRUG (PTR to #50.7)
^TMP("MHV",$J,LIST,IEN,2)=DOSAGE
^TMP("MHV",$J,LIST,IEN,3)=MEDICATION ROUTE
^TMP("MHV",$J,LIST,IEN,4)=SCHEDULE
^TMP("MHV",$J,LIST,IEN,5)=STATUS (1=Discontinue
2=Date of Death)
^TMP("MHV",$J,LIST,IEN,6)=DISCONTINUED DATE
^TMP("MHV",$J,LIST,IEN,8)=START DATE
^TMP("MHV",$J,LIST,IEN,13)=CLINIC
^TMP("MHV",$J,LIST,IEN,14)=COMMENTS
Pending Medications- Pulled from File 52.41
-----------------
LIST="PD" to indicate a Non-VA Meds IEN - 52.41 IEN pointer
^TMP("MHV",$J,LIST,0)=Total entries returned by patient or
-1^NO DATA FOUND
^TMP("MHV",$J,LIST,IEN,.01)=PLACER NUMBER (52.41,.01)
^TMP("MHV",$J,LIST,IEN,1)=PATIENT (52.41,1)
^TMP"MHV",$J,LIST,IEN,1.1)=PATIENT LOCATION (52.41,1.1)
^TMP("MHV",$J,LIST,IEN,2)=ORDER TYPE (52.41,2)
^TMP("MHV",$J,LIST,IEN,5)=PROVIDER (52.41,5)
^TMP("MHV",$J,LIST,IEN,6)=EFFECTIVE DATE (52.41,6)
^TMP("MHV",$J,LIST,IEN,8)=PHARMACY ORDERABLE ITEM (52.41,8)
^TMP("MHV",$J,LIST,IEN,11)=DRUG (52.41,11)
^TMP("MHV",$J,LIST,IEN,12)=QTY (52.41,12)
^TMP("MHV",$J,LIST,IEN,13)= # OF REFILLS (52.41,13)
^TMP("MHV",$J,LIST,IEN,19)=PICKUP ROUTING (52.41,19)
^TMP("MHV",$J,LIST,IEN,21)=Rx REFILL REQUEST (52.41,21)
^TMP("MHV",$J,LIST,IEN,23)=COMMENTS (52.41,23)
^TMP("MHV",$J,LIST,IEN,26)=POSSIBLE FILLDATE (52.41,26)
^TMP("MHV",$J,LIST,IEN, 100)=RELATED INSTITUTION (52.41,100)
^TMP("MHV",$J,LIST,IEN,101)=DAYS SUPPLY (52.41,101)
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
DFN |
Input |
Patient IEN NUmber (Required).
|
BDT |
Input |
This is the start date to search (default is DT-548).
|
EDT |
Input |
This is the end date (default is null, prescriptions
expiring in the future
|
TMP('MHV',$J |
Output |
Global location of returned list of RXs. Please see
the IA description section for the TMP global layout.
|
|
