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 |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: LRAPCUM1

Package: Lab Service

Routine: LRAPCUM1


Information

LRAPCUM1 ;VA/AVAMC/REG - AP PATIENT CUM ; 17-Oct-2014 09:22 ; MKK

Source Information

Source file <LRAPCUM1.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Lab Service 2 MORE^LRAPCUM  C^LRUA  
DRG Grouper 1 $$ICDDX^ICDEX  
IHS Changes To Lab 1 LINEWRAP^BLRGMENU  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRAPCUM  

Entry Points

Name Comments DBIA/ICR reference
A
MORE
M
EP ; EP
EX

External References

Name Field # of Occurrence
LINEWRAP^BLRGMENU EP+20
$$ICDDX^ICDEX EP+13
MORE^LRAPCUM MORE
C^LRUA EP+3, EP+18, M, A, EX

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,LR("%"),!,"SNOMED/ICD codes:"
  • Line Location: EP+3
Function Call: WRITE
  • Prompt: !,"T-",$P(T,"^",2),": "
  • Line Location: EP+3
Function Call: WRITE
  • Prompt: !,"T-",$P(T,"^",2),": "
  • Line Location: EP+3
Function Call: WRITE
  • Prompt: !
  • Line Location: EP+5
Function Call: WRITE
  • Prompt: !,"ICD code: ",$P(LRX,"^",2),?20
  • Line Location: EP+16
Function Call: WRITE
  • Prompt: !,"ICD Code: ",$P(LRX,"^",2)," "
  • Line Location: EP+17
Function Call: WRITE
  • Prompt: X
  • Line Location: EP+19
Function Call: WRITE
  • Prompt: !
  • Line Location: EP+20
Function Call: WRITE
  • Prompt: !?5,"M-",$P(M,"^",2),": "
  • Line Location: M+0
Function Call: WRITE
  • Prompt: X
  • Line Location: M+0
Function Call: WRITE
  • Prompt: !?5,$S(B=1.4:"D-",B=3.3:"F-",B=4.5:"P-",1:""),$P(M,"^",2),?12,": "
  • Line Location: A+0
Function Call: WRITE
  • Prompt: X
  • Line Location: A+0
Function Call: WRITE
  • Prompt: !?10,"E-",$P(E,"^",2),": "
  • Line Location: EX+0
Function Call: WRITE
  • Prompt: X
  • Line Location: EX+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB( A
^LAB(61 - [#61] EP+3
^LAB(61.1 - [#61.1] M
^LAB(61.2 - [#61.2] EX
^LR - [#63] EP+3, EP+8, EP+13, M, M+1, A, EX

Label References

Name Line Occurrences
A M+1
EX M
M EP+3
MORE EP+2, EP+3, EP+9, M, A, EX

Naked Globals

Name Field # of Occurrence
^( EP+3, M, EX

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> B M*, M+1*, A, EX
BLREDT EP+7~
BLRTAB EP+7~, EP+17*, EP+20
>> C EP+3*, EP+8*, EP+13, M, M+1, A, EX
>> E A*, EX*
>> F M+1*, A
>> G EX*
IOM EP+20
>> LR( EP+3, EP+18, M, A, EX
>> LR("%" EP+3
>> LRA(1 EP+2, EP+3, EP+9, M, A, EX
>> LRA(2 EP+2, EP+3, EP+4, EP+8, EP+10, M, M+1, A, EX
>> LRDFN EP+3, EP+8, EP+13, M, M+1, A, EX
>> LRI EP+3, EP+8, EP+13, M, M+1, A, EX
>> LRSS EP+3, EP+8, EP+13, M, M+1, A, EX
LRX EP+7~, EP+13*, EP+15, EP+17
>> M M*, A*
>> T EP+3*
>> X EP+3*, EP+15*, EP+20, M*, A*, EX*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All