LEXINF2 ;ISL/KER - Information - Code ;05/23/2017
Source file <LEXINF2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CODE(CODE,SRC,CDT,ARY,OUT) | ; Information about a code
; ; Input ; ; CODE Code (file 757.02) (Required) ; SRC Source Abbr. or pointer to file 757.03 (Required) ; CDT Date used to determine status, default TODAY ; .ARY Local Array, passed by reference ; 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: ; ; PF Preferred Term ; FS Fully Specified Term ; MC Major Concept ; 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",n,"I")= 4 piece "^" delimited string ; ARY("SR","B",<source>,n)="" ; ; 1 Source Abbreviation ; 2 Source Nomenclature ; 3 Source Title ; 4 Pointer to CODING SYSTEMS file #757.03 ; |
|
| CO(X,Y,CDT,ARY) | ; Code CO
|
|
| MD(X,Y,I,ARY) | ; Modifiers CO/MD
|
|
| VA(X,Y,D,I,ARY) | ; VA File CO/VA
|
|
| PF(CODE,ARY) | ; Preferred Term PF
|
|
| OT(X,LEX,ARY) | ; Other Terms MC/FS/SY/LV
|
|
| DS(X,Y,LEX,ARY) | ; Designation ID ID
|
|
| SK(X,Y,LEX,ARY) | ; Supplemental Keywords SK
|
|
| NG(X,Y,LEX,ARY) | ; Negations NG
|
|
| SR(SRC) | ; Source SR
|
|
| OR(X,Y,CDT,ARY) | ; Orphan Text OR
|
|
| SB(X,Y,ARY) | ; Subsets SB
|
|
| MP(X,Y,CDT,ARY) | ; Mappings MP
|
|
| DC(X,CDT,ARY) | ; Diagnostic Categories DC
|
|
| CP(X,CDT,ARY) | ; Character Positions CP
|
