Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
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>

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 ;

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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call