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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ADDRCHK(SEG,VALERR,CNT) | ;- Validity check for address (seq 11)
|
|
| ERR | ;;Invalid or missing patient ID data for encounter (HL7 PID data segment)
|
|
| 22 | ;;2380;ETHNICITY
|
|
| 0 | ;;0035;HL7 SEGMENT NAME
|
|
| 3 | ;;2030;PATIENT ID (INTERNAL)
|
|
| 1112 | ;;2280;ADDRESS START/STOP DATE
|
|
| 5 | ;;2000;NAME
|
|
| 7 | ;;2050;DATE OF BIRTH
|
|
| 8 | ;;2100;SEX
|
|
| ENQ | ||
| 10 | ;;2150;RACE
|
|
| EN(PIDSEG,HLQ,HLFS,HLECH,VALERR,ENCDT,EVNTHL7) | ;
; Entry point to return the HL7 PID (Patient ID) validation segment |
|
| 17 | ;;2330;RELIGION
|
|
| 16 | ;;2300;MARITAL STATUS
|
|
| 19 | ;;2360;SSN
|
|
| 1107 | ;;2270;ADDRESS TYPE
|
|
| 1104 | ;;2230;STATE
|
|
| 1105 | ;;2240;ZIP CODE
|
|
| 1102 | ;;2210;STREET ADDRESS 2
|
|
| 1103 | ;;2220;CITY
|
|
| 1101 | ;;2200;STREET ADDRESS 1
|
|
| 1109 | ;;2250;COUNTY CODE
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(5 - [#5] | ADDRCHK+32 |
| ^TMP("SCMSVPID" | EN+19, EN+47, ADDRCHK+5 |
| Name | Line Occurrences |
|---|---|
| 0 | EN+40 |
| ADDRCHK | EN+44 |
| ENQ | EN+32 |
| >> | 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 |