Routine: LARAPMT

Information

LARAPMT ; IHS/DIR/FJE - RAPIMAT URINE PAD ROUTINE 7/20/90 10:04 ;

Source file <LARAPMT.m>

Package	Total	Call Graph
Automated Lab Instruments	3	SET^LAB ^LABERR (,RMK)^LASET

Name	Comments	DBIA/ICR reference
QUIT
APPEAR	;THIS AREA SETS THE VALUE FOR URINE APPEARANCE
COLOR	;THIS AREA SETS THE VALUES FOR URINE COLOR
RNUM	;PUT TOGETHER EXPONENT AND VALUE OF TEST DCN/BUF 31 AUG 87
MICRO	;THIS SECTION IS USED TO DETERMINE MICROSCOPIC VALUES
QC	;QC TESTING HERE; S BAD=1 IF DONT STORE
NUM
TRAP
IN
X
LA1
LA2
LA3

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!

Name	Field # of Occurrence
^(	IN, IN+1

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