VBECDCX1 ;hoifo/gjc-data conversion & pre-implementation data extract;Nov 21, 2002
Source file <VBECDCX1.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Name | Comments | DBIA/ICR reference |
---|---|---|
ANTIAB | ;save off totals of ANTIBODIES IDENTIFIED, ANTIBODIES IDENTIFIED
|
|
TRDTAB | ;tabulate the number of transfusion date/time and transfusion reaction
|
|
TRCMNT | ;tabulate the number of transfusion comments and the total number of
|
|
BBC(DFN,LRDFN) | ; extract 'BLOOD BANK COMMENTS' data from the legacy
; Blood Bank application. The first node will have the timestamp ; (date) of when the comments were most recently edited. ; Input: DFN=patient DFN ; LRDFN=lab patient ien in the Lab Data (#63) file |
|
STRIP(X) | ;strip leading and trailing spaces from a data string.
; input: string to be checked for leading and trailing spaces |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^LR - [#63] | BBC+5, BBC+10, BBC+11 |
^TMP("VBEC FINIS" | ANTIAB+5*, ANTIAB+7*, ANTIAB+9*, TRDTAB+2*, TRDTAB+3*, TRCMNT+3*, BBC+17*, BBC+18*, BBC+23*, BBC+25* |
^TMP("VBEC63 BBC" | BBC+20* |
Name | Line Occurrences |
---|---|
$$STRIP | BBC+15 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CNT | BBC+19*, BBC+20*, BBC+27! |
DFN | BBC~, BBC+16 |
I | BBC+27! |
LRBBCDT | BBC+5*, BBC+6*, BBC+7*, BBC+8*, BBC+9*, BBC+16, BBC+27! |
LRD | ANTIAB+5, ANTIAB+6, ANTIAB+9, TRDTAB+2, TRDTAB+3, BBC+11*, BBC+13*, BBC+15*, BBC+16, BBC+18 , BBC+23, BBC+27! |
LRD1 | BBC+5*, BBC+10*, BBC+11, BBC+16, BBC+27! |
LRDFN | BBC~, BBC+5, BBC+10, BBC+11, BBC+16 |
>> LRPCE | ANTIAB+5, ANTIAB+7, ANTIAB+9 |
LRSTR | BBC+16*, BBC+20, BBC+27! |
>> LRTRCMT | TRCMNT+3 |
U | ANTIAB+5, ANTIAB+6, ANTIAB+7, ANTIAB+9, TRDTAB+2, TRDTAB+3, TRCMNT+3, BBC+5, BBC+16, BBC+17 , BBC+18, BBC+23, BBC+25 |
>> VBECRTOT | ANTIAB+5, ANTIAB+7, ANTIAB+9, TRDTAB+2, TRDTAB+3, TRCMNT+3, BBC+17, BBC+18 |
>> VBECTOT("VBEC | 63 BBC" , BBC+21* |
X | STRIP~, STRIP+4*, STRIP+6*, STRIP+7 |
Z | BBC+5*, BBC+15*, BBC+17, BBC+25, BBC+27! |