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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PSGOECS

Package: Inpatient Medications

Routine: PSGOECS


Information

PSGOECS ;BIR/CML3-CANCEL SELECTED ORDERS ;02 Mar 99 / 9:29 AM

Source Information

Source file <PSGOECS.m>

Call Graph

Call Graph

Call Graph Total: 18

Package Total Call Graph
Inpatient Medications 13 ^PSGAL5  ($$PNDRNA,$$REQPROV,AC,ASET,DONE,NC,NSET)^PSGOEC  ENWO^PSGON  (ENL,ENPOS)^PSGVDS  (,SPDCIV)^PSIVSPDC  $$CODES^PSIVUTL  CMPLX^PSJCOM1  EN1^PSJHL2  
INIT^PSJLMHED  DSPLORDV^PSJLMUT1  $$DRUGNAME^PSJLMUTL  $$LOCK^PSJOEA  $$ENNOO^PSJUTL5  
VA FileMan 3 NOW^%DTC  YN^DICN  ^DIE  
List Manager 1 FULL^VALM1  
Pharmacy Data Management 1 ($$LS,UNL)^PSSLOCK  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
Inpatient Medications 5 PSGOE0  PSGOEC  PSGOEE  PSIVSPDC  PSJU LM SPEED DISCONTINUE  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
AM ;
NM ;
AC ; discontinue active order
NC ; discontinue non-verified order
NC2 ; Called from PNDRN to discontinue both pending renewal and original order
EN ; enter here
EN1 ;
RESET ;
DONE ;
DCOR ; Create DC order/update stop date in OE/RR.
ENOR ;
ENOR2 ;Check to see if order being DC'd is a Pending Renewal and is being DC'd due to edit.
CHKCOM ;Check to see if order is part of complex order series.
DCCOM ;DC pending/non-verified complex order
PNDRN(PSJDCTYP) ; Discontinue both pending renewal and original order

External References

Name Field # of Occurrence
NOW^%DTC EN1+2
YN^DICN CHKCOM+9
^DIE AC+9, NC2+3, ENOR2+3
^PSGAL5 AM+1, AC+8
$$PNDRNA^PSGOEC NC+1
$$REQPROV^PSGOEC EN1+7
AC^PSGOEC ENOR+2
ASET^PSGOEC ENOR+2
DONE^PSGOEC ENOR+1, ENOR+3
NC^PSGOEC ENOR+1
NSET^PSGOEC ENOR+1
ENWO^PSGON EN1+1
ENL^PSGVDS AC+11, NC2+5
ENPOS^PSGVDS AM+2, NM+2
^PSIVSPDC EN+1
SPDCIV^PSIVSPDC EN1+32, CHKCOM+16
$$CODES^PSIVUTL AC+5
CMPLX^PSJCOM1 CHKCOM+8
EN1^PSJHL2 AC+10, NC2+4, DCOR+2, ENOR2+3
INIT^PSJLMHED RESET+1, RESET+2
DSPLORDV^PSJLMUT1 EN1+21, EN1+26, CHKCOM+4
$$DRUGNAME^PSJLMUTL AC+3, AC+5, AC+6, NC2+1, EN1+20, EN1+25, CHKCOM+7
$$LOCK^PSJOEA DCCOM+1
$$ENNOO^PSJUTL5 EN1+5
$$LS^PSSLOCK EN1+19, CHKCOM+12, PNDRN+6
UNL^PSSLOCK NC2+6, EN1+34, CHKCOM+17
FULL^VALM1 EN+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"...marking ",$P(X,U),"..."
  • Line Location: AM+1
Function Call: WRITE
  • Prompt: "."
  • Line Location: AM+1
Function Call: WRITE
  • Prompt: "."
  • Line Location: AM+1
Function Call: WRITE
  • Prompt: !,"...marking ",$P(X,U),"..."
  • Line Location: NM+1
Function Call: WRITE
  • Prompt: "."
  • Line Location: NM+1
Function Call: WRITE
  • Prompt: !,$P($$DRUGNAME^PSJLMUTL(DFN,PSGORD),U,1),!,"NO ACTION WAS TAKEN ON DONE ORDER",!,$C(7)
  • Line Location: AC+3
Function Call: WRITE
  • Prompt: !,$P($$DRUGNAME^PSJLMUTL(DFN,PSGORD),U,1),!,"NO ACTION WAS TAKEN ON "_$$CODES^PSIVUTL(XX,55.06,28)_" ORDER",!,$C(7)
  • Line Location: AC+5
Function Call: WRITE
  • Prompt: !,"...discontinuing ",$P(X,U),"...",!
  • Line Location: AC+8
Function Call: WRITE
  • Prompt: !,"...discontinuing ",$P(X,U),"...",!
  • Line Location: NC2+3
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+8
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+21
Function Call: WRITE
  • Prompt: !,"NO ACTION WAS TAKEN",!,$C(7)
  • Line Location: EN1+21
Function Call: WRITE
  • Prompt: !,$P($$DRUGNAME^PSJLMUTL(DFN,PSGORD),"^",1),!,"NO ACTION WAS TAKEN",!,$C(7)
  • Line Location: EN1+25
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+26
Function Call: WRITE
  • Prompt: !,"NO ACTION WAS TAKEN",!,$C(7)
  • Line Location: EN1+26
Function Call: WRITE
  • Prompt: !
  • Line Location: CHKCOM+4
Function Call: WRITE
  • Prompt: !,$P($$DRUGNAME^PSJLMUTL(PSGP,PSGORD),"^",1)
  • Line Location: CHKCOM+7
Function Call: WRITE
  • Prompt: !!,"Do you want to discontinue this series of complex orders"
  • Line Location: CHKCOM+9
Function Call: WRITE
  • Prompt: !,"Order # ",PSGOECS2," could not be discontinued.",!,$C(7)
  • Line Location: DCCOM+1
Routine Call
  • DIE
  • Line Location:
    • AC+9
    • NC2+3
    • ENOR2+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(53.1 - [#53.1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(53.1 - [#53.1] NM+1*, NC+1, NC2+1, NC2+2, NC2+5*, ENOR2+1, ENOR2+2, ENOR2+3, CHKCOM+1, CHKCOM+2
, DCCOM+3, PNDRN+4
^PS(55 - [#55] AM+1*, AC+2, AC+4, AC+9*, AC+11*, ENOR2+1, ENOR2+2, CHKCOM+1, CHKCOM+2, CHKCOM+11
, CHKCOM+14
^TMP("PSJON" EN1+4, EN1+17

Label References

Name Line Occurrences
@( PNDRN+7
AC EN1+30, CHKCOM+15
AM AC+7
CHKCOM EN1+24
DCCOM EN1+18
DONE RESET+1
EN1 EN1+5, EN1+7
ENOR2 ENOR+1
NC EN1+31, DCCOM+3
NC2 PNDRN+2
NM NC2+2
PNDRN NC+1
RESET EN1+1

Naked Globals

Name Field # of Occurrence
^(2 AC+9*
^(4 NC2+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EN1+2, CHKCOM+9*, CHKCOM+10
>> CF ENOR+1*, ENOR+2
COMFLG EN1+12~, EN1+24, CHKCOM+1*, CHKCOM+10*, CHKCOM+11, CHKCOM+12*, CHKCOM+13
DA AM+1, NM+1, AC+1!*, AC+2, AC+4, AC+9, AC+10*, AC+11, NC2+1!*, NC2+2
, NC2+5*, DONE+1!, ENOR+1!*, ENOR2+2!*
DA(1 AC+1*, AC+10*, ENOR+2*, ENOR2+2*
>> DFN AC+3, AC+5, NC2+6, EN1+19, EN1+20, EN1+25, EN1+34, CHKCOM+12, CHKCOM+17, DCCOM+1
, PNDRN+6
DIE AC+9*, NC2+3*, DONE+1!, ENOR2+2*
DP AC+9*, DONE+1!
DR AC+9*, NC2+3*, DONE+1!, ENOR2+2!*
DUZ AM+1, NM+1, AC+11, NC2+2, NC2+5
>> EXITLOOP EN1+12*, EN1+14, EN1+16*
ND5310 PNDRN+4~*, PNDRN+5
O CHKCOM+11~*, CHKCOM+14~*
>> ON EN1+17*, EN1+22, EN1+23, EN1+27, EN1+28, CHKCOM+5, CHKCOM+6, CHKCOM+16*
OO CHKCOM+11~*, CHKCOM+12, CHKCOM+14~*, CHKCOM+15, CHKCOM+16
ORETURN DONE+1!
ORIFN DONE+1!
ORNATR DONE+1!
PSGAL DONE+1!
PSGAL("C" AM+1*, AC+8*
PSGALR AC+9*, DONE+1!, ENOR+1*
>> PSGDT AM+1, AM+2, NM+1, NM+2, AC+9, AC+11, NC2+5, EN1+2*
>> PSGEDIT ENOR+1*, ENOR2+1
PSGLMT EN1+1*, DONE+1!
PSGODDD EN1+3, EN1+13, DONE+1!
PSGODDD( EN1+3, EN1+15
PSGOECS EN1+3*, EN1+13*, EN1+15, DONE+1!
PSGOECS1 EN1+3*, EN1+14*, EN1+15, DONE+1!
PSGOECS2 EN1+3*, EN1+4, EN1+15*, EN1+16, EN1+17, DONE+1!, DCCOM+1
>> PSGONC EN1+1*
PSGONW EN1+1*, DONE+1!
PSGORD AM+2*, NM+2*, AC+1, AC+3, AC+5, AC+6, AC+10, NC+1, NC2+1, NC2+4
, NC2+5, NC2+6, EN1+4*, EN1+17*, EN1+18, EN1+19, EN1+20, EN1+21, EN1+25, EN1+26
, EN1+30, EN1+31, EN1+32, EN1+34, RESET+1, DONE+1!, DCOR+1, DCOR+2, ENOR+1, ENOR2+1
, ENOR2+2, ENOR2+3, CHKCOM+1, CHKCOM+2, CHKCOM+4, CHKCOM+7, CHKCOM+8, CHKCOM+12, CHKCOM+15~*, CHKCOM+16~*
, CHKCOM+17, DCCOM+1, DCCOM+2, DCCOM+3*, PNDRN+1, PNDRN+4, PNDRN+5~*, PNDRN+6, PNDRN+7, PNDRN+8*
PSGORD1 DCCOM+2~*, DCCOM+3
>> PSGP AM+1, AC+1, AC+2, AC+4, AC+6, AC+9, AC+10, AC+11, NC2+1, NC2+4
, EN1+21, EN1+26, DCOR+2, ENOR+2, ENOR2+1, ENOR2+2, ENOR2+3, CHKCOM+1, CHKCOM+2, CHKCOM+4
, CHKCOM+7, CHKCOM+8
PSGPOSA AM+2*, NM+2*, DONE+1!
PSGPOSD AM+2*, NM+2*, DONE+1!
>> PSGSD ENOR2+1, ENOR2+2
PSGTOL AC+11*, NC2+5*, DONE+1!
PSGTOO AC+11*, NC2+5*, DONE+1!
PSGUOW AC+11*, NC2+5*, DONE+1!
PSJCOM EN1+12~*, EN1+29, CHKCOM+1*, CHKCOM+3, CHKCOM+8, CHKCOM+11, CHKCOM+14
PSJDCTYP NC+1*, NC2+6, PNDRN~, PNDRN+2*, PNDRN+5*, PNDRN+6!
>> PSJIVPRF EN+1
PSJLINE EN1+21~*, EN1+26~*, CHKCOM+4~*
>> PSJNOO EN1+5*, PNDRN+3
PSJO DCCOM+3~*
>> PSJOC( EN1+22, EN1+23, EN1+27, EN1+28, CHKCOM+5, CHKCOM+6
>> PSJOCNT EN1+1
PSJSTAT CHKCOM+2~*, CHKCOM+3
>> PSJSYSL AC+11, NC2+5
>> PSJSYSO AM+2, NM+2
>> PSJSYSP0 AC+7, NC2+2
>> PSJSYSU AC+8, AC+9, NC2+3
>> PSOC DCOR+1*, DCOR+2
>> T ENOR+1*
TMPORD PNDRN+1~*, PNDRN+8
U AM+1, NM+1, AC+3, AC+4, AC+5, AC+8, NC+1, NC2+3, ENOR2+1, ENOR2+2
, ENOR2+3, CHKCOM+1
>> VALMBCK RESET+2*
>> VALMBK RESET+1*
X AM+1, NM+1, AC+2*, AC+3, AC+6*, AC+8, NC2+1*, NC2+3, EN1+1!, EN1+22*
, EN1+23, EN1+27*, EN1+28, EN1+35*, CHKCOM+5*, CHKCOM+6
XX AC+4~*, AC+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All