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 |