Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points
Print Page as PDF
Routine: LEXQC5

Package: Lexicon Utility

Routine: LEXQC5


Information

LEXQC5 ;ISL/KER - Query - Changes - Duplicate Text ;05/23/2017

Source Information

Source file <LEXQC5.m>

Entry Points

Name Comments DBIA/ICR reference
DUPL(LEX,X,Y) ; Long Description is a Duplicate
;
; Input
; LEX File Number
; 80 ICD Diagnosis
; 80.1 ICD Procedures
; 81 CPT Procedures
; 81.3 Modifiers
; X Code IEN
; Y Long Description IEN
;
; Output
;
; $$DUPL Boolean value
;
; 1 Long Descriptions is a Duplicate
; 0 Long Descriptions is not a Duplicate
;
DUPS(LEX,X,Y) ; Short Description is a Duplicate
;
; Input
; LEX File Number
; 80 ICD Diagnosis
; 80.1 ICD Procedures
; 81 CPT Procedures
; 81.3 Modifiers
; X Code IEN
; Y Short Description IEN
;
; Output
;
; $$DUPL Boolean value
;
; 1 Short Descriptions is a Duplicate
; 0 Short Descriptions is not a Duplicate
;
CPTL(X,Y) ; CPT Long Description is a Duplicate
CPTS(X,Y) ; CPT Short Description is a Duplicate
MODL(X,Y) ; Modifier Long Description is a Duplicate
MODS(X,Y) ; Modifier Short Description is a Duplicate
ICDL(LEX,X,Y) ; ICD Long Description is a Duplicate
ICDS(LEX,X,Y) ; ICD Short Description is a Duplicate
SAME(X1,X2) ; Are Arrays X1 and X2 the same
DS(X) ; Remove Double Space
TM(X,Y) ; Trim Character Y - Default " " Space
Info |  Source |  Entry Points