There are a number of ways to do that. This method assumes you use the default column names...
col number: 1 2 3 4 5 ...
col name: A B C D E ...
Columns are created in data1 as they are needed.%P=A115021Nr0;
%W=data1;
if( exist(%W_D)==1 ) del %W_D; // delete data1 col(D) if it exists
m=3; // initialize data1 col #
n=1; // initialize data1 row #
loop (num,334,402) {
if( mod(num-334,23)==0 ) {
%W!wks.addCol(); // create col
m++; // increment col #
n=1; // reset row #
};
%W!cell(n,m)=%P$(num)_C[124];
n++; // increment row #
};
Mike Buess
Origin WebRing Member