IVMPTRNA ;ALB/CKN,BRM,TDM,LBD,KUM - HL7 FULL DATA TRANSMISSION (Z07) BUILDER(CONTINUED) ;7/18/24 9:13AM
Source file <IVMPTRNA.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| NTROBX(DGNTARR) | ;
|
|
| RF1(DFN,RF1TYP) | ; create RF1 segment
; Input: ; DFN - Patient IEN ; RF1TYP - RF1 Type ; SAD = Street Address Change (Default) ; CAD = Confidential Address Change ; CPH = Cell Phone Number Change ; PNO = Pager Number Change ; EAD = E-Mail Address Change ; PHH = Home Phone Number Change ; RAD Residential Address Change |
|
| ZUD(DFN,IVMZTYP,IVMZCNT) | ; create ZUD segment
; IVM*2.0*201 - Send Originating Source and User information to ES ; Input: ; DFN - Patient IEN ; IVMZTYP - ZUD Type ; SAD = Street Address Change (Default) ; CAD = Confidential Address Change ; CPH = Cell Phone Number Change ; EAD = E-Mail Address Change ; PHH = Home Phone Number Change ; RAD Residential Address Change ; PHB Business Phone Number Change ; PHC Confidential Phone Number Change ; IVMZCNT - Sequence number of ZUD segment |
|
| ADDRCNV(ADDRSRC) | ;convert Address Source to HL7 format
|
|
| RF1LOAD(RF1TYP) | ;
|
|
| ZUDLOAD(IVMZTYP,IVMERR) | ;
; IVM*2.0*201 - Create ZUD segment ; Input ; IVMZTYP - ZUD Type ; IVMERR - Error message on failure (optional, pass by reference) |
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | EXTERNAL^DILFD, GETS^DIQ |
| ^DIC(4 - [#4] | GET1^DIQ |
