Trucos SAS. Particionar y exportar a texto un dataset

* TABLA SAS DE EJEMPLO;
data total;
    do i = 1 to 10000;
        importe = ranuni(8) * 100;
        output;
    end;
run;

/* MACRO QUE RECORRE LA TABLA, PARTE Y EXPORTA CADA PARTE.
   NECESITA EL CONJUNTO DE DATOS Y EL TAMAÑO DE CADA PARTE */
%macro parte(ds, tamanio);
    %do i = 1 %to 10000 %by &tamanio.;
        data parte;
            set &ds. (firstobs = &i. obs = %eval(&i. + &tamanio. - 1));
        run;

        proc export data=work.parte
            outfile="C:\TEMP\parte&i..csv"
            dbms=csv replace;
        run;
        
        proc delete data=parte; 
        run;
    %end;
%mend;

%parte(total, 1000);