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 |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: DGPMV1

Package: Registration

Routine: DGPMV1


Information

DGPMV1 ;ALB/MRL/MIR/JAN - PATIENT MOVEMENT, CONT.; 11 APR 89 ; 6/14/01 11:51am

Source Information

Source file <DGPMV1.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Registration 8 IN^DGHELP  DOM^DGMTR  DIS^DGMTU  (CS,INP,LODGER)^DGPMV10  ^DGPMV2  ENED^DGRP  (10,KVAR)^VADPT  Q^VADPT3  

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
Registration 2 DGPMEX  DGPMV  
Electronic Health Modernization 1 EHMDGPMV  

Entry Points

Name Comments DBIA/ICR reference
NEXT
C
LOCK
Q
M
L
EN
AP
HELP ;

External References

Name Field # of Occurrence
IN^DGHELP NEXT+2
DOM^DGMTR DGPMV1+5
DIS^DGMTU DGPMV1+5
CS^DGPMV10 DGPMV1+6
INP^DGPMV10 DGPMV1+2, C+4
LODGER^DGPMV10 C+3
^DGPMV2 LOCK+2
ENED^DGRP L
10^VADPT M
KVAR^VADPT Q
Q^VADPT3 DGPMV1+2

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: NEXT+0
Function Call: WRITE
  • Prompt: !!,"<C>ontinue, <M>ore, or <Q>uit? CONTINUE// "
  • Line Location: NEXT+0
Function Call: WRITE
  • Prompt: X
  • Line Location: NEXT+0
Function Call: WRITE
  • Prompt: " ",X
  • Line Location: NEXT+1
Function Call: WRITE
  • Prompt: !!,"CHOOSE FROM:"
  • Line Location: NEXT+4
Function Call: WRITE
  • Prompt: !?5,J
  • Line Location: NEXT+4
Function Call: WRITE
  • Prompt: !
  • Line Location: NEXT+5
Function Call: WRITE
  • Prompt: !!,*7,"THIS PATIENT IS A LODGER AND HAS NO ADMISSIONS ON FILE.",!,"YOU MUST CHECK HIM OUT PRIOR TO CONTINUING"
  • Line Location: C+1
Function Call: WRITE
  • Prompt: !!,*7,"THIS PATIENT IS AN INPATIENT AND HAS NO LODGER MOVEMENTS ON FILE.",!,"YOU MUST DISCHARGE HIM PRIOR TO CONTINUING"
  • Line Location: C+2
Function Call: WRITE
  • Prompt: !
  • Line Location: M+0
Function Call: WRITE
  • Prompt: !?5,"PATIENT IS NOT ACTIVELY ENROLLED IN ANY CLINICS"
  • Line Location: EN+0
Function Call: WRITE
  • Prompt: ",",!?5
  • Condition for execution: ($X+$L(X))>70
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: ", "
  • Condition for execution: $X>5
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: X
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: !?5,"Patient has no future appointments scheduled"
  • Line Location: AP+0
Function Call: WRITE
  • Prompt: ",",!?5
  • Condition for execution: $X+$L(X)>78
  • Line Location: AP+1
Function Call: WRITE
  • Prompt: ", "
  • Condition for execution: $X>5
  • Line Location: AP+1
Function Call: WRITE
  • Prompt: X
  • Line Location: AP+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPM("APTT1" C+1
^DGPM("APTT4" C+2
^DGPM("C" LOCK, LOCK+2
^DPT - [#2] DGPMV1+4
^UTILITY("VAEN" M, EN+1
^UTILITY("VASD" M, AP+1

Label References

Name Line Occurrences
@( NEXT+3
AP M
C M, L
EN M
NEXT NEXT+5
Q DGPMV1+3, NEXT+3

Naked Globals

Name Field # of Occurrence
^( EN+1, AP+1
^("E" AP+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN DGPMV1+3, DGPMV1+4, DGPMV1+5, C+1, C+2, LOCK, LOCK+2
DGDOM DGPMV1+5!
DGPM2X C*, C+3*, C+4*, Q!
DGPMDCD Q!
DGPMIFN Q!
>> DGPMT C+1, C+2, C+3, C+4
DGPMVI Q!
DGPMVI(2 C+1, C+2, C+3, C+4
DGPMY Q!
DIE Q!
DR Q!
DTIME NEXT
I NEXT+4*, Q!, M!, EN+1*, AP+1*
J NEXT+4*, Q!
VAIP DGPMV1+2!, C+4!
VAIP("D" DGPMV1+2*, C+4*
VAIP("L" DGPMV1+2*
X DGPMV1+4*, NEXT*, NEXT+1*, NEXT+3, Q!, M*!, EN, EN+1*, AP, AP+1*
X1 Q!
Z NEXT*, Q!

Marked Items

Name Field # of Occurrence
$T(HELP+I NEXT+4
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All