DGENUPL3 ;ALB/CJM,ISA,KWP,AEG,BRM,ERC,CKN,BAJ,PHH,TDM,LBD,DJS,KUM,JAM,HM - PROCESS INCOMING (Z11 EVENT TYPE) HL7 MESSAGES ;12 June 2018 5:35PM
Source file <DGENUPL3.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ADDMSG(MSGS,MESSAGE,TOHEC) | ;
|
|
NOTIFY(DGPAT,MSGS) | ;
|
|
BEGUPLD(DFN) | ;
|
|
ENDUPLD(DFN) | ;
|
|
CKUPLOAD(DFN) | ;
|
|
SCVET | ;moved from DGENUPL4 - DG*5.3*688
|
|
NONVET(DGCODE) | ;map Patient Type from Primary Elig (and POS)
|
|
POS(DGTYPE) | ;for these Elig Codes, check POS to determine Patient Type
|
|
ZMH | ;Purple Heart, POW, OEF/OIF Conflict Loc, Military Service Episodes, Medal of Honor
|
|
POWLOC(LOC,ERROR) | ;POW Confinement Location mapping with HL7 table VA023
; Input: LOC - HL7 code for location ; Output: ERROR - Return error 1 on failure ; IEN22 - IEN of file 22 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | EXTERNAL^DILFD |
^IVM(301.9 - [#301.9] | EXTERNAL^DILFD |