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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: TIUGR1

Package: Text Integration Utility

Routine: TIUGR1


Information

TIUGR1 ; SLC/MAM - More ID Note Review Screen Actions ;4/12/01

Source Information

Source file <TIUGR1.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
Text Integration Utility 9 IDDEL^TIUALRT1  BLDTMP^TIUBR  ($$HASIDDAD,$$HASIDKID)^TIUGBR  ADDDAD^TIUGEDIT  (CANT,PAUSE)^TIUGR  ($$CANDO,$$POSSPRNT)^TIULP  $$IDDATA^TIURECL1  UPIDDATA^TIURL1  
$$READ^TIUU  
VA FileMan 2 ^DIC  ^DIE  
Kernel 1 $$NOW^XLFDT  

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

Package Total Caller Graph
Text Integration Utility 5 TIU BROWSE ACTION ID NOTE  TIUGR  TIUGR2  TIUSRVP1  TIUSRVP2  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
IDNOTEB(TIUDA) ; Browse Screen Action IN Interdisciplinary Note
; Requires TIUDA
; If editing this module, please keep TIUGR consistent with it.
IDNOTEBX ;
; -- Rebuild browse screen for updated record: --
; (Review screen is updated from BROWSE^TIURA2)
UNLKKID(KIDDA,TIUIDDAD,DETACHED) ; Unlink ID entry
; Check if user can unlink, and if so, unlink it.
UNLKKIDX ;
UNLINK(DA) ; Unlink DA from DADDA
AUDLINK(TIUDA,ACTION,IDPARENT) ; Audit Attach/Detach Events

External References

Name Field # of Occurrence
^DIC AUDLINK+4
^DIE UNLINK+4, AUDLINK+9
IDDEL^TIUALRT1 UNLINK+6
BLDTMP^TIUBR IDNOTEBX+4
$$HASIDDAD^TIUGBR IDNOTEB+10
$$HASIDKID^TIUGBR IDNOTEB+24
ADDDAD^TIUGEDIT IDNOTEB+18
CANT^TIUGR IDNOTEB+8
PAUSE^TIUGR IDNOTEB+25, IDNOTEB+30, IDNOTEB+37
$$CANDO^TIULP IDNOTEB+17, IDNOTEB+33, UNLKKID+6, UNLKKID+7
$$POSSPRNT^TIULP IDNOTEB+29
$$IDDATA^TIURECL1 IDNOTEBX+3
UPIDDATA^TIURL1 UNLKKID+18
$$READ^TIUU UNLKKID+12, UNLKKID+14
$$NOW^XLFDT AUDLINK+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$P(CANADD,U,2)
  • Line Location: IDNOTEB+25
Function Call: WRITE
  • Prompt: !!,$P(CANADD,U,2)
  • Line Location: IDNOTEB+30
Function Call: WRITE
  • Prompt: !!,"To attach this note to an ID parent, please exit Browse and try again ",!,"from a Review Screen showing a list of notes.",!
  • Line Location: IDNOTEB+35
Function Call: WRITE
  • Prompt: !!,$P(CANATT,U,2)
  • Line Location: IDNOTEB+37
Function Call: WRITE
  • Prompt: !!,"This note is attached to an interdisciplinary note."
  • Line Location: UNLKKID+4
Function Call: WRITE
  • Prompt: !,"You may not detach this note from its interdisciplinary note."
  • Line Location: UNLKKID+11
Function Call: WRITE
  • Prompt: !!,"Entry not detached."
  • Line Location: UNLKKID+15
Function Call: WRITE
  • Prompt: !!,"Entry detached."
  • Line Location: UNLKKID+19
Routine Call
  • DIC
  • Line Location:
    • AUDLINK+4
Routine Call
  • DIE
  • Line Location:
    • UNLINK+4
    • AUDLINK+9

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TIU(8925 - [#8925] IDNOTEB+7, IDNOTEB+28, UNLINK+2, AUDLINK+3
^TMP("TIUR" UNLKKID+16

Label References

Name Line Occurrences
AUDLINK UNLINK+5
IDNOTEBX IDNOTEB+7, IDNOTEB+11, IDNOTEB+18, IDNOTEB+24, IDNOTEB+29, IDNOTEB+35
UNLINK UNLKKID+17
UNLKKID IDNOTEB+12
UNLKKIDX UNLKKID+8, UNLKKID+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACTION AUDLINK~, AUDLINK+2, AUDLINK+6
ADDED IDNOTEB+3~, IDNOTEB+18, IDNOTEB+19
CANADD IDNOTEB+3~, IDNOTEB+17*, IDNOTEB+18, IDNOTEB+24, IDNOTEB+25, IDNOTEB+29, IDNOTEB+30
CANATT IDNOTEB+3~, IDNOTEB+33*, IDNOTEB+35, IDNOTEB+37
CANUNLK UNLKKID+2~, UNLKKID+6*, UNLKKID+7*, UNLKKID+8
DA UNLINK~, UNLINK+2, UNLINK+5, UNLINK+6, AUDLINK+1~, AUDLINK+5*
DADDA UNLKKID+2~, UNLKKID+16*, UNLKKID+18
DETACHED UNLKKID~, UNLKKID+3*, UNLKKID+21*
DIC AUDLINK+1~, AUDLINK+4*, AUDLINK+5
DIC(0 AUDLINK+4*
DIE UNLINK+1~, UNLINK+3*, AUDLINK+1~, AUDLINK+5*
DLAYGO AUDLINK+1~, AUDLINK+4*
DR UNLINK+1~, UNLINK+3*, AUDLINK+1~, AUDLINK+6*, AUDLINK+7*, AUDLINK+8*
DUZ AUDLINK+7
IDDAD UNLINK+1~, UNLINK+2*, UNLINK+5
IDPARENT AUDLINK~, AUDLINK+2, AUDLINK+8
KIDDA UNLKKID~, UNLKKID+6, UNLKKID+16, UNLKKID+17, UNLKKID+18
MSG UNLKKID+2~
PREFIX IDNOTEB+3~
TITLE IDNOTEB+3~
TITLEDA IDNOTEB+3~, IDNOTEB+28*, IDNOTEB+29
>> TIUCHNG("RBLD" IDNOTEB+14*, IDNOTEB+20*, UNLKKID+21*
>> TIUCHNG("REFRESH" IDNOTEB+8*, IDNOTEB+13*, IDNOTEB+19*, IDNOTEB+26*, IDNOTEB+31*, IDNOTEB+35*, IDNOTEB+37*, UNLKKIDX+2*
TIUD0 AUDLINK+1~, AUDLINK+3*, AUDLINK+7
TIUD21 AUDLINK+1~
TIUDA IDNOTEB~, IDNOTEB+7, IDNOTEB+10, IDNOTEB+12, IDNOTEB+17, IDNOTEB+18, IDNOTEB+24, IDNOTEB+28, IDNOTEB+33, IDNOTEBX+3
, IDNOTEBX+4, AUDLINK~, AUDLINK+3, AUDLINK+4
>> TIUGDATA IDNOTEBX+3*
TIUIDDAD IDNOTEB+3~, IDNOTEB+10*, IDNOTEB+11, IDNOTEB+12, UNLKKID~, UNLKKID+7
TIUQUIT IDNOTEB+3~, IDNOTEB+13, UNLKKID+2~, UNLKKID+13*, UNLKKID+15*, UNLKKIDX+2
U IDNOTEB+25, IDNOTEB+30, IDNOTEB+37, UNLKKID+16, AUDLINK+7
UNLINK UNLKKID+2~, UNLKKID+14*, UNLKKID+15
>> VALMBCK IDNOTEB+5*
VALMHDR IDNOTEB+15!, IDNOTEB+20!
X AUDLINK+1~, AUDLINK+4*
Y AUDLINK+1~, AUDLINK+4, AUDLINK+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All