LARAPMT ;SLC/DLG - RAPIMAT URINE PAD ROUTINE ;7/20/90 10:04 ;
Source file <LARAPMT.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
LA1 | ||
LA2 | ||
X | ||
LA3 | ||
QC | ;QC TESTING HERE; S BAD=1 IF DONT STORE
|
|
NUM | ||
IN | ||
QUIT | ||
TRAP | ||
RNUM | ;PUT TOGETHER EXPONENT AND VALUE OF TEST DCN/BUF 31 AUG 87
|
|
COLOR | ;THIS AREA SETS THE VALUES FOR URINE COLOR
|
|
APPEAR | ;THIS AREA SETS THE VALUE FOR URINE APPEARANCE
|
|
MICRO | ;THIS SECTION IS USED TO DETERMINE MICROSCOPIC VALUES
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("TRAP" | LA1+3 |
^LA( | LA1+1, X*, IN, IN+1*, QUIT! |
^LA("LOCK" | QUIT! |
^LAB(62.4 - [#62.4] | LA1 |
^LAH( | LA3+1* |
^TMP("LA" | QUIT! |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> A | LA2*, LA2+3*, X*, MICRO+2, MICRO+3, MICRO+4, MICRO+5 |
>> BAD | LA2+1* |
>> CNT | X, IN*, IN+1 |
>> CUP | LA2+2*, LA2+3 |
>> EXP | RNUM+2* |
>> FACTOR | RNUM+2*, RNUM+3 |
>> I | LA3+1* |
>> ID | LA2+2* |
>> IDE | LA2+2* |
>> IN | LA2+2, LA2+3, QC+1, IN*, IN+1* |
>> ISQN | LA3, LA3+1 |
>> JJ | NUM* |
>> LAGEN | LA3 |
>> LALCT | LA1+3* |
>> LANM | LA1*, LA1+3, TRAP |
LATOP | LA1+3! |
>> LWL | LA3+1 |
MICFLAG | LA2!, LA3+2, APPEAR+1* |
>> MISCREEN | LA1+2*, LA3+2 |
>> RMK | LA2*, LA3+2*, LA3+3 |
>> T | TRAP* |
>> TC( | X |
>> TN | QC+1* |
>> TOUT | LA2*, LA2+1*, IN*, IN+1* |
>> TRAY | LA2+2* |
>> TSK | LA1*, LA1+1, LA1+3, X, IN, IN+1, QUIT, TRAP |
TV | LA2! |
TV( | LA3+1 |
TY | LA2! |
>> V | LA2+2*, X, QC+1*, NUM, NUM+1*, RNUM+1, RNUM+2, RNUM+3*, COLOR+1*, APPEAR+1* , MICRO+1*, MICRO+2*, MICRO+3*, MICRO+4*, MICRO+5* |
>> X | LA1+3*, X*, NUM*, NUM+1, COLOR+1, APPEAR+1, MICRO+1, MICRO+2, MICRO+3, MICRO+4 , MICRO+5 |
Y | LA2! |
Y( | X, QC+1* |
>> ZTQUEUED | LA1 |
>> ZTREQ | LA1* |
Name | Field # of Occurrence |
---|---|
$T( | LA1 |