RETORNO DA STORED PROCEDURE NO FIREBIRD

 Tópico anterior Próximo tópico Novo tópico

RETORNO DA STORED PROCEDURE NO FIREBIRD

VB.NET

 Compartilhe  Compartilhe  Compartilhe
#480096 - 10/03/2018 10:44:28

NEGRON
ANDRADINA
Cadast. em:Agosto/2004


Bom dia Galera!!!!!

Estou fazendo uma tela de cadastro  no Vb.net +  Firebird + stored Procedure.

a minha duvida é: Gostaria que no momento da Inclusão/Alteração/Exclusão, a SP me desse um retorno
para saber que foi processado com sucesso a operação.
Gostaria de saber como faço isso dentro da SP, e no Vb.net como pego esse retorno.
Estou utilizando o código a seguir e está funcionando perfeitamente só isso que não consegui fazer:


  
CODIGO DO FORMULÁRIO PARA INCLUSÃO

Imports FirebirdSql.Data.FirebirdClient
Public Class CadFormulario

    Public FBconn As New FbConnection
    Public fbCmd As FbCommand
    Public Dbsource As String = My.Application.Info.DirectoryPath.ToString & "\DB_STOREDPROCEDURE.FDB"
    Public strcon As String = "User=SYSDBA;Password=masterkey;Database=" + Dbsource + ";DataSource=localhost;Port=3050;Dialect=3;Charset=NONE;Role=;Connection lifetime=0;Connection timeout=15;Pooling=True;Packet Size=8192;Server Type=0"
    'Public DA As FbDataAdapter
    'Public DR As FbDataReader
    Public FBconexao As Boolean
    Public Transacao As FbTransaction

    Public Sub Inserir()
        FBconn.ConnectionString = strcon
        ' Try
        FBconn.Open()

        fbCmd = New FbCommand("CLIENTES_I", FBconn)
        fbCmd.Parameters.Add("nome", FbDbType.VarChar, 50).Value = Txtnome.Text
        fbCmd.Parameters.Add("endereco", FbDbType.VarChar, 40).Value = Txtendereco.Text
        fbCmd.Parameters.Add("bairro", FbDbType.VarChar, 40).Value = Txtbairro.Text


        fbCmd.CommandType = CommandType.StoredProcedure

        fbCmd.ExecuteScalar()

    End Sub



  
PROCEDURE DO FIREBIRD

SET TERM ^ ;

CREATE PROCEDURE CLIENTES_I (
    nome varchar(50),
    endereco varchar(40),
    bairro varchar(40))
as
begin
  insert into clientes (
    nome,
    endereco,
    bairro)
  values (
    :nome,
    :endereco,
    :bairro);
end^

SET TERM ; ^

GRANT INSERT ON CLIENTES TO PROCEDURE CLIENTES_I;

GRANT EXECUTE ON PROCEDURE CLIENTES_I TO SYSDBA;


Outra duvida, usando a codificação normal... sem trabalhar com SP , sempre utilizei a função  de transações.... RollBack e commit...... agora usando stored procedure.... como utilizar essas funcões para maior segurança. O que vcs me orientam sobre isso.


Desde já agradeço a todos


N3G4OW2005


#480137 - 14/03/2018 09:35:13

NEGRON
ANDRADINA
Cadast. em:Agosto/2004


Bom dia Galera!!!

Alguém pra me dar uma luz ?????

N3G4OW2005


#480146 - 14/03/2018 11:09:04

KERPLUNK
RIO GRANDE DO SUL
Cadast. em:Junho/2009


Membro da equipe
https://firebirdsql.org/refdocs/langrefupd21-ddl-procedure.html

_______________________________________________________________________
Gostaria de ter seu sistema Desktop "traduzido" para uma interface web? Podemos conversar...
Virei Oráculo!
The end is nigh, be ready for the nukes!


 Tópico anterior Próximo tópico Novo tópico


Para responder este tópico o login é requerido
Se você já possui uma conta de usuário por favor faça seu login
Se você não possui uma conta de usuário use a opção Criar usuário