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

Package: Lab Service

Routine: LRCAPPHX


Information

LRCAPPHX ;DALOI/FHS - RESET AND RESUBMIT PCE WORKLOAD FOR EMPTY PCE NODES ;5/1/2001

Source Information

Source file <LRCAPPHX.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Kernel 4 T0^%ZOSV  ($$FMTE,$$NOW)^XLFDT  $$CJ^XLFSTR  $$GET^XUA4A72  
Lab Service 3 END0^LRCAPPH  EN3^LRCAPPH1  EN0^LRCAPPH3  
VA FileMan 2 ^DIC  ^DIR  
PCE Patient Care Encounter 1 $$PKGON^VSIT  

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 LRCAPCEX  

Entry Points

Name Comments DBIA/ICR reference
EN ;
DATE ;Get date range
SW ;Exchange dates if out of sequence
LOOP ;Check entries to determine if appropriate to resend
SET ;Reset node if not canceled
RD ;
END ;Indicate if accessions were reset and process ^LRO(69,"AA" data
AA ;
FIN
LOOK ;Process only collected specimens
DQ ;Queue with START DATE(LRSDT) AND END DATE(LREDT) defined

External References

Name Field # of Occurrence
T0^%ZOSV END+19
^DIC END+12
^DIR DATE+3, DATE+6
END0^LRCAPPH FIN+7
EN3^LRCAPPH1 LOOK+10
EN0^LRCAPPH3 END+4
$$PKGON^VSIT END+26
$$FMTE^XLFDT LOOP+2
$$NOW^XLFDT END+25
$$CJ^XLFSTR EN+1, EN+4, EN+5, END+3, AA+1
$$GET^XUA4A72 END+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR(" Resend PCE CPT Workload ",IOM)
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("Only orders that have NO recorded PCE workload will be rescanned",IOM)
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !
  • Line Location: DATE+1
Function Call: WRITE
  • Prompt: !,$$FMTE^XLFDT(LRSDT),!
  • Line Location: LOOP+2
Function Call: WRITE
  • Prompt: "."
  • Line Location: LOOP+9
Function Call: WRITE
  • Prompt: LRCEX_" "
  • Line Location: AA+4
Routine Call
  • DIC
  • Line Location:
    • END+12
Routine Call
  • DIR
  • Line Location:
    • DATE+3
    • DATE+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("TEST" END+24
^DIC(9.4 - [#9.4] END+20, END+21
^LAB(69.9 - [#69.9] END+7, END+8, END+14, END+17, END+18, END+23, END+25*
^LR - [#63] LOOK+2
^LRO("LRCAPPH" EN+1, FIN
^LRO(69 - [#69] LOOP+1, LOOP+3, LOOP+5, LOOP+6, LOOP+8*, SET+1, SET+2, SET+5*, END+1, END+4*
AA+3, AA+6, AA+9, LOOK+1, LOOK+6, LOOK+9
^SC - [#44] END+15
^TMP("LRMOD" END+6!, END+27*, FIN+8!
^XMB(1 - [#4.3] END+2

Label References

Name Line Occurrences
END LOOP+10
FIN EN+1, DATE+3, DATE+4, DATE+6, DATE+7, END+1, END+2, END+14, END+15, END+22
END+24
LOOK AA+8
RD DATE+3, DATE+6
SET LOOP+7
SW DQ+5

Naked Globals

Name Field # of Occurrence
^( AA+9!
^("NITE" END+17*
^(0 LOOK+1, LOOK+3
^(1 LOOK+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AC FIN+2!
AFTER812 FIN+2!
ANS FIN+2!
CH1 FIN+2!
CLN FIN+2!
CM FIN+2!
CX FIN+2!
D FIN+2!
D0 FIN+2!
DDER FIN+2!
DEF FIN+3!
DFN FIN+3!, LOOK+3*, LOOK+4
DI FIN+3!
DIC END+10~, END+11*
DIC(0 END+11*
DIF FIN+3!
DIG FIN+3!
DIH FIN+3!
DIR EN+6~
DIR("A" DATE+2*, DATE+5*
DIR(0 DATE+3*
DIRUT EN+6~, RD+2
DISL FIN+3!
DIU FIN+3!
DIV FIN+3!
DQ FIN+3!
DT END+4
DTOUT EN+6~, RD+2
DUOUT EN+6~, RD+2
DUZ LOOK+5
EC FIN+4!
FPRI FIN+4!
IOF EN+3
IOM EN+4, EN+5
J FIN+4!
LI FIN+4!
LL FIN+4!
LN FIN+4!
>> LRCC AA+5*
>> LRCDT AA+7*, AA+8, LOOK+1, LOOK+6, LOOK+9
LRCE EN+6~, LOOP+4*, LOOP+5*, LOOP+8, LOOK+9*
>> LRCEX AA+2*, AA+3*, AA+4, AA+6, AA+9
>> LRCEXV AA+2*
LRCOUNT EN+6~, SW+3*, LOOP+8*, LOOP+9, AA+2*, AA+4*
LRDBUG END+5!, END+6
>> LRDFN LOOK+2*
LRDLOC EN+7~, END+8*
LRDPF EN+7~, LOOK+3*, LOOK+4
>> LRDPRAC END+7*, END+9, END+11, END+12*, END+13*
LRDUZ EN+7~, LOOK+5*
LREDT EN+7~, DATE+8*, SW+1, SW+2*, LOOP+1
LREND EN+6~, DATE+3, DATE+6, RD+1*, RD+2*, AA+2*, AA+3
>> LRIN LOOK+8*
>> LRINS END+2*, LOOK+8
LRNOD EN+6~
LRNOD(1 SET+2*, SET+3, SET+4*, SET+5
>> LRNP END+25
>> LRNT LOOK+8*
>> LROA AA+2*, AA+5*, AA+6*, AA+7, AA+9
LROK END+14*, END+15, END+16!
>> LRPCEON END+26*
>> LRPKG END+20*, END+21*, END+22
LRQUIET EN+1, EN+2, LOOP+2, LOOP+9, END+1, END+3, AA+1, AA+4, FIN+1, DQ+3~
DQ+4*
LRSDT EN+7~, DATE+5*, SW+1, SW+2*, SW+3*, LOOP+1*, LOOP+2, LOOP+3, LOOP+5, LOOP+6
LOOP+8, SET+1, SET+2, SET+5
LRSET EN+6~, LOOP+4*, LOOP+8, SET+4*
LRSN EN+6~, LOOP+3*, LOOP+5, LOOP+6, LOOP+8, SET+1, SET+2, SET+5, AA+7*, AA+8
LOOK+1, LOOK+6, LOOK+9
LRTS EN+7~, SET+1*, SET+2, SET+5
>> LRVSIT END+23*
LRVSITN FIN+5!
>> LRWRKL END+18*
LRXCPT AA+4!
LV FIN+4!
N FIN+4!
>> NODE LOOK+1*, LOOK+2, LOOK+5
>> NODE(1 LOOK+6*, LOOK+7, LOOK+8
PG FIN+4!
PXALOOK FIN+5!
PXASUB FIN+5!
PXJ FIN+5!
PXJJ FIN+5!
SDCNT FIN+5!
SDFLAG FIN+5!
SDT1 FIN+5!
SPEL FIN+6!
SUBL FIN+6!
T FIN+6!
TYPEI FIN+6!
U LOOP+5, SET+3, SET+4, END+2, END+7, END+12, END+15, END+18, END+23, END+25
LOOK+3, LOOK+5, LOOK+7, LOOK+8
X EN+6~, SW+2*, END+10~, END+11*, END+24*
>> XRTL END+19
>> XRTN END+19*
Y EN+6~, DATE+4, DATE+5, DATE+7, DATE+8, END+12
Y(0 END+12
Z1 FIN+6!
>> ZTQUEUED END+5
>> ZTREQ END+5*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All