Ir para conteúdo
  • Cadastre-se

medreis

Membros
  • Total de ítens

    66
  • Registro em

  • Última visita

Tudo que medreis postou

  1. Fiz a geracao do Wsdl, vc tem algum exemplo de como instanciar e realizar a chamada aos metodos ?
  2. Olá, Existe um site que retorna o nome associado ao CPF, estou tentando montar uma rotina para retornar o nome associado, mas não consegui, alguem já utilizou este site, e conseguiu retornar no delphi e pegar o nome https://www.situacaocadastral.com.br/ Obrigado
  3. URL to Topico ....da consulta recaptcha
  4. Segue imagem, ele sai alem das bordas das linha que cercam o código de barras, utilizei o ultimo ai de cima....
  5. Pedro , O codigo de barras do DANFE esta saindo alem das margens !
  6. Olá Preciso de um fonte de um aplicativo que faça a consulta das Nfe destinadas, Distribuição Documentos, faça a manifestação, etc. Salve os arquivos Xml em diretórios, utilizando as funções ACBR. Guarde em base as informações das notas, chave, emissão, numero, serie, emissor, destinatário, etc, e guarde os dados para a práxima consulta ultimo NSU e faça este controle. E faça este processo de tempo em tempos, conforme parametrização. Marcio Eduardo
  7. Olá, Necessito de um sistema com FONTES para emissão de CT-e e MDF-e que utiliza os componente do ACBR para integração e emissão dos relatorios em FastRepot, se possivel componente de acesso a dados Firedac. O Sistema tem que ser funcional e realizar as operações sem erros, deve contemplar desde o cadastro até a assinatura, envio, retorno, carta de correção, cancelamento, etc. Por favor, entrem em contato pelo e-mail [email protected] Obrigado Marcio Eduardo
  8. Olá, Tenho um cliente na cidade de Ribeirão Preto , provedor GINFES, este cliente é optante pelo simples e o regime de tributação é estimativa, o valor do ISS é ZERO e a aliquota Aliquota deve ser informada com ZERO. Porem o XML gerado pelo ACBR não tem informação da TAG de Aliquota, mesmo com ZERO. Como configurar para gerar a TAG do ISS mesmo com valor ZERO para que seja gerada no XML? O protocolo 6250899 retornou a mensagem: E207 Alíquota não informado para prestador optante simples nacional. Informe o valor da alíquota. Verificamos e o valor de alíquota não está sendo informando em seu arquivo XML, segue trecho: <ns4:Servico> <ns4:Valores> <ns4:ValorServicos>243.00</ns4:ValorServicos> <ns4:ValorDeducoes>0.00</ns4:ValorDeducoes> <ns4:ValorPis>0.00</ns4:ValorPis> <ns4:ValorCofins>0.00</ns4:ValorCofins> <ns4:ValorInss>0.00</ns4:ValorInss> <ns4:ValorIr>0.00</ns4:ValorIr> <ns4:ValorCsll>0.00</ns4:ValorCsll> <ns4:IssRetido>2</ns4:IssRetido> <ns4:ValorIss>0.00</ns4:ValorIss> <ns4:BaseCalculo>243.00</ns4:BaseCalculo> <ns4:ValorLiquidoNfse>243.00</ns4:ValorLiquidoNfse> </ns4:Valores> <ns4:ItemListaServico>17.19</ns4:ItemListaServico> <ns4:CodigoTributacaoMunicipio>17.19.01 / 00171901</ns4:CodigoTributacaoMunicipio> <ns4:Discriminacao>REFERENTE A SERVICOS PRESTADOS NO MES NA SEDE DA CONTRATADA BOLETO N 06/2016 ;VALOR APROXIMADO DOS TRIBUTOS (8,21%) : R$ 19,68</ns4:Discriminacao> <ns4:CodigoMunicipio>3543402</ns4:CodigoMunicipio> </ns4:Servico> Suporte Ginfes NFS-e [email protected] Eicon - Inteligência em Controles www.eiconbrasil.com.br Obrigado.
  9. O melhor caminho é alterar o arquivo do BOLETO para utilizar o codigo da agencia / conta visto que o tratamento do retorno também utiliza o codigo do cedente. Coloque este codigo no campo AgenciaConta no relatorio : [Cedente."Agencia"][IIF(<Cedente."AgenciaDigito">='0','','-'+<Cedente."AgenciaDigito">)]/[Cedente."Conta"][IIF(<Cedente."ContaDigito">='0','','-'+<Cedente."ContaDigito">)] Obrigado Marcio
  10. Estou homologando os arquivos para o Banco Bradesco, porem o ACBR esta com algumas inconsistências, já vi alguns topicos mas sem resposta, por parte da Equipe. No Layout remessa : - Posição 27 a 46 - Gravar código da empresa: 4036101, completar com zeros a esquerda. Essa informação é para o arquivo de REMESSA Na geração do Arquivo ACBR esta sendo utilizado o CodigoCedente procedure TACBrBancoBradesco.GerarRegistroHeader400(NumeroRemessa : Integer; ARemessa:TStringList); var wLinha: String; begin with ACBrBanco.ACBrBoleto.Cedente do begin wLinha:= '0' + // ID do Registro '1' + // ID do Arquivo( 1 - Remessa) 'REMESSA' + // Literal de Remessa '01' + // Código do Tipo de Serviço padL( 'COBRANCA', 15 ) + // Descrição do tipo de serviço padR( CodigoCedente, 20, '0') + // Codigo da Empresa no Banco padL( Nome, 30) + // Nome da Empresa IntToStr( Numero )+ padL('BRADESCO', 15) + // Código e Nome do Banco(237 - Bradesco) FormatDateTime('ddmmyy',Now) + Space(08)+'MX' + // Data de geração do arquivo + brancos IntToStrZero(NumeroRemessa,7) + Space(277) + // Nr. Sequencial de Remessa + brancos IntToStrZero(1,6); // Nr. Sequencial de Remessa + brancos + Contador Mais existe função( veja abaixo ) que monta o código do cedente com a agencia + digito e conta + digito. Veja que no próprio comentário acima esta "CÓDIGO DA EMPRESA NO BANCO" - 027 a 046 Código da Empresa 020 Será fornecido pelo Bradesco, quando do Cadastramento Vide Obs. Pág. 16 function TACBrBancoBradesco.MontarCampoCodigoCedente ( const ACBrTitulo: TACBrTitulo ) : String; begin Result := ACBrTitulo.ACBrBoleto.Cedente.Agencia+'-'+ ACBrTitulo.ACBrBoleto.Cedente.AgenciaDigito+'/'+ ACBrTitulo.ACBrBoleto.Cedente.Conta+'-'+ ACBrTitulo.ACBrBoleto.Cedente.ContaDigito; end; Porem nos arquivos de BOLETOS FASREPORT, para a impressão do Boleto no campo AGENCIA/CODIGO DO BENEFICIARIO deve ser impresso o CODIGO DA AGENCIA(NUMERO DA AGENCIA + o DIGITO ) / CODIGO DO BENEFICIOARIO ( NUMERO DA CONTA NO BANCO + O DIGITO ) conforme a função acima MontarCampoCodigoCedente Precisa ser realizado o Ajuste na função de geração do arquivo ou no arquivo do BOLETO para que as informações sejam diferente. E ainda verificar o tratamento do arquivo do retorno.
  11. Bom dia, Alguem poderia por favor, adicionar o município de Sales Oliveira / SP ao provedor Fiorilli !!! Segue anexo os fontes alterados. Obrigado Marcio Eduardo D. dos Reis ACBrNFSe.zip ACBrNFSe.zip
  12. Bom dia, Adicionei a cidade de 3544905 - Sales Oliveira /SP no provedor ACBRProvedorFiorilli.pas . Alguém poderia adicionar esta Cidade aos fontes no repositório ACBR. Obrigado. Marcio Eduardo ACBrProvedorFiorilli.pas
  13. Ao realizar o envio de carta de correção pelo acbr, o retorno dos dados e o XML gerado não pode ser impresso dá uma mensagem de erro "No mapping for de Unicode character exists in the target multi-byte code page" Alguem sabe me informar porque desta mensagem tentar imprimir o XML do evento, se tentar abrir o XML no explorer ele fica incorreto . Obrigado Márcio Eduardo
  14. O que preciso conhecer é como realizar a chamada do métodos e como tratar os retornos, popular as classes já fiz , mas não estou conseguindo tratar as chamadas e os retornos, se algum puder me ajudar e compartilhar algum material, ficarei imensamente agradecido !!!
  15. As Units que tem em anexo são as importadas pelo WSDL , estou confuso no processo de chamada das rotina gerarnota, consultarnota, etc pois nunca fiz algo parecido.
  16. Olá, Alguem homologou para cidade de Bauru, utilizando Delphi, estou iniciando um projeto mas nunca trabalhei em nenhum projeto consumindo WSDL ! Alguem poderia me ajudar disponibilizando exemplos ? Já fiz a importação pelo Delphi do WSDL, e tenho as classes , mas não sei como instanciar, qual componente utilizar para envio, como tratar o retorno , se algum puder disponibilizar alguma unit com estes tratamentos, eu consigo ir realizando os testes e aprendendo como utilizar. Obrigado Marcio Eduardo
  17. Maikon, Conseguiu evoluir com a emissão da NFS-e para Londrina Sig, poderia disponibilizar o material ? Obrigado Marcio
  18. Olá Leonardo. Eu salvo os arquivos XMLs, no Banco de Dados ai eu uso savetoStream para salvar os dados em um variável e depois realizar a importação do arquivo para um campo no banco de dados utilizando, eu já salvo os arquivos no disco também, mas como sempre estou tendo problemas com o Stream, acho que vou modificar meu código para LoadFromFile... Veja o código vNfseStream := TStringStream.Create(''); Try cds_Nota.Edit; ACBrNFSe1.NotasFiscais.Items[0].SaveToStream(vNfseStream); TBlobField(cds_Nota.FieldByName('NFSE_XML_RETORNO_LOTE')).LoadFromStream(vNfseStream); (Ds_nota.DataSet as TClientDataSet).ApplyUpdates(-1); Finally vNfseStream.Free; End;
  19. Olá, Após a atualização dos fontes, esta ocorrendo erro ao consultar NFSE por RPS. Ao salvar os dados no Stream o conteúdo das tags vem vazio ACBrNFSe1.NotasFiscais.Items[0].SaveToStream(vNfseStream); Estou utilizando o provedor ginfes, anexo o conteúdo do XML retornado. Obrigado nf.xml
  20. Tentei instalar manualmente os componentes , porem esta ocorrendo erro com os pacotes Fast Repot, adicionei no componente {$IFDEF VER260} fs19, frx19, frxe19, frxDB19, {$ENDIF} // XE5, mas mesmo assim esta ocorrendo erro ao compilar. Forma, dialogs ..etc. tive que colocar VCL.forms, vcl.dialogs, ai funcionou Obrigado.
  21. Mas ai é problema da aplicação. Quando vc ve uma nota impressa com a mensagem "cancelada" , ela foi cancelada em Homologação ou Produção ?? Se sua resposta " for não sei, pois esta informação não consta na nota ", a mensagem cancelada necessita também de um complemento. Quando vc imprime a nota no ambiente de homologação da Prefeitura aparece a mensagem 'Ambiente Homologação' mesmo não existindo no XML esta informação ! Sugiro buscar esta informação do ambiente do componente, pois vc parametriza o ambiente que vc vai trabalhar . Em que situação vc parametriza o componente para ler um XML, produção e quando deveria ser Homologação ? Só quando o seu sistema estiver errado ! Obrigado. Marcio
  22. Tentei debugar mas ainda não encontrei o problema, assim que identificar, lhe passo a solução, mas para contornar o problema, eu carredo um xml de cada vez e faço a impressao.
  23. Aproveitando o topico, o sistema também nao imprime quando o ambiente é em homologação, como não tem nenhum parametro no XML, e precisava desta informação, eu Utilizei a TAG do componente Danfse, passo 1 ou 2 para o componente e alterei o o Report para aparecer a mensagem, havia postado, atualizei o Fastreport mas nao foi atualizado. No .LoadFromStream, alterar também o if ACBrNFSe1.NotasFiscais.Items[i].NFSe.NfseCancelamento.DataHora <> 0 then DANFSe.NFSeCancelada := True; Obrigado
  24. Nem respostas não estava gerando , recebia o lote, gerava o protocolo, mas o RPS não era processado na base de dados, hoje a tarde parece que normalizou, mas muitos erros nos retornos.
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.