PSOPXRM1 ;BHAM ISC/MR - Returns Patient's Prescrition info ;22-Oct-2012 09:43;DU
Source file <PSOPXRM1.m>
Package | Total | Caller Graph |
---|---|---|
Clinical Reminders | 2 | PXRMDNVA PXRMDOUT |
Order Entry Results Reporting | 1 | ORWGAPIC |
Name | Comments | DBIA/ICR reference |
---|---|---|
END | ||
NVA(DAS,DATA) | ;Return data on non-VA meds.
|
|
REFL | ; - Retrieve Refill fields
|
|
PSRX(DAS,RXAR) | ; Returns Rx Information
; Input: DAS - String containing the ^PSRX location where the data ; is located, separated by ";" (semi-colon). ; Example: "329832;1;1;0" -> ^PSRX(329832,1,1,0) |
|
PRTL | ; - Retrieve Partial fields
|
|
ORIG | ; - Retrieve Original fields
|
Name | Field # of Occurrence |
---|---|
$$EXTERNAL^DILFD | NVA+15 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PS(50.606 - [#50.606] | NVA+9 |
^PS(50.7 - [#50.7] | NVA+5 |
^PS(55 - [#55] | NVA+4 |
^PSRX - [#52] | PSRX+16, ORIG+1, REFL+1, PRTL+1 |
Name | Line Occurrences |
---|---|
@( | PSRX+13 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | PSRX+7~, PSRX+13*, PSRX+16, ORIG+1, REFL+1, PRTL+1 |
DAS | NVA~, NVA+2, PSRX~, PSRX+10 |
DATA | NVA~ |
DATA("CLINIC" | NVA+21* |
DATA("DISCONT | INUED DATE" , NVA+16* |
DATA("DISPENS | E DRUG" , NVA+10* |
DATA("DOCUMEN | TED BY" , NVA+20*, TED DATE" , NVA+19* |
DATA("DOSAGE | FORM" , NVA+9* |
DATA("DOSAGE" | NVA+11* |
DATA("MEDICAT | ION ROUTE" , NVA+12* |
DATA("ORDER N | UMBER" , NVA+17* |
DATA("ORDERAB | LE ITEM" , NVA+7* |
DATA("SCHEDULE" | NVA+13* |
DATA("START D | ATE" , NVA+18* |
DATA("STATUS" | NVA+15* |
EM | NVA+1~, NVA+15 |
I | PSRX+7~, PSRX+10* |
IND1 | NVA+1~, NVA+2*, NVA+4 |
IND2 | NVA+1~, NVA+2*, NVA+4 |
IND3 | NVA+1~, NVA+2*, NVA+4 |
IND4 | NVA+1~, NVA+2*, NVA+4 |
PT0 | PRTL+1~*, PRTL+2, PRTL+3, PRTL+4 |
RF0 | REFL+1~*, REFL+2, REFL+3, REFL+4 |
RX0 | ORIG+1~*, ORIG+2, ORIG+7 |
RX2 | ORIG+1~*, ORIG+3, ORIG+4, ORIG+6 |
RXAR | PSRX~, PSRX+13! |
RXAR("DAYS SU | PPLY" , ORIG+2*, REFL+2*, PRTL+2* |
RXAR("FILL DA | TE" , ORIG+6* |
RXAR("PHARMACIST" | ORIG+3*, REFL+3*, PRTL+3* |
RXAR("REFILLS" | ORIG+7* |
RXAR("RELEASE | D DATE/TIME" , ORIG+4*, REFL+4*, PRTL+4* |
RXAR("STATUS" | PSRX+16* |
SB1 | PSRX+7~, PSRX+13 |
SB2 | PSRX+7~, PSRX+13 |
SB3 | PSRX+7~, PSRX+13, REFL+1, PRTL+1 |
TEMP | NVA+1~, NVA+4*, NVA+5, NVA+10, NVA+11, NVA+12, NVA+13, NVA+14, NVA+16, NVA+17 , NVA+18, NVA+19, NVA+20, NVA+21 |
TEMP1 | NVA+1~, NVA+5*, NVA+7, NVA+9, NVA+14*, NVA+15 |
U | NVA+5, NVA+7, NVA+9, NVA+10, NVA+11, NVA+12, NVA+13, NVA+14, NVA+16, NVA+17 , NVA+18, NVA+19, NVA+20, NVA+21 |