FND_PROGRAM API添加Concurrent到某一职责

BEGIN
IF NOT FND_PROGRAM.program_in_group(
program_short_name => 'XX_DETAIL_SALE_COST_PKG',
program_application => 'XX',
request_group => 'XX_GL_REQUEST_GROUP',
group_application => 'XX') THEN
Fnd_Program.Add_to_group(
program_short_name => 'XX_DETAIL_SALE_COST_PKG',
program_application => 'XX',
request_group => 'XX_GL_REQUEST_GROUP',
group_application => 'XX');
commit;
dbms_output.put_line('Program XX_DETAIL_SALE_COST_PKG added to Group XX_GL_REQUEST_GROUP');
ELSE
dbms_output.put_line('Program XX_DETAIL_SALE_COST_PKG already in Group XX_GL_REQUEST_GROUP');
END IF;

END;