BIOH KEYPAD (141)    AUTO INSTRUMENT (62.4)

• TEST:   SEGS
  ROUTINE STORAGE:   TV(394,1)
  PARAM 1:   S V=$E(Y(1),4,5) D NUM S:'V V=""
• TEST:   PROS
  ROUTINE STORAGE:   TV(402,1)
  PARAM 1:   S V=$E(Y(4),4,5) D NUM S:'V V=""
• TEST:   BLASTS
  ROUTINE STORAGE:   TV(403,1)
  PARAM 1:   S V=$E(Y(4),15,16) D NUM S:'V V=""
• TEST:   NUCLEATED RBC/100WBC
  ROUTINE STORAGE:   TV(404,1)
  PARAM 1:   S V=$E(Y(4),26,27) D NUM S:'V V=""
• TEST:   ANISOCYTOSIS
  ROUTINE STORAGE:   TV(408,1)
  PARAM 1:   S V=$S($D(TY(170)):TY(170),1:"") D CODE:V'=""
• TEST:   BASOPHILIC STIPPLING
  ROUTINE STORAGE:   TV(474,1)
  PARAM 1:   S V=$S($D(TY(190)):TY(190),1:"") D CODE:V'=""
• TEST:   PLT (ESTM)
  ROUTINE STORAGE:   TV(405,1)
  PARAM 1:   S V=$S($D(TY(530)):TY(530),1:"") D CODE:V'=""
• TEST:   OTHER
  ROUTINE STORAGE:   TV(780,1)
  PARAM 1:   I $D(TY(1)) S RMK=RMK_"RBC NORM, PLAT NORM; " K V
• TEST:   OTHER
  ROUTINE STORAGE:   TV(780,1)
  PARAM 1:   I $D(TY(160)) S V=TY(160) D CODE S RMK=RMK_"ACANTHOCYTE, "_V_"; " K V
• TEST:   BANDS
  ROUTINE STORAGE:   TV(395,1)
  PARAM 1:   S V=$E(Y(1),15,16) D NUM S:'V V=""
• TEST:   LYMPHS
  ROUTINE STORAGE:   TV(396,1)
  PARAM 1:   S V=$E(Y(1),26,27) D NUM S:'V V=""
• TEST:   MONOS
  ROUTINE STORAGE:   TV(397,1)
  PARAM 1:   S V=$E(Y(2),4,5) D NUM S:'V V=""
• TEST:   EOSINO
  ROUTINE STORAGE:   TV(398,1)
  PARAM 1:   S V=$E(Y(2),15,16) D NUM S:'V V=""
• TEST:   BASO
  ROUTINE STORAGE:   TV(399,1)
  PARAM 1:   S V=$E(Y(2),26,27) D NUM S:'V V=""
• TEST:   META
  ROUTINE STORAGE:   TV(400,1)
  PARAM 1:   S V=$E(Y(3),4,5) D NUM S:'V V=""
• TEST:   MYELO
  ROUTINE STORAGE:   TV(401,1)
  PARAM 1:   S V=$E(Y(3),15,16) D NUM S:'V V=""
• TEST:   ATYPICAL LYMPHOCYTES
  ROUTINE STORAGE:   TV(471,1)
  PARAM 1:   S V=$E(Y(3),26,27) D NUM S:'V V=""

The program LABIOH is used with the Biovation keypads with or without
Param 1:  S V=$E(Y(2),4,5) D NUM S:'V V=""
This value is assigned the 4th thru 5th characters of the
2nd line of the transmitted results.
 
Morphology results may be assigned to tests or may be put in as comments.
Example: for the test HYPOCHROMIA.
Param 1:  S V="" I $D(TY(140)) S V=TY(140) D CODE
where 14 is the first 2 digits of the code for the test HYPOCHROMIA.
The 3rd digit of the entered code will determine the degree of the result.
If there is no entry in Param 3 the default will use
the keypad being interfaced to a hematology instrument.
'Noted$1+$2+$3+$4+$Rare$Occ$Few$Mod$Many'
(degree 0 gives a result of 'Noted', 1 gives a result of 1+, ...)
 
Example: if the code entered is '143' and Param 3 is
Noted$Slight$Mod$Marked the result would be 'Marked'.  If Param 3 did not
have an entry the result would be '3+'.
 
Coded Comments:  Comments may be entered by using the test, 'OTHER'.
(to enter more than one test, 'OTHER', enter it in quotes)
 
Use Model 1300 format #6 if not interfaced to a cell counter.
Comment without degrees:
Example (Param 1):  S V="" I $D(TY(5)) S RMK=RMK_"CLOTTED; " K V
where 5 is the code for the comment 'CLOTTED; '.  The code # must be <99
and may be dependent on what the instrument is able to transmit.  The
comment will string together any other comments, hence the reason for
ending the comment with a "; ".  Since a value is not being assigned to
the test 'OTHER', the variable 'V' is killed.
 
Comment with a degree:
Example:
Use Model 1320 format #3 if interfaced to a cell counter.
Param 1:
I $D(TY(250)) S V=TY(250) D CODE S RMK=RMK_"Dohle Bodies, "_V_"; " K V
Param 3:
Rare$Occ$Sl$Mk
where 25 is the first 2 digits of the code for the comment 'Dohle Bodies'
and V is the degree of the comment.  If 252 was entered, the comment
would be 'Dohle Bodies, Sl; '.  If Param 3 was not entered, the comment
would be 'Dohle Bodies, 2+; '.
 
The field 'LOAD CHEM TESTS' should be set to 'U' if you have many comment
Param 1 is used to extract the results for the test.
entries.  This will avoid possible store errors.
Param 3 is optional and may be used to define the vocabulary for reporting.
 
Example:
for the test MONOS