amnchaves

@Felipe Gewehrmuito obrigado pela ajuda. Deu certo aqui, o que não esta acontecendo agora é que o arquivo referente a nota não esta sendo salvo na pasta, somente o da RPS ACBrNFSe1.Configuracoes.Arquivos.AdicionarLiteral := True; ACBrNFSe1.Configuracoes.Arquivos.EmissaoPathNFSe := True; ACBrNFSe1.Configuracoes.Arquivos.SepararPorMes := True; ACBrNFSe1.Configuracoes.Arquivos.PathCan := DMConsultas.lSQL_GETDFeSeries.DataSet.FieldByName('path_arquivos').Text; ACBrNFSe1.Configuracoes.Arquivos.PathNFSe := DMConsultas.lSQL_GETDFeSeries.DataSet.FieldByName('path_arquivos').Text; ACBrNFSe1.Configuracoes.Arquivos.PathGer := DMConsultas.lSQL_GETDFeSeries.DataSet.FieldByName('path_arquivos').Text; ACBrNFSe1.Configuracoes.Arquivos.Salvar := True; ACBrNFSe1.Configuracoes.Arquivos.PathSchemas := DMConsultas.lSQL_GETDFeSeries.DataSet.FieldByName('path_arquivos').Text+'\Config\Schemas\'; ACBrNFSe1.Configuracoes.Arquivos.PathSalvar := DMConsultas.lSQL_GETDFeSeries.DataSet.FieldByName('path_arquivos').Text; Esse é o trecho do código que atribuo as opções para salvar o arquivo. E o cliente me pediu para que o layout fosse igual o que ele emite pelo site.

O problema acima foi resolvido, e agora esta aparecendo essa mensagem @Juliomar Marchetti pode me dar uma ajuda com esse provedor?

Galera boa tarde, estou implementando o servidor IPM e estou enfrentando alguns problemas with Servico.ItemServico.Add do begin Descricao := EDescritivo.Text; Quantidade := 1; ValorUnitario := A_Menu.Arredonda(EValor.Value,2); Aliquota := EAliquotaISS.Value; ValorServicos := Quantidade * ValorUnitario; ItemListaServico := '1402'; codLCServ := '8045'; StrToSituacaoTributaria(ok, '0', proIPM); ///////////////////////////////////// end; Trecho do meu código, se alguém poder da uma dica eu agradeço

Juliomar, achei onde estava o problema com base em um outro post que você respondeu Obrigado

Olha o trecho do meu código

Juliomar bom dia. Obrigado por responder ao meu tópico, mas quanto tento emitir em homologação estou recebendo o seguinte retorno:

Boa noite a todos. Algum dos colegas aqui ja emitiram NFSe com o provedor IPM? Preciso emitir para a prefeitura de Biguacu-SC. Agradeço qualquer ajuda. Marcos

Olá Ítalo bom dia, a prefeitura de Rio branco-AC trocou de provedor, saiu da Abaco e foi para o Webiss.

Olá bom dia, o município de Rio Branco/AC mudou de provedor, saiu da ÁBACO e foi para o WebIss. No arquivo de cidade.ini continua como Abaco Alguém está conseguindo emitir NFSe usando o ACBrNFSe?

Galera bom dia. Após a atualização do ACBr, estou recebendo o seguinte erro durante a instalação: Alguém pode me dar uma ajuda pra resolver esse problema?

BigWings, obrigado por responder a este tópico, ja tenho todo o material necessário (layouts, tudo)...

caros colegas, um cliente me pediu um para gerar Boleto para o banco 097 - CapitalCred, alguém sabe me dizer como posso fazer para gerar o boleto desse banco com o ACBrBoleto? Agradeço a atenção

Caros colegas, gostaria de saber qual empresa atualmente faz as homologações TEF, Discado e Dedicado, a muito tempo atrás era a SevenPDV e a SofwareExpress. Agradeço pela ajuda. Atenciosamente Antonio Marcos

Caros colegas, ao gerar o arquivo remessa de carteira registrada do banco ITAU, estou recebendo o seguinte retorno no site do itaú: Motivo de Rejeição 19 - CODIGO DA OCORRENCIA/MOVIMENTO O código que estou usando é esse: with Titulo do begin LocalPagamento := SQL_Cedentelocal_pagto.Text; Vencimento := SQL_ImpBoletodata_vecto.AsDateTime; DataDocumento := Date; NumeroDocumento := SQL_ImpBoletoid.Text; NossoNumero := SQL_ImpBoletonnumero.Text; EspecieDoc := SQL_Cedenteaceite.Text; OcorrenciaOriginal.Tipo := toRemessaRegistrar; if SQL_Cedenteaceite.AsInteger = 0 then Aceite := atSim else Aceite := atNao; DataProcessamento := Now; Carteira := SQL_Cedentecarteira.Text; ValorDocumento := SQL_ImpBoletovalor_doc.AsFloat; Sacado.NomeSacado := SQL_ImpBoletocli_razao.Text + ' ( '+SQL_ImpBoletocli_fantasia.Text+' )'; Sacado.CNPJCPF := OnlyNumber(RemoveChar(SQL_ImpBoletocpf_cnpj.AsString)); if Length(RemoveChar(SQL_ImpBoletocpf_cnpj.AsString)) = 11 then begin Sacado.Pessoa := pFisica; end else begin Sacado.Pessoa := pJuridica; end; Sacado.Logradouro := SQL_ImpBoletoend_endereco.Text; Sacado.Numero := SQL_ImpBoletoend_numero.Text; Sacado.Bairro := SQL_ImpBoletoend_bairro.Text; Sacado.Cidade := SQL_ImpBoletomunicipio.Text; Sacado.UF := SQL_ImpBoletouf.Text; Sacado.CEP := OnlyNumber(RemoveChar(SQL_ImpBoletoend_cep.AsString)); //ValorAbatimento := 0; //ValorMoraJuros := 0; //ValorDesconto := 0; //ValorAbatimento := 0; //PercentualMulta := 0; //Abatimento Fidelidade if (SQL_ImpBoletovlr_desconto_fidelidade.AsFloat > 0) And (SQL_ImpBoletoconceder_desconto.AsInteger = 0) then begin ValorAbatimento := SQL_ImpBoletovlr_desconto_fidelidade.AsFloat; end; //Juros ao Dia if (SQL_ImpBoletojurosdia.AsFloat > 0) then begin ValorMoraJuros := SQL_ImpBoletojurosdia.AsFloat; DataMoraJuros := SQL_ImpBoletodata_vecto.AsDateTime; end; //Multa if SQL_ImpBoletoparam_multa.AsFloat > 0 then begin PercentualMulta := SQL_ImpBoletoparam_multa.AsFloat; end; Mensagem.Text := Mensagem.Text + SQL_ImpBoletohistorico.Text + ' / ' + SQL_ImpBoletomesano.Text; end; Agradeço pela atenção dedicada

BigWings, na verdade só ta funcionando o ambiente de produção, segundo eles, o ambiente de homologação está fora devidos a problemas no servidor deles. Testei com no ambiente de produção com o meu CNPJ e da o mesmo erro.

Caros colegas, após a mudança para o Trunk2, não consigo mais fazer nenhuma NFS-e para o provedor PVH. Ao tentar emitir uma nota usando o próprio Demo do ACBr, recebo a seguinte mensagem: Erro Interno: 12029 Erro HTTP: 0 Erro: Requisição não enviada. 12029 - Uma conexão com o servidor não pode ser estabelecida. Entrei com em contato com a prefeitura de PVH e enviei pra eles os xml's gerados e segundo eles, está certinho. Agradeço por qualquer ajuda

Caros colegas, estou tentando obter o protocolo de retorno do provedor PVH, mas não estou conseguindo, esta retornando em branco. A sequência que estou usando é a seguinte: Para enviar: ACBrNFSe1.EnviarSincrono(vNumLote); Depois que enviei, tento pegar o protocolo da seguinte forma: ACBrNFSe1.NotasFiscais.Items[0].NFSe.Protocolo; Tentei dessa outra forma, mas sem sucesso. ACBrNFSe1.WebServices.ConsNFSe.Protocolo; Ja olhei no XML e o protocolo está preenchido: <Protocolo>27C1B3137B5A4418A3AC6C8A555A9B41</Protocolo> Agradeço pela atenção Marcos

Caros colegas, ao criar uma uma NFC-e em ambiente de homologação para o Acre, a mesma é gerada normalmente, más ao consultar pelo QRCode, estou recebendo a seguinte mensagem: 102 - QR Code Inválido Informo que estou alimentando as seguintes propriedades: ACBrNFe1.Configuracoes.Geral.CSC := A_Menu.LeRegistro('NFCe','Token'); ACBrNFe1.Configuracoes.Geral.IdCSC := A_Menu.LeRegistro('NFCe','ID_Token'); Estou informando com o CSC do cliente e o idCSC informados pela própria receita do estado. Alguém ja passou por isso? Agradeço pela a atenção Marcos

Caros colegas, atualizei o ACBr para os novos fontes do Truck2, mas segundo vi alguns posts, que a NFSe ainda tão estava finalizada. Alguém pode confirmar essa informação por favor? Outra dúvida seria como obter o arquivo INI de cada provedor, no meu caso o de PVH. Agradeço a atenção dedicada Marcos

Quando tento programar esse evento ela da o seguinte erro: Property and method ACBrTEFD1CliSiTefObtemCampo are not compatible Agradeço a atenção dos colegas Marcos

Caros colegas, ao tentar usar o TEFD com o gerenciador clisitef, ao o mesmo se encontra instalado em minha maquina, recebo a seguinte mensagem do programa de exemplo TEFDemo. Gostaria da ajuda colegas, para tentar resolver isso. Temos que implementar o TED Dedicado sitef em nosso sistema. Inicializando: gpCliSiTef Evento "OnObtemCampo" não programado Agradeço a atenção Marcos

Caros colegas, em nossa empresa vamos começar a usar o ACBrNFeMonitor, para podermos gerenciar os docs fiscais, e gostaria da ajuda de vocês sobre alguns tópicos. Primeiro informo que usamos o C# para desenvolver, e gostaríamos de saber como podemos fazer a integração através do TCP, ou seja, algum manual com todos os comandos. Segundo, qual a diferença entre o TCP e Arquivos TXT, ou seja, se usar o TCP eu consigo fazer o envio dos arquivos e receber as respostas? Terceiro, se em vez de gerar arquivos TXT, se tem como passar direto o XML para o componente. Agradeço a atenção Marcos

Caros colegas, Um cliente nosso emitiu um MDFe, e logo após o caminhão saiu pra entrega em outros municípios, mas antes de chegar no destino, o caminhão se envolveu em um acidente, e 2 dias depois, retornou com toda mercadoria para o local de origem. A dúvida é, qual procedimento devemos adotar nesse caso, ja que o cancelamento só pode ser feito com 24 horas. Agradeço a atenção Marcos

Caros colegas, após realizar varias pesquisas, achei esse post: Que pede a inclusão de varias units na capicom, a partir daí começou a dar esse problema, simplesmente removi essas units da Capicom e tudo voltou a funcionar corretamente. Peço ao administrador que verifique se essas units estão corretas. Obrigado

Caros colegas, depois de atualizar o ACBr pelo SVN, e tentar instalar, estou recebendo o seguinte erro: [dcc32 Error] ACBrCTeDacteFRpkg.dpk(82): E2199 Packages 'ACBrCapicom' and 'ACBr_CTe' both contain unit 'JwaWinNT' É no pacote de impressão do FastReport do CTe, alguem ai passou por isso? Sendo que o pacote de imprssessão do FastReport da NF-e instala normalmente, só o CT-e e o MDF-e que da esse erro. Agradeço a atenção