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

Package: Lab Service

Routine: LRCAPES


Information

LRCAPES ;DALOI/FHS/KLL -MANUAL PCE CPT WORKLOAD CAPTURE ;11/18/11 15:21

Source Information

Source file <LRCAPES.m>

Call Graph

Call Graph

Call Graph Total: 17

Package Total Call Graph
Lab Service 6 (CHKCPT,DEM,DIS,EN,READ,SEND)^LRCAPES1  SET^LRCAPPH1  ^LRPARAM  (,UID)^LRVERA  $$SELBY^LRWU4  PT^LRX  
VA FileMan 4 EN^DDIOL  (,$$FIND1)^DIC  $$GET1^DIQ  ^DIR  
Kernel 3 ($$FMADD,$$FMTE,$$NOW)^XLFDT  $$CJ^XLFSTR  $$GET^XUA4A72  
PCE Patient Care Encounter 2 GETCPT^PXAPIOE  $$PKGON^VSIT  
CPT HCPCS Codes 1 $$CPT^ICPTCOD  
Registration 1 (KVA,KVAR)^VADPT  

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

Package Total Caller Graph
Lab Service 7 LRAPDA  LRAPMRL  LRAPMRL1  LRAPRES  LRAPUTL  LRCAPES  LRCAPES1  
Kernel 1 ^DIC(19  

Entry Points

Name Comments DBIA/ICR reference
EN ;
EX1 ;Parse the read entry
END1 ;
END ;
WLN ;Interactive entry point
LCK ;
PRO ;Get provider,patient/location information
LOC ;Reporting Location
ASKLOC ;Check to see if outpatient location
ES() ;Entry point for front end application.
ASK ; Option entry point - Check and setup PCE reporting variables
PKG ;Check to see if Lab Package is installed
PCE ;Check to see if PCE is turned on
OOS ;Check to see if the LRDLOC is an OOS location
LOOP ;
CPTEN ;Entry point from CPT API call
WKL
LOAD ;Setup ^TMP("LRPXAPI" to load CPT workload
SENDWKL ; Store LMIP workload
ADDPREV ;Add CPT quantities from PCE to current totals
CLEAN ;Final Cleanup
CPT(LRAA,LRAD,LRAN,LRPRO) ;AP Release entry point

External References

Name Field # of Occurrence
EN^DDIOL CPT+28
^DIC CPT+5, CPT+8
$$FIND1^DIC LOC+4
$$GET1^DIQ WLN+12, LCK+5, LCK+6, LCK+7, LCK+9, LCK+14, LCK+16, LCK+17, PRO+4, LOC+3
, ASKLOC+9, ASKLOC+10, PCE+6, LOAD+4, LOAD+6, CPT+4, CPT+14, CPT+16, CPT+17, CPT+19
, CPT+20, CPT+21, CPT+22, CPT+24
^DIR PRO+10, ASKLOC+5
$$CPT^ICPTCOD EX1+5, EX1+12, EX1+23, EX1+29
CHKCPT^LRCAPES1 EX1+6, EX1+24
DEM^LRCAPES1 LCK+19
DIS^LRCAPES1 WKL+1
EN^LRCAPES1 EN+1, ASK+1
READ^LRCAPES1 WKL
SEND^LRCAPES1 SENDWKL+1
SET^LRCAPPH1 LOAD+17
^LRPARAM ASK+4
^LRVERA WLN+10
UID^LRVERA WLN+10
$$SELBY^LRWU4 WLN+9
PT^LRX LCK+4
GETCPT^PXAPIOE ADDPREV+7
KVA^VADPT WLN+1
KVAR^VADPT CLEAN+15
$$PKGON^VSIT PCE+3
$$FMADD^XLFDT ASK+6
$$FMTE^XLFDT LCK+15, CPT+26
$$NOW^XLFDT CPT+25
$$CJ^XLFSTR LOAD+9
$$GET^XUA4A72 PRO+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"END ",!
  • Line Location: END+3
Function Call: WRITE
  • Prompt: !?5,"This accession is corrupt",!
  • Line Location: WLN+14
Function Call: WRITE
  • Prompt: !?5,"Someone else is editing this accession",!
  • Line Location: LCK+2
Function Call: WRITE
  • Prompt: !?5,"This accession does not have a Collection Date/Time",!
  • Line Location: LCK+11
Function Call: WRITE
  • Prompt: !?10,"CAN NOT PROCEED",!
  • Line Location: LCK+12
Function Call: WRITE
  • Prompt: !?5,"No Active Provider Selected",!
  • Line Location: PRO+13
Function Call: WRITE
  • Prompt: !?5,"The accession is corrupt - missing zero node",!
  • Line Location: PRO+16
Function Call: WRITE
  • Prompt: !?5,"LAB SERVICE PACKAGE is not loaded",!
  • Line Location: PKG+2
Function Call: WRITE
  • Prompt: !?5,"PCE Is not installed",!
  • Line Location: PCE+2
Function Call: WRITE
  • Prompt: !?5,"PCE is not turned on",!
  • Line Location: PCE+5
Function Call: WRITE
  • Prompt: !?5,"DEFAULT LAB OOS LOCATION is not defined correctly",!
  • Line Location: OOS+2
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("PCE Wkld Abort "_$P(LRNOP,U,2),IOM)
  • Line Location: LOAD+9
Routine Call
  • DIC
  • Line Location:
    • CPT+5
    • CPT+8
Routine Call
  • DIC
  • Line Location:
    • LOC+4
Routine Call
  • DIR
  • Line Location:
    • PRO+10
    • ASKLOC+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^SC - [#44] FIND1^DIC,  GET1^DIQ
^LRO(68 - [#68] GET1^DIQ
68.02 GET1^DIQ
^LAB(69.9 - [#69.9] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("TEST" PCE+1
^DIC(9.4 - [#9.4] ASK+7, ASK+8
^LRO(68 - [#68] END+1, LCK+1, PRO+15, LOC+1, SENDWKL+2, ADDPREV+2, CPT+30
^SC - [#44] ASKLOC+1, OOS+1
^TMP("LR" EX1+4, EX1+14*, EX1+18*, EX1+31*, EX1+35*, END+2!, WLN+4!, ASK+5!, ASK+6*, OOS+4
, WKL+2, LOAD+15, LOAD+16, CLEAN+13!
^TMP("LRMOD" CLEAN+12!
^TMP("LRPXAPI" ASK+5!, LOAD+1!, ADDPREV+15, ADDPREV+16, ADDPREV+19, ADDPREV+20*, CLEAN+14!
^VA(200 - [#200] PRO+5

Label References

Name Line Occurrences
ADDPREV LOAD+18
CLEAN LOOP+3
CPTEN LOOP+2, CPT+31
EN OOS+4
END END1+1, WLN+11, WLN+13, WKL+2
END1 PRO+12, PRO+15, ASKLOC+8
SENDWKL LOAD+8
WKL PKG+1, PCE+1, PCE+4, OOS+1
WLN PRO+15, LOOP+2

Naked Globals

Name Field # of Occurrence
^( LOAD+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AFTER812 LOAD+11~, CLEAN+1!
AGE WLN+6!, CLEAN+1!
ANS CLEAN+5!
CLN CLEAN+5!
CNT CLEAN+5!
CPT LOAD+16*, CLEAN+1!
D LOAD+11~, CLEAN+1!
D0 LOAD+11~, CLEAN+1!
DDER LOAD+11~, CLEAN+1!
DFN ES+1~, CLEAN+1!
DI LOAD+11~, CLEAN+1!
DIC WLN+2!, WLN+3!, LOAD+11~, CLEAN+1!, CPT+3~, CPT+5*
DIC(0 CPT+5*, CPT+8*
DIG LOAD+11~, CLEAN+1!
DIH LOAD+11~, CLEAN+1!
DIR WLN+2!, WLN+3!, PRO+3~, ASKLOC+2~, CLEAN+1!
DIR("A" PRO+7*, ASKLOC+4*
DIR("B" PRO+5*
DIR("S" PRO+9*
DIR(0 PRO+8*, ASKLOC+4*
DIRUT PRO+3~, CLEAN+1!, CLEAN+2!
DISL LOAD+11~, CLEAN+2!
DIU CLEAN+2!
DIV LOAD+11~, CLEAN+2!
DOB CLEAN+1!
DQ CLEAN+2!
DT EX1+5, EX1+12, EX1+23, EX1+29, PRO+5, ASK+6, OOS+4
DUOUT PRO+3~, CLEAN+2!
DUZ WLN+8, OOS+4
DUZ(2 ASKLOC+11, CPT+18
FPRI CLEAN+5!
I LOAD+12~, CLEAN+3!, CPT+3~
IOM LOAD+9
J CLEAN+3!
LRAA END+1, WLN+5!, WLN+7*, WLN+11, WLN+12, LCK+1, LCK+5, LCK+6, LCK+7, LCK+9
, LCK+14, LCK+16, LCK+17, PRO+15, LOC+1, LOC+3, LOAD+4, LOAD+6, SENDWKL+2, ADDPREV+2
, CLEAN+5!, CPT~, CPT+4, CPT+14, CPT+19, CPT+20, CPT+21, CPT+22, CPT+24, CPT+29
, CPT+30
LRACC WLN+5!, WLN+7*, LOAD+12~, CLEAN+3!
LRACTV EX1+1~, EX1+11, EX1+28
LRAD END+1, WLN+5!, WLN+7*, WLN+12, LCK+1, LCK+5, LCK+6, LCK+7, LCK+9, LCK+14
, PRO+15, LOC+1, LOC+3, LOAD+4, LOAD+6, SENDWKL+2, ADDPREV+2, CLEAN+5!, CPT~, CPT+4
, CPT+19, CPT+20, CPT+21, CPT+22, CPT+24, CPT+29, CPT+30
LRAN END+1, WLN+5!, WLN+7*, WLN+12, LCK+1, LCK+5, LCK+6, LCK+7, LCK+9, LCK+14
, PRO+15, LOC+1, LOC+3, LOAD+4, LOAD+6, SENDWKL+2, ADDPREV+2, CLEAN+5!, CPT~, CPT+4
, CPT+19, CPT+20, CPT+21, CPT+22, CPT+24, CPT+29, CPT+30
LRANSX CLEAN+5!
LRANSY CLEAN+5!
LRCCT LOAD+12~
LRCDT LCK+15*, LOAD+5, LOAD+6*, SENDWKL+4*, CLEAN+5!, CPT+3~, CPT+26*
LRCNT EX1+13*, EX1+14, EX1+17*, EX1+18, EX1+30*, EX1+31, EX1+34*, EX1+35, LOAD+12~, CLEAN+3!
, CLEAN+5!
LRCPT ADDPREV+1~
LRCPT( ADDPREV+9, ADDPREV+10, ADDPREV+12, ADDPREV+18
LRCPT1 ADDPREV+1~, ADDPREV+16*, ADDPREV+17
LRCPT2 ADDPREV+1~, ADDPREV+11*, ADDPREV+12*, ADDPREV+13, ADDPREV+17
LRCT ADDPREV+1~, ADDPREV+5*
LRD2 EX1+1~
>> LRDEBUG END+3
LRDFN WLN+5!, WLN+12*, WLN+13, ES+1~, CLEAN+6!, CPT+30
LRDLOC LCK+18, PCE+6*, OOS+1, CLEAN+6!, CPT+15
LRDPF WLN+5!, CLEAN+6!
LRDSSID ASKLOC+9*, CLEAN+6!, CPT+16*
LRDSSLOC LCK+17*, LCK+18*, CLEAN+6!, CPT+14*, CPT+15*
LRDUZ ES+1~, LOAD+2*, CLEAN+6!, CPT+3~
LREDT LCK+9*, LCK+10, LCK+15, CLEAN+6!, CPT+3~, CPT+24*, CPT+25*, CPT+26
LRENCDT ES+1~
LREND END1+1*, WLN+3!, WLN+7*, WLN+11*, PRO+1*, ASK+3*, ASK+4, LOOP+1, LOOP+2, WKL*
, CLEAN+6!, CPT+3~, CPT+7, CPT+9*
LRES ES+2!, ES+3*, PCE+1, PCE+4, OOS+1, OOS+5, CLEAN+6!, CPT+3~
LRESCPT END+2, WLN+9, ES+1~, ES+2!, OOS+3*, OOS+5, LOAD+7, LOAD+10, CLEAN+6!, CPT+27
LRI LOAD+12~, CLEAN+3!, CPT+3~
LRIDIV CLEAN+7!
LRIDT WLN+5!, LCK+14*, CLEAN+7!, CPT+3~, CPT+19*
LRIEN2 ADDPREV+1~, ADDPREV+6*, ADDPREV+7
LRINA2 EX1+1~
>> LRINVES EX1+22*
LRLLOC LOC+3*, LOC+4*, ASKLOC+1, ASKLOC+3*, ASKLOC+7*, ASKLOC+8, ASKLOC+9, ASKLOC+10, ES+1~, CLEAN+7!
, CPT+4*, CPT+5, CPT+6*, CPT+10*, CPT+16, CPT+17
LRLLOCX LCK+6*, LOC+3*, ES+1~, CLEAN+7!, CPT+3~, CPT+4*, CPT+21*
LRLST CLEAN+7!
LRNINS ASKLOC+10*, ASKLOC+11*, ES+1~, CLEAN+7!, CPT+17*, CPT+18*
LRNLT CLEAN+7!
LRNLTN LOAD+16*, CLEAN+7!
LRNODE0 LOC+1*, CLEAN+7!
LRNOP WLN+7*, WLN+13*, LCK+3*, LCK+13*, PRO+14*, PRO+17*, LOC+2*, LOOP+2, WKL*, LOAD+7*
, LOAD+8, LOAD+9, LOAD+10, SENDWKL+3*, CLEAN+7!, CPT+3~, CPT+9*
LRNR EX1+1~, EX1+8, EX1+25
LROK CLEAN+7!
LRPCEN LOAD+12~, CLEAN+8!
LRPCENON CLEAN+8!
>> LRPCEON PCE+3*, PCE+4
LRPCEVSO CLEAN+8!
LRPKG ASK+7*, ASK+8*, PKG+1, CLEAN+8!
LRPRAC CLEAN+8!
LRPRO WLN+8*, PRO+4, PRO+5, PRO+8*, PRO+11*, PRO+12, LOAD+2, CLEAN+8!, CPT~, CPT+29
LRPRONM PRO+3~, PRO+4*, PRO+5
LRPX ADDPREV+1~, ADDPREV+6*
LRQ EX1+1~, EX1+20*, EX1+21*, EX1+22, EX1+23, EX1+35, CLEAN+8!
LRQ1 ADDPREV+1~, ADDPREV+18*, ADDPREV+20
LRQ2 ADDPREV+1~, ADDPREV+19*, ADDPREV+20
LRQT ADDPREV+1~, ADDPREV+14*, ADDPREV+15, ADDPREV+21*
>> LRQUIET LOAD+9
LRRB WLN+6!, CLEAN+8!
LRREL2 EX1+1~
>> LRRF64 EX1+15*, EX1+32*
LRSN LOAD+3, LOAD+4*, SENDWKL+4!
LRSPECID LCK+7*, LCK+8*, CLEAN+9!, CPT+3~, CPT+22*, CPT+23*
LRSS WLN+6!, LCK+16*, CLEAN+8!
LRSTR2 ADDPREV+1~, ADDPREV+2*, ADDPREV+3, ADDPREV+5, ADDPREV+6
LRSVDCDT LOAD+3, LOAD+5*, SENDWKL+4!
LRTIME WLN+6!
LRTREA WLN+6!, CLEAN+8!
LRTST ES+1~, LOAD+14*, LOAD+15*, LOAD+16, CLEAN+8!
LRTSTP LOAD+16*, CLEAN+9!
LRUID WLN+3!, WLN+6!, WLN+7*, LCK+5*, LCK+8, CLEAN+9!, CPT+20*, CPT+23
LRURG CLEAN+8!
LRVBY WLN+3!, WLN+7*, WLN+9*, WLN+10, WLN+11, CLEAN+9!
LRVIS ADDPREV+4!*, ADDPREV+5*, ADDPREV+10
LRVSITN CLEAN+10!
LRWL2 EX1+1~, EX1+14, EX1+31
LRWRD WLN+6!, CLEAN+10!
LRX EX1+2, EX1+4, EX1+5, EX1+20, EX1+22, CLEAN+10!
LRX1 ADDPREV+1~, ADDPREV+14*, ADDPREV+15*, ADDPREV+16, ADDPREV+19, ADDPREV+20
LRXCPT LOAD+1!, CLEAN+10!
LRXTST LOAD+1!, CLEAN+10!
LRXX ADDPREV+1~, ADDPREV+8*, ADDPREV+9*, ADDPREV+10, ADDPREV+12, ADDPREV+18
LRXY EX1+1~, EX1+5*, EX1+8, EX1+12*, EX1+14, EX1+18, EX1+23*, EX1+25, EX1+29*, EX1+31
LRXY1 EX1+1~, EX1+15, EX1+32
LRXY2 EX1+1~, EX1+12, EX1+15, EX1+29, EX1+32
NODE CLEAN+11!
NODE0 CLEAN+11!
PNM WLN+6!, CLEAN+11!
POP CLEAN+3!
PXALOOK LOAD+12~, CLEAN+3!
PXASUB LOAD+12~, CLEAN+3!
PXJ LOAD+12~, CLEAN+3!
PXJJ LOAD+12~, CLEAN+3!
SDFLAG CLEAN+11!
SDT1 LOAD+13~, CLEAN+4!
SEX WLN+6!, CLEAN+11!
SPEL LOAD+13~, CLEAN+4!
SSN WLN+6!, CLEAN+11!
SUBL LOAD+13~, CLEAN+4!
T1 ASK+2~, CLEAN+4!
TYPEI LOAD+13~, CLEAN+4!
U EX1+8, EX1+14, EX1+18, EX1+25, EX1+31, EX1+35, ASK+6, OOS+1, OOS+4, LOAD+9
, LOAD+16
VA CLEAN+11!
X PRO+3~, ASKLOC+2~, ASK+2~, PCE+1*, LOAD+13~, CLEAN+4!, CPT+3~, CPT+5*
X1 CLEAN+11!
X2 CLEAN+11!
X3 CLEAN+11!
XPARSYS LOAD+13~, CLEAN+4!
Y PRO+3~, PRO+11, ASKLOC+2~, ASKLOC+6, ASKLOC+7, ASK+2~, CPT+3~, CPT+6, CPT+7, CPT+9
, CPT+10
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All