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

Package: Income Verification Match

Routine: IVMUFNC


Information

IVMUFNC ;ALB/MLI/PHH/SCK,TDM - IVM GENERIC FUNCTIONS ; 6/30/08 4:11pm

Source Information

Source file <IVMUFNC.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Health Level Seven 4 $$HLDATE^HLFNC  $$BHS^HLFNC1  INIT^HLFNC2  KILL^HLTRANS  
Scheduling 2 $$SDAPI^SDAMA301  (ACTIVE,DATE,INDEX,OPEN,PAT,SCAN,SCANCB)^SDQ  
Integrated Billing 1 $$INSUR^IBBAPI  
MailMan 1 ^XMD  
Master Patient Index VistA 1 $$GETICN^MPIF001  
Registration 1 $$LST^DGMTU  
VA FileMan 1 Y^DIQ  

Caller Graph

Caller Graph Total: 49

Package Total Caller Graph
Income Verification Match 39 IVM2071A  IVMBULK1  IVMCM1  IVMCM2  IVMCM3  IVMCM4  IVMCM5  IVMCMB  
IVMCMC  IVMCMD1  IVMCME5  IVMCMF3  IVMCQ1  IVMCQ2  IVMLDEM2  IVMLDEM3  
IVMLINS2  IVMPMTE  IVMPREC1  IVMPREC3  IVMPREC5  IVMPREC7  IVMPRECA  IVMPRECZ  
IVMPTRN  IVMPTRN4  IVMPTRN5  IVMPTRN9  IVMPXFR  IVMRBT  IVMRNQ  IVMRNQ1  
IVMUM2  IVMUM3  IVMUM4  IVMUM5  IVMUM6  IVMUM7  IVMUM8  
Enrollment Application System 9 EASPREC6  EASPREC7  EASPTRN5  EASUM1  EASUM5  EASUM6  EASUM7  EASUM8  
EASUM9  
Registration 1 DGENUPL  

Entry Points

Name Comments DBIA/ICR reference
INIT(EID,HL,INT) ; initialize variables for 1.6 HL7/IVM
CLEAN ; clean-up variables for HL7/IVM (as defined by call to INIT)
BATCH ; put BHS and BTS segments into TMP global
IVM(DFN,IVMDT) ; extrinsic function - should this pt be transmitted to IVM?
IVMQ
INS(DFN,IVMDT) ; extrinsic function to see if pt has active insurance
MAIL(IVMGRP) ; Transmit to members of Mail Group. Before D MAIL^IVMUFNC()
; set XMSUB = to subject and set IVMTEXT array to message.
LTD(DFN,IVMQUERY) ; Find Last Treatment Date
; Input: DFN -- pointer to the patient in file #2
; IVMQUERY("LTD") -- # of the QUERY that is currently open or
; undefined, zero, or null if no QUERY opened for
; last treatment date
; Output: LTD -- Last Treatment Date (really last date seen at
; the facility)
LTDQ ;
APPT(SDOE0) ;Determine if appt associated with encounter is in a valid state
; Quit when Outpatient Encounter STATUS is CHECKED OUT
OUTTR(IVMINT,IVMPAR,IVMST) ; - Transform IVMINT to a displayable value
; Input: IVMINT -- internal value of demographic element
; received from IVM
; IVMPAR -- Zeroth node of the entry in file #301.92
; for the demographic element IVMINT
; IVMST -- [optional] pointer to the STATE (#5) file
; Required to transform the county code
; Output: IVMOUT -- Displayable value for IVMINT
OUTTRQ
EXPAND(FILE,FIELD,VALUE) ; - returns internal data in an output format
EXPQ
GETPAT(DFN,IVMPAT) ;
; Description: Used to obtain identifying information for a patient
; in the PATIENT file and place it in the IVMPAT() array.
LOOKUP(SSN,DOB,SEX,ERROR) ;
MATCH(DFN,ICN,DOB,SEX,CFLG,ERROR) ;
PARSPID3(PID3,PID3ARY) ;

External References

Name Field # of Occurrence
$$LST^DGMTU IVM+10
Y^DIQ EXPAND+3
$$HLDATE^HLFNC LTDQ+1
$$BHS^HLFNC1 BATCH+13
INIT^HLFNC2 INIT+2
KILL^HLTRANS CLEAN+1
$$INSUR^IBBAPI INS+7
$$GETICN^MPIF001 GETPAT+31, MATCH+19
$$SDAPI^SDAMA301 APPT+7
ACTIVE^SDQ LTD+25, LTD+34
DATE^SDQ LTD+33
INDEX^SDQ LTD+28
OPEN^SDQ LTD+27
PAT^SDQ LTD+32
SCAN^SDQ LTD+35
SCANCB^SDQ LTD+29
^XMD MAIL+15

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( EXPAND+3
^DGMT(408.31 - [#408.31] IVM+12
^DGPM("ATID3" LTD+18
^DIC(5 - [#5] OUTTR+13
^DPT - [#2] IVM+8, LTD+15, LTD+21, GETPAT+23, LOOKUP+19, MATCH+18
^DPT("SSN" LOOKUP+16, LOOKUP+18
^IVM(301.9 - [#301.9] MAIL+13
^TMP("DIERR" LTD+24!, LTD+36!
^TMP("HLS" BATCH+13*, BATCH+14*
^TMP($J APPT+9, APPT+10, APPT+11!
^XMB("NETNAME" MAIL+14
^XMB(3.8 - [#3.8] MAIL+13

Label References

Name Line Occurrences
$$EXPAND OUTTR+16
$$INS IVM+13
EXPQ EXPAND+2
IVMQ IVM+8, IVM+11, IVM+12, IVM+13, IVM+14, IVM+15
LTDQ LTD+12, LTD+15
OUTTRQ OUTTR+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
C EXPAND+1~, EXPAND+3*
CFLG MATCH~, MATCH+17*, MATCH+19, MATCH+20, MATCH+21, MATCH+22
>> COMP PARSPID3+7*, PARSPID3+8, PARSPID3+9
DFN IVM~, IVM+8*, IVM+10, IVM+13, INS~, INS+7, LTD~, LTD+12, LTD+15, LTD+18
, LTD+21, LTD+32, GETPAT~, GETPAT+19, GETPAT+23, GETPAT+26, GETPAT+31, LOOKUP+13~, LOOKUP+16*, LOOKUP+17
, LOOKUP+18, LOOKUP+19, LOOKUP+23, MATCH~, MATCH+16, MATCH+18, MATCH+19
DGARRAY APPT+5~, APPT+7
DGARRAY("FLDS" APPT+5*
DGARRAY("MAX" APPT+6*
DGARRAY("SORT" APPT+6*
DGARRAY(1 APPT+6*
DGARRAY(4 APPT+5*, APPT+9, APPT+10
DIFROM MAIL+8~
DOB LOOKUP~, LOOKUP+21, LOOKUP+22, MATCH~, MATCH+21, MATCH+22
DT IVM+9, LTD+15, LTD+18
EID INIT~, INIT+1*, INIT+2
ERROR LOOKUP~, LOOKUP+15*, LOOKUP+17*, LOOKUP+18*, LOOKUP+20*, LOOKUP+21*, LOOKUP+22*, MATCH~, MATCH+16*, MATCH+18*
, MATCH+19*, MATCH+20*, MATCH+21*, MATCH+22*
FIELD EXPAND~, EXPAND+2, EXPAND+3
FILE EXPAND~, EXPAND+2, EXPAND+3
HL INIT~, INIT+2
>> HLDAP INIT+2*
>> HLECH PARSPID3+8, PARSPID3+9, PARSPID3+10
HLEVN INIT+3*, CLEAN+2!, BATCH+14
>> HLFS BATCH+14
>> HLMSA BATCH+12*, BATCH+13
HLMTN CLEAN+2!, BATCH+13
>> HLQ LTDQ+1
HLSDT CLEAN+2!, BATCH+13, BATCH+14
>> HLSEC BATCH+12*, BATCH+13
ICN MATCH~, MATCH+19
INT INIT~, INIT+1*, INIT+2
IVMCT INIT+3*, CLEAN+2!, BATCH+14
IVMDT IVM~, IVM+9*, IVM+10, IVM+11!, IVM+13, INS~, INS+7
IVMGRP MAIL~, MAIL+12, MAIL+13*, MAIL+14
IVMINT OUTTR~, OUTTR+9, OUTTR+10, OUTTR+13, OUTTR+16
IVMNODE GETPAT+18~, GETPAT+23*, GETPAT+24, GETPAT+27, GETPAT+28, GETPAT+29, GETPAT+30
IVMOUT OUTTR+9~*, OUTTR+10*, OUTTR+13*, OUTTR+16*, OUTTRQ
IVMPAR OUTTR~, OUTTR+10, OUTTR+13, OUTTR+16
IVMPAT GETPAT~, GETPAT+20!*
IVMPAT("DFN" GETPAT+26*
IVMPAT("DOB" GETPAT+29*
IVMPAT("ICN" GETPAT+31*
IVMPAT("NAME" GETPAT+27*
IVMPAT("SEX" GETPAT+28*
IVMPAT("SSN" GETPAT+30*
IVMQ LTD+8~, LTD+11*, LTD+25, LTD+26, LTD+27, LTD+28, LTD+29, LTD+30, LTD+32, LTD+33
, LTD+34, LTD+35
IVMQUERY LTD~
IVMQUERY("LTD" LTD+11, LTD+30*
IVMST OUTTR~, OUTTR+13
IVMTEXT MAIL+16!
LTD LTD+8~, LTD+12*, LTD+15*, LTD+18*, LTD+21*, LTD+33, LTDQ+1
NODE LOOKUP+13~, LOOKUP+19*, LOOKUP+20, LOOKUP+21, LOOKUP+22, MATCH+15~, MATCH+18*, MATCH+20, MATCH+21, MATCH+22
PID3 PARSPID3~
PID3(3 PARSPID3+5, PARSPID3+6, PARSPID3+7, PARSPID3+8, PARSPID3+9, PARSPID3+10
PID3ARY PARSPID3~
PID3ARY("NI" PARSPID3+9*
PID3ARY("PI" PARSPID3+8*, PARSPID3+10*
SDCNT APPT+5~, APPT+7*, APPT+8
SDDTTM APPT+5~, APPT+9*, APPT+10
SDOE0 APPT~, APPT+2, APPT+5, APPT+6, APPT+12
SDSTAT APPT+5~, APPT+7*, APPT+10*, APPT+12
SDSTOP LTD+8~
SEX LOOKUP~, LOOKUP+20, MATCH~, MATCH+20
SSN LOOKUP~, LOOKUP+15, LOOKUP+16, LOOKUP+18
U APPT+2, APPT+5, APPT+6, APPT+10, APPT+12
VALUE EXPAND~, EXPAND+1, EXPAND+2, EXPAND+3
X IVM+7~, IVM+10*, IVM+11, IVM+12*, IVM+13, IVM+14, IVM+15, LTD+8~, LTD+21*
XMDF MAIL+8~, MAIL+9*
XMDUZ MAIL+8~, MAIL+10*, MAIL+16!
XMROU MAIL+8~
XMSTRIP MAIL+8~
XMSUB MAIL+16!
XMTEXT MAIL+8~, MAIL+11*, MAIL+16!
XMY MAIL+8~, MAIL+16!
XMY("G." MAIL+14*
XMZ MAIL+8~
Y IVM+7~, IVM+13*, IVM+16*, IVMQ, EXPAND+1~*, EXPAND+3*, EXPQ
Z LTD+8~, OUTTR+9~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All