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

Package: Income Verification Match

Routine: IVMPREC1


Information

IVMPREC1 ;ALB/SEK/BRM - PROCESS INCOMING HL7 (ACK) MESSAGES ; 07/28/2003

Source Information

Source file <IVMPREC1.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Income Verification Match 3 $$MMN^IVMPTRN4  $$SETSTAT^IVMTLOG  MAIL^IVMUFNC  
VA FileMan 1 EN^DIQ1  

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 1 EAS EDB ORU-Z09 SERVER  
Income Verification Match 1 6  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
ACK ; - Receive ACK Message from IVM Center stored in ^TMP("HLR".
; If 1st segment is BHS then set(s) of MSH, MSA(AE) will follow
; indicating error(s) in transmission received by IVM Center
; If 1st segment is MSH than MSA (AA) indicating batch or individual
; query was received ok. MSA (AE) indicates error in transmission of
; individual query.
;
; - When acknowledgment code = "AA" (application accept)
; Stuff 1 into STATUS field (.03) of ^IVM(301.6 indicating IVM Center
; has received transmission.
ACKQ ;
AE ; - When acknowledgment code = "AE" (application error)
; Stuff 3 into STATUS field(.03), error message into ERROR MESSAGE
; field(.04), and 1 (NEW) into the ERROR PROCESSING STATUS field.
; Stuff 1 into STATUS field(.03) for transmissions (no 'AE' code
; received) received by IVM Center.
OTH ; Generate message for errors other than Full/Initial Transmissions.
Z07CHK(CURSEQ,CURMCI,CUREM) ; Function ;
; INPUT
; CURSEQ : Current Sequence # reviewing in batch
; CURMCI : Current Message Control ID reviewing in batch
; CUREM : Current Error Message reviewing in batch
REBLDPID(ARRAY,SEQ) ; Reconnect the pieces of the PID segment
; ARRAY contains the HL7 message reference to be accessed indirectly
; It should look similar in structure to the HL7 message text in
; file 772
; @ARRAY@(SEQ) should = the first 'PID' segment record text and should
; be 245 characters long
PIDQ

External References

Name Field # of Occurrence
EN^DIQ1 OTH+7
$$MMN^IVMPTRN4 OTH+27
$$SETSTAT^IVMTLOG ACK+34, ACK+40, AE+20, AE+23
MAIL^IVMUFNC OTH+32

Used in HL7 Interface

HL7 Protocol Name Call Tags
EAS EDB ORU-Z09 SERVER ACK

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^HL(772 - [#772] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^HL(772 - [#772] OTH+3, OTH+5
^IVM(301.6 - [#301.6] ACK+34, ACK+39, AE+15, AE+18, AE+23, Z07CHK+19, Z07CHK+20, Z07CHK+22, Z07CHK+24*
^TMP($J ACK+14!, ACK+16*, ACK+18*, ACK+22, ACK+30, ACKQ+1!, AE+7, Z07CHK+9, Z07CHK+10

Label References

Name Line Occurrences
$$REBLDPID OTH+15
$$Z07CHK AE+17
ACKQ ACK+23, ACK+24, ACK+27, ACK+31, ACK+33, ACK+36
AE ACK+27
OTH ACK+39, AE+19
PIDQ REBLDPID+8

Naked Globals

Name Field # of Occurrence
^( AE+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ARRAY REBLDPID~, REBLDPID+7, REBLDPID+9
CHKSEG Z07CHK+7~, Z07CHK+10*, Z07CHK+13
CHKSEGN Z07CHK+7~, Z07CHK+10*, Z07CHK+11
CNT ACK+11!, ACK+16*, ACK+17*, ACK+18, ACK+20!
CUREM Z07CHK~, Z07CHK+23
CURMCI Z07CHK~, Z07CHK+13, Z07CHK+21, Z07CHK+24
CURSEQ Z07CHK~, Z07CHK+12
DA ACKQ+2!, OTH+1~, OTH+6*
DA( OTH+6*
DIC OTH+1~, OTH+6*
DIE ACKQ+2!
DIQ OTH+1~, OTH+6*
DR ACKQ+2!, OTH+1~, OTH+6*
DR( OTH+6*
DUP Z07CHK+7~, Z07CHK+8*, Z07CHK+13*, Z07CHK+14
END Z07CHK+17~
FND Z07CHK+17~, Z07CHK+18*, Z07CHK+19, Z07CHK+21*
>> HL("ECH" ACK+13
>> HL("FS" ACK+13
>> HL("Q" ACK+13
HLDA ACK+19*, OTH+1~, OTH+2*, OTH+3*, OTH+4, OTH+5, OTH+6, OTH+8, OTH+9, OTH+10
OTH+15, OTH+16, OTH+18
HLDAT OTH+1~
HLDAT(772 OTH+8, OTH+9, OTH+10, OTH+15*, OTH+16, OTH+18
>> HLECH ACK+13*
>> HLFS ACK+13*, ACK+24, ACK+27, ACK+31, ACK+32, ACK+33, ACK+36, ACK+37, ACK+38, AE+10
AE+12, AE+13, AE+14
>> HLMTIEN ACK+19
>> HLNEXT ACK+15
HLNODE ACK+11!, ACK+16, ACK+20!
HLNODE( ACK+17, ACK+18
>> HLQ ACK+13*
>> HLQUIT ACK+15
HLSEG OTH+1~, OTH+8, OTH+9*, OTH+10, OTH+11, OTH+13*
IEN Z07CHK+17~, Z07CHK+18*, Z07CHK+19*, Z07CHK+20, Z07CHK+22, Z07CHK+24
IVMADDT ACK+32*, ACK+34, ACK+39, ACKQ+2!
IVMCT ACKQ+2!
IVMDA ACK+34*, ACK+39*, ACK+40, ACKQ+2!, AE+15*, AE+18*, AE+20, AE+23*
IVMEM ACK+38*, ACK+40, ACKQ+2!, AE+14*, AE+17, AE+20, OTH+24
IVMI ACKQ+2!, AE+7*, AE+17
IVMMCI ACK+37*, ACKQ+2!, AE+13*, AE+15, AE+17, AE+18, AE+23, OTH+3, OTH+13, OTH+27
IVMMCID OTH+1~, OTH+10*, OTH+13
IVMNAM OTH+1~, OTH+2*, OTH+16*, OTH+17*, OTH+25
IVMNAME ACKQ+2!
IVMPAT ACKQ+2!
IVMPID OTH+1~, OTH+2*, OTH+18*, OTH+20*, OTH+26
IVMRMM OTH+1~, OTH+27*, OTH+28
IVMRTN ACK+11!, ACK+12*, ACK+14, ACK+16, ACK+18, ACK+22, ACK+30, ACKQ+1, ACKQ+2!, AE+7
, Z07CHK+9, Z07CHK+10
IVMSEG ACK+22*, ACK+23, ACK+24, ACK+27, ACK+30*, ACK+31, ACK+32, ACK+33, ACK+36, ACK+37
ACK+38, ACKQ+2!, AE+7*, AE+8, AE+10, AE+12, AE+13, AE+14
IVMSSN ACKQ+2!
IVMTEXT ACKQ+2!
IVMTEXT(1 OTH+22*
IVMTEXT(10 OTH+29*
IVMTEXT(11 OTH+30*
IVMTEXT(12 OTH+31*
IVMTEXT(2 OTH+23*
IVMTEXT(3 OTH+24*
IVMTEXT(4 OTH+24*
IVMTEXT(5 OTH+24*
IVMTEXT(6 OTH+25*
IVMTEXT(7 OTH+26*
IVMTEXT(8 OTH+26*
IVMTEXT(9 OTH+28*
IVMTMP OTH+1~, OTH+2*, OTH+8*, OTH+9, OTH+10, OTH+15, OTH+16, OTH+18
LOG Z07CHK+17~, Z07CHK+22*, Z07CHK+23
MCI Z07CHK+17~, Z07CHK+20*, Z07CHK+21
PID REBLDPID+6~, REBLDPID+7*, REBLDPID+8, REBLDPID+9*, PIDQ
RET Z07CHK+17~, Z07CHK+18*, Z07CHK+23*, Z07CHK+24*, Z07CHK+25
SEGCNT ACK+11!, ACK+15*, ACK+16, ACK+18, ACK+20!
SEQ Z07CHK+7~, Z07CHK+8*, Z07CHK+9*, Z07CHK+10, Z07CHK+12, REBLDPID~, REBLDPID+7
SEQX REBLDPID+6~, REBLDPID+7*, REBLDPID+9*
TMPCTR Z07CHK+17~, Z07CHK+19*
U OTH+15
XMSUB ACKQ+2!, OTH+21*
Z07FLG AE+6~, AE+10*, AE+11!, AE+16
Z07RET AE+6~, AE+9*, AE+15, AE+17*, AE+18
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in HL7 Interface |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All