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

Package: Lexicon Utility

Routine: LEXAR8


Information

LEXAR8 ;ISL/KER - Look-up Response (CONCEPT USAGE update) ;05/23/2017

Source Information

Source file <LEXAR8.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Kernel 4 HOME^%ZIS  ^%ZTLOAD  $$DT^XLFDT  $$UP^XLFSTR  
VA FileMan 4 (FILE,UPDATE)^DIE  (IX1,IX2)^DIK  $$IENS^DILF  $$GET1^DIQ  
DRG Grouper 1 ($$CODEC,$$CSI,$$SAB)^ICDEX  
Lexicon Utility 1 $$STATCHK^LEXSRC2  

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

Package Total Caller Graph
Lexicon Utility 1 LEXA  

Entry Points

Name Comments DBIA/ICR reference
EDIT(M,S,X,Y) ; Edit CONCEPT USAGE file 757.001 (FileMan)
; M Major Concept IEN
; S System/Type of Edit
; X Originating Value
; Y Frequency
INC(X) ; Increment Expression
UPD ; Update CONCEPT USAGE file 757.001 (using Problem List)
UPDT ; Update CONCEPT USAGE file 757.001 (TaskMan)
POP ; Populate the Original Value (ONLY)
UPDF(M,S,X,Y) ; Update CONCEPT USAGE file 757.001 (FileMan)
POPT ; Populate the Original Value (ONLY) (TaskMan)
ENV(X) ; Check environment
ORIG(X) ; Get frequency based on codes and semantics
CLEAR ; Set the Frequency to the Original Value
CLEART ; Set the Frequency to the Original Value (TaskMan)

External References

Name Field # of Occurrence
HOME^%ZIS ENV+1
^%ZTLOAD UPDT+4, CLEART+4, POPT+4
FILE^DIE UPDF+7, EDIT+11
UPDATE^DIE EDIT+15
IX1^DIK POP+6, POP+17, INC+22
IX2^DIK POP+5, POP+15, INC+20
$$IENS^DILF UPDF+5, EDIT+10
$$GET1^DIQ UPD+14, ENV+3
$$CODEC^ICDEX UPD+6
$$CSI^ICDEX UPD+7
$$SAB^ICDEX UPD+8
$$STATCHK^LEXSRC2 UPD+9, UPD+15
$$DT^XLFDT UPD+2, ENV+1
$$UP^XLFSTR ORIG+26

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"CONCEPT USAGE update tasked (Task #"_+($G(ZTSK))_"). "
  • Line Location: UPDT+6
Function Call: WRITE
  • Prompt: !,LEXS,?15,LEXMIEN,?25,LEXORG,?30,LEXFRQ
  • Line Location: UPDF+9
Function Call: WRITE
  • Prompt: ?35,"(formerly ",LEXOFQ,")"
  • Line Location: UPDF+10
Function Call: WRITE
  • Prompt: !,"CONCEPT USAGE update tasked (Task #"_+($G(ZTSK))_"). "
  • Line Location: CLEART+6
Function Call: WRITE
  • Prompt: !,"CONCEPT USAGE update tasked (Task #"_+($G(ZTSK))_"). "
  • Line Location: POPT+6
Function Call: WRITE
  • Prompt: !,"Populate",?15,LEXMIEN,?25,LEXORG,?30,LEXFRQ,?35,"(new)"
  • Line Location: POP+8
Function Call: WRITE
  • Prompt: !,"Populate",?15,LEXMIEN,?25,LEXORG
  • Line Location: POP+19
Function Call: WRITE
  • Prompt: ?35,"(formerly ",LEXOFQ,")"
  • Line Location: EDIT+18
Function Call: WRITE
  • Prompt: !!,?5,"DUZ not defined"
  • Line Location: ENV+2
Function Call: WRITE
  • Prompt: !!,?5,"DUZ not valid"
  • Line Location: ENV+4
Routine Call
  • %ZIS
  • Line Location:
    • ENV+1
Routine Call
  • DIE
  • Line Location:
    • UPDF+7
    • EDIT+11
Routine Call
  • DIE
  • Line Location:
    • EDIT+15

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^LEX(757.001 - [#757.001] Classic Fileman Calls
^AUPNPROB - [#9000011] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNPROB("B" UPD+2, UPD+3
^LEX(757 - [#757] UPD+40, CLEAR+1, POP+1, ORIG+1, INC+17
^LEX(757.001 - [#757.001] UPD+43, UPDF+2, UPDF+3, UPDF+4, UPDF+6, CLEAR+4, POP+3, POP+5*, POP+9, POP+13
, POP+14, POP+16*, EDIT+6, EDIT+7, EDIT+8, EDIT+9, EDIT+13, INC+17, INC+18, INC+19
, INC+21*
^LEX(757.01 - [#757.01] UPD+41, ORIG+25, ORIG+26, INC+16
^LEX(757.02 - [#757.02] UPD+21, UPD+30, UPD+37, UPD+38, ORIG+2, ORIG+3
^LEX(757.1 - [#757.1] ORIG+18, ORIG+19
^TMP("LEXPL" UPD+1!, UPD+11*, UPD+12*, UPD+13*, UPD+17*, UPD+18*, UPD+19, UPD+22!, UPD+23*, UPD+24
, UPD+25, UPD+28, UPD+31!, UPD+32*, UPD+33, UPD+39, UPD+45!, UPDF+3, UPDF+8*, CLEAR+6!
, POP+21!, EDIT+7, EDIT+17*

Label References

Name Line Occurrences
$$ENV UPDT+2, CLEART+2, POPT+2
$$ORIG UPD+24, UPD+33, UPD+42, CLEAR+2, POP+4, POP+11
@( UPDT+4, CLEART+4, POPT+4
EDIT CLEAR+5
UPDF UPD+27, UPD+34, UPD+43

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA UPDF+1~, UPDF+4*, UPDF+5, POP+5~*, POP+6~*, POP+14~, POP+15*, POP+17~*, EDIT+10~*, EDIT+14~
, INC+15~, INC+20*, INC+22*
DIK POP+5~*, POP+6~*, POP+14~, POP+15*, POP+17~*, INC+15~, INC+20*, INC+22*
DT ENV+1*
DUZ ENV+2, ENV+3
LEXBD ORIG+1~, ORIG+19~*, ORIG+22, ORIG+24
LEXBUILD UPDT+5, UPDF+1~, CLEART+5, POPT+5
LEXCL ORIG+1~, ORIG+3~, ORIG+7*, ORIG+10*, ORIG+12*, ORIG+14*, ORIG+16*, ORIG+17, ORIG+19~*, ORIG+22*
, ORIG+24*
LEXCOD UPD+6*, UPD+9, UPD+14*, UPD+15, UPD+20~, UPD+29~
LEXCT UPD+1~*, UPD+44, UPD+45, UPDF+8*, CLEAR+1~*, CLEAR+6, CLEAR+7, POP+1~*, POP+6*, POP+17*
, POP+21, POP+22, EDIT+12*, EDIT+16*
LEXDA EDIT+10~, EDIT+14~
LEXDA(1 EDIT+14*
LEXDES UPD+20~, UPD+29~
LEXDIF POP+2~, POP+10*, POP+11
LEXEIEN UPD+20~, UPD+21*, UPD+29~, UPD+30*, UPD+38~, UPD+40*, UPD+41, INC+15~, INC+16*
LEXENV UPDT+1~, UPDT+2*, CLEART+1~, CLEART+2*, POPT+1~, POPT+2*
LEXERR UPDF+1~, UPDF+7!, UPDF+8, EDIT+5~, EDIT+9!, EDIT+10~, EDIT+11!, EDIT+12, EDIT+14~, EDIT+15!
, EDIT+16
LEXFDA UPDF+1~, EDIT+10~, EDIT+14~
LEXFDA( UPDF+5*, UPDF+7*, EDIT+10*, EDIT+11*, EDIT+14*, EDIT+15*
LEXFQ INC+15~, INC+19*, INC+21
LEXFRQ UPD+20~, UPD+25*, UPD+26, UPD+29~, UPD+33*, UPD+38~, UPD+42*, UPD+43, UPDF+1~, UPDF+2*
, UPDF+3, UPDF+6, UPDF+7, UPDF+9, UPDF+10, CLEAR+2~*, CLEAR+3, CLEAR+5, POP+2~, POP+4~*
, POP+8, POP+9*, POP+10, POP+11*, POP+12, POP+14, EDIT+5~, EDIT+6*, EDIT+7, EDIT+8
, EDIT+11, EDIT+15, EDIT+18
LEXFS ORIG+1~, ORIG+2*, ORIG+34*, ORIG+35
LEXID UPDF+9~*, EDIT+5~
LEXIENS UPDF+1~, UPDF+5*, UPDF+7, EDIT+10~*, EDIT+11, EDIT+14~
LEXIGHF UPDT+5, UPDF+1~, CLEART+5, POPT+5
LEXIIEN UPD+1~, UPD+2*, UPD+3, UPD+5, UPD+6, UPD+7
LEXLEX UPD+4~
LEXMC INC+15~, INC+18*, INC+19, INC+21
LEXMIEN UPD+20~, UPD+22*, UPD+23, UPD+24, UPD+27, UPD+29~, UPD+31*, UPD+32, UPD+33, UPD+34
, UPD+38~*, UPD+39, UPD+40, UPD+42, UPD+43, UPDF+1~, UPDF+2*, UPDF+3, UPDF+4, UPDF+5
, UPDF+6, UPDF+8, UPDF+9, CLEAR+1~*, CLEAR+2, CLEAR+3, CLEAR+4, CLEAR+5, POP+1~*, POP+3
, POP+4, POP+5, POP+6, POP+8, POP+9, POP+11, POP+12, POP+13, POP+14, POP+15
, POP+16, POP+17, POP+19, EDIT+5~, EDIT+6*, EDIT+7, EDIT+8, EDIT+9, EDIT+10, EDIT+13
, EDIT+14, EDIT+17, EDIT+18, ORIG+1~*, ORIG+2, ORIG+18, ORIG+25, INC+15~, INC+16*, INC+17
, INC+18, INC+19, INC+20, INC+21, INC+22
LEXND UPD+38~, UPD+42*, UPD+43, CLEAR+2~, CLEAR+3*, CLEAR+5, POP+2~, POP+4~*, POP+5, POP+9*
, POP+12*, POP+13, POP+16
LEXNEW UPD+20~, UPD+26*, UPD+27, UPD+29~, UPD+33*, UPD+34, UPDF+1~, UPDF+6*, POP+14~*, POP+20
, EDIT+5~, EDIT+8*, EDIT+9
LEXNM ENV+1~, ENV+3*, ENV+4
LEXNOD UPD+20~, UPD+21*, UPD+22, UPD+29~, UPD+30*, UPD+31, ORIG+1~, ORIG+3~*
LEXNOT UPD+1~
LEXNOT( UPD+5
LEXNOT(521774 UPD+1*
LEXNOT(5570 UPD+1*
LEXOFQ UPDF+1~, UPDF+4*, UPDF+10, CLEAR+2~, CLEAR+4*, EDIT+5~, EDIT+8*, EDIT+15*, EDIT+18
LEXOLD UPDF+1~, UPDF+6*, CLEAR+2~, CLEAR+4*, CLEAR+5, POP+14~*, POP+20, EDIT+5~, EDIT+9*
LEXOR INC+15~, INC+18*, INC+21
LEXORG UPD+20~, UPD+24*, UPD+26, UPD+27, UPD+29~, UPD+33*, UPD+34, UPD+38~, UPD+42*, UPD+43
, UPDF+1~, UPDF+2*, UPDF+3, UPDF+5, UPDF+6, UPDF+9, CLEAR+2~*, CLEAR+3, CLEAR+5, POP+2~
, POP+4~*, POP+8, POP+9*, POP+10, POP+11*, POP+12, POP+19, EDIT+5~, EDIT+6*, EDIT+7
, EDIT+8, EDIT+11, EDIT+14, EDIT+18
LEXPIEN UPD+3~*, UPD+14
LEXREQP UPDT+5, UPDF+1~, CLEART+5, POPT+5
LEXS UPD+36~*, UPD+37*, UPD+43, UPDF+1~, UPDF+2*, UPDF+9, EDIT+5~, EDIT+6*, EDIT+18*
LEXSAB UPD+8*, UPD+9, UPD+12, UPD+13, UPD+20~, UPD+24*, UPD+29~, UPD+33*, UPD+35*, UPD+36
, UPD+37, ORIG+1~, ORIG+3~*, ORIG+7, ORIG+10, ORIG+12, ORIG+14, ORIG+16
LEXSCT ORIG+1~, ORIG+26~*, ORIG+29*, ORIG+30*, ORIG+31*, ORIG+33*, ORIG+34
LEXSCTC UPD+4~
LEXSIEN UPD+4~, UPD+10*, UPD+11, UPD+12, UPD+13, UPD+16*, UPD+17, UPD+18, UPD+19*, UPD+21
, UPD+22, UPD+24, UPD+25, UPD+28*, UPD+30, UPD+31, UPD+33, UPD+36~, UPD+37*, UPD+38
LEXSM ORIG+1~, ORIG+2*, ORIG+24*, ORIG+35
LEXSO ORIG+1~, ORIG+2*, ORIG+17*, ORIG+35
LEXSTA UPD+4~, UPD+9*, UPD+10, UPD+15*, UPD+16, UPD+20~, UPD+29~
LEXSYS UPD+7*, UPD+8, UPD+20~, UPD+29~
LEXTD UPD+1~, UPD+2*, UPD+9, UPD+15
LEXTEST UPDT+4, UPDF+8, CLEART+4, POPT+4, POP+7, POP+18, EDIT+17, ENV+1~
LEXTIEN ORIG+1~, ORIG+2*, ORIG+3, ORIG+18*, ORIG+19, ORIG+25*, ORIG+26
LEXTX ORIG+1~, ORIG+26~*, ORIG+29, ORIG+30, ORIG+31, ORIG+33
M UPDF~, UPDF+2, EDIT~, EDIT+6
S UPDF~, EDIT~
U ORIG+3, ORIG+19, ENV+1*
X UPDT+1~, UPDF~, UPDF+2, CLEART+1~, POPT+1~, EDIT~, EDIT+6, ORIG~, ORIG+1, ORIG+2*
, ORIG+35*, ORIG+36, INC~, INC+16, ENV~
XPDENV UPDT+5, UPDF+1~, CLEART+5, POPT+5
Y UPDT+1~, UPDF~, UPDF+2, CLEART+1~, POPT+1~, EDIT~, EDIT+6
ZTDESC UPDT+1~, UPDT+3*, CLEART+1~, CLEART+3*, POPT+1~, POPT+3*
ZTDTH UPDT+1~, UPDT+2*, CLEART+1~, CLEART+2*, POPT+1~, POPT+2*
ZTIO UPDT+1~, UPDT+2*, CLEART+1~, CLEART+2*, POPT+1~, POPT+2*
ZTPRI UPDT+1~, UPDT+2*, CLEART+1~, CLEART+2*, POPT+1~, POPT+2*
ZTQUEUED UPDT+1~, UPD+44, UPD+45, UPDF+8, CLEART+1~, CLEAR+6, CLEAR+7, POPT+1~, POP+7, POP+18
, POP+21, POP+22, EDIT+17
ZTREQ UPDT+1~, CLEART+1~, POPT+1~
ZTRTN UPDT+1~, UPDT+2*, UPDT+4, CLEART+1~, CLEART+2*, CLEART+4, POPT+1~, POPT+2*, POPT+4
ZTSAVE UPDT+1~, CLEART+1~, POPT+1~
ZTSK UPDT+1~, UPDT+5, UPDT+6, CLEART+1~, CLEART+5, CLEART+6, POPT+1~, POPT+5, POPT+6
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