/******************************************************************************
 * Programme : Architecture Big Data : Industrialisez l'alimentation de votre Data Lake sans sacrifier la performance
 * Reference : CHARGE06ED
 * Source    : https://www.wearecas.eu/en/sampleCode/CHARGE06ED
 ******************************************************************************/

/* --- BLOC 1 --- */
 %GLOBAL BLDATF;
 %GLOBAL BLHOST;
 %GLOBAL BLPORT;

 %let BLDATF   =;
 %let BLHOST   =;
 %let BLPORT   =;

/* --- BLOC 2 --- */
options set=SAS_HADOOP_RESTFUL=1;

/* --- BLOC 3 --- */
proc delete data=mydblib.testblkld1; run;
proc delete data=mydblib.testblkld2; run;

/* --- BLOC 4 --- */
data work.testblkld;
   input name $ age sex $ bdate mmddyy.;
   cards;
amy 3 f 030185
bill 12 m 121277
charlie 35 m 010253
david 19 m 101469
elinor 42 f 080845
pearl 78 f 051222
vera 96 f 101200
frank 24 m 092663
georgia 1 f 040687
henry 46 m 053042
joann 27 f 020461
buddy 66 m 101432
;
run;

/* --- BLOC 5 --- */
proc sql;
create table mydblib.testblkld1
  (BULKLOAD=YES
   BL_DATAFILE=&bldatf
   BL_HOST=&blhost
   BL_PORT=&blport )
  as select * from work.testblkld;
quit;

/* --- BLOC 6 --- */
data mydblib.testblkld2 (
   BULKLOAD=YES
   BL_DATAFILE=&bldatf
   BL_HOST=&blhost
   BL_PORT=&blport );


set  work.testblkld;
run;