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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: LRCAPPH1

Package: Lab Service

Routine: LRCAPPH1


Information

LRCAPPH1 ;DALOI/SED/RKS/KLL - PROCESS PHLEBOTOMY WORKLOAD DATA CONT ;07/30/04

Source Information

Source file <LRCAPPH1.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 2 $$NOW^XLFDT  $$GET^XUA4A72  
Lab Service 2 $$GMOD^LRBEBA2  (MICRO1,MICRO2)^LRBEBA3  
PCE Patient Care Encounter 2 ($$DATA2PCE,$$DELVFILE)^PXAPI  ENCEVENT^PXKENC  
DRG Grouper 1 ($$CODM,$$CPT)^ICPTCOD  
IHS Changes To Lab 1 $$MODEXIST^BLRUTIL4  

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
Lab Service 6 LRCAPBV1  LRCAPES  LRCAPES1  LRCAPPH  LRCAPPHX  LRCAPPNP  

Entry Points

Name Comments DBIA/ICR reference
END0
SET ;SET IF VALID PROCEDURE
END
LOC ;Called from LRCAPPNP
CHK ;Determine if any CPT code remain on the encounter, then delete encounter if false
SEND ;BUILD ENCOUNTER INFO Called from LRCAPPNP
DELCAN ;Mark PCE Encounter number as '-CPT CANC-ENC DEL'
EN3 ;LREDT = PATIENT ENCOUNTER DATE
EN5 ;GET THE CPT CODES FOR THE TESTS
EN6 ;Called from LRCAPPNP
EN7
NP ;Not perform entry
TEST ;
PCE ;SEND DATA TO PCE

External References

Name Field # of Occurrence
$$MODEXIST^BLRUTIL4 CHK+5, CHK+6
$$CODM^ICPTCOD SET+4
$$CPT^ICPTCOD EN6+17
$$GMOD^LRBEBA2 SET+27
MICRO1^LRBEBA3 SET+33
MICRO2^LRBEBA3 PCE+8
$$DATA2PCE^PXAPI PCE+9, PCE+12
$$DELVFILE^PXAPI CHK+5
ENCEVENT^PXKENC CHK+2
$$NOW^XLFDT NP+5, PCE+14
$$GET^XUA4A72 NP+11

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(60 - [#60] EN6+6
^LAB(69.9 - [#69.9] TEST+2
^LAM - [#64] EN6+8, EN6+10, EN6+13, EN6+18
^LAM("AD" EN6+8, EN6+10
^LR - [#63] NP+4, TEST+6
^LRO(68 - [#68] EN5+9, EN5+11, EN6+3, LOC+2, SET+30, PCE+3
^LRO(69 - [#69] NP+1, NP+2, NP+13, NP+14, NP+15, EN5+1, EN5+3, EN5+4, EN5+10, EN5+11*
, EN5+16, EN6+4, EN6+17, LOC+3, LOC+5, SET+34*, SEND+1, PCE+19, PCE+20, EN7+2
, EN7+6*, CHK+10, DELCAN+2, DELCAN+7*, DELCAN+10*, TEST+4, TEST+5
^SC - [#44] NP+10, NP+12, LOC+4
^TMP("LRBEDX" PCE+10!
^TMP("LRMOD" SET+2, SET+22
^TMP("LRPXAPI" EN3+2!, EN5+14!, EN5+16, END0!, SET+14*, SET+15*, SET+19*, SET+20*, SET+23*, SET+25*
, SET+28*, SET+31, SET+34, SEND+8*, SEND+9*, SEND+10*, SEND+11*, SEND+12*, SEND+13*, SEND+14*
, PCE+6, PCE+16
^TMP("PXKENC" CHK+1!, CHK+3!, CHK+7!
^XTMP("LRPCELOG" PCE+13, PCE+14, PCE+15*, PCE+16*

Label References

Name Line Occurrences
DELCAN CHK+10
EN3 TEST+7
EN6 EN5+14, EN5+15
LOC EN5+12, EN5+14
SEND EN5+14, EN5+16
SET EN6+19, EN6+20

Naked Globals

Name Field # of Occurrence
^( NP+1*, NP+13*, NP+14*, NP+15*, EN6+17*, LOC+2, LOC+3*, LOC+5*, SET+2*, PCE+20*
^("PCE" EN6+4*, PCE+19*
^(0 NP+10, EN5+4, EN6+10, EN6+13, EN6+18

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CPT END0!, EN6+10*, EN6+16, EN6+17, SET+1, SET+2, SET+4, SET+7, SET+8, SET+10
, SET+12, SET+13, SET+15, SET+17, SET+18, SET+20, SET+22, SET+27
>> DFN NP+13, SEND+12, TEST+6*
DT TEST+4
DUZ TEST+1
EDATE NP+6*, NP+11, END0!, EN6+15, EN6+20
I END0+1!
LOC NP+8*, NP+10, NP+12, NP+13, END0+1!
LRAA EN5+6*, EN5+9, EN5+11, EN5+12, EN5+14, END0+1!, EN6+3, LOC+1, LOC+2, SET+26
, SET+27, SET+30, PCE+3
LRAAX PCE+1~, PCE+3*, PCE+4, PCE+5, PCE+11
LRBEID EN3+1~, EN5+10*, PCE+15
>> LRBEVSIT PCE+4
>> LRCCT SET+8*
>> LRCDT NP+2, EN5+1, EN5+3, EN5+4, EN5+10, EN5+11, EN6+4, SET+33, PCE+8, PCE+19
, EN7+2, EN7+6, CHK+10, DELCAN+2, DELCAN+7, DELCAN+10, TEST+4*, TEST+5
>> LRCE CHK+10
>> LRCEX NP+1, NP+13, NP+14, NP+15, EN5+16, EN6+17, LOC+3, LOC+5, SET+34, SEND+1
, PCE+20
LRCNT EN5+2*, END0+1!, SET+7*, SET+8*, SET+10, SET+12, SET+14, SET+15, SET+17, SET+18
, SET+19, SET+20, SET+22, SET+23, SET+25, SET+28, SET+33
>> LRDBUG NP+5, EN5+11, END, PCE+17, TEST+3*
>> LRDLOC LOC+2, TEST+2*
>> LRDPRAC NP+11, TEST+1*
LRDSSID EN5+13, EN5+14, END0+1!, LOC+4*, LOC+5, SEND+8
>> LRDSSLOC LOC+2*, LOC+3, LOC+4, SEND+10
LRDUZ NP+3~, NP+9*, PCE+9, PCE+12
LREDT EN3+1~, NP+2*, NP+4, NP+5*, NP+6, NP+7*, EN6+17, SEND+3
LREN5 EN5+4*, EN5+5, EN5+6, END0+1!
LRENCDT SEND+2~, SEND+3*, SEND+7*, SEND+9
LRENCDT(1 SEND+3*, SEND+4*, SEND+5*, SEND+6*, SEND+7
>> LRES SET+25
>> LRESCPT SEND+1, PCE+18
LRFLG EN6+5~, EN6+12*, EN6+14*, EN6+15*, EN6+16
LRFND EN7~, EN7+4*, EN7+5, DELCAN+5*, DELCAN+6, DELCAN+8*, DELCAN+9
LRI END0+1!
LRICPT END0!, EN6+6*, EN6+10*, EN6+13, EN6+18
LRIDT END0+2!
LRINA END0!, EN6+13*, EN6+14, EN6+15, EN6+18*, EN6+19, EN6+20
>> LRINS NP+10
LRLNOW PCE+1~, PCE+14*, PCE+15, PCE+16
LRNINS NP+8*, NP+10*, NP+14, END0+1!, SEND+11
LRNLT END0!, EN6+6*, EN6+7, EN6+8, EN6+10, EN6+13, EN6+18
LRNLTN END0+2!, EN6+8*, EN6+9, SET+29
LRNOP EN3+1~, NP+13*, NP+14*, NP+15*, LOC+1*, LOC+3*, LOC+5*
>> LRNP NP+16, SET+1, SET+10, SET+11, SET+16, SET+21, PCE+19, EN7+1
>> LRNPX( SET+1, SET+12, SET+13*
>> LROA NP+1, NP+13, NP+14, NP+15, EN5+16, EN6+17, LOC+3, LOC+5, SET+34, SEND+1
, PCE+20
LROK END0+1!, PCE+2*, PCE+4*, PCE+9*, PCE+12*, PCE+17, PCE+19, PCE+20, EN7+1, CHK+5*
, CHK+6*, CHK+7
LRPCE EN7~, EN7+2*, EN7+3, EN7+4, EN7+5*, EN7+6, DELCAN+2*, DELCAN+4, DELCAN+5, DELCAN+6*
, DELCAN+7, DELCAN+8, DELCAN+9*, DELCAN+10
>> LRPKG PCE+9, PCE+12, CHK+5, TEST+3*
LRPRO NP+8*, NP+11*, NP+15, END0!, SET+14
LRREL END0!, EN6+13*, EN6+14, EN6+15, EN6+18*, EN6+19, EN6+20
LRSN NP+2, EN5+1, EN5+3, EN5+4, EN5+10, EN5+11, EN6+4, SET+33, PCE+8, PCE+19
, EN7+2, EN7+6, CHK+8~, CHK+9*, CHK+10*, DELCAN+2, DELCAN+7, DELCAN+10, TEST+4*, TEST+5
>> LRSS PCE+11
LRSTP END0+1!
LRTST EN5+2*, EN5+3*, EN5+4, EN5+10, EN5+11, END0!, SET+29, SET+33
>> LRTSTP EN5+6*, EN6+6, SET+29
>> LRVSIT TEST+3*
LRVSITN EN3+2!, PCE+2!*, PCE+4*, PCE+9, PCE+12, PCE+15, PCE+17, PCE+19, EN7+1, EN7+3
, EN7+4, CHK+2, CHK+3, CHK+5, DELCAN+3, DELCAN+4, DELCAN+5, DELCAN+8
LRXAA EN5+2*, EN5+12*, EN5+14*, END0+1!
LRXCPT EN3+2!, END0+2!
LRXCPT( SET+7, SET+8*, SET+10*, SET+12*, SET+17, SET+18*, SET+20, SET+22
LRXTST EN3+2!, EN5+2!*, END0+1!
LRXTST( SET+29*
LRXTSTU END0+2!
MOD SET+27*, SET+28!
>> NODE NP+4, NP+8, NP+9, TEST+4*, TEST+6
>> NODE(1 NP+8, TEST+5*
U NP+2, NP+8, NP+9, NP+10, NP+12, EN5+5, EN5+6, EN5+9, EN5+10, EN5+11
, EN6+3, EN6+6, EN6+8, EN6+10, EN6+13, EN6+17, EN6+18, LOC+4, SET+29, SET+30
, PCE+3, PCE+15, TEST+6
X SET+3~, SET+4*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All