Ir para conteúdo
  • Cadastre-se

tonygyn

Membros
  • Total de ítens

    46
  • Registro em

  • Última visita

Tudo que tonygyn postou

  1. tonygyn

    Caixa Economica Cnab 400

    Bom dia; Ao tentar gerar o arquivo de remessa recebi a mensagem de que não foi implementado ainda a função Cnab 400 para caixa. Sendo assim gostaria de saber "há que pé" esta o desenvolvimento do CNAB 400, ou seja arquivo de remessa, para a caixa econômica federal ? Pois não havendo nada em andamento, gostaria de colaborar, pois estou precisando de desenvolver o envio de remessa para Caixa. Algum moderador pode me responder ?
  2. Bom dia; Senhores estou gerando a NFSe para Goiânia, fui informado que o XML de Retorno possui somente informação do tomador de serviço, somente CNPJ e Código do município. Sendo assim quando peço a impressão do Danfe dados do prestador de serviço e tomador estão em branco. Imaginei que preenchendo os valores mesmo após a geração do danfe poderia imprimir, porém mesmo assim não consigo preencher os dados para que saia no danfe. ACBrNFSe.Gerar(NotaServico.Codigo); setTomador(); ACBrNFSe1.NotasFiscais.Imprimir(); procedure TFox00291.setTomador(); var UtilNFsSped:TUtilNFeSped; begin try UtilNFsSped:= TUtilNFeSped.create(self); with ACBrNFSe1.NotasFiscais.Items[0].NFSe do begin with Tomador do begin RazaoSocial := NotaServico.FkCliente.RazaoSocial.asValue; with Endereco do begin Endereco := NotaServico.FkCliente.Endereco.asValue; Numero := NotaServico.FkCliente.Numero.AsValue; Complemento := NotaServico.FkCliente.Complemento.AsValue; Bairro := NotaServico.FkCliente.Bairro.AsValue; UF := NotaServico.FkCliente.FkMunicipio.IBGEUF.AsValue; CEP := UtilNFsSped.tiraMaskCep( NotaServico.FkCliente.Cep.AsValue); end; with Contato do begin Contato.Telefone := NotaServico.FkCliente.Fone.AsValue; Contato.Email := NotaServico.FkCliente.Email.AsValue; end; end; OutrasInformacoes := StringReplace(OutrasInformacoes, '-',#13+#10, [rfReplaceAll]); end; finally FreeAndNil(UtilNFsSped); end; end; Mesmo passando os dados o Danfe sai em branco. Alguém pode me ajudar...?
  3. Boa noite; Sr. Italo a melhor saída seria mesmo comentar conforme post do guto? De fato conforme guto mencionou há uma alteração nos fontes: Versão Atual function TProvedorGoiania.GetConfigSchema(ACodCidade: Integer): TConfigSchema; var ConfigSchema: TConfigSchema; begin ConfigSchema.VersaoCabecalho := '2.01'; ConfigSchema.VersaoDados := '2.01'; ConfigSchema.VersaoXML := '2'; ConfigSchema.NameSpaceXML := 'http://nfse.goiania.go.gov.br/xsd/'; ConfigSchema.Cabecalho := 'nfse_gyn_v02.xsd'; ConfigSchema.ServicoEnviar := 'nfse_gyn_v02.xsd'; ConfigSchema.ServicoConSit := 'nfse_gyn_v02.xsd'; ConfigSchema.ServicoConLot := 'nfse_gyn_v02.xsd'; ConfigSchema.ServicoConRps := 'nfse_gyn_v02.xsd'; ConfigSchema.ServicoConNfse := 'nfse_gyn_v02.xsd'; ConfigSchema.ServicoCancelar := 'nfse_gyn_v02.xsd'; ConfigSchema.ServicoGerar := 'nfse_gyn_v02.xsd'; ConfigSchema.ServicoEnviarSincrono := 'nfse_gyn_v02.xsd'; ConfigSchema.ServicoSubstituir := 'nfse_gyn_v02.xsd'; ConfigSchema.DefTipos := ''; Result := ConfigSchema; end; Versão Anterior ( Esta funcionava) function TProvedorGoiania.GetConfigSchema(ACodCidade: Integer): TConfigSchema; var ConfigSchema: TConfigSchema; begin ConfigSchema.VersaoCabecalho := '2.01'; ConfigSchema.VersaoDados := '2.01'; ConfigSchema.VersaoXML := '2'; ConfigSchema.NameSpaceXML := 'http://nfse.goiania.go.gov.br/xsd/'; ConfigSchema.Cabecalho := 'nfse_gyn_v02.xsd'; ConfigSchema.ServicoEnviar := 'nfse_gyn_v02.xsd'; ConfigSchema.ServicoConSit := 'nfse_gyn_v02.xsd'; ConfigSchema.ServicoConLot := 'nfse_gyn_v02.xsd'; ConfigSchema.ServicoConRps := 'nfse_gyn_v02.xsd'; ConfigSchema.ServicoConNfse := 'nfse_gyn_v02.xsd'; ConfigSchema.ServicoCancelar := 'nfse_gyn_v02.xsd'; // ConfigSchema.ServicoGerar := 'nfse_gyn_v02.xsd'; ConfigSchema.ServicoEnviarSincrono := 'nfse_gyn_v02.xsd'; ConfigSchema.ServicoSubstituir := 'nfse_gyn_v02.xsd'; ConfigSchema.DefTipos := ''; Result := ConfigSchema; end;
  4. tonygyn

    NFSe - Goiania

    Bom dia; Meu amigo Italo, após fazer a atualização dos componentes esta semana, para atender a emissão de NF-e 3.10, minhas notas fiscais de serviços passaram a não funcionar. O servidor me retorna o erro de Schema, conforme acima muitos relataram. Gostaria de saber se há alguma coisa que possa fazer para corrigir o problema. Estou trabalhando em NFS-e de Goiânia. Grato Tony Christopher
  5. Bom dia; Desculpe pelo engano. Entrando em outros posts de fato o problema estava no registro das dlls capicom (capicom.dll, mxsr5.dll) Após serem registradas no windows 64 o erro não foi apresentado novamente. Desculpem o mau entendido. Grato e Resolvido
  6. tonygyn

    Nfs-E + Certificado A3

    Bom dia; Não estou tendo êxito na geração e envio de nota fiscal de serviços eletrônica. Estou utilizando o componente acbrnfse e ao tentar gerar a nota diz que não existe uma chave. Isto ocorre na assinatura do arquivo. Erro : "Chave não existe!" Ocorre no procedimento Assinar. Alguém já passou por isto ou sabe se há algum problema com relação ao certificado A3. Obs: No mesmo programa tenho a emissão de Nota Fiscal Eletrônica de Peças e o certificado funciona normalmente. Sendo assim não há problemas com o certificado. Grato Tony Christopher
  7. Conforme o link acima o problema foi resolvido... Configuração do Internet Explorer.. Há algum modo de não ser necessária a configuração manual pelo internet explorer ?
  8. Bem voltei novamente ao tópico, pois acreditem. O computador que estava emitindo a nota novamente parou de emitir enviando novamente o erro de envio de requisição 12031. Caso alguém consiga resolver o problema postem... obrigado.
  9. Bom tarde a todos, bem após muita pesquisa e vários sites não consegui descobrir o problema de maneira alguma. Lembrei que a tempos atrás tive problema com criptografia dos novos certificados emitidos pela empresa Valid, como recebi a informação que o problema apresentou depois da renovação do certificado resolvi fazer um teste. Para resolver o problema de criptografia sempre importo em um windows XP com Internet explorer 7 e exporto ele, com este arquivo instalei no cliente e funcionou normalmente. Então acredito que o problema tenha sido mesmo o tipo de criptografia do certificado. Para este tipo de erro seria o apresentado "The Cryptographic Service Provider type '24' is not supported", porém resolveu também para o erro de envio de requisição 12031. Fica ai mais um caso a ser catalogado para os erros de "envio de requisição". Ressalva: Apenas resolveu em um dos computadores. Tentei por diversas vezes reinstalar o certificado que foi exportado do XP e nada adiantou.. o problema persiste para uma das máquinas da mesma empresa. Mistério....
  10. Bom dia; Requisição não enviada erro: 12031 A Segundo os links já postados no forum fiz algumas alterações mesmo assim não funcionou: 1) desabilitar nas opções do internet explorer "verificar revogação do certificado do servidor", Localizado em : Opções Intenet explorer > Avançadas > Segurança 2) retirar o comentário da opção de compilação "{$DEFINE SoapHTTP}" dentro do arquivo acbr.inc 3) também em outro post foi solicitado á informar a versão da nota em 2.0. Também foi feito e não surtiu efeito. 4) Em opções de internet habilitar apenas SSL 2.0 e TLS 1.0, sendo assim desabilitando os outros ssl e tls. Obs: Nada disto resolveu, sendo que a segunda opção, passou a nem gerar mais o arquivo XML assinado. Alguém pode me dar uma Luz sobre como resolver o problema ? Configuração da Estação Windows 7, Internet Explorer 11 Certificado da AC Soluti, A1 Servidor Goias, Acbr Versão 0.9.0b Grato Tony Christopher
  11. tonygyn

    Boleto Por Email

    Existe alguma solucao para envio de email de boletos pelo acbr? como o envio de email da nfe.
  12. O problema ja foi solucionado pela sefaz. quando a problema no webservice sefaz goias aconselha o uso do svc-rs
  13. Srs. Muito obrigado a todos. Mas entrando nos fontes descobri a "ECF.NumECF" Acredito ser esta.. Obrigado
  14. tonygyn

    Numero Do Caixa

    Bom dia; Caros colegas existe algum comando para que possa pegar o número dos caixas do ECF ? Grato a todos.
  15. Senhores; Estou com problema em meus clientes com relação a emissão do boleto do Banco do brasil. Na verdade gera o boleto porém a linha digitável não esta ok. Pois quando mando pagar no banco ele recusam o boleto. O caixa alega que segue o erro de linha digitável inválida. Atualizei recentemente os fontes do acbr. Alguem pode me ajudar? Obrigado Tony Christopher
  16. Consegui resolver o problema. Desinstalei os componentes do acbr e fortes que estava no delphi. Fiz o download do componente do fortesreport com os fontes e do acbr. Antes de instalar notei que ele estava jogando o rllibwind2010.bpl para uma pasta privada do componente. Então mudei no projeto do componente apaguei todas as pastas de saída que estava no options do projeto fortes report, fazendo assim que jogasse no path do usuário, mesmo local que o acbr joga os bpls dele. Instalei o fortes e os componentes do acbr. Funcionou.. Ufa.... Abraço a todos que me ajudaram nesta.
  17. Não, apenas 1. Delphi 2010.
  18. tonygyn

    Erro Na Instalação

    Boa tarde; - Delphi 2010 - Fortes Report 2010 3.69B - ACBR Compilei todos os componentes que uso do acbr e não houve problema. No último componente ao tentar instalar o "ACBr_BoletoFC_Fortes.dproj", ocorre um erro. "Não foi possível encontrar o ponto de entrada.." Anexo segue o erro.
  19. Bom dia a todos; Em atenção cooperadores do projeto ACBRNfe. Descobri que para valores double ou currency (vprod, vnf), que não possuem valores decimais, ou seja valores como total 578,00; por exemplo. Ele valida como se o valor tivesse casas decimais maiores que o permitido, porém uma mensagem inválida. Percebi o problema na unit. Unit pcnGerador; função wCampo if StrToIntDef(Copy(ConteudoProcessado, pos(DecimalSeparator, ConteudoProcessado) + NumeroDecimais + 1, 6),0) > 0 then walerta(ID, Tag, Descricao, ERR_MSG_MAXIMO_DECIMAIS + ' ' + IntToStr(NumeroDecimais)); Então para o exemplo com o valor = 578.00: //converte para string ConteudoProcessado:= floattostr(valor); // ConteudoProcessado = '578'; if StrToIntDef(Copy(ConteudoProcessado, pos(DecimalSeparator, ConteudoProcessado) + NumeroDecimais + 1, 6),0) > 0 then // verdadeira // resultado pos = pos(DecimalSeparator, ConteudoProcessado) = 0, pois como no conteudoProcessado não há decimal não há virgula. // então seria copy('578', 0 + 2 +1,6) > 0, resultado é 8, ou seja maior que 0. // erro causado pela falta da virgula em valores double ou currency que não possuem decimais. // como ele pega da posição 3 até a 6 ele pega o número 8 como início da string. if ((pos(DecimalSeparator, ConteudoProcessado) > 0) and ( StrToIntDef(Copy(ConteudoProcessado, pos(DecimalSeparator, ConteudoProcessado) + NumeroDecimais + 1, 6),0) > 0)) then walerta(ID, Tag, Descricao, ERR_MSG_MAXIMO_DECIMAIS + ' ' + IntToStr(NumeroDecimais)); ou seja só valida casas demais caso o valor tenha casas decimais. Seria uma saida ?
  20. TAG: ID:W16/vNF(Valor Total da NF-e) - Numero máximo de casas decimais permitidas 2 Bom dia; Srs. estou perdendo o sono com este erro. Tenho vários clientes que emitem NFe. Porém um deles me relatou várias notas com o erro acima. Porém nem todas. Após várias horas de pesquisa na net, e ainda analizando o xml. Não consegui identificar o problema. Dentre os testes que fiz foi baixar o emissor de SP e fazer a importação do txt. O arquivo txt que foi gerado não tever problema então tentei importar o xml. Nele o programa me relata: "NFe.xml 52110211639626000169550010000003561000003693 Rejeitado Linha 1: O conteúdo do elemento 'NFe' não está completo. Um dos seguintes é experado: '{"http://www.w3.org/2000/09/xmldsig#":Signature}'. " Segue anexo o Xml. alguem já passou por isto ? 52110211639626000169550010000003561000003693-NFe.xml
×
×
  • 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.