©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
PSJLIFN ;BIR/MV-IV FINISH USING LM ;13 Jan 98 / 11:32 AM
Source file <PSJLIFN.m>
| Package | Total | Call Graph |
|---|---|---|
| Inpatient Medications | 14 | $$ENIVUD^PSGOEF1 Q2^PSGS0 (ENSTOP,ENT)^PSIVCAL (ORDERCHK,SAVEDRG)^PSIVEDRG EDIT^PSIVEDT (53,CKFLDS,COMPLTE)^PSIVORC1 GTIVDRG^PSIVORC2 GT531^PSIVORFA ($$GTPCI,GTOT)^PSIVUTL ORDCHK^PSJLIFNI UDVARS^PSJLIORD $$SCHREQ^PSJLIVFD HOLDHDR^PSJOE $$ENPC^PSJUTL |
| Registration | 3 | EN^VALM PAUSE^VALM1 RE^VALM4 |
| Outpatient Pharmacy | 1 | DRGCHK^PSOORDRG |
| VA Fileman | 1 | ^%DT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| FINISH | ; Prompt for missing data
|
|
| DISPLAY | ;
|
|
| EN | ; Display order with numbers.
|
|
| OCORD | ;* Do order check for each drug against the drugs within the order.
|
|
| ORDCHKA | ;* Do order check agaist existing orders on the profile
|
|
| ORDCHK | ;* Do order check for Inpatient Meds IV.
; PSGORQF is defined (CONT^PSGSICHK) if not log an intervention |
|
| PENDING | ; Process pending order.
|
|
| GTDATA | ;
|
| Name | Field # of Occurrence |
|---|---|
| ^%DT | GTDATA+5, GTDATA+6 |
| $$ENIVUD^PSGOEF1 | FINISH+11 |
| Q2^PSGS0 | FINISH+22 |
| ENSTOP^PSIVCAL | GTDATA+6, FINISH+25 |
| ENT^PSIVCAL | GTDATA+5 |
| ORDERCHK^PSIVEDRG | ORDCHKA+6 |
| SAVEDRG^PSIVEDRG | OCORD+2, OCORD+27 |
| EDIT^PSIVEDT | FINISH+30 |
| 53^PSIVORC1 | FINISH+20 |
| CKFLDS^PSIVORC1 | FINISH+30 |
| COMPLTE^PSIVORC1 | FINISH+32 |
| GTIVDRG^PSIVORC2 | FINISH+25 |
| GT531^PSIVORFA | PENDING+8 |
| $$GTPCI^PSIVUTL | PENDING+8 |
| GTOT^PSIVUTL | PENDING+9 |
| ORDCHK^PSJLIFNI | OCORD+22, OCORD+25 |
| UDVARS^PSJLIORD | FINISH+10 |
| $$SCHREQ^PSJLIVFD | FINISH+21 |
| HOLDHDR^PSJOE | FINISH+12 |
| $$ENPC^PSJUTL | FINISH+17 |
| DRGCHK^PSOORDRG | OCORD+20, OCORD+24 |
| EN^VALM | PENDING+17, PENDING+19, DISPLAY+3, DISPLAY+4 |
| PAUSE^VALM1 | EN+1, FINISH+16 |
| RE^VALM4 | FINISH+16, FINISH+23, FINISH+28, FINISH+34 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PS(51.2 - [#51.2] | GTDATA+7 |
| ^PS(52.6 - [#52.6] | OCORD+5 |
| ^PS(52.7 - [#52.7] | OCORD+11 |
| ^PS(53.1 - [#53.1] | EN+1, EN+3, FINISH+6, FINISH+14 |
| ^PSDRUG - [#50] | OCORD+21 |
| ^TMP($J | OCORD+21* |
| Name | Line Occurrences |
|---|---|
| GTDATA | PENDING+19, FINISH+24 |
| OCORD | ORDCHK+4 |
| ORDCHK | FINISH+26, FINISH+28 |
| PENDING | EN+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %DT | GTDATA+5!*, GTDATA+6!* |
| DDRUG | OCORD+1~, OCORD+5*, OCORD+6, OCORD+11*, OCORD+12, OCORD+20, OCORD+24 |
| DDRUG( | OCORD+6*, OCORD+12*, OCORD+20!, OCORD+24! |
| >> DFN | PENDING+7*, PENDING+8, OCORD+18, OCORD+26* |
| >> DNE | FINISH+25*, FINISH+28* |
| >> DONE | FINISH+31 |
| DRG | FINISH+29!, OCORD+2, OCORD+27 |
| DRG( | ORDCHKA+2, ORDCHKA+3, ORDCHKA+7 |
| DRG("AD" | FINISH+25, OCORD+4, OCORD+5 |
| DRG("SOL" | FINISH+25, OCORD+10, OCORD+11 |
| DRGOC | FINISH+8~, ORDCHK+3~ |
| DRGOC( | ORDCHKA+6, ORDCHKA+7* |
| DRGTMP | FINISH+8~, ORDCHKA+3*, ORDCHKA+5, ORDCHKA+8 |
| >> EDIT | FINISH+30 |
| FIL | FINISH+8~, ORDCHKA+1* |
| INTERVEN | OCORD+17~* |
| NSFF | FINISH+8~*, FINISH+11!, FINISH+35! |
| >> ON | PENDING+7*, PENDING+8, PENDING+12, PENDING+13, PENDING+14, FINISH+9*, ORDCHKA+6, ORDCHKA+7, OCORD+21 |
| ON55 | FINISH+8~, FINISH+9* |
| >> P | FINISH+21 |
| >> P("DTYP" | GTDATA+2* |
| >> P("MR" | GTDATA+7* |
| >> P("OPI" | FINISH+17* |
| >> P("OT" | PENDING+9, PENDING+15, DISPLAY+3, DISPLAY+4, FINISH+24, FINISH+28 |
| >> P("PON" | PENDING+7* |
| >> P("RES" | GTDATA+4, FINISH+20 |
| >> P(15 | FINISH+21, FINISH+22 |
| >> P(2 | GTDATA+3, GTDATA+5* |
| >> P(23 | GTDATA+2 |
| >> P(3 | GTDATA+6*, FINISH+25* |
| >> P(4 | PENDING+9, GTDATA+2, FINISH+21, FINISH+23, FINISH+29* |
| >> P(5 | GTDATA+2 |
| >> P(9 | FINISH+21, FINISH+22 |
| >> PSGACT | DISPLAY+1* |
| >> PSGORD | FINISH+9* |
| PSGORQF | FINISH+8~, FINISH+28, FINISH+29, FINISH+34, ORDCHK+2!, ORDCHK+4, ORDCHKA+1, ORDCHKA+2 |
| >> PSGP | PENDING+7, ORDCHKA+6 |
| PSGRDTX | FINISH+7! |
| PSGS0XT | FINISH+22~* |
| >> PSIVAC | PENDING+7* |
| PSIVACEP | PENDING+6~, FINISH+33 |
| >> PSIVAS | ORDCHKA+1*, ORDCHKA+2, ORDCHKA+3, ORDCHKA+7 |
| PSIVFN1 | PENDING+6~ |
| PSIVNUM | PENDING+11~* |
| PSIVOCON | FINISH+8~, FINISH+9* |
| PSIVOI | PENDING+6~ |
| >> PSIVOK | FINISH+30* |
| PSIVS | FINISH+8~ |
| >> PSIVUP | PENDING+8*, FINISH+17 |
| PSIVX | ORDCHKA+2*, ORDCHKA+3, ORDCHKA+7, OCORD+1~, OCORD+19*, OCORD+20, OCORD+21, OCORD+23*, OCORD+24 |
| PSIVXD | FINISH+8~ |
| PSJAD | OCORD+1~ |
| PSJAD( | OCORD+6*, OCORD+19, OCORD+21 |
| PSJADTMP | ORDCHKA+9! |
| PSJADTMP( | ORDCHKA+5, ORDCHKA+8* |
| PSJCOM | FINISH+6~* |
| PSJDFN | OCORD+17~, OCORD+18*, OCORD+20, OCORD+22, OCORD+24, OCORD+25, OCORD+26 |
| PSJDISP | DISPLAY+5! |
| >> PSJHIS | DISPLAY+6 |
| PSJIVBD | FINISH+7! |
| PSJL | PENDING+10~ |
| PSJLMX | PENDING+6~, FINISH+15 |
| >> PSJLYN | PENDING+13, FINISH+9 |
| PSJMAI | PENDING+14*, PENDING+20!, FINISH+9 |
| PSJNSS | FINISH+22~* |
| >> PSJORD | EN+1, EN+3, PENDING+7, PENDING+12, FINISH+6, FINISH+9, FINISH+11, FINISH+14 |
| >> PSJPROT | FINISH+11 |
| PSJREN | EN+2!, GTDATA+4* |
| PSJSOL | OCORD+1~ |
| PSJSOL( | OCORD+12*, OCORD+23 |
| PSJSTAR | PENDING+11~, PENDING+16*, PENDING+18* |
| TMPDRG | OCORD+1~, OCORD+2, OCORD+27 |
| TYPE | OCORD+22~*, OCORD+25~* |
| U | OCORD+5, OCORD+11, OCORD+21 |
| >> VALMBCK | DISPLAY+6*, FINISH+29*, FINISH+31*, FINISH+33* |
| >> VALMBG | FINISH+16*, FINISH+27*, FINISH+34* |
| >> VALMSG | DISPLAY+2* |
| X | GTDATA+5*, GTDATA+6*, FINISH+22~*, OCORD+1~, OCORD+4*, OCORD+5, OCORD+10*, OCORD+11 |
| Y | GTDATA+5, GTDATA+6, OCORD+1~ |