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

Package: Text Integration Utility

Routine: TIUGEDI1


Information

TIUGEDI1 ; SLC/MAM - Enter New ID Document Code; 11/14/00

Source Information

Source file <TIUGEDI1.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Text Integration Utility 4 ($$CREATREC,$$EXIST)^TIUEDI3  DOCPRM^TIULC1  $$CANDO^TIULP  $$READ^TIUU  

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

Package Total Caller Graph
Text Integration Utility 1 TIUGEDIT  

Entry Points

Name Comments DBIA/ICR reference
GETRECG(DFN,TIU,TIUTYP,TIUDPRM,TIUNEW,EDIT,DADDA) ; Get record
GETX ;
EXISTLNK(DFN,TIUTYP,TIUVSTR,PERSON,DADDA) ; If a docmt PERSON
LOOP ; -- Find existing docmt for given patient, title, & visit:--
EXISTLX ;

External References

Name Field # of Occurrence
$$CREATREC^TIUEDI3 GETRECG+29, GETRECG+37, GETRECG+44
$$EXIST^TIUEDI3 GETRECG+22
DOCPRM^TIULC1 GETRECG+20
$$CANDO^TIULP GETRECG+46, LOOP+8, LOOP+15
$$READ^TIUU GETRECG+36, GETRECG+42

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"There is already a ",$P(TIUTYP(1),U,3),".",!,"Only ONE record of this type per Visit is allowed...",!
  • Line Location: GETRECG+30
Function Call: WRITE
  • Prompt: !,"The note already has an ID entry you can edit with that title and visit"
  • Line Location: GETRECG+35
Function Call: WRITE
  • Prompt: !,"Opening the existing entry"
  • Line Location: GETRECG+38
Function Call: WRITE
  • Prompt: !,"You already have a document you can link for that patient, title, and visit."
  • Line Location: GETRECG+41
Function Call: WRITE
  • Prompt: !,"Opening the existing entry"
  • Line Location: GETRECG+47
Function Call: WRITE
  • Prompt: !,"No new entry created"
  • Line Location: GETX+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TIU(8925 - [#8925] GETRECG+34, LOOP+1, LOOP+3, LOOP+4!, LOOP+7, LOOP+12

Label References

Name Line Occurrences
$$EXISTLNK GETRECG+25
GETX GETRECG+28, GETRECG+34, GETRECG+43, GETRECG+44, GETRECG+47, GETRECG+49

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CANDO GETRECG+46~*, GETRECG+47, GETRECG+49
CANLINK EXISTLNK+6~, LOOP+8~*, LOOP+10
DA GETRECG+16~, GETRECG+29*, GETRECG+37*, GETRECG+38*, GETRECG+44*, GETRECG+47*, GETRECG+50*, GETX+1, GETX+2, EXISTLNK+6~
, EXISTLNK+8*, LOOP+1, LOOP+17*, LOOP+19*, EXISTLX+1
DADDA GETRECG~, GETRECG+25, GETRECG+34, EXISTLNK~, LOOP+13
DALKABLE GETRECG+16~, GETRECG+25*, GETRECG+28, GETRECG+34, GETRECG+38, GETRECG+46, GETRECG+47, GETRECG+50
DALKDAD EXISTLNK+6~, LOOP+12*, LOOP+13, LOOP+15, LOOP+17
DFN GETRECG~, GETRECG+22, GETRECG+25, GETRECG+29, GETRECG+37, GETRECG+44, EXISTLNK~, LOOP+1, LOOP+4
>> DIROUT GETRECG+43
>> DTOUT GETRECG+43
>> DUOUT GETRECG+43
DUZ GETRECG+25, EXISTLNK+7
EDIT GETRECG~, GETRECG+21*, GETRECG+38*, GETRECG+47*
MULTOK GETRECG+16~, GETRECG+20*, GETRECG+22
PERSON EXISTLNK~, EXISTLNK+7*, LOOP+8
REQUEST EXISTLNK+6~, EXISTLNK+8*, LOOP+1, LOOP+7*
TIU GETRECG~, GETRECG+29, GETRECG+37, GETRECG+44
TIU("VSTR" GETRECG+22, GETRECG+25
TIUDPRM GETRECG~, GETRECG+20
TIUDPRM(0 GETRECG+20
TIUI EXISTLNK+6~, EXISTLNK+8*, LOOP+1*, LOOP+3, LOOP+4, LOOP+7, LOOP+8, LOOP+12, LOOP+15, LOOP+17
, LOOP+19
TIUNEW GETRECG~, GETRECG+21*, GETRECG+29*, GETRECG+37*, GETRECG+44*, GETX+1*
TIUTYP GETRECG~, GETRECG+20, GETRECG+22, GETRECG+25, EXISTLNK~, LOOP+1, LOOP+4
TIUTYP(1 GETRECG+29, GETRECG+30, GETRECG+37, GETRECG+44
TIUVSTR EXISTLNK~, LOOP+1, LOOP+4
TLFULL GETRECG+16~, GETRECG+21*, GETRECG+22*, GETRECG+29, GETRECG+30
U GETRECG+20, GETRECG+30, LOOP+7
YESDOIT GETRECG+16~, GETRECG+36*, GETRECG+37, GETRECG+42*, GETRECG+44
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All