SCMSVPID ;ALB/ESD HL7 PID Segment Validation ; 23 Oct 98 3:36 PM
Source file <SCMSVPID.m>
Package | Total | Call Graph |
---|---|---|
Scheduling | 2 | ($$CONVERT,VALIDATE)^SCMSVUT0 (SEGPRSE,SEQPRSE)^SCMSVUT5 |
Health Level Seven | 1 | ($$FMDATE,$$FMNAME)^HLFNC |
Registration | 1 | $$FOR^DGADDUTL |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Scheduling | 1 | SCDXMSG1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN(PIDSEG,HLQ,HLFS,HLECH,VALERR,ENCDT,EVNTHL7) | ;
; Entry point to return the HL7 PID (Patient ID) validation segment |
|
ENQ | ||
ADDRCHK(SEG,VALERR,CNT) | ;- Validity check for address (seq 11)
|
|
ERR | ;;Invalid or missing patient ID data for encounter (HL7 PID data segment)
|
|
0 | ;;0035;HL7 SEGMENT NAME
|
|
3 | ;;2030;PATIENT ID (INTERNAL)
|
|
5 | ;;2000;NAME
|
|
7 | ;;2050;DATE OF BIRTH
|
|
8 | ;;2100;SEX
|
|
10 | ;;2150;RACE
|
|
1101 | ;;2200;STREET ADDRESS 1
|
|
1102 | ;;2210;STREET ADDRESS 2
|
|
1103 | ;;2220;CITY
|
|
1104 | ;;2230;STATE
|
|
1105 | ;;2240;ZIP CODE
|
|
1107 | ;;2270;ADDRESS TYPE
|
|
1109 | ;;2250;COUNTY CODE
|
|
1112 | ;;2280;ADDRESS START/STOP DATE
|
|
16 | ;;2300;MARITAL STATUS
|
|
17 | ;;2330;RELIGION
|
|
19 | ;;2360;SSN
|
|
22 | ;;2380;ETHNICITY
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(5 - [#5] | ADDRCHK+32 |
^TMP("SCMSVPID" | EN+19, EN+47, ADDRCHK+5 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CNT | EN+31, EN+39*, EN+40, EN+44, EN+54, EN+61, ADDRCHK~, ADDRCHK+35 |
CODE | ADDRCHK+3~, ADDRCHK+33*, ADDRCHK+34*, ADDRCHK+35 |
COMP | EN+46~, ADDRCHK+3~ |
DATA | EN+53*, EN+54, EN+56*, EN+57*, EN+59*, EN+60*, EN+61, ADDRCHK+3~, ADDRCHK+22*, ADDRCHK+23 , ADDRCHK+24, ADDRCHK+30*, ADDRCHK+31, ADDRCHK+35 |
ENCDT | EN~ |
EVNTHL7 | EN~, EN+28 |
FORIGN | ADDRCHK+3~, ADDRCHK+14*, ADDRCHK+28 |
HLECH | EN~, EN+24*, EN+25*, EN+49, EN+53, EN+54, EN+57, ADDRCHK+7, ADDRCHK+12, ADDRCHK+14 , ADDRCHK+22, ADDRCHK+23, ADDRCHK+30, ADDRCHK+31 |
HLFS | EN~, EN+34 |
HLQ | EN~, EN+23*, EN+53, EN+57, ADDRCHK+12, ADDRCHK+14, ADDRCHK+22, ADDRCHK+30 |
I | EN+18~, EN+28* |
MSG | EN+18~, EN+21*, ENQ+1 |
OFFSET | ADDRCHK+3~, ADDRCHK+18*, ADDRCHK+34 |
PARSEG | EN+18~, EN+19*, EN+20, EN+34, EN+40, EN+49, EN+56, ENQ, ADDRCHK+7 |
PARSEQ | EN+46~, EN+47*, EN+48, EN+49, EN+51, EN+52, EN+53, EN+55, ADDRCHK+3~, ADDRCHK+5* , ADDRCHK+6, ADDRCHK+7, ADDRCHK+10, ADDRCHK+12, ADDRCHK+14, ADDRCHK+22, ADDRCHK+30, ADDRCHK+32, ADDRCHK+36 |
PIDSEG | EN~, EN+31 |
REP | EN+46~, EN+50*, EN+51*, EN+52, EN+53, ADDRCHK+3~, ADDRCHK+9*, ADDRCHK+10*, ADDRCHK+12, ADDRCHK+14 , ADDRCHK+22, ADDRCHK+30, ADDRCHK+32 |
SD | EN+18~, EN+28! |
SD( | EN+27*, EN+28*, EN+43 |
SEG | EN+18~, EN+30*, EN+31, EN+32, EN+40, EN+44, EN+54, EN+61, ENQ+1, ADDRCHK~ , ADDRCHK+35 |
SEQ | EN+18~, EN+27*, EN+28, EN+42*, EN+43*, EN+44, EN+45, EN+49, EN+52, EN+56 , EN+59, EN+60, ADDRCHK+21*, ADDRCHK+22, ADDRCHK+23, ADDRCHK+27*, ADDRCHK+28, ADDRCHK+29, ADDRCHK+30, ADDRCHK+31 , ADDRCHK+32, ADDRCHK+33 |
SKIP | ADDRCHK+3~, ADDRCHK+20*, ADDRCHK+21, ADDRCHK+23*, ADDRCHK+24* |
STATE | ADDRCHK+3~, ADDRCHK+26*, ADDRCHK+32* |
TYPE | ADDRCHK+3~, ADDRCHK+12*, ADDRCHK+15, ADDRCHK+16*, ADDRCHK+18, ADDRCHK+20, ADDRCHK+29 |
VALERR | EN~, EN+31, EN+32, EN+40, EN+44, EN+54, EN+61, ENQ+1, ADDRCHK~, ADDRCHK+35 |
Name | Field # of Occurrence |
---|---|
$T(0 | EN+40 |
$T(@(1) | EN+54, EN+61, ADDRCHK+34 |