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

Package: VA FileMan

Routine: DIARX


Information

DIARX ;SFISC/DCM-ARCHIVING FUNCTION, BUILD INDEX ;8/12/98 10:25

Source Information

Source file <DIARX.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 3 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  
VA FileMan 2 EN^DIQ1  ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
VA FileMan 1 DIAR  

Entry Points

Name Comments DBIA/ICR reference
BODY
IX
DQ ;print archive activity report
HDR
QP
IDKEY ; Save KEY or Identifier data
HDRC
IX1
OUT

External References

Name Field # of Occurrence
^%ZIS OUT+1
HOME^%ZIS QP+1
^%ZISC BODY+9
^%ZTLOAD QP+1
EN^DIQ1 IX+7
^DIR HDRC+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: DIARLINE,!
  • Line Location: IX+6
Function Call: WRITE
  • Prompt: DIARLINE,!
  • Line Location: IX1+1
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: !,"ARCHIVE ACTIVITY REPORT",?IOM-24,DIARXY,?IOM-10,"PAGE: ",DIARPG+1
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: !,DIARLINE
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !!,"ARCHIVAL ACTIVITY: ",DIARC,!,"ARCHIVE DEVICE LABEL INFORMATION: ",$P(^DIAR(1.11,DIARC,0),U,19)
  • Line Location: BODY+0
Function Call: WRITE
  • Prompt: !,"PRIMARY ARCHIVED FILE: ",$P($G(^DIC(DIARFI,0)),U)_" (#"_DIARFI_")"
  • Line Location: BODY+1
Function Call: WRITE
  • Prompt: !,"ARCHIVER: ",$P($G(^VA(200,$P(DIARX,U,6),0)),U)
  • Line Location: BODY+2
Function Call: WRITE
  • Prompt: !,"SEARCH CRITERIA: "
  • Line Location: BODY+3
Function Call: WRITE
  • Prompt: !,?5,^(0)
  • Line Location: BODY+4
Function Call: WRITE
  • Prompt: !!,"INDEX INFORMATION: ",!
  • Line Location: BODY+5
Function Call: WRITE
  • Prompt: DIARFLD
  • Line Location: BODY+5
Function Call: WRITE
  • Prompt: DIARFLD
  • Line Location: BODY+5
Function Call: WRITE
  • Prompt: ^(DIARFLD,"E")
  • Line Location: BODY+6
Function Call: WRITE
  • Prompt: ?DIARTAB
  • Line Location: BODY+6
Function Call: WRITE
  • Prompt: !!,"*** PLEASE KEEP THIS FOR FUTURE REFERENCE ***"
  • Line Location: BODY+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: BODY+8
Routine Call
  • %ZIS
  • Line Location:
    • QP+1
Routine Call
  • DIR
  • Line Location:
    • HDRC+1
Routine Call
  • %ZIS
  • Line Location:
    • OUT+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( IX+1, IX+3, IX+4, IDKEY+1
^DD("DD" DQ+1
^DD("KEY" - [#.31] IX+2, IX+3
^DIAR(1.11 - [#1.11] IX+1, DQ+1, BODY
^DIBT - [#.401] IX+7, IX+8, BODY+4
^DIC - [#1] IX+6, BODY+1
^UTILITY("DIQ1" IX!, IX1, BODY+6
^VA(200 - [#200] BODY+2

Label References

Name Line Occurrences
BODY DQ+2
HDR DQ+2, HDRC+2
HDRC BODY+6
IDKEY IX+3, IX+4
IX1 IX+8
QP OUT, OUT+1

Naked Globals

Name Field # of Occurrence
^( IX+3, IX1, BODY+4, BODY+6
^(0 BODY+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA IX+1*, IX+7*, IX+9!
>> DIARBLNE IX+5*, BODY+5
>> DIARC IX+1, DQ+1, BODY
DIARDA IX+1*, IX+8*, IX+9!, IX1
DIARDR IX+1*, IX+3*, IX+4*, IX+9!, IDKEY+1, IDKEY+2
>> DIARFI DQ+1*, BODY+1, BODY+6
>> DIARFLD BODY+5*, BODY+6*
DIARIX IX+1*, IX+9!, IX1*
DIARIXF IX+1*, IX+2, IX+3, IX+4, IX+6, IX+9!, IDKEY+1, IX1
DIARIXST IX+1*, IX+7, IX+8, IX+9!
DIARLINE IX+1*, IX+4, IX+5, IX+6*, IX+9!, IDKEY+1*, IX1*, IX1+1, DQ+1*, HDR+1*
>> DIARPDEV OUT+1, QP
>> DIARPG DQ+1*, HDR, HDR+1*
>> DIARQUED OUT
DIARREC IX+1*, IX+9!
>> DIARTAB BODY+5*, BODY+6*
>> DIARU BODY+3*, BODY+4
>> DIARX DQ+1*, BODY+2, BODY+3
>> DIARXY DQ+1*, HDR
>> DIARXZ BODY+3*, BODY+4*, BODY+5*, BODY+6*
DIC IX~, IX+1*
>> DIQ(0 IX+7*
DIR HDRC+1!
DIR(0 HDRC+1*
>> DIRUT BODY+6, HDRC+1
DIXIEN IX+2~*, IX+3
DR IX+1*, IX+9!, IDKEY+2*
DT DQ+1
>> DTOUT BODY+6, HDRC+1
IO IX+6, DQ+1
IOF HDR, BODY+8
IOM HDR, HDR+1
>> IOP OUT+1*
IOSL HDRC
IOST BODY+8, HDRC+1
>> POP OUT+1
U IX+1, IX+6, IDKEY+1, IX1, DQ+1, BODY, BODY+1, BODY+2, BODY+3, BODY+5
>> Y DQ+1*
>> ZTDESC QP*
>> ZTDTH QP*
>> ZTIO QP*
>> ZTRTN QP*
>> ZTSAVE("DIARBLNE" QP*
>> ZTSAVE("DIARC" QP*
>> ZTSAVE("^UTILITY(""DIQ1"",$J," QP*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All