[Home] [Help]
350: p_text varchar2 ) RETURN VARCHAR2
351: AS
352: --l_mailhost VARCHAR2(64) := 'mail.oracle.com';
353: --l_mailport NUMBER := 25;
354: l_mailhost VARCHAR2(64) := fnd_profile.value('MTH_MAIL_SERVER_NAME');
355: /* The defaul mail server port usually is 25 by industry standard.
356: If port number is not set, should not affect sending notification.*/
357: l_mailport NUMBER := Nvl(fnd_profile.value('MTH_MAIL_SERVER_PORT'),25);
358: l_mail_conn UTL_SMTP.connection;
353: --l_mailport NUMBER := 25;
354: l_mailhost VARCHAR2(64) := fnd_profile.value('MTH_MAIL_SERVER_NAME');
355: /* The defaul mail server port usually is 25 by industry standard.
356: If port number is not set, should not affect sending notification.*/
357: l_mailport NUMBER := Nvl(fnd_profile.value('MTH_MAIL_SERVER_PORT'),25);
358: l_mail_conn UTL_SMTP.connection;
359: l_mesg VARCHAR2(1000);
360: l_flag NUMBER := 0;
361: crlf CONSTANT VARCHAR2(2):= fnd_global.local_chr(13) ||
365: IF l_mailhost IS NOT NULL AND Length(l_mailhost) <> 0
366: THEN
367: l_mail_conn := UTL_SMTP.open_connection(l_mailhost, l_mailport);
368: l_mesg := 'Date: ' || TO_CHAR( SYSDATE, 'dd Mon yy hh24:mi:ss') || crlf ||
369: 'From: '|| NVL(fnd_profile.value('MTH_NOTIFICATION_DISPLAY_NAME'), 'Default User') || crlf ||
370: 'Subject: '|| p_subject || crlf ||
371: 'To: '||p_send_to || crlf || '' || crlf || p_text;
372:
373: UTL_SMTP.helo(l_mail_conn, l_mailhost);
418: l_action_status_rec ActionStatusRec;
419: serial_number_not_found EXCEPTION;
420: asset_info_not_found EXCEPTION;
421: source_service_not_found EXCEPTION;
422: l_dblink VARCHAR2(100) := fnd_profile.value('MTH_SOURCE_INSTANCE_DBLINK');
423: l_sql VARCHAR2(4000);
424: l_schema_name VARCHAR2(50);
425: l_str VARCHAR2(1000);
426: l_system_pk VARCHAR2(30);
438:
439: BEGIN
440:
441: l_schema_name := USER;
442: l_str := 'SELECT fnd_profile.Value@ ' || fnd_profile.Value('MTH_SOURCE_INSTANCE_DBLINK') || '(''MTH_EBS_GLOBAL_NAME'') FROM dual';
443:
444: EXECUTE IMMEDIATE l_str INTO l_system_pk;
445:
446: OPEN cur_wr;
630: AS
631: -- ---------------------------------------------------------------------
632: soap_request varchar2(30000);
633: soap_respond varchar2(30000);
634: l_proxy_server VARCHAR2(100) := fnd_profile.value('MTH_SOA_PROXY_SERVER');
635: --l_proxy_server VARCHAR2(100) := 'www-proxy.us.oracle.com';
636: l_action VARCHAR2(100);
637: http_req utl_http.req;
638: http_resp utl_http.resp;