Ir para conteúdo
  • Cadastre-se

Datacaixa

Membros Pro
  • Total de ítens

    241
  • Registro em

  • Última visita

Tudo que Datacaixa postou

  1. OK, muito obrigado Diego!
  2. Existe alguma condição ou tratativa no ACBr para Zerar os campos abaixo? Produto.Imposto.PIS.vBC := TVENDAS_ITENSBASE_PIS.AsCurrency; Produto.Imposto.PIS.pPIS := TVENDAS_ITENSPIS.AsCurrency; Produto.Imposto.PIS.vPIS := TVENDAS_ITENSVALOR_PIS.AsCurrency; Em alguns casos mesmo informando o valor o ACBr informa 0 (zero) no XML.
  3. Olá pessoal, tudo bem? Gostaria de saber como imprimir o Saldo Disponível do VR/Sodexo no comprovante do TEF, já verificamos e o saldo está vindo no log (anexo), porém, não está saindo na impressão. De modo resumido a minha rotina é a seguinte: //basicamente a cada transação verifico se o GP está iniciado if not (ACBrTEFD1.Inicializado(TACBrTEFDTipo(gpPayGoWeb))) then begin MessageBox(Handle, 'O TEF não foi inicializado corretamente!', 'TEF', MB_OK + MB_ICONWARNING); AbortaOperacao; end; //por ser transação com voucher passo o parâmetro 04 ACBrTEFD1.TEFPayGoWeb.ParametrosAdicionais.ValueInfo[PWINFO_CARDTYPE] := '04'; //realizo a transação com CRT Status := ACBrTEFD1.CRT(50.00, '04', '123456'); //capturo e armazeno no BD o retorno em ACBrTEFD1.Resp //aqui é possível ver que salvo os campos ImagemComprovante1aVia.Text e ImagemComprovante2aVia.Text Qry.FieldByName('NSU').AsString := ACBrTEFD1.Resp.NSU; Qry.FieldByName('NSU_HOST').AsString := ACBrTEFD1.Resp.NSU; Qry.FieldByName('DATA').AsDateTime := ACBrTEFD1.Resp.DataHoraTransacaoLocal; Qry.FieldByName('VALOR').AsFloat := ACBrTEFD1.Resp.ValorTotal; Qry.FieldByName('COMPROVANTE1VIA').AsString := ACBrTEFD1.Resp.ImagemComprovante1aVia.Text; Qry.FieldByName('COMPROVANTE2VIA').AsString := ACBrTEFD1.Resp.ImagemComprovante2aVia.Text; //faço validações finais if ValorRecebido >= ValorTotal then ACBrTEFD1.ConfirmarTransacoesPendentes(True); GerarVenda; ImprimirVenda; //e por fim, imprimo as transações na finalização da venda dessa maneira if TransacaoTefOk then begin ImprimirComprovante(Qry.FieldByName('COMPROVANTE1VIA').AsString); ImprimirComprovante(Qry.FieldByName('COMPROVANTE2VIA').AsString); end; Pelo que observei no log, parece que são gerados 3 comprovantes: 1 - via cliente, 2 - via estabelecimento, 3 - via só com saldo. Será que o problema é esse? Eu queria poder ativar a função de VR ou Sodexo no meu PDC de teste para conseguir simular e entender melhor, entretanto, foi me passado que infelizmente essa ativação não é possível. comms.rar
  4. No debug da unit quando entra na procedure TrataRetornoEmitir o "Response.Sucesso" já está como "True" e após executar a rotina "ProcessarMensagemErros" mesmo tendo erro na transmissão essa propriedade continua como "True" Percebi também que a propriedade AcbrNFSeX.NotasFiscais[I].Confirmada fica igual a False.
  5. Bom dia! Seguem os arquivos solicitados: 000003395-lista-nfse-sinc-soap.xml Obs: não estou conseguindo anexar mais de um arquivo por limitação do tamanho 3.77kb
  6. ACBrNFSeX.NotasFiscais.Count = 1 ACBrNFSeX.WebService.Emite.Sucesso = True; ACBrNFSeX.WebService.Emite.Erros.Count = 2 Esses são os retornos.
  7. Estou enviando no modo Sincrono
  8. Boa tarde! Estou com a seguinte dúvida, fiz a transmissão de um RPS e ao receber o retorno no componente do Acbr a propriedade AcbrNFSex.WebService.Emite.Sucesso está retornando com o valor "True" sendo que a nota não foi gerada na prefeitura, ao também percorrer as propriedades do componente AcbrNFSeX.NotasFiscais[0].NFSe.Numero está sendo retornado o próprio número do RPS mesmo a nota não sendo gerada/criada, sendo assim, gostaria de saber em qual propriedade eu poderia "confirmar" que a nota realmente foi emitida.
  9. Olá Daniel, nossa que estranho, acabei de atualizar mas não apareceu. Mas blz, vou ver aqui o que houve, obrigado!
  10. Olá, não encontrei o campo Produto.Imposto.ICMS.vICMSMonoOp conforme mencionado nas novas alterações para Combustíveis (campo #212.14 da NT 2023.001v1.20- Tributação Monofásica).
  11. Ótimos argumentos @Alexandre de Paula, muito obrigado pela sua opinião! Acho que vou usar campos separados mesmo, principalmente porque espaço hoje em dia não é mais um problema!
  12. Gostaria de apenas uma opinião dos Srs. Universitários! No caso da alíquota ad rem do ICMS para combustíveis seria melhor criar um novo campo no sistema específico para isso ou utilizar o campo ICMS já existente e tratar isso conforme o CST, ou seja, ex: caso CST = 02 preencho o ICMS ad rem no ACBr?
  13. Ok, e quanto a impressão, sendo que o acbr lê os dados do xml e neste caso não teríamos xml? Percebi também que na função de CancelarNFSe o retorno está informando "Dados de identificação não encontrados" e percebi que o CNPJ está sendo escrito no xml de envio com "." e "/" o que está provocando o erro para não cancelar, quando removo esses caracteres o cancelamento é retornado com sucesso
  14. Olá Diego, sim eu sei que são 2 propriedades distintas. O que eu gostaria é de mesclar as 2 para facilitar para o cliente, já que as 2 estão relacionadas. Por isso perguntei de como poderia ser esse De Para.
  15. OK, obrigado Italo!
  16. Caso a gente utilize o Padrão Nacional para a NFS-e ela será enviada para um servidor diferente do provedor do município? Ou seja, o sistema do município não vai constar essa NFS-e, somente no servidor nacional?
  17. Na propriedade abaixo na NFSe são aceitos somente 3 opções: // Provedor PadraoNacional (osnNaoOptante, osnOptanteMEI, osnOptanteMEEPP) OptanteSN := osnOptanteMEI; Porém na propriedade RegimeEspecialTributacao são aceitos bem mais opções conforme abaixo: Nenhum Microempresa Municipal Estimativa Sociedade Profissionais Cooperativa Microempresário Individual Microempresário Empresa PP Lucro Real Lucro Presumido Simples Nacional Imune Empresa Individual RELI Empresa PP Microempresário Outros Eu gostaria de ter um campo somente para o cliente (no caso o Regime Especial de Tributação), porém alguns casos não são contemplados nas 3 opções acima, como faria nesse caso? Teria que fazer um De Para de tudo? No caso Microempresário poderia considerar como osnOptanteMEI? Empresa PP poderia considerar como osnOptanteMEEPP?
  18. Neste caso isso se aplicaria também para o padrão nacional?
  19. Sim, já conseguimos verificar as credenciais, até consegui emitir uma nota, porém no retorno o componente ficou com o atributo da nota vazio, o status ficou com valor "1", segue o xml de retorno. ACBrNFSeX.NotasFiscais.Count = vazio ACBrNFSeX.NotasFiscais.Items[I].NFSe.CodigoVerificacao = vazio 000000158-lista-nfse-ger-soap.xml 000000158-ger-nfse.xml 000000158-ger-nfse-soap.xml 000000158-lista-nfse-ger.xml
  20. Sim, com o mesmo usuário e senha eu consigo entrar no site da prefeitura de Marília.
  21. Boa noite! Mesmo preenchendo os atributos ACBrNFSeX.Configuracoes.Geral.Emitente.WSUser e ACBrNFSeX.Configuracoes.Geral.Emitente.WSSenha o erro apresentado faz referência a: "Senha não pode ser verificada" 000000001-lista-nfse-ger-soap.xml000000001-lista-nfse-ger.xml000000001-ger-nfse-soap.xml000000001-ger-nfse.xml
  22. Olá @Daniel Simoes e @Renato Rubinho! Por algum motivo no meu fonte a função abaixo retorna como true e no ACBr retorna false, usando o mesmo XML. NotaEhValida := SSL.Validar(AXML, GerarNomeArqSchema(ALayout, VerServ), Erro); Para não perder mais tempo com isso usei aquela função mesmo dos alertas que vocês me indicaram e ficou assim: try dmACBr.ACBrNFe1.NotasFiscais.Validar; TVENDAS.Edit; TVENDASCHAVE_ACESSO.AsString:=Copy(dmACBr.ACBrNFe1.NotasFiscais[0].NFe.infNFe.ID,4,50); TVENDAS.Post; dmConexao.IBTCONEXAO.CommitRetaining; if dmACBr.ACBrNFe1.NotasFiscais.Items[0].Alertas <> '' then begin iMessageBox(handle, pwidechar(dmACBr.ACBrNFe1.NotasFiscais.Items[0].Alertas),'Validação', MB_ICONEXCLAMATION); TVENDAS.Edit; TVENDASSITUACAO.AsString:='Rejeitada'; TVENDASMOTIVO_REJEICAO.AsString:=dmACBr.ACBrNFe1.NotasFiscais.Items[0].Alertas; TVENDAS.Post; dmConexao.IBTCONEXAO.CommitRetaining; pAtualizarTela; dbeNumero.OnChange(nil); //para exibir na tela o motivo rejeicao Exit; end; Dessa forma consegui resolver, obrigado pessoal!
  23. Olá @Renato Rubinho e @Daniel Simoes Obrigado pelo retorno! Eu já fiz as validações aqui no sistema para evitar esse tipo de erro. Mas agora estou curioso mesmo em relação a mensagem aparecer mais completa. De fato vi que no exemplo do ACBr está mostrando, então estou quebrando a cabeça aqui ainda. Mas outra dúvida, como faço para exibir o número do item de forma mais clara para o usuário, ou seja, ao invés de TAG:<det nItem="1"> exibir Item Número 1?
×
×
  • 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.