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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: TIURB2

Package: Text Integration Utility

Routine: TIURB2


Information

TIURB2 ;SLC/JER,AJB - More Review Screen Actions ;04/18/17 07:26

Source Information

Source file <TIURB2.m>

Entry Points

Name Comments DBIA/ICR reference
DELETE ; Delete action
DEL(DA) ; We don't hand out pencils, without erasers
GODEL ; -- Called from DEL^TIURB
DELX
DELTEXT(DA,TIURSN) ; After signature, only retraction possible
DIK(DA,SUPPACT) ; Call ^DIK to delete the record
; [SUPPACT] = Boolean to suppress delete action
HASIMG(TIUDA) ; Evaluate whether images are linked
IMGNOTE ; Present Notice of Linked Images
DELIMG(TIUDA) ; Remove linked images, when document deleted

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Processing Item #",TIUI
  • Line Location: DELETE+9
Function Call: WRITE
  • Prompt: !?5,$C(7),"Another user is editing this entry."
  • Line Location: DELETE+12
Function Call: WRITE
  • Prompt: ""
  • Line Location: DELETE+13
Function Call: WRITE
  • Prompt: !!,$C(7),"Ok, no harm done...",!
  • Line Location: DELETE+17
Function Call: WRITE
  • Prompt: !?5,$C(7),"Another user is editing this entry."
  • Line Location: GODEL+6
Function Call: WRITE
  • Prompt: ""
  • Line Location: GODEL+7
Function Call: WRITE
  • Prompt: !!,$C(7),$C(7),$C(7),$P(CANDEL,U,2),!
  • Line Location: GODEL+22
Function Call: WRITE
  • Prompt: !!,"This interdisciplinary parent cannot be deleted; its entries must first",!,"be detached.",!
  • Line Location: GODEL+23
Function Call: WRITE
  • Prompt: !!,"This "_TIUTYP_" has ADDENDA."
  • Line Location: GODEL+25
Function Call: WRITE
  • Prompt: !,$C(7)
  • Line Location: GODEL+26
Function Call: WRITE
  • Prompt: !,$P(TIUMSG,"|",TIUI)
  • Line Location: GODEL+26
Function Call: WRITE
  • Prompt: !
  • Line Location: GODEL+27
Function Call: WRITE
  • Prompt: !,"Nothing DELETED.",!
  • Line Location: GODEL+28
Function Call: WRITE
  • Prompt: !,"Nothing DELETED.",!
  • Line Location: GODEL+37
Function Call: WRITE
  • Prompt: !,"DELETING Entire "_TIUTYP_" record.",!
  • Line Location: GODEL+42
Function Call: WRITE
  • Prompt: !,"Nothing DELETED.",!
  • Line Location: GODEL+52
Function Call: WRITE
  • Prompt: !!?5,$C(7),"***********************************************************************"
  • Line Location: DELTEXT+3
Function Call: WRITE
  • Prompt: !?5,"* This document will now be RETRACTED. As such, it has been removed *"
  • Line Location: DELTEXT+4
Function Call: WRITE
  • Prompt: !?5,"* from public view, and from typical Releases of Information, *"
  • Line Location: DELTEXT+5
Function Call: WRITE
  • Prompt: !?5,"* but will remain indefinitely discoverable to HIMS. *"
  • Line Location: DELTEXT+6
Function Call: WRITE
  • Prompt: !?5,"***********************************************************************",!
  • Line Location: DELTEXT+7
Function Call: WRITE
  • Prompt: !!?5,$C(7),"***********************************************************************"
  • Line Location: IMGNOTE+2
Function Call: WRITE
  • Prompt: !?5,"* This document has linked images. You must ""delete"" the Images using *"
  • Line Location: IMGNOTE+3
Function Call: WRITE
  • Prompt: !?5,"* the Imaging Package before proceeding with this action. *"
  • Line Location: IMGNOTE+4
Function Call: WRITE
  • Prompt: !?5,"* The images will be hidden from public view, but will remain *"
  • Line Location: IMGNOTE+5
Function Call: WRITE
  • Prompt: !?5,"* indefinitely discoverable to HIMS. *"
  • Line Location: IMGNOTE+6
Function Call: WRITE
  • Prompt: !?5,"***********************************************************************",!
  • Line Location: IMGNOTE+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^TIU(8925 - [#8925] Classic Fileman Calls
^TIU(8925.91 - [#8925.91] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call