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
Print Page as PDF
Routine: DIDGFTPT

Package: VA FileMan

Routine: DIDGFTPT


Information

DIDGFTPT ;GFT/GFT - GET ALL ENTRIES THAT POINT TO ENTRY GFTIEN IN FILE GFTFILE ;20 Aug 2015 4:46 PM

Source Information

Source file <DIDGFTPT.m>

Entry Points

Name Comments DBIA/ICR reference
ZIS
START
DEPEND(GFTFILE,IEN,GFTWHERE,GFTPARAM) ;
COMPUTED
CHASE(FILE,FIELD,GFTRCR) ;BUILD AN 'XEC' THAT WILL GO THRU FILE REMEMBERING FIELD'S POINTERS
UP
XEC
PUT(XVAL,Y,FIELD)
ALL ;Do all files (SO)

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"THIS UTILITY TRIES TO FIND ALL ENTRIES IN ALL FILES POINTING TO A CERTAIN FILE",!
  • Line Location: DIDGFTPT+7
Function Call: WRITE
  • Prompt: !
  • Line Location: ZIS+1
Function Call: WRITE
  • Prompt: X,"***"
  • Line Location: START+6
Function Call: WRITE
  • Prompt: !,"FILE ",I," (",$P(^DIC(I,0),U),")"
  • Line Location: START+7
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $X>(IOM-30)
  • Line Location: START+10
Function Call: WRITE
  • Prompt: ?IOM-30,$P(@("^DD("_Y_",0)"),U)
  • Line Location: START+10
Function Call: WRITE
  • Prompt: !!!
  • Line Location: START+13
Info |  Source |  Entry Points |  Interaction Calls