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: LRARCR4

Package: Lab Service

Routine: LRARCR4


Information

LRARCR4 ;DALISC/CKA - WKLD REP GENERATOR-UTILITIES ;

Source Information

Source file <LRARCR4.m>

Entry Points

Name Comments DBIA/ICR reference
BLDHDR ;
ADDHDR(LRARY,LRTITLE,LRCODSTR) ;
REPHDR ;
HDR ;
SUBH ;
UP ;
UP1 ;
HDR1 ;
HDR2 ;
PAUSE ;
CLEAN ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!!!!,$E(LRSTR,1,30)_$S(LRANS="D":" D E T A I L E D *",1:" C-O-N-D-E-N-S-E-D ")_$E(LRSTR,1,31)
  • Line Location: REPHDR+1
Function Call: WRITE
  • Prompt: !,LRSITE_"("_LRSITNUM_")",?33,"Workload Report"
  • Line Location: REPHDR+2
Function Call: WRITE
  • Prompt: ?53,LRDT,?80-(6+$L(LRPG)),"page ",LRPG
  • Line Location: REPHDR+3
Function Call: WRITE
  • Prompt: !,"ACCN AREA: ",LRX,?79-$L(LRDTH),LRDTH
  • Line Location: REPHDR+4
Function Call: WRITE
  • Prompt: !,LRDSH
  • Line Location: REPHDR+6
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: REPHDR+8
Function Call: WRITE
  • Prompt: !!!,$E(LRSTR,1,31)_" D E T A I L E D "_$E(LRSTR,1,32)
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,LRSITE_"("_LRSITNUM_")",?29,"Archived Workload Report"
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: ?53,LRDT,?80-(6+$L(LRPG)),"Page ",LRPG
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,"ACCN AREA: ",LRX,?79-$L(LRDTH),LRDTH
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,LRDSH
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !,"Lab Test "_$S(LRCONT:" **cont.**",1:"")
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: ?33,"Instrument",?59,"Location",!
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: !,LRTST,?33,LRCODE,?59,LRLC," = ",LRCPT
  • Line Location: SUBH+1
Function Call: WRITE
  • Prompt: !,?3,"Accession # ",?36,"Date verified",?59,"WKLD CODE: ",LRCAP
  • Line Location: SUBH+2
Function Call: WRITE
  • Prompt: ?64,$S(LRCONT:"***continued***",1:"")
  • Line Location: UP+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: UP1+2
Function Call: WRITE
  • Prompt: !,"cont."
  • Line Location: UP1+2
Function Call: WRITE
  • Prompt: !?((80-$L(LRSUBH1))\2),LRSUBH1
  • Line Location: UP1+3
Function Call: WRITE
  • Prompt: !?((80-$L(LRSUBH1))\2),$E(LRDSH,1,$L(LRSUBH1))
  • Line Location: UP1+4
Function Call: WRITE
  • Prompt: !!!,$E(LRSTR,1,30)_$S(LRANS="D":" D E T A I L E D *",1:" C-O-N-D-E-N-S-E-D ")_$E(LRSTR,1,31)
  • Line Location: HDR1+1
Function Call: WRITE
  • Prompt: !,LRSITE_"("_LRSITNUM_")",?29," Archived Workload Report"
  • Line Location: HDR1+2
Function Call: WRITE
  • Prompt: ?53,LRDT,?80-(6+$L(LRPG)),"page ",LRPG
  • Line Location: HDR1+3
Function Call: WRITE
  • Prompt: !,"ACCN AREA: ",LRX,?79-$L(LRDTH),LRDTH
  • Line Location: HDR1+4
Function Call: WRITE
  • Prompt: !,LRDSH
  • Line Location: HDR1+6
Function Call: WRITE
  • Prompt: !,LRHDR(A)
  • Line Location: HDR2+2
Info |  Source |  Entry Points |  Interaction Calls