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 |  Local Variables |  All
Print Page as PDF
Routine: LRARU1

Package: Lab Service

Routine: LRARU1


Information

LRARU1 ; IHS/DIR/AAB - LAB ARCHIVING MISC. CONT. ; [ 07/22/2002 1:11 PM ]

Source Information

Source file <LRARU1.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA Fileman 2 NOW^%DTC  ^DIE  
Kernel 1 STAT^%ZTLOAD  
Lab Service 1 (DEV,FILE)^LRARU  

Caller Graph

Caller Graph Total: 11

Package Total Caller Graph
Lab Service 11 LRAR WRITE MEDIA 64.19999  LRAR WRITE MEDIA 67.99999  LRARLMW  LRARLMW1  LRARPLM  LRARPW  LRARREP  LRARU  
LRARVER  LRARWKD  LRARWKD1  

Entry Points

Name Comments DBIA/ICR reference
CLN
TASK ;SET ARCHIVE TASK NUMBER FIELD
SAVESEL ;SAVE SELECTION CRITERIA IN LAB ARCHIVAL ACTIVITY FILE
COMP ;ARCHIVING ACTION COMPLETED
UPDATE ;UPDATE LAB ARCHIVAL ACTIVITY FILE
WRITE ;WRITE DATA TO OFF-LINE MEDIA
EXIT
MRK ;SET FIELDS TO LOCK OUT OTHER USERS DURING ARCHIVING ACTIVITY

External References

Name Field # of Occurrence
NOW^%DTC MRK+1
STAT^%ZTLOAD WRITE+13
^DIE UPDATE+8, COMP+3, SAVESEL+4, MRK+2, TASK+2
DEV^LRARU WRITE+15, WRITE+19
FILE^LRARU WRITE+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"The site manager should determine the method of data storage of the"
  • Line Location: WRITE+2
Function Call: WRITE
  • Prompt: !,"Archived Wkld Data File 64.19999"
  • Line Location: WRITE+3
Function Call: WRITE
  • Prompt: !,"Archived Blood Inventory File 65.9999"
  • Line Location: WRITE+4
Function Call: WRITE
  • Prompt: !,"Archived Lab Monthly Workloads 67.99999"
  • Line Location: WRITE+5
Function Call: WRITE
  • Prompt: !!,$C(7),"I cannot find an archival activity for this file in the archived status."
  • Line Location: WRITE+7
Function Call: WRITE
  • Prompt: !!,$C(7),"I cannot find an archival activity for this file in the selected status either."
  • Line Location: WRITE+9
Function Call: WRITE
  • Prompt: !,ZTSK," IS ",ZTSK(2)
  • Line Location: WRITE+16
Function Call: WRITE
  • Prompt: !!,$C(7),"The archiving task must finish before you write data to off-line media!"
  • Line Location: WRITE+17
Function Call: WRITE
  • Prompt: !!,$C(7),"Please check for errors. The archiving task abnormally ended!"
  • Line Location: WRITE+18
Routine Call
  • DIE
  • Line Location:
    • UPDATE+8
    • COMP+3
    • SAVESEL+4
    • MRK+2
    • TASK+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LAB(95.11 - [#95.11] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(95.11 - [#95.11] WRITE+6, WRITE+8, WRITE+12
^VA(200 - [#200] UPDATE+3, UPDATE+4, MRK+1

Label References

Name Line Occurrences
CLN EXIT+1
EXIT WRITE+10, WRITE+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % MRK+1
%DT CLN!
%ZIS CLN!
BY CLN!
C CLN!
D0 CLN!
DA UPDATE+5*, COMP+2*, COMP+4!, SAVESEL+2*, SAVESEL+5!, MRK+1*, TASK+1*, EXIT!, CLN!
DD CLN!
DHD CLN!
DIAXF CLN!
DIAXGR CLN!
DIAXSCR CLN!
DIAXST CLN!
DIAXT CLN!
DIC EXIT!, CLN!
DIE UPDATE+5*, COMP+2*, COMP+4!, SAVESEL+2*, SAVESEL+5!, MRK+1*, TASK+1*, EXIT!, CLN!
DIK CLN!
DINUM CLN!
DIQ CLN!
DIR EXIT!, CLN!
DIRUT CLN!
DIWF CLN+1!
DIWL CLN+1!
DIWR CLN+1!
DLAYGO CLN+1!
DO CLN+1!
DR UPDATE+3*, UPDATE+4*, UPDATE+6*, UPDATE+7*, COMP+2*, COMP+4!, SAVESEL+4*, SAVESEL+5!, MRK+1*, TASK+1*
, EXIT!, CLN+1!
DT UPDATE+3, UPDATE+4
DTOUT EXIT!, CLN+1!
DUOUT EXIT!, CLN+1!
DUZ UPDATE+3, UPDATE+4, MRK+1
END CLN+1!
ERR CLN+1!
FLDS CLN+1!
FR CLN+1!
L CLN+1!
LRADATE CLN+1!
LRADIV CLN+1!
LRADIVN CLN+1!
LRAI CLN+1!
LRAIEN CLN+1!
LRAIFN CLN+1!
LRAINST CLN+2!
LRAJ CLN+2!
LRAK CLN+2!
LRANUM CLN+2!
LRAR UPDATE+3, UPDATE+4, UPDATE+6, UPDATE+7, MRK+1, WRITE+6*, EXIT!, CLN+2!
LRARC UPDATE+5, COMP+2, SAVESEL+2, MRK+1, TASK+1, WRITE+6*, WRITE+8*, WRITE+10, WRITE+12, EXIT!
, CLN+2!
LRARCEX CLN+2!
LRARCX CLN+2!
LRARF CLN+2!
LRARFL CLN+2!
LRARFL1 WRITE+15*, EXIT!, CLN+2!
LRARI CLN+2!
LRARID CLN+2!
LRARN CLN+2!
LRARNRB CLN+2!
LRARP CLN+2!
LRARST CLN+3!
LRART WRITE+3, WRITE+4, WRITE+5, WRITE+6, WRITE+8, EXIT!, CLN+3!
LRARU CLN+3!
LRARX CLN+3!
LRBD CLN+3!
LRDAT CLN+3!
LRED CLN+3!
LRID CLN+3!
LRIFN CLN+3!
LRINST CLN+3!
LRPBD SAVESEL+3, CLN+3!
LRPED SAVESEL+3, CLN+3!
LRSCR CLN+3!
PAGE CLN+3!
POP CLN+3!
TO CLN+3!
U WRITE+12
X SAVESEL+2*, SAVESEL+3*, SAVESEL+4, SAVESEL+5!, CLN+3!
X1 CLN+3!
X2 CLN+3!
Y CLN+3!
Z CLN+3!
ZTDESC CLN+3!
ZTDTH CLN+4!
ZTIO CLN+4!
ZTRTN CLN+4!
ZTSAVE CLN+4!
ZTSK TASK+1, WRITE+12*, WRITE+13, WRITE+16, WRITE+19, CLN+4!
ZTSK(0 WRITE+14
ZTSK(1 WRITE+14, WRITE+16, WRITE+18
ZTSK(2 WRITE+16
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 |  Local Variables |  All