how to initialize sequrity profile from back end in R12

query to fine security profile information

select psp.security_profile_name, psp.security_profile_id, hou.name, hou.organization_id            
from per_security_profiles psp, per_security_organizations pso, hr_operating_units hou        
where pso.security_profile_id = psp.security_profile_id  and pso.organization_id = hou.organization_id
order by psp.security_profile_name,hou.name;
how to initialize sequrity profile from back end

begin
mo_global.set_org_access(null,3068 /*security_profile_id */,'ar' /*module shortname*/);
end;