Registration Concurrent Program From Backend

PL/SQL,SQL,Reports Triggers

Declare
l_request_id number(10);
begin
l_request_id:= FND_REQUEST.SUBMIT_REQUEST ('PO',
 'USERSLIST',
 'Test Program',
 '',
 '',
 1500,
 1600,
'EMAIL_ADDRESS');
Commit;
if l_request_id != 0 then
Fnd_File.Put_line(Fnd_file.log,'Program succesfullt submitteed');
else
Fnd_File.Put_line(Fnd_file.log,'Program Not succesfull submitteed There are some errors');
End If;
Exception
when others then
Fnd_File.Put_line(Fnd_file.log,'Exception raised at the time of submission');
End;

Form Triggers
==============
Declare
l_request_id number(10);
begin
l_request_id:= FND_REQUEST.SUBMIT_REQUEST ('PO',
 'USERSLIST',
 'Test Program',
 '',
 '',
 1500,
 1600,
'EMAIL_ADDRESS',
                                          '','','','','','','','','',''
 '','','','','','','','','',''
 '','','','','','','','','',''
 '','','','','','','','','',''
 '','','','','','','','','',''
 '','','','','','','','','',''
 '','','','','','','','','',''
 '','','','','','','','','',''
 '','','','','','','','','','');
Commit;
if l_request_id != 0 then
Fnd_File.Put_line(Fnd_file.log,'Program succesfullt submitteed');
else
Fnd_File.Put_line(Fnd_file.log,'Program Not succesfull submitteed There are some errors');
End If;
Exception
when others then
Fnd_File.Put_line(Fnd_file.log,'Exception raised at the time of submission');
End;

Backend Program Registration:
==============================

fnd_program.executable  
fnd_program.register
fnd_program.parameter
fnd_program.request_group
fnd_program.add_to_group   - Add the C.P to the Request Group
fnd_program.delete_executable
fnd_program.incompatibility -Add Incompatibility Porogram

Create Executable from Backend:
==============================
Begin
fnd_program.executable('ERPREPORT',
                       'PO',
  'AAAAA',
  'This is Optional',
  'Oracle Reports',
  'USER_REPORT',
  '',
  '',
  'US',
  '');
Commit;
End;