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

Package: Lab Service

Routine: LRARCMA2


Information

LRARCMA2 ;DALISC/CKA - ARCHIVED WKLD REPORT BY MAJOR SECTION; 6/1/95

Source Information

Source file <LRARCMA2.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;
TOP ;
DET ;Detailed section
PRTDET ;Print details
INSTSUM ;
PSUM ;
LSS ;
PCC ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: TOP+9
Function Call: WRITE
  • Prompt: !,?(80-$L(LRINN)\2),LRINN,!
  • Line Location: PRTDET+2
Function Call: WRITE
  • Prompt: !,?(80-$L(LRINN)\2),LRINN,!!
  • Line Location: PRTDET+8
Function Call: WRITE
  • Prompt: !!!,"NO DATA FOR THIS INSTITUTION AND DATE RANGE",!
  • Line Location: PRTDET+10
Function Call: WRITE
  • Prompt: !!!,"GRAND TOTAL",?43,$J(LRIAGT,7)
  • Line Location: PRTDET+12
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRTDET+13
Function Call: WRITE
  • Prompt: @LRLAB
  • Line Location: INSTSUM+2
Function Call: WRITE
  • Prompt: @LRLAB
  • Line Location: INSTSUM+7
Function Call: WRITE
  • Prompt: !!,"GRAND TOTAL",?43,$J(LRIAGT,7)
  • Line Location: INSTSUM+8
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: INSTSUM+9
Function Call: WRITE
  • Prompt: @LRLAB
  • Line Location: PSUM+3
Function Call: WRITE
  • Prompt: !,$E(LRMAN(LRMAA),1,14),?15,$E(LRLSSN(LRLSSA),1,14),?31,"NUMBER :"
  • Line Location: PSUM+5
Function Call: WRITE
  • Prompt: ?43,$J(LRACNT,7)
  • Line Location: PSUM+6
Function Call: WRITE
  • Prompt: !,?31,"PERCENT :"
  • Line Location: PSUM+7
Function Call: WRITE
  • Prompt: ?43,$J($S(LRIAGT:LRACNT/LRIAGT,1:0)*100,7,1)
  • Line Location: PSUM+8
Function Call: WRITE
  • Prompt: !
  • Line Location: PSUM+9
Function Call: WRITE
  • Prompt: !,?(80-$L(LRINN)\2),LRINN,!
  • Line Location: LSS+2
Function Call: WRITE
  • Prompt: @LRLAB
  • Line Location: LSS+3
Function Call: WRITE
  • Prompt: !,?(80-$L(LRINN)\2),LRINN,!,@LRLAB
  • Line Location: LSS+9
Function Call: WRITE
  • Prompt: !,?11,"SUB TOTAL",?43,$J(LRAST,7),!
  • Line Location: LSS+10
Function Call: WRITE
  • Prompt: !,?(80-$L(LRINN)\2),LRINN,!,@LRLAB
  • Line Location: PCC+2
Function Call: WRITE
  • Prompt: $P(LRX,U,2),?11,$E(LRCC,1,30),?43,$J(LRACNT,7),!
  • Line Location: PCC+4
Info |  Source |  Entry Points |  Interaction Calls