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 Total: 6

Package Total Call Graph
Registration 6 IN^DGHELP  (CS,INP,LODGER)^DGPMV10  ^DGPMV2  ENED^DGRP  (10,KVAR)^VADPT  Q^VADPT3  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Registration 2 DGPMEX  DGPMV  

Entry Points

Name Comments DBIA/ICR reference
C
EN
HELP ;
LOCK
M ;D 10^VADPT S X=$O(^UTILITY("VAEN",$J,0)) D EN S X=$O(^UTILITY("VASD",$J,0)) D AP K I,X W ! D C Q ;display enrollments,appointments --> continue ;IHS/ANMC/LJF 2/21/2001
L
NEXT
Q
AP

External References

Name Field # of Occurrence
IN^DGHELP NEXT+2
CS^DGPMV10 DGPMV1+11
INP^DGPMV10 DGPMV1+4, C+4
LODGER^DGPMV10 C+3
^DGPMV2 LOCK+2
ENED^DGRP L
10^VADPT M+1
KVAR^VADPT Q
Q^VADPT3 DGPMV1+4

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • 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: !
  • Line Location: M+1
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
^UTILITY("VAEN" EN+1
^UTILITY("VASD" M+1, AP+1

Label References

Name Line Occurrences
@( NEXT+3
AP M+1
C M+1, L
NEXT NEXT+5
Q DGPMV1+5, 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+5, C+1, C+2, LOCK, LOCK+2
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+1!, EN+1*, AP+1*
J NEXT+4*, Q!
VAIP DGPMV1+4!, C+4!
VAIP("D" DGPMV1+4*, C+4*
VAIP("L" DGPMV1+4*
X NEXT*, NEXT+1*, NEXT+3, Q!, M+1*!, 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