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

Package: Lab Service

Routine: LRAPQACN


Information

LRAPQACN ;AVAMC/REG - CONSULTATION RPTS ;8/12/95 12:05

Source Information

Source file <LRAPQACN.m>

Entry Points

Name Comments DBIA/ICR reference
QUE
OUT
B
AU
P
H
END
ASK

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: LRAPQACN+4
Function Call: WRITE
  • Prompt: !,LRP,?36,SSN
  • Line Location: B+0
Function Call: WRITE
  • Prompt: !,LR("%")
  • Line Location: B+0
Function Call: WRITE
  • Prompt: !?23,LRO(68)," CONSULTATIONS",!,LR("%")
  • Line Location: H+1
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !,"Choice #",$J(B,2),": Select consultation code (must begin with 065): "
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: $C(7),!,"First 3 characters must be '065'"
  • Line Location: ASK+1
Info |  Source |  Entry Points |  Interaction Calls