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 |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: DGRPCU

Package: Registration

Routine: DGRPCU


Information

DGRPCU ;ALB/MRL,BAJ - CONSISTENCY FLAGGER, CHECK EXISTING ; NOV 18, 2005

Source Information

Source file <DGRPCU.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
Registration 5 (EN,ON)^DGRPC  KVAR^DGRPCE  ^DGRPCS  H^DGUTL  (CLOSE,QUE)^DGUTQ  
VA Fileman 4 ^DIC  YN^DICN  DT^DICRW  ^DIE  
Income Verification Match 1 $$EN^IVMZ07C  
Kernel 1 ^%ZIS  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Registration 2 DG CONSISTENCY CHECK  DG CONSISTENCY UPDATE  

Entry Points

Name Comments DBIA/ICR reference
OK
UPD ;update file 38.5 - called from DG CONSISTENCY CHECK option
UPDQ
ST
Q
T ;

External References

Name Field # of Occurrence
^%ZIS OK+2
EN^DGRPC ST
ON^DGRPC UPD+1
KVAR^DGRPCE UPD+1
^DGRPCS DGRPCU+3
H^DGUTL ST, ST+1
CLOSE^DGUTQ Q
QUE^DGUTQ OK+2
^DIC UPD+1
YN^DICN OK
DT^DICRW DGRPCU+2
^DIE UPD+4
$$EN^IVMZ07C ST

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,J
  • Line Location: DGRPCU+2
Function Call: WRITE
  • Prompt: !!,"LAST RUN COMPLETED: ",Y
  • Line Location: DGRPCU+3
Function Call: WRITE
  • Prompt: !!,"Do you really want to update existing inconsistent entries"
  • Line Location: OK+0
Function Call: WRITE
  • Prompt: !!?4,"Y - If you want me to run through all the entries currently filed in",!?9,"the INCONSISTENT DATA file and verify they're still inconsistent.",!?4,"N - If you wish to QUIT and rethink this action."
  • Line Location: OK+1
Function Call: WRITE
  • Prompt: !,^(I,0)
  • Line Location: UPD+2
Function Call: WRITE
  • Prompt: !!,*7,"This check can not be edited. It is automatically turned ",$S(DGD=2:"OFF",DGD=51:"OFF",1:"ON"),"!",!,DGL
  • Line Location: UPD+3
Function Call: WRITE
  • Prompt: !,DGL
  • Line Location: UPD+4
Routine Call
  • DIE
  • Line Location:
    • UPD+4
Routine Call
  • DIC
  • Line Location:
    • UPD+1
Routine Call
  • %ZIS
  • Line Location:
    • OK+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGIN(38.6 - [#38.6] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" DGRPCU+3
^DG(43 - [#43] DGRPCU+3, ST*, ST+1*
^DGIN(38.5 - [#38.5] ST
^DGIN(38.6 - [#38.6] UPD+2

Label References

Name Line Occurrences
OK OK+1
Q DGRPCU+3, OK, ST+1
UPD UPDQ+1
UPDQ UPD+3

Naked Globals

Name Field # of Occurrence
^( UPD+2
^("CON" DGRPCU+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% OK*, OK+1, Q!
%Y Q!
DA UPD+4*, UPDQ!
DFN Q!, ST*
DG UPD+4!
DGCONRUN DGRPCU+3, Q!
DGD UPD+1*, UPD+2, UPD+3, UPD+4, UPDQ!
DGEDIT UPD+1*, UPDQ!
DGER UPD+1, UPDQ!
DGL UPD+2*, UPD+3, UPD+4, UPDQ!
DGPGM OK+2*, Q!
DGTIME Q!, ST, ST+1
DGVAR OK+2*, Q!
DIC UPD+1*, UPD+4, UPDQ!
DIC("S" UPD+1*
DIC(0 UPD+1*
DIE UPD+4*, UPDQ!
DQ UPD+4!
DR UPD+4*, UPDQ!
I DGRPCU+2*, Q!, UPD+2*, UPDQ!
ION OK+2*
IOP OK+2*!
J DGRPCU+2*, Q!
PASS Q!, ST*
U DGRPCU+2*
X UPDQ!
Y DGRPCU+3*, Q!, UPD+1, UPD+4*, UPDQ!

Marked Items

Name Field # of Occurrence
$T(T+I DGRPCU+2
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 |  Naked Globals |  Local Variables |  Marked Items |  All