Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: LRUBL

Package: Lab Service

Routine: LRUBL


Information

LRUBL ;AVAMC/REG - FIND PATIENT MISMATCHES ;2/18/93 13:24

Source Information

Source file <LRUBL.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Lab Service 2 ($$INS,V)^LRU  (BEG,END)^LRUTL  
VA FileMan 2 ^%DT  D^DIQ  

Entry Points

Name Comments DBIA/ICR reference
QUE
W
H
END

External References

Name Field # of Occurrence
^%DT H
D^DIQ W+1, H
$$INS^LRU H
V^LRU END
BEG^LRUTL LRUBL+3
END^LRUTL QUE+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"FIND PATIENT MISMATCHES IN VA PATIENT NUMBER FIELD OF FILE 65"
  • Line Location: LRUBL+2
Function Call: WRITE
  • Prompt: !!,"# units: ",LRC,!,"# relocations: ",C,!,"# missmatches: ",M
  • Line Location: QUE+1
Function Call: WRITE
  • Prompt: W
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !!,P," not ",$P(Y,"^")," (SSN: ",$P(Y,"^",9),") Unit IFN:",A
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !,"DATE/TIME RELOCATION: "
  • Line Location: W+1
Function Call: WRITE
  • Prompt: Y,?45,"Unit ID: ",$P(^LRD(65,A,0),"^")
  • Line Location: W+1
Function Call: WRITE
  • Prompt: @IOF,Y," ",$$INS^LRU,!,"PATIENT MISMATCHES IN 65.03,.07 DATA ELEMENT"
  • Line Location: H+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] QUE
^LRD(65 - [#65] QUE, W+1

Label References

Name Line Occurrences
END LRUBL+2, LRUBL+3, QUE+1
H QUE
W QUE

Naked Globals

Name Field # of Occurrence
^( QUE
^(0 QUE

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT H*
>> A QUE*, W, W+1
>> B QUE*
>> C QUE*, QUE+1
>> DFN QUE*
IO QUE
IOF H
>> LRC QUE*, QUE+1
>> M QUE*, QUE+1, W*
>> P QUE*, W
>> POP LRUBL+3
>> X QUE*, W+1, H*
>> Y QUE*, W, W+1*, H
>> ZTRTN LRUBL+3*
>> ZTSK LRUBL+3
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All