; from LRTT5
; return for reg & irreg: # tests, total time, bad turnaround time
; input:
; ^TMP("LRTT5",$J,"TESTS",tests)=test names
; LRPQ("URGENCY",urgencies)=urgency names
; LRSDT, LREDT, LRPDET
; output:
; ^TMP("LR",$J,"REG")=#tests^total time
; ^TMP("LR",$J,"REG",TAT,#)=acc^test^in^out
; ^TMP("LR",$J,"REGT",test)=#tests^total time
; ^TMP("LR",$J,"IRREG")=#tests^total time
; ^TMP("LR",$J,"IRREG",TAT,#)=acc^test^in^out
; ^TMP("LR",$J,"IRREGT",test)=#tests^total time
; ^TMP("LR",$J,"BAD",TAT,#)=acc^test^in^out