Quantcast
Channel: Retorno de valor.
Viewing all articles
Browse latest Browse all 5

Retorno de valor.

0
0

Galera, seguinte, no meu site tenho uma pagina de cadastro de valores, que deve somar com os valores inseridos no banco.O site eu desenvolvi usando camandas, onde eu criei o seguites cod:

criei esta função na Cadastro.aspx.vb:

 'CRIADO A FUNÇÃO SOMATOTALPRODUTO
    Private Function SomaTotalProduto() As String

        Dim codprodutoAs String = txtProdutoID.Text
        Dim produto As New Produto()
        Return produto.SomaTotalProduto(codproduto)


    End Function
************************************************************************
E na classe Produto criei a seguinte função:

  Public Function SomaTotalProduto(ByVal codprodutoAs String) As String
        Dim produtoDAL As New ProdutoDAL()
        Return produtoDAL.SomaTotalProduto(codproduto)
    End Function
****************************************************************************
E na ProdutoDAL criei esta:

   Public Function SomaTotalProduto(ByVal codprodutoAs String) As Decimal
        Dim resultado As Decimal = 0
        Dim selectCommand As New OracleCommand("SELECT nvl(SUM(VALOR_PRODUTO),0) AS VALOR_PRODUTO FROM CAD_PRODUTO WHERE NUM_PRODUTO=" & codproduto, conn)
        conn.Open()
        resultado = selectCommand.ExecuteScalar()
        conn.Close()
        Return resultado


    End Function
******************************************************************************

Dentro da classe Cadastro.aspx.vb, criei o seguinte if:

If SomaTotalProduto() Then

          
 if retorno > valortotal then
   lblValorOK.Visible = True
                 Return
 Else
  Deixa inserir....
 end if
        Else

que chama a função e deve receber o valor do retorno, o que eu não estou conseguindo fazer e trazer o valor
da soma que foi executada, para verificar se o valor do produto inserido é igual ao valor total .

O que eu devo fazer?

Valeu

 


Viewing all articles
Browse latest Browse all 5

Latest Images

Vimeo 10.7.0 by Vimeo.com, Inc.

Vimeo 10.7.0 by Vimeo.com, Inc.

HANGAD

HANGAD

MAKAKAALAM

MAKAKAALAM

Doodle Jump 3.11.30 by Lima Sky LLC

Doodle Jump 3.11.30 by Lima Sky LLC

Doodle Jump 3.11.30 by Lima Sky LLC

Doodle Jump 3.11.30 by Lima Sky LLC

Vimeo 10.6.2 by Vimeo.com, Inc.

Vimeo 10.6.2 by Vimeo.com, Inc.

Vimeo 10.6.1 by Vimeo.com, Inc.

Vimeo 10.6.1 by Vimeo.com, Inc.

Vimeo 10.6.0 by Vimeo.com, Inc.

Vimeo 10.6.0 by Vimeo.com, Inc.

Re:

Re:





Latest Images

Vimeo 10.7.0 by Vimeo.com, Inc.

Vimeo 10.7.0 by Vimeo.com, Inc.

HANGAD

HANGAD

MAKAKAALAM

MAKAKAALAM

Doodle Jump 3.11.30 by Lima Sky LLC

Doodle Jump 3.11.30 by Lima Sky LLC

Doodle Jump 3.11.30 by Lima Sky LLC

Doodle Jump 3.11.30 by Lima Sky LLC

Vimeo 10.6.1 by Vimeo.com, Inc.

Vimeo 10.6.1 by Vimeo.com, Inc.

Vimeo 10.6.0 by Vimeo.com, Inc.

Vimeo 10.6.0 by Vimeo.com, Inc.

Re:

Re:

Re:

Re: