Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points
Print Page as PDF
Routine: LRTT5P1

Package: Lab Service

Routine: LRTT5P1


Information

LRTT5P1 ;DALOI/FHS - LAB URGENCY TURNAROUND TIMES PROCESSOR ;02/28/12 19:45

Source Information

Source file <LRTT5P1.m>

Entry Points

Name Comments DBIA/ICR reference
ONE ; 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
START ; go thru tests
CLEAN
SAVE(LRPUTYPE) ; collect reg, irreg, and bad
DIFF(LRPUT1,LRPUT2) ; $$(time1,time2) -> difference in min
Info |  Source |  Entry Points