29%irm_session_prepare();
32%irm_rest_get_rgf_rule_set(host = &rgf_protocol.:
33 , server = &rgf_service.
34 , solution = &rgf_solution.
36 , tgt_ticket = &tgt_ticket.
37 , username = &irm_user_id.
38 , password = &irm_user_password.
40 , outds = rule_set_info
41 , outVarTicket = ticket
42 , outSuccess = httpSuccess
43 , outResponseStatus = responseStatus
51 filter_exp = prxchange(
's/LOWER\(\s*(\w+)\s*\) like LOWER\(\s*"%([^%]+)%"\s*\)/prxmatch("\/\Q$2\E\/i", $1)/i', -1, filter_exp);
53 filter_exp = prxchange(
"s/(!=)/ne/i", -1, filter_exp);
55 if ruleSetType =
"MgtActionRuleSet" then
do;
56 allocation_method =
"INDIVIDUAL";
57 adjustment_type =
"INCREMENT";
58 filter_exp = catt(filter_exp,
" and (FORECAST_TIME ne 0)");