CODE |
['Input', 'VARIABLE SEQUENCE NUMBER: 1'] |
This is a code taken from a classification system
contained in the Lexicon (i.e., ICD, CPT, etc.)
|
DATE |
['Input', 'VARIABLE SEQUENCE NUMBER: 2'] |
This is the date used to determine if a code was
either active or inactive on a specific date. If not supplied, TODAY will be
used as the date.
|
.LEX |
['Input', 'VARIABLE SEQUENCE NUMBER: 3'] |
(Optional) This is a local array, passed by
reference. When passed it will return information about the code.
|
SAB |
['Input', 'VARIABLE SEQUENCE NUMBER: 4'] |
(Optional) This is the source of the code. It is
either a pointer to the CODING SYSTEMS file 757.03 or the source abbreviation
expressed as the first 3 characters of the source in file 757.03.
|
$$STATCHK |
Output |
This is a two piece "^" delimiteds tring in the
following formats:
RETURNS INDICATES
----------------- ---------------------------------
1 ^ IEN ^ Date The code is active on the date returned and
stored in ^LEX(757.02,IEN,0)
0 ^ IEN ^ Date The code is inactive on the date returned and
stored in ^LEX(757.02,IEN,0)
0 ^ -1 Code is not found in the Lexicon
|
LEX |
Output |
(Optional) This is a local array passed by reference.
If passed it will contain information about the code in the following
formatted subscripts:
LEX(0) = <ien 757.02> ^ <code>
2-piece String containing the IEN of the code and the code
LEX(1) = <ien 757.01> ^ <expression>
2-piece String containing the IEN of the code's expression
and the expression
LEX(2) = <ien 757.03> ^ <abbr> ^ <nomen> ^ <name>
4-peice String containing the IEN of the code's classification
system, the source abbreviation, Nomenclature and the name of
the classification system
|