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

Package: Lab Service

Routine: LROC


Information

LROC ;VA/DALOI/CJS - ORDER LIST CLEAN-UP ; 13-Oct-2017 14:04 ; MKK

Source Information

Source file <LROC.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Lab Service 4 NEW^LR7OB1  ^LROC1  ^LROCM  CHKILL^LRPX  
Kernel 2 (,$$S)^%ZTLOAD  ($$FMADD,$$FMTE)^XLFDT  
VA Fileman 2 EN^DDIOL  ^DIR  
IHS Changes To Lab 1 STORPURG^BLRPURGU  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LROC  

Entry Points

Name Comments DBIA/ICR reference
CHKUID ; Check UID's for purged accessions
REENTRY ;
CENDEL ;
SKPLR
CHKACN ; Check for deleted corresponding accession.
LRORD ;
L1 ; Purge the daily accession areas that meet cutoff
FDAT ;
EP ; EP
ZAP ;
DQ ; Tasked entry point to clean up file #69

External References

Name Field # of Occurrence
^%ZTLOAD L1+8, CENDEL+5
$$S^%ZTLOAD DQ+7, DQ+15, DQ+22, DQ+30, CHKACN+6
STORPURG^BLRPURGU EP+9
EN^DDIOL L1+10
^DIR EP+6
NEW^LR7OB1 DQ+34, ZAP+3
^LROC1 DQ+42
^LROCM EP+2
CHKILL^LRPX LRORD+7
$$FMADD^XLFDT EP+12
$$FMTE^XLFDT DQ+30

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Use File Manager to clear ",$P(^(0),U)
  • Line Location: L1+3
Function Call: READ
  • Timeout: DTIME
  • Variable: LRSTA
  • Line Location: CENDEL+1
Function Call: WRITE
  • Prompt: !,"STARTING CENTRAL ENTRY #: "
  • Line Location: CENDEL+1
Function Call: WRITE
  • Prompt: !,"ENDING CENTRAL ENTRY #: "
  • Line Location: CENDEL+2
Function Call: WRITE
  • Prompt: "."
  • Line Location: SKPLR+4
Function Call: READ
  • Timeout: DTIME
  • Variable: %
  • Line Location: SKPLR+8
Function Call: WRITE
  • Prompt: !,"Answer 'Y' or 'N': "
  • Line Location: SKPLR+8
Routine Call
  • DIR
  • Line Location:
    • EP+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(69.9 - [#69.9] EP+11
^LR - [#63] LRORD+5, LRORD+6!
^LRO(68 - [#68] L1+2, L1+3, DQ+5, DQ+6, DQ+9!, ZAP+7, LRORD+1, LRORD+2, LRORD+3, LRORD+4
, SKPLR, SKPLR+1!, SKPLR+2!, SKPLR+3!, CHKACN+8
^LRO(69 - [#69] DQ+14, DQ+17, DQ+21, DQ+24, DQ+28, DQ+31*, DQ+34, DQ+35!, DQ+37*, REENTRY+2
, FDAT+2, ZAP+2, ZAP+4!, ZAP+5!

Label References

Name Line Occurrences
% CENDEL+3, %
CHKACN CHKUID+6, CHKUID+10
CHKUID DQ+40
FDAT REENTRY+2
LRORD ZAP+7
SKPLR LRORD+4
ZAP FDAT+2

Naked Globals

Name Field # of Occurrence
^( DQ+17!, DQ+24!, ZAP+7, SKPLR
^(0 L1+3, DQ+31, DQ+37, ZAP+4, LRORD+5
^(3 LRORD+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % CENDEL+3, %*
%H CENDEL+7!
%ZA CENDEL+7!
%ZB CENDEL+7!
%ZC CENDEL+7!
DA EP+1~, DQ+1~, DQ+8*, DQ+9*, CENDEL+7!
DIR EP+1~
DIR("A" EP+5*
DIR("B" EP+5*
DIR(0 EP+4*
DIROUT EP+1~
DT EP+12
DTIME CENDEL+1, CENDEL+2, %
DTOUT EP+1~
DUOUT EP+1~
I DQ+1~, DQ+13*, DQ+14*, DQ+17, DQ+20*, DQ+21*, DQ+24, CENDEL+7!
IO("Q" CENDEL+6!
J DQ+1~, DQ+16*, DQ+17*, DQ+23*, DQ+24*, CENDEL+7!
K DQ+1~
LRAA EP+1~, L1+1*, L1+2*, L1+3, DQ+4*, DQ+5*, DQ+6, DQ+7, DQ+9, CENDEL+7!
, ZAP+6*, ZAP+7*, LRORD+1, LRORD+2, LRORD+3, LRORD+4, SKPLR, SKPLR+1, SKPLR+2, SKPLR+3
, CHKUID+2~, CHKUID+5*, CHKUID+9*, CHKACN+1*, CHKACN+8
LRAD CHKUID+2~, CHKUID+5*, CHKUID+9*, CHKACN+1*, CHKACN+8
LRAN CENDEL+7!, LRORD+1*, LRORD+2, LRORD+4, SKPLR, SKPLR+1, SKPLR+2, SKPLR+3, CHKUID+2~, CHKUID+5*
, CHKUID+9*, CHKACN+1*, CHKACN+8
LRCNT CHKUID+2~, CHKUID+5*, CHKUID+9*, CHKACN+2*, CHKACN+5
LRDA DQ+1~, DQ+27*, DQ+28*, DQ+29, DQ+30, DQ+31, DQ+34, DQ+35, DQ+37
LRDFN CENDEL+7!, ZAP+4*, ZAP+5, LRORD+4*, LRORD+5, LRORD+6, LRORD+7
LRDTM CENDEL+7!, LRORD+4*
LRDTN CENDEL+7!, FDAT+1*, FDAT+2*, ZAP+2, ZAP+3, ZAP+4, ZAP+5, LRORD+1, LRORD+2, LRORD+4
, SKPLR, SKPLR+1, SKPLR+2, SKPLR+3
LRFIN CENDEL+2*, CENDEL+7!, REENTRY+2
LRIDT CENDEL+7!, LRORD+4*, LRORD+5, LRORD+6, LRORD+7
LRIOZERO CENDEL+7!
LRLOST CENDEL+7!
LROCN CENDEL+7!, SKPLR*, SKPLR+2
LROID CENDEL+7!, SKPLR*, SKPLR+1
LRORD CENDEL+7!, REENTRY+1*, REENTRY+2*, FDAT+2, ZAP+2, ZAP+4, LRORD+1
LROSN CENDEL+7!, SKPLR*
LRROOT CHKUID+2~, CHKUID+5*, CHKUID+6*, CHKUID+9*, CHKUID+10*, CHKACN+1, CHKACN+6, CHKACN+9
LRSAVE EP+1~, EP+12*, DQ+9, DQ+17, DQ+24, DQ+28, DQ+43!, CENDEL+7!
LRSN DQ+32~, DQ+33*, DQ+34*, CENDEL+7!, ZAP+1*, ZAP+2*, ZAP+3, ZAP+4, ZAP+5
LRSS CENDEL+7!, LRORD+3*, LRORD+5, LRORD+6, LRORD+7
LRSTA CENDEL+1*, CENDEL+7!, REENTRY+1
LRX EP+1~, EP+11*, EP+12
MSG EP+1~, L1+9*, L1+10
POP CENDEL+7!
U EP+11, L1+3, DQ+6, DQ+31, DQ+37, CENDEL+2*, ZAP+7, LRORD+5, SKPLR
X EP+1~, SKPLR*
Y EP+1~, EP+7
Z CENDEL+7!
ZTDESC L1+5~, L1+6*
ZTIO L1+5~, L1+7*, CENDEL+4*, CENDEL+6!
ZTRTN L1+5~, L1+6*, CENDEL+4*, CENDEL+6!
ZTSAVE L1+5~, CENDEL+6!
ZTSAVE("L*" CENDEL+4*
ZTSAVE("LR*" L1+7*
ZTSK L1+5~, L1+9, CENDEL+6!
>> ZTSTOP DQ+5, DQ+7*, DQ+11, DQ+14, DQ+15*, DQ+18, DQ+21, DQ+22*, DQ+25, DQ+28
, DQ+30*, DQ+38, DQ+41, CHKUID+6, CHKUID+10, CHKACN+5, CHKACN+6*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All