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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: DGNDSU

Package: Registration

Routine: DGNDSU


Information

DGNDSU ;DAL/JCH - DEMOGRAPHICS NDS UTILITIES ;06/18/2017

Source Information

Source file <DGNDSU.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 4 CHANGED^DIAUTL  FIND^DIC  (FIELD,FILE)^DID  FILE^DIE  
Kernel 2 ^%ZTLOAD  $$NOW^XLFDT  

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

Package Total Caller Graph
Registration 2 ASSOCIATED VA RACES  ASSOCIATED VA RELIGIONS  

Entry Points

Name Comments DBIA/ICR reference
QUE ; Task off to run in background
EN ; Update Demographics pointers to MASTER files
UPDATE(OFILE) ; Update MASTER FILE multiple (#90) field pointers in legacy file (OFILE).
; Check ASSOCIATED VA <concept> field (#90) in MASTER file, add pointers in OFILE to MASTER file.
SCANM(OFILE) ; Get ASSOCIATED VA <concept> field (#99) values from MASTER file MFILE, update pointers in OFILE
SCANO(OFILE) ; Get MASTER <concept> field (#90) values from legacy file OFILE, verify MASTER entry has matching ASSOCIATED entry
; Unless - if the local file (OFILE) entry has NEVER been filed into ANY ASSOCIATED VA <concept> fields, assume it's a local
; (non-standard or orphan) entry in local file OFILE and allow it to be mapped to MASTER. Check Audit trail for OFILE to see
; if MASTER file pointer has ever been updated via MFS process for the OFILE entry, if not, quit and allow it to remain.
UPDPTR(DGVANAM,DGDA,DGACT,DGFILE) ; Update MASTER VA <concept> field (#90) in <concept> file
; anytime the ASSOCIATED VA <concept>(S) field (#99) in the MASTER <concept> file (#10.99, 11.99, or 13.99) is updated.
; DGFILE : The VA File Number (#10, #11, or #13) that points to the MASTER file (#10.99, #11.99, #13.99)
; DGXVAL : Value of ASSOCIATED VA <concept>(S) field (#99) in the MASTER <concept> file (#10.99, 11.99, or 13.99).
; DGDA(1) : Value of DA()
; DGDA = ASSOCIATED VA <concept>(S) sub-file (#10.99901, 11.99901, or 13.99901) IEN value
; DGDA(1) = IEN of the entry in the MASTER <concept> (#10.99, 11.99, or 13.99) file.
; DGACT : Action to perform on MASTER <concept> (#90) multiple in <concept> (#10):
; "ADD" = Add a pointer to the DGMIEN entry in MASTER <concept> (#10.99, 11.99, or 13.99) file, if it doesn't already exist
; "DEL" = Delete pointer to the DGMIEN entry in MASTER <concept> (#10.99, 11.99, or 13.99) file, if it exists

External References

Name Field # of Occurrence
^%ZTLOAD QUE+8
CHANGED^DIAUTL SCANO+6
FIND^DIC SCANO+15, SCANO+19, SCANO+22
FIELD^DID SCANM+2, SCANO+9, UPDPTR+26
FILE^DID SCANO+7
FILE^DIE UPDPTR+40, UPDPTR+44
$$NOW^XLFDT QUE+5, SCANO+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC - [#1] UPDPTR+35, UPDPTR+37, UPDPTR+38, UPDPTR+42
^TMP($J UPDATE+6!, SCANO+17

Label References

Name Line Occurrences
SCANM UPDATE+2
SCANO UPDATE+4
UPDATE EN+7
UPDPTR SCANM+8, SCANO+23

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ASSOC SCANM+1~, SCANM+5*, SCANM+8
DGACT UPDPTR~, UPDPTR+21, UPDPTR+36, UPDPTR+41
DGAUDT SCANO+4~, SCANO+5*, SCANO+6
DGAUGLO SCANO+4~, SCANO+5*, SCANO+6
DGDA UPDPTR~
DGDA(1 UPDPTR+20
DGERR UPDPTR+14~
DGERROR SCANO+14~
DGFDA UPDPTR+13~
DGFDA( UPDPTR+39*, UPDPTR+43*
DGFILE UPDPTR~, UPDPTR+21, UPDPTR+26, UPDPTR+35, UPDPTR+37, UPDPTR+38, UPDPTR+39, UPDPTR+42, UPDPTR+43
DGFL EN+1~, EN+7*
DGMFILE UPDPTR+10~, UPDPTR+28*, UPDPTR+29, UPDPTR+32
DGMIEN UPDPTR+15~, UPDPTR+20*, UPDPTR+21, UPDPTR+38, UPDPTR+39, UPDPTR+42
DGMSUB UPDPTR+12~, UPDPTR+32*, UPDPTR+33
DGNDSGLO UPDPTR+11~, UPDPTR+27*, UPDPTR+28
DGNDSGLO("POINTER" UPDPTR+27
DGRESULT SCANO+14~
DGRESULT("DILIST" SCANO+23
DGVAIEN UPDPTR+16~, UPDPTR+35*, UPDPTR+37, UPDPTR+38, UPDPTR+39, UPDPTR+42, UPDPTR+43
DGVAMPTR UPDPTR+17~, UPDPTR+37*, UPDPTR+38
DGVANAM UPDPTR~, UPDPTR+21, UPDPTR+22
DGVANAMS UPDPTR+18~, UPDPTR+22*, UPDPTR+35
MERR SCANM+1~
MFILE SCANM+1~, SCANM+4*, SCANO+4~, SCANO+11*, SCANO+19, SCANO+21
MFILESUB SCANO+14~, SCANO+21*, SCANO+22
MGLO SCANM+1~, SCANM+3*, SCANM+4, SCANM+5, SCANM+6, SCANO+4~, SCANO+10*, SCANO+11
MGLO("POINTER" SCANM+3, SCANO+10
MIEN SCANM+1~, SCANM+6*, SCANM+7, SCANM+8
MIEN(1 SCANM+7*
MNAME SCANO+14~, SCANO+20*
MPTR SCANO+4~, SCANO+13*, SCANO+19, SCANO+22, SCANO+23
ODA SCANO+14~, SCANO+23
ODA(1 SCANO+23*
OERR SCANO+4~
OFILE UPDATE~, UPDATE+2, UPDATE+4, SCANM~, SCANM+2, SCANM+8, SCANO~, SCANO+6, SCANO+7, SCANO+9
, SCANO+15, SCANO+23
OFILIEN SCANO+4~, SCANO+12*, SCANO+13, SCANO+15, SCANO+17
OGLO SCANO+4~, SCANO+8*, SCANO+12, SCANO+13
OGLO("GLOBAL NAME" , SCANO+8
ONAME SCANO+14~, SCANO+16*, SCANO+22, SCANO+23
RESULT SCANO+18!
RESULT("DILIST" SCANO+16, SCANO+20
XUMF EN+1~, EN+6*
ZTDESC QUE+1~, QUE+4*
ZTDTH QUE+1~, QUE+5*
>> ZTIO QUE+6*
ZTRTN QUE+1~, QUE+3*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All