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

Package: Registration

Routine: DG53632P


Information

DG53632P ;ALB/LBD - Post install routine for DG*5.3*632; 1 NOV 2004

Source Information

Source file <DG53632P.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Kernel 3 (,STAT)^%ZTLOAD  ($$FMADD,$$FMTE,$$NOW)^XLFDT  (BMES,MES)^XPDUTL  
Registration 3 ($$FINDCUR,$$GET)^DGENA  EN^DGMTCOR  $$SITE^VASITE  
VA FileMan 2 UPDATE^DIE  $$GET1^DIQ  
MailMan 1 ^XMD  

Entry Points

Name Comments DBIA/ICR reference
QUETASK ; Queue the Unemp/POW Vet update job
FVINC ; Add new entry #86 to the INCONSISTENT DATA ELEMENTS file (#38.6)
ACTIVE(TASK) ; Check if task is running
; Input -- TASK = Task number
; Output -- 1 = Task is running
; 0 = Task is not running
UNEMP(DFN) ; Is veteran Unemployable Priority 1?
EN ; Entry point for queued process
UPRX(DFN,EX) ; Update RX Copay status in Annual Means Test file (#408.31)
; and Billing Patient file (#354)
; INPUT - DFN = Patient IEN
; EX = Exemption type, either POW or UNEMP
POW(DFN) ; Is veteran a POW?
UNEMPOW ; Run update process for Unemployable and POW Veterans
POST ; Post install entry point
CHK() ; Check if Unemp Vet update process should be run
SENDMSG ; Send Mailman bulletin when process completes

External References

Name Field # of Occurrence
^%ZTLOAD QUETASK+4
STAT^%ZTLOAD ACTIVE+6
$$FINDCUR^DGENA UNEMP+2
$$GET^DGENA UNEMP+3
EN^DGMTCOR UPRX+10
UPDATE^DIE FVINC+24
$$GET1^DIQ UPRX+6, UPRX+7, SENDMSG+3
$$SITE^VASITE SENDMSG+2
$$FMADD^XLFDT CHK+2
$$FMTE^XLFDT EN+2, EN+13
$$NOW^XLFDT QUETASK+2, EN+2, EN+13
^XMD SENDMSG+24
BMES^XPDUTL FVINC+3, FVINC+6, FVINC+11, FVINC+26, FVINC+28, FVINC+30, UNEMPOW+1, QUETASK+6, CHK+7, CHK+12
MES^XPDUTL FVINC+7, FVINC+8, FVINC+9, FVINC+10, FVINC+27

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBA(354 - [#354] GET1^DIQ
^HLCS(869.3 - [#869.3] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGIN(38.6 - [#38.6] FVINC+5, FVINC+7, FVINC+9
^DPT - [#2] POW+2, POW+3, POW+4
^DPT("AENRC" EN+6
^IBA(354 - [#354] UPRX+5
^XTMP("DG53632P" QUETASK+4*, EN+2*, EN+8*, EN+11*, EN+13*, EN+14*, UPRX+11*, UPRX+12*, CHK+2*, CHK+3
, CHK+4, CHK+8, SENDMSG+12, SENDMSG+16, SENDMSG+17, SENDMSG+19, SENDMSG+20, SENDMSG+22, SENDMSG+23

Label References

Name Line Occurrences
$$ACTIVE CHK+9
$$CHK UNEMPOW+2
$$POW EN+7
$$UNEMP EN+10
FVINC POST+1
QUETASK UNEMPOW+3
SENDMSG EN+15
UNEMPOW POST+2
UPRX EN+9, EN+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CDT CHK+1~, CHK+4*, CHK+6
DFN EN+4~, EN+5*, EN+6*, EN+7, EN+9, EN+10, EN+12, POW~, POW+1, POW+2
, POW+3, POW+4, UNEMP~, UNEMP+2, UPRX~, UPRX+5, UPRX+6, UPRX+7, UPRX+12
>> DGENR UNEMP+3
>> DGENR("ELIG" UNEMP+5, UNEMP+6
>> DGENR("PRIORITY" UNEMP+4
DGENRIEN UNEMP+1~, UNEMP+2*, UNEMP+3
DGERR FVINC+1~, FVINC+25
DGERR("DIERR" FVINC+27
DGFDA FVINC+1~
DGIEN FVINC+1~
DGIEN(1 FVINC+23*
DGINC FVINC+1~, FVINC+4*, FVINC+7, FVINC+10, FVINC+14, FVINC+26, FVINC+30
DGWP FVINC+1~
DGWP(1 FVINC+18*
DGWP(2 FVINC+19*
DGWP(3 FVINC+20*
DGWP(4 FVINC+21*
DGWP(5 FVINC+22*
DT CHK+2
DUZ SENDMSG+5
EX UPRX~, UPRX+8, UPRX+9, UPRX+11, UPRX+12
MSG SENDMSG+1~
MSG( SENDMSG+10*, SENDMSG+18*, SENDMSG+21*
MSG(1 SENDMSG+7*
MSG(10 SENDMSG+17*
MSG(11 SENDMSG+19*
MSG(12 SENDMSG+20*
MSG(13 SENDMSG+22*
MSG(14 SENDMSG+23*
MSG(2 SENDMSG+8*
MSG(3 SENDMSG+9*
MSG(4 SENDMSG+11*
MSG(5 SENDMSG+12*
MSG(6 SENDMSG+13*
MSG(7 SENDMSG+14*
MSG(8 SENDMSG+15*
MSG(9 SENDMSG+16*
REAS UPRX+4~, UPRX+7*, UPRX+8, UPRX+9
ROOT FVINC+1~, FVINC+13*, FVINC+14, FVINC+15, FVINC+16, FVINC+17
SITE SENDMSG+1~, SENDMSG+2*
SITENM SENDMSG+1~, SENDMSG+2*, SENDMSG+14
STAT UPRX+4~, UPRX+6*, UPRX+9, ACTIVE+4~, ACTIVE+5*, ACTIVE+8*, ACTIVE+9*, ACTIVE+10
STATN SENDMSG+1~, SENDMSG+2*, SENDMSG+3*, SENDMSG+4, SENDMSG+13
TASK CHK+1~, CHK+8*, CHK+9, CHK+10, ACTIVE~, ACTIVE+5
TXT QUETASK+1~, QUETASK+5*, QUETASK+6, CHK+1~, CHK+7, CHK+12
TXT(1 CHK+5*, CHK+10*
TXT(2 CHK+6*, CHK+11*
U FVINC+7, FVINC+9, EN+2, EN+13, POW+2, CHK+2, CHK+4, ACTIVE+8, ACTIVE+9, SENDMSG+2
, SENDMSG+16, SENDMSG+17
XMDUZ SENDMSG+1~, SENDMSG+4*
XMSUB SENDMSG+1~, SENDMSG+4*
XMTEXT SENDMSG+1~, SENDMSG+6*
XMY SENDMSG+1~
XMY( SENDMSG+5*
XMY("linda.desmond@domain.ext" SENDMSG+5*
XPDABORT POST+1, FVINC+2!, FVINC+12*, FVINC+29*
Y ACTIVE+4~, ACTIVE+7*, ACTIVE+8, ACTIVE+9
ZTDESC QUETASK+1~, QUETASK+3*
ZTDTH QUETASK+1~, QUETASK+2*
ZTIO QUETASK+1~, QUETASK+2*
>> ZTREQ EN+1*
ZTRTN QUETASK+1~, QUETASK+2*
ZTSK QUETASK+1~, QUETASK+4, QUETASK+5, EN+1, ACTIVE+4~, ACTIVE+5*
ZTSK(1 ACTIVE+7
Info |  Source |  Call Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All