Retrieving Price and Sales Data for Multiple Companies

/*------------------------------------------------------------------------

                   SAS SAMPLE LIBRARY

       Name: fsdex02.sas
Description: Example program from SAS/ETS User's Guide,
             The SASEXFSD Interface Engine
      Title: Retrieving Price and Sales Data for Multiple Companies
    Product: SAS/ETS Software
       Keys: FactSet data extraction
      Procs: SASEXFSD
      Notes: Read this before you run this sample.
             The sample data provided resides in the ets/sasmisc folder.
             If you are using automap=READONLY, then you must copy the
             map of your incoming XML data to a writeable folder before
             using it. So, define a system environment variable
             ,FACTSET, to the path of your  writeable folder containing
             the fsdex02.map file and FSDEX02.xml.
             To assign a fileref to the external file to be processed,
             use the following form of the libname statement:

           libname xfsd sasexfsd "%sysget(FACTSET)"
              factlet=ExtractFormulaHistory
              ids='ibm,fsd'
              items='p_price,ff_sales'
              dates='20110130:20110631:m'
              format=sml
              outXml=fsdex02
              automap=replace
              mapref=MyMap
              xmlmap="%sysget(FACTSET)fsdex02.map"
              orientation=eti
              user='<your FactSet username for internet FASTfetch access>'
              pass='<your FactSet password for internet FASTfetch access>';
--------------------------------------------------------------------------*/


options validvarname=any
   sslcalistloc="/SASSecurityCertificateFramework/1.1/cacerts/trustedcerts.pem";

title 'Retrieve Price and Sales Data for IBM and FactSet(FDS)';
libname _all_ clear;

libname xfsd sasexfsd "%sysget(FACTSET)"
   debug=on
   factlet=ExtractFormulaHistory
   ids='ibm,fds'
   items='p_price,ff_sales'
   dates='20110130:20110631:m'
   format=sml
   outXml=fsdex02
   automap=replace
   mapref=MyMap
   xmlmap="%sysget(FACTSET)fsdex02.map"
   orientation=eti
   user='XXXXXXXXXXXXXXXX'
   pass='XXXXXXXXXXXXXXXX';

data priceSale; set xfsd.fsdex02; run;
proc print data=priceSale; run;