XUHUIHL7 ;OAKCIOFO/JG - HL7 GENERATION ROUTINE [ 07/29/2004 9:01 AM ]
Source file <XUHUIHL7.m>
| Package | Total | Call Graph |
|---|---|---|
| Health Level Seven | 2 | INIT^HLFNC2 GENERATE^HLMA |
| Kernel | 1 | ($$FMTHL7,$$NOW)^XLFDT |
| VA Fileman | 1 | $$GET1^DIQ |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| F200 | ; NEW PERSON file was updated
; XUHUIX2(1)=NAME ; XUHUIX2(2)=TERMINATION DATE ; XUHUIX2(3)=DOB ; XUHUIX2(4)=SSN ; XUHUIDA=file 200 ien |
|
| SENDMSG | ; initialize HL variables
|
|
| FKEY | ; PROVIDER key was updated
; XUHUIDA(1)=file 200 ien ; XUHUIA= S or K |
| Name | Line Occurrences |
|---|---|
| F200 | XUHUIHL7+29 |
| FKEY | XUHUIHL7+30 |
| SENDMSG | XUHUIHL7+32 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACTIVE | XUHUIHL7+27~, F200+9*, FKEY+6*, SENDMSG+15 |
| DOB | XUHUIHL7+27~, F200+13*, F200+14*, FKEY+12*, FKEY+13*, SENDMSG+15 |
| HL | SENDMSG+1~, SENDMSG+2, SENDMSG+3, SENDMSG+17 |
| HL("ECH" | SENDMSG+6 |
| HL("FS" | SENDMSG+5 |
| >> HLA("HLS" | SENDMSG+11*, SENDMSG+13*, SENDMSG+15* |
| >> HLCS | SENDMSG+6*, SENDMSG+13, SENDMSG+15 |
| >> HLFS | SENDMSG+5*, SENDMSG+11, SENDMSG+13, SENDMSG+15 |
| >> IEN | F200+7*, FKEY+4*, FKEY+8, FKEY+10, FKEY+12, FKEY+14, SENDMSG+13, SENDMSG+15 |
| NAME | XUHUIHL7+27~, F200+11*, FKEY+8*, FKEY+9*, SENDMSG+15 |
| NOW | SENDMSG+1~, SENDMSG+9*, SENDMSG+11 |
| RESULT | SENDMSG+1~, SENDMSG+17, SENDMSG+18 |
| SSN | XUHUIHL7+27~, F200+12*, FKEY+10*, FKEY+11*, SENDMSG+15 |
| TERMDATE | XUHUIHL7+27~, F200+15*, F200+16*, FKEY+14*, FKEY+15*, SENDMSG+15 |
| U | SENDMSG+18 |
| >> XUHUIA | FKEY+6 |
| >> XUHUIDA | F200+7 |
| >> XUHUIDA(1 | FKEY+3, FKEY+4 |
| XUHUIERR | XUHUIHL7+27~, XUHUIHL7+31, F200+6*, FKEY+3*, SENDMSG+4*, SENDMSG+19* |
| >> XUHUIX2 | F200+6 |
| >> XUHUIX2(1 | F200+11 |
| >> XUHUIX2(2 | F200+9, F200+15 |
| >> XUHUIX2(3 | F200+13 |
| >> XUHUIX2(4 | F200+12 |
| >> XUHUIXR | XUHUIHL7+28, XUHUIHL7+29, XUHUIHL7+30 |