Delfos Sistemas

Bom dia Valter, Vou pesquisar sobre o link e sobre recurso do ACBr... Muito obrigado pela dica! Sergio

Olá! Alguém teria uma sugestão de gerador de QR-Code que pudesse ser integrado a um ERP? Obrigado, Sergio

Oi Alexandre, Na seção [email] os campos Codificação=27 (UTF8) e IsHTML=0 (não) Por chute, coloquei Codificação=0 e ai funcionou! Vou manter assim! Obrigado pela ajuda! Pode encerrar o chamado. Sergio

Bom Dia Alexandre, Eu estava usando MAIL_AddAltBody porque quando uso a função MAIL_AddBody o email aparece com este corpo: --004E4345_519AE41A_Synapse_boundary-- Obs.: E a chamada da função é exatamente a mesma, só mudando o nome da função: LOCAL V_Corpo LOCAL V_Retorno V_Corpo := "Verificando a acentuação e caracteres especiais & * Número. " V_Retorno := MAIL_AddBody(V_Corpo) ou V_Retorno := MAIL_AddAltBody(V_Corpo) Obrigado, Sergio

Olá, Ao utilizar a função MAIL_AddAltBody o texto está saindo com a acentuação confusa: Verificando a acentua��o e caracteres especiais & * N�mero. No ACBrLib.INI, na seção [Email], o valor do campo Codificacao=27 (UTF_8 segundo o manual) Existe algum outro local que se possa configurar a codificação? Obrigado, Sergio

Oi Renato, Com sua ajuda, conseguimos achar o problema! Pode disponibilizar o programa sem problemas. Só altere o CNPJ e o restante não tem nada demais... Posso encerrar o chamado? Mais uma vez, muito obrigado pela ajuda? Abraços, Sergio

Oi Renato, Finalmente deu certo!!!! Vou postar abaixo o que fiz! Na definição do método, defini a variável de retorno não como string mas como psz: _DLL FUNCTION CNPJ_Consultar(eCNPJ AS STRING, eProvedor AS INT, sResposta REF PSZ, esTamanho REF INT ) AS INT PASCAL:ACBrConsultaCNPJ32.CNPJ_Consultar No programa que chama o método, a variável que vai receber a resposta esta como global e tipo PSZ: GLOBAL V_Dados AS PSZ A chamada do método continuou da mesma forma: V_Retorno := CNPJ_Consultar('13397985000182',2,@V_Dados,@V_Tamanho) Para ver o retorno como uma string, criei uma outra variavel V_DadosString como sendo string e fiz a conversão de PSZ em string Local V_DadosString as string V_DadosString := Psz2String(@V_Dados) Interessante que normalmente eu faria a conversao sem o "@", porém ai trava o programa. Colocando o @ como acima ai funcionou. Testei também definir a variável que vai receber o retorno como Publica e Privada, mas ai não funcionou. Somente como Global é que retornou corretamente. Enfim, se não fosse o seu empenho eu já teria desistido! rs... Mas como vc teve a boa vontade de testar e dar sugestões, me incentivou a ir mais fundo e agora posso usar todas as funções das LIBs do ACBr... Agradeço muitooooo a sua ajuda! Forte abraço! Sergio

Oi Renato, Fiz um outro teste: Defini a variável que recebe os dados e do tamanho do retorno não como local mas como global (para ser vista em toda a aplicação) e ai o teste anterior de criar uma variável qualquer não alterou o valor mesmo depois de executar o método. A variável do tamanho que antes do método foi definida como 1000, retornou com o tamanho correto, 607. Vou fazer mais testes e depois informo. Sergio

Oi Renato, Criei novamente uma variável string, com o conteúdo qualquer e fui executando cada método (MAIL_Inicializar, MAIL_Clear, MAIL_ConfigLer, MAIL_ConfigGravarValor, MAIL_ConfigGravar, MAIL_AddAddress, MAIL_SetSubject, MAIL_AddAltBody, MAIL_Send, MAIL_Finalizar) para envio do email e testando o conteúdo da variável. Para enviar email, o conteúdo da variável não foi zerado em nenhuma situação e no final continuou com o mesmo conteúdo que foi definido. O problema mesmo é quando o método retorna algum valor para alguma variável. Estou num cliente e por isto não consegui pesquisar como capturar os erros, mas com certeza deve ter uma forma e vou postar aqui assim que conseguir. obrigado, Sergio

Oi Renato, É verdade! Vou fazer o teste depois de chamar a função de envio de email para ver se vai zerar a variável. Já posto o resultado.

Oi Renato, Fiz o teste que sugeriu. Defini uma variável com um conteúdo qualquer e depois de chamar o método, o conteúdo dela ficou em branco, mesmo ela não tendo nada a ver com o método! Estou vendo aqui como capturar e exibir os erros e assim que conseguir eu retorno. Obrigado, Sergio

Bom Dia Renato, Eu tinha notado isto, que antes da chamada da função a variável V_tamanho estava definida com um valor e depois de chamar o método ela volta sem valor nenhum. Vou tentar fazer isto que vc comentou, criar uma variável qualquer antes do método e ver se muda algo e posto aqui. Obrigado,

Boa tarde Renato, Qualquer dica que você puder dar eu tentarei aqui. obrigado, Sergio

Olá Renato, Te envie uma mensagem privada com a VM. Agradeço mais uma vez a sua ajuda. Obrigado, Sergio

Ok Renato, Como comentei numa mensagem anterior, tenho ciência que este tipo de suporte não faz parte do atendimento e agradeço muito o esforço. Já vi aqui que eu tenho uma VM de W7 montada. Só vou fazer uma instalação limpa do Visual Object e dos demais arquivos necessários. Ate mais. Sergio