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

Package: Registration

Routine: VASITE1


Information

VASITE1 ;ALB/AAS - LOAD VASITE FILE WITH DATA ; 10-FEB-92

Source Information

Source file <VASITE1.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA Fileman 3 FILE^DICN  ^DIE  ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Registration 1 DGPAR1  

Entry Points

Name Comments DBIA/ICR reference
EDIT ;
NEW ; -- add new entry to time sensitive file when adding a new division
; input: VASITE("NEW")=Y (after adding new entry)
; =internal number in 40.8^name^1
; -- called from DGPAR1
ADD ; -add new entry
NEWQ ;
PRIM

External References

Name Field # of Occurrence
FILE^DICN %+9, ADD+7
^DIE %+11, EDIT+2
^DIR PRIM+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"<<< Updating Time Sensitive Station Number file for all Medical Center divisions",!
  • Line Location: VASITE1+7
Function Call: WRITE
  • Prompt: !!,"Division ",$P(^DG(40.8,VADIV,0),"^")," has station number in incorrect format",!,"and can't be added to file. Use the option 'Station Number (Time Sensitive)",!,"Enter/Edit' to complete entry."
  • Line Location: VASITE1+10
Function Call: WRITE
  • Prompt: ".."
  • Line Location: VASITE1+12
Function Call: WRITE
  • Prompt: !?5," *** ",$P(VASITE("OK"),U,2)," ***"
  • Line Location: NEWQ+4
Routine Call
  • DIE
  • Line Location:
    • %+11
    • EDIT+2
Routine Call
  • DIR
  • Line Location:
    • PRIM+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(389.9 - [#389.9] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] %+5, %+6, %+7, NEW+10, NEW+12
^DIC(4 - [#4] %+6, NEW+10
^VA(389.9 - [#389.9] %+2, NEW+8, ADD+2, ADD+3, ADD+4, ADD+7

Label References

Name Line Occurrences
NEWQ NEW+7, NEW+8, NEW+10, NEW+12, ADD+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA %+10*, %+12!, NEW+5~, EDIT+1*
DD %+8!, NEW+5~, ADD+5!
DIC %+9*, %+12!, NEW+5~, ADD+5!*
DIC(0 %+9*, ADD+5*
DIE %+10*, %+12!, NEW+5~, EDIT+1*
DINUM NEW+5~, ADD+7*
DIR PRIM+4!
DIR("A" PRIM*, PRIM+1*, PRIM+2*, PRIM+3*
DIR(0 PRIM*
>> DIRUT PRIM+4
>> DLAYGO ADD+5*
DO %+8!, NEW+5~, ADD+5!
DR %+10*, %+12!, NEW+5~, ADD+5!, EDIT+1*
DT EDIT+1
DTIME %*
U %*, %+6, NEW+10, NEWQ+4
>> VA( %+5
>> VACNT %+5*, %+9*
VADIV %+5*, %+6, %+7, %+10, NEW+8*, NEW+10, NEW+12, EDIT+1, NEWQ+6!
VAIEN ADD+7*, NEWQ+6!
>> VAPRIM %+10*, PRIM+5*
VASITE %+6*, %+7, %+10, NEW+10*, NEW+12, EDIT+1, NEWQ+6!
VASITE("NEW" NEW+5
VASITE("OK" NEW+6*, NEW+12*, ADD+2*, ADD+8*, NEWQ+1, NEWQ+4
X %+9*, NEW+5~, ADD+3*, ADD+7*
Y %+9, %+10, PRIM+5, NEW+5~*, NEW+7, NEW+8, ADD+7, EDIT+1
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