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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: DGCV

Package: Registration

Routine: DGCV


Information

DGCV ;ALB/DW,ERC,BRM,TMK,LBD - COMBAT VET ELIGIBILTY; 10/15/05 ; 6/16/09 10:40am

Source Information

Source file <DGCV.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Registration 3 ($$FINDCUR,$$FINDPRI)^DGENA  $$LAST^DGENOEIF  $$LAST^DGMSEUTL  
VA FileMan 2 FILE^DIE  ($$GET1,GETS)^DIQ  
Kernel 1 $$FMADD^XLFDT  

Caller Graph

Caller Graph Total: 41

Package Total Caller Graph
Registration 16 DG53528P  DGCVRPT  DGENACL2  DGPTF  DGPTF1  DGPTR0  DGPTRI0  DGPTRNU  
DGRP7  DGRPC2  DGRPD  DGRPE  DGRRLU1  DGRRLU1A  DPTLK  VAFHLZE1  
Scheduling 5 SCMSVUT2  SDAL0  SDAMEP2  SDCO22  SDRPA07  
Outpatient Pharmacy 3 PSOCP  PSOMLLDT  PSOPTPST  
Consult Request Tracking 2 GMRCP5D  GMRCSLM2  
Order Entry Results Reporting 2 ORB3  ORMARKER  
Virtual Patient Record 2 VPRDJ00  VPRDPT  
Accounts Receivable 1 PRCAAPR1  
Automated Medical Information Exchange 1 DVBAXA22  
Clinical Reminders 1 PXRMMSER  
DSS Extracts 1 ECXUTL5  
Enterprise Health Management Platform 1 HMPDJ00  
Fee Basis 1 FBPCR  
HINQ 1 DVBHCE21  
Integrated Billing 1 IBACV  
National Health Information Network 1 NHINVPT  
PCE Patient Care Encounter 1 PXRRMDR  
Quasar 1 ACKQUTL4  

Entry Points

Name Comments DBIA/ICR reference
PARSE ;GETS^DIQ called in CVELIG - in this subroutine stuff results into array
CVELIG(DFN) ;
CVEDT(DFN,DGDT) ;Provide Combat Vet Eligibility End Date, if eligible
  • ICR #4156
    • Status: Active
    • Usage: Supported
    CHKSSD(DFN) ;check the Serv Sep Date [Last]
    ; DGSRV=last SSD
    ; Output - RESULT
    ; 1 - Date is present and after 11/11/1998
    ; 0 - Date is present but before 11/11/1998
    ; A - Date is imprecise & either is or potentially is after 11/11/98
    ; F - Date is missing
    CVRULES(DFN,DGSRV,DGNDAA,DGYRS) ;apply rules for the CV End Date
    CHKDATE(DGDATE,I,SSD) ;check to see if date is imprecise or missing
    RES(DG1,DG2) ;determine the final RESULT code from DG1 & DG2
    SETCV(DFN,DGSRV) ;calculate CV end date
    ; DGSRV is the most recent of the Service Separation Date
    ; or the OEF/OIF To Date, called from file #2 new style
    ; cross reference "ACVCOM"
    CHKREST(DGDATE,SSD) ;
    ; SSD = optional, = to the last serv sep date
    MISS(DFN,DGLEN,DGRES) ;there is at least one missing date, and in order to
    CALCCV(DFN,DGSRV) ; Calculate CV end date given DFN and date to start
    ; calculation from
    ; Function returns null or CV end date calculated
    DELCV(DFN) ;called by the Kill logic of the ACVCOM cross reference

    External References

    Name Field # of Occurrence
    $$FINDCUR^DGENA CVRULES+13
    $$FINDPRI^DGENA CVRULES+19
    $$LAST^DGENOEIF PARSE+11
    $$LAST^DGMSEUTL PARSE+3
    FILE^DIE SETCV+9, DELCV+14
    $$GET1^DIQ SETCV+5, CVRULES+15, CVRULES+20, CVRULES+25, CVEDT+21, DELCV+10
    GETS^DIQ CVELIG+35, MISS+6
    $$FMADD^XLFDT CALCCV+15

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^DPT - [#2] GET1^DIQ,  GETS^DIQ
    ^DGEN(27.11 - [#27.11] GET1^DIQ

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DGEN(27.11 - [#27.11] CVRULES+14
    ^DPT - [#2] CVELIG+31, CALCCV+5, CVEDT+16, PARSE+3, DELCV+9

    Label References

    Name Line Occurrences
    $$CALCCV SETCV+6
    $$CHKDATE CHKSSD+9, CHKREST+11
    $$CHKREST CVELIG+48
    $$CHKSSD CVELIG+38, CVELIG+45
    $$MISS CHKREST+20
    $$RES CVELIG+49
    CVRULES CALCCV+7
    PARSE CVELIG+36

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    DFN CVELIG~, CVELIG+30, CVELIG+31, CVELIG+35, CVELIG+38, CVELIG+45, SETCV~, SETCV+5, SETCV+6, SETCV+8
    , CALCCV~, CALCCV+4, CALCCV+5, CALCCV+7, CVRULES~, CVRULES+13, CVEDT~, CVEDT+15, CVEDT+16, CVEDT+21
    , PARSE+3, PARSE+4, PARSE+5, PARSE+6, PARSE+7, PARSE+8, PARSE+9, PARSE+11, CHKSSD~, CHKREST+20
    , MISS~, MISS+6, MISS+7, MISS+8, MISS+9, MISS+10, DELCV~, DELCV+8, DELCV+9, DELCV+10
    , DELCV+13
    DG1 CVELIG+27~, CVELIG+29*, CVELIG+38*, CVELIG+41, CVELIG+46*, CVELIG+49, RES~, RES+2, RES+4, RES+5
    , RES+6, RES+8, RES+9, CHKSSD+7~, CHKSSD+9*, CHKSSD+10*, CHKSSD+11
    DG2 CVELIG+27~, CVELIG+29*, CVELIG+48*, CVELIG+49, RES~, RES+2, RES+4, RES+5, RES+6, RES+8*
    , RES+9
    DG3 CHKREST+2~, CHKREST+3*, CHKREST+12*, CHKREST+13, CHKREST+15, CHKREST+16*, CHKREST+20
    DG4 CHKREST+2~, CHKREST+3*, CHKREST+11*, CHKREST+12
    DGARR CVELIG+34~, MISS+3~
    DGARR(2 PARSE+4, PARSE+5, PARSE+6, PARSE+7, PARSE+8, PARSE+9, MISS+7, MISS+8, MISS+9, MISS+10
    DGCHAR CHKREST+15*, CHKREST+16, CHKREST+17, MISS+3~, MISS+5*, MISS+11*, MISS+12, MISS+13, MISS+14, MISS+15
    DGCIEN CVRULES+6~, CVRULES+13*, CVRULES+14, CVRULES+15, CVRULES+18, CVRULES+25
    DGCIND MISS+4~, MISS+7*, MISS+12
    DGCOM CVELIG+28~, CVELIG+39, PARSE+5*
    DGCUTOFF CVRULES+6~, CVRULES+12*, CVRULES+27, CVRULES+31
    DGCV DELCV+5~, DELCV+10*, DELCV+11
    DGCVDT CVELIG+28~, PARSE+9*
    DGCVEDT SETCV+4~, SETCV+6*, SETCV+7, SETCV+8, CALCCV+3~, CALCCV+14*, CALCCV+15*, CALCCV+16
    DGCVFLG CVELIG+28~, DELCV+6!, DELCV+7*, DELCV+12*
    DGDATE CVELIG+39*, CVELIG+41, CVELIG+45, CVELIG+48, CHKDATE~, CHKDATE+6, CHKDATE+8, CHKDATE+9, CHKDATE+10, CHKDATE+15
    , CHKREST~, CHKREST+9
    DGDT CVEDT~, CVEDT+18*, CVEDT+19*, CVEDT+20, CVEDT+23, CHKREST+2~, CHKREST+9*, CHKREST+10, CHKREST+11
    DGENRDT CVRULES+6~, CVRULES+15*, CVRULES+16, CVRULES+17, CVRULES+20*, CVRULES+21, CVRULES+22
    DGERR CVELIG+34~, MISS+3~
    DGFDA SETCV+4~, DELCV+5~
    DGFDA(2 SETCV+8*, DELCV+13*
    DGFLG CHKREST+2~, CHKREST+5*, CHKREST+10*, CHKREST+20
    DGGULF CVELIG+28~, CVELIG+39, PARSE+6*
    DGLEN CHKREST+2~, CHKREST+13*, CHKREST+15, CHKREST+20, MISS~, MISS+11
    DGNDAA CALCCV+3~, CALCCV+6*, CALCCV+7, CALCCV+13, CVRULES~, CVRULES+16, CVRULES+17, CVRULES+22
    DGOEIF CVELIG+28~, CVELIG+39, PARSE+11*
    DGPGIND MISS+4~, MISS+10*, MISS+15
    DGPIEN CVRULES+6~, CVRULES+18*, CVRULES+19*, CVRULES+20
    DGPLUS3 CALCCV+3~
    DGPRI CVRULES+6~, CVRULES+11*, CVRULES+16*, CVRULES+22*, CVRULES+24
    DGQ CHKREST+2~, CHKREST+4*, CHKREST+14*, CHKREST+15, CHKREST+16*, CHKREST+17*, CHKREST+18, CHKREST+19, MISS+3~, MISS+5*
    , MISS+11, MISS+12*, MISS+13*, MISS+14*
    DGQT CVRULES+6~, CVRULES+11*, CVRULES+19, CVRULES+22*
    DGR CHKREST+2~, CHKREST+3*, CHKREST+17*, CHKREST+19, MISS+3~, MISS+5*, MISS+12*, MISS+13*, MISS+14*, MISS+15*
    , MISS+16
    DGRES CHKREST+2~, CHKREST+3*, CHKREST+20*, CHKREST+21, MISS~, MISS+11
    DGSIND MISS+4~, MISS+9*, MISS+14
    DGSOM CVELIG+28~, CVELIG+39, PARSE+7*
    DGSRV CVELIG+28~, CVELIG+41, CVELIG+44~, CVELIG+45*, CVELIG+48, SETCV~, SETCV+6, CALCCV~, CALCCV+4, CALCCV+7
    , CALCCV+13, CVRULES~, CVRULES+27, CVRULES+31, PARSE+3*, PARSE+4*, CHKSSD+8, CHKSSD+9
    DGSTAT CVRULES+6~, CVRULES+25*, CVRULES+26
    DGTMPDT CALCCV+3~, CALCCV+13*, CALCCV+14
    DGX CHKREST+2~, CHKREST+8*, CHKREST+9, CHKREST+10, CHKREST+11, CHKREST+15*, MISS+3~, MISS+11*
    DGYIND MISS+4~, MISS+8*, MISS+13
    DGYRS CALCCV+3~, CALCCV+7, CALCCV+8, CALCCV+13, CALCCV+14, CVRULES~, CVRULES+10*, CVRULES+27*, CVRULES+31*
    DGYUG CVELIG+28~, CVELIG+39, PARSE+8*
    DT CVEDT+18
    I CVELIG+27~, CHKDATE~, CHKDATE+6, CHKDATE+7, CHKDATE+9, CHKDATE+13
    RES CHKDATE+4~, CHKDATE+5*, CHKDATE+6, CHKDATE+7*, CHKDATE+9*, CHKDATE+13*, CHKDATE+14, CHKDATE+15*, CHKDATE+16
    RESULT CVELIG+27~, CVELIG+29*, CVELIG+30, CVELIG+31, CVELIG+49*, CVELIG+50, CVEDT+13~, CVEDT+14*, CVEDT+21*, CVEDT+22
    , CVEDT+23*, CVEDT+24*, CVEDT+25
    SSD CHKDATE~, CHKREST~, CHKREST+11
    U CVELIG+41, CVELIG+45, PARSE+3, PARSE+11, CHKREST+9
    Z CVELIG+44~, CVELIG+45*, CVELIG+46
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All