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

Package: Text Integration Utility

Routine: TIUFZZ8


Information

TIUFZZ8 ; SLC/MAM - Post Patch TIU*1*27 Cleanup. Scratch. Updates fld .04 for documents in TIU DOCUMENT FILE ;8/27/97 14:02

Source Information

Source file <TIUFZZ8.m>

Entry Points

Name Comments DBIA/ICR reference
ZZUPDATE ; Update Parent Document Type for all documents, one title at a time. Scratch tool, needed by sites that have moved documents before having patch 27.
ZZUP1
UPDAX
MTRPOINT(TITLEDA,NUPDATE) ; Repoints PARENT DOCUMENT TYPE to parent of TITLEDA for documents using title TITLEDA.
MTRPT1(TITLEDA,DA,XDCDA,NOLOCK) ; Repoint 1 docmt for Move TL.
; Requires TITLEDA,DA,XDCDA.

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: ZZUP1+1
Function Call: WRITE
  • Prompt: !!!," *** RESULTS: TIU Document File - Update Parent Document Type ***",!
  • Line Location: ZZUP1+7
Function Call: WRITE
  • Prompt: !!,"The following titles have documents but are orphan Titles. Please make sure you",!,"own each title. Then add them to the hierarchy using option Edit Document"
  • Line Location: ZZUP1+10
Function Call: WRITE
  • Prompt: !,"Definitions, action Items for the desired parent, action Add/Create. Then",!,"update each title, using action Update Documents (under action Copy/Move)."
  • Line Location: ZZUP1+11
Function Call: WRITE
  • Prompt: !,"If needed, this list can be found in ^XTMP(""TIUFZZ8P"",TITLEDA).",!
  • Line Location: ZZUP1+12
Function Call: WRITE
  • Prompt: !,"IEN Title:"
  • Line Location: ZZUP1+13
Function Call: WRITE
  • Prompt: !,TITLEDA," ",$P(^TIU(8925.1,TITLEDA,0),U)
  • Line Location: ZZUP1+14
Function Call: WRITE
  • Prompt: !!,"The following titles have documents that were not able to be updated. Please",!,"update them, using regular Document Definition action Update Documents"
  • Line Location: ZZUP1+16
Function Call: WRITE
  • Prompt: !,"(under action Copy/Move) for each listed title. If needed, this list can be",!,"found in ^XTMP(""TIUFZZ8"",TITLEDA).",!
  • Line Location: ZZUP1+17
Function Call: WRITE
  • Prompt: !,"IEN Title:"
  • Line Location: ZZUP1+18
Function Call: WRITE
  • Prompt: !,TITLEDA," ",$P(^TIU(8925.1,TITLEDA,0),U)
  • Line Location: ZZUP1+19
Function Call: WRITE
  • Prompt: !!,"All documents updated for all Titles.",!
  • Line Location: ZZUP1+20
Function Call: WRITE
  • Prompt: !!,"Processing documents that use Title ",TITLEDA," ..."
  • Line Location: MTRPOINT+3
Function Call: WRITE
  • Prompt: "."
  • Line Location: MTRPOINT+9
Function Call: WRITE
  • Prompt: !!,"Document ",DA,", from B Cross Reference, doesn't exist in file 8925.",!
  • Line Location: MTRPT1+2
Info |  Source |  Entry Points |  Interaction Calls