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 |  Used in HL7 Interface |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: EASCM

Package: Enrollment Application System

Routine: EASCM


Information

EASCM ;ALB/PJH,JAM - PROCESS INCOME TEST (Z10) TRANSMISSIONS ;7/1/09 3:36pm

Source Information

Source file <EASCM.m>

Call Graph

Call Graph

Call Graph Total: 26

Package Total Call Graph
Income Verification Match 13 Z10^IVMCM  (EN,LTC)^IVMCM1  (,ADD)^IVMCMB  (,PROB)^IVMCMC  ($$EN,DELTYPE)^IVMCMD  $$UPDMTSIG^IVMCMF  FIND^IVMCQ2  $$ELIG^IVMCUF1  
(GETLOCKS,RELLOCKS)^IVMCUPL  $$FIND^IVMPLOG  ORF^IVMPREC7  ($$AGE,$$CATC,$$ELIG,$$INCY)^IVMUFNC5  $$DCDON^IVMUPAR1  
Registration 8 $$UPD^DGENDBS  $$PENDING^DGENQRY  $$SEND^DGENQRY1  (NXTSEG,ORFZ11)^DGENUPL  PRIOR^DGMTEVT  $$GETCODE^DGMTH  $$LST^DGMTU  $$SITE^VASITE  
Health Level Seven 2 $$FMDATE^HLFNC  INIT^HLFNC2  
Enrollment Application System 1 $$Z06MT^EASPTRN1  
Integrated Billing 1 $$RXST^IBARXEU  
VA FileMan 1 NOW^%DTC  

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

Package Total Caller Graph
Enrollment Application System 2 EAS ESR 050 ORF-Z10 CLIENT  EAS ESR 050 ORF-Z11 CLIENT  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
ORF ; Handler for ORF type HL7 messages received from HEC
Z10 ; Entry point for receipt of ORF~Z10 transmission
; The Income Test (Z10) transmission has the following format:
ORU ; Entry point for receipt of ORU~Z10 trans (called by IVMPREC2)
ENQ ;
PROC ; Process each HL7 message from (#772) file
MT ; If transmission is a Means Test
CT ; If transmission is a Copay Test
IS ; - If transmission is income screening info only then do not process
; - outside of the scope of MTS
LTC ; If transmission contains a Long Term Care Test (TYPE 4 TEST)
PROCQ ;
; release locks used to sychronize upload with local income test options
CHKDT ; check date of income test being uploaded
; Is it a future date? If so, set IVMFUTR=1
FUTURE(DFN,YEAR,TYPE,IVMPAT) ;

External References

Name Field # of Occurrence
NOW^%DTC ORF+10
$$UPD^DGENDBS MT+31, CT+17
$$PENDING^DGENQRY PROC+37
$$SEND^DGENQRY1 PROC+37
NXTSEG^DGENUPL ORF+20
ORFZ11^DGENUPL ORF+39
PRIOR^DGMTEVT PROC+4
$$GETCODE^DGMTH MT+42, CT+28
$$LST^DGMTU MT+11, MT+40, CT+6, CT+26
$$Z06MT^EASPTRN1 MT+15
$$FMDATE^HLFNC MT+5, MT+6, MT+7, MT+10, CT+3, CT+4
INIT^HLFNC2 ORF+27
$$RXST^IBARXEU CT+7
Z10^IVMCM ORF+34
EN^IVMCM1 MT+54, CT+40
LTC^IVMCM1 LTC+1
^IVMCMB ORU+17
ADD^IVMCMB MT+42, CT+28
^IVMCMC PROC+19
PROB^IVMCMC PROC+11, PROC+30, MT+21, CT+8
$$EN^IVMCMD MT+39, CT+25
DELTYPE^IVMCMD MT+53, CT+39
$$UPDMTSIG^IVMCMF MT+14
FIND^IVMCQ2 ORU+11
$$ELIG^IVMCUF1 PROC+37
GETLOCKS^IVMCUPL PROC+40
RELLOCKS^IVMCUPL PROCQ+2
$$FIND^IVMPLOG FUTURE+11
ORF^IVMPREC7 ORF+31
$$AGE^IVMUFNC5 MT+17, CT+8
$$CATC^IVMUFNC5 MT+19
$$ELIG^IVMUFNC5 MT+16
$$INCY^IVMUFNC5 MT+17, CT+8
$$DCDON^IVMUPAR1 PROC+11
$$SITE^VASITE ORF+25

Used in HL7 Interface

HL7 Protocol Name Call Tags
EAS ESR 050 ORF-Z10 CLIENT ORF
EAS ESR 050 ORF-Z11 CLIENT ORF

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGMT(408.31 - [#408.31] MT+32, MT+38, MT+49, MT+50, CT+18, CT+24, CT+35, CT+36
^IVM(301.5 - [#301.5] FUTURE+12
^ORD(101 - [#101] ORF+26, ORF+28
^TMP($J ORF+7!, ORF+13*, ORF+15*, ORF+41!, ORU+4, ORU+17, ENQ+2!, PROC+14!, PROC+26, PROC+30
, PROC+31, PROC+34, MT+5, MT+6, MT+7, MT+8, MT+9, MT+10, MT+18, MT+26
, CT+3, CT+4, CT+5, CT+12, LTC+1

Label References

Name Line Occurrences
$$FUTURE MT+30, MT+47, CT+16, CT+33
CHKDT MT+24, CT+10
PROC ORU+4
PROCQ MT+4, CT+2

Naked Globals

Name Field # of Occurrence
^( ORU+4
^("IVMBULL" ENQ+2!

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% ORF+10!
%H ORF+10!
%I ORF+10!
CATC MT+19*, MT+20, MT+21!
CATCZMT MT+18~*, MT+19
CNT ORF+5~, ORF+12*, ORF+13, ORF+14*, ORF+15
CODE MT+1~, MT+41*, MT+42, CT+1~, CT+27*, CT+28
DATA MT+1~, MT+29~, MT+31, CT+1~, CT+15~, CT+17
DATA( MT+31*, CT+17*
DFN ORU+8, ORU+11, ENQ+2!, PROC+37, PROC+40, MT+11, MT+16, MT+30, MT+40, MT+42
, MT+47, MT+53, CT+6, CT+7, CT+16, CT+26, CT+28, CT+33, CT+39, PROCQ+2
, FUTURE~, FUTURE+11
DGADDF ENQ+2!
DGMSGF ORF+8*, ENQ+2!
DGMTA PROC+2~
DGMTACT PROC+2~, PROC+3*
DGMTI PROC+2~
DGMTMSG ORF+8*, ENQ+3!
DGMTP PROC+2~
DIC ORF+7!
DT MT+17, MT+40, MT+41, CT+8, CT+26, CT+27, CHKDT+6
DUZ ORF+4*
ERRMSG MT+16*, MT+20*, MT+21!
EVENT ORF+18~, ORF+22*, ORF+25, ORF+31, ORF+34, ORF+37
>> HL ORF+27
>> HL("ECH" ORF+9
>> HL("MID" ORF+9
>> HL("Q" ORF+9, MT+2
>> HLDA ORF+16*, ORF+20, ORF+39
>> HLDT ORF+10*, ORU+11
>> HLECH ORF+9*, ORF+22
>> HLEID ORF+25*, ORF+26*, ORF+27, ORF+28
>> HLEIDS ORF+28*
HLERR ORU+11, PROC+14!, PROC+19!, MT+4, CT+2
>> HLEVN ORF+19*, Z10+21*
>> HLFS PROC+9, PROC+26, PROC+30, PROC+31, PROC+34, MT+5, MT+6, MT+7, MT+8, MT+9
, MT+10, MT+26, CT+3, CT+4, CT+5, CT+12, LTC+1
>> HLMID ORF+9*
>> HLMTIEN ORF+16
>> HLNEXT ORF+11
>> HLNODE ORF+13
>> HLNODE( ORF+14, ORF+15
>> HLQ ORF+9*, MT+2*, MT+3*, MT+26, CT+12
>> HLQUIT ORF+11
HSDATE PROC+2~, MT+7*, MT+51
IEN MT+29~, MT+30*, MT+31, MT+32, MT+33, CT+15~, CT+16*, CT+17, CT+18, CT+19
IVMBULL ENQ+2!
>> IVMCNTR Z10+21*
IVMCPAY ENQ+2!, CT+7*
IVMCR ORU+9~, ORU+10*, ORU+11
>> IVMCT Z10+21*
IVMDA ORU+4*, ENQ+1!
IVMDGBT ENQ+1!
>> IVMERROR Z10+21*
IVMFLGC ENQ+1!
IVMFUTR PROC+2~, PROC+6*, MT+34*, MT+36*, MT+42, MT+47, CT+20*, CT+22*, CT+28, CT+33
, CHKDT+6*
>> IVMLAST MT+11*, MT+13*, MT+14, MT+15, CT+6*, CHKDT+5
IVMMCI ORU+8, ORU+11, ENQ+1!
IVMMTDT ENQ+1!, MT+5*, MT+11, MT+13, MT+17, MT+30, MT+47, MT+51, MT+53, CT+3*
, CT+6, CT+8, CT+16, CT+33, CT+37, CT+39, IS+2*, CHKDT+5, CHKDT+6
IVMMTIEN ENQ+1!, PROC+7*, MT+33*, MT+37, MT+38, MT+39, MT+47~*, MT+48, MT+49, MT+50
, CT+19*, CT+23, CT+24, CT+25, CT+33~*, CT+34, CT+35, CT+36, CHKDT+5*
IVMORF Z10+20*, ORU+7, ENQ+1!
IVMPAT MT+29~, MT+30, MT+31, CT+15~, CT+16, CT+17, FUTURE~, FUTURE+11*, FUTURE+12
IVMRTN ORF+5~, ORF+6*, ORF+7, ORF+13, ORF+15, ORF+41, ORU+4
IVMSEG ORU+4*, ENQ+1!, PROC+9
IVMSSNFLAG PROC+17~, PROC+18*, PROC+20
IVMTYPE ORU+1*, ORU+10, ENQ+1!, PROC+23*, PROC+26*, PROC+30, PROC+31*, PROC+34*, MT+4, MT+40
, MT+42, CT+2, CT+26, CT+28, IS+2
IVMZ10 PROC+2~, PROC+5*
IVMZ10F ORU+1*, ENQ+3!
MSGID ORF+18~, ORF+38*, ORF+39, PROC+9*
MTSIG MT+1~, MT+9*, MT+14
MTSIGDT MT+1~, MT+10*, MT+14
NODE PROC+2~, MT+46*, MT+49*, MT+51, CT+32*, CT+35*, CT+37
NODE0 MT+1~, MT+38*, MT+42, MT+50*, MT+51, CT+1~, CT+24*, CT+28, CT+36*, CT+37
RET MT+1~, MT+40*, MT+41, CT+1~, CT+26*, CT+27, FUTURE+9~, FUTURE+10*, FUTURE+12*, FUTURE+13
SEG ORF+18~, ORF+20
SEG("TYPE" ORF+21
SEG(10 ORF+38
SEG(9 ORF+22
SEGCNT ORF+5~, ORF+11*, ORF+13, ORF+15
SOURCE PROC+2~, MT+8*, MT+51, CT+5*, CT+37
TMSTAMP PROC+2~, MT+6*, MT+14, MT+45, MT+51, CT+4*, CT+31, CT+37
TYPE FUTURE~, FUTURE+12
U MT+13
YEAR FUTURE~, FUTURE+11
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in HL7 Interface |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All