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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: LRAPAUL

Package: Lab Service

Routine: LRAPAUL


Information

LRAPAUL ;AVAMC/REG/CYM - PATHOLOGY LIST BY PATHOLOGIST/TECH ;2/9/98 13:59 ;

Source Information

Source file <LRAPAUL.m>

Entry Points

Name Comments DBIA/ICR reference
ASK
R
DEV
QUE
W
PRT
M
DT
SP
WR
MR
P
H
H1
H2
END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?17,"1. ",LRO(68)," list by ",LRP,!?17,"2. ",LRO(68)," list by Senior Pathologist",!?17,"3. ",LRO(68)," list by Surgeon/Physician",!,"Select 1,2 or 3: "
  • Line Location: ASK+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: $C(7)," Enter 1, 2 or 3"
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: !!,"List only reports not released "
  • Line Location: R+0
Function Call: WRITE
  • Prompt: !
  • Line Location: R+0
Function Call: WRITE
  • Prompt: !!,"Print total count only "
  • Line Location: R+2
Function Call: WRITE
  • Prompt: !!,"Print Topography and Morphology entries "
  • Line Location: R+3
Function Call: WRITE
  • Prompt: !,LRE,")",?3,$J($P(Z,"^",6),4),?18
  • Line Location: PRT+1
Function Call: WRITE
  • Prompt: Y,?35
  • Line Location: PRT+1
Function Call: WRITE
  • Prompt: Y,?35
  • Line Location: PRT+1
Function Call: WRITE
  • Prompt: ?62,$J(X,2)
  • Line Location: PRT+2
Function Call: WRITE
  • Prompt: !?16,B
  • Line Location: PRT+4
Function Call: WRITE
  • Prompt: !?21,N
  • Line Location: M+0
Function Call: WRITE
  • Prompt: !?16,B
  • Line Location: WR+3
Function Call: WRITE
  • Prompt: !?21,N
  • Line Location: MR+0
Function Call: WRITE
  • Prompt: !,LR("%")
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !,LRE,")",?3,$J($P(Z,"^",6),4),?18
  • Line Location: H1+0
Function Call: WRITE
  • Prompt: Y,?31,$P(V,"^")
  • Line Location: H1+0
Function Call: WRITE
  • Prompt: !?16,B
  • Line Location: H2+0

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] Classic Fileman Calls
^LR - [#63] FIELD^DID
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call