看看这个吧 很好使用滴,我们常用,
declare
req_id number;
begin
if :XXWPR001.END_TIME is not null then
req_id := FND_REQUEST.SUBMIT_REQUEST( 'XXMFG',
'XXWPR001',
'',
to_char(sysdate,'DD-MON-YY HH24:MI:SS'),
FALSE,
:PARAMETER.ORG_ID,
:XXWPR001.WIP_ENTITY_NAME,
:XXWPR001.WIP_ENTITY_NAME1,
:XXWPR001.CLASS_CODE,
:XXWPR001.ACCESSORY,
to_char(:XXWPR001.START_TIME,'yyyy-mm-dd'),
to_char(:XXWPR001.END_TIME,'yyyy-mm-dd'),
:XXWPR001.COOPERATION_WORKSHOP,
chr(0),
'','','','','','','','','','','',
'','','','','','','','','','',
'','','','','','','','','','',
'','','','','','','','','','',
'','','','','','','','','','',
'','','','','','','','','','',
'','','','','','','','','','',
'','','','','','','','','','',
'','','','','','','','','','');
if req_id <= 0 then
fnd_message.set_string('提交失败'||TO_CHAR(req_id));
fnd_message.error ;
forms_ddl('rollback');
return;
else
FND_MESSAGE.SET_STRING('提交报表成功!请到后台查找请求号为:'||to_char(req_id)||'的并进行报表打印');
fnd_message.show ;
forms_ddl('commit');
end if ;
else
FND_MESSAGE.SET_STRING('请选择日期!');
fnd_message.show ;
end if;
END; |