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 ;04/18/17 07:26

Source Information

Source file <TIURB2.m>

Call Graph

Call Graph

Call Graph Total: 28

Package Total Call Graph
Text Integration Utility 21 ALERTDEL^TIUALRT  (ISCNSLT,REMCNSLT)^TIUCNSLT  DELPST^TIUCOP  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  NOTIFY^TIUUTL  
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

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

Caller Graph

Caller Graph Total: 14

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

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

External References

Name Field # of Occurrence
^DIE DELTEXT+10
^DIK DIK+10, DELIMG+2
ALERTDEL^TIUALRT GODEL+47, GODEL+55, DIK+15
ISCNSLT^TIUCNSLT DELTEXT+17
REMCNSLT^TIUCNSLT DELTEXT+17
DELPST^TIUCOP DIK+16
DELIRT^TIUDIRT GODEL+45
DELAUDIT^TIUEDI1 DIK+11
$$HASIDKID^TIUGBR GODEL+23
$$DELETE^TIULC1 DIK+7
$$HASADDEN^TIULC1 GODEL+24
$$PNAME^TIULC1 GODEL+10
PICK^TIULM DELETE+14
$$CANDO^TIULP GODEL+18
$$DOCRES^TIULRR DELETE+15
$$DATE^TIULS GODEL+15
$$NAME^TIULS GODEL+13
$$ISDS^TIULX GODEL+16
UNLINK^TIUPRF1 DELTEXT+13
ISPRFTTL^TIUPRF2 DELTEXT+13
AUDEL^TIURB1 GODEL+56
DELPROB^TIURB1 DIK+12
DELSGNR^TIURB1 GODEL+47, GODEL+55, 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+7, GODEL+28, GODEL+35, GODEL+39, GODEL+50, GODEL+54, DELTEXT+19, IMGNOTE+8
NOTIFY^TIUUTL GODEL+44, GODEL+57
$$ISA^USRLM GODEL+31
FULL^VALM1 DELTEXT+1, IMGNOTE+1
EN^VALM2 DELETE+3
$$UP^XLFSTR GODEL+10
$$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+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
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+13
^TIU(8925 - [#8925] DELETE+10, DELETE+20, GODEL+4, GODEL+9, GODEL+24, GODEL+33, GODEL+40!, 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+12
^TMP("TIURIDX" DELETE+7

Label References

Name Line Occurrences
$$HASIMG GODEL+8
DEL DELETE+19
DELIMG DIK+14
DELTEXT GODEL+56
DELX GODEL+20, GODEL+23, GODEL+28, GODEL+32, GODEL+41, GODEL+51
DIK GODEL+45, DIK+3
IMGNOTE GODEL+8

Naked Globals

Name Field # of Occurrence
^(12 GODEL+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADDMPRNT GODEL+2~, GODEL+11*
CANDEL GODEL+1~, GODEL+18*, GODEL+20, GODEL+21, GODEL+22
DA DELETE+6~, DELETE+8*, DELETE+10, DELETE+15, DELETE+19, DELETE+20, DEL~, GODEL+4, GODEL+8, GODEL+9
GODEL+12, GODEL+18, GODEL+23, GODEL+24, GODEL+30, DELX, DELTEXT~, DELTEXT+2, DELTEXT+11*, DIK~
, DIK+3, DIK+4, DIK+6, DIK+11, DIK+12, DIK+13, DIK+14, DIK+15, DIK+16, 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+36
DUOUT DELETE+1~, GODEL+36
DUZ GODEL+31, GODEL+40
IDPRNT GODEL+2~, GODEL+12*
LSTDA DELETE+2~
PRNTDA DELETE+2~
PROMPT GODEL+1~, GODEL+27*, GODEL+28, GODEL+29*, GODEL+35, GODEL+49*, GODEL+50
RSTRCTD DELETE+6~, DELETE+15*, DELETE+16
STATUS GODEL+2~, GODEL+11*, GODEL+31
SUPPACT DIK~, DIK+4*, DIK+8
TIU DELETE+2~, GODEL+44, GODEL+57
TIUABORT GODEL+2~, GODEL+32, GODEL+38*, GODEL+53*
TIUAUDIT GODEL+1~, GODEL+31*, GODEL+33*, GODEL+35*, GODEL+41
TIUAUTH GODEL+2~, GODEL+10*, GODEL+31
TIUCHNG DELETE+1~, DELETE+23, GODEL+28*, GODEL+38*, GODEL+46*, GODEL+53*, GODEL+56*
TIUCHNG("DELETE" GODEL+46*
TIUCHNG("RBLD" DELETE+22*
TIUD0 GODEL+1~, GODEL+9*, GODEL+10, GODEL+11, GODEL+13, GODEL+14, GODEL+16, GODEL+44, GODEL+57
TIUD12 GODEL+2~, GODEL+9*, GODEL+10
TIUDA GODEL+1~, GODEL+30*, GODEL+33, GODEL+40, GODEL+44, GODEL+45, GODEL+47, GODEL+55, GODEL+56, GODEL+57
, 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+21~*, GODEL+22
TIUI DELETE+1~, DELETE+4*, DELETE+5*, DELETE+7, DELETE+9, DELETE+14, GODEL+1~, GODEL+26*
TIUJ DELETE+2~
TIULNO DELETE+2~
TIUMSG GODEL+2~, GODEL+17*, GODEL+26
TIUPT GODEL+1~, GODEL+13*, GODEL+17
TIURSN GODEL+2~, GODEL+50*, GODEL+51, GODEL+56, DELTEXT~
TIURTRCK GODEL+3~, GODEL+57, DELTEXT+2*
TIUTYP GODEL+1~, GODEL+10*, GODEL+17, GODEL+25, GODEL+42, DIK+2~, DIK+5*
TIUTYPE DIK+2~, DIK+4*, DIK+5, DIK+7
TIUVDT GODEL+1~, GODEL+14*, GODEL+15*, GODEL+17
TIUVKILL DIK+2~
TIUVSIT DIK+2~, DIK+6*
TIUVTYP GODEL+2~, GODEL+16*, GODEL+17
TIUY DELETE+1~, DELTEXT+1~, DELTEXT+13, DELTEXT+15, DELTEXT+17
U DELETE+8, GODEL+10, GODEL+11, GODEL+12, GODEL+13, GODEL+14, GODEL+22, GODEL+33, GODEL+44, GODEL+50
GODEL+57, 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