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;
No comments:
Post a Comment