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

Package: Text Integration Utility

Routine: TIUEDI4


Information

TIUEDI4 ; SLC/JER - Enter/Edit a Document ; 7-FEB-2001 08:01:51

Source Information

Source file <TIUEDI4.m>

Call Graph

Call Graph

Call Graph Total: 16

Package Total Call Graph
Text Integration Utility 13 SEND^TIUALRT  UPDTIRT^TIUDIRT  ($$GETLMETH,$$GETTMPL,$$GETVMETH,AUDIT)^TIUEDI1  DELETE^TIUEDIT  (BUFFER,COMMIT)^TIUEDIU  ITEMS^TIUFLT  DOCSPICK^TIULA2  ($$CHKSUM,$$LINECNT,$$STATUS)^TIULC  
($$DECRYPT,$$PNAME,$$SUPPVSIT)^TIULC1  $$PERSPRF^TIULE  ($$DOLMLINE,DOLMLINE)^TIUSRVF1  EVENT^TIUSRVP1  $$READ^TIUU  
VA FileMan 3 ^DIC  ^DIE  EN^DIWE  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 9

Package Total Caller Graph
Text Integration Utility 9 TIUADD  TIUEDIM  TIUEDIT  TIUEDITR  TIUGEDIT  TIUPUTC  TIURA  TIURB  
TIURC  

Entry Points

Name Comments DBIA/ICR reference
BOIL(LINE,COUNT) ; execute objects
ASKOK(TIUTYP,TIU,TIUBY,TIUASK) ; X Validation method.
; Receives and returns array TIU, simple var TIUTYP, [array TIUBY]
; Sets TIUASK = answer, = 0 for not OK or 1 for OK
LOADDFLT(DA,TIUTYP) ; Load bp text
APPEND(X) ;
SETTL(TIUTYP,TIUCLASS,TIUTITLE) ; Set array TIUTYP w/ title info
; e.g. TIUTYP(1) = 1^113^CRISIS, where 113 is IFN of CRISIS title,
; TIUTYP = 1 if gotten from TIUTITLE
; TIUTYP = 113 if gotten from user
; Requires TIUCLASS
; Receives TIUTITLE - optional = Title DA or Title Name or DA^Name
CANXEC(TIUODA) ; Eval Obj Status
REPLACE(LINE,X,TIUI) ; Replace TIUIth object in LINE
GETVST(DFN,TIUTYP,TIU,EVNTFLAG) ; Get visit, set array TIU
; -- If no eventflag & don't suppress visit, then execute
; visit linkage method: --
; Requires DFN
; Requires simple variable TIUTYP = title DA
; Optional EVNTFLAG
; Returns array TIU
DIE(DA,TIUQUIT,TIUCHNG) ; Invoke ^DIE
INSMULT(LINE,TARGET,TIULCNT) ; Mult-valued results
TEXTEDIT(DA,TIUCMMT,TIUCHNG) ; Call DIWE

External References

Name Field # of Occurrence
^DIC BOIL+6
^DIE DIE+10, DIE+17, TEXTEDIT+23, TEXTEDIT+25
EN^DIWE TEXTEDIT+12
SEND^TIUALRT DIE+13, DIE+18
UPDTIRT^TIUDIRT DIE+13, DIE+18
$$GETLMETH^TIUEDI1 GETVST+12
$$GETTMPL^TIUEDI1 DIE+8
$$GETVMETH^TIUEDI1 ASKOK+4
AUDIT^TIUEDI1 TEXTEDIT+18
DELETE^TIUEDIT TEXTEDIT+14
BUFFER^TIUEDIU TEXTEDIT+7
COMMIT^TIUEDIU TEXTEDIT+18, TEXTEDIT+24
ITEMS^TIUFLT LOADDFLT+16
DOCSPICK^TIULA2 SETTL+15
$$CHKSUM^TIULC TEXTEDIT+3, TEXTEDIT+4, TEXTEDIT+8, TEXTEDIT+16
$$LINECNT^TIULC TEXTEDIT+25
$$STATUS^TIULC DIE+17
$$DECRYPT^TIULC1 TEXTEDIT+3, TEXTEDIT+4
$$PNAME^TIULC1 SETTL+11, GETVST+15, ASKOK+7, DIE+9
$$SUPPVSIT^TIULC1 GETVST+9
$$PERSPRF^TIULE DIE+2
$$DOLMLINE^TIUSRVF1 LOADDFLT+9
DOLMLINE^TIUSRVF1 LOADDFLT+9
EVENT^TIUSRVP1 GETVST+19
$$READ^TIUU DIE+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$C(7),"No Visit Linkage Method defined for "
  • Line Location: GETVST+14
Function Call: WRITE
  • Prompt: $$PNAME^TIULC1(TIUTYP),".",!,"Please contact IRM..."
  • Line Location: GETVST+15
Function Call: WRITE
  • Prompt: !,$C(7),"Patient & Visit required."
  • Line Location: GETVST+22
Function Call: WRITE
  • Prompt: !,$C(7),"No Validation Method defined for "
  • Line Location: ASKOK+6
Function Call: WRITE
  • Prompt: $$PNAME^TIULC1(TIUTYP),".",!,"Please contact IRM..."
  • Line Location: ASKOK+7
Function Call: WRITE
  • Prompt: !,$C(7),"Patient & Visit required."
  • Line Location: ASKOK+12
Function Call: WRITE
  • Prompt: !!?5,$C(7),"Another user is editing this entry.",!
  • Line Location: DIE+5
Function Call: WRITE
  • Prompt: ""
  • Line Location: DIE+6
Function Call: WRITE
  • Prompt: !?5,$C(7),"No Edit template defined for ",$$PNAME^TIULC1(+$P(^TIU(8925,+DA,0),U)),!
  • Line Location: DIE+9
Function Call: WRITE
  • Prompt: !!,"Calling text editor, please wait..."
  • Line Location: TEXTEDIT+5
Function Call: WRITE
  • Prompt: !,"No changes made..."
  • Line Location: TEXTEDIT+24
Routine Call
  • DIE
  • Line Location:
    • DIE+10
    • DIE+17
    • TEXTEDIT+23
    • TEXTEDIT+25
Routine Call
  • DIC
  • Line Location:
    • BOIL+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TIU(8925 - [#8925] DIE+3, DIE+7*, DIE+8, DIE+9, DIE+16, DIE+19, TEXTEDIT+3, TEXTEDIT+4, TEXTEDIT+9, TEXTEDIT+11
, LOADDFLT+2, LOADDFLT+4*, LOADDFLT+5!, LOADDFLT+6*, LOADDFLT+12*, LOADDFLT+13*
^TIU(8925.1 - [#8925.1] SETTL+10, LOADDFLT+4, LOADDFLT+7, LOADDFLT+8, LOADDFLT+14, BOIL+9, CANXEC+1

Label References

Name Line Occurrences
$$APPEND BOIL+9
$$BOIL LOADDFLT+10
$$CANXEC BOIL+9
$$REPLACE BOIL+20
INSMULT LOADDFLT+11
LOADDFLT TEXTEDIT+9, LOADDFLT+18
TEXTEDIT DIE+15

Naked Globals

Name Field # of Occurrence
^(9 BOIL+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
COUNT BOIL~
DA DIE~, DIE+3, DIE+7, DIE+8, DIE+9, DIE+13, DIE+15, DIE+16, DIE+17, DIE+18
, DIE+19, TEXTEDIT~, TEXTEDIT+3, TEXTEDIT+4, TEXTEDIT+7, TEXTEDIT+8, TEXTEDIT+9, TEXTEDIT+10, TEXTEDIT+11, TEXTEDIT+14
, TEXTEDIT+16, TEXTEDIT+18, TEXTEDIT+24, TEXTEDIT+25, LOADDFLT~, LOADDFLT+2, LOADDFLT+4, LOADDFLT+5, LOADDFLT+6, LOADDFLT+11
, LOADDFLT+12, LOADDFLT+13, LOADDFLT+18
DDWRW TEXTEDIT+1~, TEXTEDIT+11*
DFN GETVST~, GETVST+19
DIC TEXTEDIT+1~, TEXTEDIT+10*, BOIL+1~, BOIL+3*
DIC("S" BOIL+4*
DIC(0 BOIL+3*
DIE DIE+1~, DIE+10*, DIE+17*, TEXTEDIT+22*, TEXTEDIT+25*
>> DIROUT GETVST+20
DIWE TEXTEDIT+1~
DIWESUB TEXTEDIT+1~, TEXTEDIT+10*
DIWPT TEXTEDIT+1~
DR DIE+1~, DIE+8*, DIE+9, DIE+17*, TEXTEDIT+1~, TEXTEDIT+22*, TEXTEDIT+25*
DT LOADDFLT+6, LOADDFLT+13
>> DTOUT GETVST+20, DIE+11
DUZ DIE+2, DIE+7
DWHD TEXTEDIT+1~
DWI TEXTEDIT+1~
DWLC TEXTEDIT+1~
DWLR TEXTEDIT+1~
DWLW TEXTEDIT+1~, TEXTEDIT+12*
DWO TEXTEDIT+1~
DWPK TEXTEDIT+1~, TEXTEDIT+12*
EVNTFLAG GETVST~, GETVST+9, GETVST+11
LINE BOIL~, BOIL+5, BOIL+20*, BOIL+21, REPLACE~, REPLACE+1*, REPLACE+2, INSMULT~, INSMULT+2, INSMULT+4
, INSMULT+5, INSMULT+6, INSMULT+12
>> NOSAVE SETTL+8, TEXTEDIT+14, CANXEC+2
TARGET INSMULT~, INSMULT+14, INSMULT+15, INSMULT+17, INSMULT+19, INSMULT+20, INSMULT+21, INSMULT+22
TIU GETVST~, GETVST+19, ASKOK~, DIE+13, DIE+18
TIU("PNM" TEXTEDIT+10
TIU("VSTR" GETVST+21, ASKOK+11
TIUASK ASKOK~
TIUBY ASKOK~
TIUCHNG DIE~, DIE+15, TEXTEDIT~, TEXTEDIT+19*, TEXTEDIT+24*
TIUCKSM0 TEXTEDIT+2~, TEXTEDIT+8*, TEXTEDIT+17, TEXTEDIT+18
TIUCKSM1 TEXTEDIT+2~, TEXTEDIT+16*, TEXTEDIT+17, TEXTEDIT+18
TIUCLASS SETTL~, SETTL+15
TIUCMMT TEXTEDIT~
TIUDFLT SETTL+6~, SETTL+14*, SETTL+15
TIUESBLK TEXTEDIT+2~, TEXTEDIT+4*
TIUESNM TEXTEDIT+2~, TEXTEDIT+3*, TEXTEDIT+21
TIUFITEM LOADDFLT+15~
TIUFITEM( LOADDFLT+17, LOADDFLT+18
TIUFPRIV BOIL+1~*
TIUI LOADDFLT+1~*, LOADDFLT+7*, LOADDFLT+8, LOADDFLT+15~, LOADDFLT+17*, LOADDFLT+18, BOIL+1~, BOIL+5*, BOIL+13, BOIL+17
, BOIL+20, REPLACE~, REPLACE+1, INSMULT+3~, INSMULT+6*, INSMULT+8*, INSMULT+11, INSMULT+12
TIUJ LOADDFLT+1~, LOADDFLT+2*, LOADDFLT+4, LOADDFLT+5*, LOADDFLT+6, LOADDFLT+8*, LOADDFLT+10, LOADDFLT+11, LOADDFLT+12, LOADDFLT+13
TIUK LOADDFLT+1~
TIUL LOADDFLT+1~, LOADDFLT+18*
TIULCNT INSMULT~, INSMULT+14*, INSMULT+15, INSMULT+16*, INSMULT+17, INSMULT+19*, INSMULT+20, INSMULT+21*, INSMULT+22
TIULINE INSMULT+3~, INSMULT+6*, INSMULT+7*, INSMULT+13, INSMULT+15, INSMULT+18, INSMULT+20
TIULMETH GETVST+7~, GETVST+12*, GETVST+13, GETVST+17
>> TIUNEW DIE+12
TIUNEWG BOIL+2~, BOIL+17*, BOIL+18, BOIL+19
TIUNEWR BOIL+2~, BOIL+13*, BOIL+14, BOIL+15
TIUODA CANXEC~, CANXEC+1
TIUOLDG BOIL+2~, BOIL+17*, BOIL+18
TIUOLDR BOIL+2~, BOIL+13*, BOIL+14
TIUOST CANXEC+1~*, CANXEC+2
>> TIUOUT SETTL+16*, GETVST+13*, ASKOK+5*
TIUPC INSMULT+1~, INSMULT+2*, INSMULT+4, INSMULT+5, INSMULT+6, INSMULT+7, INSMULT+12
>> TIUPREF DIE+2*
>> TIUPRM3 TEXTEDIT+6
TIUQUIT GETVST+20*, DIE~, DIE+5*, DIE+9*, DIE+11*, DIE+12, DIE+13, DIE+14, DIE+16*, TEXTEDIT+14*
TIUSCNT INSMULT+3~, INSMULT+6*, INSMULT+10*, INSMULT+13, INSMULT+18
TIUSLINE INSMULT+9~, INSMULT+11*, INSMULT+12*, INSMULT+13, INSMULT+17, INSMULT+18, INSMULT+20, INSMULT+22
TIUSRC INSMULT+3~, INSMULT+4*, INSMULT+8, INSMULT+11, INSMULT+12, INSMULT+23
TIUTAIL INSMULT+3~, INSMULT+5*, INSMULT+12
TIUTITLE SETTL~, SETTL+8, SETTL+9*, SETTL+10
TIUTYP SETTL~, SETTL+9*, SETTL+15, SETTL+16, SETTL+17*, GETVST~, GETVST+9, GETVST+12, GETVST+15, ASKOK~
, ASKOK+4, ASKOK+7, LOADDFLT~, LOADDFLT+4, LOADDFLT+7, LOADDFLT+8, LOADDFLT+14, LOADDFLT+16
TIUTYP(1 SETTL+10*, SETTL+11*, SETTL+17, TEXTEDIT+9
TIUVMETH ASKOK+3~, ASKOK+4*, ASKOK+5, ASKOK+9
TIUVSUPP GETVST+7~, GETVST+8*, GETVST+9*, GETVST+11
TIUX INSMULT+3~
TIUXL APPEND+1~*, APPEND+2
TIUY CANXEC+1~, CANXEC+2*, CANXEC+3
U SETTL+8, SETTL+9, SETTL+10, SETTL+11, SETTL+17, DIE+8, DIE+9, TEXTEDIT+3, TEXTEDIT+4, TEXTEDIT+9
, TEXTEDIT+11, LOADDFLT+2, LOADDFLT+4, LOADDFLT+6, LOADDFLT+13, CANXEC+1
>> VALMAR TEXTEDIT+11
>> VALMBG TEXTEDIT+11
X LOADDFLT+8*, LOADDFLT+9*, LOADDFLT+10*, LOADDFLT+11, LOADDFLT+12, BOIL+1~, BOIL+5*, BOIL+7*, BOIL+9*, BOIL+10*
, BOIL+11, BOIL+12, BOIL+13, BOIL+15*, BOIL+16, BOIL+17, BOIL+19*, BOIL+20, REPLACE~, REPLACE+1
, APPEND~, APPEND+1, APPEND+2*, APPEND+3
>> XWBOS LOADDFLT+9
Y DIE+1~, DIE+11, BOIL+1~, BOIL+7, BOIL+8, BOIL+9

Marked Items

Name Field # of Occurrence
$T(DOLMLINE^TIUSRVF1 LOADDFLT+9
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All