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

Package: Lexicon Utility

Routine: LEXWUP


Information

LEXWUP ;ISL/KER - Lexicon Keywords - Update (Purge) ;05/23/2017

Source Information

Source file <LEXWUP.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 3 HOME^%ZIS  ^%ZTLOAD  ($$DT,$$FMDIFF,$$FMTE,$$NOW)^XLFDT  
VA FileMan 2 ^DIK  $$GET1^DIQ  
Lexicon Utility 1 ($$RUN2,DT,STOP)^LEXWUM  

Entry Points

Name Comments DBIA/ICR reference
EN ; Main Entry Point (tasked)
INA(X) ; Inactive before Today or after LEXAFT (optional)
DINA ; Display Inactive Keyword
STOP ; Stop Task
ABT(X) ; Abort
ICD ; ICD Diagnosis/Procedures
GO ; Remove Stop
EN2 ; Entry Point (tasked - purge selected keyword - LEXKEY)
;
; Needs LEXKEY One Keyword
; <or>
; LEXKEY(LEXKEY1) Selected Keywords
; LEXKEY(LEXKEY2)
; LEXKEY(LEXKEYn)
;
ACT(X) ; Active before Today or after LEXAFT (optional)
CLR ; Clear
LEX ; Lexicon
DT ; Display ^TMP
SEL ; Selected Keywords (For Post-Install)
ENV(X) ; Environment
DEXP ; Display Expression
PUR ; Purge Keywords
DEND ; Display End Totals

External References

Name Field # of Occurrence
HOME^%ZIS EN+11, EN2+18, ENV+1
^%ZTLOAD EN+9, EN2+16
^DIK ICD+20, LEX+26
$$GET1^DIQ ENV+2
$$RUN2^LEXWUM EN+3, EN2+10
DT^LEXWUM DT+1
STOP^LEXWUM STOP+1
$$DT^XLFDT PUR+7, SEL+7, INA+1, ACT+1, ENV+1
$$FMDIFF^XLFDT DEND+1
$$FMTE^XLFDT DEND+32, DEND+33, DINA+2
$$NOW^XLFDT PUR+7, SEL+7, DEND+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,?4,$G(LEXNAM)," tasked (#",+($G(ZTSK)),")",!
  • Line Location: EN+10
Function Call: WRITE
  • Prompt: !," LEXKEY keyword variable not defined",!
  • Line Location: EN2+9
Function Call: WRITE
  • Prompt: !!,?4,$G(LEXNAM)," tasked (#",+($G(ZTSK)),")",!
  • Line Location: EN2+17
Function Call: WRITE
  • Prompt: !,?3,"Lexicon Changes ",?35,$J(LEXLEXC,8)
  • Line Location: DEND+7
Function Call: WRITE
  • Prompt: !,?5,"ICD-9 Diagnosis Changes ",?35,$J(LEXL01C,8)
  • Line Location: DEND+8
Function Call: WRITE
  • Prompt: !,?5,"ICD-9 Procedure Changes ",?35,$J(LEXL02C,8)
  • Line Location: DEND+9
Function Call: WRITE
  • Prompt: !,?5,"ICD-10 Diagnosis Changes ",?35,$J(LEXL30C,8)
  • Line Location: DEND+10
Function Call: WRITE
  • Prompt: !,?5,"ICD-10 Procedure Changes ",?35,$J(LEXL31C,8)
  • Line Location: DEND+11
Function Call: WRITE
  • Prompt: !,?5,"SNOMED CT Changes ",?35,$J(LEXL56C,8)
  • Line Location: DEND+12
Function Call: WRITE
  • Prompt: !,?5,"TITLE 38 Changes ",?35,$J(LEXL17C,8)
  • Line Location: DEND+13
Function Call: WRITE
  • Prompt: !,?5,"CPT-4 Procedure Changes ",?35,$J(LEXL03C,8)
  • Line Location: DEND+14
Function Call: WRITE
  • Prompt: !,?5,"HCPCS Procedure Changes ",?35,$J(LEXL04C,8)
  • Line Location: DEND+15
Function Call: WRITE
  • Prompt: !
  • Condition for execution: +($G(LEXLEXC))>0
  • Line Location: DEND+20
Function Call: WRITE
  • Prompt: !,?3,"ICD* File Changes",?35,$J(LEXSDOC,8)
  • Line Location: DEND+20
Function Call: WRITE
  • Prompt: !,?5,LEXTAB,"ICD-9 Diagnosis Changes ",?35,$J(LEXI01C,8)
  • Line Location: DEND+23
Function Call: WRITE
  • Prompt: !,?5,LEXTAB,"ICD-10 Diagnosis Changes ",?35,$J(LEXI30C,8)
  • Line Location: DEND+24
Function Call: WRITE
  • Prompt: !,?5,LEXTAB,"ICD-9 Procedure Changes ",?35,$J(LEXI02C,8)
  • Line Location: DEND+27
Function Call: WRITE
  • Prompt: !,?5,LEXTAB,"ICD-10 Procedure Changes ",?35,$J(LEXI31C,8)
  • Line Location: DEND+28
Function Call: WRITE
  • Prompt: !,?3,"Total Changes ",?35,$J(LEXTTT,8)
  • Line Location: DEND+31
Function Call: WRITE
  • Prompt: !
  • Line Location: DEND+32
Function Call: WRITE
  • Prompt: !,?3,"Start: ",?14,$TR($$FMTE^XLFDT(LEXBEG,"5Z"),"@"," ")
  • Line Location: DEND+32
Function Call: WRITE
  • Prompt: !,?3,"Finish: ",?14,$TR($$FMTE^XLFDT(LEXEND,"5Z"),"@"," ")
  • Line Location: DEND+33
Function Call: WRITE
  • Prompt: !,?3,"Elapsed: ",?14,$TR(LEXELP," ","0"),!
  • Line Location: DEND+34
Function Call: WRITE
  • Prompt: !,"Expression: ",LEXEXP,!,"Include/Keyword: ",LEXINC,"/",LEXKEY
  • Line Location: DEXP+3
Function Call: WRITE
  • Prompt: !,"IEN: ",LEXRT,LEXOIEN,","
  • Line Location: DEXP+4
Function Call: WRITE
  • Prompt: !
  • Line Location: DEXP+5
Function Call: WRITE
  • Prompt: !,"Keyword: ",LEXKEY,!,"Effective: ",$$FMTE^XLFDT(LEXEFF,"5Z"),!,"Inactive: ",$$FMTE^XLFDT(LEXINA,"5Z"),!
  • Line Location: DINA+2
Function Call: WRITE
  • Prompt: !!,?5,"Invalid/Missing DUZ"
  • Line Location: ENV+3
Routine Call
  • %ZIS
  • Line Location:
    • EN+11
    • EN2+18
    • ENV+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LEX(757.01 - [#757.01] LEX+3, LEX+4, LEX+5, LEX+18, LEX+19, LEX+20
^LEX(757.02 - [#757.02] LEX+7, LEX+8
^LEX(757.071 - [#757.071] PUR+8, PUR+10, PUR+12, PUR+13, SEL+9, SEL+12, SEL+13, SEL+18, SEL+21, SEL+22
, INA+1, INA+2, ACT+1, ACT+2
^TMP("LEXWU" EN+8!, EN2+15!, PUR+2!, PUR+15!, SEL+2, SEL+24!, ABT+1, GO+1!, CLR+1!

Label References

Name Line Occurrences
$$ABT PUR+8, PUR+10, SEL+9, SEL+18
$$ENV PUR+2
$$INA PUR+11, SEL+10, SEL+19
@( EN+9, EN2+16
CLR SEL+2, SEL+24
DEND PUR+15, SEL+24
DEXP ICD+20, LEX+20
DINA PUR+14, SEL+14, SEL+23
ICD PUR+14, SEL+14, SEL+23
LEX PUR+14, SEL+14, SEL+23

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA ICD+1~, ICD+14~, ICD+20*, LEX+2~, LEX+19~, LEX+26*, CLR+1!
DA(1 ICD+20*, LEX+26*
DA(2 ICD+20*
DIC PUR+3~, SEL+3~, LEX+2~, CLR+1!
DICI ICD+1~, CLR+1!
DIK PUR+3~, SEL+3~, ICD+1~, ICD+14~, ICD+20*, LEX+2~, LEX+19~, LEX+26*, CLR+1!
DT ENV+1*
DTIME ENV+1*
DUZ ENV+2
I EN+1~, EN2+8~, PUR+3~, SEL+3~, LEX+2~, CLR+1!
LEX1 INA+1~*, INA+4, INA+6, INA+8, INA+10, ACT+1~*, ACT+4, ACT+6, ACT+8, ACT+10
, CLR+1!
LEX2 INA+1~, INA+2*, INA+4, INA+6, INA+8, INA+10, ACT+1~, ACT+2*, ACT+4, ACT+6
, ACT+8, ACT+10, CLR+1!
LEX3 CLR+1!
LEXA INA+1~, INA+2*, INA+4, INA+6, INA+8, ACT+1~, ACT+2*, ACT+4, ACT+6, ACT+8
, CLR+1!
LEXAFT EN+8, EN+11!, EN2+15, EN2+18!, PUR+7*, SEL+7*, INA+2, ACT+2, CLR+1!
LEXASRC LEX+2~*, LEX+9
LEXBEG PUR+3~, PUR+7*, SEL+3~, SEL+7*, DEND+1, DEND+2, DEND+32, CLR+1!
LEXC CLR+1!
LEXCAP CLR+1!
LEXCDT CLR+1!
LEXCHK EN+1~, EN+2*, EN+4*, EN+5*, EN2+8~, EN2+11*, ICD+1~, ICD+14~, ICD+17*, CLR+1!
LEXCOM EN+1~, EN+6*, EN+7!, EN+11!, EN2+8~, EN2+14*!, EN2+18!, PUR+7!, SEL+7!, ICD+20
, LEX+26
LEXCT CLR+1!
LEXCTR PUR+3~, PUR+6*, SEL+6*, CLR+2!
LEXD CLR+2!
LEXDIEN ICD+1~, ICD+10~*, ICD+11*, ICD+13, ICD+15, ICD+16, ICD+18, ICD+19, ICD+20, CLR+2!
LEXEFF PUR+3~, PUR+11~, PUR+12*, SEL+10~, SEL+12*, SEL+19~, SEL+21*, ICD+1~, ICD+5~*, ICD+9*
, ICD+10, ICD+11, ICD+13, ICD+15, DINA+1, DINA+2, CLR+2!
LEXEIEN LEX+4~*, LEX+5, LEX+6, LEX+16, CLR+2!
LEXELP SEL+3~, DEND+1*, DEND+2*, DEND+34, CLR+2!
LEXEND SEL+3~, DEND+1*, DEND+2, DEND+33, CLR+2!
LEXENV PUR+2*, PUR+3~, CLR+2!
LEXEXC PUR+3~, PUR+11~, PUR+13*, SEL+10~, SEL+13*, SEL+19~, SEL+22*, CLR+2!
LEXEXP ICD+1~, ICD+14~, ICD+16*, ICD+17, LEX+19~*, DEXP+1, DEXP+3, CLR+2!
LEXFND LEX+6~*, LEX+9*, CLR+2!
LEXI ICD+1~, ICD+14~, ICD+17*, INA+1~*, INA+2, ACT+1~*, ACT+2, CLR+2!
LEXI01C PUR+4~, PUR+5*, SEL+4~, SEL+5*, ICD+22*, DEND+17, DEND+18, DEND+21, DEND+22, DEND+23
, CLR+2!
LEXI02C PUR+4~, PUR+5*, SEL+4~, SEL+5*, ICD+22*, DEND+17, DEND+18, DEND+25, DEND+26, DEND+27
, CLR+2!
LEXI30C PUR+4~, PUR+5*, SEL+4~, SEL+5*, ICD+23*, DEND+17, DEND+18, DEND+21, DEND+22, DEND+24
, CLR+2!
LEXI31C PUR+4~, PUR+5*, SEL+4~, SEL+5*, ICD+23*, DEND+17, DEND+18, DEND+25, DEND+26, DEND+28
, CLR+2!
LEXICDC PUR+3~, PUR+6*, SEL+6*, ICD+21*, DEND+3~, DEND+18*, DEND+21*, DEND+22, CLR+2!
LEXICPC PUR+3~, PUR+6*, SEL+6*, ICD+22*, DEND+18*, DEND+25*, DEND+26, CLR+2!
LEXIEN CLR+3!
LEXIENA LEX+6~, LEX+16!
LEXIENA( LEX+16*, LEX+17
LEXII DEND+2~*, CLR+3!
LEXIIEN ICD+1~, ICD+3~*, ICD+4*, ICD+5, ICD+9, ICD+11, ICD+13, ICD+15, ICD+16, ICD+18
, ICD+19, ICD+20, CLR+3!
LEXINA PUR+3~, PUR+11~, PUR+12*, SEL+10~, SEL+12*, SEL+19~, SEL+21*, DINA+1, DINA+2, CLR+3!
LEXINC PUR+3~, PUR+11~, PUR+13*, SEL+10~, SEL+13*, SEL+19~, SEL+22*, ICD+2, ICD+17, LEX+1
, DEXP+1, DEXP+3, CLR+3!
LEXKEY EN2+9, EN2+13, PUR+3~, PUR+7*, PUR+8*, PUR+10, SEL+2, SEL+8, SEL+9, SEL+17~*
, SEL+18, ICD+2, ICD+4, ICD+9, ICD+11, ICD+13, ICD+15, ICD+19, LEX+1, LEX+3
, LEX+4, LEX+5, LEX+18, LEX+20, DEXP+1, DEXP+3, DINA+1, DINA+2, CLR+3!
LEXKEY( SEL+16
LEXKEY("" EN2+9, EN2+13, SEL+2, SEL+15
LEXKIEN PUR+3~, PUR+9~*, PUR+10*, PUR+11, PUR+12, PUR+13, SEL+3~, SEL+9*, SEL+10, SEL+12
, SEL+13, SEL+17~*, SEL+18*, SEL+19, SEL+21, SEL+22, LEX+18~*, LEX+26, CLR+3!
LEXL01C PUR+4~, PUR+5*, SEL+4~, SEL+5*, LEX+24*, DEND+5, DEND+8, CLR+3!
LEXL02C PUR+4~, PUR+5*, SEL+4~, SEL+5*, LEX+25*, DEND+5, DEND+9, CLR+3!
LEXL03C PUR+4~, PUR+5*, SEL+4~, SEL+5*, LEX+23*, DEND+5, DEND+14, CLR+3!
LEXL04C PUR+4~, PUR+5*, SEL+4~, SEL+5*, LEX+23*, DEND+5, DEND+15, CLR+3!
LEXL17C PUR+4~, PUR+5*, SEL+4~, SEL+5*, LEX+22*, DEND+5, DEND+13, CLR+1!, CLR+3!
LEXL30C PUR+4~, PUR+5*, SEL+4~, SEL+5*, LEX+24*, DEND+5, DEND+10, CLR+3!
LEXL31C PUR+4~, PUR+5*, SEL+4~, SEL+5*, LEX+25*, DEND+5, DEND+11, CLR+3!
LEXL56C PUR+4~, PUR+5*, SEL+4~, SEL+5*, LEX+22*, DEND+5, DEND+12, CLR+3!
LEXLEXC PUR+3~, PUR+6*, SEL+6*, DEND+3~, DEND+5*, DEND+6, DEND+7, DEND+20, DEND+29, DEND+30
, DEND+31, CLR+3!
LEXM CLR+3!
LEXMIEN LEX+2~*, LEX+3*, LEX+4, LEX+5, LEX+6, LEX+16, CLR+4!
LEXNAM EN+1~, EN+2*, EN+4*, EN+10, EN2+8~, EN2+11*, EN2+17, CLR+4!
LEXND ICD+1~, ICD+14~, ICD+15*, ICD+16*, ICD+18*, ICD+19, CLR+4!
LEXNM CLR+4!, ENV+2~*, ENV+3
LEXO INA+1~, INA+2*, ACT+1~, ACT+2*, CLR+4!
LEXOIEN ICD+14~, ICD+18*, LEX+19~*, DEXP+4, CLR+4!
LEXOK ICD+1~, ICD+14~, ICD+16*, ICD+17*, ICD+18, LEX+6~*, LEX+9*, CLR+4!
LEXORD CLR+4!
LEXPUR EN+5*, EN+11!, EN2+12*, EN2+18!, PUR+11, SEL+11, SEL+20
LEXQUIET DEND+1, DEXP+1, DINA+1, CLR+4!
LEXRT ICD+1~, ICD+3~*, ICD+4, ICD+5, ICD+9, ICD+11, ICD+13, ICD+15, ICD+16, ICD+18
, ICD+19, ICD+20, LEX+2~*, DEXP+4, CLR+4!
LEXRUN EN+1~, EN+3*, EN2+8~, EN2+10*, CLR+4!
LEXS LEX+21~*, LEX+22, LEX+23, LEX+24, LEX+25, CLR+4!
LEXSDOC ICD+21*, DEND+3~, DEND+17*, DEND+19, DEND+20, DEND+29, DEND+30, CLR+4!
LEXSF PUR+3~, PUR+7!, SEL+3~, SEL+7!, LEX+6!, CLR+4!
LEXSF( LEX+15*, LEX+21
LEXSF(0 LEX+20
LEXSIEN ICD+1~, ICD+12~*, ICD+13*, ICD+15, ICD+18, ICD+20, LEX+7~*, LEX+8, CLR+4!
LEXSRC ICD+1~, ICD+5~*, ICD+6, ICD+7, ICD+8, ICD+21, ICD+22, ICD+23, LEX+8~*, LEX+9
, LEX+10, LEX+11, LEX+12, LEX+13, LEX+15, CLR+4!
LEXSS LEX+2~, CLR+4!
LEXSTA PUR+11~*, SEL+10~*, SEL+11, SEL+19~*, SEL+20, CLR+4!
LEXSUP ICD+1~, ICD+14~, ICD+19*, LEX+5~*, CLR+5!
LEXSYS ICD+5~, ICD+6*, ICD+7*, LEX+6~*, LEX+10*, LEX+11*, LEX+12*, LEX+13*, DEXP+2, CLR+5!
LEXT INA+1~*, ACT+1~*, CLR+5!
LEXTAB DEND+20~, DEND+21*, DEND+22*, DEND+23, DEND+24, DEND+25*, DEND+26*, DEND+27, DEND+28
LEXTD PUR+3~, PUR+7*, SEL+3~, SEL+7*, ICD+2, LEX+1, CLR+5!
LEXTEST EN+3, EN+7, EN+9, EN+11!, EN2+10, EN2+14, EN2+16, EN2+18!, PUR+7, SEL+7
LEXTIEN LEX+6~*, LEX+7, LEX+17*, LEX+18, LEX+19, LEX+20, LEX+26, CLR+5!
LEXTKEY SEL+16~*, SEL+17, CLR+5!
LEXTT DEND+2~*, CLR+5!
LEXTTT DEND+3~, DEND+29*, DEND+31, CLR+5!
LEXTYPE ICD+5~, ICD+8*, LEX+14*, DEXP+2, CLR+5!
LEXY CLR+5!
NEXKEY CLR+5!
POP CLR+5!, ENV+1!
U ENV+1*
X EN+1~, EN2+8~, PUR+3~, SEL+3~, ABT~, INA~, INA+1, ACT~, ACT+1, CLR+5!
, ENV~
Y EN+1~, EN2+8~, CLR+5!
ZT EN+1~, EN2+8~, CLR+5!
ZTDESC EN+1~, EN+2*, EN+4*, EN2+8~, EN2+11*, CLR+5!
ZTDTH EN+1~, EN+8*, EN2+8~, EN2+16*, CLR+5!
ZTIO EN+1~, EN+8*, EN2+8~, EN2+16*, CLR+5!
ZTKEY EN+1~, EN2+8~, CLR+5!
ZTQUEUED EN+1~, EN2+8~, PUR+1, SEL+1, DEND+1, DEXP+1, DINA+1, CLR+5!
ZTREQ EN+1~, EN2+8~, PUR+1*, SEL+1*, CLR+6!
ZTRTN EN+1~, EN+5*, EN+9, EN2+8~, EN2+12*, EN2+16, CLR+6!
ZTSAVE EN+1~, EN2+8~, CLR+6!
ZTSAVE("LEXAFT" EN+8*, EN2+15*
ZTSAVE("LEXCOM" EN+6*, EN+7!, EN2+14*!
ZTSAVE("LEXKEY" EN2+13*
ZTSAVE("LEXKEY(" EN2+13*
ZTSAVE("LEXPUR" EN+5*, EN2+12*
ZTSAVE("LEXTEST" EN+7*, EN2+14*
ZTSK EN+1~, EN+10, EN2+8~, EN2+17, CLR+6!
ZTUCI EN+1~, EN2+8~, CLR+6!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All