©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
PSOOREDT ;BIR/SAB - edit orders from backdoor ;10-Jun-2013 22:29;DU
Source file <PSOOREDT.m>
| Package | Total | Call Graph |
|---|---|---|
| Outpatient Pharmacy | 20 | ($$RXRLDT,$$STATUS)^PSOBPSUT ^PSOBUILD EN^PSOCMOPC EDTDAW^PSODAWUT EN^PSODIAG PROV^PSODIR SIG^PSODIR1 (NDC,POST,SET)^PSODRG EN^PSOHLSN1 HLDHDR^PSOLMUTL EOJ^PSONEW LOCK^PSOORCPY (EN,INS)^PSOORED1 (EDTDOSE,FLDT,ISDT,REF)^PSOORED2 (DRG,PSOCOU,PSOI,UPDATE)^PSOORED6 (NDCDAWDE,NOCHG)^PSOORED7 ACT^PSOORNE2 (LOG,POST)^PSORXED (EN1,POP)^PSOSIGNO CLEAN^PSOVER1 |
| VA Fileman | 4 | FIELD^DID $$GET1^DIQ EN^DIQ1 ^DIR |
| IHS Changes To Pharmacy | 2 | IHSFLDS^APSPDIR $$ISSCH^APSPFNC2 |
| Pharmacy Data Management | 1 | ($$L,PSOL,PSOUL,UL)^PSSLOCK |
| Registration | 1 | FULL^VALM1 |
| Package | Total | Caller Graph |
|---|---|---|
| Outpatient Pharmacy | 2 | PSOLMUTL PSOORED6 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| QUIT | ||
| CHKX | ||
| EDTSEL | ;N VALMCNT K PSOISLKD,PSORX("DFLG"),PSOOIFLG,PSOMRFLG,DIR,DIRUT,DTOUT,DTOUT,ZONE S (PSOEDIT,PSORXED)=1 I +Y S FST=Y D HLDHDR^PSOLMUTL D G EX ;PSO LM SELECT MENU protocol
|
|
| CHK | ||
| SVAL | ;Set message for patient lock
|
|
| PROV | ;select provider
|
|
| UL | ;
|
|
| SVALO | ;Set message for order lock
|
|
| EX2 | ||
| EX | ||
| EDT | ; Rx Edit (Backdoor)
|
|
| EX1 | ||
| UDPROV | ;update provider
|
|
| SEL | ;
|
|
| SIG | ;edit medication instructions (SIG)
|
| Name | Field # of Occurrence |
|---|---|
| IHSFLDS^APSPDIR | EDT+24 |
| $$ISSCH^APSPFNC2 | PROV+1 |
| FIELD^DID | EDT+57, EDT+62 |
| $$GET1^DIQ | EDT+16, EDT+17, EDT+18, EDT+19, EDT+20, EDT+21, EDT+22, EDT+23 |
| EN^DIQ1 | EDT+48, EDT+58 |
| ^DIR | SEL+5, SEL+14, EDT+49, EDT+60, CHK+5, PROV+5 |
| $$RXRLDT^PSOBPSUT | EDT+30 |
| $$STATUS^PSOBPSUT | SEL+13, EDT+30, EDT+41 |
| ^PSOBUILD | EX+8, QUIT |
| EN^PSOCMOPC | QUIT |
| EDTDAW^PSODAWUT | EDT+43 |
| EN^PSODIAG | EDT+36, EDT+37 |
| PROV^PSODIR | PROV+3 |
| SIG^PSODIR1 | SIG+4 |
| NDC^PSODRG | EDT+31 |
| POST^PSODRG | EDT+34 |
| SET^PSODRG | EDT+2 |
| EN^PSOHLSN1 | EX1 |
| HLDHDR^PSOLMUTL | EDTSEL+1 |
| EOJ^PSONEW | EX+12 |
| LOCK^PSOORCPY | SEL+7, EDTSEL+2 |
| EN^PSOORED1 | EX+6 |
| INS^PSOORED1 | EDT+35 |
| EDTDOSE^PSOORED2 | EDT+34 |
| FLDT^PSOORED2 | EDT+40 |
| ISDT^PSOORED2 | EDT+39 |
| REF^PSOORED2 | EDT+28 |
| DRG^PSOORED6 | EDT+37 |
| PSOCOU^PSOORED6 | EDT+29 |
| PSOI^PSOORED6 | EDT+36 |
| UPDATE^PSOORED6 | EX+1 |
| NDCDAWDE^PSOORED7 | EDT+26 |
| NOCHG^PSOORED7 | EDT+45 |
| ACT^PSOORNE2 | QUIT |
| LOG^PSORXED | EX+1 |
| POST^PSORXED | EX+1 |
| EN1^PSOSIGNO | SIG+4 |
| POP^PSOSIGNO | EDT+13 |
| CLEAN^PSOVER1 | EX2+1 |
| $$L^PSSLOCK | SEL+7, EDTSEL+2 |
| PSOL^PSSLOCK | SEL+8, EDTSEL+3 |
| PSOUL^PSSLOCK | UL+3 |
| UL^PSSLOCK | SEL+8, EDTSEL+3, UL+2 |
| FULL^VALM1 | EDT+34 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^PSRX - [#52] | FIELD^DID, GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PS(53 - [#53] | EDT+8 |
| ^PSDRUG - [#50] | EDT+2, EDT+9, EDT+10, CHK |
| ^PSRX - [#52] | SEL+2, QUIT, QUIT+1, EDT+3, EDT+4, EDT+6, EDT+8, EDT+9*, EDT+12, EDT+37 , EDT+64, CHK+2, CHK+4, CHK+7, UDPROV+1*, UDPROV+2*, SIG+1, SIG+2, SIG+3, SIG+5*! |
| ^VA(200 - [#200] | EDT+12, PROV+2 |
| Name | Line Occurrences |
|---|---|
| CHK | EDT+13 |
| EDT | EDTSEL+4 |
| EX | EDTSEL+1 |
| EX1 | EX+1 |
| EX2 | EX |
| PROV | EDT+38 |
| SVAL | SEL+7, EDTSEL+2 |
| SVALO | SEL+8, EDTSEL+3 |
| UL | SEL+14, EX, EX+13, QUIT |
| Name | Field # of Occurrence |
|---|---|
| ^("I" | CHK |
| ^("SIG" | EDT+4, EDT+6 |
| ^(2 | EDT+4 |
| ^(3 | EDT+4, UDPROV+1* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CHK | EX+10!, EX2!, EDT+13, CHK* |
| DA | EDT+6*, EDT+8, EDT+9, EDT+12, EDT+13, EDT+36, EDT+48*, EDT+49, EDT+51, EDT+52! , EDT+55, EDT+59, EDT+61 |
| DAW | EDT+43~, EDT+44 |
| DIC | EDT+48!*, EDT+52!, EDT+58! |
| DIQ | EDT+48!*, EDT+52!, EDT+58*! |
| DIR | SEL+5!, SEL+10!, SEL+14!, EDTSEL+1!, EDT+47!, EDT+51!, EDT+52!, EDT+55!, EDT+60!, EDT+61! , CHK+3!, CHKX!, PROV+4!, PROV+7! |
| DIR("?" | SEL+5*, CHK+4* |
| DIR("A" | SEL+5*, SEL+10*, CHK+4*, PROV+4*, PROV+5* |
| DIR("B" | EDT+49*, EDT+59*, CHK+5* |
| DIR(0 | SEL+5*, SEL+13*, EDT+49*, EDT+60*, CHK+4*, PROV+4* |
| DIROUT | EDT+47!, EDT+55!, EDT+61! |
| DIRUT | SEL+10!, SEL+14!, EDTSEL+1!, EDT+47!, EDT+51!, EDT+52!, EDT+55!, EDT+58!, EDT+60!, EDT+61! , CHK+5, PROV+4!, PROV+6, PROV+7! |
| DR | EDT+28*, EDT+29, EDT+46*, EDT+49, EDT+50, EDT+51, EDT+52!, EDT+53, EDT+54, EDT+55 , EDT+56, EDT+57, EDT+58*, EDT+59, EDT+60, EDT+61, EDT+62 |
| DT | CHK |
| DTOUT | SEL+14!, EDTSEL+1!, EDT+51!, EDT+58!, CHK+3!, CHKX! |
| DUOUT | SEL+10!, EDT+51!, EDT+58!, CHK+3!, CHKX!, PROV+7! |
| >> FDR | EDT+25*, EDT+28 |
| FLD | EX+9!, EX2!, EDT+5* |
| FLN | EX+9!, EX2!, EDT+5*, EDT+15, EDT+26, EDT+27, EDT+28, EDT+30, EDT+33, EDT+34 , EDT+35, EDT+36, EDT+37, EDT+38, EDT+39, EDT+40, EDT+41, EDT+42, EDT+45 |
| FST | EDTSEL+1*, EX+9!, EX2!, EDT+5 |
| I | EDT+3*, EDT+64*, UDPROV+2*, UDPROV+3!, SIG+2* |
| IEN | EX+9!, EX2! |
| INCOM | EX+9!, EX2! |
| NCPDPFLG | EX+5*, EDT+1! |
| NDC | EDT+31~, EDT+32 |
| NEWEDT | EDTSEL+4*, EX+11!, EX2+1! |
| >> ORN | SEL+2, SEL+8, SEL+13, EDTSEL+3, QUIT, QUIT+1, EDT+3, EDT+4, EDT+6, UL+3 |
| >> PSODAYS | EDT+8* |
| PSODE | EDTSEL+2*, EDTSEL+3*, EDTSEL+5*, EX+10!, EX1, EX2! |
| >> PSODFN | SEL+7, SEL+8, EDTSEL+2, EDTSEL+3, UL+2 |
| PSODIR | EX+10!, EX2! |
| >> PSODIV | CHK+1 |
| PSODRUG | EX+9!, EX2!, EDT+2 |
| PSODRUG("DAW" | EDT+44* |
| PSODRUG("IEN" | EDT+10*, PROV+1 |
| PSODRUG("NAME" | EDT+10* |
| PSODRUG("NDC" | EDT+32* |
| PSODRUG("OI" | EDT+11* |
| PSOEDIT | EDTSEL+1*, EX+9!, EX2! |
| >> PSOFDR | SIG+1* |
| PSOFROM | EX+4*, EX+14*! |
| PSOI | EX+9!, EX2!, EDT+8*, EDT+9*, EDT+11 |
| PSOISLKD | SEL+7!, EDTSEL+1!, EDTSEL+2*, EDTSEL+3*, EX!, EDT+34* |
| PSOLOKED | SEL+7!, SEL+9*, SEL+14!, EDTSEL+2, EDTSEL+3, EDTSEL+4*, EX+13!, QUIT!, UL+1 |
| >> PSOLST( | SEL+2, SEL+8, SEL+13, EDTSEL+3, QUIT, QUIT+1, EDT+3, EDT+4, EDT+6, UL+3 |
| PSOMRFLG | EDTSEL+1!, EX+10!, EX2!, SIG+6* |
| PSOMSG | SEL+8!, SEL+9!, EDTSEL+3!, EDTSEL+4!, SVALO+1 |
| PSOOIFLG | EDTSEL+1!, EX+10!, EX2! |
| >> PSOPAR | EDT+25, EDT+30, EDT+33, EDT+56 |
| PSOPLCK | SEL+7*!, SEL+8!, EDTSEL+2*!, EDTSEL+3!, EDTSEL+4!, SVAL+1 |
| PSORENW | EX+10!, EX2! |
| PSORENW("OIRXN" | EX1, EDT+6*, EDT+36 |
| >> PSORX | SIG+4 |
| >> PSORX("COSIGN | ING PROVIDER" , PROV+6!, UDPROV+1 |
| >> PSORX("DFLG" | SEL+10!, EDTSEL+1!, EX+9!, EX2!, EDT+5, EDT+34 |
| >> PSORX("EDIT" | EX+11!, EX2! |
| >> PSORX("FN" | EX+2, EX+7, EX2, EDT+34* |
| >> PSORX("PROVID | ER NAME" , EDT+12*, PROV+6! |
| >> PSORX("PROVIDER" | EDT+12*, PROV+6! |
| >> PSORX("SIG" | EX+10!, EX2!, SIG+3*, SIG+4, SIG+5 |
| PSORXED | EDTSEL+1*, EX+6, EX2!, EDT+24, EDT+36*, EDT+37*, PROV+3 |
| PSORXED( | EDT+57*, EDT+62* |
| PSORXED("CASH | DUE" , EDT+22* |
| PSORXED("CM" | EDT+16* |
| PSORXED("COSI | GNING PROVIDER" , PROV+8 |
| PSORXED("CS" | PROV+1* |
| PSORXED("DAW" | EDT+21* |
| PSORXED("DFLG" | EX+1, EDT+5, EDT+6*, EDT+13, EDT+36, EDT+37, CHK*, CHK+1, CHK+2*, CHK+5* , CHK+7* |
| PSORXED("DSCMED" | EDT+23* |
| PSORXED("EXPI | RATION DATE" , EDT+18* |
| PSORXED("FLD" | EX+11!, EDT+32*, EDT+44*, EDT+49, EDT+50*, EDT+51!, EDT+55*, EDT+56, EDT+57, EDT+61* , EDT+62, PROV+7*, PROV+8* |
| PSORXED("IRXN" | EDT+6*, EDT+16, EDT+17, EDT+18, EDT+19, EDT+20, EDT+21, EDT+22, EDT+23, EDT+36 , EDT+37, EDT+48, EDT+64, CHK+1, CHK+7, UDPROV+1, UDPROV+2, SIG+1, SIG+2, SIG+3 , SIG+4, SIG+5 |
| PSORXED("LOT | #" , EDT+20* |
| PSORXED("MANUFACTURER" | EDT+17* |
| PSORXED("PROV | IDER NAME" , PROV+2* |
| PSORXED("PROVIDER" | PROV+2*, PROV+3, PROV+7, UDPROV+1, UDPROV+2 |
| PSORXED("RX0" | EDT+4*, CHK |
| PSORXED("RX1" | EDT+3* |
| PSORXED("RX2" | EDT+4*, CHK+1 |
| PSORXED("RX3" | EDT+4* |
| PSORXED("TRIP" | EDT+19* |
| PSORXED(52 | EDT+49, EDT+51!, EDT+52!, EDT+55!, EDT+59, EDT+61! |
| >> PSORXST | EDT+8* |
| >> PSOSIG | EDT+4*, EDT+6* |
| PSOSIGFL | EX+1, EX+2, EX+10!, EX2!, EDT+7, EDT+63, SIG+5 |
| >> PSOSITE | CHK+1 |
| >> PSOSYS | CHK+2, CHK+3 |
| PSOTMP | EX+3~, EX+4*, EX+14 |
| PSOTRN | EX+11!, EX2!, EDT+12* |
| PSOX | EDT+36~, EDT+37~ |
| PSOX("IRXN" | EDT+36*, EDT+37* |
| PSOY | EDT+2~* |
| PSOY(0 | EDT+2* |
| PSPOP | CHK+1!, CHKX! |
| >> PSPRXN | CHK+1*, CHK+2, CHK+4 |
| QUIT | EX+9!, EX2! |
| REF | SEL+13, QUIT+1!, EDT+27, EDT+37* |
| >> RFD | EDT+64* |
| >> RFDT | EDT+64* |
| RFED | EX2!, UDPROV+2* |
| >> RX0 | EDT+2, EDT+4*, EDT+6*, EDT+8, EDT+9, EDT+10, EDT+12, EDT+25, PROV+2, PROV+3 |
| >> RX1 | EDT+64* |
| >> RX1( | EDT+64* |
| >> RXN | EDT+26, EDT+30, EDT+31, EDT+41, EDT+43 |
| SIG | EX2! |
| SIG( | SIG+2* |
| >> ST | EDT+26 |
| U | EDT+2 |
| >> VALMBCK | SEL+7*, SEL+8*, SEL+14*, EDTSEL+2*, EDTSEL+3*, EDTSEL+5*, EX+13*, EX2*, EX2+1 |
| VALMCNT | EDTSEL+1~ |
| >> VALMSG | EX+5*, EDT+27*, EDT+33*, EDT+41*, CHK*, CHK+2*, CHK+7*, SVAL+1*, SVALO+1* |
| X | EDT+50, EDT+52!, EDT+53, EDT+55!, EDT+60, EDT+61!, CHKX! |
| XTY | UDPROV+2*, UDPROV+3! |
| Y | EDTSEL+1, EDT+52!, EDT+53*, EDT+54*, EDT+55!, EDT+61!, CHK+5, CHKX!, PROV+6 |
| ZONE | EDTSEL+1!, EX1, EX2! |
| ZZ | EDT+57!, EDT+62! |
| ZZ("LABEL" | EDT+57, EDT+62 |