mirror of
https://github.com/sasjs/core.git
synced 2025-12-10 14:04:36 +00:00
109 lines
2.9 KiB
SAS
109 lines
2.9 KiB
SAS
/**
|
|
@file mv_getgroupmembers.sas
|
|
@brief Creates a dataset with a list of group members
|
|
@details First, be sure you have an access token (which requires an app token)
|
|
|
|
Using the macros here:
|
|
|
|
filename mc url
|
|
"https://raw.githubusercontent.com/sasjs/core/main/all.sas";
|
|
%inc mc;
|
|
|
|
Now we can run the macro!
|
|
|
|
%mv_getgroupmembers(All Users)
|
|
|
|
outputs:
|
|
|
|
ordinal_root num,
|
|
ordinal_items num,
|
|
version num,
|
|
id char(43),
|
|
name char(43),
|
|
providerId char(5),
|
|
implicit num
|
|
|
|
@param [in] group Group id for which to return group members
|
|
@param [in] access_token_var= (ACCESS_TOKEN)
|
|
The global macro variable to contain the access token
|
|
@param [in] grant_type= (sas_services)
|
|
valid values are "password" or "authorization_code" (unquoted).
|
|
@param [out] outds= (work.viyagroupmembers)
|
|
The library.dataset to be created that contains the list of group members
|
|
|
|
|
|
@version VIYA V.03.04
|
|
@author Allan Bowe, source: https://github.com/sasjs/core
|
|
|
|
<h4> SAS Macros </h4>
|
|
@li mp_abort.sas
|
|
@li mf_getplatform.sas
|
|
@li mf_getuniquefileref.sas
|
|
@li mf_getuniquelibref.sas
|
|
|
|
**/
|
|
|
|
%macro mv_getgroupmembers(group
|
|
,access_token_var=ACCESS_TOKEN
|
|
,grant_type=sas_services
|
|
,outds=work.viyagroupmembers
|
|
);
|
|
%local oauth_bearer;
|
|
%if &grant_type=detect %then %do;
|
|
%if %symexist(&access_token_var) %then %let grant_type=authorization_code;
|
|
%else %let grant_type=sas_services;
|
|
%end;
|
|
%if &grant_type=sas_services %then %do;
|
|
%let oauth_bearer=oauth_bearer=sas_services;
|
|
%let &access_token_var=;
|
|
%end;
|
|
|
|
%mp_abort(iftrue=(&grant_type ne authorization_code and &grant_type ne password
|
|
and &grant_type ne sas_services
|
|
)
|
|
,mac=&sysmacroname
|
|
,msg=%str(Invalid value for grant_type: &grant_type)
|
|
)
|
|
|
|
options noquotelenmax;
|
|
|
|
%local base_uri; /* location of rest apis */
|
|
%let base_uri=%mf_getplatform(VIYARESTAPI);
|
|
|
|
/* fetching folder details for provided path */
|
|
%local fname1;
|
|
%let fname1=%mf_getuniquefileref();
|
|
proc http method='GET' out=&fname1 &oauth_bearer
|
|
url="&base_uri/identities/groups/&group/members?limit=10000";
|
|
headers
|
|
%if &grant_type=authorization_code %then %do;
|
|
"Authorization"="Bearer &&&access_token_var"
|
|
%end;
|
|
"Accept"="application/json";
|
|
run;
|
|
/*data _null_;infile &fname1;input;putlog _infile_;run;*/
|
|
%if &SYS_PROCHTTP_STATUS_CODE=404 %then %do;
|
|
%put NOTE: Group &group not found!!;
|
|
data &outds;
|
|
length id name $43;
|
|
call missing(of _all_);
|
|
run;
|
|
%end;
|
|
%else %do;
|
|
%mp_abort(iftrue=(&SYS_PROCHTTP_STATUS_CODE ne 200)
|
|
,mac=&sysmacroname
|
|
,msg=%str(&SYS_PROCHTTP_STATUS_CODE &SYS_PROCHTTP_STATUS_PHRASE)
|
|
)
|
|
%let libref1=%mf_getuniquelibref();
|
|
libname &libref1 JSON fileref=&fname1;
|
|
data &outds;
|
|
length id name $43;
|
|
set &libref1..items;
|
|
run;
|
|
libname &libref1 clear;
|
|
%end;
|
|
|
|
/* clear refs */
|
|
filename &fname1 clear;
|
|
|
|
%mend mv_getgroupmembers; |