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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: VAFHPURG

Package: Registration

Routine: VAFHPURG


Information

VAFHPURG ;ALB/JLU;Purging routine. ; 8/9/04 11:00am

Source Information

Source file <VAFHPURG.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA FileMan 5 DD^%DT  C^%DTC  DT^DICRW  ^DIK  EN^DIQ1  

Entry Points

Name Comments DBIA/ICR reference
EN ;entry point
DELETE ;this will do that actual deletion.
EXIT ;kills variables
KIL1
CLEAN ; delete entries with invalid event pointer, ie doesn't exist
; CLEAN^VAFHPURG may be run directly from programmer mode
REMOVE

External References

Name Field # of Occurrence
DD^%DT EN+13
C^%DTC EN+11
DT^DICRW EN+8, CLEAN+4
^DIK DELETE+18, REMOVE+2
EN^DIQ1 EN+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"All ADT/HL7 PIVOT entries with invalid EVENT POINTERS will be deleted",!
  • Line Location: CLEAN+3
Function Call: WRITE
  • Prompt: ","
  • Line Location: REMOVE+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VAT(391.71 - [#391.71] Classic Fileman Calls
^DG(43 - [#43] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(43 - [#43] EN+3
^DGPM - [#405] DELETE+13
^VAT(391.71 - [#391.71] EN+17, DELETE+4, DELETE+6, DELETE+8, DELETE+11, DELETE+15, CLEAN+7

Label References

Name Line Occurrences
DELETE EN+17
EXIT EN+18
KIL1 EN+15
REMOVE CLEAN+9, CLEAN+12, CLEAN+15, CLEAN+17, CLEAN+22

Naked Globals

Name Field # of Occurrence
^( CLEAN+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT KIL1!
DA EN+1~, EN+4*, DELETE+2~, DELETE+3*, DELETE+4*, DELETE+6, DELETE+8, DELETE+11, DELETE+15, REMOVE*
REMOVE+4!
DAYS EN+1~, EN+7*, EN+10
DIC EN+1~, EN+4*
DIK DELETE+2~, DELETE+17*, REMOVE+1*, REMOVE+4!
DIQ EN+1~, EN+4*
DIQ(0 EN+4*
DR EN+1~, EN+4*
DT EN+9
EVENT DELETE+2~, DELETE+8*, DELETE+9, DELETE+15
EVENTVP CLEAN+5~, CLEAN+10*, CLEAN+12, CLEAN+13, CLEAN+18
GLOBAL CLEAN+5~, CLEAN+13*, CLEAN+15, CLEAN+17, CLEAN+18
GLOBALR CLEAN+5~, CLEAN+18*, CLEAN+20
MOVE DELETE+2~, DELETE+11*, DELETE+12, DELETE+13
NODE CLEAN+5~, CLEAN+7*, CLEAN+9, CLEAN+10
OUT DELETE+2~, DELETE+9, DELETE+10*, DELETE+13*
U DELETE+8, DELETE+11, DELETE+13
VAFHEDT EN+12*, EN+17, EXIT+1!
VAFHX EN+17*, DELETE+4, EXIT+1!, CLEAN+6*, CLEAN+7*, REMOVE
VAR1 EN+1~, EN+3*, EN+4, EN+7
VARA EN+1~
VARA(43 EN+7
X EN+12, EXIT+1!, KIL1!
X1 EN+1~, EN+9*
X2 EN+1~, EN+10*
Y EN+12*, EN+14, EXIT+1!, KIL1!
>> ZTQUEUED EN+14, DELETE+19, CLEAN+3, REMOVE+3
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All