SQL & PL/SQL

Hi All,

I have made two procedures, xx_nidhi_proc1 and xx_nidhi_proc2.
xx_nidhi_proc1 takes four parameters from front end and is registered as concurrent program in oracle apps and running fine alone.

xx_nidhi_proc2 calls the concurrent program of xx_nidhi_proc1 which is XX_NIDS_PROC1_PROG1.

But the problem in my code is , It runs the second concurrent program for xx_nidhi_proc2 but shows the Inactive- No Manager status for my first concurrent program XX_NIDS_PROC1_PROG1,

Please find out the error in my code...


CREATE OR REPLACE PACKAGE BODY NIDHI IS

procedure xx_nidhi_proc1 (errbuf OUT VARCHAR2,
retcode OUT VARCHAR2,
name_t varchar2,
empno varchar2,
doj date,
desig varchar2) is

begin

fnd_file.PUT_LINE(Fnd_File.output,'/**************Start of the output **********/');
fnd_file.PUT_LINE(Fnd_File.output, 'Name:'||name_t);
fnd_file.PUT_LINE(Fnd_File.output, 'Number:'||empno);
fnd_file.PUT_LINE(Fnd_File.output, 'DOJ:'|| to_char(doj, 'DD-MON-RRRR'));
fnd_file.PUT_LINE(Fnd_File.output, 'Designation:'||desig);

fnd_file.PUT_LINE(Fnd_File.output,'/**************End of the output **********/');

errbuf:='SUCCESS';
retcode:='SUCCESS';

end xx_nidhi_proc1;

--calls the xx_nidhi_proc1 as concurrent program.

procedure xx_nidhi_proc21 (errbuf OUT VARCHAR2,
retcode OUT VARCHAR2)
is

v_request_id number;
begin


fnd_file.PUT_LINE(Fnd_File.output,'/**************Start of the output **********/');
fnd_file.PUT_LINE(Fnd_File.output, 'Deptartment Number:'||'Computer');
fnd_file.PUT_LINE(Fnd_File.output, 'Location:'||'TCS Towers');

fnd_file.PUT_LINE(fnd_file.output,'Starting XX_NIDS_PROC1_PROG1');
fnd_global.apps_initialize(user_id => 1318 ,resp_id => 50578, resp_appl_id => 201);
v_request_id := FND_REQUEST.SUBMIT_REQUEST('PO',
'XX_NIDS_PROC1_PROG1',
null,
null,
TRUE,
'Nidhi gupta',
138609,
'12-Dec-2003',
'ASE');

commit;
fnd_file.PUT_LINE(fnd_file.OUTPUT,'Request ID is '||to_char(v_request_id));
fnd_file.PUT_LINE(fnd_file.OUTPUT,'End XX_NIDS_PROC1_PROG1');

fnd_file.PUT_LINE(Fnd_File.output,'/**************End of the output **********/');

errbuf:='SUCCESS';
retcode:='SUCCESS';

end xx_nidhi_proc21;



Thanks

Nidhi
END NIDHI;