Ir para conteúdo
  • Cadastre-se

HRomano

Membros
  • Total de ítens

    58
  • Registro em

  • Última visita

Tudo que HRomano postou

  1. ainda não saiu manual. ref ao DANFE, pelo menos não achei Eu fiz isso, para pagamento em credito da loja, boleto bancário e duplicata, informei tudo duplicata. o problema que vou ter com essa alteração do layout, vai ser na importação do XML, pois dependendo da maneira como ele foi gerado, nao terá as tags de duplicata e com isso, não terá os vencimentos para importar automaticamente no sistema. Essa alteração complicou tudo, algumas alterações foram ótimas como a rastreabilidade, com ela posso pegar os lotes de forma automatica, não precisando da intervenção dos usuários, mas para os vencimentos complicou.
  2. Bom dia, tentei emitir uma nota com forma de pagamento "boleto bancário", que é o '15', mas ao validar diz que a tag tppag nao pode receber o valor 15, apesar de o mesmo constar no manual e no xsd.
  3. HRomano

    Vencimento no DANFE

    Bom dia, analisando o manual e o xml gerado para a versão 4.00 da nfe, vi que somente gera os vencimentos no XML, quando for duplicata mercantil, diferente disso não gera nenhuma tag com data de vencimento, e consequetemente, não imprime no DANFE essa informação. Como vou imprimir um DANFE que não tem as parelas com as datas e valores dos vencimentos? Meus clientes vão reclamar com razão. Alguém já deparou com esse problema?
  4. No meu cliente o problema foi resolvido, ele limpou o cabo serial com limpa contato e conectou novamente. Possivelmente o problema é a comunicacao do cabo serial com o PC.
  5. Estou com o mesmo problema em um cliente. você já teve uma Solução?
  6. Bom dia, consegui, a porta estava sendo utilizada por um programa oculto na maquina do usuário., agradeço...
  7. boa tarde, estou no cliente e adinda está com o mesmo problema. rodei o demo na maquina aonde está plugada a balança, mas ocorre o mesmo erro. já tenei utilziar a dll da saturno a PesoSaturno_v11.dll mas tb não consigo ler o peso.
  8. boa tarde, estou testando o acesso a balança saturno modelo SBR 140 SIMPLES, e ao clicar em ativar no demo, só exibe a mensagem de Acesso Negado... ja testei com varias configurações mas continua com a mesma msg. Alguém já passou pelo mesmo problema?
  9. Obriagdo, era o meu Fast que tinha dado erro. recompilei e reinstalei ele resolveu
  10. Bom dia, atualizei o ACBR e após a atualização o danfe está sendo gerado de forma incorreta, faltando dados e exibindo o código de barras da contingencia, testei com um executável antigo (antes da atualização) e o danfe é impresso corretamente. Em anexo o danfe gerado errado. DANFeRetrato.pdf
  11. Declarei na uses o caminho: $(BDSLIB)\win32\release e resolveu.
  12. Depois de atualizar, os fontes e reinstalar qualquer projeto que abro no delphi está exibidno a mensagem de erro: [dcc32 Fatal Error] SaaSql.dpr(1): F1027 Unit not found: 'System' or binary equivalents (.dcu) Alguém passou por isso?
  13. Descobri aonde estava o problema, tive que maepar a unidade de rede, aonde se encontra a pasta schemas, sem mapear não dá certo, o problema é o técnico, que, quando descobrir que estou mapeando as unidades de rede vai ficar louco.Já tentei utiilzar sem mapeamento, mas nas maquinas clientes não fucniona se o mapeamento.
  14. Obrigado Daniel Simoes.
  15. HRomano

    Erro ao validar um xml

    bom dia estou com problemas para validar um XML no acbr, até ontem estava normal no clienrte, a aplicação gera o XML e importo ele para o componente, mas exibe falha ao validar os dados, pelo que percebi ele nao gera a tag icms corretamente, o CST do cliente é 090, no XML gerado pelo meu programa, gera normal a tag, mas quando leio o xml pelo componente, ao validar exibe o erro do xml, e pelo que percebi ele nao está gerando a tag corretamente. Debugando o comopnente, vi que ao ler o xml na funcao "StrToCSTICMS" tem duas vezes a cst '90' Na Tag ICMS está incorreto, outra coisa que percebi foi que está alterando a chave das notas tb, no XML gerado pelo sistema a chave foi = "51170111404058000206550010000463031140463034" mas quando gerou o XML pelo Componente alterou a chave para = "51170111404058000206550010000463031000000007" Mesmo sertando para não gerar o XML quando importa o XML em anexo o xml gerado pelo sistema e o xml salvo pelo componente, XML_GERADO_PELO_SISTEMA.xml XML_SALDO_PELO_ACBR.xml
  16. HRomano

    Pasta Schemas

    o estranho é que tem permissão completa no compartilhamento, só funcionou depois que mapeei a unidade de rede.
  17. HRomano

    Pasta Schemas

    Boa tarde, configurando o sistema em um cliente, com o ACBR, percebi que a pasta schemas só encontrou corretamente quando mapeei a unidade de rede, passando o caminhno da rede não deu certo, exibia msg que a versão do schema era inválida. Tem alguma configuração para poder aceitar o caminho da rede ao invés de mapear a unidade de rede?
  18. Descobri o problema, no momento da consutla eu estava passando a versão errada. corrigi na funcao que configura o componente, mas tinha esquecido de corrigir na função de consutla.
  19. estou configurando o componente da seguinte forma: {$REGION 'CONFIGURAÇÕES ACBR NFE'} {$REGION 'CONFIGURAÇÕES CERTIFICADO'} if FmMain.wPathCertificado_NFe <> EmptyStr then begin FmMain.ACBrNFe.Configuracoes.Certificados.ArquivoPFX := FmMain.wPathCertificado_NFe; FmMain.ACBrNFe.Configuracoes.Certificados.Senha := FmMain.wSenhaCertficado_NFe; end else FmMain.ACBrNFe.Configuracoes.Certificados.NumeroSerie := FmMain.wNumSerieCertificado_NFe; {$ENDREGION} {$REGION 'CONFIGURAÇÕES GERAIS'} FmMain.ACBrNFe.Configuracoes.Geral.ExibirErroSchema := True; FmMain.ACBrNFe.Configuracoes.Geral.RetirarAcentos := True; FmMain.ACBrNFe.Configuracoes.Geral.FormatoAlerta := 'TAG:%TAGNIVEL% ID:%ID%/%TAG%(%DESCRICAO%) - %MSG%.'; FmMain.ACBrNFe.Configuracoes.Geral.FormaEmissao := teNormal; FmMain.ACBrNFe.Configuracoes.Geral.ModeloDF := FModeloDF; if FModeloDF = moNFe then begin if FmMain.Versao_NFe = '2.00' then FmMain.ACBrNFe.Configuracoes.Geral.VersaoDF := ve200 else if FmMain.Versao_NFe = '3.10' then FmMain.ACBrNFe.Configuracoes.Geral.VersaoDF := ve310 else if FmMain.Versao_NFe = '4.00' then FmMain.ACBrNFe.Configuracoes.Geral.VersaoDF := ve400; end; if FModeloDF = moNFCe then begin if FmMain.Versao_NFe = '3.10' then FmMain.ACBrNFe.Configuracoes.Geral.VersaoDF := ve310 else if FmMain.Versao_NFe = '4.00' then FmMain.ACBrNFe.Configuracoes.Geral.VersaoDF := ve400; end; QryLerCsc.Close; QrylerCsc.ParamByName('CdFilial').AsInteger := FmMain.QryFiliaisAcessoCdFilial.AsInteger; QryLerCsc.Open; if (Fmmain.Ambiente_NFe + 1 = 2) then begin //GERAR O CODIGO NO SITE "http://homologacao.sefaz.mt.gov.br/nfce/codigosegurancactbn/ViewCadastroPublicoCSC.jsp" FmMain.ACBrNFe.Configuracoes.Geral.IdCSC := '000001'; FmMain.ACBrNFe.Configuracoes.Geral.CSC := 'b74e9153f6e96f790da6e416d45af26b'; end else begin FmMain.ACBrNFe.Configuracoes.Geral.IdCSC := Formatar(QryLerCsccIdToken.Value, 7, False, '0'); FmMain.ACBrNFe.Configuracoes.Geral.CSC := QryLerCscCsc.Value; end; QryLerCsc.Close; FmMain.ACBrNFe.Configuracoes.Geral.Salvar := False; //Salvar Arquivos de Envio e Resposta if FmMain.wPathCertificado_NFe <> EmptyStr then FmMain.ACBrNFe.Configuracoes.Geral.SSLLib := libOpenSSL else FmMain.ACBrNFe.Configuracoes.Geral.SSLLib := libCapicom; {$ENDREGION} {$REGION 'WEBSERVICES'} if (Fmmain.Ambiente_NFe + 1 = 1) then FmMain.ACBrNFe.Configuracoes.WebServices.Ambiente := taProducao else FmMain.ACBrNFe.Configuracoes.WebServices.Ambiente := taHomologacao; FmMain.ACBrNFe.Configuracoes.WebServices.UF := FmMain.QryFiliaisAcessoCdSigla.Value; FmMain.ACBrNFe.Configuracoes.WebServices.Visualizar := false; FmMain.ACBrNFe.Configuracoes.WebServices.Salvar := False; //estava True FmMain.ACBrNFe.Configuracoes.WebServices.AjustaAguardaConsultaRet := True; FmMain.ACBrNFe.Configuracoes.WebServices.AguardarConsultaRet := 1 + 1000; FmMain.ACBrNFe.Configuracoes.WebServices.Tentativas := 5; FmMain.ACBrNFe.Configuracoes.WebServices.IntervaloTentativas := 1 + 1000; FmMain.ACBrNFe.Configuracoes.WebServices.ProxyHost := EmptyStr; FmMain.ACBrNFe.Configuracoes.WebServices.ProxyPort := EmptyStr; FmMain.ACBrNFe.Configuracoes.WebServices.ProxyUser := EmptyStr; FmMain.ACBrNFe.Configuracoes.WebServices.ProxyPass := EmptyStr; {$ENDREGION} // wPathSchemas := '\\SERVIDORBG\SaaSql\DDSG-NFe\Schemas\NFe'; {$REGION 'ARQUIVOS'} MontaCaminho; FmMain.ACBrNFe.Configuracoes.Arquivos.Salvar := True; //Salvar Arquivos em Pastas Separadas FmMain.ACBrNFe.Configuracoes.Arquivos.SepararPorMes := False; //Criar Pastas Mensalmente FmMain.ACBrNFe.Configuracoes.Arquivos.AdicionarLiteral := False; //Adicionar Literal no nome das pastas FmMain.ACBrNFe.Configuracoes.Arquivos.EmissaoPathNFe := False; //Salvar NFe pelo campo Data de Emissão FmMain.ACBrNFe.Configuracoes.Arquivos.SalvarEvento := False; //Salvar Arqs de Eventos FmMain.ACBrNFe.Configuracoes.Arquivos.SepararPorCNPJ := False; //Separar Arqs pelo CNPJ do Certificado FmMain.ACBrNFe.Configuracoes.Arquivos.SepararPorModelo := False; //Separar Arqs pelo Modelo do Documento FmMain.ACBrNFe.Configuracoes.Arquivos.PathSalvar := wPath + 'Enviadas\'; //Salvar Arquivos de Envio e Resposta FmMain.ACBrNFe.Configuracoes.Arquivos.PathSchemas := wPathSchemas; //Pasta Schemas FmMain.ACBrNFe.Configuracoes.Arquivos.PathNFe := wPathXML; //Pasta Arquivos NFe FmMain.ACBrNFe.Configuracoes.Arquivos.PathInu := wPath + 'Inutilizadas\'; FmMain.ACBrNFe.Configuracoes.Arquivos.PathEvento := wPath + 'Eventos\'; {$ENDREGION} {$REGION 'DANFE'} if FmMain.ACBrNFe.DANFE <> nil then begin FmMain.ACBrNFe.DANFE.TipoDANFE := tiRetrato; FmMain.ACBrNFe.DANFE.Logo := fmMain.auxStr + fmMain.QryFiliaisAcessoCdFilial.AsString+'.bmp'; end; {$ENDREGION} {$ENDREGION} a parte do envio está no codigo abaixo: FmMain.ACBrNFe.NotasFiscais.Clear; FmMain.ACBrNFe.NotasFiscais.LoadFromString(XMLNFe_NaoAssinado); ChaveNFe := Copy(FmMain.ACBrNFe.NotasFiscais.Items[0].NFe.infNFe.ID, 4, 44); FmMain.ACBrNFe.NotasFiscais.GerarNFe; FmMain.ACBrNFe.Enviar('1', False); Estou utilizando a SSL para enviar a nota. Esse problema está tando em produção quanto em homologação, esotu utilizando o WebService de MT Caso necessite de mais informações me avise 51170111404058000206650010000400011140400010-nfe.xml
  20. Bom dia, estou com um problema para autorizar NFC-e, ao enviar a nota exibe a mensgaem de exceção da função GerarException mas não exibe nada, e ao tentar consultar a NFC-e não define a URL de consutla, a versão do serviço sempre retorna "0", e dessa forma a URL não é encontrada (DEFINIRURL), depois desse erro se tentar enviar a NFC-e novamente exibe mensagem de nota duplicada já autorizada, ele esta enviando corretamente, autorizando na sefaz mas nao recebe o retorno.
  21. HRomano

    Erro ao validar NFC-e

    boa tarde, estou enviando uma NFC-e pelo acbr, mas nao valida a nota, exibe um erro "Error: the schema itself is not valid" Já atualizei a pasta de schemas da NF-e, deletei ela toda no servidor do cliente e copiei a que está na pasta ACBR, em homologação não me eixbe essa mensagem. Configurei o componente para quando for NFC-e a versao = 3.00, antes estava como 3.10 mas continuou o mesmo erro. " if FModeloDF = moNFe then begin if FmMain.Versao_NFe = '2.00' then FmMain.ACBrNFe.Configuracoes.Geral.VersaoDF := ve200 else if FmMain.Versao_NFe = '3.10' then FmMain.ACBrNFe.Configuracoes.Geral.VersaoDF := ve310 else if FmMain.Versao_NFe = '4.00' then FmMain.ACBrNFe.Configuracoes.Geral.VersaoDF := ve400; end; if FModeloDF = moNFCe then begin if FmMain.Versao_NFe = '3.10' then FmMain.ACBrNFe.Configuracoes.Geral.VersaoDF := ve300 else if FmMain.Versao_NFe = '4.00' then FmMain.ACBrNFe.Configuracoes.Geral.VersaoDF := ve400; end; "
  22. reparei um detalhe eu setei no componente para utilizar o libOpenSSL, mas ao consultar está utilizando as funções Capicom, Não pode ser isso que está dando o erro? será que esqueci de alguma configuração? o Certificado não está instalado na maquina, informei o caminho aonde ele está saldo e a senha.
  23. Estou usando o OpenSSL e o certificado é o A1 e ele está instalado na maquina.
  24. Boa tarde, estou consultando o cadastro de um cliente na SEFAZ utiizando o componente AcbrNFe da maneira abaixo: case cbTpConsulta.ItemIndex of 0: ACBrNFe.WebServices.ConsultaCadastro.CNPJ := EdtPesquisa.Text; 1: ACBrNFe.WebServices.ConsultaCadastro.CPF := EdtPesquisa.Text; 2: ACBrNFe.WebServices.ConsultaCadastro.IE := EdtPesquisa.Text; end; ACBrNFe.WebServices.ConsultaCadastro.UF := cbUF.Text; ACBrNFe.WebServices.ConsultaCadastro.Executar; ====>> O ERRO ACONTECE QUANDO EXECUTA A CONSULTA (ACCESS VIOLATION) tentei verificar o que estaria ocasionando a exceção, mas como sou novo no ACBr, não consegui achar o problema.
×
×
  • 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.