通过接口增加或失效职责

--更改职责
fnd_user_resp_groups_api.update_assignment(user_id              => v_user_id
                                             ,responsibility_id                        => v_resp_id
                                             ,responsibility_application_id       => v_appl_id
                                             ,start_date                                => v_user_info.start_date
                                             ,end_date                                 => sysdate
                                             ,description                               => ‘‘
                                             );
--增加职责
fnd_user_resp_groups_api.upload_assignment(user_id              => v_user_id
                                             ,responsibility_id                        => v_resp_id
                                             ,responsibility_application_id       => v_appl_id
                                             ,start_date                                => v_user_info.start_date
                                             ,end_date                                 => sysdate
                                             ,description                               => ‘‘
                                             );
--增加职责
fnd_user_pkg.addresp(username         => v_user_info.user_name 
                                    ,resp_app      => v_appL_short_name
                                    ,resp_key      => v_user_info.resp_key
                                    ,description   => ‘‘
                                    ,start_date    => v_user_info.start_date
                                    );
--失效职责（失效日期为当天）
fnd_user_pkg.DelResp(username       => v_user_name
                     ,resp_app      =>  v_appl_short_name
                     ,resp_key      =>  v_resp_key
                     ,security_group =>  v_sec_group
                     );