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

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

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
Info |  Source |  Entry Points |  Interaction Calls