VPRDPS ;SLC/MKB -- Pharmacy extract ;8/2/11 15:29
Source file <VPRDPS.m>
| Package | Total | Call Graph |
|---|---|---|
| Pharmacy Data Management | 3 | NDF^PSS50 ZERO^PSS50P7 EN^PSSDI |
| Virtual Patient Record | 2 | ($$ESC,$$PROVTAGS,$$VUID)^VPRD EN1^VPRDPSOR |
| Order Entry Results Reporting | 1 | ($$OI,$$VALUE)^ORX8 |
| Outpatient Pharmacy | 1 | OCL^PSOORRL |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Package | Total | Caller Graph |
|---|---|---|
| Virtual Patient Record | 4 | VPRDOR VPRDPSI VPRDPSO VPRDPSOR |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN(DFN,BEG,END,MAX,ORIFN) | ; -- find patient's meds
|
|
| MATCH() | ; -- Return 1 or 0, if order matches FILTER criteria
|
|
| SUPPLY(ORDER) | ; -- Return 1 or 0, if ORDER is for a supply item
|
|
| NDF(DRUG,VPI,ORD) | ; -- Set NDF data for dispense DRUG ien
|
|
| VUID(ORDER) | ; -- return VUID for VA Product in ORDER
|
|
| XML(MED) | ; -- Return patient meds as XML
|
|
| LOOP() | ; -- build sub-items string from NAMES and X
|
|
| ADD(X) | ; Add a line @VPR@(n)=X
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^OR(100 - [#100] | EN+13 |
| ^TMP("PS" | EN+1!, EN+9, EN+16! |
| ^TMP("VPRPS" | EN+9*, EN+11, EN+16!, MATCH+7 |
| ^TMP($J | EN+16!, SUPPLY+3, NDF+6, NDF+7, NDF+9, NDF+11, NDF+13!, VUID+5, VUID+6! |
| Name | Line Occurrences |
|---|---|
| $$LOOP | XML+11, XML+13, XML+14, XML+15, XML+16, XML+22 |
| $$MATCH | EN+14 |
| ADD | XML+2, XML+3, XML+5, XML+11, XML+13, XML+14, XML+15, XML+16, XML+17, XML+18 , XML+23 |
| XML | EN+6, EN+11 |
| Name | Field # of Occurrence |
|---|---|
| ^( | EN+11 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ATT | XML+1~, XML+3*, XML+4, XML+5, XML+6, XML+7, XML+8, XML+9, XML+10, XML+11 , XML+12, XML+13, XML+14, XML+15, XML+16, XML+18, XML+19, XML+20, XML+21, XML+22 |
| BEG | EN~, EN+3*, EN+9 |
| DFN | EN~, EN+2*, EN+9 |
| DRUG | NDF~, NDF+2*, NDF+3, NDF+4, NDF+5, NDF+6, NDF+7, NDF+9, NDF+11, NDF+13 , VUID+1~, VUID+2*, VUID+3, VUID+4, VUID+5 |
| END | EN~, EN+3*, EN+9 |
| >> FILTER("vaType" | EN+10 |
| I | NDF+1~, XML+1~, XML+6*, XML+7, XML+13, XML+14, XML+15, XML+16 |
| ID | EN+1~, EN+12*, MATCH+2, MATCH+3, MATCH+4, MATCH+6, MATCH+7 |
| IV | MATCH+7~*, MATCH+8, MATCH+9 |
| MAX | EN~, EN+3*, EN+11 |
| MED | XML~ |
| MED( | XML+3, XML+4, XML+6, XML+7, XML+13, XML+14, XML+15, XML+16, XML+19 |
| MED("product" | NDF+6*, NDF+8*, NDF+10*, NDF+12* |
| NAMES | XML+1~, XML+7*, XML+8*, XML+9*, XML+10*, XML+22*, LOOP+2 |
| OI | SUPPLY+1~*, SUPPLY+2, SUPPLY+3 |
| ORD | NDF~, NDF+6 |
| ORDER | SUPPLY~, SUPPLY+1, VUID~, VUID+2 |
| ORIFN | EN~, EN+6, EN+12*, EN+13, EN+15 |
| P | LOOP+1~, LOOP+2* |
| PS0 | EN+1~, EN+11*, EN+12 |
| STR | NDF+1~, NDF+4*, NDF+6, LOOP+1~*, LOOP+2*, LOOP+3 |
| TAG | LOOP+1~, LOOP+2* |
| TYPE | EN+1~, EN+10*, EN+14, MATCH+3, MATCH+4, MATCH+8, MATCH+9 |
| U | EN+12, SUPPLY+2, SUPPLY+3, NDF+6, NDF+8, NDF+10, NDF+12, XML+22, LOOP+2 |
| VPI | NDF~, NDF+5*, NDF+6, NDF+8, NDF+10, NDF+12 |
| >> VPR | ADD+2 |
| >> VPRI | ADD+1*, ADD+2 |
| VPRITM | EN+1~, EN+6, EN+11, EN+12!, EN+15 |
| VPRN | EN+1~, EN+11*, MATCH+7 |
| >> VPRTOTL | XML+2* |
| VPRX | NDF+1~ |
| VPRX(50 | NDF+4 |
| VUID | NDF+1~ |
| X | NDF+1~, NDF+7*, NDF+8, NDF+9*, NDF+10, NDF+11*, NDF+12, VUID+1~, VUID+5*, XML+1~ , XML+7*, XML+13*, XML+14*, XML+15*, XML+16*, XML+19*, XML+20, XML+21, XML+22, LOOP+2 , ADD~, ADD+2 |
| Y | MATCH+1~*, MATCH+3*, MATCH+4*, MATCH+8*, MATCH+9*, MATCH+10, SUPPLY+1~*, SUPPLY+3*, SUPPLY+4, VUID+1~* , VUID+5*, VUID+7, XML+1~, XML+3, XML+4*, XML+11*, XML+13*, XML+14*, XML+15*, XML+16* , XML+19*, XML+20*, XML+21*, XML+22* |
