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 |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: TIUEDI1

Package: Text Integration Utility

Routine: TIUEDI1


Information

TIUEDI1 ; SLC/MAM - Additional Edit Code ;March 25, 2004

Source Information

Source file <TIUEDI1.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Text Integration Utility 4 $$GETRECNW^TIUEDI3  $$NOW^TIULC  $$ISADDNDM^TIULC1  $$READ^TIUU  
VA Fileman 3 ^DIC  ^DIE  ^DIK  
Clinical Reminders 1 DEL^PXRMGECU  

Caller Graph

Caller Graph Total: 37

Package Total Caller Graph
Text Integration Utility 33 TIUADD  TIUCPFIX  TIUDSCNV  TIUEDI2  TIUEDI4  TIUEDIM  TIUEDIT  TIUEDITR  
TIUEDIU  TIUFIX1  TIUGEDIT  TIUHL7U2  TIUPEFIX  TIUPUTC  TIUPUTCN  TIUPUTCP  
TIUPUTPF  TIUPUTPN  TIUPUTS  TIUPUTU  TIURA3  TIURB2  TIURC1  TIURD1  
TIURD2  TIURD3  TIURD4  TIURS1  TIUSROI  TIUSRVP  TIUSRVP2  TIUSRVPT  
TIUSRVR  
IHS Electronic Health Record 2 BEHODCP  BEHODCS  
IHS Mods To Text Integration Utilities 1 BTIUEDIT  
Tracking Procedure Workflow 1 BTPWTIUT  

Entry Points

Name Comments DBIA/ICR reference
GETCX
RUMYX
RUMYMTHR(MOM,BRAT,MOMTYP,BRATYP) ; Get appropriate parent for component
DELCOMP(TIUDA) ; Cleans up all components of a document
GETLMETH(TIUTYP) ; Get Visit Linkage method, enforce inheritance
AUDIT(TIUDA,TIUCKSM0,TIUCKSM1) ; Update audit trail
DELAUDIT(TIUDA) ; Cleans up all AUDIT TRAIL entries for a document
GETREC(DFN,TIU,TIUCREAT,TIUNEW,TIUDPRM,TIUINQ,TIUPERSN) ;Returns
GETCOMP(TIUTYP,TIUDA,TIU,DFN) ; Adds components to document
INQUIRE() ; Ask user whether to create a new note anyway
SCANDAD(TIUTYP,TIUDA) ; Search "DAD" index for component record
MERGGRAN(TIUDA,TIUC) ; Merge sub-components into TEMP node of original
ISCMPX
GETVMETH(TIUTYP) ; Get Validation method, enforce enheritance
MERGTEMP(TIUDA) ; Merge text from components into TEMP node for edit
ISCOMP(TIUTYP,X) ; Is the text provided a component tag
GETTMPL(TIUTYP) ; Get edit template, enforce inheritance
MERGTEXT(TIUDA,TIU) ; Merge TEMP node from parent document into components

External References

Name Field # of Occurrence
^DIC GETCOMP+8, ISCOMP+4, AUDIT+2
^DIE GETCOMP+14, DELCOMP+4, AUDIT+4
^DIK DELAUDIT+4
DEL^PXRMGECU DELAUDIT+5
$$GETRECNW^TIUEDI3 GETREC+11
$$NOW^TIULC AUDIT+3
$$ISADDNDM^TIULC1 MERGTEMP+4
$$READ^TIUU INQUIRE+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,X," component could not be created.",!
  • Line Location: GETCOMP+9
Function Call: WRITE
  • Prompt: "."
  • Line Location: GETCOMP+14
Function Call: WRITE
  • Prompt: !,$P(^TIU(8925.1,+^TIU(8925,TIUCDA,0),0),U)_" Component Deleted"
  • Line Location: DELCOMP+3
Function Call: WRITE
  • Prompt: "."
  • Line Location: DELCOMP+4
Function Call: WRITE
  • Prompt: !," Audit trail record #",TIUADA," Deleted"
  • Line Location: DELAUDIT+3
Function Call: WRITE
  • Prompt: "."
  • Line Location: DELAUDIT+4
Routine Call
  • DIE
  • Line Location:
    • GETCOMP+14
    • DELCOMP+4
    • AUDIT+4
Routine Call
  • DIC
  • Line Location:
    • GETCOMP+8
    • ISCOMP+4
    • AUDIT+2

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TIU(8925 - [#8925] SCANDAD+3, SCANDAD+4, SCANDAD+5, GETCOMP+11, GETCOMP+12, RUMYMTHR+4, RUMYMTHR+5, DELCOMP+2, DELCOMP+3, DELCOMP+5
, MERGTEMP+2, MERGTEMP+3, MERGTEMP+5, MERGTEMP+7*, MERGTEMP+8!, MERGTEMP+9*, MERGTEMP+10*, MERGTEMP+11, MERGTEMP+12, MERGTEMP+13*
, MERGGRAN+2, MERGGRAN+3, MERGGRAN+4, MERGGRAN+6*, MERGGRAN+7!, MERGGRAN+8*, MERGGRAN+9*, MERGGRAN+10, MERGGRAN+11, MERGTEXT+2
, MERGTEXT+6, MERGTEXT+7, MERGTEXT+14*, MERGTEXT+15*, MERGTEXT+17*, MERGTEXT+18*, MERGTEXT+20*, GETTMPL+4
^TIU(8925.1 - [#8925.1] RUMYMTHR+2, DELCOMP+3, ISCOMP+6, MERGTEXT+4, MERGTEXT+20, GETTMPL+2, GETTMPL+3, GETTMPL+6, GETLMETH+2, GETLMETH+3
, GETVMETH+2, GETVMETH+3
^TIU(8925.5 - [#8925.5] DELAUDIT+2

Label References

Name Line Occurrences
$$GETCOMP MERGTEXT+11
$$GETLMETH GETLMETH+4
$$GETTMPL GETTMPL+5, GETTMPL+7
$$GETVMETH GETVMETH+4
$$ISCOMP MERGTEXT+8
$$RUMYMTHR GETCOMP+11, RUMYMTHR+6
$$SCANDAD SCANDAD+5, GETCOMP+4
DELCOMP DELCOMP+5
GETCX GETCOMP+5, GETCOMP+9
ISCMPX ISCOMP+5, ISCOMP+6
MERGGRAN MERGTEMP+11, MERGGRAN+10
RUMYX RUMYMTHR+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BRAT RUMYMTHR~, RUMYMTHR+6
BRATYP RUMYMTHR~, RUMYMTHR+2, RUMYMTHR+6
CNDMOM RUMYMTHR+1~, RUMYMTHR+3*, RUMYMTHR+4*, RUMYMTHR+5, RUMYMTHR+6
CNDTYP RUMYMTHR+1~, RUMYMTHR+5*, RUMYMTHR+6
DA GETREC+11*, GETREC+12, GETCOMP+1~, GETCOMP+10*, GETCOMP+11, DELCOMP+1~, DELCOMP+4*, DELAUDIT+1~, DELAUDIT+4*, AUDIT+1~
, AUDIT+4*
DFN GETREC~, GETREC+11, GETCOMP~, GETCOMP+13, MERGTEXT+11
DIC GETCOMP+1~, GETCOMP+6*, GETCOMP+10, ISCOMP+1~, ISCOMP+2*, AUDIT+1~, AUDIT+2*, AUDIT+3
DIC("S" ISCOMP+3*, ISCOMP+4!
DIC(0 GETCOMP+6*, ISCOMP+2*, AUDIT+2*
DIE GETCOMP+1~, GETCOMP+10*, DELCOMP+1~*, AUDIT+1~, AUDIT+3*
DIK DELAUDIT+1~*
DLAYGO GETCOMP+2~, GETCOMP+6*, AUDIT+2*
DR GETCOMP+1~, GETCOMP+13*, DELCOMP+1~, DELCOMP+4*, DELAUDIT+1~, AUDIT+1~, AUDIT+3*
DT MERGTEMP+9, MERGTEMP+10, MERGGRAN+8, MERGGRAN+9, MERGTEXT+15, MERGTEXT+18
DUZ GETREC+10, AUDIT+3
GOTMOM RUMYMTHR+1~*, RUMYMTHR+2*, RUMYMTHR+6*, RUMYX
MOM RUMYMTHR~, RUMYMTHR+4, RUMYMTHR+6*, RUMYX
MOMTYP RUMYMTHR~, RUMYMTHR+2
TIU GETREC~, GETREC+11, GETCOMP~, MERGTEXT~, MERGTEXT+11
TIU("VISIT" GETCOMP+13
TIUADA DELAUDIT+1~*, DELAUDIT+2*, DELAUDIT+4
TIUC SCANDAD+1~, SCANDAD+2*, SCANDAD+3*, SCANDAD+4, SCANDAD+5, GETCOMP+1~, GETCOMP+3*, MERGTEMP+1~, MERGTEMP+2*, MERGTEMP+3*
, MERGTEMP+4, MERGTEMP+5, MERGTEMP+7, MERGTEMP+8, MERGTEMP+9, MERGTEMP+11, MERGGRAN~, MERGGRAN+3, MERGTEXT+5~, MERGTEXT+8*
, MERGTEXT+9, MERGTEXT+11
TIUC1 MERGGRAN+1~, MERGGRAN+2*, MERGGRAN+3*, MERGGRAN+4, MERGGRAN+6, MERGGRAN+7, MERGGRAN+8, MERGGRAN+10
TIUCDA DELCOMP+1~*, DELCOMP+2*, DELCOMP+3, DELCOMP+4, DELCOMP+5
TIUCKSM0 AUDIT~, AUDIT+3
TIUCKSM1 AUDIT~, AUDIT+3
TIUCMP GETCOMP+1~, MERGTEXT+5~*, MERGTEXT+11*, MERGTEXT+13, MERGTEXT+14, MERGTEXT+15
TIUCREAT GETREC~
TIUDA SCANDAD~, SCANDAD+3, GETCOMP~, GETCOMP+4, GETCOMP+11, DELCOMP~, DELCOMP+2, DELAUDIT~, DELAUDIT+2, DELAUDIT+5
, MERGTEMP~, MERGTEMP+2, MERGTEMP+3, MERGTEMP+7, MERGTEMP+10, MERGTEMP+11, MERGTEMP+12, MERGTEMP+13, MERGGRAN~, MERGGRAN+2
, MERGGRAN+6, MERGGRAN+9, MERGGRAN+10, MERGGRAN+11, MERGTEXT~, MERGTEXT+2, MERGTEXT+6, MERGTEXT+7, MERGTEXT+11, MERGTEXT+14
, MERGTEXT+17, MERGTEXT+18, MERGTEXT+20, GETTMPL+4, AUDIT~, AUDIT+2
TIUDAD GETTMPL+1~*, GETTMPL+4*, GETTMPL+5, GETTMPL+6*, GETTMPL+7, GETLMETH+1~*, GETLMETH+3*, GETLMETH+4, GETVMETH+1~*, GETVMETH+3*
, GETVMETH+4
TIUDPRM GETREC~, GETREC+11
TIUFPRIV GETCOMP+1~, GETCOMP+3*, ISCOMP+1~*
TIUI RUMYMTHR+1~*, MERGTEMP+1~, MERGTEMP+5*, MERGTEMP+7, MERGTEMP+8, MERGGRAN+1~, MERGGRAN+4*, MERGGRAN+6, MERGGRAN+7, MERGTEXT+5~*
, MERGTEXT+6*, MERGTEXT+7, MERGTEXT+14
TIUINQ GETREC~, GETREC+11
TIUJ MERGTEMP+1~, MERGTEMP+2*, MERGTEMP+6*, MERGTEMP+7, MERGTEMP+10, MERGTEMP+12*, MERGGRAN+1~, MERGGRAN+2*, MERGGRAN+5*, MERGGRAN+6
, MERGGRAN+9, MERGGRAN+11*, MERGTEXT+5~*, MERGTEXT+10*, MERGTEXT+12*, MERGTEXT+14, MERGTEXT+15, MERGTEXT+17, MERGTEXT+18
TIULEVEL ISCOMP+1~*
TIULINE MERGTEMP+1~, MERGTEMP+2*, MERGGRAN+1~, MERGGRAN+2*
TIUMOM GETCOMP+1~, GETCOMP+11*, GETCOMP+12, GETCOMP+13, RUMYMTHR+1~, RUMYMTHR+6*
TIUMTYP GETCOMP+1~, GETCOMP+12*, GETCOMP+13
TIUNEW GETREC~, GETREC+11
TIUPERSN GETREC~, GETREC+10*, GETREC+11
TIUPRMT INQUIRE+1~, INQUIRE+2*, INQUIRE+3
TIUTYP SCANDAD~, SCANDAD+4, SCANDAD+5, GETCOMP~, GETCOMP+4, GETCOMP+7, GETCOMP+11, ISCOMP~, ISCOMP+6, MERGTEXT+1~
, MERGTEXT+2*, MERGTEXT+4, MERGTEXT+8, MERGTEXT+20, GETTMPL~, GETTMPL+2, GETTMPL+3, GETTMPL+6, GETLMETH~, GETLMETH+2
, GETLMETH+3, GETVMETH~, GETVMETH+2, GETVMETH+3
TIUTYP(1 GETREC+11
TIUX MERGTEXT+5~, MERGTEXT+7*, MERGTEXT+8, MERGTEXT+9
TIUY INQUIRE+1~, INQUIRE+2*, INQUIRE+3*, INQUIRE+4, SCANDAD+1~, SCANDAD+2*, SCANDAD+3, SCANDAD+4*, SCANDAD+5*, SCANDAD+6
, GETCOMP+1~, GETCOMP+3*, GETCOMP+4*, GETCOMP+5, GETCOMP+10*, GETCX, ISCOMP+1~, ISCOMP+5*, ISCOMP+6*, ISCOMP+7*
, ISCMPX, GETTMPL+1~, GETTMPL+2*, GETTMPL+3, GETTMPL+5*, GETTMPL+6, GETTMPL+7*, GETTMPL+8, GETLMETH+1~, GETLMETH+2*
, GETLMETH+3, GETLMETH+4*, GETLMETH+5, GETVMETH+1~, GETVMETH+2*, GETVMETH+3, GETVMETH+4*, GETVMETH+5
U GETCOMP+13, RUMYMTHR+6, RUMYX, DELCOMP+3, MERGTEMP+2, MERGTEMP+12, MERGGRAN+2, MERGGRAN+11, MERGTEXT+2, GETTMPL+3
, GETTMPL+4
X GETCOMP+1~, GETCOMP+7*, GETCOMP+9, ISCOMP~, AUDIT+1~, AUDIT+2*
Y GETCOMP+1~, GETCOMP+9, GETCOMP+10, ISCOMP+1~, ISCOMP+5, ISCOMP+6, ISCOMP+7, AUDIT+1~, AUDIT+2, AUDIT+4

Marked Items

Name Field # of Occurrence
$T(DEL^PXRMGECU DELAUDIT+5
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 |  Local Variables |  Marked Items |  All