Online File

How to use this page

---

Rick Aster: Professional SAS Programming Shortcuts: Contents

Chapter 40
Program
Spaces between characters

---

data _null_;
   length text $ 14 expanded $ 29;
   text = "Base Period";
   expanded = "";
   do c = 1 to vlength(text) min (vlength(expanded)/2);
      substr(expanded, c*2, 1) = substr(text, c, 1);
      end;
   put expanded;
run;