Announcement

Collapse
No announcement yet.
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • How to extract ICD 10 code from a string variable



    I attach a set of data with two variables, RUT is the id and, DIAGNOSTICO is the type of disease. My interest is to know how to extract only the code (alphanumeric) of the type of disease in a new variable.

    I appreciate any help

    regards




    copy starting from the next line -----------------------
    Code:
    * Example generated by -dataex-. To install: ssc install dataex
    clear
    input str9 RUT strL DIAGNOSTICOS
    "100004089" "I10-Hipertensión esencial (primaria) (Nueva)  ;"                   
    "100078538" "J20-Bronquitis aguda (Nueva)  ;"                   
    "100146088" "E78-Dislipidemia (Repetida)  ;  E11-Diabetes mellitus no insulinodependiente (Repetida)  ;"                   
    "100167670" "E11-Diabetes mellitus no insulinodependiente (Nueva)  ;"                   
    "100410184" "E11-Diabetes mellitus no insulinodependiente (Nueva)  ;"                   
    "100419505" "M51.1-Trastornos de disco lumbar y otros, con radiculopatía (Repetida)  ;"                   
    "100559030" "M77.1-Epicondilitis lateral (Nueva)  ;"                   
    "100586835" "J02-Faringitis aguda (Nueva)  ;"                   
    "101062724" "D17.7-Tumor benigno lipomatoso de otros sitios especificados (Nueva)  ;"                   
    "101109526" "R63.5-Sobrepeso (Nueva)  ;"                   
    "101147533" "E11-Diabetes mellitus no insulinodependiente (Repetida)  ;  I10-Hipertensión esencial (primaria) (Repetida)  ;"                   
    "101302725" "L72.0-Quiste epidérmico (Nueva)  ;"                   
    "101454835" "I25.2-Infarto antiguo del miocardio (Repetida)  ;  E78-Dislipidemia (Repetida)  ;  I10-Hipertensión esencial (primaria) (Repetida)  ;  E11-Diabetes mellitus    no    insulinodependiente    (Repetida)    ;"
    "101649504" "H60-Otitis externa (Nueva)  ;"                   
    "101841162" "J11.1-Influenza con otras manifestaciones respiratorias, virus no identificado (Nueva)  ;"                   
    "101947785" "R87.6-Hallazgos anormales en muestras tomadas de órganos genitales femeninos, hallazgos citológicos anormales, frotis anormal de papanicolaou (Nueva)  ;"                   
    "101952495" "M77.1-Epicondilitis lateral (Nueva)  ;"                   
    "101960528" "G44.2-Cefalea debida a tensión (Nueva)  ;"                   
    "102069455" "R63.5-Sobrepeso (Nueva)  ;  R63.4-Pérdida anormal de peso (Nueva)  ;  D69.6-Trombocitopenia no especificada (Nueva)  ;"                   
    "102114558" "E66-Obesidad (Nueva)  ;"                   
    "102546881" "E78-Dislipidemia (Nueva)  ;"                   
    "102676424" "E03-Hipotiroidismo (Nueva)  ;  D50-Anemias por deficiencia de hierro (Nueva)  ;"                   
    "102728270" "E11-Diabetes mellitus no insulinodependiente (Repetida)  ;"                   
    "10302949K" "L02-Absceso cutáneo, furúnculo y carbunco (Nueva)  ;"                   
    "10304961K" "H60-Otitis externa (Nueva)  ;"                   
    "103102383" "M54.5-Lumbago no especificado (Nueva)  ;"                   
    "103212286" "J02-Faringitis aguda (Nueva)  ;"                   
    "103281539" "I50.9-Insuficiencia cardíaca, no especificada (Nueva)  ;  I10-Hipertensión esencial (primaria) (Repetida)  ;  L03-Celulitis (Nueva)  ;"                   
    "10329326K" "E04.0-Bocio difuso no tóxico (Repetida)  ;"                   
    "103301890" "I10-Hipertensión esencial (primaria) (Repetida)  ;  E20.9-Hipoparatiroidismo, no especificado (Nueva)  ;"                   
    "103392772" "K58-Síndrome del colon irritable (Repetida)  ;"                   
    "103406986" "E11-Diabetes mellitus no insulinodependiente (Nueva)  ;"                   
    "103621240" "E78-Dislipidemia (Nueva)  ;"                   
    "103652367" "N23-Cólico renal, no especificado (Repetida)  ;"                   
    "103753406" "M54.2-Cervicalgia (Nueva)  ;  G44.2-Cefalea debida a tensión (Nueva)  ;"                   
    "104110290" "F45.8-Otros trastornos somatomorfos (Nueva)  ;  G44.4-Cefalea inducida por drogas, no clasificada en otra parte (Nueva)  ;"                   
    "104223281" "E78-Dislipidemia (Repetida)  ;  G40-Epilepsia (Repetida)  ;"                   
    "104579531" "Z00.8-Otros exámenes generales (Nueva)  ;"                   
    "104687989" "J00-Rinofaringitis aguda (resfriado común) (Nueva)  ;"                   
    "105071825" "B49-Micosis, no especificada (Nueva)  ;"                   
    "105298706" "M79.6-Dolor en miembro (Nueva)  ;"                   
    "105388926" "E78-Dislipidemia (Repetida)  ;  R63.5-Sobrepeso (Nueva)  ;  E11-Diabetes mellitus no insulinodependiente (Repetida)  ;"                   
    "105471750" "I10-Hipertensión esencial (primaria) (Repetida)  ;"                   
    "10550666k" "K52.9-Colitis y gastroenteritis no infecciosas, no especificadas (Nueva)  ;"                   
    "105553897" "I10-Hipertensión esencial (primaria) (Repetida)  ;"                   
    "105564333" "E11-Diabetes mellitus no insulinodependiente (Repetida)  ;  K74-Fibrosis y cirrosis del hígado (Repetida)  ;"                   
    "105732430" "I48-Fibrilación y aleteo auricular (Nueva)  ;"                   
    "106152489" "J45-Asma (Nueva)  ;"                   
    "106162492" "M94.0-Síndrome de la articulación condrocostal [Tietze] (Nueva)  ;  I45.1-Otros tipos de bloqueo de rama derecha del haz y los no especificados (Nueva)  ;"                   
    "106204578" "F43.2-Trastornos de adaptación (Nueva)  ;"                   
    "106209928" "M23.2-Trastorno de menisco debido a desgarro o lesión antigua (Nueva)  ;"                   
    "106252440" "I10-Hipertensión esencial (primaria) (Repetida)  ;  E11-Diabetes mellitus no insulinodependiente (Repetida)  ;"                   
    "106254680" "K80-Colelitiasis (Nueva)  ;  B98.0-Helicobacter Pylori como causa de enfermedades (Nueva)  ;  K29.7-Gastritis, no especificada (Nueva)  ;"                   
    "106378568" "H52.7-Trastorno de la refracción, no especificado (Nueva)  ;  H52.4-Presbicia (Nueva)  ;"                   
    "106498245" "K30-Dispepsia (Nueva)  ;"                   
    "106596522" "I10-Hipertensión esencial (primaria) (Repetida)  ;"                   
    "10703062K" "E78-Dislipidemia (Nueva)  ;  E11-1-Diabetes mellitus insulinorequiriente (Repetida)  ;"                   
    "107038442" "E05-Tirotoxicosis (hipertiroidismo) (Nueva)  ;  E11-Diabetes mellitus no insulinodependiente (Repetida)  ;"                   
    "107042059" "M75.4-Síndrome de abducción dolorosa del hombro (Nueva)  ;"                   
    "107046232" "I10-Hipertensión esencial (primaria) (Repetida)  ;  E78-Dislipidemia (Repetida)  ;"                   
    "107080902" "H61.2-Cerumen impactado (Nueva)  ;"                   
    "107169768" "R73.0-Intolerancia a la glucosa (Repetida)  ;  I10-Hipertensión esencial (primaria) (Repetida)  ;  R63.5-Sobrepeso (Repetida)  ;"                   
    "107238425" "J03.0-Amigdalitis estreptocócica (Nueva)  ;"                   
    "107315209" "W57.8-Mordedura o picadura de insectos y otros artrópodos no venenosos, en otro lugar especificado (Nueva)  ;"                   
    "107361782" "K42-Hernia umbilical (Nueva)  ;  J30.4-Rinitis alérgica, no especificada (Nueva)  ;"                   
    "107388427" "I10-Hipertensión esencial (primaria) (Repetida)  ;"                   
    "107497234" "E11-Diabetes mellitus no insulinodependiente (Repetida)  ;  I10-Hipertensión esencial (primaria) (Repetida)  ;"                   
    "107622829" "M72.5-Fascitis, no clasificada en otra parte (Repetida)  ;"                   
    "107668829" "M54.5-Lumbago no especificado (Repetida)  ;"                   
    "107714642" "E66-2-Obesidad grado II (Nueva)  ;  M77.0-Epicondilitis media (Nueva)  ;"                   
    "107714766" "J20-Bronquitis aguda (Nueva)  ;"                   
    "107716742" "H66.9-Otitis media, no especificada (Nueva)  ;"                   
    "107808531" "J00-Rinofaringitis aguda (resfriado común) (Nueva)  ;  K52.9-Colitis y gastroenteritis no infecciosas, no especificadas (Nueva)  ;"                   
    "10787304K" "G44.2-Cefalea debida a tensión (Nueva)  ;"                   
    "108041870" "S40.0-Contusión del hombro y del brazo (Nueva)  ;"                   
    "108576464" "I10-Hipertensión esencial (primaria) (Nueva)  ;"                   
    "108757477" "J15-Neumonía bacteriana (Nueva)  ;"                   
    "10881683K" "E03-Hipotiroidismo (Repetida)  ;  J02-Faringitis aguda (Nueva)  ;"                   
    "108841540" "S03-2-Contusión (Nueva)  ;"                   
    "108920718" "L30.9-Dermatitis, no especificada (Nueva)  ;"                   
    "108971185" "E66-1-Obesidad grado I (Nueva)  ;  I10-Hipertensión esencial (primaria) (Repetida)  ;  R42-Mareo y desvanecimiento (Nueva)  ;"                   
    "109058157" "J00-Rinofaringitis aguda (resfriado común) (Nueva)  ;  T78.4-Alergia no especificada (Nueva)  ;"                   
    "10913306K" "I10-Hipertensión esencial (primaria) (Repetida)  ;"                   
    "109251798" "H10-Conjuntivitis (Nueva)  ;"                   
    "109353051" "I10-Hipertensión esencial (primaria) (Nueva)  ;"                   
    "109529869" "E11-Diabetes mellitus no insulinodependiente (Repetida)  ;  I10-Hipertensión esencial (primaria) (Repetida)  ;"                   
    "109548189" "H54.7-Disminución de la agudeza visual, sin especificación (Nueva)  ;"                   
    "109588695" "M54.2-Cervicalgia (Nueva)  ;  E11-Diabetes mellitus no insulinodependiente (Repetida)  ;"                   
    "109601853" "M20.1-Hallux valgus (adquirido) (Nueva)  ;"                   
    "109780847" "F32.1-Episodio depresivo moderado (Repetida)  ;  M75.4-Síndrome de abducción dolorosa del hombro (Repetida)  ;"                   
    "109796840" "Z71.9-Consulta, no especificada (Nueva)  ;"                   
    "109841978" "K52.9-Colitis y gastroenteritis no infecciosas, no especificadas (Nueva)  ;"                   
    "109884014" "E14-Diabetes mellitus, no especificada (Repetida)  ;  E78-Dislipidemia (Repetida)  ;"                   
    "109978256" "L60.0-Uña encarnada (Repetida)  ;"                   
    "109978396" "Z10-Control general de salud de rutina de subpoblaciones definidas (Nueva)  ;"                   
    "110097727" "E78-Dislipidemia (Nueva)  ;"                   
    "110100477" "J00-Rinofaringitis aguda (resfriado común) (Nueva)  ;"                   
    "110876025" "H66.0-Otitis media supurativa aguda (Nueva)  ;"                   
    "110967705" "M54.5-Lumbago no especificado (Nueva)  ;  H26.9-Catarata, no especificada (Nueva)  ;"                   
    "111445400" "H91.9-Hipoacusia, no especificada (Nueva)  ;"                   
    end
    copy up to and including the previous line ------------------

    Listed 100 out of 12102 observations
    Use the count() option to list more


  • #2
    Code:
     gen code = substr(D, 1, strpos(D, "-")-1)

    Comment


    • #3
      Scott

      Thank you very much for your help. Sincerely a line of command in stata can brighten a person's day.

      regards

      Moses

      Comment

      Working...
      X