[firebase-br] My Source Code

[//---- Kelsie.Z.Marshall ----//]

INSERT INTO A_TAB (CNPJ) VALUES ('06947284000104');/*VÁLIDO*/
INSERT INTO A_TAB (CNPJ) VALUES ('06947234005674');/*INVÁLIDO*/


Veja fiz um teste pequeno e ela já falhou.

E pq funciona no delphi e na UDF não ?



"Douglas Tosi" <douglasht em gmail.com> wrote in 
message news:249af69e0909080705k7f409fb1j5ae5f6dced15ea80 em mail.gmail.com...
On Mon, Sep 7, 2009 at 5:42 PM, //----  Kelsie.Z.Marshall
----//<kelsie.z.marshall em gmail.com> wrote:
> num:= string(str);

O problema pode estar aqui. Acho que não dá para simplesmente fazer um
cast de pchar para string. Tem que usar StrPCopy ou outra função
similar e desalocar a memória no final. Dá uma pesquisada.
Outra coisa, sua função vai quebrar sempre que receber uma string
menor que 15 chars. Tem que validar o tamanho antes de fazer as contas
usando str[i].

hth,

-- 
Douglas Tosi
www.sinatica.com

______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
Para saber como gerenciar/excluir seu cadastro na lista, use: 
http://www.firebase.com.br/fb/artigo.php?id=1107
Para consultar mensagens antigas: http://firebase.com.br/pesquisa