World Weather Online Data for Dubai, United Arab Emirates

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

                   SAS SAMPLE LIBRARY

       Name: rainex01.sas
Description: Example program from SAS/ETS User's Guide,
             The SASERAIN Interface Engine
      Title: World Weather Online Data for Dubai, United Arab Emirates
    Product: SAS/ETS Software
       Keys: World Weather Online data extraction
      Procs: SASERAIN
      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
             ,RAIN_DATA, to the path of your  writeable folder containing
             the RAINEX01.MAP file and RAINEX01.xml.
             To assign a fileref to the external file to be processed,
             use the following form of the libname statement:

           libname rain saserain "%sysget(RAIN_DATA)"
              FORMAT=XML
              OUTXML=rainex01
              AUTOMAP=replace
              MAPREF=MyMap
              XMLMAP="%sysget(RAIN_DATA)rainex01.map"
              APIKEY='<your World Weather Online apikey>'
              QUERY='Dubai,United Arab Emirates'
              NUM_OF_DAYS=2
              TP=24
              ;
 ----------------------------------------------------------------*/


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

title 'Retrieve Weather Data for Dubai';
libname _all_ clear;
libname mylib "/sasusr/playpens/saskff/rain/doc/";

libname myplace saserain "/sasusr/playpens/saskff/rain/test/"
   apikey='XXXXXXXXXXXXXXXXXXXXXXXXXXXXX'
   query='Dubai,United Arab Emirates'
   format=XML
   outXml=dubhot
   automap=replace
   mapref=MyMap
   xmlmap="/sasusr/playpens/saskff/rain/test/dubhot.map"
   num_of_days=2
   tp=24
   ;

data mylib.hotdub;
   set myplace.dubhot;
run;

proc contents data=mylib.hotdub; run;
proc print data=mylib.hotdub; run;