©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
PSGAMSA ;BIR/CML3-ENTERS RETURNS, EXTRAS, & PRE-EX NEEDS INTO 57.6 ; 15 May 98 / 9:25 AM
Source file <PSGAMSA.m>
| Package | Total | Call Graph |
|---|---|---|
| Registration | 1 | IN5^VADPT |
| Uncategorized | 1 | ^ECXUD1 |
| VA Fileman | 1 | NOW^%DTC |
| Package | Total | Caller Graph |
|---|---|---|
| Inpatient Medications | 3 | DISPENSE DRUG PSGPLF PSJXR520 |
| Outpatient Pharmacy | 1 | DISPENSE DRUG |
| Pharmacy Data Management | 1 | PSSJXR28 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ENLOG | ;
|
|
| DIK | ;
|
|
| CLEANUP | ; Clean up partial orders having no provider or status.
|
|
| ENOPC | ; outpatient entry point
|
|
| OUT | ;
|
|
| EN(DFN,PSGORD,PSGORD1,PSGLOG) | ;
; PSGLOG: 2 - pre-exchange needs, 3 - extra units dispensed, 4 - returns |
|
| ENPLF(DFN,PSGORD,PSGDRG,PSGX,PSGDRGC,PSGLOG,PSGWARD,PSGPRVR,PSGPLFDT) | ;
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TEST" | OUT+2 |
| ^PS(55 - [#55] | EN+3, EN+7, ENLOG+1, ENLOG+2, ENLOG+3*, ENLOG+4*, ENLOG+5*, ENLOG+6, CLEANUP+1, DIK+2! |
| ^PS(57.6 - [#57.6] | ENOPC+1, ENOPC+2, ENOPC+4, ENOPC+5, ENOPC+6, ENOPC+7, ENOPC+8, ENOPC+9, ENOPC+10 |
| ^PSDRUG - [#50] | EN+7 |
| Name | Line Occurrences |
|---|---|
| DIK | CLEANUP+1 |
| ENLOG | EN+8 |
| ENOPC | EN+8 |
| Name | Field # of Occurrence |
|---|---|
| ^( | CLEANUP+1 |
| ^(0 | EN+7, ENOPC+2, ENOPC+4*, ENOPC+5*, ENOPC+6*, ENOPC+7*, ENOPC+8*, ENOPC+9*, ENOPC+10* |
| ^(1 | EN+7 |
| ^(660 | EN+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | EN+2~, ENLOG+3, ENLOG+5 |
| DA | ENPLF+1~ |
| DFN | EN~, EN+3, EN+7, OUT+3, ENPLF~, ENLOG+1, ENLOG+2, ENLOG+3, ENLOG+4, ENLOG+5 , ENLOG+6, CLEANUP+1*, DIK+2 |
| DT | OUT+3, ENOPC+1, ENOPC+2, ENOPC+4, ENOPC+5, ENOPC+6, ENOPC+7, ENOPC+8, ENOPC+9, ENOPC+10 |
| DUZ | ENLOG+5 |
| ECUD | EN+2~, OUT+3* |
| LOG | EN+2~, ENPLF+1~, ENLOG+3*, ENLOG+4, ENLOG+5, ENLOG+6 |
| ND | EN+2~, ENOPC+2*, ENOPC+3*, ENOPC+4*, ENOPC+5*, ENOPC+7*, ENOPC+9*, ENOPC+10*, ENPLF+1~, ENLOG+2* , ENLOG+3, ENLOG+4* |
| >> ON | CLEANUP+1*, DIK+2 |
| PSGAMSF | EN+2~, EN+3*, OUT+3, ENOPC+4 |
| PSGDRG | EN+2~, EN+7*, OUT+1, OUT+3, ENOPC+1, ENOPC+2, ENOPC+3, ENOPC+4, ENOPC+5, ENPLF~ , ENLOG+5 |
| PSGDRGC | EN+2~, EN+7*, OUT+3, ENOPC+4, ENPLF~, ENLOG+5 |
| PSGLOG | EN~, EN+3, ENPLF~, ENLOG+5 |
| PSGORD | EN~, EN+3, EN+7, OUT+3, ENPLF~, ENLOG+1, ENLOG+2, ENLOG+3, ENLOG+4, ENLOG+5 , ENLOG+6 |
| PSGORD1 | EN~, EN+7 |
| PSGPLFDT | ENPLF~, ENLOG+1, ENLOG+3, ENLOG+5 |
| PSGPRVR | EN+2~, EN+7*, OUT+1, OUT+3, ENOPC+1, ENOPC+2, ENOPC+4, ENOPC+5, ENOPC+6, ENOPC+7 , ENPLF~, ENLOG+5 |
| PSGSTRT | EN+2~, EN+3*, OUT+3 |
| PSGWARD | EN+2~, EN+3*, EN+6*, EN+7*, OUT+1, OUT+3, ENOPC+1, ENOPC+2, ENOPC+4, ENOPC+5 , ENOPC+6, ENOPC+7, ENOPC+8, ENOPC+9, ENPLF~, ENLOG+5 |
| PSGX | EN+2~, EN+3*, EN+7, OUT+3, ENOPC+4, ENPLF~, ENLOG+5 |
| U | CLEANUP+1 |
| VAIN | EN+2~ |
| VAIP | EN+2~, EN+6! |
| VAIP("D" | EN+6* |
| VAIP(17 | EN+6 |
| VAIP(5 | EN+6 |
| >> X | EN+3, OUT+2*, ENOPC+2*, ENOPC+3*, ENOPC+4, CLEANUP+1* |