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

Package: Lab Service

Routine: LRAPQAT1


Information

LRAPQAT1 ;AVAMC/REG/CYM,WOIFO/PMK - QA CODE SEARCH ;12/31/2014 11:06 AM

Source Information

Source file <LRAPQAT1.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Lab Service 3 ^LRAPT1  ^LRAPT2  EN^LRUA  
Registration 2 (PTFICD,PTFIEN)^DGPTFUT  INP^VADPT  
DRG Grouper 1 ($$ICDDX,$$ICDOP)^ICDEX  
Kernel 1 $$FMTE^XLFDT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRAPQAT  

Entry Points

Name Comments DBIA/ICR reference
L
AU
A
LOOKUP(LRPTF,LRF,LRC) ; get icd codes from Patient Treatment File
GETCODES(DGA,DGB,ARRAY) ; get codes from Patient Treatment File (#45)
COPY(DGD,ARRAY) ; copy results into ARRAY

External References

Name Field # of Occurrence
PTFICD^DGPTFUT GETCODES+3, GETCODES+8
PTFIEN^DGPTFUT GETCODES+6
$$ICDDX^ICDEX A+13
$$ICDOP^ICDEX A+18
^LRAPT1 L+2
^LRAPT2 AU
EN^LRUA LRAPQAT1+7
INP^VADPT AU+1
$$FMTE^XLFDT L

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Adm: ",$P(LRADM,"@"),?35,LRWARD
  • Line Location: A+6
Function Call: WRITE
  • Prompt: !,?12,"Specialty: ",$P(LRADM,"@"),?35,LRTS
  • Line Location: A+7
Function Call: WRITE
  • Prompt: !,$P(LRX,"^",2),?10,$P(LRX,"^",4)
  • Line Location: A+15
Function Call: WRITE
  • Prompt: !,$P(LRX,"^",2),?10,$P(LRX,"^",5)
  • Line Location: A+20

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LR - [#63] L+1, AU
^TMP("LRAP" LRAPQAT1+8

Label References

Name Line Occurrences
A AU+1
AU L+1
COPY GETCODES+3, GETCODES+8
GETCODES LOOKUP+1, LOOKUP+2, LOOKUP+3, LOOKUP+4
L LRAPQAT1+8
LOOKUP A+9

Naked Globals

Name Field # of Occurrence
^( LRAPQAT1+8
^("AU" AU

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ARRAY GETCODES~, GETCODES+3, GETCODES+8, COPY~
ARRAY( COPY+2*
>> DFN L*, AU+1
DGA GETCODES~, GETCODES+2, GETCODES+3, GETCODES+6, GETCODES+8
DGB GETCODES~, GETCODES+3, GETCODES+6, GETCODES+8
DGC GETCODES+1~, GETCODES+6
DGC( GETCODES+7
DGD GETCODES+1~, GETCODES+3, GETCODES+8, COPY~
DGD( COPY+2
>> DOB L*
I GETCODES+1~, GETCODES+7*, GETCODES+8, COPY+1~, COPY+2*
>> LR("Q" LRAPQAT1+8, L+2, AU+1
>> LR("W" LRAPQAT1+7*
>> LRADM A+1*, A+6, A+7
>> LRB LRAPQAT1+8*
LRC A+5~, A+9, LOOKUP~, LOOKUP+3, LOOKUP+4
LRC( A+17
>> LRDFN LRAPQAT1+8*, L+1, AU
LRF A+5~, A+9, LOOKUP~, LOOKUP+1, LOOKUP+2
LRF( A+12
>> LRP LRAPQAT1+7*, LRAPQAT1+8*
LRPTF A*, A+8, A+9, LOOKUP~, LOOKUP+1, LOOKUP+2, LOOKUP+3, LOOKUP+4
>> LRQ L*
>> LRQ(3 LRAPQAT1+7*
>> LRQ(9 LRAPQAT1+7*
>> LRS(5 LRAPQAT1+7*
>> LRSDT LRAPQAT1+7*
LRTMP A+11~, A+12*, A+13, A+17*, A+18
>> LRTS A+3*, A+7
>> LRWARD A+2*, A+6
LRX A+11~, A+13*, A+14, A+15, A+18*, A+19, A+20
>> SEX L*
>> SSN L*
U A+1, A+2, A+3
VAIN A+4!
VAIN(1 AU+1
VAIN(10 A
VAIN(3 A+3
VAIN(4 A+2
VAIN(7 A+1
>> X LRAPQAT1+8*, L
>> Y L*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All