This is my 1st time I am using PROC JSON, I have used the below code to get JSON output data have; infile datalines delimiter=','; input user $ org $ acct $ city $; datalines; John,Sales,saving,london Mary,Sales,saving,london kim,Sales,saving,london sanya,Sales,saving,london ; Proc sql; create table user as select distinct user from have; quit; proc transpose data=user out=have_1_row(drop=_name_ _LABEL_) let; var user; run; Proc sql; create table org as select distinct org from have; quit; proc transpose data=org out=have_2_row(drop=_name_ _LABEL_) let; var org; run; Proc sql; create table acct as select distinct acct from have; quit; proc transpose data=acct out=have_3_row(drop=_name_ _LABEL_) let; var acct; run; Proc sql; create table city as select distinct city from have; quit; proc transpose data=city out=have_4_row(drop=_name_ _LABEL_)let; var city; run; proc json out="/sasdata/incoming/vexiere/TESTE_NOV.JSON" nosastags pretty; %let originator=users; write open object; write values "&originator"; write open array; write open array; write open object; WRITE VALUES "users"; EXPORT have_1_row / NOKEYS; WRITE VALUES "org"; EXPORT have_2_row / NOKEYS; WRITE VALUES "acct"; EXPORT have_3_row / NOKEYS; WRITE VALUES "city"; EXPORT have_4_row / NOKEYS; write close; write close; write close; write close; run; *********************OutPut JSON File ****************************************; { "users": [ [ { "users": [ "John", "Many", "Kim", "Sanya" ], "organizationId": [ "Sales" ], "accountId": [ "saving" ], "TenantId": [ "london" ] } ] ] } *********************OutPut JSON File Expected****************************************; My output is very close but not as expected. { "users": [ [ { "userIds": [ "John", "Many", "Kim", "Sanya" ], "org": "Sales" , "acct": "saving" , "city": "london" } ] ] } Any help will is highly appreciated. Thanks Jack
... View more