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 |  Interaction Calls
Print Page as PDF
Routine: LRDIST1

Package: Lab Service

Routine: LRDIST1


Information

LRDIST1 ;DALOI/CJS/JMC/RLM-DATA DISTRIBUTION ;2/5/91 13:00

Source Information

Source file <LRDIST1.m>

Entry Points

Name Comments DBIA/ICR reference
Q2A
Q2C
LRSTEPS
Q4
WAIT
EX

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"No reference range is available"
  • Line Location: Q2C+5
Function Call: WRITE
  • Prompt: !,LRCHM,?19," ",PNM,?49," ",SSN,?69," ",LRDT0
  • Line Location: LRSTEPS+1
Function Call: WRITE
  • Prompt: !
  • Line Location: LRSTEPS+4
Function Call: WRITE
  • Prompt: "UNITS: ",$P(X,U,7)
  • Condition for execution: $L($P(X,U,7))
  • Line Location: LRSTEPS+4
Function Call: WRITE
  • Prompt: ?30,"CRITICAL LOW: ",@$P(X,U,4)
  • Condition for execution: $L($P(X,U,4))
  • Line Location: LRSTEPS+4
Function Call: WRITE
  • Prompt: ?55,"CRITICAL HIGH: ",@$P(X,U,5)
  • Condition for execution: $L($P(X,U,5))
  • Line Location: LRSTEPS+4
Function Call: WRITE
  • Prompt: !,"DATE VALUE ",$S(LRCTRL:"-3SD",1:"LOW")
  • Line Location: LRSTEPS+5
Function Call: WRITE
  • Prompt: $J(LRNEX,10,3)
  • Line Location: LRSTEPS+5
Function Call: WRITE
  • Prompt: " ",$S(LRCTRL:"+3SD",1:"HIGH")
  • Line Location: LRSTEPS+6
Function Call: WRITE
  • Prompt: !,"Target: mean=",$J(LREM,6,3)," 1 SD=",$J(LRESD,6,3)," 1 CV=",$J(LRECV,6,3)
  • Line Location: Q4+0
Function Call: WRITE
  • Prompt: !,"Actual: mean=",$J(%X,6,3)," 1 SD=",$J(LRSD,6,3)," 1 CV=",$J(LRCV,6,3),!,"N=",LRNC,!,"CAUTION: Time scale is sequential, not proportional.",!!
  • Line Location: Q4+1
Function Call: WRITE
  • Prompt: !
  • Line Location: Q4+2
Function Call: WRITE
  • Prompt: !,"FLAG ACCESSION VALUE OUTSIDE 2SD",?46,"3SD"
  • Line Location: Q4+3
Function Call: WRITE
  • Prompt: !,I,?7,^TMP("LR",$J,"X",LRFOOT(I),4)
  • Line Location: Q4+3
Function Call: WRITE
  • Prompt: !,I,?7,^TMP("LR",$J,"X",LRFOOT(I),4)
  • Line Location: Q4+3
Function Call: WRITE
  • Prompt: !!,"Reviewed by: ____________________________ Date: __________"
  • Line Location: Q4+4
Function Call: READ
  • Formatting: !
  • Prompt: "PRESS '^' TO STOP "
  • Variable: X
  • Timeout: DTIME
  • Line Location: WAIT+0
Function Call: WRITE
  • Prompt: !?12,^(J)
  • Line Location: EX+0
Info |  Source |  Entry Points |  Interaction Calls