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

Package: Text Integration Utility

Routine: TIURB2


Information

TIURB2 ; SLC/JER,AJB - More Review Screen Actions ; 1/18/05

Source Information

Source file <TIURB2.m>

Call Graph

Call Graph

Call Graph Total: 26

Package Total Call Graph
Text Integration Utility 19 ALERTDEL^TIUALRT  (ISCNSLT,REMCNSLT)^TIUCNSLT  DELIRT^TIUDIRT  DELAUDIT^TIUEDI1  $$HASIDKID^TIUGBR  ($$DELETE,$$HASADDEN,$$PNAME)^TIULC1  PICK^TIULM  $$CANDO^TIULP  
$$DOCRES^TIULRR  ($$DATE,$$NAME)^TIULS  $$ISDS^TIULX  UNLINK^TIUPRF1  ISPRFTTL^TIUPRF2  (AUDEL,DELPROB,DELSGNR)^TIURB1  $$RETRACT^TIURD2  UPRBLD^TIURL  
ISSURG^TIUSROI  RETRACT^TIUSROI1  $$READ^TIUU  
List Manager 2 FULL^VALM1  EN^VALM2  
VA FileMan 2 ^DIE  ^DIK  
Authorization Subscription 1 $$ISA^USRLM  
Kernel 1 $$UP^XLFSTR  
RPC Broker 1 $$BROKER^XWBLIB  

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

Package Total Caller Graph
Text Integration Utility 11 TIU ACTION DELETE  TIU BROWSE ACTION DELETE  TIUHL7U2  TIULP  TIURB  TIURB3  TIURD  TIUSROI1  
TIUSRVP  TIUSRVP2  TIUTSK  
Kernel 1 ^ORD(101  

Entry Points

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

External References

Name Field # of Occurrence
^DIE DELTEXT+10
^DIK DIK+10, DELIMG+2
ALERTDEL^TIUALRT GODEL+44, GODEL+51, DIK+15
ISCNSLT^TIUCNSLT DELTEXT+17
REMCNSLT^TIUCNSLT DELTEXT+17
DELIRT^TIUDIRT GODEL+42
DELAUDIT^TIUEDI1 DIK+11
$$HASIDKID^TIUGBR GODEL+22
$$DELETE^TIULC1 DIK+7
$$HASADDEN^TIULC1 GODEL+23
$$PNAME^TIULC1 GODEL+9
PICK^TIULM DELETE+14
$$CANDO^TIULP GODEL+17
$$DOCRES^TIULRR DELETE+15
$$DATE^TIULS GODEL+14
$$NAME^TIULS GODEL+12
$$ISDS^TIULX GODEL+15
UNLINK^TIUPRF1 DELTEXT+13
ISPRFTTL^TIUPRF2 DELTEXT+13
AUDEL^TIURB1 GODEL+52
DELPROB^TIURB1 DIK+12
DELSGNR^TIURB1 GODEL+44, GODEL+51, DIK+13
$$RETRACT^TIURD2 DELTEXT+11
UPRBLD^TIURL DELETE+23
ISSURG^TIUSROI DELTEXT+15
RETRACT^TIUSROI1 DELTEXT+15
$$READ^TIUU DELETE+13, DELETE+18, GODEL+6, GODEL+27, GODEL+34, GODEL+38, GODEL+46, GODEL+50, DELTEXT+19, IMGNOTE+8
$$ISA^USRLM GODEL+30
FULL^VALM1 DELTEXT+1, IMGNOTE+1
EN^VALM2 DELETE+3
$$UP^XLFSTR GODEL+9
$$BROKER^XWBLIB DELTEXT+18

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+5
Function Call: WRITE
  • Prompt: ""
  • Line Location: GODEL+6
Function Call: WRITE
  • Prompt: !!,$C(7),$C(7),$C(7),$P(CANDEL,U,2),!
  • Line Location: GODEL+21
Function Call: WRITE
  • Prompt: !!,"This interdisciplinary parent cannot be deleted; its entries must first",!,"be detached.",!
  • Line Location: GODEL+22
Function Call: WRITE
  • Prompt: !!,"This "_TIUTYP_" has ADDENDA."
  • Line Location: GODEL+24
Function Call: WRITE
  • Prompt: !,$C(7)
  • Line Location: GODEL+25
Function Call: WRITE
  • Prompt: !,$P(TIUMSG,"|",TIUI)
  • Line Location: GODEL+25
Function Call: WRITE
  • Prompt: !
  • Line Location: GODEL+26
Function Call: WRITE
  • Prompt: !,"Nothing DELETED.",!
  • Line Location: GODEL+27
Function Call: WRITE
  • Prompt: !,"Nothing DELETED.",!
  • Line Location: GODEL+36
Function Call: WRITE
  • Prompt: !,"DELETING Entire "_TIUTYP_" record.",!
  • Line Location: GODEL+41
Function Call: WRITE
  • Prompt: !,"Nothing DELETED.",!
  • Line Location: GODEL+48
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
Routine Call
  • DIE
  • Line Location:
    • DELTEXT+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^TIU(8925 - [#8925] Classic Fileman Calls
^TIU(8925.91 - [#8925.91] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] GODEL+12
^TIU(8925 - [#8925] DELETE+10, DELETE+20, GODEL+3, GODEL+8, GODEL+23, GODEL+32, GODEL+39!, DELX, DELTEXT+13, DELTEXT+15
, DELTEXT+17, DIK+3, DIK+4, DIK+6
^TIU(8925.1 - [#8925.1] DIK+5
^TIU(8925.91 - [#8925.91] HASIMG+1, DELIMG+2
^TMP("TIUR" GODEL+11
^TMP("TIURIDX" DELETE+7

Label References

Name Line Occurrences
$$HASIMG GODEL+7
DEL DELETE+19
DELIMG DIK+14
DELTEXT GODEL+52
DELX GODEL+19, GODEL+22, GODEL+27, GODEL+31, GODEL+40, GODEL+47
DIK GODEL+42, DIK+3
IMGNOTE GODEL+7

Naked Globals

Name Field # of Occurrence
^(12 GODEL+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADDMPRNT GODEL+2~, GODEL+10*
CANDEL GODEL+1~, GODEL+17*, GODEL+19, GODEL+20, GODEL+21
DA DELETE+6~, DELETE+8*, DELETE+10, DELETE+15, DELETE+19, DELETE+20, DEL~, GODEL+3, GODEL+7, GODEL+8
, GODEL+11, GODEL+17, GODEL+22, GODEL+23, GODEL+29, DELX, DELTEXT~, DELTEXT+2, DELTEXT+11*, DIK~
, DIK+3, DIK+4, DIK+6, DIK+11, DIK+12, DIK+13, DIK+14, DIK+15, DELIMG+1~*, DELIMG+2*
DIE DELTEXT+1~, DELTEXT+8*
DIK DIK+2~, DIK+9*, DELIMG+1~*
DIROUT DELETE+1~, DELETE+5
DR DELTEXT+1~, DELTEXT+9*
DTOUT DELETE+1~, GODEL+35
DUOUT DELETE+1~, GODEL+35
DUZ GODEL+30, GODEL+39
IDPRNT GODEL+2~, GODEL+11*
LSTDA DELETE+2~
PRNTDA DELETE+2~
PROMPT GODEL+1~, GODEL+26*, GODEL+27, GODEL+28*, GODEL+34, GODEL+45*, GODEL+46
RSTRCTD DELETE+6~, DELETE+15*, DELETE+16
STATUS GODEL+2~, GODEL+10*, GODEL+30
SUPPACT DIK~, DIK+4*, DIK+8
TIUABORT GODEL+2~, GODEL+31, GODEL+37*, GODEL+49*
TIUAUDIT GODEL+1~, GODEL+30*, GODEL+32*, GODEL+34*, GODEL+40
TIUAUTH GODEL+2~, GODEL+9*, GODEL+30
TIUCHNG DELETE+1~, DELETE+23, GODEL+27*, GODEL+37*, GODEL+43*, GODEL+49*, GODEL+52*
TIUCHNG("DELETE" GODEL+43*
TIUCHNG("RBLD" DELETE+22*
TIUD0 GODEL+1~, GODEL+8*, GODEL+9, GODEL+10, GODEL+12, GODEL+13, GODEL+15
TIUD12 GODEL+2~, GODEL+8*, GODEL+9
TIUDA GODEL+1~, GODEL+29*, GODEL+32, GODEL+39, GODEL+42, GODEL+44, GODEL+51, GODEL+52, DELTEXT+1~, DELTEXT+2*
, DELTEXT+13, DELTEXT+15, DELTEXT+17, DIK+2~*, DIK+3*, DIK+6*, HASIMG~, HASIMG+1, DELIMG~, DELIMG+2
TIUDATA DELETE+6~, DELETE+7*, DELETE+8
TIUDELX DIK+2~, DIK+7*, DIK+8
TIUDFLT GODEL+1~
TIUHANG GODEL+20~*, GODEL+21
TIUI DELETE+1~, DELETE+4*, DELETE+5*, DELETE+7, DELETE+9, DELETE+14, GODEL+1~, GODEL+25*
TIUJ DELETE+2~
TIULNO DELETE+2~
TIUMSG GODEL+2~, GODEL+16*, GODEL+25
TIUPT GODEL+1~, GODEL+12*, GODEL+16
TIURSN GODEL+2~, GODEL+46*, GODEL+47, GODEL+52, DELTEXT~
TIUTYP GODEL+1~, GODEL+9*, GODEL+16, GODEL+24, GODEL+41, DIK+2~, DIK+5*
TIUTYPE DIK+2~, DIK+4*, DIK+5, DIK+7
TIUVDT GODEL+1~, GODEL+13*, GODEL+14*, GODEL+16
TIUVKILL DIK+2~
TIUVSIT DIK+2~, DIK+6*
TIUVTYP GODEL+2~, GODEL+15*, GODEL+16
TIUY DELETE+1~, DELTEXT+1~, DELTEXT+13, DELTEXT+15, DELTEXT+17
U DELETE+8, GODEL+9, GODEL+10, GODEL+11, GODEL+12, GODEL+13, GODEL+21, GODEL+32, GODEL+46, DIK+5
, DIK+6
>> VALMBCK DELETE+24*
VALMY DELETE+3, DELETE+23!
VALMY( DELETE+5
>> XQORNOD(0 DELETE+3
Y DELETE+1~
>> ZTQUEUED DELTEXT+1, DELTEXT+19
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 |  Naked Globals |  Local Variables |  All