IBCNEHL2 ;DAOU/ALA - HL7 Process Incoming RPI Msgs (cont.) ;26-JUN-2002 ; Compiled December 16, 2004 15:29:37
Source file <IBCNEHL2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| MSA(ERACT,ERCON,ERROR,ERTXT,IBSEG,MGRP,RIEN,TRACE,EVENTYP) | ; Process the MSA seg
|
|
| CTD(ERROR,IBSEG,RIEN) | ; Process the CTD seg
|
|
| CTDX | ;
|
|
| PID(ERFLG,ERROR,IBSEG,RIEN) | ; Process the PID seg
|
|
| GT1(ERROR,IBSEG,RIEN,SUBID,EVENTYP) | ; Process the GT1 Guarantor seg
|
|
| IN1(ERROR,IBSEG,RIEN,SUBID,EVENTYP) | ; Process the IN1 Insurance seg
|
|
| IN1X | ;
|
|
| IN3(ERROR,IBSEG,RIEN) | ; Process IN3 Addt'l Insurance - Cert Seg
|
|
| IN3X | ;
|
|
| ZEB(EBDA,ERROR,IBSEG,RIEN) | ; Process the ZEB Elig/Benefit seg
|
|
| ZEBX | ;
|
|
| EBNTE(EBDA,IBSEG,RIEN) | ; Process NTE Benefit related entity Notes segment (in Eligibility/Benefit group)
|
|
| EBNTEX | ;
|
|
| DECHL7(STR,HLSEP,ECHARS) | ; Decode HL7 escape seqs in data fields
|
|
| DECHL7X | ; Exit w/return values
|
|
| NUMCHK(N) | ; make sure that numeric value N is not greater than 99999
|
| FileNo | Call Tags |
|---|---|
| 365.02 | WP^DIE |
| ^IBE(365.021 - [#365.021] | FIND1^DIC |
