LAMIVTLP ;VA/DALISC/PAC - VITEK MICRO DATA LITERAL PARSER; 5-24-95;
Source file <LAMIVTLP.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
CID | ||
READ | ;
|
|
PD(INPD,DELIM) | ; patient demographics
|
|
ERR(ERTYPE) | ;
|
|
CI(INTD,DELIM) | ; exam info, id etc
|
|
HEX(HEX) | ;
|
|
LA1 | ||
LA2 | ||
LA3 | ||
RTD | ||
PID | ||
RT(INTR,DELIM) | ; results including tests organism, drugs etc.
|
|
COMMA | ||
SID | ||
OUT | ||
AGAIN | ;store records in array
|
|
L | ||
ADD | ;
|
|
IN | ||
QUIT | ||
SI(INSD,DELIM) | ; specimen demographics
|
|
CHK(XX) | ;
|
|
PARSE | ;create separate arrays pat demographics, tests, results, etc.
|
|
TRAP | ||
BLANKS(XX) | ;
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("TRAP" | LA1+2 |
^LA( | LA1+1, IN, IN+1, IN+3*, OUT, QUIT, QUIT+1, QUIT+2, QUIT+3!, ERR+3 , ERR+4 |
^LA("LOCK" | QUIT+3! |
^LA("Q" | OUT+1 |
^LA("VITEK" | LA2+7 |
^LAB(61.38 - [#61.38] | LA2+13 |
^LAB(62.4 - [#62.4] | LA1 |
^LRO(68 - [#68] | LA2+15 |
^TMP("LA" | QUIT+3!, ERR+3* |
^TMP("VITEK" | LA1+7!, IN+4*, ERR+4* |
^TMP($J | QUIT+3! |
Name | Line Occurrences |
---|---|
$$BLANKS | PD+3, SI+3, CI+3, RT+2, COMMA+6 |
$$CHK | READ+2 |
$$HEX | READ+4 |
@( | TRAP |
ADD | PID, SID, CID, RTD |
AGAIN | LA2+5, READ+7 |
CI | CID |
CID | CID |
COMMA | RT+3 |
IN | LA2+3, READ+3, READ+7, IN+1 |
L | L |
LA2 | LA2+3, LA2+4, LA2+5, LA2+6, LA3+2, LA3+5, QUIT, QUIT+1 |
PARSE | LA2+6 |
PD | PID |
PID | PID |
QUIT | LA2+3 |
RT | RTD |
RTD | RTD, RTD+2 |
SI | SID |
SID | SID |
Name | Field # of Occurrence |
---|---|
^( | IN+3 |
^("O" | OUT* |
^("Q" | OUT+1* |
^(1 | LA2+13 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> A4 | LA1+4* |
>> CI | LA1+3*, LA2+6, LA2+8, SID |
>> CNT | IN*, IN+1, IN+3, IN+4, OUT*, ERR+2 |
DELIM | PD~, PD+4, SI~, SI+2, CI~, CI+2, RT~, RT+2 |
>> DHZGEN | LA3*, LA3+2 |
>> END | PARSE+1*, PID, PID+1, SID, SID+1, CID, CID+1, RTD, RTD+1, ADD+1 , PD+2, PD+5*, SI+2, SI+3*, CI+2, CI+3*, RT+2*, RT+12 |
>> ERR | LA2+1*, LA2+5, ERR+5* |
ERTYPE | ERR~, ERR+3 |
>> FIN | PARSE+1*, RTD+2, ADD+2, ADD+8*, RT+12* |
>> GN | COMMA+2*, COMMA+3 |
HEX | HEX~, HEX+1, HEX+2 |
I | CHK+1~, CHK+2*, CHK+3, BLANKS+1~, BLANKS+2*, BLANKS+4 |
>> ID | LA2+8*, LA2+15, LA2+16*, LA3 |
>> IDE | LA3* |
>> II | PARSE+1*, PARSE+2, ADD+3, ADD+4*, ADD+5, ADD+6, ADD+7, ADD+8, RT+12 |
>> IN | LA2+3, LA2+4, READ+2, READ+3, IN+3*, IN+4 |
INPD | PD~, PD+2, PD+3, PD+5, PD+8 |
INSD | SI~, SI+2, SI+3, SI+6 |
>> INT | PARSE+1*, PARSE+2*, PARSE+3*, PID, SID, CID, RTD, ADD+2, ADD+5*, ADD+6* , ADD+7*, PD+8*, SI+6*, CI+7*, RT+11* |
INTD | CI~, CI+2, CI+3, CI+7 |
INTR | RT~, RT+1, RT+2, RT+11 |
>> ISQN | LA3+2 |
J | PD+2*, PD+3, PD+5, SI+2*, SI+3, CI+2*, CI+3, RT+2*, RT+11, BLANKS+1~ , BLANKS+3*, BLANKS+4 |
>> L | RT+1*, RT+2, RT+11, COMMA+3*, COMMA+4 |
>> LABGNODE | LA1+6* |
>> LABUG | LA1+4* |
LACI | LA2!, PARSE+4!, CI+3*, CI+4, CI+5, CI+6, CI+7 |
LACI( | LA2+6, LA2+8, CI+6* |
>> LACOUNT | LA1+6* |
LADD | HEX+2~, L, L+1* |
LADH | HEX+2~*, L*, L+2 |
LADN | HEX+2~*, L, L+1* |
>> LADRUG | LA1+4* |
>> LADT | LA2+15 |
>> LAHEX | READ+4*, READ+5*, ERR+4 |
LAIN | LA2!, LA2+1*, READ+1*, READ+2, ADD+3, ADD+8, RT+12, ERR+2 |
LAIN( | READ+2*, PARSE+2, ADD+5, ADD+6, ADD+7 |
>> LAMIC | LA1+4* |
>> LAMULTST | COMMA* |
>> LANM | LA1*, LA1+2, TRAP |
>> LANTIB | LA1+6* |
LAPD | LA2!, PARSE+4!, PD+3*, PD+4, PD+5*, PD+6, PD+7, PD+8 |
LAPD( | PD+7* |
LART | LA2!, PARSE+4!, RT+2*, RT+3, RT+4, RT+5, RT+8, RT+10, COMMA+2, COMMA+4 |
LART( | RT+10*, COMMA+6* |
LART("a3" | RT+7 |
LART("a4" | RT+7* |
>> LARTGN | COMMA+4*, COMMA+6 |
LARTX | LA2!, PARSE+4! |
LARTX( | RT+9*, RT+10, COMMA+5*, COMMA+6 |
LARTX("a4" | RT+6*, RT+7 |
LASI | LA2!, PARSE+4!, SI+3*, SI+4, SI+5, SI+6 |
LASI( | SI+5* |
>> LASUM | LA2+1*, READ+2*, READ+4, ERR+4 |
LATOP | LA1+2! |
LL | ERR+1~, ERR+2*, ERR+3, ERR+4 |
>> LROVER | LA1+2*, LA3+1* |
>> LRPREFIX | LA2+13*, LA2+14 |
>> MTRSL | LA1+3*, LA2+3, PARSE+3 |
>> OUT | OUT |
>> PI | LA1+3* |
>> Q | OUT+1* |
>> RT | LA1+3*, CID |
>> SC | RT+5, RT+8*, RT+9, RT+10, COMMA, COMMA+1, COMMA+5, COMMA+6 |
>> SI | LA1+3*, PID |
>> T | TRAP* |
>> TERM | PARSE+1*, PID, SID, CID, RTD, RTD+2, PD+1*, PD+2, PD+4*, SI+1* , SI+2*, CI+1*, CI+2*, RT+1* |
>> TOUT | LA2+1*, LA2+3, IN+1*, IN+3* |
>> TSK | LA1*, LA1+1, LA1+2, IN, IN+1, IN+3, OUT, OUT+1, QUIT, QUIT+1 , QUIT+2, QUIT+3, TRAP, ERR+3, ERR+4 |
U | LA1+3*, ERR+4 |
>> WL | LA2+15 |
X | LA1+2*, CHK+1~*, CHK+3*, CHK+4 |
XX | CHK~, CHK+1*, CHK+2, CHK+3, BLANKS~, BLANKS+2, BLANKS+3, BLANKS+4 |
>> ZZ | LA1+3*, RTD, PD+5, SI+3, CI+3 |
Name | Field # of Occurrence |
---|---|
$T( | LA1 |