GMTSLRTE ; SLC/JER,KER - Transfusion Record Extract Routine ; 01/06/2003
Source file <GMTSLRTE.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| XTRCT | ; Extract Transfusion Records | |
| SET | ; Save Appropriate Data | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DPT - [#2] | XTRCT+4 | 
| ^LAB(66 - [#66] | XTRCT+11 | 
| ^LR - [#63] | XTRCT+5, XTRCT+6, XTRCT+7 | 
| ^TMP("LRT" | XTRCT+3!, XTRCT+9*, XTRCT+11*, XTRCT+12* | 
| Name | Line Occurrences | 
|---|---|
| SET | XTRCT+7 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| CNTR | XTRCT+1~ | 
| CNTR( | XTRCT+8, XTRCT+10, XTRCT+12, SET+3* | 
| COMP | SET+1~ | 
| >> DFN | XTRCT+4 | 
| >> GMTS1 | XTRCT+2*, XTRCT+4, XTRCT+6 | 
| >> GMTS2 | XTRCT+2*, XTRCT+6 | 
| IDT | XTRCT+1~, XTRCT+4*, XTRCT+6*, XTRCT+7, XTRCT+8*, XTRCT+9, XTRCT+10, XTRCT+12, SET+1 | 
| ITDT | SET+1~*, SET+3 | 
| LRDFN | XTRCT+1~, XTRCT+4*, XTRCT+5, XTRCT+6, XTRCT+7 | 
| PN | XTRCT+1~, XTRCT+10*, XTRCT+11, XTRCT+12 | 
| PRODUCT | XTRCT+1~, XTRCT+11*, XTRCT+12 | 
| TDT | SET+1~* | 
| TR | XTRCT+1~, XTRCT+7*, SET+2, SET+3 | 
| U | XTRCT+9, XTRCT+11, XTRCT+12, SET+2, SET+3 | 
| UNITS | SET+1~, SET+2*, SET+3 |