Ir para conteúdo
  • Cadastre-se

Arnaldo Cruz

Membros
  • Total de ítens

    583
  • Registro em

  • Última visita

  • Days Won

    2

Tudo que Arnaldo Cruz postou

  1. se eu enviar FDataModule.ACBrNFe1.Enviar('1',True,False); não acontece o erro então o erro está no modo sincrono.
  2. Estou enviando a NFC-e como segue abaixo FDataModule.ACBrNFe1.Enviar('1',True,True); Recebo a mensagem de rejeição Falha no Schemas XML do Lote de NFe. O estranho é que o caixa ao lado usa o mesmo sistema os mesmos esquema. vou no caixa um e seleciono o produto de código 1 vou no caixa dois e seleciono o código 1 Transmito a nfc-e do caixa 2 com sucesso já o do caixa 1 da esta mensagem de rejeição. segue anexo o xml do caixa 1, já fiz a comparação com o do caixa 2 é identico, pra não ficar duvidas se a comparação foi feita certa usei um comparador de arquivo que resultou em zero diferença. Se alguem puder mim dá uma dica eu agradeço. 25170110852339000170650010000005301000005302-nfe.xml
  3. mim expressei mal é o numero do recibo que não estou conseguindo ou talvez não volte esta informação esquece li sua resposta, e já obtive a resposta do problema. Obrigado camarada pela ajuda, vcs foram nota 10
  4. o modo sincrono é superior em 150%, todos webservices do nordeste aceitam este envio somente pra NFC-e, vou adotar este metodo Agora to quebrando a cabeça pra pegar o protocolo e recibo
  5. Fiz a modificações agora esta em 3 segundos, obrigado Waldir Paim sua ajuda foi fundamental
  6. Criei pelo regedit KeepAliveTimeout DWORD 100 ServerInfoTimeout DWORD 100 mais aparentemente não mudou em nada até aumentou o tempo de 12 segundos pra 17 segundos pra transmitir
  7. Waldir Paim Perdoe minha ignorancia mais o KeepAliveTimeout é o mesmo que timeOut ? a configuração do componente ACBrNFe está como segue abaixo Intervalo de tentativas 5000 Tentativas 5 TimeOut 5000 o TimeOut não é só um tempo de espera, lugares que tem a conexão baixa
  8. Para NF-e Gerador.wCampo(tcStr, 'V01', 'infAdProd', 01, 500, 0, nfe.Det.infAdProd, DSC_INFADPROD); Para NFC-e Gerador.wCampo(tcStr, 'V01', 'infAdProd', 01, 500, 0, DSC_INFADPROD, nfe.Det.infAdProd);
  9. colegas consegui aparentemente resolve fazendo alteração como abaixo, só alterei a sequência dos parâmetros 7 e 8 unit pcnNFeW; procedure TNFeW.GerarDet; var i: Integer; begin for i := 0 to nfe.Det.Count - 1 do begin Gerador.wGrupo('det nItem="' + IntToStr(nfe.Det.Prod.nItem) + '"', 'H01'); Gerador.gtCampo('nItem', IntToStr(nfe.Det.Prod.nItem)); (**)GerarDetProd(i); (**)GerarDetImposto(i); if nfe.Det.pDevol > 0 then (**)GerarDetDevol(i); Gerador.IDNivel := 'H01'; //Gerador.wCampo(tcStr, 'V01', 'infAdProd', 01, 500, 0, nfe.Det.infAdProd, DSC_INFADPROD); Substitui esta Gerador.wCampo(tcStr, 'V01', 'infAdProd', 01, 500, 0, DSC_INFADPROD, nfe.Det.infAdProd); Por Esta Gerador.wGrupo('/det'); end; if nfe.Det.Count > 990 then Gerador.wAlerta('H02', 'nItem', DSC_NITEM, ERR_MSG_MAIOR_MAXIMO + '990'); end; os parâmetros são TIPO,ID,TAG,MIN,MAX,OCORRÊNCIA,VALOR,DESCRIÇÃO,PARSETEXTOXML,ATRIBUTO O conteúdo da informação adicional está vindo na DESCRIÇÃO E O VALOR ESTA VINDO VAZIO Pergunto esta alteração pode prejudicar alguma outra parte que utilize a sequencia de parâmetros existentes ?
  10. Melhorei a imagem para melhor entendimento
  11. Galera na minha NFC-e em um cliente que vende eletroeletrônico e necessário informar o numero de serie do produto para efeito de Garantia. Estou informando na tag infAdProd. O problema é que se na nota tiver mais de um item e todos os itens tiver informações adicionais, no danfe sai embaixo de cada item a informação adicional, porem se na nota tiver mais de um item e só um item tiver informação adicional no danfe a informação adicional sai somente no final. o cliente quer que sai embaixo do item. Pergunto daria pra fazer igual a NFe que a informação sai embaixo do item indiferente de qu7antos itens tenha a NFC-e ? A imagem mostra como fica o danfe com informação em todos os itens e informação em apenas um item Obrigado
  12. Colegas é possivel fazer esta tarja preta com o texto conforme a imagem abaixo
  13. Lado esquerdo a visualização na tela Lado Direito a impressão Existe alguma forma de fazer com que o corte fique logo abaixo da tarja preta, atualmente está cortando 2 cm após a tarja preta nas Bematech e 3,5 cm nas Daruma. Qualquer dica eu agradeço
  14. Produção ou Homologação? >>>>>>>.Produção Qual o certificado utilizado? >>>>>>>>A1 Qual SEFAZ aplicou os testes?>>>>>>PB Qual seu ambiente de desenvolvimento? Delphi se sim qual versão?>>>>>> Delphi XE7 Qual sistema operacional? >>>>> Win7 64bits processador I7 Qual antivirus? >>>>>>>Avast Qual HD (Solido ou Disco)? >>>>>>500GB
  15. Colegas após muita reclamação dos nossos clientes ref tempo de transmissão e não encontrarmos solução, resolvemos convidar algumas softhouse de amigos da região para um comparativo de tempo de transmissão. pegamos seis maquinas com a mesma configuração, e sistema com 4 linguagem distintas sistemas feitos em delphi com ACBR , usamos 3 sistema distintos para caso houvesse um disparate de tempo concluir que a causa seja a concepção do código. 3 que não usam o ACBR (1 C# - 1 vbNET - 1 PHP) todos com a mesma logica e o mesmo banco de dados Firebird 1 Gera o XML 2 grava a nfc no banco de dados 3 Transmite 3 itens cada nfc Internet com 5MB exclusiva fizemos os testes em dois periodos sempre usando o mesmo ponto de internet uma maquina por vez. 9:00 da manhã e 4:30 da tarde os que usam acbr manhã chegou a variar de 12 segundos a 0:01:10 e a tarde 12 segundos não houve nenhum disparate de tempo entre sistema os que não usam o acbr manhã 5 segundos e tarde 3 segundos. ================================== Pergunto para os colegas mais experiente estes tempos gasto pelos sistema feitos em Delhi com ACBr seria +- o tempo que gastam o sistema de vocês para transmitir a NFC-e?
  16. Nunca tinha percebido isso, pois nos testes sempre é uma pagina. porem quando fui exportar um relatorio de produtos com 2 ou mais paginas da access violation. Segui o tópico onde diz que o erro está na unit frxExportPDF linha 721, onde teclando Ctrl e clicando na unit da seção USE, ela seria aberta, no meu caso não abre a unit, simplesmente não acontece nada, o mouse fica houglass e depois volta para default. Alguém sabe como resolver estes dois problemas. 1 - Exportação para pdf com mais de uma pagina. Obs. este erro só acontece pelo preview do fast, botão PDF, se eu fizer a exportação via codigo não dá erro. 2 - A não abertura da Unit quando teclado Ctrl e clicado na Unit contida na USE Obrigado
  17. Esta mesmo embutido na data porem a data só volta a data sem a hora
  18. Seleciono o xml para da entrada da mercadoria só fui observar isso hoje que ListaE.hSaiEnt := TimeToStr(Ide.hSaiEnt) sempre volta 00:00. ALguem sabe como pegar a data de emissão da NF-e na hora de da a entrada da nota. Obrigado
  19. A diferença é que o fator de vencimento ultima coluna da linha digitavel é preenchida com zeros 00000.00000.00000.000000.00000.000000.0.00000000000000 e alguns bancos utilizam a data de processamento ou emissão para saber se o boleto está vencido, geralmente 15 dias da data de processamento ou emissão
  20. Apareceu uma necessidade,em um cliente o funcionário gera os boletos,gera a remessa e envia para o banco. porem não imprime os boletos, como a impressora está em rede e em outro andar em um setor que se encarrega de enviar os boletos para os clientes. Os caras estão culpando o sistema dizendo que mandaram a impressão e o sistema não imprimiu. Estou usando ACBrBoleto com ACBrBoletoFCFR1, tem como saber se o usuário clicou no botão print, pois a situação é que está a palavra dele contra a minha, eu estou dizendo que se clicar em print vai ao menos mandar para impressora, e eles dizem que estão clicando no print e não imprime, eu fui até lá fiz os testes e imprimiu todos os boletos que eu mandei, ai os caras falam, imprimiu agora mas antes não imprimiu. desliguei a impressora e mandei um print, os boletos ficaram no spool, assim que liguei começou a impressão. Agora se tiver como verificar se o cara clicou no print ai eu quebro as pernas deles.
  21. Arnaldo Cruz

    ACBr Email

    Estou enviando email da NF-e e Boleto pelo ACBREMAIL, são enviados com sucesso, porem percebi que todos emails caem na quarentena , já teste com hotmail - bol - gmail - R7 tambem fiz teste mudando as propriedades FDataModule.ACBrMail1.SetSSL := com True e False FDataModule.ACBrMail1.SetTLS := com True e False meu provedor de email requer conexão segura
  22. Estou tendo muitos problemas com certificado digital A3 na emissão da NFC-e, faço a transmissao da erro, quando tento transmitir na segunda vez aparece a mensagem pedindo o pin do certificado digital, ai digito e a nfc-e é transmitida. isso acontece quando o computador entra em modo de descanso, ou até mesmo quando o intervalo entre as emissões é muito grande. lembrando que sempre antes de gerar o xml eu atualizo as configurações do componente. Pergunto : tem com antes de gerar xml, verificar se o certificado está conectado na usb, ou está ativo a Leitora
  23. Eu tive algo parecido 5 vezes não mas umas 3 vezes era comum. Resolvido conforme abaixo. Desabilitei o descanso de tela e economia de energia para nunca no painel de controle. Localizei a Porta USB 2.0 e Conectei o Certificado nesta porta., antes estava numa porta 1.0
  24. Estou enviando a NFC-e como segue abaixo Protocol := ''; Recibo := ''; ChaveNfc := ''; EdtProtocolo := ''; edtRecibo := ''; NomeArqOR := ''; NomeArq := ''; NovoCaminho := ''; FDataModule.ACBrNFe1.NotasFiscais.Clear ; FDataModule.ACBrNFeDANFeESCPOS1.ViaConsumidor :=False; FDataModule.ACBrNFeDANFeESCPOS1.NumCopias := edtNumeroVias.AsInteger ; FDataModule.ACBrNFe1.NotasFiscais.LoadFromFile(Caminho); //Carrego o xml gerado FDataModule.ACBrNFe1.Enviar('1',False ,False ); cStat := IntToStr(FDataModule.ACBrNFe1.WebServices.Retorno.cStat); Protocol := FDataModule.ACBrNFe1.WebServices.Retorno.NFeRetorno.ProtNFe.Items[0].nProt; Recibo := FDataModule.ACBrNFe1.WebServices.Retorno.NFeRetorno.nRec; ChaveNfc := FDataModule.ACBrNFe1.WebServices.Retorno.NFeRetorno.ProtNFe.Items[0].chNFe; if cStat = '100' then begin if Protocol <> '' then begin Aqui verifico se já existe o numero de protocolo gravado no banco de dados if não existe no banco de dados then begin Gravo no banco de dados O problema é que volta cStat 100, volta o numero do protocolo porem quando eu consulto no site a NFC-e não foi transmitida. end else begin Aqui as vezes volta o protocolo e recibo da penultima nota transmitida Só acontece em clientes que usam Certificado A3 end; end; end;
  25. Arnaldo Cruz

    Download XML da NF-e

    Estou executando a manifestação das nota Fazendo o download Normal. porem alguns xml não baixam de jeito nenhum Tipo tem 20 xml manifestados Ao fazer download o sistema baixa 8 xml em dois volta "Pedido de Download Processado" e a partir dai não baixa mais todo dia acontece isso, as vezes dois xmls outras 1xml outros dias 3 xml e outros dias baixam todos. nos que baixa volta Stat = 140 nos Pedido de Download Processado volta Stat = 139 eu faço como abaixo FDataModule.ACBrNFe1.DownloadNFe.Download.CNPJ := CnpjEmpresa; FDataModule.ACBrNFe1.Configuracoes.Arquivos.PathSalvar := Caminho + '\'; FDataModule.ACBrNFe1.Configuracoes.Arquivos.DownloadNFe.PathDownload := Caminho + '\'; FDataModule.ACBrNFe1.Download; if (stat = 139 ) or (stat = 140 ) then if FileExists(local) then // verificao se o xml existe na pasta
×
×
  • 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.