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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: LRVRPOCU

Package: Lab Service

Routine: LRVRPOCU


Information

LRVRPOCU ;VA/DALOI/JMC - POINT OF CARE UTILITY PROGRAM ; May 10, 2004 12:06

Source Information

Source file <LRVRPOCU.m>

Call Graph

Call Graph Total: 13

Package Total Call Graph
Kernel 3 $$HTE^XLFDT  DUZ^XUP  DIVSET^XUSRB2  
Lab Service 3 EXPLODE^LRGP2  $$NEW1^LROR6  EN^LRPARAM  
Automated Lab Instruments 2 ACK^LA7POC  XQA^LA7UXQA  
Scheduling 2 $$SDAPI^SDAMA301  GETPRV^SDOE  
VA Fileman 2 $$FIND1^DIC  $$GET1^DIQ  
Registration 1 KVAR^VADPT  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
IHS Laboratory Point of Care 1 BLRPOC2  
Lab Service 1 LRVRPOC  

Entry Points

Name Comments DBIA/ICR reference
SPALERT ; Send Processing Alert Message
SENDACK ; Send HL7 ACKnowledgment message
OENC(LRENC) ; Lookup provider on encounter
; Use primary provider if possbile otherwise use first provider listed.
FINDAPPT ; Find an appointment for the collection date/time
VASD ; Check for clinic appointment at same time as specimen
; else for clinic appointment before specimen date/time on same date.
CHKAPPT ; Check for an appointment that matches the ordering location
; to find the provider on the encounter when no provider sent.
INIT ; Initialize user
WKLD(LRP) ; Setup LRCDEF* variables for workload
; Call with LRP = ien of WKLD suffix in file #64.2
CLEAN ;Clean-up point

External References

Name Field # of Occurrence
$$FIND1^DIC INIT+6
$$GET1^DIQ INIT+33, INIT+35, INIT+61, INIT+63, INIT+68, INIT+72, INIT+80, INIT+85, SPALERT+6, FINDAPPT+4
ACK^LA7POC SENDACK+7
XQA^LA7UXQA SPALERT+7
EXPLODE^LRGP2 INIT+48
$$NEW1^LROR6 INIT+88
EN^LRPARAM INIT+12
$$SDAPI^SDAMA301 VASD+16
GETPRV^SDOE OENC+4
KVAR^VADPT INIT+5, CLEAN+1
$$HTE^XLFDT SPALERT+3
DUZ^XUP INIT+10
DIVSET^XUSRB2 INIT+83

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] FIND1^DIC
^DIC(4 - [#4] GET1^DIQ
^SC - [#44] GET1^DIQ
^LAB(61 - [#61] GET1^DIQ
^LAHM(62.48 - [#62.48] GET1^DIQ
^LRO(68 - [#68] GET1^DIQ
^LRO(68.2 - [#68.2] GET1^DIQ
^LAB(69.9 - [#69.9] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(60 - [#60] INIT+57
^LAB(64.2 - [#64.2] WKLD+2
^LAHM(62.48 - [#62.48] SPALERT+5
^LAM - [#64] INIT+59
^LRO(68 - [#68] INIT+28, INIT+31, INIT+37, INIT+77
^LRO(68.2 - [#68.2] INIT+19, INIT+21, INIT+26, INIT+40, INIT+55, INIT+56
^TMP("LR" INIT+47!, INIT+49
^TMP($J VASD+21!, FINDAPPT+1, FINDAPPT+2, CHKAPPT+2, CHKAPPT+3

Label References

Name Line Occurrences
CHKAPPT VASD+19
FINDAPPT VASD+18
OENC VASD+24
WKLD INIT+41

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AGE CLEAN+2!
COMB INIT+67*, CLEAN+2!
CONTROL CLEAN+2!
DFN CLEAN+2!, VASD+13, FINDAPPT+1, FINDAPPT+2, CHKAPPT+2, CHKAPPT+3
>> DIQUIET INIT+3*
DOB CLEAN+2!
DTS CLEAN+2!
DUZ(2 INIT+81
H8 CLEAN+2!
I INIT+2~, INIT+54*, INIT+55*, INIT+56
I5 CLEAN+2!
LA SENDACK+2~, SENDACK+7
LA( SENDACK+3*
LA("ACK" SENDACK+4*
LA("MSG" SENDACK+5*, SENDACK+6*
>> LA76248 SENDACK+3
>> LA76249 SENDACK+3
LAMSG INIT+3*, INIT+9*, INIT+13*, INIT+24*, INIT+30*, INIT+31*, INIT+35*, INIT+44*, INIT+51*, INIT+74*
, INIT+80*, INIT+85*, SPALERT+2~, SPALERT+6*, SPALERT+7
LR0070 INIT+2~, INIT+56*, INIT+61*, INIT+64
LR60 INIT+2~, INIT+57*, INIT+64
LR61 INIT+2~, INIT+57*, INIT+60, INIT+61, INIT+63, INIT+64
LR62 INIT+2~, INIT+56*, INIT+62*, INIT+63*, INIT+64
LR64 INIT+2~, INIT+57*, INIT+58, INIT+59
>> LRAA INIT+27*, INIT+31, INIT+37
LRACC CLEAN+3!
LRACD CLEAN+3!
LRAD CLEAN+3!
>> LRALERT INIT+70*
LRAN CLEAN+3!
LRAOD CLEAN+3!
LRASSN INIT+67*, CLEAN+4!
LRBLBP CLEAN+10!
LRCAPLOC CLEAN+4!
LRCDEF INIT+42, WKLD+3*, CLEAN+4!
LRCDEF0 WKLD+2*, WKLD+3, CLEAN+4!
LRCDEF0(1 WKLD+2*
LRCDEF0X CLEAN+4!
LRCDT CLEAN+4!, VASD+11, FINDAPPT+5, FINDAPPT+6, FINDAPPT+7, FINDAPPT+8
LRCLIEN VASD+9~, FINDAPPT+3*, FINDAPPT+4, FINDAPPT+5, FINDAPPT+6, FINDAPPT+7, FINDAPPT+8, CHKAPPT+4*, CHKAPPT+5
>> LRCNT INIT+3*
LRCODEN CLEAN+4!
LRCOM CLEAN+4!
LRCOUNT VASD+9~, VASD+16*, VASD+17, VASD+21
>> LRDAA INIT+27*, INIT+28, INIT+33, INIT+35, INIT+77, INIT+80
LRDATA CLEAN+5!
LRDATE VASD+9~, VASD+10*, FINDAPPT+1*, FINDAPPT+2, FINDAPPT+5, FINDAPPT+6, FINDAPPT+7, FINDAPPT+8, CHKAPPT+2*, CHKAPPT+3
>> LRDFWKLD INIT+40*, INIT+41
>> LRDIV INIT+77*, INIT+78, INIT+81, INIT+83, INIT+85
>> LRDPF INIT+67*
LRDUZ INIT+4!
>> LREAL INIT+67*
LRENC VASD+9~, VASD+10*, VASD+24, FINDAPPT+5*, FINDAPPT+6*, FINDAPPT+7*, FINDAPPT+8*, CHKAPPT+2, CHKAPPT+5*, OENC~
, OENC+4
>> LREND INIT+3*, INIT+8*, INIT+13, INIT+23*, INIT+29*, INIT+31*, INIT+34*, INIT+43*, INIT+50*, INIT+73*
, INIT+79*, INIT+81, INIT+85*
LRERR INIT+4!, INIT+66!, INIT+67*, CLEAN+5!, OENC+3~, SENDACK+4, SENDACK+6
LREXACT VASD+9~, VASD+10*, FINDAPPT+1, FINDAPPT+5*
LRI OENC+3~, OENC+6*, OENC+7*, OENC+8, OENC+9*
LRIDT CLEAN+10!
LRIEN INIT+4!, INIT+66!
LRIN CLEAN+10!
LRIX CLEAN+10!
>> LRLABKY INIT+15*
>> LRLBLBP INIT+67*
>> LRLD INIT+38*
>> LRLL INIT+19, INIT+21, INIT+26, INIT+40, INIT+55, INIT+56, INIT+72
>> LRLL(0 INIT+13, INIT+24, INIT+30, INIT+31, INIT+44, INIT+51, INIT+74
>> LRLWC INIT+18*
LRM CLEAN+10!
>> LRNATURE INIT+88*
LRNLT INIT+2~, INIT+59*, INIT+64, CLEAN+10!
LRNOCODE CLEAN+5!
>> LRNOECHO INIT+3*
LRNOW CLEAN+10!
LRNT CLEAN+10!
LRNX CLEAN+10!
LRODT CLEAN+10!
LRODTIM CLEAN+11!
LROLDIV CLEAN+5!, FINDAPPT+4
LROLLOC CLEAN+11!, VASD+18, VASD+19, VASD+24, FINDAPPT+5*, FINDAPPT+6*, FINDAPPT+7*, FINDAPPT+8*, CHKAPPT+5
LRORD CLEAN+11!
LRORDNLT INIT+4!
LRORDNLT( INIT+64*
>> LRORDR INIT+18*
LRORU3 CLEAN+11!
LROT CLEAN+11!
>> LROUTINE INIT+68*, INIT+69*, INIT+70
LRP WKLD~, WKLD+2, VASD+9~, VASD+16
LRP("FLDS" VASD+14*
LRP("SORT" VASD+15*
LRP(1 VASD+11*
LRP(3 VASD+12*
LRP(4 VASD+13*
>> LRPARAM INIT+14*
LRPRAC CLEAN+6!, VASD+19, VASD+24, OENC+7, OENC+8*, OENC+9*
>> LRPROF INIT+21*, INIT+22, INIT+26, INIT+55, INIT+56
>> LRPROF(0 INIT+26*, INIT+27
LRPRVLST OENC+3~, OENC+5
LRPRVLST( OENC+7, OENC+8, OENC+9
LRPRVLST(0 OENC+9
>> LRQUIET INIT+3*
LRRB CLEAN+6!
LRSB CLEAN+7!
LRSN CLEAN+7!
LRSQ CLEAN+7!
LRSSCX CLEAN+7!
LRSSN CLEAN+7!
LRST CLEAN+7!
>> LRSTORE INIT+3*
>> LRSTORE( SPALERT+4, SPALERT+6
LRSUB CLEAN+7!
LRSUM CLEAN+7!
LRSXN CLEAN+7!, CLEAN+8!
LRT CLEAN+8!
LRTIME SPALERT+2~, SPALERT+3*, SPALERT+6
LRTN CLEAN+8!
LRTREA CLEAN+8!
LRTS CLEAN+8!
LRTSORU CLEAN+8!
LRTST CLEAN+8!
LRTT CLEAN+8!
>> LRTYPE INIT+19*
LRUID CLEAN+8!, SENDACK+5
LRUNQ CLEAN+9!
>> LRVBY INIT+90*
LRWRD CLEAN+9!
LRX INIT+2~, INIT+6*, INIT+7, INIT+10, INIT+37*, INIT+38, SPALERT+2~, SPALERT+3*, SPALERT+4*, SPALERT+5
, SPALERT+6, SPALERT+7, VASD+9~, FINDAPPT+2*, FINDAPPT+3, FINDAPPT+5, FINDAPPT+6, FINDAPPT+7, FINDAPPT+8, CHKAPPT+3*
, CHKAPPT+4, CHKAPPT+5
LRY INIT+2~, INIT+56*, INIT+57, INIT+62, INIT+64, INIT+82*, INIT+83, INIT+84, VASD+9~, VASD+10*
, FINDAPPT+6*, FINDAPPT+7*, FINDAPPT+8*
OCXAP CLEAN+11!
PNM CLEAN+9!
S5 CLEAN+9!
SEGID CLEAN+9!
SEX CLEAN+9!
SSN CLEAN+9!
T1 CLEAN+12!
U INIT+14, INIT+19, INIT+27, INIT+31, INIT+38
VA CLEAN+12!
>> VA200 INIT+67*
VADMVT CLEAN+12!
>> VAERR INIT+67*
VAINDT CLEAN+12!
VAL CLEAN+12!
XP CLEAN+12!
Z CLEAN+12!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All