LEXQC5 ;ISL/KER - Query - Changes - Duplicate Text ;05/23/2017
Source file <LEXQC5.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| 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
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(81.3 - [#81.3] | MODL+2, MODL+3, MODL+4, MODL+5, MODL+6, MODL+7, MODL+8, MODL+9, MODL+11, MODL+12 , MODS+2, MODS+3, MODS+4, MODS+5, MODS+6, MODS+7, MODS+8, MODS+9 |
| ^ICPT - [#81] | CPTL+2, CPTL+3, CPTL+4, CPTL+5, CPTL+6, CPTL+7, CPTL+8, CPTL+9, CPTL+11, CPTL+12 , CPTS+2, CPTS+3, CPTS+4, CPTS+5, CPTS+6, CPTS+7, CPTS+8, CPTS+9 |
| Name | Line Occurrences |
|---|---|
| $$CPTL | DUPL+20 |
| $$CPTS | DUPS+20 |
| $$DS | CPTS+8, CPTS+9, MODS+8, MODS+9, ICDL+13, ICDL+14, ICDS+13, ICDS+14 |
| $$ICDL | DUPL+20 |
| $$ICDS | DUPS+20 |
| $$MODL | DUPL+20 |
| $$MODS | DUPS+20 |
| $$SAME | CPTL+14, MODL+14 |
| $$TM | CPTS+8, CPTS+9, MODS+8, MODS+9, ICDL+13, ICDL+14, ICDS+13, ICDS+14 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| LEX | DUPL~, DUPL+18, DUPS~, DUPS+18, ICDL~, ICDL+2, ICDS~, ICDS+2 |
| LEXA1 | CPTL+1~, CPTL+14, CPTS+1~, CPTS+8*, CPTS+10, MODL+1~, MODL+14, MODS+1~, MODS+8*, MODS+10 , ICDL+1~, ICDL+13*, ICDL+15, ICDS+1~, ICDS+13*, ICDS+15 |
| LEXA1( | CPTL+10*, MODL+10* |
| LEXA1(" " | CPTL+10, MODL+10 |
| LEXA2 | CPTL+1~, CPTL+14, CPTS+1~, CPTS+9*, CPTS+10, MODL+1~, MODL+14, MODS+1~, MODS+9*, MODS+10 , ICDL+1~, ICDL+14*, ICDL+15, ICDS+1~, ICDS+14*, ICDS+15 |
| LEXA2( | CPTL+13*, MODL+13* |
| LEXA2(" " | CPTL+13, MODL+13 |
| LEXD1 | CPTL+1~, CPTL+4*, CPTL+5*, CPTL+6, CPTS+1~, CPTS+4*, CPTS+5*, CPTS+6, MODL+1~, MODL+4* , MODL+5*, MODL+6, MODS+1~, MODS+4*, MODS+5*, MODS+6, ICDL+1~, ICDL+6*, ICDL+7, ICDL+9* , ICDL+10, ICDS+1~, ICDS+6*, ICDS+7, ICDS+9*, ICDS+10 |
| LEXD2 | CPTL+1~, CPTL+6*, CPTL+7, CPTS+1~, CPTS+6*, CPTS+7, MODL+1~, MODL+6*, MODL+7, MODS+1~ , MODS+6*, MODS+7, ICDL+1~, ICDL+10*, ICDL+11, ICDS+1~, ICDS+10*, ICDS+11 |
| LEXFI | DUPL+18~*, DUPL+20, DUPS+18~*, DUPS+20, ICDL+1~, ICDL+2*, ICDL+3, ICDS+1~, ICDS+2*, ICDS+3 |
| LEXI | DUPL+18~, DUPL+19*, DUPL+20, DUPS+18~, DUPS+19*, DUPS+20, CPTL+1~, CPTL+9~, CPTL+10*, CPTL+12~ , CPTL+13*, MODL+1~, MODL+9~, MODL+10*, MODL+12~, MODL+13* |
| LEXI1 | CPTL+1~, CPTL+3*, CPTL+4*, CPTL+5, CPTL+8, CPTL+9, CPTS+1~, CPTS+3*, CPTS+4*, CPTS+5 , CPTS+8, MODL+1~, MODL+3*, MODL+4*, MODL+5, MODL+8, MODL+9, MODS+1~, MODS+3*, MODS+4* , MODS+5, MODS+8, ICDL+1~, ICDL+5*, ICDL+7*, ICDL+8, ICDL+9, ICDL+13, ICDS+1~, ICDS+5* , ICDS+7*, ICDS+8, ICDS+9, ICDS+13 |
| LEXI2 | CPTL+1~, CPTL+7*, CPTL+11, CPTL+12, CPTS+1~, CPTS+7*, CPTS+9, MODL+1~, MODL+7*, MODL+11 , MODL+12, MODS+1~, MODS+7*, MODS+9, ICDL+1~, ICDL+11*, ICDL+12, ICDL+14, ICDS+1~, ICDS+11* , ICDS+12, ICDS+14 |
| LEXIEN | DUPL+18~, DUPL+19*, DUPL+20, DUPS+18~, DUPS+19*, DUPS+20, CPTL+1~, CPTL+2*, CPTL+3, CPTL+4 , CPTL+5, CPTL+6, CPTL+7, CPTL+8, CPTL+9, CPTL+11, CPTL+12, CPTS+1~, CPTS+2*, CPTS+3 , CPTS+4, CPTS+5, CPTS+6, CPTS+7, CPTS+8, CPTS+9, MODL+1~, MODL+2*, MODL+3, MODL+4 , MODL+5, MODL+6, MODL+7, MODL+8, MODL+9, MODL+11, MODL+12, MODS+1~, MODS+2*, MODS+3 , MODS+4, MODS+5, MODS+6, MODS+7, MODS+8, MODS+9, ICDL+1~, ICDL+4*, ICDL+6, ICDL+7 , ICDL+8, ICDL+9, ICDL+10, ICDL+11, ICDL+12, ICDL+13, ICDL+14, ICDS+1~, ICDS+4*, ICDS+6 , ICDS+7, ICDS+8, ICDS+9, ICDS+10, ICDS+11, ICDS+12, ICDS+13, ICDS+14 |
| LEXL | CPTL+1~, CPTL+8*, CPTL+9, CPTL+11*, CPTL+12, CPTS+1~, MODL+1~, MODL+8*, MODL+9, MODL+11* , MODL+12, MODS+1~, ICDL+1~, ICDS+1~ |
| LEXRT | ICDL+1~, ICDL+3*, ICDL+4, ICDL+6, ICDL+7, ICDL+8, ICDL+9, ICDL+10, ICDL+11, ICDL+12 , ICDL+13, ICDL+14, ICDS+1~, ICDS+3*, ICDS+4, ICDS+6, ICDS+7, ICDS+8, ICDS+9, ICDS+10 , ICDS+11, ICDS+12, ICDS+13, ICDS+14 |
| LEXSAME | SAME+2~, SAME+3*, SAME+4*, SAME+5 |
| LEXT | CPTL+1~, CPTL+9~*, CPTL+10, CPTL+12~*, CPTL+13, MODL+1~, MODL+9~*, MODL+10, MODL+12~*, MODL+13 |
| LEXTIEN | SAME+2~, SAME+3*, SAME+4* |
| X | DUPL~, DUPL+19, DUPS~, DUPS+19, CPTL~, CPTL+2, CPTL+14*, CPTL+15, CPTS~, CPTS+2 , MODL~, MODL+2, MODL+14*, MODL+15, MODS~, MODS+2, ICDL~, ICDL+4, ICDS~, ICDS+4 , DS~, DS+1*, DS+2*, DS+3, TM~, TM+1*, TM+2*, TM+3*, TM+4 |
| X1 | SAME~, SAME+2 |
| X1( | SAME+3, SAME+4 |
| X1(" " | SAME+1 |
| X2 | SAME~, SAME+2 |
| X2( | SAME+3, SAME+4 |
| X2(" " | SAME+1 |
| Y | DUPL~, DUPL+19, DUPS~, DUPS+19, CPTL~, CPTL+3, CPTS~, CPTS+3, MODL~, MODL+3 , MODS~, MODS+3, ICDL~, ICDL+5, ICDS~, ICDS+5, TM~, TM+1*, TM+2, TM+3 |
