Invoice import concurrent program

Question

Dear Gurus
I am trying to rund Invoice import concurrent program using PLSQL. However, I always get 0 returned from procedure. Please can you see if you can spot any obvious issue.
declare
x_user_id NUMBER;
x_appl_id NUMBER;
x_resp_id NUMBER;
x_conc_id NUMBER;
x_message VARCHAR2(1000);
BEGIN
fnd_message.clear();
SELECT user_id INTO x_user_id FROM FND_USER WHERE UPPER(user_name) = 'xxxxx';
SELECT application_id
INTO x_appl_id
FROM FND_APPLICATION
WHERE application_short_name = 'SQLAP';
SELECT responsibility_id
INTO x_resp_id
FROM FND_APPLICATION fa,
FND_RESPONSIBILITY_TL fr
WHERE fa.application_short_name = 'SQLAP'
AND fa.application_id = fr.application_id
AND fr.responsibility_name = 'GT AP Superuser';
FND_GLOBAL.APPS_INITIALIZE(x_user_id, x_resp_id, x_appl_id);
dbms_output.put_line('user id - ' || x_user_id);
dbms_output.put_line('responsibility id - ' || x_resp_id);
dbms_output.put_line('application id - ' || x_appl_id);
x_conc_id := fnd_request.submit_request(
application => 'SQLAP' ,
program => 'APXIIMPT' ,
description => NULL ,
start_time => SYSDATE ,
sub_request => FALSE ,
argument1 => NULL,
argument2 => 'XML GATEWAY',
argument3 => NULL, argument4 => 'N/A',
argument5 => NULL, argument6 => NULL,
argument7 => NULL, argument8 => 'N',
argument9 => 'N');
IF x_conc_id = 0 THEN
fnd_message.retrieve(x_message);
END IF;
dbms_output.put_line('concurrent request id - ' || x_conc_id);
dbms_output.put_line('Request not submitted due to "' || x_message || '".');
dbms_output.put_line(fnd_message.get);
fnd_message.raise_error;
end;
Regards,
Amjad.

Answer 1

Pardon my ignorance. How do I check for that?From System Administrator responsibility, navigate to Security > Responsibility > Define and query this responsibility, then get the Request Group and query it to verify if the concurrent program is added to this group or not.
Thanks,
Hussein