VAFHUTL9 ;ALB/RJS - UTILTIES FOR ADT/R HL7 INTERFACE - 6/15/95
Source file <VAFHUTL9.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SEG(SEGMENT,PIECE,CODE) | ;Return segment from VADC array and kill node
|
|
| SSNDFN(SSN) | ;Input ssn output DFN
|
|
| INITIZE(HLDA) | ;Initialize VADC array with incoming message
|
|
| INIT1 | ;
|
|
| SEG1(SEGMENT,PIECE,CODE) | ;Return segment from VADC array
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT("SSN" | SSNDFN+2, SSNDFN+4 |
| ^HL(772 - [#772] | INITIZE+2, INITIZE+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CODE | SEG~, SEG+5, SEG1~ |
| >> DFN | SSNDFN+2*, SSNDFN+3, SSNDFN+4*, SSNDFN+5 |
| HLDA | INITIZE~, INITIZE+2, INITIZE+3 |
| >> HLFS | SEG+5, SEG1+5 |
| >> HLNEXT | INIT1+1 |
| >> HLNODE | INIT1+1 |
| >> HLQUIT | INIT1+1 |
| >> I | INIT1+1* |
| PIECE | SEG~, SEG+5, SEG1~ |
| SEGMENT | SEG~, SEG+5, SEG1~, SEG1+5 |
| SSN | SSNDFN~, SSNDFN+1, SSNDFN+2, SSNDFN+4 |
| >> VAC | SEG+5 |
| VADATA | SEG+1~, SEG+4*, SEG+5, SEG+6, SEG1+1~, SEG1+4*, SEG1+5, SEG1+6 |
| >> VADC | INIT1+2* |
| >> VADC( | SEG+3, SEG+4, SEG+5!, SEG1+3, SEG1+4, INITIZE+3* |
| VADONE | SEG+1~!, SEG+3, SEG+5*, SEG+6, SEG1+1~!, SEG1+3, SEG1+5*, SEG1+6 |
| VANODE | SEG+1~, SEG+2*, SEG+3*, SEG+4, SEG+5, SEG1+1~, SEG1+2*, SEG1+3*, SEG1+4, INITIZE+1~* , INITIZE+2*, INITIZE+3 |
| >> X | INIT1+2 |
| >> X( | INIT1+1* |