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

Package: Income Verification Match

Routine: IVM2174F


Information

IVM2174F ;ALB/JAM - IVM*2.0*174 - FIX BLANK SSN IN PERSON INCOME FILE ;9/26/2018 3:21pm

Source Information

Source file <IVM2174F.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Health Level Seven 1 $$FMDATE^HLFNC  
Registration 1 $$DEM^DGMTU1  
VA FileMan 1 FILE^DIE  

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

Package Total Caller Graph
Income Verification Match 1 IVMCMC  

Entry Points

Name Comments DBIA/ICR reference
EP ; Entry Point
IVMFSSN(DFN,IVMJOB) ; Process only ZDP segments to store SSNs into 408.13 file if IEN is in ^XTMP("DG53970P")
; Called by: ^IVMCM if DFN is defined in ^XTMP("DG53970P") when processing ORU-Z10 message
FILESSN(DFN,IVMJOB,IVMSEG) ; Check segment and store SSN in 408.13 if criteria met
; Input: DFN - DFN from PID segment
; IVMJOB - job number in ^XTMP("DG53970P",JOB)
; IVMSEG - the ZDPS or ZDPC segment
VALSSN(X,ERROR) ; Validate the SSN format
; Input: X - SSN to validate
; ERROR - pass by reference, returns error text if validation fails
; Output: 1 if valid, 0 if invalid
GETIP(IVMPRI,IVMRELO,IVMDOB13,IVMSEX13) ; Return 408.13 Sex,DOB,Relationship via 408.12 record
; Input: IVMPRI - IEN of 408.12 entry
; IVMRELO - Relationship from 408.12 piece 2 (pass by ref)
; IVMDOB13 - Date of Birth from 408.13 piece 3 (pass by ref)
; IVMSEX13 - Sex from 408.13 piece 2 (pass by ref)
CHKSSN(IEN) ; Check to see if SSN IN 408.13 is corrupted and clean up if it is
; Input: IEN - 408.13 ien
XREF(IEN) ; clean "SSN", "BS" and "BS5" xrefs for this INCOME PERSON file (#408.13) record

External References

Name Field # of Occurrence
$$DEM^DGMTU1 GETIP+13
FILE^DIE FILESSN+52
$$FMDATE^HLFNC FILESSN+14

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPR(408.12 - [#408.12] IVMFSSN+29, IVMFSSN+31, FILESSN+17, FILESSN+26, GETIP+6
^DGPR(408.13 - [#408.13] CHKSSN+3, CHKSSN+5*, XREF+4, XREF+5!
^TMP($J IVMFSSN+8, IVMFSSN+12, IVMFSSN+13, IVMFSSN+17, IVMFSSN+18, IVMFSSN+22, IVMFSSN+23
^XTMP("DG53970P" IVMFSSN+36, IVMFSSN+38!, FILESSN+31, FILESSN+37*, FILESSN+55*, FILESSN+57!

Label References

Name Line Occurrences
$$VALSSN FILESSN+37
CHKSSN FILESSN+48
FILESSN IVMFSSN+9, IVMFSSN+14, IVMFSSN+19, IVMFSSN+24
GETIP FILESSN+19
XREF CHKSSN+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CNT VALSSN+4~, VALSSN+7*
DFN IVMFSSN~, IVMFSSN+9, IVMFSSN+14, IVMFSSN+19, IVMFSSN+24, IVMFSSN+29, IVMFSSN+38, FILESSN~, FILESSN+17
DIERR FILESSN+6~, FILESSN+53
ERROR VALSSN~, VALSSN+5*, VALSSN+8*, VALSSN+9*, VALSSN+10*
FDA FILESSN+6~
FDA( FILESSN+50*, FILESSN+51*
IEN IVMFSSN+6~, IVMFSSN+29*, IVMFSSN+31, CHKSSN~, CHKSSN+3, CHKSSN+5, CHKSSN+7, XREF~, XREF+5
IVMCTR IVMFSSN+6~, IVMFSSN+11*, IVMFSSN+12*, IVMFSSN+13, IVMFSSN+16*, IVMFSSN+17*, IVMFSSN+18, IVMFSSN+21*, IVMFSSN+22*, IVMFSSN+23
IVMDOB FILESSN+5~, FILESSN+14*, FILESSN+22
IVMDOB13 FILESSN+5~, FILESSN+19, FILESSN+22, GETIP~, GETIP+16*
IVMERR FILESSN+4~, FILESSN+36*, FILESSN+37, FILESSN+54*, FILESSN+55
IVMERRORS FILESSN+6~
IVMERRORS(1 FILESSN+54
IVMFLG1 FILESSN+4~, FILESSN+15*, FILESSN+17, FILESSN+22*
IVMFOUND IVMFSSN+6~, IVMFSSN+27*, IVMFSSN+29, IVMFSSN+36*, IVMFSSN+38, FILESSN+4~, FILESSN+29*, FILESSN+31*, FILESSN+32
IVMIEN IVMFSSN+6~, IVMFSSN+33*, IVMFSSN+36, FILESSN+4~, FILESSN+28*, FILESSN+31, FILESSN+37, FILESSN+48, FILESSN+50, FILESSN+51
, FILESSN+55, FILESSN+57
IVMIENCNT IVMFSSN+6~, IVMFSSN+34*, IVMFSSN+36*, FILESSN+4~, FILESSN+29*, FILESSN+31*, FILESSN+57
IVMJOB IVMFSSN~, IVMFSSN+9, IVMFSSN+14, IVMFSSN+19, IVMFSSN+24, IVMFSSN+36, IVMFSSN+38, FILESSN~, FILESSN+31, FILESSN+37
, FILESSN+55, FILESSN+57
IVMPRI FILESSN+4~, FILESSN+10*, FILESSN+12, FILESSN+17*, FILESSN+19, FILESSN+24, FILESSN+26, GETIP~, GETIP+6, GETIP+13
IVMPRN GETIP+5~, GETIP+6*, GETIP+7, GETIP+8
IVMPSSNR FILESSN+4~, FILESSN+41*, FILESSN+43*, FILESSN+46, FILESSN+51
IVMRELN FILESSN+5~, FILESSN+7*, FILESSN+9, FILESSN+22
IVMRELO FILESSN+5~, FILESSN+19, FILESSN+20, FILESSN+22, GETIP~, GETIP+7*, GETIP+10
IVMSEG IVMFSSN+6~, IVMFSSN+8*, IVMFSSN+9, IVMFSSN+13*, IVMFSSN+14, IVMFSSN+18*, IVMFSSN+19, IVMFSSN+23*, IVMFSSN+24, FILESSN~
, FILESSN+7, FILESSN+10, FILESSN+14, FILESSN+34, FILESSN+41
IVMSEG13 GETIP+11~, GETIP+13*, GETIP+14, GETIP+16
IVMSEX FILESSN+5~, FILESSN+14*, FILESSN+22
IVMSEX13 FILESSN+5~, FILESSN+19, FILESSN+22, GETIP~, GETIP+16*
IVMSSN FILESSN+4~, FILESSN+34*, FILESSN+37, FILESSN+39*, FILESSN+46*, FILESSN+50, CHKSSN+2~, CHKSSN+3*, CHKSSN+4
IVMVAL IVMFSSN+6~, IVMFSSN+31*, IVMFSSN+32, IVMFSSN+33, FILESSN+4~, FILESSN+26*, FILESSN+27, FILESSN+28
VAL XREF+1~, XREF+3*, XREF+4*, XREF+5
X VALSSN~, VALSSN+5, VALSSN+7*, VALSSN+8, VALSSN+9, VALSSN+10
XREF XREF+1~, XREF+2*, XREF+4, XREF+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All