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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: LEXINF3

Package: Lexicon Utility

Routine: LEXINF3


Information

LEXINF3 ;ISL/KER - Information - Term ;05/23/2017

Source Information

Source file <LEXINF3.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Lexicon Utility 4 (CP,DC)^LEXINF2  TERM^LEXINF5  $$STATCHK^LEXSRC2  $$MIX^LEXXM  
CPT HCPCS Codes 3 $$STATCHK^ICPTAPIU  $$CPT^ICPTCOD  MODA^ICPTMOD  
DRG Grouper 1 $$STATCHK^ICDEX  
Kernel 1 $$DT^XLFDT  

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

Package Total Caller Graph
Lexicon Utility 2 LEXINF  LEXINF2  

Entry Points

Name Comments DBIA/ICR reference
SB(X,ARY) ; Subsets SB
NG(X,Y,IEN,ARY) ; Negations NG
MD(X,Y,IEN,ARY) ; Modifiers CO/MD
CP(X,CDT,ARY) ; Character Positions CP
CO(X,CDT,ARY) ; Codes CO
TERM(IEN,CDT,ARY,OUT) ; Information about a Term
;
; Input
;
; IEN Expression IEN (file 757.01)
; CDT Date used to determine status, default TODAY
; OUT Output/Display ARY (Optional)
; 0 Do not Display (default)
; 1 Display
; Output
;
; ARY
;
; Code
;
; ARY("CO")="Code"
; ARY("CO",n)=<code>
; ARY("CO","B",<code>,n)=""
; ARY("CO",n,"I")= 6 piece "^" delimited string
;
; 1 Status
; 2 Effective Date
; 3 Initial Activation Date
; 4 Pointer to CODES file #757.02
; 5 Coding System Nomenclature
; 6 Coding System
;
; ARY("CO",n,"MD")="Code Modifiers"
; ARY("CO",n,"MD",n)=<modifier>
; ARY("CO",n,"MD",n,"I")= 4 piece "^" delimited string
;
; 1 Status
; 2 Effective Date
; 3 Modifier Name
; 4 Pointer to CPT MODIFIER file #81.3
;
; ARY("CO",n,"VA")= 4 piece "^" delimited string
;
; 1 Status
; 2 Effective Date
; 3 VA File Number
; 4 Variable Pointer to VA File
;
; Diagnostic Categories (ICD-10-CM only)
;
; ARY("DC")="Diagnostic Categories"
; ARY("DC",1)=<category>
; ARY("DC",1,"I")= 4 piece "^" delimited string
;
; 1 Status
; 2 Effective Date
; 3 Category Name
; 4 Pointer to CHARACTER POSITIONS file #757.033
;
; Procedure Characters Positions (ICD-10-PCS only)
;
; Where n is a character position number 1-7
;
; ARY("CP")="Procedure Characters"
; ARY("CP","I")=<code>
; ARY("CP",n)=<character position 1-n>
; ARY("CP",n,"I")= 4 piece "^" delimited string
;
; 1 Status
; 2 Effective Date
; 3 Name
; 4 Pointer to CHARACTER POSITIONS file #757.033
;
; Terms
;
; Subscript SUB can be:
;
; MC Major Concept
; FS Fully Specified Term
; SY Synonyms
; LV Lexical Variants
; OR Orphan Text
;
; ARY(SUB)=type
; ARY(SUB,n)=<expression>
; ARY(SUB,n,"I")= 4 piece "^" delimited string
;
; 1 Status
; 2 Type
; 3 Current/Retired
; 4 Pointer to EXPRESSIONS file #757.01
;
; ARY(SUB,n,"ID")="Designation ID"
; ARY(SUB,n,"ID",n)<designation ID>
; ARY(SUB,n,"ID",n,"I")= 4 piece "^" delimited string
;
; 1 Status
; 2 Coding System
; 3 Hierarchy
; 4 Pointer to DESIGNATION CODE subfile #757.118
;
; ARY(SUB,n,"SK")="Supplemental Keywords"
; ARY(SUB,n,"SK",n)=<keyword>
; ARY(SUB,n,"SK",n,"I")= 4 piece "^" delimited string
;
; 1 Status
; 2 Not used
; 3 Not used
; 4 Pointer to SUPPLEMENTAL subfile #757.18
;
; Mappings
;
; ARY("MP")="Mapping"
; ARY("MP",n)=<map to target code>
; ARY("MP",n,"I")= 6 piece "^" delimited string
;
; 1 Status
; 2 Effective
; 3 Coding System
; 4 Pointer to MAPPINGS file #757.33
; 5 Match (full/partial)
; 6 Source Code
; 7 Source Coding System
;
; Subsets
;
; ARY("SB")="Subsets"
; ARY("SB",n)=<subset>
; ARY("SB",n,"I")= 5 piece "^" delimited string
;
; 1 Status
; 2 Pointer to SUBSET file #757.21
; 3 Pointer to EXPRESSION file #757.01
; 4 Pointer to SUBSET DEFINITION file #757.2
; 5 Subset ID
;
; Source
;
; ARY("SR")="Source"
; ARY("SR",n)=<source abbreviation>
; ARY("SR","B",<source>,n)=""
; ARY("SR",n,"I")= 4 piece "^" delimited string
;
; 1 Source Abbreviation
; 2 Source Nomenclature
; 3 Source Title
; 4 Pointer to CODING SYSTEMS file #757.03
;
SK(X,Y,IEN,ARY) ; Supplemental Keywords SK
MP(X,Y,CDT,ARY) ; Mappings MP
VA(X,Y,D,I,ARY) ; VA File CO/VA
OR(X,Y,CDT,ARY) ; Orphan Text OR
DC(X,CDT,ARY) ; Diagnostic Categories DC
DS(X,Y,IEN,ARY) ; Designation ID ID
EX(X,ARY) ; Expressions MC/FS/SY/LV

External References

Name Field # of Occurrence
$$STATCHK^ICDEX VA+5, VA+6, VA+7, VA+8
$$STATCHK^ICPTAPIU VA+10
$$CPT^ICPTCOD VA+11
MODA^ICPTMOD MD+3
CP^LEXINF2 CP+1
DC^LEXINF2 DC+1
TERM^LEXINF5 TERM+145
$$STATCHK^LEXSRC2 CO+8
$$MIX^LEXXM SB+8, SB+18
$$DT^XLFDT TERM+143, CO+2, MD+2, VA+2, OR+4, MP+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(81.3 - [#81.3] MD+7
^LEX(757 - [#757] EX+3, SB+4
^LEX(757.01 - [#757.01] TERM+144, CO+2, EX+2, EX+3, EX+4, EX+5, EX+6, EX+7, DS+3, DS+4
, SK+3, SK+4, NG+3, NG+4, OR+11, SB+2, SB+12, SB+13
^LEX(757.018 - [#757.018] DS+7
^LEX(757.02 - [#757.02] CO+3, CO+4, CO+5, CO+6, VA+3, OR+5, OR+7, OR+8, OR+9, OR+10
^LEX(757.03 - [#757.03] CO+7, CO+8, VA+3, DS+6, OR+2, OR+3, MP+2, MP+3, MP+4, MP+13
^LEX(757.21 - [#757.21] SB+4, SB+5, SB+7, SB+15, SB+17
^LEX(757.32 - [#757.32] MP+12
^LEX(757.33 - [#757.33] MP+5, MP+7, MP+8, MP+9, MP+10
^LEXT(757.2 - [#757.2] SB+7, SB+17

Label References

Name Line Occurrences
CO TERM+145
CP CO+20
DC CO+20
DS EX+13
EX TERM+145
MD CO+16
MP CO+20
NG EX+15
OR CO+20
SB TERM+145
SK EX+14
VA CO+17

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ARY TERM~, TERM+143!, TERM+144!, TERM+145, CO~, CO+16, CO+17, CO+20, MD~, VA~
, EX~, EX+13, EX+14, EX+15, DS~, SK~, NG~, OR~, MP~, SB~
, DC~, DC+1, CP~, CP+1
ARY( EX+11*, EX+12*, DS+3, DS+7, DS+8*, DS+9*, DS+10*, SK+3, SK+5, SK+6*
, SK+7*, SK+8*, NG+3, NG+5, NG+6*, NG+7*, NG+8*
ARY("CO" CO+2!, CO+15*, CO+17*, MD+14, MD+15*, MD+16*, MD+17*, VA+18*
ARY("FS" EX+2!
ARY("LV" EX+2!
ARY("MC" TERM+145, EX+2!
ARY("MP" MP+1!, MP+15*, MP+16*
ARY("OR" OR+1!, OR+15*, OR+16*
ARY("SB" SB+10*, SB+11*, SB+20*, SB+21*
ARY("SR" CO+2!, CO+17, CO+18*, CO+19*
ARY("SY" EX+2!
CDT TERM~, TERM+143, CO~, CO+2, OR~, OR+4, MP~, MP+4, DC~, DC+1
, CP~, CP+1
D VA~, VA+2
I VA~, VA+2
IEN TERM~, TERM+143, MD~, MD+3, DS~, DS+2, SK~, SK+2, NG~, NG+2
LEXAR MD+5~, MD+9*, MD+10, MD+11, MD+12
LEXC DS+1~, DS+4~, DS+5*, DS+9, SK+1~, NG+1~
LEXCDT CO+16, MD+1~, MD+2*, MD+3, VA+1~, VA+2*, VA+5, VA+6, VA+7, VA+8
, VA+10, VA+11
LEXCODE CO+1~, CO+4~, CO+6*, CO+8, CO+9, CO+10*, CO+11, CO+15, CO+16, CO+17
, CO+20, MD+1~, MD+2*, MD+3, VA+1~, VA+2*, VA+3, VA+5, VA+6, VA+7
, VA+8, VA+10, OR+1~, OR+2*, OR+5, MP+1~*, MP+4, MP+5, MP+7, MP+8
, MP+9, MP+14
LEXCPT MD+1~, MD+3
LEXCPT("A" MD+4, MD+6
LEXD TERM+143~*, TERM+145, CO+2*, CO+5, CO+8, CO+17, CO+20, VA+11~*, VA+12, OR+1~
, OR+4*, OR+7, MP+1~, MP+4*, MP+7
LEXDA SB+1~, SB+2*, SB+3
LEXDISP TERM+143~*, TERM+145
LEXDS MD+1~, MD+5~, MD+8*, MD+17
LEXDSI DS+1~, DS+3*, DS+4, DS+10
LEXEF CO+1~, CO+4~, CO+5*, CO+9, CO+11~, CO+13*, CO+14, CO+15, MD+1~, MD+5~
, MD+6*, MD+10*, MD+11*, MD+12*, MD+13, MD+17, OR+6~, OR+7*, OR+8, MP+6~
, MP+7*, MP+8, MP+9, MP+13
LEXEFF TERM+143~, VA+1~, VA+16*, VA+17
LEXEIEN TERM+143~*, TERM+144, TERM+145, CO+1~, CO+2*, CO+11~, CO+12*, EX+1~, EX+2*, EX+3
, OR+1~, OR+6~, OR+11*, OR+16
LEXENT MD+1~, MD+3*, MD+14, MD+15, MD+16, MD+17, VA+1~, VA+2*, VA+4, VA+18
LEXEX EX+1~, EX+5*, EX+6, EX+7, EX+12, EX+13, EX+14, EX+15, SB+1~, SB+2*
, SB+3, SB+4*, SB+5, SB+9
LEXEXP EX+1~, EX+6~*, EX+7, EX+11, OR+1~, OR+6~, OR+11*, OR+15
LEXFI VA+1~, VA+5*, VA+6*, VA+7*, VA+8*, VA+11*, VA+17
LEXH DS+1~, DS+4~, DS+6*, DS+7, SK+1~, SK+4~, NG+1~, NG+4~
LEXHN DS+1~, DS+4~, DS+7*, DS+10, SK+1~, SK+4~, NG+1~, NG+4~
LEXHS CO+1~, CO+4~, CO+5*, CO+6, OR+6~, OR+8*, OR+9
LEXIE MD+1~, MD+5~, MD+7*, MD+17
LEXIEN CO+1~, CO+4~, CO+5*, CO+9, VA+1~, VA+10*, VA+11, VA+12, VA+15*, VA+17
, DS+1~, DS+2*, DS+3, DS+4, SK+1~, SK+2*, SK+3, SK+4, NG+1~, NG+2*
, NG+3, NG+4, SB+1~, SB+5~*, SB+12*, SB+13, SB+14*, SB+15, SB+19
LEXIENS SB+1~
LEXIENS( SB+13*, SB+14
LEXIENS(0 SB+14
LEXIN DS+1~, DS+2*, DS+3, DS+7, DS+8, DS+9, DS+10, SK+1~, SK+2*, SK+3
, SK+5, SK+6, SK+7, SK+8, NG+1~, NG+2*, NG+3, NG+5, NG+6, NG+7
, NG+8
LEXINIT CO+1~, CO+4~, CO+8*, CO+9, CO+11~, CO+14*, CO+15
LEXIR MD+5~, MD+9*, MD+10, MD+11, MD+12
LEXK SK+4~, SK+5*, SK+7, NG+4~, NG+5*, NG+7
LEXMC EX+1~, SB+1~, SB+2*, SB+3, SB+4, SB+12
LEXMCODE MP+6~, MP+10*, MP+15
LEXMDEF MP+6~, MP+11*, MP+12
LEXMIEN TERM+143~, TERM+144*, CO+2*, CO+3, EX+1~, EX+2*, EX+3*, EX+4, EX+5, MP+6~
, MP+9*, MP+10, MP+14
LEXMMAT MP+6~, MP+10*, MP+11*, MP+14
LEXMNOM MP+6~, MP+13*
LEXMSSY MP+6~, MP+12*, MP+15
LEXMTSY MP+6~, MP+12*, MP+13
LEXND CO+1~, CO+4~*, CO+5, CO+6, CO+11~*, CO+12, CO+13, CO+14, MD+5~, MD+6*
, MD+7, MD+8, MD+9, EX+1~, EX+6~, EX+7*, EX+8, DS+1~, DS+4~*, DS+5
, DS+6, SK+1~, SK+4~*, SK+5, NG+1~, NG+4~*, NG+5, OR+1~, OR+6~, OR+10*
, OR+11*, OR+12, MP+6~, MP+10*, MP+11, SB+6~, SB+7*, SB+8, SB+16~, SB+17*
, SB+18
LEXNGI NG+1~, NG+3*, NG+4, NG+8
LEXNOM CO+1~, CO+4~, CO+7*, CO+9, CO+11~, CO+13*, CO+15, CO+18
LEXO MD+1~, MD+4*, MD+6, MD+7, MD+16
LEXRT VA+1~, VA+5*, VA+6*, VA+7*, VA+8*, VA+11*, VA+15, VA+17
LEXS DS+1~, DS+4~, DS+5*, DS+6, SK+1~, SK+4~, NG+1~, NG+4~
LEXSA SB+6~, SB+8*, SB+10, SB+16~, SB+18*, SB+20
LEXSAB CO+1~, CO+4~, CO+7*, CO+8, CO+9, CO+11~, CO+13*, CO+18
LEXSB DS+1~, DS+2*, DS+3, DS+7, DS+8, DS+9, DS+10, SK+1~, SK+2*, SK+3
, SK+5, SK+6, SK+7, SK+8, NG+1~, NG+2*, NG+3, NG+5, NG+6, NG+7
, NG+8
LEXSEQ CO+1~, CO+11~, CO+15*, CO+16, CO+17, CO+18~*, CO+19, MD+5~, MD+14*, MD+16
, MD+17, EX+1~, EX+6~, EX+11*, EX+12, EX+13, EX+14, EX+15, DS+1~, DS+4~
, DS+7*, DS+9, DS+10, SK+1~, SK+4~, SK+5*, SK+7, SK+8, NG+1~, NG+4~
, NG+5*, NG+7, NG+8, OR+1~, OR+6~, OR+15*, OR+16, MP+6~, MP+15*, MP+16
, SB+6~, SB+11*, SB+16~, SB+21*
LEXSF SB+6~, SB+8*, SB+11, SB+16~, SB+18*, SB+21
LEXSI SB+6~, SB+7*, SB+10, SB+16~, SB+17*, SB+20
LEXSIEN CO+1~, CO+3*, CO+4, CO+5, CO+6, CO+9, CO+11~, CO+12*, CO+15, OR+1~
, OR+5*, OR+7, OR+8, OR+9, OR+10, SB+1~, SB+5~*, SB+7, SB+9, SB+15*
, SB+17, SB+19
LEXSKI SK+1~, SK+3*, SK+4, SK+8
LEXSO CO+1~, SB+1~
LEXSO( CO+9*, CO+10, CO+11
LEXSRC CO+1~, CO+4~, CO+6*, CO+7, CO+8, CO+9, CO+10*, CO+11, CO+15, CO+16
, CO+17, CO+18, CO+19, CO+20, VA+1~, VA+2*, VA+3, VA+4, VA+5, VA+6
, VA+7, VA+8, VA+9, OR+1~, OR+2*, OR+3*, OR+4, OR+10, MP+1~, MP+2*
, MP+3*, MP+4, MP+12, SB+1~
LEXST TERM+143~, CO+1~, CO+4~, CO+6*, CO+9, CO+11~, CO+12*, CO+15, MD+1~, MD+10*
, MD+11*, MD+12*, MD+17, OR+6~, OR+9*, OR+13, OR+14, MP+6~, MP+8*, MP+9
, MP+13, SB+9, SB+19
LEXSTA VA+1~, VA+14*, VA+17, EX+1~, EX+6~, EX+7*, EX+8*, EX+12, DS+1~, DS+3*
, DS+10, SK+1~, SK+3*, SK+8, NG+1~, NG+3*, NG+8, OR+1~, OR+6~, OR+12*
, OR+14*, OR+16
LEXSTAT EX+1~, EX+6~, EX+8*, OR+1~, OR+6~, OR+12*, OR+13*, OR+16
LEXSTR MP+6~, MP+13*, MP+14*, MP+15*, MP+16, SB+6~, SB+9*, SB+10*, SB+11, SB+16~
, SB+19*, SB+20*, SB+21
LEXSYS TERM+143~, DS+1~, DS+4~, DS+6*, DS+10, SK+1~, SK+4~, NG+1~, NG+4~, OR+1~
, OR+2*, OR+3, MP+1~*, MP+2, MP+3, SB+1~
LEXTMP CO+1~, CO+4~, CO+8*, VA+1~, VA+5*, VA+6*, VA+7*, VA+8*, VA+9, VA+10*!
, VA+12*, VA+13, VA+14, VA+15, VA+16, VA+17*, VA+18
LEXTN EX+1~, EX+6~, EX+9*, EX+11, EX+12
LEXTO MP+1~, MP+5*, MP+7, MP+8, MP+9
LEXTS EX+1~, EX+6~, EX+10*, EX+11, EX+12, EX+13, EX+14, EX+15
LEXTTL CO+1~, CO+4~, CO+8*, CO+9, CO+11~, CO+14*, CO+18
LEXTY EX+1~, EX+6~, EX+8*, EX+9, EX+10, OR+1~, OR+6~, OR+12*, OR+16
LEXTYPE TERM+143~
OUT TERM~, TERM+143
X CO~, CO+2, MD~, MD+2, VA~, VA+2, EX~, EX+2, DS~, DS+2
, SK~, SK+2, NG~, NG+2, OR~, OR+2, MP~, MP+1, SB~, SB+2
, DC~, DC+1, CP~, CP+1
Y MD~, MD+2, VA~, VA+2, DS~, DS+2, SK~, SK+2, NG~, NG+2
, OR~, OR+2, MP~, MP+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All