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

Package: Registration

Routine: DGENEGT2


Information

DGENEGT2 ;ALB/KCL - PROCESS INCOMING MFN TYPE HL7 MSGS; 04-MAY-1999 ; 3/7/01 9:14am

Source Information

Source file <DGENEGT2.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Registration 5 ($$FINDCUR,$$GET,$$VALID)^DGENEGT  NOTIFY^DGENEGT1  (@(,UPLDEGT)^DGENEGT3  NXTSEG^DGENUPL  $$SITE^VASITE  
Health Level Seven 2 INIT^HLFNC2  GENACK^HLMA1  
Kernel 1 $$NOW^XLFDT  

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

Package Total Caller Graph
Income Verification Match 1 IVM  
Registration 1 DGENEGT3  

Entry Points

Name Comments DBIA/ICR reference
MFN ; Description: This entry point is the handler for incoming MFN type
; HL7 messages. This entry point is called from the PROCESSING ROUTINE
; field of the HL7 MESSAGE (multiple) field of the #771 file entry.
EGT(MSGIEN,MSGID) ;
; Description: This procedure is used to process an MFN~ZEG message.
; It uploads the enrollment group threshold (EGT) data. An HL7
; Master File Acknowledgement (MFK) will be returned.
MFNZEG(MSGIEN,MSGID,CURLINE,ERRCOUNT) ;
; Description: This procedure is used to process a MFN~ZEG msg.
;
; Input:
; MSGIEN - the internal entry number of the HL7 message in the
; HL7 MESSAGE TEXT (#772) file
; MSGID - message control id of HL7 msg in the MSH segment
; CURLINE - the subscript of the MSH segment of the current message
; (pass by reference)
PARSE(MSGIEN,MSGID,CURLINE,ERRCOUNT,DGEGT,DGMFI,DGMFE) ;
; Description: This function is used to parse the HL7 segments of the message.
ADDERROR(MSGID,ERRMSG,ERRCOUNT,DGMFI,DGMFE) ;
; Description - This procedure writes an MFK - Application Error (AE)
; to the global that is used in the transmission of the 'MFK' msg.
ACCEPT(MSGID,DGMFI,DGMFE) ;
; Description - This procedure writes an MFK - Application Accept (AA)
; to the global that is used in the transmission of the 'MFK' msg.

External References

Name Field # of Occurrence
$$FINDCUR^DGENEGT MFNZEG+23
$$GET^DGENEGT MFNZEG+23
$$VALID^DGENEGT MFNZEG+30
NOTIFY^DGENEGT1 MFNZEG+40
@(^DGENEGT3 PARSE+28
UPLDEGT^DGENEGT3 MFNZEG+34
NXTSEG^DGENUPL MFN+53, PARSE+26
INIT^HLFNC2 MFN+50
GENACK^HLMA1 EGT+28
$$SITE^VASITE MFN+48
$$NOW^XLFDT MFNZEG+26

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ORD(101 - [#101] MFN+49, MFN+51
^TMP("HLA" EGT+16!, ADDERROR+23*, ADDERROR+26*, ADDERROR+29*, ACCEPT+23*, ACCEPT+27*, ACCEPT+31*
^TMP($J MFN+39!, MFN+42*, MFN+44*, MFN+61!

Label References

Name Line Occurrences
$$PARSE MFNZEG+20
ACCEPT MFNZEG+37
ADDERROR MFNZEG+31, PARSE+30
EGT MFN+59
MFNZEG EGT+23

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CNT MFN+35~, MFN+41*, MFN+42, MFN+43*, MFN+44
CURLINE EGT+12~, EGT+20*, EGT+23, MFNZEG~, MFNZEG+20, PARSE~, PARSE+26
DGCOUNT ACCEPT+18~, ACCEPT+19*, ACCEPT+22*, ACCEPT+23, ACCEPT+26*, ACCEPT+27, ACCEPT+30*, ACCEPT+31
DGEGT MFNZEG+15~, MFNZEG+20, MFNZEG+30, MFNZEG+34, MFNZEG+40, PARSE~, PARSE+22!
DGEGT("ENTDATE" MFNZEG+26*
DGEGT("SOURCE" MFNZEG+27*
DGMFE MFNZEG+15~, MFNZEG+20, MFNZEG+31, MFNZEG+37, PARSE~, PARSE+22!, PARSE+23*, PARSE+30, ADDERROR~, ACCEPT~
DGMFE("CNTRLNUM" ADDERROR+29, ACCEPT+31
DGMFE("PRIMKEY" ADDERROR+29, ACCEPT+31
DGMFE("RECEVNT" ADDERROR+29, ACCEPT+31
DGMFI MFNZEG+15~, MFNZEG+20, MFNZEG+31, MFNZEG+37, PARSE~, PARSE+22!, PARSE+23*, PARSE+30, ADDERROR~, ACCEPT~
DGMFI("EVENT" ADDERROR+26, ACCEPT+27
DGMFI("MASTERID" ADDERROR+26, ACCEPT+27
ERRCOUNT EGT+12~, EGT+19*, EGT+23, EGT+26, MFNZEG~, MFNZEG+20, MFNZEG+31, PARSE~, PARSE+30, ADDERROR~
, ADDERROR+20*, ADDERROR+23, ADDERROR+26, ADDERROR+29, ADDERROR+30*
ERRMSG MFNZEG+15~, MFNZEG+30, MFNZEG+31, ADDERROR~, ADDERROR+23
ERROR PARSE+19~, PARSE+20*, PARSE+25, PARSE+31*, PARSE+33
EVENT MFN+34~, MFN+55*, MFN+57
HL MFN+35~, MFN+50
>> HLARYTYP EGT+27*, EGT+28
>> HLDA MFN+45*, MFN+53, MFN+59
>> HLECH MFN+55
>> HLEID MFN+48*, MFN+49*, MFN+50, MFN+51, EGT+28
>> HLEIDS MFN+51*, EGT+28
>> HLEVN EGT+26*
>> HLFORMAT EGT+27*, EGT+28
>> HLFS ADDERROR+23, ADDERROR+26, ADDERROR+29, ACCEPT+23, ACCEPT+27, ACCEPT+31
>> HLMTIEN MFN+45
>> HLMTIENS EGT+28
>> HLNEXT MFN+40
>> HLNODE MFN+42
>> HLNODE( MFN+43, MFN+44
>> HLQUIT MFN+40
>> HLRESLTA EGT+28
>> HLSDT EGT+15*
IVMRTN MFN+35~, MFN+38*, MFN+39, MFN+42, MFN+44, MFN+61
MSGID MFN+34~, MFN+58*, MFN+59, EGT~, EGT+23, MFNZEG~, MFNZEG+20, MFNZEG+31, MFNZEG+37, PARSE~
, PARSE+30, ADDERROR~, ADDERROR+23, ACCEPT~, ACCEPT+23
MSGIEN EGT~, EGT+23, MFNZEG~, MFNZEG+20, PARSE~, PARSE+26
OLDEGT MFNZEG+15~, MFNZEG+23, MFNZEG+40
SEG MFN+34~, MFN+53, EGT+12~, PARSE+19~, PARSE+25*, PARSE+26, PARSE+27, PARSE+28, PARSE+30
SEG("TYPE" MFN+54, PARSE+27
SEG(10 MFN+58
SEG(9 MFN+55
SEGCNT MFN+35~, MFN+40*, MFN+42, MFN+44
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All