ABL3 (148)    AUTO INSTRUMENT (62.4)

Name Value
NAME ABL3
METHOD ABL3
OVERLAY DATA YES
PROGRAM LAABL3
NEW DATA D NEW^LASET
RESTART D RESTART^LASET
LABORATORY TESTS
  • TEST:   PT. TEMP
    ROUTINE STORAGE:   TV(456,1)
    PARAM 1:   S X="TEMP",V=$S($D(Y(X)):$E(Y(X),7,14),1:"")
  • TEST:   O2CT.
    ROUTINE STORAGE:   TV(449,1)
    PARAM 1:   S X="SAT",V=$S($D(Y(X)):$E(Y(X),7,14),1:"")
  • TEST:   HB (HGB)
    ROUTINE STORAGE:   TV(445,1)
    PARAM 1:   S X="HB",V=$S($D(Y(X)):$E(Y(X),7,14),1:"")
  • TEST:   PH
    ROUTINE STORAGE:   TV(450,1)
    PARAM 1:   S X="PH",V=$S($D(Y(X)):$E(Y(X),7,14),1:"")
  • TEST:   PCO2
    ROUTINE STORAGE:   TV(451,1)
    PARAM 1:   S X="PCO2",V=$S($D(Y(X)):$E(Y(X),7,14),1:"")
  • TEST:   PO2
    ROUTINE STORAGE:   TV(452,1)
    PARAM 1:   S X="PO2",V=$S($D(Y(X)):$E(Y(X),7,14),1:"")
  • TEST:   BICARBONATE (SBC)
    ROUTINE STORAGE:   TV(454,1)
    PARAM 1:   S X="SBC",V=$S($D(Y(X)):$E(Y(X),7,14),1:"")
  • TEST:   CO2CT. (TCO2)
    ROUTINE STORAGE:   TV(455,1)
    PARAM 1:   S X="TCO2",V=$S($D(Y(X)):$E(Y(X),7,14),1:"")
  • TEST:   BASE EXCESS
    ROUTINE STORAGE:   TV(453,1)
    PARAM 1:   S X="ABE",V=$S($D(Y(X)):$E(Y(X),7,14),1:"")
  • TEST:   O2HB% (SAT)
    ROUTINE STORAGE:   TV(446,1)
    PARAM 1:   S X="SAT",V=$S($D(Y(X)):$E(Y(X),7,14),1:"")
ENTRY for LAGEN ROUTINE Accession cross-reference
CROSS LINKED BY IDE
INTERFACE NOTES
Uses Param 1 to extract the data.
S X="TEST",V=$S($D(Y(X)):$E(Y(X),7,14),1:"") S:Y(#)["?" V=""
where TEST is the test name transmitted by the instrument.
*ECHO ALL INPUT YES