Uma Function em um banco de dados é muito similar a uma função em uma linguagem de programação comum, podendo até mesmo ser criada com uma linguagem de programação como Java, para os bancos de dados Oracle e IBM DB2 ou uma rotina CLR para o banco de dados MSSQL, entretanto possuem varias diferenças entre os diferentes bancos de dados.
Uma Function padrão pode ser do tipo Escalar que normalmente retorna um valor ou pode ser do tipo Tabela, que retorna uma tabela, porem dependendo do banco de dados utilizado, podem existir vários outros tipos de retornos ou também de funções, por este motivo é recomendado que você acesse os links oficiais a seguir para saber mais detalhes sobre as funções:
Oracle: Create Function
IBM DB2: Create Function
Microsoft SQL Server: Create Function
O programa abaixo é muito similar ao programa anterior que cria uma trigger, porem o calculo do campo SLIQUIDO é efetuado através de uma função do mesmo nome, na query que retorna o set de dados para a grade, você pode notar que esta função possui uma sintaxe muito semelhante as funções ou métodos do qual você já está acostumado, exceto pelo banco de dados MSSQL que necessita que o proprietário da função seja declarado antes do nome da função.
Visual Studio
Para efetuar as conexões com os diferentes bancos de dados você precisa primeiro configurar seu projeto com os assemblers ADO.NET necessários e depois você pode criar um design com 3 componentes RadioButton, 2 componentes Labels, 2 componentes TextBoxes e um componente Button e um componente DataGridView use a figura abaixo para referencia:
Exemplo:
Neste exemplo utilizamos uma simples função escalar para efetuar um calculo e retornar um valor, utilize o script abaixo para criar os objetos necessários para cada banco de dados ou o banco de dados da sua preferencia.
SQL
Oracle
create table Funcionarios( ID_Funcionario NUMBER(5), Nome VARCHAR2(30), Sobrenome VARCHAR2(70), Cargo VARCHAR2(30), Salario NUMBER(9,2)); -- Cria Funcionarios Insert into FUNCIONARIOS values (1,'Steve','Gates','Programador',2550.56); Insert into FUNCIONARIOS values (2,'Bill','Jobs','Diretor',5143.71); Insert into FUNCIONARIOS values (3,'Wozniak','Gates','Desenvolvedor', 4389.21); -- Cria tabela com a porcentagem de descontos Create table DESCONTO ( ID_FUNCIONARIO NUMBER, PORCENTAGEM NUMBER(9,2)); -- Cria tabela de lançamentos de descontos Create table SALARIO ( ID_FUNCIONARIO NUMBER, DATA_LANC DATE, VDESCONTO NUMBER(9,2)); -- Deleta dados antigos -- Caso utlizou exemplos anteriores delete from desconto; delete from salario; -- Cria trigger na tabela Desconto create or replace TRIGGER DESCONTO_INSERT BEFORE INSERT ON DESCONTO FOR EACH ROW -- Declara variáveis DECLARE pID NUMBER; pSalario NUMBER(9,2); pPorcentagem NUMBER(9,2); BEGIN -- Alimenta variáveis com os valores a serem inseridos pID := :new.ID_FUNCIONARIO; pPorcentagem := :new.PORCENTAGEM; -- Seleciona Salario do funcionario corrente Select SALARIO INTO pSalario FROM FUNCIONARIOS WHERE ID_FUNCIONARIO = pID; -- insere na tabela de lançamentos de salario Insert into SALARIO values ( pID, SYSDATE, (pSalario * pPorcentagem)/100); END DESCONTO_INSERT; -- Cria Função Create or replace function sLiquido(sal IN NUMBER, vdesc IN NUMBER) RETURN NUMBER IS resultado NUMBER (9,2); BEGIN resultado := sal - vdesc; return (resultado); END;
DB2
create table Funcionarios ( ID_Funcionario INTEGER, Nome VARCHAR(30), Sobrenome VARCHAR(70), Cargo VARCHAR(30), Salario NUMERIC(9,2))@ Insert into FUNCIONARIOS values (1,'Steve','Gates','Programador',2550.56)@ Insert into FUNCIONARIOS values (2,'Bill','Jobs','Diretor',5143.71)@ Insert into FUNCIONARIOS values (3,'Wozniak','Gates','Desenvolvedor', 4389.21)@ -- Cria tabela com a porcentagem de descontos Create table DESCONTO ( ID_FUNCIONARIO INTEGER, PORCENTAGEM DECIMAL(9,2))@ -- Cria tabela de lançamentos de descontos Create table SALARIO ( ID_FUNCIONARIO INTEGER, DATA_LANC DATE, VDESCONTO DECIMAL(9,2))@ -- Deleta dados antigos -- Caso utlizou exemplos anteriores delete from desconto@ delete from salario@ -- Cria trigger na tabela Desconto create TRIGGER DESCONTO_INSERT BEFORE INSERT ON DESCONTO REFERENCING NEW AS N FOR EACH ROW P1: BEGIN -- Declara variáveis DECLARE pID NUMBER; DECLARE pSalario DECIMAL(9,2); DECLARE pPorcentagem DECIMAL(9,2); -- Alimenta variáveis com os valores a serem inseridos SET pID = N.ID_FUNCIONARIO; SET pPorcentagem = N.PORCENTAGEM; -- Seleciona Salario do funcionario corrente Select SALARIO INTO pSalario FROM FUNCIONARIOS WHERE ID_FUNCIONARIO = pID; -- insere na tabela de lançamentos de salario Insert into SALARIO values ( pID, SYSDATE, (pSalario * pPorcentagem)/100); END P1 -- Cria Função CREATE FUNCTION sLiquido (sal Decimal, vdesc Decimal) RETURNS DECIMAL (9,2) NO EXTERNAL ACTION F1: BEGIN ATOMIC DECLARE resultado DECIMAL(9,2); SET resultado = sal - vdesc; RETURN resultado; END
MSSQL
create table Funcionarios ( ID_Funcionario Int, Nome VARCHAR(30), Sobrenome VARCHAR(70), Cargo VARCHAR(30), Salario Decimal(9,2)); Insert into FUNCIONARIOS values (1,'Steve','Gates','Programador',2550.56); Insert into FUNCIONARIOS values (2,'Bill','Jobs','Diretor',5143.71); Insert into FUNCIONARIOS values (3,'Wozniak','Gates','Desenvolvedor', 4389.21); -- Cria tabela com a porcentagem de descontos Create table DESCONTO ( ID_FUNCIONARIO INT, PORCENTAGEM DECIMAL(9,2)); -- Cria tabela de lançamentos de descontos Create table SALARIO ( ID_FUNCIONARIO INT, DATA_LANC DATE, VDESCONTO DECIMAL(9,2)); -- Deleta dados antigos -- Caso utlizou exemplos anteriores delete from desconto; delete from salario; -- Cria trigger na tabela Desconto create TRIGGER DESCONTO_INSERT ON DESCONTO AFTER INSERT AS BEGIN -- Declara variáveis DECLARE @pID Int, @pSalario DECIMAL(9,2), @pPorcentagem DECIMAL(9,2); -- Alimenta variáveis com os valores a serem inseridos Select @pID = ID_FUNCIONARIO, @pPorcentagem = PORCENTAGEM from inserted; -- Seleciona Salario do funcionario corrente Select @pSalario = SALARIO FROM FUNCIONARIOS WHERE ID_FUNCIONARIO = @pID; -- insere na tabela de lançamentos de salario Insert into SALARIO values ( @pID, GETDATE(), (@pSalario * @pPorcentagem)/100); END; -- Cria função Create function sLiquido(@sal decimal, @vdesc decimal) Returns decimal(9,2) as Begin return(@sal-@vdesc); end
C#
using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Threading.Tasks; using System.Windows.Forms; using System.Data.SqlClient; using Oracle.DataAccess.Client; using IBM.Data.DB2; namespace Acesso { public partial class Dados : Form { private static OracleConnection connORA; // ODAC 12c private static DB2Connection connDB2; // IBM Data Server Provider private static SqlConnection connMSSQL; // ADO .NET DataTable dataTable; string sql; static string bancodedados; public Dados() { InitializeComponent(); } // Cria métodos de conexão // Você pode optar por um unico método se usar apenas ADO.NET // Neste caso usamos os drivers nativos de conexão de cada banco de dados. // Todos os drivers são baseados em ADO .NET public void conexaoODAC(string Username, string Password, string Datasource) { try { // String de Conexao string connectionString = // Usuario "User Id=" + Username + // Senha ";Password=" + Password + // TNSnames ";Data Source=" + Datasource; //Conecta ao datasource usando a conexão Oracle connORA = new OracleConnection(connectionString); //Abre a conexão com o banco de dados connORA.Open(); } // Retorna erro catch (Exception ex) { // Mostra menssagem de erro MessageBox.Show(ex.ToString()); } } void conexaoDB2(string Server, string Database, string Username, string Password, string Timeout) { try { // String de Conexao string connectionString = // Servidor "Server=" + Server + // Banco de dados ";Database=" + Database + // Usuario ";UID=" + Username + // Senha ";PWD=" + Password + // TNSnames ";Connect Timeout=" + Timeout; //Conecta ao datasource usando a conexão DB2 connDB2 = new DB2Connection(connectionString); //Abre a conexão com o banco de dados connDB2.Open(); } // Retorna erro catch (Exception ex) { // Mostra menssagem de erro MessageBox.Show(ex.ToString()); } } public void conexaoMSSQL(string Server, string Database, string Username, string Password, string Timeout) { try { // String de Conexao string connectionString = // Servidor "Data Source=" + Server + // Banco de dados ";Initial Catalog=" + Database + // Usuario ";User ID =" + Username + // Senha ";Password=" + Password + // TNSnames ";Connect Timeout=" + Timeout; //Conecta ao datasource usando a conexão Padrão connMSSQL = new SqlConnection(connectionString); //Abre a conexão com o banco de dados connMSSQL.Open(); } // Retorna erro catch (Exception ex) { // Mostra menssagem de erro MessageBox.Show(ex.ToString()); } } // Retorna um set de dados public DataTable retornaTabela(string sql, string sqlTrigger) { // Declara comandos para Stored Procedure OracleCommand cmdORA; DB2Command cmdDB2; SqlCommand cmdSQL; // Cria instância da classe Dados acesso = new Dados(); // Define banco de dados if (bancodedados == "oracle") { // Efetua Login no banco de dados acesso.conexaoODAC("daberto", "p@55w0rd", "XE"); // Define a instrução SQL e a conexão cmdORA = new OracleCommand(sqlTrigger, connORA); // Executa query cmdORA.ExecuteNonQuery(); // Cria comandos para retornar dados para exibir a grade de dados OracleCommand oracmd = new OracleCommand(sql, connORA); OracleDataReader orareader = oracmd.ExecuteReader(); dataTable = new DataTable(); dataTable.Load(orareader); } if (bancodedados == "db2") { acesso.conexaoDB2("localhost", "DEVA", "db2admin", "p@55w0rd", "40"); cmdDB2 = new DB2Command(sqlTrigger, connDB2); cmdDB2.ExecuteNonQuery(); DB2Command db2cmd = new DB2Command(sql); db2cmd.Connection = connDB2; DB2DataReader db2reader = db2cmd.ExecuteReader(); dataTable = new DataTable(); dataTable.Load(db2reader); } if (bancodedados == "mssql") { acesso.conexaoMSSQL("localhost", "DevAberto", "devaberto", "p@55w0rd", ""); cmdSQL = new SqlCommand(sqlTrigger, connMSSQL); cmdSQL.ExecuteNonQuery(); SqlCommand mssqlcmd = new SqlCommand(sql); mssqlcmd.Connection = connMSSQL; SqlDataReader mssqlreader = mssqlcmd.ExecuteReader(); dataTable = new DataTable(); dataTable.Load(mssqlreader); } return dataTable; } // configura programa private void Form1_Shown(object sender, EventArgs e) { radioButton1.Checked = true; bancodedados = "oracle"; } // Conecta dados private void button1_Click(object sender, EventArgs e) { // Cria instância da classe Dados dados = new Dados(); // Insere Porcentagem de desconto e executa trigger string sqltrigger = "insert into DESCONTO VALUES (" + textBox1.Text + ", " + textBox2.Text + ")"; // Cria proprietario do banco de dados string owner = "dbo."; // SQL Server requer o proprietario para que a função seja executada if (bancodedados != "mssql") owner = ""; // Verfica banco de dados e passa script SQL sql = "Select A.ID_FUNCIONARIO, " + "A.NOME, " + " A.CARGO, " + " A.SALARIO, " + "B.PORCENTAGEM, " + "C.VDESCONTO, " + "C.DATA_LANC, " + owner // Executa função SLIQUIDO - retorna o calculo do salario liquido. + "SLIQUIDO(A.SALARIO, C.VDESCONTO) AS SLIQUIDO " + "from FUNCIONARIOS A, DESCONTO B, SALARIO C " + "Where " + "A.ID_FUNCIONARIO = B.ID_FUNCIONARIO AND " + "A.ID_FUNCIONARIO = C.ID_FUNCIONARIO"; // Alimenta grid de dados dataGridView1.DataSource = dados.retornaTabela(sql, sqltrigger); } // Seleciona banco de dados Oracle private void radioButton1_CheckedChanged(object sender, EventArgs e) { if (radioButton1.Checked) { bancodedados = "oracle"; } } // Seleciona banco de dados IBM DB2 private void radioButton2_CheckedChanged(object sender, EventArgs e) { if (radioButton2.Checked) { bancodedados = "db2"; } } // Seleciona banco de dados MSSQL Server private void radioButton3_CheckedChanged(object sender, EventArgs e) { if (radioButton3.Checked) { bancodedados = "mssql"; } } } }