Show the message in form pesonalization [message #470158] |
Mon, 09 August 2010 02:03 ![Go to next message Go to next message](/forum/theme/orafaq/images/down.png) |
manisha_borade
Messages: 49 Registered: May 2010
|
Member |
|
|
hi.
i call the one procedure in post_insert which sumbit the concurrent request and send the email to specific email address.
now i want to show the message, when email is send that "Your msg is send to ....."
what will i do.....
|
|
|
|
Re: Show the message in form pesonalization [message #470162 is a reply to message #470161] |
Mon, 09 August 2010 03:45 ![Go to previous message Go to previous message](/forum/theme/orafaq/images/up.png) ![Go to next message Go to next message](/forum/theme/orafaq/images/down.png) |
manisha_borade
Messages: 49 Registered: May 2010
|
Member |
|
|
My Procedure is:
CREATE OR REPLACE procedure APPS.FORM_EMAIL
(person_id in number,
full_name IN VARCHAR2,
ALERT OUT VARCHAR2)
IS
PRAGMA AUTONOMOUS_TRANSACTION;
l_request_id fnd_concurrent_requests.request_id%TYPE;
phase VARCHAR2 (200);
status VARCHAR2 (200);
dphase VARCHAR2 (200);
dstatus VARCHAR2 (200);
MESSAGE VARCHAR2 (200);
wait_stat BOOLEAN;
errmsg VARCHAR2 (1000);
BEGIN
fnd_global.apps_initialize ( user_id => 1110,
resp_id => 20420,
resp_appl_id => 1
--security_group_id => 0
);
l_request_id := fnd_request.submit_request
(
APPLICATION => 'FND',
PROGRAM => 'TEST_EMAIL',
DESCRIPTION => 'Test Email',
SUB_REQUEST => FALSE,
argument1 => person_id,
argument2 =>full_name
);
COMMIT;
IF (l_request_id <= 0)
THEN
errmsg := apps.fnd_message.get ();
ELSE
wait_stat :=
apps.fnd_concurrent.wait_for_request (l_request_id,
10,
360,
phase,
status,
dphase,
dstatus,
MESSAGE
);
END IF;
IF dphase = 'COMPLETE' AND dstatus = 'NORMAL'
THEN
ALERT:='Successfully submitted request: ' || l_request_id || ' to delete draft invoices';
ELSE
ALERT:='Error submitting request. Error:' || SUBSTR(SQLERRM, 1, 200);
END IF;
end FORM_EMAIL;
/
In Custom_code-->Personalozation
Trigger-->POST_INSERT
Action -->BuiltIn
BuiltIn Type--> Execute Procedure
Argument-->
='declare
v_name_value VARCHAR2(200):='''||${item.PERSON.TITLE.value}||'''||'''||${item.PERSON.LAST_NAME.value}||'''||'''||${item.PERSON.FIRST_NAME.value}|| ''';
v_address varchar2(200):='''||${item.PERSON.PERSON_ID.value}||''';
V_ALERT VARCHAR2(200);
begin
FORM_EMAIL(v_address,v_name_value,V_ALERT);
end'
|
|
|
|
|
|