paulorsa
-
Total de ítens
95 -
Registro em
-
Última visita
-
Days Won
1
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Posts postados por paulorsa
-
-
Neste tópico...
Fiz uma solução alterando o evento QuandoPerguntarCampo, colocando um booleano para informar que deve voltar.
-
Para homologar o CliTef com a Qualità precisei fazer uma alteração nas seguintes units ACBrTEFAPI, ACBrTEFAPICliSiTef, ACBrTEFPayGoWebComum, ACBrTEFAPIPayGoWeb.
Fiz uma alteração no Evento QuandoPerguntarCampo incluí um campo booleano para indicar que o fluxo pode voltar ao anterior.
Seria a mesma funcionalidade que o QuandoPerguntarMenu pode ter de voltar ao menu anterior.
Caso seja interessante deixo aqui minha alteração.
ACBrTEFAPI.pas ACBrTEFAPICliSiTef.pas ACBrTEFAPIPayGoWeb.pas ACBrTEFPayGoWebComum.pas
-
Boa tarde.
Consegui resolver usando o seguinte código..
if ACBrTEFAPI1.Modelo = tefApiCliSiTEF then
begin
ACBrTEFAPI1.EfetuarAdministrativa('131', IntToStr(Venda.NumOperacao));
ACBrTEFAPI1.FinalizarTransacao(tefstsErroEnergia);
end;
-
1
-
1
-
-
@DaniPro Vi em outro tópico (
uma res) uma resposta sua. Usei a função ACBrTEFAPI1.EfetuarAdministrativa('130','') e me retorna os seguintes dados
000-000 = 18221
1319-000 = 1900
160-000 = 1
161-000 = 1
163-000 = 20240208
164-000 = 113419
210-000 = 2
211-000 = 3
899-103 = 0Achei o que cada código quer dizer:
210 Quantidade total de pendências, listadas nos blocos de dados abaixo
160 Cupom Fiscal
161 Número Identificador do Cupom do Pagamento
163 Data Fiscal
164 Hora Fiscal
211 Código da “Funcao” original
1319 Valor da transação originalSó não sei qual a função chamar para fazer o estorno.
-
Esse é o procedimento que ocorre, tem que tirar o cartão para finalizar.
Mais é um teste de queda de energia, então se derruba a aplicação antes da retirada do cartão. O que ocorre é que não é gravado os arquivos ACBr*.tef, então o componente não faz o estorno da transação pendente na inicialização.
Precisaria de uma forma de ler o que ainda esta pendente no relatório Sitef e também qual a função que faria para estornar automaticamente sem precisar passar o cartão, pois a transação não foi efetuada.
-
Estou parado em uma situação que ainda não sei como resolver.
Preciso cancelar/estornar uma venda que ainda se encontra pendente no relatório Sitef.
O passo a passo...
Faz a venda, escolhe cartão crédito com o valor total da venda, insere o cartão no Pinpad, digita a senha, a transação é aprovada...
E quando aparece a mensagem para retirar o cartão do Pinpad NÃO retira, Derruba o TEFAPIDemo.
Executa o TEFAPIDemo novamente. O que deveria acontecer segundo o pessoal que faz a homologação é que a venda deveria ser cancelada ou confirmada, pois ainda se encontra pendente no relatório.
O que acontece é que enquanto eu não retiro o cartão não é retornado nada fica apenas no TACBrTEFAPIClassCliSiTef.ContinuarRequisicaoSiTef
Então o sistema não pode salvar nenhuma informação
Vou postar o log para verificarem. Porem no relatório Sitef já consta como PENDENTE.
Não achei uma maneira de ler/verificar essa PENDENCIA.
Gostaria de saber com vocês que já tem TEF da Sitef API, como resolveram essa questão.
Vocês podem ver na imagem do Demo como não é incluído nos pagamentos enquanto o cartão não for retirado.
-
Dois cliente aqui do RS estão com o mesmo problema. Aparentemente somente em vendas para clientes sem inscrição estadual.
-
2
-
-
Este erro acontece no Delphi XE também, mas não acontece no Delphi DX 10.2, mas a alteração indicada pelo próprio erro funciona também no XE e no DX 10.2
-
É só alterar a unit ACBrDFeHttpIndy.pas trocar os $ENDIF para $IFEND, salvar e instalar.
-
1
-
-
Você não está totalizando a base do ICMS.
no item na tag imposto você tem vBC = 1000.00
e na tag ICMSTot você tem vBC = 0.00
-
2
-
-
Valeu pelas dicas, já tenho informação suficiente se quiser pode fechar o tópico.
-
Obrigado pelas dicas Robert, quanto ao valor vou ponderar mais tarde o custo beneficio, só gostaria mesmo de saber a configuração que o pessoal mais usa, quanto a placa só acrescentei pois pretendo trabalhar com dois monitores.
Mais uma vez obrigado pelas dicas serão de grande ajuda.
-
1
-
-
Preciso trocar minha maquina e antes de comprar gostaria da opinião do pessoal que é desenvolvedor, sobre alguns componentes do micro.
- Quantidade de memória 8, 16 ou mais?
- Armazenamento SSD ou HD ou os dois?
- Processador?
- Placa de Video?
Lembrando que é uma maquina para desenvolvimento de sistemas, que tera instalada Delphi, Lazarus, Visual Studio, SQL Server, Firebird, Oracle, VM's de outros sistemas operacionais, etc.
Agradeço desde já a opinião de todos.
-
Não funcionou pelo seguinte motivo.
Na linha 303 do ACBrCTeConhecimentos.pas foi alterada
AXMLModal := StringReplace(AXMLModal, ' xmlns="' + ACBRCTE_NAMESPACE + '"', '',
[rfReplaceAll, rfIgnoreCase]);
corretamente, mas na linha de baixo na 306 onde tem um case.
case TACBrCTe(TConhecimentos(Collection).ACBrCTe).IdentificaSchemaModal(AXML) of
é passado como parâmetro AXMLnesse caso teria que fazer o StringReplace no AXML ou modificar também a ACBrCTe.pas na function TACBrCTe.IdentificaSchemaModal(const AXML: String): TSchemaCTe;
fazendo o mesmo StringReplace, se quiser posso fazer só não sei qual seria a melhor opção.
-
ok, obrigado pela atenção.
-
1
-
-
Concordo que o XML não esta correto, mas como o sistema é feito para empresas de contabilidade ele apenas verifica se o XML está validado no SEFAZ, este foi apenas um caso de um xml que eu não consegui validar, mas que o SEFAZ aceito e consta na base deles exatamente como esta ai. É meu cliente que usa a transportadora e não adianta pedir para consertarem o sistema deles pois alegam que se fosse errado o SEFAZ não aceitaria. Fiz a alteração pois meu sistema valida e carrega a base de dados em cima dos XML's de CTe's.
Quanto aos outros modais, não tive nenhum com esse problema, acredito (espero) que não tenha mais nenhum, pois isso só ocorre com transportadoras do tipo Rodoviário. (talvez todas usem o mesmo sistema).
Tenho outros XML's com a mesma situação, se desejar posso anexar.
-
Recebi um xml de uma transportadora e para poder validá-lo tive que fazer uma alteração, o xml esta validado no SEFAZ.
-
Segue alteração feita na unit ACBrEFDBloco_D_Importar.pas, para importar o registro D190 que estava faltando.
-
Eu fiz uma conversão a uma semana atrás de um banco MySQL, apesar de o cliente ter a senha do banco eu não precisei, o que fiz foi, baixar o MySQL do site da MySQL e instalar o servidor na minha máquina, depois via acesso remoto copiei esses arquivos (todos os arquivos), para a pasta do repositório do banco MySQL no meu micro e acessei os dados com Workbench e a senha de instalação do MySQL.
-
Eu faço assim.
Primeiro chamo NFe.NotasFiscais.Items[IndNfe].Validar;
e verifico NFe.NotasFiscais.Items[IndNfe].Confirmada e
NFe.NotasFiscais.Items[IndNfe].Cancelada
vejo se tem alguma coisa em NFe.NotasFiscais.Items[IndNfe].Alertas e NFe.NotasFiscais.Items[IndNfe].ErroValidacaoCompleto
Após eu executo o
NFe.WebServices.Consulta.NFeChave := NFe.NotasFiscais.Items[IndNfe].NumID;
NFe.WebServices.Consulta.Executar;Para verificar se o XML foi cancelado se teve carta de correção ou outro evento gerado. Pois muitos clientes mandam somente o XML da NFe e não mandam os XML's dos eventos.
-
Gero o arquivo de remessa em uma pasta o usuário entra no site do banco e importa o arquivo.
-
O usuário faz a nota e salva, salvo a nota toda incluindo o numero dela, só após ele conseguir salvar a nota ou seja, passou por todos os testes de inconsistência necessários, e salvou com sucesso no banco de dados. Ai eu envio o XML.
-
Eu salvo a nota no banco primeiro, depois salvo o xml.
-
Estou enviando um PDF, um XML e o executável ACBrNFe_demo compilado com a alteração.
O XML não está assinado, mas é possível usar o botão imprimir DANFe do demo para ver como fica.
O Demo foi compilado com o Delphi XE.
Obs:
Essa quebra de página dos Dados Adicionais foi feita, porque a antiga impressão em Rave também quebrava a página quando necessário, mas o emissor gratuito feito em java imprime da mesma forma que já é feita hoje pelo componente. Eu prefiro com a quebra dos Dados Adicionais quando necessário.
Fiz uma alteração nos fontes do TEFAPI
em Dúvidas sobre TEF
Postado
Sim, a não ser que desse para passar um valor padrão.