RES: [firebase-br] FB 1.5.2 Com Problemas

Marcos Alexandre de Souza malexandresouza em yahoo.com.br
Qui Maio 5 13:53:41 -03 2005


Boa Tarde.
To precisando de uma ajuda.

Estou usando Visual Basic 6.0
No meu banco de dados em Interbase Server 6 tenho o campo: Numeric(9,2) para
armazenar valores moeda.
Uso a Seguinte linha para gravar no banco de dados:

      SQL = ""
      SQL = "INSERT INTO ESTOQUE (cdEstoque,"
      SQL = SQL & "cdProduto,"
      SQL = SQL & "moPrecoVendaUnitVarejo,"
      SQL = SQL & "moPrecoVendaUnitAtacado,"
      SQL = SQL & "moPrecoVendaInterno,"
      SQL = SQL & "nuQtdeEstTotal,"
      SQL = SQL & "nmHostAud,"
      SQL = SQL & "dtRegAud,"
      SQL = SQL & "cdProfSist) VALUES ( "

      SQL = SQL & TxtcdEstoque.Text & ","
      SQL = SQL & TxtCdProduto.Text & ","
      SQL = SQL & "'" & Format(TxtmoPrecoVendaUnitVarejo.Text, "###,##0.00")
& "',"
      SQL = SQL & "'" & Format(TxtmoPrecoVendaUnitAtacado.Text,
"###,##0.00") & "',"
      SQL = SQL & "'" & Format(TxtmoPrecoVendaInterno.Text, "###,##0.00") &
"',"
      SQL = SQL & TxtnuQtdeEstTotal.Text & ","
      SQL = SQL & "'" & StrMaquina & "',"
      SQL = SQL & "'" & Format(Date, "m/d/yyyy") & "',"
      SQL = SQL & DblcdUsuario & ")"

      objCon.BeginTrans
      objCon.Execute SQL
      objCon.CommitTrans

No Campo moPrecoVendaInterno por exemplo, os dados são salvos neste formato
: 5032  que na verdade deveria ser 50,32.
Quando mando exibir este valor 5032 na caixa de texto o valor é formatado
para 5.032,00 .

Já Tentei usar CCUR para formatar na hora de salvar mas não resolveu.

Agradeço sua atenção.

At.Marcos

-----Mensagem original-----
De: lista-bounces em firebase.com.br [mailto:lista-bounces em firebase.com.br]Em
nome de Ricardo Soares Ferreira
Enviada em: quinta-feira, 5 de maio de 2005 13:25
Para: lista em firebase.com.br
Assunto: [firebase-br] FB 1.5.2 Com Problemas

Pessoal, favor me auxilie, antes eu tinha instalado o FB 1.5 e funcionava
direito, agora instalei o FB 1.5.2 e dá os seguintes erros quando tento
montar um BD aparece os erros, usando o Ibexpert:

instalado o classic server: senha e nome não reconhecidos, mesmo usando
SYSDBA e masterkey

instalando o superserver: sistema não encontra o BD

e usando o IButils
"servidor não está instado"

Obrigado
Ricardo


---------------------------------
Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora!
______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.bavs.com.br
Para editar sua configuração na lista, use o endereço
http://mail.firebase.com.br/mailman/listinfo/lista_firebase.com.br
Para consultar mensagens antigas:
http://search.gmane.org/search.php?group=firebase








Mais detalhes sobre a lista de discussão lista