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 |