The v612 transport file datafmt.trp.csnomiss contains the
      filetype for COMPUSTAT without the missing data codes,
      (SEMI-ANNUAL FIGURE and ANNUAL FIGURE).

      The following files can be downloaded from 
      our technical support location, /techsup/download/base:

      The DATAFORMAT transport file is:
             datafmt.trp.csnomiss and should be renamed datafmt.trp

      This help file is:
             csmshelp.doc
  

      Customers can exercise this filetype for COMPUSTAT data.

      To use the catalog you must first download the 
      datafmt.trp.csnomiss file and rename it to datafmt.trp,
      then you will cimport it:

     filename sascat 'datafmt.trp';     /* the transport file
                                           for creating datafmt */
     libname  libref '../datafmt/cat';  /* where you want the datafmt
                                           catalog to be stored */ 
     /*- convert transport file, sascat, back to catalog, datafmt ---*/
     proc cimport catalog=libref.datafmt file=sascat;
        run;


     EXAMPLE  Using COMPUSTAT experimiental filetype.

        NOTE: Remember to add the c=libref.datafmt option
              to your DATASOURCE statement. If you forget to
              use the c= option you will still pick up the
              old catalog in the SASHELP directory.

 RUN;
 /****************************************************************
  *          S A S     T E S T     L I B R A R Y
  *
  * NAME     : datsaibm.sas
  * SUPPORT  : Kelly Fellingham, Evan Dean
  * UPDATE   : 09DEC98
  */
 TITLE1 '*** TEST: datsaibm.sas ***';
 TITLE2 'Reading IBM 360/370 General COMPUSTAT Tape File';
 /* INPUT    : csaibm.dat
  * OUTPUT   :
  * SPEC.REQ :
  * PRODUCT  : ETS
  * KEYS     :
  * PROCS    : datasource, print, compare
  *
  * REF      :
  *            csaibm.dat is copied from an MVS Tape:
  *               VOL=SER=CMPUST
  *               LABEL=(,NL)
  *               LRECL=15808, RECFM=VS, BLKSIZE=15812
  *            It is a 10 company sample file with
  *               COMPUSTAT Industrial Annual IBM 360/370
  *               General Tape Format, and it contains a
  *               trailing record
  *
  * COMMENTS :
  *            Annual series are read and  OUT= ,OUTCONT=, and
  *              OUTKEY= data sets created.
  *
  *            A data step was developed to verify that DATASOURCE's
  *              OUT= data set contains the right data
  *
  ****************************************************************/
 /*-----------------------TEST PROGRAM---------------------------*/
 /*--------------------------------------------------------------*
  *                          set up                              *
  *--------------------------------------------------------------*/
 /*- assign fileref to the external file to be processed --------*/
     %setup( ets );
     %makefile( datafile, csaibm, , , dev=recfm=fixed lrecl=15804,
          aegis=recfm=fixed lrecl=15804, unix=recfm=f lrecl=15804,
          os2=recfm=s370v lrecl=15804 blksize=15812 );

     

 /*--------------------------------------------------------------*
  *       create output data sets without any subsetting         *
  *       NOTE: libref points to the new downloaded,cimported,   *
  *             datafmt catalog.                                 *
  *--------------------------------------------------------------*/
 /*- create output data sets using DATASOURCE statements --------*/
     proc datasource filetype=csaibm c=libref.datafmt
                     infile=datafile
                     interval=year
                     outselect=off
                     outcont=cscont outkey=cskey
                     out=cs;
        run;

 /*- print out data sets ----------------------------------------*/
     title3 'Print Out of OUTKEY=cskey Data Set';
     proc print data=cskey; run;

     title3 'Print Out of OUTCONT=cscont Data Set';
     proc print data=cscont( drop=descript ); run;

     title3 'Partial Listing of OUT=cs Data Set';
     proc print data=cs( drop=data5-data318 aftnt5-aftnt45
                         where=( dnum in (3681,8051) ) );
        run;

 /*--------------------------------------------------------------*
  *       create output data sets without any subsetting         *
  *--------------------------------------------------------------*/
 /*- create output data sets using DATASOURCE statements --------*/
     proc datasource filetype=csauc  ebcdic  c=libref.datafmt
                     infile=datafile
                     interval=year
                     outcont=cscont outkey=cskey
                     out=cs;
        run;

     proc print data=cskey;
        run;