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 |  Local Variables  | All
Print Page as PDF
Routine: DGVTSFS

Package: Registration

Routine: DGVTSFS


Information

DGVTSFS ;7DELTA/KDC - VTS Stand alone Option routine ;07-MAR-2012

Source Information

Source file <DGVTSFS.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA FileMan 3 YN^DICN  ^DIE  $$GET1^DIQ  
Registration 2 GETPAT^DGRPTU  A28^DGVTSA28  

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

Package Total Caller Graph
Registration 1 DG VTS RIDESHARE  

Entry Points

Name Comments DBIA/ICR reference
EN ;Entry point for stand-alone RideShare sign-up option
EN1
E1 ; Retrieve patient's VTS flag information
ENQ ;

External References

Name Field # of Occurrence
GETPAT^DGRPTU EN1
A28^DGVTSA28 E1+12
YN^DICN E1+6
^DIE E1+8
$$GET1^DIQ E1+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Patient record is currently locked, Try again later."
  • Line Location: EN1+1
Function Call: WRITE
  • Prompt: !,"The VTS Patient Flag is currently: ",DGVTRSF
  • Line Location: E1+3
Function Call: WRITE
  • Prompt: !,"Patient is already a RideShare participant"
  • Line Location: E1+4
Function Call: WRITE
  • Prompt: !!,"Are you sure you want to enroll patient in RideShare",!,"and set the VTS Patient Flag"
  • Line Location: E1+5
Function Call: WRITE
  • Prompt: !!,"Enter YES or NO.",!
  • Line Location: E1+6
Function Call: WRITE
  • Prompt: !!,"Patient is now a RideShare participant and VTS Patient Flag is set"
  • Line Location: E1+14
Routine Call
  • DIE
  • Line Location:
    • E1+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] EN1+1, E1+4, E1+7, E1+9

Label References

Name Line Occurrences
E1 E1+6
EN1 EN1+1, E1+4, E1+16
ENQ EN1, E1+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% E1+1~, E1+7
>> %Y E1+6
DA E1+1~, E1+8*
DFN EN+16~, EN1, EN1+1, E1+2, E1+4!, E1+7, E1+8, E1+9, E1+12, E1+15!
DGVTRSF E1+1~, E1+2*, E1+3, E1+4
DIC E1+1~
DIE E1+1~, E1+8*
DIQ1 ENQ+1!
DR E1+1~, E1+8*
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 |  Local Variables  | All