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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: DGMTU11

Package: Registration

Routine: DGMTU11


Information

DGMTU11 ;ALB/MIR,TDM,GTS - Patient Relation Retrieval Utilities ; 10/30/06

Source Information

Source file <DGMTU11.m>

Entry Points

Name Comments DBIA/ICR reference
GETREL(DFN,DGTYPE,DGDT,DGMT) ; Get all active dependents for a patient
  • ICR #424
    • Status: Active
    • Usage: Private
  • ICR #962
    • Status: Other
    • Usage: Private
    RELINC
    RELFND
    GETRELQ
    SET ; set variables into array...first subscript is relation type, second
    ; is IEN of file 408.12 (patient relations file)
    ACTIVE(IEN,DGDT) ; Extrinsic function to determine if 408.12 entry is active
    RESET(DFN,DGDT,DGMT) ;
    ; Sets 'NUMBER OF DEPENDENT CHILDREN' (#.13) and
    ; 'DEPENDENT CHILDREN' (#.08) in Income Relation File (#408.22)
    ; based upon the count of active child dependents in Patient
    ; Relation File (#408.12).
  • ICR #962
    • Status: Other
    • Usage: Private
    GETINACD(DFN,DGREL) ; Get all INACTIVE dependents for a patient
    ; Input -- DFN as the IEN of file 2 (for the patient)
    ; DGREL as Array of active spouse/dependents
    ; Output -- DGIREL("S",counter) = spouse reference
    ; DGIREL("C",counter) = child reference
    CNTDEPS(DFN) ;Count Dependent children
    ; DG*5.3*688 - EVC changes; GTS
    ; Called by DGDEP4 and DGRPEIS1

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^DGMT(408.22 - [#408.22] Classic Fileman Calls
    Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call