Write A SAS Dataset to A SQL Script

data _null_;
*file "/dfs/public/AA/thuang/sql/ta_orb_dsk_rpc.sql";
file "/dfs/marketing/thuang/sql/ta_orb_dsk_rpc.sql";
set rpc.ta_orb_dsk_rpc_&fid. end=last;
length sql_stmt $1000.;

if _n_ = 1 then do;

put 'DROP TABLE IF EXISTS sandbox.tch_ta_orb_dsk_rpc10;';
put 'CREATE TABLE sandbox.tch_ta_orb_dsk_rpc10 (';
put 'oneg_id INT,rpc FLOAT,new_ind INT, update_dt DATE)';
put 'DISTRIBUTED BY (oneg_id, rpc);';
put 'GRANT ALL PRIVILEGES ON sandbox.tch_ta_orb_dsk_rpc10 TO PUBLIC;';
put 'INSERT INTO sandbox.tch_ta_orb_dsk_rpc10 VALUES';

end;


if last then
sql_stmt=  compress("("||oneg_id||","||adj_rpc||","||new_ind||",'"||&update_dt.||"');");
else sql_stmt=  compress("("||oneg_id||","||adj_rpc||","||new_ind||",'"||&update_dt.||"'),");

put sql_stmt;

run;