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

Package: Inpatient Medications

Routine: PSJADT0


Information

PSJADT0 ;BIR/CML3,PR,MLM-AUTO DC/HOLD CANCEL ;11 Aug 98 / 8:25 AM

Source Information

Source file <PSJADT0.m>

Call Graph

Call Graph

Call Graph Total: 16

Package Total Call Graph
Inpatient Medications 12 ^PSGAL5  $$EN^PSGCT  ENRI^PSGOERI  ENUNM^PSGOU  ENL^PSGVDS  EXPIR^PSIVOE  (ENARI,ENLBL)^PSIVOPT  D1^PSIVOPT2  
LOG^PSIVORAL  ^PSJADT2  $$CLINIC^PSJBCMA  EN1^PSJHL2  
VA FileMan 4 NOW^%DTC  (,FILE)^DIE  ^DIK  $$GET1^DIQ  

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: 4

Package Total Caller Graph
Inpatient Medications 4 PSGOEC  PSIVACT  PSJADT  PSJADT1  

Entry Points

Name Comments DBIA/ICR reference
ENDC ; dc active orders first, then non-verified orders
ENIV ;
DC ;
SIVDIE ; Setup DIE,DA for IV
AUDDD ; set up orders for discharge report and purging
ENHE ; status from hold to expired
ENUNDC(PSJDCDT,PSGP,PSJUOW,PSGALO) ; Auto-reinstate orders DC'ed due to a patient movement.
ENKL ;
DISREIN ; Display reinstate msg. for first order.
DCIMO(DFN,ON,TYP) ; Check parameter before DC'ing clinic order

External References

Name Field # of Occurrence
NOW^%DTC ENDC+3, DC+2, ENHE+1, ENUNDC+1
^DIE ENHE+2
FILE^DIE ENDC+14, ENDC+18, ENDC+29, DC+5, DC+12
^DIK ENKL+1, ENKL+2, ENKL+3, ENKL+4
$$GET1^DIQ DCIMO+6
^PSGAL5 ENDC+10
$$EN^PSGCT AUDDD+2
ENRI^PSGOERI ENUNDC+3
ENUNM^PSGOU ENDC+5
ENL^PSGVDS ENDC+21
EXPIR^PSIVOE DC+2
ENARI^PSIVOPT ENUNDC+8
ENLBL^PSIVOPT ENDC+24
D1^PSIVOPT2 DC+7
LOG^PSIVORAL DC+7
^PSJADT2 ENUNDC+9
$$CLINIC^PSJBCMA DCIMO+4
EN1^PSJHL2 ENDC+20, ENDC+25, DC+14

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^PS(53.41 - [#53.41] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] ENUNDC+9
^PS(53.1 - [#53.1] ENDC+22, ENDC+24, ENDC+25
^PS(53.3 - [#53.3] DC+7
^PS(53.41 - [#53.41] ENKL+1, ENKL+2, ENKL+3, ENKL+4
^PS(53.46 - [#53.46] DCIMO+5, DCIMO+7
^PS(55 - [#55] ENDC+6, ENDC+9, ENDC+21*, ENIV+1, AUDDD+1, AUDDD+3*, ENHE+2, ENUNDC+2, ENUNDC+3, ENUNDC+4*
, ENUNDC+6, ENUNDC+7, ENUNDC+8
^PS(59.6 - [#59.6] ENDC+3, ENUNDC+1
^TMP("PSJUNDC" ENUNDC+9*

Label References

Name Line Occurrences
$$DCIMO ENDC+7, ENDC+23, DC+1
AUDDD ENDC+4
DC ENIV+1
DISREIN ENUNDC+3, ENUNDC+8

Naked Globals

Name Field # of Occurrence
^( ENIV+1
^(0 AUDDD+3*, ENHE+2, ENUNDC+8
^(2 ENDC+9*, ENUNDC+8
^(4 ENUNDC+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % ENDC+3, DC+2, ENHE+1, ENUNDC+1
A DCIMO+1~, DCIMO+3*, DCIMO+4
APPT DCIMO+1~, DCIMO+3*
B DCIMO+1~, DCIMO+7*
C DCIMO+1~, DCIMO+7*
CLINIC DCIMO+1~, DCIMO+3*, DCIMO+5, DCIMO+7
DA ENDC+9!*, ENDC+21*, ENDC+24!, ENDC+25!*, SIVDIE+1!*, ENHE+2!*, ENKL+1!*, ENKL+2!*, ENKL+3!*, ENKL+4!*
ENKL+5!
DA(1 ENDC+9*, SIVDIE+1*, ENHE+2*, ENKL+2*, ENKL+3*, ENKL+4*
DA(2 ENKL+3*, ENKL+4*
DA(3 ENKL+4*
DFN ENDC+24, ENIV+1*, DC+1, DC+4, DC+9, DC+10, DC+11, DC+14, SIVDIE+1, ENUNDC+9
, DCIMO~, DCIMO+1, DCIMO+6
>> DGQUIET ENDC+1, DISREIN+1
DIE ENDC+5*, SIVDIE+1!*, ENHE+1*
DIK ENKL+1*, ENKL+2*, ENKL+3*, ENKL+4*, ENKL+5!
>> DIS AUDDD+1*, AUDDD+3
DR SIVDIE+1!, ENHE+2*
GLO DCIMO+1~*, DCIMO+3*
IMOND DCIMO+1~, DCIMO+2*, DCIMO+3
ON DC+2*, DC+4, DC+9, DC+10, DC+11, DC+14, SIVDIE+1, DCIMO~, DCIMO+3
>> ON55 DC+2*
P ENKL+5!
P(17 ENIV+1*, DC+2
P(3 ENIV+1*, DC+2, ENUNDC+8*
>> PSGAL("C" ENDC+9*
PSGALO ENDC+4, ENDC+13, ENDC+21, ENDC+24, DC+7, DC+9, ENUNDC~, ENUNDC+8, ENUNDC+9
>> PSGALR ENDC+5*
PSGDT ENDC+3*, ENDC+6, ENHE+1*, ENHE+2, ENUNDC+1*, ENUNDC+8, ENKL+5!
PSGORD ENUNDC+2*, ENUNDC+3, ENUNDC+4, ENUNDC+7*, ENUNDC+8, ENKL+5!
PSGP ENDC+5, ENDC+6, ENDC+7, ENDC+9, ENDC+12, ENDC+13, ENDC+16, ENDC+17, ENDC+20, ENDC+21
ENDC+22, ENDC+23, ENDC+25, ENIV+1, AUDDD+1, AUDDD+3, ENHE+1, ENHE+2, ENUNDC~, ENUNDC+2
, ENUNDC+3, ENUNDC+4, ENUNDC+6, ENUNDC+7, ENUNDC+8, ENUNDC+9, ENKL+2*, ENKL+3, ENKL+4, ENKL+5!
, DCIMO+1
>> PSGTOL ENDC+5*, ENDC+24
>> PSGTOO ENDC+5*, ENDC+22*
>> PSGUOW ENDC+5*, ENDC+24
>> PSIVAC DC+7*
>> PSIVAL DC+7*
>> PSIVALCK DC+7*
PSIVALT DC+7!
>> PSIVREA DC+7*
>> PSIVRES DC+7
>> PSJDA ENDC+6*, ENDC+7, ENDC+9, ENDC+12, ENDC+13, ENDC+16, ENDC+17, ENDC+20, ENDC+21, ENDC+22*
ENDC+23, ENDC+24, ENDC+25, ENDC+27, ENDC+28, ENHE+2*
PSJDCDT ENDC+3~*, ENDC+16, ENDC+21, DC+10, ENUNDC~, ENUNDC+2, ENUNDC+6
>> PSJFIRST ENUNDC+1*, DISREIN+1*
>> PSJFW ENDC+3, ENDC+5
>> PSJIVDCF DC+15*
>> PSJIVON ENIV+1*, DC+1, DC+2
>> PSJPAD ENHE+2
>> PSJPIND ENDC+2*
>> PSJQUIET ENDC+1, ENUNDC+1
PSJS ENDC+6*, ENHE+2*, ENUNDC+2*, ENUNDC+6*, ENUNDC+7, ENKL+5!
>> PSJSYSW ENDC+3*
PSJSYSW0 ENDC+3*, ENDC+21, ENDC+24, ENUNDC+1~*
PSJUNDC ENUNDC+1*, ENKL+5!
PSJUOW ENUNDC~, ENUNDC+1, ENUNDC+8
>> Q AUDDD+3*
>> QQ AUDDD+3*
TMP ENDC+11!, ENDC+15!, ENDC+19!, ENDC+26!, ENDC+30!, DC+3!, DC+6!, DC+8!, DC+13!
TMP( ENDC+12*, ENDC+13*, ENDC+16*, ENDC+17*, ENDC+27*, ENDC+28*, DC+4*, DC+9*, DC+10*, DC+11*
TO ENKL+3*, ENKL+4, ENKL+5!
TYP DCIMO~, DCIMO+1, DCIMO+2
U ENDC+24, ENIV+1, DC+7, ENUNDC+3, ENUNDC+8
UW ENKL+1*, ENKL+2, ENKL+3, ENKL+4, ENKL+5!
>> VAIP(13 AUDDD+2
>> VAIP(17 AUDDD+1
>> X AUDDD+2*, AUDDD+3
>> Y ENIV+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All