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

Package: Lab Service

Routine: LRACM


Information

LRACM ;SLC/DCM - MENU FOR CUMULATIVE REPORTS ;2/19/91 10:11 ;

Source Information

Source file <LRACM.m>

Entry Points

Name Comments DBIA/ICR reference
LRAC
LRKILL
LOC
L
LOC1
DIC
EN ;
KILL
LOAD ;from LRACM3
MSG ;from LRACM1, LRACM3
END ;from LRACM1, LRACM2, LRACM3, LRACSUM

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?25,"Kill now taking place!!!",$C(7)
  • Line Location: LRAC+0
Function Call: WRITE
  • Prompt: !?25,"Kill under way!!!",$C(7)
  • Line Location: LRKILL+0
Function Call: WRITE
  • Prompt: !?7,"SORRY, NO DATA FOR LOCATION ",LRLLOC
  • Line Location: L+1
Function Call: WRITE
  • Prompt: !!,$C(7),"NO PREVIOUS RUN DEFINED",!
  • Line Location: L+2
Function Call: READ
  • Formatting: !
  • Prompt: "Select HOSPITAL LOCATION NAME: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: DIC+0
Function Call: WRITE
  • Prompt: !,"I will initialize various portions of the Lab cumulative package.",!,"Continue only if you want to start over with the cumulative.",!
  • Line Location: KILL+0
Function Call: READ
  • Formatting: !!
  • Prompt: "Do you want to continue? N// "
  • Variable: X
  • Timeout: 120
  • Line Location: KILL+1
Function Call: WRITE
  • Prompt: !!,"O.K.",!!
  • Line Location: KILL+1
Function Call: READ
  • Formatting: !!
  • Prompt: "Initialize all page numbers? Y// "
  • Variable: X
  • Timeout: 120
  • Line Location: KILL+2
Function Call: WRITE
  • Prompt: !!,$C(7),"THE CUMULATIVE APPARENTLY HAS NOT FINISHED.",!,"Do NOT try to reprint reports that have not finished printing!",!,"TO MANUALLY RUN/RESTART CUMULATIVE USE THE OPTION LRAC MANUAL."
  • Line Location: MSG+2
Function Call: READ
  • Formatting: !!
  • Prompt: "Press any key to continue: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: MSG+3
Info |  Source |  Entry Points |  Interaction Calls