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 |