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

Package: Lab Service

Routine: LRACS3


Information

LRACS3 ;SLC/DCM - MISCELLANEOUS TESTS FOR SUPERVISORS SUMMARY ; 6/11/87 13:38 ;

Source Information

Source file <LRACS3.m>

Entry Points

Name Comments DBIA/ICR reference
ENT
LRLLOC
LRNM
LRDFN
LRIDT
LRIFN
WRITE ;;W:$X>(IOM-19) !?LRCL S LRCL=LRCL+19 W " ",$J(LRTST,7),": ",LRVAL," ",?LRCL S LRCL=$S(LRCL>(IOM-19):2,1:LRCL) ;;**Horizontal mess**
HEAD
HEAD1
LRHEAD2
END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ENT+1
Function Call: WRITE
  • Prompt: !,Y,?18,LRLOG," ",LRSPM," ",!?LRCL
  • Line Location: LRIFN+2
Function Call: WRITE
  • Prompt: !?2,^(K,0)
  • Line Location: LRIFN+4
Function Call: WRITE
  • Prompt: !
  • Line Location: LRIFN+5
Function Call: WRITE
  • Prompt: " ",$J(LRTST,7),": ",LRVAL," ",?LRCL
  • Line Location: WRITE+0
Function Call: WRITE
  • Prompt: ?15,$J(LRTST,7),": ",LRVAL,!
  • Line Location: WRITE+1
Function Call: WRITE
  • Prompt: @IOF,!!,"SUPERVISOR'S SUMMARY REPORT ... MISCELLANEOUS TESTS"
  • Line Location: HEAD+0
Function Call: WRITE
  • Prompt: !!?15,"*** "_LRLLOC_" ***"
  • Line Location: HEAD1+0
Function Call: WRITE
  • Prompt: !!,PNM," ",?25,SSN_" ",?40,AGE,!
  • Line Location: LRHEAD2+0
Info |  Source |  Entry Points |  Interaction Calls