How to split this one

[teja5959]

data have 

101 1-Burning

102 1-Burning2-Itching

103 1-Burning2-Itching3- swelling

I want data 

101   Burning

102   Burning

102   Itching

103   Burning

103   Itching

103   swelling

[SASKiwi]

Here's one way:

data have; 
input @1 ID $3. Symptom $30.;
datalines;
101 1-Burning
102 1-Burning2-Itching
103 1-Burning2-Itching3- swelling
;
run;

data want;
  drop i words Symptom;
  set have;
  words = countw(Symptom, '-123 ');
  do i = 1 to words;
    Symptom_Single = scan(Symptom,i, '-123 ');
    output;
  end;
run;

Please post your data like I've done in a DATALINES statement in the future to save us time in answering.