Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
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>

Entry Points

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

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
Info |  Source |  Entry Points |  Interaction Calls