Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: PSGOEF

Package: Inpatient Medications

Routine: PSGOEF


Information

PSGOEF ;BIR/CML3-FINISH ORDERS ENTERED THROUGH OE/RR ;14 May 98 / 2:17 PM

Source Information

Source file <PSGOEF.m>

Call Graph

Call Graph Total: 29

Package Total Call Graph
Inpatient Medications 21 ($$ENDD,$$ENDTC)^PSGMI  ($$ENSD,ENFD)^PSGNE3  GTST^PSGOE6  $$GTNEDFD^PSGOE7  (ABORT,DONE1,NEW3)^PSGOEE  ENSFE^PSGOEE0  ^PSGOEF  ($$ENIVUD,ENDRG,UPD)^PSGOEF1  
OVERLAP^PSGOEF2  OC531^PSGOESF  EN^PSGORS0  (ENOS,NSSCONT)^PSGS0  $$DSTART^PSJDCU  DOSECHK^PSJDOSE  ($$DURMIN,$$GETDUR,REQDT)^PSJLIVMD  GETUD^PSJLMGUD  
$$LASTREN^PSJLMPRI  INIT^PSJLMUDE  $$OINAME^PSJLMUTL  $$ENPC^PSJUTL  $$ENNOO^PSJUTL5  
Registration 3 (EN,REFRESH)^VALM  (FULL,PAUSE)^VALM1  RE^VALM4  
Kernel 2 ENDR^%ZISS  $$FMADD^XLFDT  
VA Fileman 2 NOW^%DTC  ^DIR  
Pharmacy Data Management 1 DOSE^PSSORPH  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Inpatient Medications 4 PSGOE1  PSGOEF  PSJOE  PSJOEA  

Entry Points

Name Comments DBIA/ICR reference
37 ;;5^PSGOE82;PSGOSM;PSGSM;5;0
39 ;;39^PSGOE81;PSGOAT;PSGAT;39;0
FINISH ;
; force display of second screen if CPRS order checks exist
33 ;;10^PSGOE81;PSGOSD;PSGSD;10;0
32 ;;109^PSGOE8;PSGODO;PSGDO;109;PSGODO]""
31 ;;101^PSGOE8;PSGOPD;PSGPD;101;1
310 ;;1^PSGOE82;PSGOPR;PSGPR;1;1
35 ;;25^PSGOE81;PSGOFD;PSGFD;25;0
36 ;;7^PSGOE8;PSGOST;PSGST;7;0
ACCEPT ;
34 ;;3^PSGOE8;PSGOMR;PSGMR;3;1
START ;
AH ;
38 ;;26^PSGOE8;PSGOSCH;PSGSCH;26;1
DONE ;
ABORTACC ; Abort Accept process.
BYPASS ;
312 ;;2^PSGOE82;;;2;0
313 ;;40^PSGOE82;;;40;0
311 ;;8^PSGOE81;PSGOSI;PSGSI;8;0

External References

Name Field # of Occurrence
NOW^%DTC START+2
ENDR^%ZISS FINISH+29
^DIR FINISH+42, FINISH+53, FINISH+71, FINISH+83, FINISH+85, FINISH+90
$$ENDD^PSGMI START+41, START+42
$$ENDTC^PSGMI START+41, START+42
$$ENSD^PSGNE3 START+28
ENFD^PSGNE3 START+37
GTST^PSGOE6 START+19, FINISH+72
$$GTNEDFD^PSGOE7 START+26
ABORT^PSGOEE ABORTACC+2
DONE1^PSGOEE ACCEPT+4
NEW3^PSGOEE ACCEPT+3
ENSFE^PSGOEE0 ABORTACC+2
^PSGOEF ABORTACC+2
$$ENIVUD^PSGOEF1 FINISH+44
ENDRG^PSGOEF1 FINISH+67
UPD^PSGOEF1 ACCEPT+3
OVERLAP^PSGOEF2 FINISH+31
OC531^PSGOESF FINISH+68
EN^PSGORS0 START+4
ENOS^PSGS0 FINISH+46
NSSCONT^PSGS0 FINISH+56
$$DSTART^PSJDCU START+33
DOSECHK^PSJDOSE FINISH+77
$$DURMIN^PSJLIVMD START+40
$$GETDUR^PSJLIVMD START+39
REQDT^PSJLIVMD START+31
GETUD^PSJLMGUD ABORTACC+2
$$LASTREN^PSJLMPRI START+39
INIT^PSJLMUDE ABORTACC+2
$$OINAME^PSJLMUTL START+3
$$ENPC^PSJUTL FINISH+55
$$ENNOO^PSJUTL5 FINISH+93
DOSE^PSSORPH START+8
EN^VALM FINISH+81
REFRESH^VALM FINISH+62
FULL^VALM1 FINISH+28
PAUSE^VALM1 FINISH+27
RE^VALM4 FINISH+27, FINISH+70
$$FMADD^XLFDT START+40

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!?3,"Cannot find this pending order (#",+PSGORD,")."
  • Line Location: START+1
Function Call: WRITE
  • Prompt: !!,"**WARNING**"
  • Line Location: FINISH+33
Function Call: WRITE
  • Prompt: !,"The highlighted admin times for these portions of this complex order overlap.",!!
  • Line Location: FINISH+34
Function Call: WRITE
  • Prompt: $S($P(X1,"^",4)=1:IORVON,1:""),"Part "_X,IORVOFF," has a schedule of "_$P(X1,"^",2)_" and admin time(s) of "
  • Line Location: FINISH+37
Function Call: WRITE
  • Prompt: $S($P(X1,"^",4)=1:IORVON,1:""),$P(X1,"^",3),IORVOFF
  • Line Location: FINISH+38
Function Call: WRITE
  • Prompt: !
  • Line Location: FINISH+39
Function Call: WRITE
  • Prompt: $S($G(PSJOVR("CONJ",X))="A":"AND",$G(PSJOVR("CONJ",X))="T":"THEN",1:""),!
  • Line Location: FINISH+40
Function Call: WRITE
  • Prompt: !,"Please ensure the schedules and administration times are appropriate.",!
  • Line Location: FINISH+41
Function Call: WRITE
  • Prompt: !
  • Line Location: FINISH+42
Function Call: WRITE
  • Prompt: $C(7),!!,"PLEASE NOTE: This order's admin times (",PSGAT,")"
  • Line Location: FINISH+50
Function Call: WRITE
  • Prompt: !
  • Line Location: FINISH+53
Function Call: WRITE
  • Prompt: $C(7),!!,"PLEASE NOTE: This order must have"
  • Line Location: FINISH+61
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $L(Y)+$X>78
  • Line Location: FINISH+61
Function Call: WRITE
  • Prompt: Y," "
  • Line Location: FINISH+61
Function Call: WRITE
  • Prompt: !
  • Line Location: FINISH+63
Function Call: WRITE
  • Prompt: !
  • Line Location: FINISH+66
Function Call: WRITE
  • Prompt: !!
  • Line Location: FINISH+71
Function Call: WRITE
  • Prompt: $C(7),!!,"ACCEPTING THIS ORDER WILL CHANGE THE STATUS TO ACTIVE."
  • Line Location: FINISH+88
Function Call: WRITE
  • Prompt: !!?2,"Answer 'YES' to accept this order as a NON-VERIFIED UNIT DOSE order. Answer",!,"'NO' to edit this order now. Enter '^' to BYPASS this order, leaving it as",!,"a PENDING INPATIENT order."
  • Line Location: AH+1
Routine Call
  • VALM
  • Line Location:
    • FINISH+81
Routine Call
  • DIR
  • Line Location:
    • FINISH+42
    • FINISH+53
    • FINISH+71
    • FINISH+83
    • FINISH+85
    • FINISH+90
Routine Call
  • VALM
  • Line Location:
    • FINISH+62

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(53.1 - [#53.1] START+1, START+3, START+4, START+5, START+7, START+11, START+20, START+21, START+24, START+30
, START+33, START+36, START+38, FINISH+6, FINISH+25, FINISH+45*, FINISH+47, FINISH+54*, FINISH+55, FINISH+74
, FINISH+87
^PS(53.45 - [#53.45] START+17*, START+43, START+45!*, FINISH+57
^PS(55 - [#55] START+22, START+23, START+36, START+38*
^PSDRUG - [#50] START+44
^PSDRUG("ASP" START+44
^TMP("PSJATOVR" FINISH+35, FINISH+36, FINISH+43!

Label References

Name Line Occurrences
32 FINISH+65
38 FINISH+64, FINISH+66
39 FINISH+63
@( FINISH+63, FINISH+64, FINISH+65, FINISH+66
ABORTACC FINISH+67, FINISH+86, FINISH+91, ACCEPT+2
DONE FINISH+62, FINISH+64, FINISH+65, ACCEPT+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % START+2
CHK FINISH+55*, FINISH+61*, FINISH+63*, FINISH+64*, FINISH+66*, FINISH+67*, DONE+1!
DA DONE+1!
>> DFN START+22, START+23, START+33, START+36, START+38, START+39
DIE DONE+1!
DIR FINISH+32~, FINISH+53!, FINISH+71!, FINISH+83!, FINISH+85!, FINISH+90!
DIR("?" FINISH+89*, FINISH+90*
DIR("A" FINISH+42*, FINISH+53*, FINISH+83*, FINISH+85*, FINISH+89*
DIR(0 FINISH+42*, FINISH+53*, FINISH+71*, FINISH+83*, FINISH+85*, FINISH+89*
DR DONE+1!
DRG START+43~, START+44*, START+45, DONE+1!
DRGCNT START+43~*, START+44*, START+45
DUR START+39~*, START+40
DURMIN START+40~*
>> F1 FINISH+63*, FINISH+64*, FINISH+65*, FINISH+66*
>> IOINHI FINISH+29
>> IOINORM FINISH+29
>> IORVOFF FINISH+37, FINISH+38
>> IORVON FINISH+37, FINISH+38
MSG FINISH+63*, FINISH+64*, FINISH+65*, FINISH+66*, FINISH+71, DONE+1!
NSFF FINISH+2~*, FINISH+46!
>> PS( START+45*
>> PSGAT START+5*, FINISH+47*, FINISH+49, FINISH+50, FINISH+59, FINISH+84
>> PSGCANFL ACCEPT+3*, BYPASS+1*
>> PSGDO START+3*, FINISH+79, FINISH+80
>> PSGDT START+2*
>> PSGEB START+18
PSGEFN START+2!
>> PSGFD START+37*, START+40*, START+41, FINISH+5*, ABORTACC+2*
>> PSGFDN START+41*
PSGFDX START+2!
>> PSGLI START+25, START+28, START+37, START+42
>> PSGLIN START+42*
>> PSGNEDFD START+26*, START+27*
>> PSGNEFD START+37, FINISH+5, ABORTACC+2
>> PSGNESD START+28*, START+33*, ABORTACC+2
PSGNSTAT FINISH+50*, DONE+1!
>> PSGODO FINISH+79, FINISH+80
>> PSGOEA START+36*, START+38*
PSGOEAO START+35~, START+36*, START+38
>> PSGOEAV FINISH+92*
>> PSGOEE FINISH+62*, FINISH+63*, FINISH+64*, FINISH+65*, FINISH+66*
PSGOEEF START+2!*, START+18*, FINISH+63*, FINISH+64*, FINISH+65*, FINISH+66*, ABORTACC+2!
PSGOEEF( START+18*, FINISH+63*, FINISH+64*, FINISH+65*, FINISH+66*
PSGOEEF(109 FINISH+79*
PSGOEEF(26 FINISH+82*
PSGOEEF(39 FINISH+84*
>> PSGOEEG START+2*
>> PSGOEENO FINISH+75*, FINISH+80*, FINISH+93, ACCEPT+3
>> PSGOEF START+2*, ACCEPT+3
PSGOEF39 FINISH+2~, FINISH+59*, FINISH+62
>> PSGOEFF FINISH+57*, FINISH+58, FINISH+59*, FINISH+60, FINISH+61, FINISH+62*, FINISH+64, FINISH+65, FINISH+67, FINISH+68
, FINISH+70, FINISH+72
PSGOES START+2!*, FINISH+46~, ACCEPT+3!
>> PSGOFD START+41*
PSGONF START+2!
>> PSGOPR START+18
>> PSGORD START+1, START+3, START+4, START+5, START+7, START+11, START+19, START+20, START+21, START+30
, START+31, START+33, START+36, START+37, START+38, START+39, FINISH+3, FINISH+4, FINISH+5, FINISH+6
, FINISH+25, FINISH+44, FINISH+45, FINISH+47, FINISH+49, FINISH+54, FINISH+55, FINISH+72, FINISH+74, FINISH+87
, ABORTACC+2
>> PSGORQF FINISH+70
>> PSGOSCH FINISH+45, FINISH+46, FINISH+48*, FINISH+49, FINISH+52, FINISH+56*, FINISH+57
>> PSGP ABORTACC+2
>> PSGPD START+3*, START+26, START+44, FINISH+67
>> PSGPDN START+3*
>> PSGPDRG START+3*
>> PSGPDRGN START+3*
PSGRDTX START+2!, FINISH+3!
PSGRDTX( START+37, FINISH+3, FINISH+4, FINISH+5
PSGRNSD START+39~*, START+40
PSGRSD START+33!, ACCEPT+3!
PSGRSDN ACCEPT+3!
>> PSGS0XT FINISH+45, FINISH+54, FINISH+56, FINISH+59, FINISH+84
PSGS0Y START+5, START+20, START+28, FINISH+46~, FINISH+47, FINISH+49, FINISH+51, FINISH+84
PSGSCH START+4, START+28, FINISH+46~
>> PSGSD START+20*, START+22*, START+23*, START+24*, START+25*, START+28*, START+33*, START+41, FINISH+4*, ABORTACC+2*
>> PSGSDN START+41*
>> PSGSI FINISH+55*
>> PSGST START+27, FINISH+72, FINISH+84
>> PSGSTAT FINISH+75*
PSGWALLO START+35~, START+36*, START+38
PSJACEPT FINISH+74!, FINISH+82!, FINISH+84!, FINISH+86, FINISH+91*, FINISH+93*, ACCEPT+1, ACCEPT+2
>> PSJCOI START+3
PSJCOM FINISH+6~*, FINISH+22, FINISH+23, FINISH+30
PSJCT1 FINISH+21*, FINISH+22, FINISH+23*, FINISH+30, ABORTACC+1!
PSJCT1A FINISH+22*, FINISH+23*, ABORTACC+1!
PSJDOSE START+6~, START+12*, START+13*, START+15, START+16, FINISH+76~
PSJDOX START+6~, START+8, START+9, FINISH+76~
PSJDOX( START+14, START+15, START+16, START+17
PSJDOX(1 START+9, START+10
PSJDSFLG FINISH+76~, FINISH+78
>> PSJLMFIN FINISH+73*
>> PSJLMP2 FINISH+74*
>> PSJLMX FINISH+26
>> PSJNOO FINISH+93*
PSJNSS FINISH+2!, FINISH+48!, FINISH+56!, FINISH+82!
PSJOVR DONE+2!, ABORTACC+1!
PSJOVR("CONJ" FINISH+40
PSJOVRLP FINISH+31, ABORTACC+1!
PSJPIECE START+6~, START+10*, START+12, START+13, START+15, START+16
>> PSJPROT FINISH+44
>> PSJRNF FINISH+87, FINISH+91, FINISH+92
>> PSJSYSP START+17, START+43, START+45, FINISH+55, FINISH+57
>> PSJSYSP0 FINISH+75
>> PSJTUD START+3, FINISH+44, FINISH+46, FINISH+56
PSJUNIT START+6~, START+13*, START+16
PSJX START+6~, START+14, START+17*, START+21~*, START+22, START+23, START+24
>> Q FINISH+61*
Q1 DONE+1!
Q2 DONE+1!
U START+3, START+4, START+10, START+12, START+13, START+15, START+16, START+17, START+20, START+21
, START+22, START+23, START+24, START+27, START+30, START+33, START+36, START+38, START+41, START+42
, START+44, START+45, FINISH+55, FINISH+75
>> VALMBCK ACCEPT+1*, ABORTACC+2*
>> VALMBG FINISH+27*, FINISH+69*
>> VALMSG FINISH+78*, FINISH+80*
X START+4*, START+5, START+6~, START+7*, START+8, START+11*, START+12, START+13, START+14*, START+15
, START+16, START+17, START+18*, START+33*, START+44*, FINISH+29*, FINISH+32~, FINISH+35*, FINISH+36, FINISH+37
, FINISH+40, FINISH+46*, FINISH+47, FINISH+58*, FINISH+59*, FINISH+60*, FINISH+61
X1 FINISH+32~, FINISH+35*, FINISH+36*, FINISH+37, FINISH+38
>> Y START+18*, FINISH+61*, FINISH+63*, FINISH+64*, FINISH+65*, FINISH+66*, FINISH+90*, FINISH+91, FINISH+92
>> ZZND FINISH+54

Marked Items

Name Field # of Occurrence
$T(32 FINISH+65
$T(38 FINISH+64, FINISH+66
$T(39 FINISH+63
$T(@(3) START+18
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All