felipeiw

Obrigado pela resposta Renato nao consegui encontrar, me desculpe, esse erro, esta acontecendo no Santander, que é o banco que estou precisando neste momento, testando com brasil, itaú, caixa, o arquivo é gerado com sucesso. se algum amigo, conseguiu com Santander é puder me ajudar agradeço, estou precisando implementar esses envios de pagamento no meu sistema, e estou iniciando os estudos nesse componente mt obrigado

oi Pessoal alguma sugestão ? Obrigado

Estou testar o acbrpagfor, usando o exemplo, porem quando vou gerar o arquivo retorna o seguinte erro :

opa Obrigado Daniel, obrigado Gilberto, a ideia do Daniel é otima e muito profissional show !!!

pessoal tenho um cliente que estava usando o email @hotmail.com para enviar as notas, configurado assim smtp.live.com 587 usuario [email protected] tls = sim ssl = nao parou de enviar, algum amigo sabe se houve alguma alteração nos serviços do hotmail ? esta retornando o seguinte erro: SMTP error: unable to login Obrigado

opa obrigado rsmuller9 Faço isso "tento" jogar a diferença no primeiro ítem, mais as vezes mesmo assim da diferença por conta da quantidade de itens, quantidade de produtos e preços, tenho resolvido aumentando as casas decimais, mais enfim é isso mesmo né ? Abs

Pessoal como fazem com desconto, ja que temos q ratear o valor do desconto nos itens q compõem a nfce, é uma doideira principalmente quando trabalhando com 2 decimais no preço, as vezes pessoal quer arredondar o total da nota, digita um desconto e pra ficar o valor final é bem chatinho. obrigado

Renato tentei assim, mais nao consegui terminar procedure TF1Receitas.Button4Click(Sender: TObject); begin ShowMessage(receita('004479')); end; function TF1Receitas.receita(produto: String): string; var i: Integer; begin Result := produto + #13; for i := 0 to CdsReceita.RecordCount -1 do Result := Result + receita(CdsReceita.RecordCount[i]); end; Onde CdsReceita é uma clientdataset da pesquisa

Renato obrigado pela resposta a tabela por exemplo se chama receitas, dentro dela tenho campo codigoprincipal e o codigoitem primeiro codigo o principal o segundo os itens que o formam: 100 - 150 100 - 151 100 - 152 digamos que o 152 seja formado pelos itens: 152 - 160 152 - 161 152 - 162 o 162 seja formado pelos itens: 162 - 180 162 - 181 como montaria sua sua função pra retornar, 100 = principal, estrutura resultante seria: 100-150 100-151 100-152 152-160 152-161 152-162 162-180 162-181 ? Obrigado

pessoal tenho uma base de dados com uma receita de produto, e dentro da receita principal, pode haver outros produtos que também possuem receitas ou não e dentro destas outros produtos que possuem também receitas, então pode haver vários níveis, como poderia montar uma função recursiva para ir listando todos esses níveis um abaixo do outro ? Obrigado

Pessoal estava precisando imprimir um pedido 2x na mesma pagina A4, dividindo então a pagina ao meio, e vai ter pedidos com quantidade variável de itens. Obrigado

Pessoal vcs conhecem um banco ou sei la o que eles sao chamado QI Tech, um cliente esta precisando fazer boletos com esse pessoal ? obrigado

No provedor Giap a nota é enviada é recebida na prefeitura, e vem de retorno o xml anexado, como faço para imprimir ? Obs: no retorno consta um link que se acessado, baixa o pdf da nota fiz um consulta usando o exemplo consultar nfse por rps, consultou porem nao baixou o xml da nfs, deveria baixa-lo ? Obrigado retorno.txt

ola, sim informei dessa maneira q vc descreveu

Concordo Italo, veja que no provedor Giap que acertamos mes passado esse campo era obrigatório e foi uma das rejeições, e agora esta rodando certinho, vou ver com o pessoal do provedor, muito obrigado !

Não retornou erro, a nota foi aceita e esta disponível no site da prefeitura, na verdade meu cliente que reclamou e solicitou a inclusão dessa informação, já que ele incluía essa informação quando fazia a nota direto no site da prefeitura. Obrigado

Pessoal, analisando o xml do provedor Fiorilli a tag codigo cnae nao foi preenchido, estou passando pela propriedade Servico.CodigoCnae, esta correta a maneira de alimentar essa tag ? Obrigado

Acabei abandonando o ambiente de homologação deles, estou fazendo direto em ambiente de produção, e num topico meu, passei pro Italo os problemas de recepção, o problema maior é que a prefeitura q estou testando nao aceita cancelamento pelo site, somente presencial kkkk, com o preço da gasolina, ta ficando complicado kkk, brincadeira pessoal

oi Italo segue 380-lista-nfse-sinc-soap.xml

pessoal no provedor Giap estou pegando o retorno da seguinte maneira e esta funcionando: ACBrNFs.Emitir(CdsNotas1NUMERO.AsString,meAutomatico,False); if (ACBrNFs.WebService.Emite.Sucesso = True) then begin if (Length1(ACBrNFs.WebService.Emite.CodVerificacao) > 0) then begin CdsNotas1.Edit; CdsNotas1NFECHA.Value := Copy(ExtractFileName(ACBrNFs.NotasFiscais.Items[0].NomeArq),1,PosEx('-',ExtractFileName(ACBrNFs.NotasFiscais.Items[0].NomeArq))-1); CdsNotas1NFEPRO.Value := ACBrNFs.WebService.Emite.Protocolo; CdsNotas1NFEREC.Value := ACBrNFs.WebService.Emite.CodVerificacao; CdsNotas1NUMSER.Value := StrToInt(ACBrNFs.WebService.Emite.NumeroNota); CdsNotas1.Post; CdsNotas1.ApplyUpdates(0); end else ShowMessage('1-Erro ao enviar a Nota '); end; porem no provedor Fiorilli nao entra no primeiro IF (sucesso = True), como devo pegar o retorno desse provedor, tem diferença mesmo entre os provedores ? Obrigado

bom dia amigo obrigado pela resposta fiz isso e infelizmente no meu caso nao funcionou Abs

Pessoal tenho um cliente com varios computadores, usando gmail para enviar os emails, em apenas 1 computador da empresa retorna o seguinte erro: smtp error: unable to login, o mesmo usuario, mesma senha, ja desativei o antivirus, ja atualizei as dlls, apesar de que deixo as dlls na pasta do EXE, no servidor, os amigos tem alguma sugestão do que mais posso estar testando ? obrigado

Italo o pessoal do provedor pediu pra preencher o valor 101005 no campo cnae e deu certo. Muito Obrigado

Italo fiz da seguinte maneira e consegui pegar os retornos agora: ACBrNFs.Emitir(DM1Notas.CdsNotas1NUMNOT.AsString,meAutomatico,False); if (ACBrNFs.WebService.Emite.Sucesso = True) then begin if (Length1(ACBrNFs.WebService.Emite.CodVerificacao) > 0) then begin DM1Notas.CdsNotas1.Edit; DM1Notas.CdsNotas1NFECHA.Value := Copy(ExtractFileName(ACBrNFs.NotasFiscais.Items[0].NomeArq),1,PosEx('-',ExtractFileName(ACBrNFs.NotasFiscais.Items[0].NomeArq))-1); DM1Notas.CdsNotas1NFEPRO.Value := ACBrNFs.WebService.Emite.Protocolo; DM1Notas.CdsNotas1NFEREC.Value := ACBrNFs.WebService.Emite.CodVerificacao; DM1Notas.CdsNotas1NUMSER.Value := StrToInt(ACBrNFs.WebService.Emite.NumeroNota); DM1Notas.CdsNotas1.Post; DM1Notas.CdsNotas1.ApplyUpdates(0); end else ShowMessage('Erro ao enviar a Nota '); end; Por hora consegui enviar as notas q estavam no limite do prazo kkk. Muito Obrigado

sim, mandei todos os xmls referente a essa nota Obrigado 18436-env-lot.xml 18436-env-lot-soap.xml 18436-rec.xml 18436-rec-soap.xml 3521091723791600016256000000000018436-rps.xml