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

Package: Inpatient Medications

Routine: PSGOE42


Information

PSGOE42 ;BIR/CML3-REGULAR ORDER ENTRY (CONT.) ;13 May 2019 18:44:10

Source Information

Source file <PSGOE42.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 4 ^DIC  YN^DICN  ^DIE  $$GET1^DIQ  
Inpatient Medications 3 $$ACTPRO^PSGOE1  (ENFF,ENHLP)^PSGOEM  ($$ISCLOZ,PROVCHK)^PSJCLOZ  

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

Package Total Caller Graph
Inpatient Medications 3 PSGOE3  PSGOE4  PSGOE41  

Entry Points

Name Comments DBIA/ICR reference
1
A1 ;
A2 ;; START NCC T4 MODS >> 327*RJS
5 ; self med
A5
6 ; hospital supplied self med
DONE ;
FF ; up-arrow to another field
DEL ; delete entry
YN ; yes/no as a set of codes
2 ; dispense drug multiple

External References

Name Field # of Occurrence
^DIC A1+8
YN^DICN DEL+1
^DIE 2+2
$$GET1^DIQ A1+5
$$ACTPRO^PSGOE1 A1+2
ENFF^PSGOEM FF+1
ENHLP^PSGOEM A1+4, A1+6, A5+4, A5+6, 6+5, 6+7
$$ISCLOZ^PSJCLOZ A2+1
PROVCHK^PSJCLOZ A2+2

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: A1+3
Function Call: WRITE
  • Prompt: !,"PROVIDER: ",$S(PSGPR:PSGPRN_"// ",1:"")
  • Line Location: A1+3
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: A1+3
Function Call: WRITE
  • Prompt: $C(7)," (Required)"
  • Line Location: A1+4
Function Call: WRITE
  • Prompt: " "_$$GET1^DIQ(200,PSGPR,53.2)_" "_$$GET1^DIQ(200,PSGPR,53.3)
  • Line Location: A1+5
Function Call: WRITE
  • Prompt: !
  • Line Location: A2+4
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: A5+0
Function Call: WRITE
  • Prompt: !,"SELF MED: "
  • Line Location: A5+0
Function Call: WRITE
  • Prompt: $P("NO^YES","^",PSGSM+1),"// "
  • Condition for execution: PSGSM]""
  • Line Location: A5+0
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: A5+6
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: 6+1
Function Call: WRITE
  • Prompt: !,"HOSPITAL SUPPLIED SELF MED: "
  • Line Location: 6+1
Function Call: WRITE
  • Prompt: $P("NO^YES","^",PSGHSM+1),"// "
  • Condition for execution: PSGHSM]""
  • Line Location: 6+1
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: 6+7
Function Call: WRITE
  • Prompt: $C(7)," <NOTHING DELETED>"
  • Line Location: DEL+1
Function Call: WRITE
  • Prompt: $P(Y,X,2)
  • Line Location: YN+2
Function Call: WRITE
  • Prompt: $C(7),!!,"WARNING: This order must have at least one dispense drug before pharmacy can",!?9,"verify it!"
  • Line Location: 2+3
Routine Call
  • DIC
  • Line Location:
    • A1+8
Routine Call
  • DIE
  • Line Location:
    • 2+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] Classic Fileman Calls,  GET1^DIQ
^PS(53.45 - [#53.45] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(53.45 - [#53.45] 2+1, 2+3

Label References

Name Line Occurrences
1 A1+4, A1+7, A1+8
5 1+4
6 A5+5, 6+3, 6+4, 6+5, 6+7
@( A1+7, A5+3, 6+4, 2+5
A1 1+3, A2+4
A2 A1+5
A5 A5+2, A5+3, A5+4, A5+6
DEL A5+2, 6+3
DONE 1+4, A1+3, 5+1, A5A5+1, A5+2, A5+5, 6+1, 6+2, 6+3
6+6
FF A1+7, A5+3, 6+4
YN A5+5, 6+6

Naked Globals

Name Field # of Occurrence
^(1 2+1*
^(2 2+1*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % A5+2, 6+3, DEL+1*
ANQX A2+2*, A2+3, A2+4!
DA 2+2!*
DIC A1+8!*
DIC("S" A1+8*
DIC(0 A1+8*
>> DIE 2+2*
DR 2+2!*
DR(2 2+2*
DTIME A1+3, A56+1
F DONE+1!
F0 DONE+1!
F1 DONE+1!
F3 DONE+1!
>> FB 2+5
PSG DONE+1!
PSGCLOZ 1!
>> PSGDRG A2+1, 2+1
PSGF2 A1+4*, A1+6*, A5+3*, A5+4*, 6+4*, 6+7*, DONE+1!
>> PSGFOK(1 A1+5*, A1+9*
>> PSGFOK(13 2+2, 2+4
>> PSGFOK(5 A5+5*
>> PSGHSM A5+2*, 6+1, 6+2*, 6+3*, 6+6*
>> PSGOROE1 A1+3*, A5*, 6+1*
>> PSGPR 1+1*, 1+3, 1+5, A1+2*, A1+3, A1+4, A1+5, A1+9*, A2+2, A2+4*
>> PSGPRN 1+1*, 1+3, 1+5, A1+2*, A1+3, A1+5, A1+9*, A2+4*
>> PSGSM A5A5+1*, A5+2*, A5+5*
>> PSGUD 2+1
PSJACT A1+2~*
>> PSJSYSP 2+1, 2+2, 2+3
>> PSJSYSU 1+3, 1+4
>> PSJSYSW0 1+4, 5+1
PSTMPI 1+3*, 1+5*, A2+3!, A2+4
PSTMPN 1+3*, 1+5*, A2+3!, A2+4
SDT DONE+1!
>> X A1+3*, A1+4*, A1+5*, A1+6, A1+7, A5*, A5+1, A5+2, A5+3, A5+4
A5+5, 6+1*, 6+2, 6+3, 6+4, 6+5, 6+6, YN+1*, YN+2
>> Y A1+7, A1+8, A1+9, A5+3, 6+4, FF+1*, YN+1*, YN+2*
>> Y(0 A1+9
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