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

Package: Lab Service

Routine: LRBLQPR


Information

LRBLQPR ;AVAMC/REG - PRINT UNITS/COMPONENTS ;2/18/93 09:48 ;

Source Information

Source file <LRBLQPR.m>

Entry Points

Name Comments DBIA/ICR reference
P
QUE
N
L
M
R
S
H
END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: P+0
Function Call: WRITE
  • Prompt: !
  • Line Location: P+0
Function Call: WRITE
  • Prompt: @IOF,LRP," ",SSN(1),?37,$J(LRPABO,2),?40,LRPRH
  • Line Location: QUE+1
Function Call: WRITE
  • Prompt: !,"No UNITS assigned/xmatched",!
  • Line Location: QUE+3
Function Call: WRITE
  • Prompt: !
  • Line Location: QUE+4
Function Call: WRITE
  • Prompt: "No component requests",!
  • Line Location: QUE+5
Function Call: READ
  • Variable: Q
  • Timeout: A(2)?1P
  • Line Location: N+2
Function Call: WRITE
  • Prompt: !,$J(B,2),")",?6,$P(X,"^"),?21,$E($P(M,"^"),1,19),?42,$P(X,"^",7)_" "_$P(X,"^",8),?49
  • Line Location: N+3
Function Call: WRITE
  • Prompt: Y,?69,$E(L,1,11)
  • Line Location: N+3
Function Call: READ
  • Variable: Q
  • Timeout: A(2)?1P
  • Line Location: N+4
Function Call: WRITE
  • Prompt: !?2,^(E,0)
  • Line Location: N+4
Function Call: WRITE
  • Prompt: !,$E($P(^LAB(66,+X,0),"^"),1,27),?27,$J($P(X,"^",4),3),?33
  • Line Location: L+1
Function Call: WRITE
  • Prompt: Y,?47
  • Line Location: L+1
Function Call: WRITE
  • Prompt: Y,?47
  • Line Location: L+1
Function Call: READ
  • Formatting: !
  • Prompt: "^ TO STOP: "
  • Variable: A(2)
  • Timeout: DTIME
  • Line Location: R+0
Function Call: WRITE
  • Prompt: $C(13),$J("",15),$C(13)
  • Line Location: R+1
Function Call: WRITE
  • Prompt: !,"LABORATORY SERVICE",!,LR("%")
  • Line Location: H+0
Function Call: WRITE
  • Prompt: !,LRP," ",SSN(1),?37,$J(LRPABO,2),?40,LRPRH
  • Line Location: H+1
Info |  Source |  Entry Points |  Interaction Calls