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

Package: Registration

Routine: VAFCEHLM


Information

VAFCEHLM ;ALB/JLU,LTL-FILE UTILITIES FOR 391.98 ;12/07/00

Source Information

Source file <VAFCEHLM.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
Registration 4 EN^DGRPD  ($$DELEXCPT,$$EDIT)^VAFCEHU1  (FORMAT,REVFUL,SORTS)^VAFCEHU2  START^VAFCPDAT  
Kernel 3 HOME^%ZIS  ^%ZTLOAD  DISP^XQORM1  
VA FileMan 3 DD^%DT  (C,NOW)^%DTC  ^DIR  
List Manager 2 EN^VALM  (FULL,PAUSE)^VALM1  
Master Patient Index VistA 1 VTQ^MPIFSAQ  

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

Package Total Caller Graph
Registration 10 VAFC EXCPT DISPLAY ONLY QUERY  VAFC EXCPT PATIENT INQUIRY  VAFC EXCPT SUM NEW  VAFC EXCPT SUM OLD  VAFC EXCPT SUM PAT  VAFC EXCPT SUM REV FULL  VAFC EXCPT SUM SCR  VAFC EXCPT SUM SITE  
VAFC EXCPT TF INQUIRY  VAFCEHU2  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EN ; -- main entry point for VAFC EXCPT SUM SCR
HDR ; -- header code
INIT ; -- init variables and list array
INIT2 ;enter at this point to reset the screens after editing etc.
HELP ; -- help code
EXIT ; -- exit code
EXPND ; -- expand code
SACT
FULL
DIFF
INQ ; Patient Inquiry ;**255
DISP ; Display Only Query to MPI ;**307
PDAT ;report to list CMOR, TF's & SUB's ;**333
CENTER(STRG) ;
PDRPRG ;Purge PDRs ;**477
QPRG ;

External References

Name Field # of Occurrence
DD^%DT PDRPRG+7
C^%DTC PDRPRG+6
NOW^%DTC PDRPRG+5, PDRPRG+18
HOME^%ZIS PDRPRG+23
^%ZTLOAD PDRPRG+21
EN^DGRPD INQ+5
^DIR PDRPRG+10, PDRPRG+13
VTQ^MPIFSAQ DISP+7
$$DELEXCPT^VAFCEHU1 QPRG+6
$$EDIT^VAFCEHU1 EN+4
FORMAT^VAFCEHU2 INIT2+3
REVFUL^VAFCEHU2 FULL
SORTS^VAFCEHU2 INIT2+2
START^VAFCPDAT PDAT+5
EN^VALM EN+8
FULL^VALM1 INQ+4, DISP+2, PDAT+4
PAUSE^VALM1 INQ+6, DISP+8
DISP^XQORM1 HELP+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!!,"The Purge Patient Data Reviews process is currently running."
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: $C(7),!!,"The Purge Patient Data Reviews process is currently running."
  • Line Location: PDRPRG+1
Function Call: WRITE
  • Prompt: !!?15,"Patient Data Review Purge Queued, Task #"_ZTSK
  • Line Location: PDRPRG+22
Routine Call
  • DIR
  • Line Location:
    • PDRPRG+10
    • PDRPRG+13
Routine Call
  • %ZIS
  • Line Location:
    • PDRPRG+23
Routine Call
  • VALM
  • Line Location:
    • EN+8

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCN(391.98 - [#391.98] EN+2, EN+3, EN+5, EN+6, EN+7, INQ+2, PDAT+2, PDRPRG+1, PDRPRG+2, QPRG+2
, QPRG+4, QPRG+5, QPRG+7
^DPT - [#2] DISP+4, DISP+5, DISP+6

Label References

Name Line Occurrences
$$CENTER HDR+3
HDR SACT
INIT SACT+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % PDRPRG+19
DFN INQ+1~, INQ+2*, PDAT+1~, PDAT+2*
DIR PDRPRG+10!, PDRPRG+13!
DIR("?" PDRPRG+8*
DIR("A" PDRPRG+9*, PDRPRG+13*
DIR("B" PDRPRG+10*, PDRPRG+12*
DIR(0 PDRPRG+10*, PDRPRG+12*
>> DIRUT PDRPRG+10, PDRPRG+13
DUZ PDRPRG+20
ERR QPRG+3~, QPRG+6*
EVTDT QPRG+3~*, QPRG+4*, QPRG+5
>> EXCPT DISP+3, DISP+4, DISP+5, DISP+6
FIL CENTER+2~, CENTER+4*, CENTER+5
FIL1 CENTER+2~, CENTER+5*, CENTER+6
>> IEN EN+2*, EN+3, EN+4, EN+5, PDAT+2
>> IENPDR INQ+2
IO("Q" PDRPRG+23!
LEN CENTER+2~, CENTER+3*, CENTER+4
MAXDT PDRPRG+3~, PDRPRG+7*, PDRPRG+10
MPIVAR DISP+7, DISP+10!
MPIVAR("DFN" DISP+3*
MPIVAR("DOB" DISP+6*
MPIVAR("NM" DISP+5*
MPIVAR("SSN" DISP+4*
NDATE PDRPRG+4*, PDRPRG+11*, PDRPRG+20, QPRG+4, QPRG+8!
PDATE PDRPRG+3~, PDRPRG+7*, PDRPRG+10
PDR QPRG+3~*, QPRG+5*, QPRG+6
RGSTRNG HDR+1~, HDR+2*, HDR+3
STRG CENTER~, CENTER+3, CENTER+6
TDATE PDRPRG+3~, PDRPRG+5*, PDRPRG+6
VAFCSORT INIT+3*, INIT2+2, EXIT+1!
>> VALMAR INIT2+1, INIT2+2, INIT2+3, EXIT+1
>> VALMBCK SACT+2*, FULL+1*, DIFF*, INQ+3*, INQ+7*, DISP+1*, DISP+9*, PDAT+3*, PDAT+7*
>> VALMCNT INIT2+3
>> VALMHDR(1 HDR+3*
>> VALMQUIT INIT2+3
>> VALMSG HELP+1*, FULL*
X HELP+1*, PDRPRG+3~, PDRPRG+5, PDRPRG+7
X1 PDRPRG+3~, PDRPRG+6*
X2 PDRPRG+3~, PDRPRG+6*
XQORNOD INIT+2~
>> XX EN+4*
Y PDRPRG+3~, PDRPRG+7*, PDRPRG+11, PDRPRG+14
ZTDESC PDRPRG+16~, PDRPRG+17*
ZTDTH PDRPRG+16~, PDRPRG+19*
ZTIO PDRPRG+16~, PDRPRG+19*
>> ZTQUEUED QPRG+1
ZTREQ PDRPRG+16~, QPRG+1*
ZTRTN PDRPRG+16~, PDRPRG+17*
ZTSAVE PDRPRG+16~
ZTSAVE("DUZ" PDRPRG+20*
ZTSAVE("NDATE" PDRPRG+20*
>> ZTSK PDRPRG+22
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All