URGENT - Need to split and arrenge in required format - in SAS

[sas_lak]

Hi Everyone,

I need help on below requirement.

I have list of Names in dataset, Name contains multiple tokens separated by space.

Need to split name field and arrenge in proper format.

Ex- Input data.

Sl No	Company Name
1	NSDL PVT LTD
2	CIBIL INDIA LIMITED
3	EQUIFAX INTERNATIONAL LTD
4	HIGMMARK PRIVATE LIMITED
5	EXPERIAN LTD

Out put should be :- 

Sl No	TOKEN
1	NSDL
1	PVT
1	LTD
2	CIBIL
2	INDIA
2	LIMITED
3	EQUIFAX
3	INTERNATIONAL
3	LTD
4	HIGHMARK
4	PRIVATE
4	LIMITED
5	EXPERIAN
5	LTD

Thanks in Advance...!

[Ksharp · Accepted solution]

data have;
infile cards truncover expandtabs;
input SlNo	CompanyName $40.;
cards;
1	NSDL PVT LTD
2	CIBIL INDIA LIMITED
3	EQUIFAX INTERNATIONAL LTD
4	HIGMMARK PRIVATE LIMITED
5	EXPERIAN LTD
;
run;
data want;
 set have;
 do i=1 to countw(CompanyName,' ');
  token=scan(CompanyName,i);output;
 end;
 drop i;
run;

[sas_lak]

Thank you..!