If you're reading from raw data, you can put an INPUT statement inside a do hour=0 to 4 loop:
data want (drop=dum: j);
infile datalines truncover ;
input date :$5. @7 @;
do hour=0 to 4;
input t (dum1-dum4) (:$8.)
h (dum1-dum4) (:$8.)
v :$8.
@7 @;
do j=1 to hour+1;
input dum1 :$8. @;
end;
output;
end;
datalines;
Day1 22 24 26 28 31 75 78 78 87 91 A C B F D
Day2 28 29 31 28 32 88 90 85 73 84 C E A S S
Day3 22 26 27 23 24 79 75 76 15 29 M L P Y K
run;
Notes:
The trailing @in te input statements mean do not relinquish the input dataline.
The @7 means to point at byte 7 of the input data (i.e.right after the date
... View more