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  | All
Print Page as PDF
Routine: TIUABBV1

Package: Text Integration Utility

Routine: TIUABBV1


Information

TIUABBV1 ;BPOIFO/JLTP/EL - Entries for UNAUTHORIZED ABBREVIATIONS ;9/23/2015

Source Information

Source file <TIUABBV1.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 6 FILE^DICN  $$GET1^DID  (,HELP)^DIE  RECALL^DILFD  GETS^DIQ  ^DIR  
Kernel 1 $$UP^XLFSTR  

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 TIU ABBV ENTER EDIT  

Entry Points

Name Comments DBIA/ICR reference
EN ;Manage Unauthorized Abbreviations
ENTER ;
STOP ;
HD ; Header for Enter/Edit Unauthorized Abbreviation
TIUDIC ;
SEARCH(RESP,TP) ; Search for matching ABBREVIATION
S10
S20
SOUT ; OUT from SEARCH
S30
S40
ASK(RESP) ; Ask if adding a new entry
GETFLD(FILE,SEQ,FLD) ; Get field value
DICHLP ; Help for lookup
H10
H20

External References

Name Field # of Occurrence
FILE^DICN TIUDIC+42, ASK+5
$$GET1^DID TIUDIC+9
^DIE ENTER+17, ENTER+23, ENTER+29
HELP^DIE DICHLP+3
RECALL^DILFD ENTER+10
GETS^DIQ GETFLD+3
^DIR TIUDIC+25, TIUDIC+40, ASK+4, DICHLP+7
$$UP^XLFSTR SEARCH+4, S10+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: ENTER+8
Function Call: WRITE
  • Prompt: !!,"The Abbreviation '"_ABBV_"' has a NATIONAL class. Therefore, it cannot be modified.",!
  • Line Location: ENTER+13
Function Call: WRITE
  • Prompt: !!,"Unauthorized Abbreviation: ",ABBV
  • Line Location: ENTER+14
Function Call: WRITE
  • Prompt: !
  • Line Location: ENTER+15
Function Call: WRITE
  • Prompt: *7,!!,"Other user is editing this abbreviation '",ABBV,"'. Try later.",!!
  • Line Location: ENTER+16
Function Call: WRITE
  • Prompt: !!,XX,!!
  • Line Location: ENTER+21
Function Call: WRITE
  • Prompt: !!,"** New Local '",ABBV,"' has been added. **"
  • Line Location: ENTER+24
Function Call: WRITE
  • Prompt: !,"Abbreviation Exact Match: "_$$GETFLD(FILE,SEQ,".03")
  • Line Location: ENTER+25
Function Call: WRITE
  • Prompt: !,"Status: "_$$GETFLD(FILE,SEQ,".04")
  • Line Location: ENTER+26
Function Call: WRITE
  • Prompt: !!,"Unauthorized Abbreviation: ",ABBV
  • Line Location: ENTER+27
Function Call: WRITE
  • Prompt: !!,XX,!!
  • Line Location: ENTER+32
Function Call: READ
  • Formatting: !
  • Prompt: "Enter <RETURN> to continue or '^' to exit: "
  • Variable: J
  • Timeout: TWAIT
  • Line Location: STOP+2
Function Call: WRITE
  • Prompt: @IOF,!!
  • Line Location: HD+6
Function Call: WRITE
  • Prompt: " "
  • Line Location: HD+6
Function Call: WRITE
  • Prompt: H1,!
  • Line Location: HD+7
Function Call: WRITE
  • Prompt: " "
  • Line Location: HD+7
Function Call: WRITE
  • Prompt: H2
  • Line Location: HD+8
Function Call: READ
  • Variable: X
  • Timeout: TWAIT
  • Line Location: TIUDIC+2
Function Call: WRITE
  • Prompt: X
  • Line Location: TIUDIC+6
Function Call: WRITE
  • Prompt: !
  • Line Location: TIUDIC+7
Function Call: WRITE
  • Prompt: !
  • Line Location: TIUDIC+14
Function Call: WRITE
  • Prompt: !
  • Line Location: TIUDIC+16
Function Call: WRITE
  • Prompt: !!,"No action has been taken !!",!
  • Line Location: TIUDIC+26
Function Call: WRITE
  • Prompt: !!,"Nothing is selected !!",!
  • Line Location: TIUDIC+27
Function Call: WRITE
  • Prompt: !!,"Nothing is selected !!",!
  • Line Location: TIUDIC+28
Function Call: WRITE
  • Prompt: !!,"No action has been taken !!",!
  • Line Location: TIUDIC+29
Function Call: WRITE
  • Prompt: !!,"The EXACT-MATCH for the following active abbreviation is set to """_"NO"_""""_": "
  • Line Location: TIUDIC+33
Function Call: WRITE
  • Prompt: !," "_XX
  • Line Location: TIUDIC+34
Function Call: WRITE
  • Prompt: !,"As a result, this abbreviation '"_RESP_"' will be flagged as unauthorized.",!
  • Line Location: TIUDIC+35
Function Call: WRITE
  • Prompt: !!,"No action has been taken !!",!
  • Line Location: TIUDIC+41
Function Call: WRITE
  • Prompt: !!
  • Line Location: DICHLP+3
Function Call: WRITE
  • Prompt: !,HLP("DIHELP",HLP)
  • Line Location: DICHLP+4
Function Call: WRITE
  • Prompt: !
  • Line Location: DICHLP+8
Function Call: READ
  • Formatting: !!
  • Prompt: "Enter <RETURN> to continue or '^' to exit: "
  • Variable: J
  • Timeout: DIR("T")
  • Line Location: H20+4
Function Call: WRITE
  • Prompt: !,C,")",?6,$E(XX,1,74)
  • Line Location: H20+13
Routine Call
  • DIE
  • Line Location:
    • ENTER+17
    • ENTER+23
    • ENTER+29
Routine Call
  • DIE
  • Line Location:
    • DICHLP+3
Routine Call
  • DIR
  • Line Location:
    • TIUDIC+25
    • TIUDIC+40
    • ASK+4
    • DICHLP+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^TIU(8927.9 - [#8927.9] HELP^DIE

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC - [#1] EN+7
^DISV( TIUDIC+3, TIUDIC+4
^TIU( ENTER+16, ENTER+18, TIUDIC+6, TIUDIC+18, TIUDIC+43, TIUDIC+44, S10, S20, S20+1, S40+1
, H10, H20, H20+1
^TIU(8927.9 - [#8927.9] S40

Label References

Name Line Occurrences
$$ASK TIUDIC+15
$$GETFLD ENTER+20, ENTER+25, ENTER+26, ENTER+31, S20+10, S20+12, S20+14, H20+9, H20+10, H20+11
DICHLP TIUDIC+8
ENTER ENTER+7, ENTER+8, ENTER+11, ENTER+34
H10 H20
H20 H20+2, H20+14
HD ENTER+2
S10 S10+2, S20
S20 S20+2, S20+18
S30 S30+9
S40 S30
SEARCH TIUDIC+13
SOUT S10
STOP ENTER+8, ENTER+11, ENTER+33
TIUDIC ENTER+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ABBV EN+1~, ENTER+4*, ENTER+9*, ENTER+13, ENTER+14, ENTER+16, ENTER+19, ENTER+24, ENTER+27, ENTER+30
, SEARCH+1*, SEARCH+5*, S10*, S10+1, S10+3, S20, S20+17, DICHLP+1*, DICHLP+8*, H10*
, H20
ABBVU EN+1~, SEARCH+1*, S10+1*, S10+2
ACT EN+1~, ENTER+4*, ENTER+12*
ASK EN+1~, TIUDIC+1*, TIUDIC+15*, TIUDIC+17, TIUDIC+18
C EN+1~, TIUDIC+1*, TIUDIC+12*, TIUDIC+15, TIUDIC+20, TIUDIC+23, TIUDIC+24, SEARCH+1*, SEARCH+3*, S20+3*
, S20+17, SOUT+1, S40+1*, S40+2, DICHLP+1*, DICHLP+8*, H20+3*, H20+4, H20+13
CLS EN+1~, ENTER+4*, ENTER+12*, ENTER+13
DA EN+1~, ENTER+4*, ENTER+9*, ENTER+10, ENTER+16, ENTER+18
DESC EN+1~, ENTER+4*, ENTER+12*
DIC EN+4~, EN+8*, ENTER+3!, TIUDIC+42*, ASK+1!, ASK+5*
DIC("A" ENTER+5*, TIUDIC+2
DIC(0 TIUDIC+42*, ASK+5*
DIE EN+4~, EN+8*, ENTER+3!, ENTER+9*
DIR EN+4~, TIUDIC+19!, TIUDIC+36!, ASK+1!, DICHLP+1!
DIR("A" TIUDIC+21*, TIUDIC+22*, TIUDIC+23*, TIUDIC+24*, TIUDIC+38*, ASK+3*, DICHLP+6*
DIR("B" TIUDIC+39*, ASK+4*, DICHLP+7*
DIR("T" TIUDIC+19*, TIUDIC+36*, ASK+2*, DICHLP+2*, H20+4
DIR(0 TIUDIC+20*, TIUDIC+37*, ASK+3*, DICHLP+5*
DIRUT EN+4~, TIUDIC+41, ASK+4, DICHLP+7
DR EN+1~, ENTER+4*, ENTER+15*, ENTER+22*, ENTER+28*
DTIME EN+10
DUOUT EN+4~, TIUDIC+26
DUZ ENTER+10, TIUDIC+3, TIUDIC+4
EXACT EN+1~, SEARCH+1*, SEARCH+3*, S10+3*
FILE EN+1~, EN+6*, EN+7*, EN+8, ENTER+9, ENTER+10, ENTER+16, ENTER+18, ENTER+20, ENTER+25
, ENTER+26, ENTER+31, TIUDIC+3, TIUDIC+4, TIUDIC+6, TIUDIC+9, TIUDIC+18, TIUDIC+43, TIUDIC+44, S10
, S20, S20+1, S20+10, S20+12, S20+14, S40+1, GETFLD~, GETFLD+3, GETFLD+4, H10
, H20, H20+1, H20+9, H20+10, H20+11
FILENAME EN+1~, EN+6*, EN+7*, ASK+3
FLD EN+1~, GETFLD~, GETFLD+3, GETFLD+4
H1 EN+2~, HD+1*, HD+2*, HD+3, HD+5, HD+7
H2 EN+2~, HD+1*, HD+3*, HD+8
HLP EN+2~, DICHLP+1*, DICHLP+4*
HLP("DIHELP" DICHLP+4
I EN+2~, HD+1*, HD+3*, HD+6*, HD+7*, TIUDIC+1*, TIUDIC+23*, SOUT+2*, SOUT+3*, S30*
, S30+2, S30+8
IOF HD+6
IOM HD+4*, HD+5
J EN+2~, STOP+1*, STOP+2*, STOP+3, SOUT+2*, S30+1*, S30+3*, S30+4*, S30+5*, S30+6*
, DICHLP+1*, H20+4*
L EN+2~, SOUT+2*, S30+1*, S30+3*, S30+4*, S30+5*, S30+6*
L1 EN+2~, SEARCH+1*, SEARCH+3*, S20+9*, S30+3
L2 EN+2~, SEARCH+1*, SEARCH+3*, S20+11*, S30+4
L3 EN+2~, SEARCH+1*, SEARCH+3*, S20+13*, S30+5
L4 EN+2~, SEARCH+1*, SEARCH+3*, S20+15*, S30+6
L5 EN+2~, SEARCH+1*, SEARCH+3*
MCH EN+2~, ENTER+4*, ENTER+12*
NEW EN+2~, ENTER+4*, ENTER+9*, ENTER+11
RESP EN+2~, TIUDIC+1*, TIUDIC+12*, TIUDIC+13, TIUDIC+15, TIUDIC+35, TIUDIC+38, TIUDIC+42, SEARCH~, SEARCH+4
, S10+3, S40, S40+2, ASK~, ASK+3, ASK+5
RESP1 EN+2~, SEARCH+1*, SEARCH+4*, S10+2
SEQ EN+2~, ENTER+20, ENTER+25, ENTER+26, ENTER+31, TIUDIC+1*, TIUDIC+18*, TIUDIC+43*, TIUDIC+44*, SEARCH+2*
, S10+4*, S20*, S20+1, S20+10, S20+12, S20+14, S20+17, S40+1*, S40+2, GETFLD~
, GETFLD+2, DICHLP+1*, H10+1*, H20*, H20+1, H20+9, H20+10, H20+11
STOP EN+2~, EN+6*, ENTER+1, ENTER+7*, STOP+1*, STOP+3*, TIUDIC+31, TIUDIC+41*
TIUINP EN+3~, TIUDIC+9*, TIUDIC+10
TP EN+3~, ENTER+3!, TIUDIC+1*, TIUDIC+12!, TIUDIC+13, SEARCH~
TP( TIUDIC+12*, TIUDIC+23, TIUDIC+30, TIUDIC+44, S20+17*, S30, S30+2, S30+8*, S40+2*
TP(0 TIUDIC+21, TIUDIC+27, TIUDIC+31, TIUDIC+32, SEARCH+3*, S10+3*, S20+7*, S20+8*
TPUN EN+3~, EN+5*, S10+2
TRET EN+3~, GETFLD+1*, GETFLD+4*, GETFLD+5
TSEQ EN+3~, GETFLD+1*, GETFLD+2*, GETFLD+3, GETFLD+4
TWAIT EN+3~, EN+6*, EN+9*, EN+10*, STOP+2, TIUDIC+2, TIUDIC+19, TIUDIC+36, ASK+2, DICHLP+2
U EN+7, ENTER+9, ENTER+12, STOP+2, STOP+3, TIUDIC+2, TIUDIC+6, TIUDIC+18, TIUDIC+21, TIUDIC+23
, TIUDIC+30, TIUDIC+31, TIUDIC+32, TIUDIC+43, TIUDIC+44, S10+3, S20+5, S20+7, S20+8, S20+17
, S30+2, S30+8, S40+1, S40+2, H20+4, H20+6, H20+7
X EN+3~, ENTER+4*, ENTER+12*, HD+1*, HD+5*, HD+6, HD+7, TIUDIC+1*, TIUDIC+2*, TIUDIC+3
, TIUDIC+6*, TIUDIC+8, TIUDIC+11, TIUDIC+12, TIUDIC+27, TIUDIC+30, TIUDIC+42*, ASK+5*
X1 EN+3~, SEARCH+2*, S20+4*, S20+5*, S20+7, S20+8, S20+9, S20+17, SOUT+2*, S30+1*
, S30+3*, S30+8, DICHLP+1*, H20+5*, H20+6*, H20+8*, H20+12
X2 EN+3~, SEARCH+2*, S20+4*, S20+5*, S20+10*, S20+11, S20+17, SOUT+2*, S30+1*, S30+4*
, S30+8, DICHLP+1*, H20+5*, H20+6*, H20+9*, H20+12
X3 EN+3~, SEARCH+2*, S20+4*, S20+5*, S20+6, S20+12*, S20+13, S20+17, SOUT+2*, S30+1*
, S30+5*, S30+8, DICHLP+1*, H20+5*, H20+6*, H20+10*, H20+12
X4 EN+3~, SEARCH+2*, S20+4*, S20+5*, S20+6, S20+14*, S20+15, S20+17, SOUT+2*, S30+1*
, S30+6*, S30+8, DICHLP+1*, H20+5*, H20+7*, H20+11*, H20+12
X5 EN+3~, SEARCH+2*, S20+4*, S20+5*, S20+16*, S20+17, SOUT+2*, S30+1*, S30+7*, DICHLP+1*
, H20+5*, H20+7*
XX EN+3~, ENTER+4*, ENTER+19*, ENTER+20*, ENTER+21, ENTER+30*, ENTER+31*, ENTER+32, TIUDIC+1*, TIUDIC+32*
, TIUDIC+34, SEARCH+2*, S20+1*, S20+2, S20+5, SOUT+2*, S30+1*, S30+2*, S30+3, S30+4
, S30+5, S30+6, S30+7, H20+1*, H20+2, H20+6, H20+7, H20+12*, H20+13
Y EN+3~, ENTER+4*, ENTER+7, ENTER+8, ENTER+9, TIUDIC+1*, TIUDIC+2*, TIUDIC+3*, TIUDIC+4*, TIUDIC+5
, TIUDIC+6, TIUDIC+8*, TIUDIC+11*, TIUDIC+17*, TIUDIC+18*, TIUDIC+26*, TIUDIC+27*, TIUDIC+28*, TIUDIC+29*, TIUDIC+41*
, TIUDIC+43, TIUDIC+44*, ASK+4, ASK+6, DICHLP+7
Y(0 ENTER+12, TIUDIC+18*, TIUDIC+29, TIUDIC+30, TIUDIC+43*, TIUDIC+44*
ZZ EN+3~, ENTER+3!
ZZ( GETFLD+4
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  | All