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 |  All
Print Page as PDF
Routine: DGPMV2

Package: Registration

Routine: DGPMV2


Information

DGPMV2 ;ALB/MRL/MIR - PATIENT MOVEMENT PROCESSOR; 21 APR 1989

Source Information

Source file <DGPMV2.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Registration 5 UP^DGHELP  (,WR)^DGPMV20  (,PTF)^DGPMV21  SCHDADM^DGPMV22  ^DGPMV3  
VA FileMan 2 ^%DT  (HELP,NOW)^%DTC  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Registration 3 DGPMEX  DGPMV  DGPMV1  

Entry Points

Name Comments DBIA/ICR reference
CONT
SHOW
S2
S1
S6
S4
Q
S
OLD ;for previous entries (discharges and check-outs) skip select
NEW
SEL
E
SEL2

External References

Name Field # of Occurrence
^%DT SEL2+6
HELP^%DTC SHOW+1
NOW^%DTC DGPMV2+5, SEL2+1
UP^DGHELP SEL2+1
^DGPMV20 NEW+2
WR^DGPMV20 SHOW
^DGPMV21 CONT+1, OLD+1
PTF^DGPMV21 DGPMV2+3
SCHDADM^DGPMV22 CONT+1
^DGPMV3 CONT+1, OLD+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,*7,"INPATIENT ARRAY NOT DEFINED...MODULE ENTERED INCORRECTLY"
  • Line Location: DGPMV2+2
Function Call: WRITE
  • Prompt: !?22,"Enter '?' to see more choices"
  • Line Location: NEW+3
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: SEL2+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: SEL2+0
Function Call: WRITE
  • Prompt: I
  • Condition for execution: 'DGPM1X "Select " W DGPMUC," DATE: ",DEF W $S(DEF]"":"// ",1:"") R X:DTIME G Q:'$T!(X["^")
  • Line Location: SEL2+0
Function Call: WRITE
  • Prompt: " (",Y,")"
  • Line Location: SEL2+1
Function Call: WRITE
  • Prompt: " (",Y,")"
  • Line Location: SEL2+3
Function Call: WRITE
  • Prompt: " (",Y,")"
  • Line Location: SEL2+4
Function Call: WRITE
  • Prompt: !?8,*7,"NOT A VALID SELECTION...CHOOSE BY DATE/TIME OR NUMBER."
  • Line Location: E+0
Function Call: WRITE
  • Prompt: !?8,"NEW MOVEMENT ENTRIES MUST INCLUDE A DATE AND TIME."
  • Condition for execution: DGPMN
  • Line Location: E+0
Function Call: WRITE
  • Prompt: !
  • Line Location: SHOW+1
Function Call: WRITE
  • Prompt: !,DGPME
  • Line Location: OLD+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" SEL+1, SEL2+1, SEL2+4
^DG(405.1 - [#405.1] NEW
^DGPM - [#405] CONT, S, S1, S2, S4, S6
^DGPM("APMV" S2
^DGPM("ATID1" S1
^DGPM("ATID4" S4
^DGPM("ATS" S6
^UTILITY("DGPMVD" SEL2+6, SEL2+7, CONT, Q!, S1*, S2*, S4*, S6*
^UTILITY("DGPMVN" DGPMV2+6, NEW+3, SEL2+4, SEL2+5, Q!, SHOW, S1*, S2*, S4*, S6*

Label References

Name Line Occurrences
@( DGPMV2+5
CONT SEL2+1, SEL2+2, SEL2+4
E SEL2+1, SEL2+5, SEL2+6, SEL2+7
NEW DGPMV2+4
OLD DGPMV2+4, OLD+2
Q DGPMV2+3, SEL, SEL2, OLD+1, OLD+3
S DGPMV2+3
SEL SEL2+1, SEL2+5, SEL2+6, SEL2+7, CONT+1
SEL2 SEL2
SHOW SEL2

Naked Globals

Name Field # of Occurrence
^( SEL2+4, CONT, S1, S2, S4, S6
^(0 CONT, S, S1, S2, S4, S6
^(1 DGPMV2+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DGPMV2+7, DGPMV2+8, SEL2+1, Q!
%DT SEL2+6*, CONT+1!, SHOW*, SHOW+1!, OLD+1!
%DT(0 SEL2+6*
C DGPMV2+6!, SHOW+1!, S1*, S2*, S4*, S6*
D DGPMV2+6!, Q!, SHOW+1!, S1*, S2*, S4*, S6*
DEF DGPMV2+3*, DGPMV2+7*, DGPMV2+8*, SEL+1*, SEL2, SEL2+1, Q!
>> DFN S1, S2, S4, S6
DGONE NEW*, NEW+1*, Q!
DGPM1X DGPMV2+3*, DGPMV2+4*, SEL2, Q!
>> DGPM2X DGPMV2+7
DGPMAN CONT*, Q!, S*
DGPMCA CONT*, Q!, S*, S2, S6
>> DGPMDA CONT*, OLD+1*
>> DGPMDCD DGPMV2+4, DGPMV2+7, DGPMV2+8, OLD+1
DGPME DGPMV2+3!, DGPMV2+4!, SEL, SEL+1!, CONT+1, Q!, OLD+1, OLD+2
DGPML DGPMV2+4*, DGPMV2+6*, DGPMV2+7, NEW+2, Q!
DGPMMD DGPMV2+3*, DGPMV2+7*, SEL+1, SEL2+2, SEL2+7, Q!
DGPMN SEL2*, SEL2+1*, SEL2+7*, CONT+1, Q!, E, OLD+1*
DGPMSA Q!
>> DGPMT DGPMV2+3, DGPMV2+4, DGPMV2+5, DGPMV2+7, DGPMV2+8, NEW, SEL2+1, SEL2+7, CONT, CONT+1
>> DGPMUC SEL2
>> DGPMVI DGPMV2+2
>> DGPMVI(1 S
>> DGPMVI(13 S
>> DGPMVI(17 OLD+1
>> DGPMY CONT*, CONT+1, OLD+1*, OLD+2
>> DGX NEW*, NEW+1
>> DGZ SEL2+1*, SEL2+4*
DTIME SEL2
I DGPMV2+6!, Q!, SHOW*, SHOW+1!, S1*, S2*, S4*, S6*
I1 Q!, SHOW+1!
J DGPMV2+6!, Q!, S6*
N DGPMV2+6!, Q!, SHOW+1!, S1*, S2*, S4*, S6*
PTF Q!
X SEL2*, SEL2+1, SEL2+2, SEL2+4, SEL2+5, Q!
Y SEL+1*, SEL2+1*, SEL2+2*, SEL2+4*, SEL2+6, SEL2+7, CONT, Q!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All