Routine: TIURB2

Information

TIURB2 ; SLC/JER,AJB - More Review Screen Actions ;11-Nov-2013 14:40;DU

Source Information

Source file <TIURB2.m>

Call Graph

Call Graph Total: 27

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
Registration	2	FULL^VALM1 EN^VALM2
VA Fileman	2	^DIE ^DIK
Authorization Subscription	1	$$ISA^USRLM
IHS Mods To Text Integration Utilities	1	VNOTE^BTIURB
Kernel	1	$$UP^XLFSTR
RPC Broker	1	$$BROKER^XWBLIB

Caller Graph

Caller Graph Total: 9

Package	Total	Caller Graph
Text Integration Utility	9	TIUHL7U2 TIULP TIURB TIURB3 TIURD TIUSROI1 TIUSRVP TIUSRVP2 TIUTSK

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
VNOTE^BTIURB	DIK+16
^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

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

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

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, 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+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

Customize PDF page

Package: Text Integration Utility

Routine: TIURB2

Information

Source Information

Call Graph

Call Graph Total: 27

Caller Graph

Caller Graph Total: 9

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: