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

Package: Radiology Nuclear Medicine

Routine: RARD


Information

RARD ;HISC/CAH,FPT,GJC AISC/MJK-Read Processor ;9/12/94 11:26

Source Information

Source file <RARD.m>

Entry Points

Name Comments DBIA/ICR reference
SET
READ
HELP ;
Q
UPPER ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?2,$S($D(RARD("A")):RARD("A"),1:"Enter Response: ")
  • Line Location: READ+0
Function Call: WRITE
  • Prompt: $P(RARD(RARD("B")),"^"),"// "
  • Line Location: READ+1
Function Call: READ
  • Variable: X
  • Timeout: $S($D(RARD("DTIME")):+RARD("DTIME"),1:DTIME)
  • Line Location: READ+2
Function Call: WRITE
  • Prompt: $E(X,L+1,99)
  • Line Location: READ+6
Function Call: WRITE
  • Prompt: *7
  • Line Location: READ+7
Function Call: WRITE
  • Prompt: !
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !!?2,"Enter one of the following:"
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: !?5,"'",$P(RARD(I),"^"),"'",?25,"to ",$E($P(RARD(I),"^",2),1,79-$X)
  • Line Location: HELP+3
Function Call: WRITE
  • Prompt: !?5,"^",?25,"to stop."
  • Line Location: HELP+4
Info |  Source |  Entry Points |  Interaction Calls