Ir para conteúdo
  • Cadastre-se

datilas

Membros
  • Total de ítens

    520
  • Registro em

  • Última visita

  • Days Won

    2

Tudo que datilas postou

  1. a consulta retorna os dados do site:http://www.receita.fazenda.gov.br/pessoajuridica/cnpj/cnpjreva/cnpjreva_solicitacao.asp quanto a atualização do captcha não tenho esse tipo de problema.. caso o problema persista abra um novo topico no acbrtcp (regras do forum não mude de assunto "assunto novo = topico novo")
  2. na linha 892 eu alterei para i := 0; ii:= -1; while FRetListaNFSe <> '' do begin ... e na linha 918 eu alterei para While ii < FRetornoNFSe.ListaNFSe.CompNFSe.Count -1 do begin Inc(ii); ... segue a unit alterada ACBrNFSeWebServices.pas
  3. o erro esta no ACBrNFSeWebServices.pas na na função function TNFSeWebService.ExtrairNotasRetorno: Boolean; por algum motivo "obscuro para mim" na linha 917 for ii := 0 to FRetornoNFSe.ListaNFSe.CompNFSe.Count -1 do begin ... //a variavel "ii" sempre fica com o valor "0" e isso causa todo o problema end;
  4. ACBrNFSe1.NotasFiscais.Clear; ACBrNFSe1.NotasFiscais.LoadFromFile( 2014-rps.xml ); ACBrNFSe1.ConsultarNFSeporRps(ACBrNFSe1.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Numero, ACBrNFSe1.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Serie, TipoRPSToStr(ACBrNFSe1.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Tipo), ACBrNFSe1.NotasFiscais.Items[0].NFSe.Prestador.Cnpj, ACBrNFSe1.NotasFiscais.Items[0].NFSe.Prestador.InscricaoMunicipal); todos os campos acima vem vazios (mas 123-rps.xml esta correto todas as informações estão corretas) então forcei só para testar ACBrNFSe1.NotasFiscais.Clear; ACBrNFSe1.NotasFiscais.LoadFromFile( 2014-rps.xml ); ACBrNFSe1.ConsultarNFSeporRps('20', '14', TipoRPSToStr(trRPS), vCnpj, vInscMun); fez a consulta, mas deu erro list index out of bounds(1); na função ExtrairNotasRetorno e não retornou a nota. quando eu faço a consulta por periodo o componente salva 15 nfse e em seguida do o erro list index out of bounds(16); na função ExtrairNotasRetorno;
  5. ACBrNFSe1.ConsultarNFSe(edtEmitCNPJ.Text, edtEmitIM.Text, StrToDate(DataInicial), StrToDate(DataFinal)); retorna todos os xmls do periodo, eu gostaria de obter apenas o xml em questão
  6. vou disponibilizar sim com certeza na verdade minha aplicação esta funcionando perfeitamente eu estou transformando em componente só para poder disponibilar, ja que eu uso o acbr a muito tempo e ele me ajudo muito (muito mesmo) nada mais justo que ajudar o projeto de alguma forma é que eu precisava dassas informações para dar continuidade pois estou transformado minhas units em componentes e compatibilizando o maximo com o acbr ... estou tendo algumas dificuldades, pois quando eu fiz na minha aplicação eu usei o xml data binding (que é uma mao na roda por sinal) e vi que o acbr não usa isso então estou tendo que criar tudo na mão
  7. ontem eu enviei o arquivo 123-rps.xml e o retorno foi (2-não processado) Hoje eu usei ConsultarSituacao e o retorno foi ( 4-processado) hoje como faço para obter o arquivo xxx-nfse.xml
  8. bom dia. estou tenteando converter meu sngpc para componente. visto que o arquivo xml a ser enviado para a anvisa tem que ser compactado em formato zip, depois convertido em base64, e depois gerado um md5 da base64. eu gostaria de saber se essas funções ja existem no acbr (zip, base64, md5). caso exista onde estão? como usar? caso não exista qual seria a melhor opção para desenvolver. (ex: em qual unit devo criar a função zip e qual pacote é recomendado pelo acbr (7zip ? ou qualqer outro)) pois ja faz algum tempo que eu quero disponibiliza-lo para o acbr e em fim estou colocando a mão na massa... desde ja agradeço
  9. procura por JvJCLUtil.dcu no seu computador e apaga depois tenta recompilar o projeto.. deve ter ficado algum "lixo" quando vc atualizou
  10. bom dia amigos.. ontem me surgiu um "problema" estou usando nfse trunk2 issnet cuiaba, ontem fiz o envio de um rps e o retorno foi 2-não processado (até esse ponto só tenho o xml do rps), hoje eu usei o ConsultarSituacao().. e o retorno foi 4-processado com sucesso... pois bem minha pergunta é. como faço para obter o xml da nfse?
  11. eu estou conseguindo enviar, o retorno vem situação 4 transmitida. mas quando tento pegar o xml retorna list of bonds, inclusive na consulta por periodo, ele chega a salvar os xmls mas em seguida vem o (list of bonds), pra mim só falta resolver isso e fica redondo.
  12. de permisão 755 para pasta "clientes" e todos os seus arquivos segue print + exemplo delphi7 Http.zip
  13. Procedure TForm1.Button1Click(Sender: TObject); Var Retorno: TStringStream; ConteudoArquivo: String; Begin Retorno := TStringStream.Create(''); Try IdHTTP1.Get('http://www.cardilo.com/clientes/70.txt', Retorno); Except // arquivo nao existe End; ConteudoArquivo := Retorno.DataString; //ou If ConteudoArquivo = '' Then // arquivo nao existe End;
  14. (desculpe minha falta de atenção) se o arquivo no seu site é txt seria mais facil vc fazer um get com indy. a vantagem é que ele não vai fazer o download e sim ler o arquivo caso ele não exista vai dar erro 404 que vc pode tratar no seu software (nós usamos assim para validar a licença do software (data de vencimento bloqueio liberação..) com a vantagem do cliente não ter acesso ao arquivo (criptografado))
  15. eu tenho um linux server aki... (meu) e usei esses comandos: openssl req -x509 -nodes -days 365 -newkey rsa:1024 -keyout /var/www/html/SeuCertificado.pem -out /var/www/html/SeuCertificado.pem //aki vai pedir os dados do certficado openssl pkcs12 -export -out /var/www/html/SeuCertificado.pfx -in /var/www/html/SeuCertificado.pem -name "SeuCertificado"
  16. no meu caso eu gerei o certicado em um servidor linux, com as mesma informações que ficam no project / options do meu exe, e por enquanto resolveu o problema de tela branca desapareceu.. pelo menos nos ultimos tres meses não tenho mais esse tipo de reclamação
  17. If Not FileExists('70.txt.part') Then //fazer o download aqui se quiser apagar o arquivo DeleteFile('70.txt.part')
  18. https://github.com/fortesinformatica/fortesreport-ce/issues esse é o forum do fortes eles estão trabalhando muito, poste sua duvida la eles te responderam o mais rapido possivel
  19. http://www.projetoacbr.com.br/forum/topic/20087-imagem-png-delphi-7/
  20. boa tarde estou tentando cancelar uma nfse em homologação em cuiaba-mt provedor issnet estou usando trunk pois não sei se o trunk2 ja esta totalmente funcional com a nfse e acontece o seguinte erro: System error: -2146697210. The Reference with uri 'http://www.w3.org/TR/2000/REC-xhtml1-20000126/' failed to process correctly Segue um log do eureka caso ajude... Unit Class Procedure Line ---------------------------------------------------------------------------------------------------- ACBrNFSeUtil |NotaUtil |AssinarXML |1397 | ACBrNFSeWebServices|TWebServicesBase |DoNFSeCancelarNFSe |2371 | ACBrNFSeWebServices|TWebServicesBase |LoadMsgEntrada |835 | ACBrNFSeWebServices|TWebServicesBase |Executar |731 | ACBrNFSeWebServices|TNFSeCancelarNfse|Executar |5553 | ACBrNFSeWebServices|TWebServices |CancelaNFSe |3842 | ACBrNFSeWebServices|TWebServices |CancelaNFSe |3902 |
  21. tudo bem então... mas era melhor antes pois dava para ter ideia do porque a nota não foi autorizada, ja que nem sempre o cliente nos informa qual foi o erro... eles simplesmente dizem "eu clico para enviar a nota e a nota não imprime", da forma como era antes era possível verificar o erro sem ter que gerar outra nota mas valeu muito obrigado pelo retorno.
  22. desculpe pela falha a tag em questão é "protNFe" e não "nfeProc" na versão 3.00 da NF-e e tambem da NFC-e todos os arquivos enviados para sefaz mesmo com retorno diferente de 100 geravam a tag protNFe por exempolo: esse retorno é de uma NFC-e na Versão 3.00 do dia 01/07/2014 -<protNFe versao="3.00">-<infProt Id="ID"><tpAmb>1</tpAmb><verAplic>3.00</verAplic><chNFe>51140700131611000179650010000000141000000140</chNFe><dhRecbto>2014-07-01T18:56:58</dhRecbto><nProt/><digVal>U6yOVJN9FsiZKAgSAMqGTW1TiVw=</digVal><cStat>703</cStat><xMotivo>Rejeicao: Data-Hora de Emissao posterior ao horario de recebimento</xMotivo></infProt> hoje eu simulei essa mesma situação citada acima alterando a data de emissao da nota e do meu computador e não gerou a tag protNFe
  23. quando envio a NFC-e e o cstat é diferente de 100 não gera a tag nfeProc no xml da NFC-e: quando o retorno é igual a 100 gera o nfeProc: -<protNFe versao="3.10">-<infProt><tpAmb>1</tpAmb><verAplic>3.00</verAplic><chNFe>51150808177485000103650010000061911000061913</chNFe><dhRecbto>2015-08-11T18:02:27-04:00</dhRecbto><nProt>151150171373879</nProt><digVal>Ap1OsTA8TbCCp1dkIXRmuCBHEA8=</digVal><cStat>100</cStat><xMotivo>Autorizado o uso da NF-e</xMotivo></infProt></protNFe></nfeProc>
  24. Ola galera eu to com uma duvida eu gostaria de usar essa consulta voce ja deu uma olhada no demo? ("dir onde esta o acbr"\Exemplos\ACBrCEP\Delphi) ACBrCEP1.BuscarPorLogradouro( edCidade.Text, edTipo_Logradouro.Text, edLogradouro.Text, edUF.Text, edBairro.Text); caso voce esteja tentando fazer a consulta sem o componente seria + ou - assim http://www.buscacep.correios.com.br/servicos/dnec/consultaEnderecoAction.do?relaxation=Rua%20Coronel%20Aureliano/Tatu%ED/SP&TipoCep=ALL&semelhante=N&cfm=1&Metodo=listaLogradouro&TipoConsulta=relaxation&StartRow=1&EndRow=10 dados usado: Rua Coronel Aureliano Cidade: Tatuí UF: SP
  25. atualizei o trunk2 hoje com a revisão 9607 (eu uso delphi XE7), e ocorreram esses erros ACBrGNREWebServices.pas(596) Error: E2003 Undeclared identifier: 'GNREEnviGNRE' ACBrGNREWebServices.pas(657) Error: E2250 There is no overloaded version of 'Execute' that can be called with these arguments ACBrGNREWebServices.pas(710) Error: E2003 Undeclared identifier: 'ConfAmbiente' ACBrGNREWebServices.pas(761) Error: E2003 Undeclared identifier: 'GNREConsResLote' ACBrGNREWebServices.pas(824) Error: E2250 There is no overloaded version of 'Execute' that can be called with these arguments ACBrGNREWebServices.pas(875) Error: E2003 Undeclared identifier: 'ConfAmbiente' ACBrGNREWebServices.pas(947) Error: E2003 Undeclared identifier: 'GNREConsResLote' ACBrGNREWebServices.pas(1010) Error: E2250 There is no overloaded version of 'Execute' that can be called with these arguments ACBrGNREWebServices.pas(1070) Error: E2003 Undeclared identifier: 'ConfAmbiente' ACBrGNREWebServices.pas(1121) Error: E2003 Undeclared identifier: 'GNREConsConfigUF' ACBrGNREWebServices.pas(1182) Error: E2250 There is no overloaded version of 'Execute' that can be called with these arguments ACBrGNREWebServices.pas(1239) Error: E2003 Undeclared identifier: 'ConfAmbiente' ACBrGNRE2.pas(1960) Fatal: F2063 Could not compile used unit 'ACBrGNREWebServices.pas' Compilation failure
×
×
  • 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.