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

Package: Lab Service

Routine: LRAPQOR2


Information

LRAPQOR2 ;AVAMC/REG/CYM - QA AUTOPSY DATA ;2/13/97 07:52

Source Information

Source file <LRAPQOR2.m>

Entry Points

Name Comments DBIA/ICR reference
S
T
M
A
W
H
H1
H2
H3
H4
H5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$P(LRB,U),?5,$P(LRB,U,2)
  • Line Location: LRAPQOR2+3
Function Call: WRITE
  • Prompt: !!?5,"SERVICE: ",LRK
  • Line Location: S+0
Function Call: WRITE
  • Prompt: !,"Total QA Codes for ",$P(LRB,U),": ",LRM
  • Line Location: S+1
Function Call: WRITE
  • Prompt: !?7,"TREATING SPECIALTY: ",LRL(1)
  • Line Location: T+0
Function Call: WRITE
  • Prompt: !?10,"CLINICIAN: ",LRP(1)
  • Line Location: M+0
Function Call: WRITE
  • Prompt: Q
  • Line Location: A+4
Function Call: WRITE
  • Prompt: D:$Y>(IOSL-6)
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !?13,"Autopsy: ",$J(LRF,4),?35,"Date: ",LRY
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !,"QA CODES by SERVICE, TREATING SPECIALTY and CLINICIAN",!,"From ",LRSTR," To ",LRLST
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !,LR("%")
  • Line Location: H1+0
Function Call: WRITE
  • Prompt: !,$P(LRB,U),?5,$P(LRB,U,2)
  • Line Location: H2+0
Function Call: WRITE
  • Prompt: !!?5,"SERVICE: ",LRK
  • Line Location: H3+0
Function Call: WRITE
  • Prompt: !?7,"TREATING SPECIALTY: ",LRL(1)
  • Line Location: H4+0
Function Call: WRITE
  • Prompt: !?10,"CLINICIAN: ",LRP(1)
  • Line Location: H5+0

FileMan Files Accessed Via FileMan Db Call

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