Providing software solutions since 1976

• Log in
• Create profile
• Welcome
  [Log out]
• Edit profile

• Print  |
• Feedback  |
• Share

  • E-mail

  
  
  

  E-mail This Page

  Your Name:*
  Your E-mail:*
  Recipient E-mail:*
  Send a copy to me
  Personal Message:
  
  

  * indicates a required field

Communications software such as FTP can be used to move SAS data sets and transport files in binary mode. However, you might find the file too large to transfer efficiently. The network might not hold up for the entire process or the transfer might take too long.

This macro can be used to break the data set into smaller data sets at the source host before the transport process. Parameters include the data set name and number of data sets you want to create.

---

These sample files and code examples are provided by SAS Institute Inc. "as is" without warranty of any kind, either express or implied, including but not limited to the implied warranties of merchantability and fitness for a particular purpose. Recipients acknowledge and agree that SAS Institute shall not be liable for any damages whatsoever arising out of their use of this material. In addition, SAS Institute will provide no support for the materials contained herein.

%macro test(dsn,obs);                                                                                                                   
  %let dsid=%sysfunc(open(&dsn));                                                                                                        
  %let num=%sysfunc(attrn(&dsid,nobs));                                                                                                  
  %let rc=%sysfunc(close(&dsid));                                                                                                        
  %let end=%sysevalf(&num/&obs,integer);                                                                                                 
                                                                                                                                        
  %local newobs;                                                                                                                         
  %do i = 1 %to &end;                                                                                                                    
    %if &i = 1 %then %do;                                                                                                                 
      data x&i;                                                                                                                            
        set &dsn(firstobs=&i obs=&obs);                                                                                                     
      run;                                                                                                                                 
    %end;                                                                                                                                 
    %else %do;                                                                                                                            
      %if &i ne &end %then %do;                                                                                                            
        %let newobs=&newobs+&obs;                                                                                                           
        data x&i;                                                                                                                           
          set &dsn(firstobs=%eval(&newobs+1) obs=%eval(&obs*&i));                                                                            
        run;                                                                                                                                
      %end;                                                                                                                                
      %else %do;                                                                                                                           
        %let newobs=&newobs+&obs;                                                                                                           
        data x&i;                                                                                                                           
          set &dsn(firstobs=%eval(&newobs+1));                                                                                               
        run;                                                                                                                                
      %end;                                                                                                                                
    %end;                                                                                                                                  
  %end;                                                                                                                                  
%mend test;                                                                                                                             
%test(sashelp.class,4)

/* After running the sample, you can uncomment the PROC DATASETS */
/* code below and remove all data sets from the WORK library.    */

/*proc datasets lib=work kill memtype=data;*/
/*quit;*/

---

These sample files and code examples are provided by SAS Institute Inc. "as is" without warranty of any kind, either express or implied, including but not limited to the implied warranties of merchantability and fitness for a particular purpose. Recipients acknowledge and agree that SAS Institute shall not be liable for any damages whatsoever arising out of their use of this material. In addition, SAS Institute will provide no support for the materials contained herein.

Operating System and Release Information