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

Package: Registration

Routine: DGSWITCH


Information

DGSWITCH ;SF/GFT/MIR - SWITCH BEDS ; 5/17/88 10:54 AM ;

Source Information

Source file <DGSWITCH.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Registration 5 RESET^DGPMDDCN  ^DGPMEVT  EN^DGPMVBM  INP^DGRPD  KVAR^VADPT  
VA Fileman 2 ^DIC  ^DIE  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Registration 2 DG BED SWITCH  DGOERR BED SWITCH  
IHS Changes To ADT 1 BDGAPI  

Entry Points

Name Comments DBIA/ICR reference
OREN
EN
OERR
DIE
Q
REASK

External References

Name Field # of Occurrence
RESET^DGPMDDCN DIE
^DGPMEVT DIE+1
EN^DGPMVBM DIE+1
INP^DGRPD OERR
^DIC EN+1
^DIE DIE
KVAR^VADPT Q

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Prompt: "SWITCH BED FOR PATIENT: "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: X
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: *7,!?5,"NO ADMISSIONS ON FILE!"
  • Line Location: OERR+0
Function Call: WRITE
  • Prompt: !
  • Line Location: OERR+1
Function Call: WRITE
  • Prompt: !,"Patient is not in-house!",*7
  • Line Location: OERR+1
Function Call: WRITE
  • Prompt: !,"Not while ",$S("^2^3^25^26^"[X:"on absence",1:"ASIH")
  • Line Location: OERR+3
Routine Call
  • DIE
  • Line Location:
    • DIE
Routine Call
  • DIC
  • Line Location:
    • EN+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls
^DGPM - [#405] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPM - [#405] OERR+3, DIE
^DGPM("APCA" OERR+2
^DGPM("APMV" OERR+3
^UTILITY("DGPM" EN!, Q!, DIE*

Label References

Name Line Occurrences
DIE OERR+2, OERR+4
EN EN+1, REASK
OERR OREN
Q EN+1
REASK OERR, OERR+1, OERR+2, OERR+3

Naked Globals

Name Field # of Occurrence
^( OERR+3
^(0 OERR+3, DIE

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A Q!
D Q!
DA OERR+2*, OERR+4*, Q!, DIE
DFN EN+1*, OERR+2, OERR+3, Q!, OREN*
DGOERR EN*, Q!
DGPMA Q!, DIE*, DIE+1
DGPMDA Q!, OREN*, DIE*
DGPMDCD OERR+1, Q!
DGPMOC Q!
DGPMOS Q!
DGPMP Q!, DIE*, DIE+1
DGPMT OERR+2*, OERR+4*, Q!, DIE
DGPMVI Q!
DGPMVI(1 OERR
DGPMVI(13 OERR+2, OERR+3
DGSWITCH EN*, Q!, OREN*
DIC EN+1*, Q!
DIC("S" EN+1*
DIC(0 EN+1*
DIE OERR+2*, Q!
DR OERR+2*, Q!
DTIME EN+1
I OERR+2*, OERR+3*, OERR+4, Q!
ORACTION EN!, REASK, Q
>> ORVP OREN
X EN+1*, OERR+3*, Q!
XQORQUIT EN*, Q!
Y EN+1, Q!, OREN*
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