LRO2 ;SLC/DCM - Being replaced ;1/10/91  16:01 ;
 ;;5.2;LAB SERVICE;;Sep 27, 1994
EN2 ;;Entry point for OTHER LAB TESTS *THIS ROUTINE IS BEING PHASED OUT*
 G ONE^LRXO1
EN1 ;;
 W !!,$C(7),"EN1^LRO2 is no longer in use.  Remove all calls to this entry point",!
 Q
 
--- Routine Detail   --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HLRO2   269     printed  Sep 23, 2025@19:54                                                                                                                                                                                                            Page 2
LRO2      ;SLC/DCM - Being replaced ;1/10/91  16:01 ;
 +1       ;;5.2;LAB SERVICE;;Sep 27, 1994
EN2       ;;Entry point for OTHER LAB TESTS *THIS ROUTINE IS BEING PHASED OUT*
 +1        GOTO ONE^LRXO1
EN1       ;;
 +1        WRITE !!,$CHAR(7),"EN1^LRO2 is no longer in use.  Remove all calls to this entry point",!
 +2        QUIT