Select * from ALL_SOURCE where TEXT LIKE '%Approval%'
SQL Code Snippets
Tuesday, September 1, 2020
Monday, April 6, 2020
Call a procedure on different DB; DB Link; Oracle
https://www.oracletutorial.com/oracle-administration/oracle-create-database-link/
Make sure grants are given to the user where the call is being made from.
How to call a procedure- :
/**
begin
package procedure@dblink
end
**/
Make sure grants are given to the user where the call is being made from.
How to call a procedure- :
/**
begin
package procedure@dblink
end
**/
Thursday, October 31, 2019
Convert dateTime to Specific format UiPath RPA
Output -> 07.29.2019
https://forum.uipath.com/t/convert-datetime-to-specific-format/82139
https://drive.google.com/open?id=1bYTdMb0eJE3Z9-dUxMh9vIB6S0aC5Xvw
Wednesday, October 23, 2019
Wednesday, December 12, 2018
Execute Function Oracle SQL in TOAD
declare
v_smtpServerName varchar2(50);
begin
fnd_profile.get(
'SMTP_SERVER' , v_smtpServerName );
dbms_output.put_line(v_smtpServerName);
end;
Tuesday, July 31, 2018
[NS-30131] Initial setup required for the execution of installer validations failed.
Error installing Oracle client for Windows
https://orawiki.org/2016/10/11/initial-setup-required-for-the-execution-of-installer-validation-failed/
setup.exe -ignorePrereq -J"-Doracle.install.client.validate.clientSupportedOSCheck=false"
https://orawiki.org/2016/10/11/initial-setup-required-for-the-execution-of-installer-validation-failed/
Monday, July 30, 2018
Send Email to Multiple Recipients with CC recipient Using UTL_SMTP ?
CREATE OR REPLACE PROCEDURE send_mail (sender IN VARCHAR2,
recipients IN VARCHAR2,cc IN VARCHAR2,
subject IN VARCHAR2,
message IN VARCHAR2)
-- This procedure will take the following parameters:
--
-- sender - single email address
-- recipients - single or multiple email addresses
-- subject - subject of the email message
-- message - body of the email message
--
-- It will report the status of the sent mail
-- NOTE: email addresses must be separated with either a comma "," or a semi-colon ";"
-- NOTE: You must modify the "mailhost" and "mailport" variables below
AS
mailhost VARCHAR2(64) := '-->SMTP_HOST<--'; -- hostname of the mail server
mailport NUMBER := 25; -- mailport
mail_conn UTL_SMTP.CONNECTION;
szBuffer VARCHAR2(2000);
szQuit UTL_SMTP.REPLY;
location NUMBER := 0;
my_index NUMBER := 1;
my_recipients VARCHAR2(32000);
my_sender VARCHAR2(32000);
NL VARCHAR2(2) := CHR(13) || CHR(10);
BEGIN
mail_conn := utl_smtp.open_connection(mailhost, mailport);
utl_smtp.helo(mail_conn, mailhost);
-- clean up any trailing separation characters
--DBMS_OUTPUT.PUT_LINE(sender);
my_sender := RTRIM(sender,',; ');
--DBMS_OUTPUT.PUT_LINE(my_sender);
-- determine multiple sender by looking
-- for separation characters
location := INSTR(my_sender,',',1,1);
IF location = 0 THEN
location := INSTR(my_sender,';',1,1);
END IF;
-- If more then one sender in string, parse out
-- the first sender and use this sender to
-- authenticate with the mail server when
-- calling UTL_SMTP.MAIL, all other senders
-- will be ignored
IF location <> 0 THEN
-- multiple senders, use the first one
UTL_SMTP.MAIL(mail_conn, SUBSTR(my_sender,1,location-1));
ELSE
-- only one sender
UTL_SMTP.MAIL(mail_conn, sender);
END IF;
-- clean up any trailing separation characters
my_recipients := RTRIM(recipients,',; ');
-- initialize loop variables
my_index := 1;
-- Parse out each recipient and make a call to
-- UTL_SMTP.RCPT to add it to the recipient list
WHILE my_index < LENGTH(my_recipients) LOOP
-- determine multiple recipients by looking for separation characters
location := INSTR(my_recipients,',',my_index,1);
IF location = 0 THEN
location := INSTR(my_recipients,';',my_index,1);
END IF;
IF location <> 0 THEN
-- multiple recipients, add this one to the recipients list
UTL_SMTP.RCPT(mail_conn, TRIM(SUBSTR(my_recipients,my_index,location-my_index)));
utl_smtp.RCPT(mail_conn, cc );
my_index := location + 1;
ELSE
-- single recipient or last one in list
UTL_SMTP.RCPT(mail_conn, TRIM(SUBSTR(my_recipients,my_index,LENGTH(my_recipients))));
my_index := LENGTH(my_recipients);
END IF;
END LOOP;
-- Replace separation character ";" with ","
my_recipients := REPLACE(my_recipients,';',',');
-- Setup the TO, SUBJECT and BODY sections of the email
UTL_SMTP.OPEN_DATA(mail_conn);
UTL_SMTP.WRITE_DATA(mail_conn, 'To: ' || my_recipients || utl_tcp.CRLF);
UTL_SMTP.WRITE_DATA(mail_conn, 'Cc: ' || cc || utl_tcp.CRLF);
UTL_SMTP.WRITE_DATA(mail_conn, 'Subject: ' || subject || utl_tcp.CRLF);
utl_smtp.write_data(mail_conn, 'MIME-Version: 1.0' ||NL);
utl_smtp.write_data(mail_conn, 'Content-Type: text/html'||NL);
utl_smtp.write_data(mail_conn, 'Content-Transfer-Encoding: 7bit'||NL);
utl_smtp.write_data(mail_conn, 'Content-Disposition: inline'||NL||NL);
UTL_SMTP.WRITE_DATA(mail_conn, utl_tcp.CRLF || message);
UTL_SMTP.CLOSE_DATA(mail_conn);
szQuit := UTL_SMTP.QUIT(mail_conn);
-- Status Reporting/Error Handling
IF szQuit.code = 221 THEN
DBMS_OUTPUT.PUT_LINE('Your e-mail was successfully sent.');
ELSE
DBMS_OUTPUT.PUT_LINE('Your e-mail was NOT sent.');
DBMS_OUTPUT.PUT_LINE('Reply Code: ' || szQuit.code);
DBMS_OUTPUT.PUT_LINE('Message: ' || szQuit.text);
END IF;
EXCEPTION
WHEN OTHERS THEN
szBuffer := sqlerrm;
DBMS_OUTPUT.PUT_LINE('Error: ' || szBuffer);
END;
/
recipients IN VARCHAR2,cc IN VARCHAR2,
subject IN VARCHAR2,
message IN VARCHAR2)
-- This procedure will take the following parameters:
--
-- sender - single email address
-- recipients - single or multiple email addresses
-- subject - subject of the email message
-- message - body of the email message
--
-- It will report the status of the sent mail
-- NOTE: email addresses must be separated with either a comma "," or a semi-colon ";"
-- NOTE: You must modify the "mailhost" and "mailport" variables below
AS
mailhost VARCHAR2(64) := '-->SMTP_HOST<--'; -- hostname of the mail server
mailport NUMBER := 25; -- mailport
mail_conn UTL_SMTP.CONNECTION;
szBuffer VARCHAR2(2000);
szQuit UTL_SMTP.REPLY;
location NUMBER := 0;
my_index NUMBER := 1;
my_recipients VARCHAR2(32000);
my_sender VARCHAR2(32000);
NL VARCHAR2(2) := CHR(13) || CHR(10);
BEGIN
mail_conn := utl_smtp.open_connection(mailhost, mailport);
utl_smtp.helo(mail_conn, mailhost);
-- clean up any trailing separation characters
--DBMS_OUTPUT.PUT_LINE(sender);
my_sender := RTRIM(sender,',; ');
--DBMS_OUTPUT.PUT_LINE(my_sender);
-- determine multiple sender by looking
-- for separation characters
location := INSTR(my_sender,',',1,1);
IF location = 0 THEN
location := INSTR(my_sender,';',1,1);
END IF;
-- If more then one sender in string, parse out
-- the first sender and use this sender to
-- authenticate with the mail server when
-- calling UTL_SMTP.MAIL, all other senders
-- will be ignored
IF location <> 0 THEN
-- multiple senders, use the first one
UTL_SMTP.MAIL(mail_conn, SUBSTR(my_sender,1,location-1));
ELSE
-- only one sender
UTL_SMTP.MAIL(mail_conn, sender);
END IF;
-- clean up any trailing separation characters
my_recipients := RTRIM(recipients,',; ');
-- initialize loop variables
my_index := 1;
-- Parse out each recipient and make a call to
-- UTL_SMTP.RCPT to add it to the recipient list
WHILE my_index < LENGTH(my_recipients) LOOP
-- determine multiple recipients by looking for separation characters
location := INSTR(my_recipients,',',my_index,1);
IF location = 0 THEN
location := INSTR(my_recipients,';',my_index,1);
END IF;
IF location <> 0 THEN
-- multiple recipients, add this one to the recipients list
UTL_SMTP.RCPT(mail_conn, TRIM(SUBSTR(my_recipients,my_index,location-my_index)));
utl_smtp.RCPT(mail_conn, cc );
my_index := location + 1;
ELSE
-- single recipient or last one in list
UTL_SMTP.RCPT(mail_conn, TRIM(SUBSTR(my_recipients,my_index,LENGTH(my_recipients))));
my_index := LENGTH(my_recipients);
END IF;
END LOOP;
-- Replace separation character ";" with ","
my_recipients := REPLACE(my_recipients,';',',');
-- Setup the TO, SUBJECT and BODY sections of the email
UTL_SMTP.OPEN_DATA(mail_conn);
UTL_SMTP.WRITE_DATA(mail_conn, 'To: ' || my_recipients || utl_tcp.CRLF);
UTL_SMTP.WRITE_DATA(mail_conn, 'Cc: ' || cc || utl_tcp.CRLF);
UTL_SMTP.WRITE_DATA(mail_conn, 'Subject: ' || subject || utl_tcp.CRLF);
utl_smtp.write_data(mail_conn, 'MIME-Version: 1.0' ||NL);
utl_smtp.write_data(mail_conn, 'Content-Type: text/html'||NL);
utl_smtp.write_data(mail_conn, 'Content-Transfer-Encoding: 7bit'||NL);
utl_smtp.write_data(mail_conn, 'Content-Disposition: inline'||NL||NL);
UTL_SMTP.WRITE_DATA(mail_conn, utl_tcp.CRLF || message);
UTL_SMTP.CLOSE_DATA(mail_conn);
szQuit := UTL_SMTP.QUIT(mail_conn);
-- Status Reporting/Error Handling
IF szQuit.code = 221 THEN
DBMS_OUTPUT.PUT_LINE('Your e-mail was successfully sent.');
ELSE
DBMS_OUTPUT.PUT_LINE('Your e-mail was NOT sent.');
DBMS_OUTPUT.PUT_LINE('Reply Code: ' || szQuit.code);
DBMS_OUTPUT.PUT_LINE('Message: ' || szQuit.text);
END IF;
EXCEPTION
WHEN OTHERS THEN
szBuffer := sqlerrm;
DBMS_OUTPUT.PUT_LINE('Error: ' || szBuffer);
END;
/
Subscribe to:
Comments (Atom)

