sas => Copiar un archivo, byte por byte

Introducción

Si está utilizando SAS para producir informes de algún tipo, se encontrará con la necesidad de copiar un archivo en algún momento. La mayoría de las veces he usado este método para copiar una plantilla de Excel y luego descargar datos a través de PROC EXPORT en el nuevo archivo que he creado.

Este es un gran ejemplo que he encontrado de Chris Hemedinger ( http://blogs.sas.com/content/sasdummy/2011/06/17/how-to-use-sas-data-step-to-copy-a -archivo-desde-cualquier parte /) .

Copiando cualquier archivo, byte por byte

/* these IN and OUT filerefs can point to anything */
filename in "anyfilehere.xlsx"; 
filename out "anyfilehere.xlsx"; 


/* copy the file byte-for-byte  */
data _null_;
  length filein 8 fileid 8;
  filein = fopen('in','I',1,'B');
  fileid = fopen('out','O',1,'B');
  rec = '20'x;
  do while(fread(filein)=0);
     rc = fget(filein,rec,1);
     rc = fput(fileid, rec);

     rc =fwrite(fileid);
  end;
  rc = fclose(filein);
  rc = fclose(fileid);
run;
 
filename in clear;
filename out clear;

Modified text is an extract of the original Stack Overflow Documentation

Licenciado bajo CC BY-SA 3.0

No afiliado a Stack Overflow

sas
Copiar un archivo, byte por byte

Buscar..

Introducción

Copiando cualquier archivo, byte por byte