FSCQSL ;SLC/STAFF-NOIS Query Search Less Than ;1/11/98 15:50 ;;1.1;NOIS;;Sep 06, 1998 ; LT ; from FSCQS I LIST=1 D Q .S NODE=+$P(CODE,";"),PIECE=$P(CODE,";",2) .S CALL=0 F S CALL=$O(^TMP("FSC USELIST",$J,CALL)) Q:CALL<1 D ..S CVALUE=$P($G(^FSCD("CALL",CALL,NODE)),U,PIECE) I $L(CVALUE),CVALUE