-
Total de ítens
166 -
Registro em
-
Última visita
-
Days Won
1
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Posts postados por Aurino
-
-
Exato, cada campo tem seu respectivo lugar .. ou seja , vIPI e vIPIDevol , mostrando no Danfe os dois campos ...
-
"Segue a contribuição para os modelos de DANFE nos formatos retrato e paisagem, incluindo totalizadores adicionais. No modelo paisagem, foram adicionados os valores de IPI normal e de devolução, além das alíquotas de ICMS, ICMS ST e IPI por produto."
Fiz ajustes para melhorar a clareza e fluidez.
Abaixo modelo das imagens conforme o modelo de impressão usado no Fast Report;
DANFePaisagem_v2.fr3
DANFeRetrato_v2.fr3
-
2
-
-
Em 11/07/2019 at 17:53, Smaili Amorim disse:
É a configuração dos dados da porta serial.
Geralmente esta balança a configuração é :
BAUD=9600
DATA=7
PARITY=E
STOP=2
Arquivo de Log:
--------------------------------------------------------------------------------
ATIVAR - 11/07/19 15:29:45:566 - Modelo: Toledo 9091 - Porta: COM1 Device: BAUD=9600 DATA=7 PARITY=E STOP=2 HANDSHAKE= MAXBANDWIDTH=0 SENDBYTESCOUNT=0 SENDBYTESINTERVAL=0
--------------------------------------------------------------------------------- 15:29:45:775 RX <- [STX]+p`000068000000[CR]
UltimoPesoLido: 6,8 - Resposta: [STX]+p`000068000000[CR]não sei se foi resolvido mas segue sugestão para funcionar com a balança testada via emulador..
nas primeiras linhas do procedure ACBrBAL1LePeso, adicionei as 3 linhas abaixo....
procedure TForm1.ACBrBAL1LePeso(Peso: Double; Resposta: String); var valid : integer; begin {tratamento para balToledo9091_8530_8540 } if Trunc( StrToInt( trim(ACBrBAL1.UltimaResposta)) ) <> 0 then Peso := StrToInt( trim(ACBrBAL1.UltimaResposta)) ; sttPeso.Caption := formatFloat('##0.000', Peso ); sttResposta.Caption := Converte( Resposta ) ; if Peso > 0 then Memo1.Lines.Text := 'Leitura OK !' else begin valid := Trunc(ACBrBAL1.UltimoPesoLido); case valid of 0 : Memo1.Lines.Text := 'TimeOut !'+sLineBreak+ 'Coloque o produto sobre a Balança!' ; -1 : Memo1.Lines.Text := 'Peso Instavel ! ' +sLineBreak+ 'Tente Nova Leitura' ; -2 : Memo1.Lines.Text := 'Peso Negativo !' ; -10 : Memo1.Lines.Text := 'Sobrepeso !' ; end; end ; end;
-
1
-
-
Em 17/02/2022 at 19:50, nildglan disse:
esses serviços quais são os valores? Aurino e ItWors?
é opensource.
-
ajuste da data da situacao especial, para deixar = 0;
-
Bom dia,
quero compartilhar uma pequena alteração referente a situação do CNPJ para casos com situação especial.
Em anexo o arquivo ACBrConsultaCNPJ.pas com o ajuste testado no lazarus e delphi;exemplo, ao consultar o CNPJ o 45.170.289/0001-25 - DARUMA TELECOMUNICACOES E INFORMATICA S/A
SITUAÇÃO CADASTRAL
ATIVASITUAÇÃO ESPECIAL
FALIDOexemplo de uso:
exemplo 1:
if ACBrConsultaCNPJ1.SituacaoEspecial <> '********' then
EditSituacao.Text :=ACBrConsultaCNPJ1.SituacaoEspecial
else
EditSituacao.Text := ACBrConsultaCNPJ1.Situacao ;adicionado a unit:
- descricao da situacao especial
- data da situacao especial
exemplo 2:
EditSituacao.Text := ACBrConsultaCNPJ1.Situacao;
EditSituacaoEspecial.Text := ACBrConsultaCNPJ1.SituacaoEspecial ; -
API de consulta pelo EAN
Consulta CNPJ: http://www.dataload.com.br:8000/api/cnpj/00000000000000
Obter imagem pelo codigo de barras: http://www.eanpictures.com.br:9000/api/gtin/2170620308508
Obter descricao ncm pelo codigo de barras : http://www.eanpictures.com.br:9000/api/desc200/7894900093049
Link do grupo no whatsapp: https://chat.whatsapp.com/LS8DWYNrjwf8pqU52WPtVf
Tem DEMO de uso da API.-
5
-
-
fica sugestão que captura automaticamente, pelo tipo de envio;
var vsincrono : Boolean; vcsat : integer; vxmotivo : string ; begin vsincrono := StrToBool(IfThen(ACBrNFe1.NotasFiscais.Count > 1, 'True', 'false')); ACBrNFe1.Enviar(1, True, vsincrono); vcsat := IfThen(vsincrono = true, acbrnfe1.WebServices.Enviar.cStat, acbrnfe1.WebServices.retorno.cStat); vxmotivo := IfThen(vsincrono = true, acbrnfe1.WebServices.Enviar.xMotivo, acbrnfe1.WebServices.retorno.xMotivo); //ifthen uses math end;
-
1
-
1
-
-
Em 01/09/2021 at 20:51, nildglan disse:
vou colocar esse valor ACBrNFe.Configuracoes.WebServices.TimeOut := 5000;
será que vai da problema no envio em alguns sefaz?
tente usar timeout de 15000 como padrão, e caso não obtenha o retorno, emita a contingencia com numero sequencial atual + 1, previsto pelo manual da contingencia 2.0.
Segue esse manual passo a passo, que conseguirar tratar as questões da emissão e controle das numerações e procedimentos a serem adotados quanto a questão fiscal. -
Desculpe pela demora mas resolvido.
Obrigado pelo ajuste. -
Em 27/07/2021 at 11:39, EMBarbosa disse:
Enviei um ajuste na revisão 22441. Queira por favor testar e reportar qualquer problema.
Boa noite, irei atualizar e testar. reportarei o resultado. obrigado.
-
1
-
-
Esta como citado.. Pagamento Instantâneo (PIX) porém ficar com erro de impressão no danfe.... como mostrado na imagem.
-
Bom dia
NFe com PIX no FortesReport esta cortando/cobrindo o valor pago na forma de pagamento.
Para corrigir temporariamente, tive que alterar na unit pcnConversao o texto Pagamento Instantâneo (PIX) para PIX conforme mostrado abaixo.
Há algum ajuste no danfe FortesReport para não sair cortado ou fica a minha sugestão de refatoração do texto da descrição da forma de pagamento referente ao PIX. -
Boa noite.
NFe com PIX no FortesReport esta cortando/Cobrindo o valor pago na forma de pagamento.
Para corrigir temporariamente, tive que alterar na unit pcnConversao o texto Pagamento Instantâneo (PIX) para PIX conforme mostrado abaixo.
Há algum ajuste no danfe FortesReport para não sair cortado ou fica a minha sugestão de refatoração do texto da descrição da forma de pagamento referente ao PIX. -
35 minutos atrás, Valmir Gomes Ribeiro disse:
Aurino, obrigado por me responder amigo, veja se consigo me expressar direito, dar um exemplo.
faco uma venda de 100,00, então vou e recebo 50,00 no cartão, quando olho na pagina da adm de cartão a venda ja esta la confirmada certo
ai eu dou um ESC e o sistema diz que tem transacao no tef e vai cancelar ele executa o comando CancelarTransacoesPendentes pronto neste comando ele vai e mostra uma tela
pequena dizendo que a transacao do nsu tal, rede tal e valor tal foi cancelada so que não cancela.
outro ponto é o seguinte feito feito duas vendas em cartao a primeira mostra esta tela e não cancela e a segunda entra no gerenciador de cartao, porem no getcard que vc conhece muito mais que eu ele faz o cancelamento pegando o numero do controle e nao do nsu, pasmem ele não tras este numero e para isso tenho que ver na pagina ?, mas esta segunda pergunta eu ate consigo passar mas o primeiro problema realmente não to conseguindo fazer, configuracao do componente é autoativargp = false, autoefetuarpagamento = false, autofinalizar = false, confirmarantesdoscomprovantes = false, multiploscartoes = true, realmente ta meio desesperador para mim, ja faz uma semana que não consigo finalizar. se alguem quiser posso ate liberar o acesso remoto para analise. obrigado a todos antecipadamente.
Pelo que entendi...
a rotina cancelartransacaopendentes, mas já foi confirmada nao estando mais pendente correto?
nesse caso, chamando a função que passei acima, fará o processo de cancelamento chamando a tela do GP para informar os dados da transação visto que já foi confirmada assim como pode consultar no portal de vendas.
ref. o controle ser usado para cancelar pelo GP, apesar de existir o NSU mas pegando o controle (CTR) seja na impressão do comprovante apos a finalização da venda, ou durante a venda, pegando direto do processo apos aprovação do cartao, poderá implementar a leitura desse CTR direto no arquivo antes da chamada do GP ou fazer com que o operador possa informar o CTR manualmente via orientação da sua aplicação...
segue a imagem que salvo no banco de dados os dados de cada transação seja durante a venda ou apos finalização da venda.
-
2
-
-
verifica a função do ACBrTEF pois não temos problemas com o TEF GetCard, que esta operacional normalmente.
ACBrTEFD1.CNC(vRede, vNSU, vDataHoraTransacao, vValorTransacao );
-
2
-
-
3 horas atrás, RicardoVoigt disse:
Boa tarde, se teu sistema tiver alguma forma de alterar a forma de emissão, de Normal para Contingencia offline, (manual ou automaticamente) não haveria necessidade de realizar esse "pulo da numeração"...
Por exemplo, a loja vai passar o dia inteiro sem internet por algum problema técnico, o sistema teria que ser "inteligente o suficiente" para saber que deve emitir direto em "contingência offline" ao invés de tentar primeiro emitir na forma "Normal"... espero ter ajudado...
Att
Ricardo
Exato..
A partir o primeiro erro de falta de retorno da sefaz por exemplo ou falha de conexão de internet, já procede para alteração automatica para emissão em contingencia, e assim emitindo normalmente em sequencial das numerações e em contingencia offline.
O manual trata apenas para caso de envio e sem retorno do status da nota, fazendo assim a necessidade de liberar a venda do cliente com uma numeração seguinte para evitar que gere a mesma numeração desta que deu falha de retorno e ao transmitir a sefaz esta mesma nota, obter o retorno de duplicidade de chave de acesso com diferenca ...
assim tendo a nota normal recebida na sefaz, porem o cliente possui uma nota em contingencia que nunca será autorizada na sefaz visto que o tipo de emissão é diferente daquele registrado e recebido na sefaz.
Precisa tratar automaticamente a emissão da contingencia, seja manual ou por usuário a partir do primeiro caso de falha de retorno da sefaz ou falta de internet.-
2
-
-
3 horas atrás, gss200610 disse:
Deixa eu ver se entendir. supomos que eu esteja sem internet e emita umas 10 notas todas em contigencia, eu vou ter que gerar uma a mais pra cada, totalizando 20 notas?
pelo manula da nota tecnica fala que sempre for contigencia gerar uma numeracao a frente. entao aquele modo de enviar as notas offline mesmo ja era? agora é gerar um clone da nota mais com um numero a frente é isso mesmo?, e apos retorno inutilizar no meu caso ai 10 ou cancelar se tiverem sido autorizadas?no seu exemplo, emitindo 10 notas em contigencias devido ausencia de internet, logo vc nao esta enviando as notas ,e sim apenas gerando em contingencia.
nao precisará gerar outras nota substitutiva para esse caso.
A regra do manual da contingencia é para aquele caso que vc envia a nota no modo NORMAL, a sefaz recebe esta nota e por qualquer motivo que seja, seu sistema nao obtem o retorno. Nesse momento, vc deve seguir o manual que diz: gerar uma nova nfce com numero sequencial em contingencia ..
ao enviar esta contingencia posteriormente, fará a consulta da chave de acesso da primeira nota que nao teve retorno da sefaz, e tratar o retorno e evento posterior para o caso.
5 horas atrás, gss200610 disse:entao. mais imagine como esta esses dias a sefaz com problemas, e quase todas a notas caem em contigencia, nao vai dar problema pro cliente?
uma vez que o cliente tirou umas 50 notas no dia e todas deram esse erro, ele vai cancelar esse monte sem dá na cara pra sefaz é isso?1 - Quase todas notas caem em contigencia: Qual motivo para emissão? falha de internet ou retorno da sefaz?
Se for este o problema, a primeira nfce que apresentou esse problema será gerada uma nfce seguinte com os mesmos dados desta nota, guardando a nota anterior para posterior consulta e tratamento de consulta para cancelar, inutilizar ou emissao de nfe de devolucao de venda.
A partir desta nota que obter essa falha e gerando assim a contingencia, no fim da impressão, já providencia a alteração automatica do modo de envio para contingencia manual.
E assim, as proximas notas , serão emitidas em contingencias offline , podendo reativar o modo normal a seu critério, entre tempo no time, ou manualmente pelo usuário;
Mas se esta gerando contingencias por diversas falhas, precisa verificar que falhas e resolver cada falha e transmitir essas contingencias, visto que o cliente final, tem posse deste documento em contigencia para posterior consulta. -
na NT da contingencia nesses casos, para tratar a numeração e não perder o controle ou liberar nota inexistente ao cliente , segue o exemplo basico que o manual da contingencia orienta:
1 - enviou a nfce 100 , sefaz recebeu mas nao teve retorno(falta de internet ou sefaz);
2- gera a nfce 101 em contingencia ref. a 100 que ficou sem confirmação;
3 - ao transmitir a 101 a sefaz autorizando a mesma, fará a consulta da chave da nfce 100 para obter o retorno da situação e tratar da seguinte forma:
a - se estiver autorizada dentro do prazo, realiza o cancelamento;
b - se nao estiver autorizada, inutiliza a numeração;
c - se estiver autorizada fora do prazo, emissao da nfe de devolucao de venda;
*isso sem fazer o controle de serie exclusiva da contingencia, por isso , a numeraçao sequencial da nota continua na sequencia.Manual_de_especificacoes_tecnicas_da_Contingencia_Off-line_versao_2.0.pdf
-
1
-
-
Em 18/11/2018 at 16:32, Aurino disse:
Boa Tarde Pessoal e Graca, desculpe pela demora...
Acabei esquecendo de repassar aqui.
Verifiquei e relataram que para venda POS, deverá ser informado tiPagNaoIntegrado, e para TEF, tiPagIntegrado.
Atualmente estou tratando conforme o tipo de transação e não tivemos problemas ref. as validações e emissões da notas fiscais, e tbm, sem problemas fiscais com relação aos cupons emitidos com venda POS ou TEF;Estou tratando assim, basicamente:
Case TipoMeioPagamento of TEF: begin tpIntegra := tiPagNaoIntegrado; end; POS: begin tpIntegra := tiPagIntegrado; end; end; //Passandos os dados mesmo para transação POS, para controle dos comprovantes vinculados ao documento emitido; tPag := TipoTransacao; // ex: fpCartaoCredito; Tipo da Transação do cartao, se credito ou débito; vPag := ValorCredito; // ex 10.00; Valor pago na transação; tBand := BandeiraCartao; // ex: bcVisa; Bandeira selecionada pelo usuario; cAut := NSU; // ex: 102030; codigo do comprovante informado pelo usuario; CNPJ := CnpjOperadora; // ex: 11111111111111; CNPJ vinculado a tabela ref. a bandeira selecionada;
Inverti aqui ao passar pra ka. rsrs
TEF: begin tpIntegra := tiPagIntegrado; end; POS: begin tpIntegra := tiPagNaoIntegrado; end;
-
1
-
-
5 horas atrás, Claudemir Laureano disse:
e qual foi a soluçao ?
era problemas da sefaz, ref, o sincronismo entre as sefaz estaduais e nacional.
-
1
-
-
Em 09/08/2018 at 08:12, Gr@c@ disse:
Olá. Você conseguiu alguma resposta? Tem mais algum programador que resida no MA para checar isso pra nós de forma presencial? SEFAZ/MA não responde emails, não tenho como tirar essa dúvida.
Boa Tarde Pessoal e Graca, desculpe pela demora...
Acabei esquecendo de repassar aqui.
Verifiquei e relataram que para venda POS, deverá ser informado tiPagNaoIntegrado, e para TEF, tiPagIntegrado.
Atualmente estou tratando conforme o tipo de transação e não tivemos problemas ref. as validações e emissões da notas fiscais, e tbm, sem problemas fiscais com relação aos cupons emitidos com venda POS ou TEF;Estou tratando assim, basicamente:
Case TipoMeioPagamento of TEF: begin tpIntegra := tiPagNaoIntegrado; end; POS: begin tpIntegra := tiPagIntegrado; end; end; //Passandos os dados mesmo para transação POS, para controle dos comprovantes vinculados ao documento emitido; tPag := TipoTransacao; // ex: fpCartaoCredito; Tipo da Transação do cartao, se credito ou débito; vPag := ValorCredito; // ex 10.00; Valor pago na transação; tBand := BandeiraCartao; // ex: bcVisa; Bandeira selecionada pelo usuario; cAut := NSU; // ex: 102030; codigo do comprovante informado pelo usuario; CNPJ := CnpjOperadora; // ex: 11111111111111; CNPJ vinculado a tabela ref. a bandeira selecionada;
-
1
-
1
-
-
Em 08/10/2018 at 19:10, ALISON VIEIRA GUSTMANN disse:
Boa noite amigo, tbem estou precisando de um desses onde vc encontrou?
fiz um conversor entre as bases, ai não fico preso a programa de terceiros para migrar.
-
1
-
-
26 minutos atrás, Juliomar Marchetti disse:
Veja se está com a versão free pode estar desatualizado, versão do SAC está funcionando
40 minutos atrás, João Paulo Pires disse:Pessoal, a minha dúvida é o Contrario do que esta neste Tópico, mas seria util para me ajudar se tiver como:
Preciso que na Visualização do DANFE não apareça nada referente a Forma de Pagamento, Duplicatas, pois a NFe 4.00 é de Devolução.
Estou usando o ACBR Monitor e gerando o seguinte arquivo para leitura nfe_gerada.ini
Ja tentei enviar dessa formar e o ACBR me retornar esse erro: sai.txt
ERRO: Falha na validacao dos dados da nota: 726
Element '{http://www.portalfiscal.inf.br/nfe}pag' cannot be empty according to the DTD/Schema.
Se eu colocar pelo menos uma fatura, ai da certo, porem no meu caso desta NFe é de Devolução, então não poderia aparecer dados referente a Vencimentos / A vista ou prazo.
Gera a nfe de devolução com a tag = Outros.
"DANFE NF-e FastReport com Totalizadores de IPI Devolução, Valor de IPI, COFINS, FCP e Outros"
em ACBrNFe
Postado
Compreendo a preocupação, mas a sugestão de modelo de impressão , atende as demandas de clientes , contadores, e fornecedores, que requerem o valor do IPI Devolução, nos casos das empresas emissoras serem do regime fiscal simples nacional, mostrando o valor total de forma mais clara, visto que tal valor já estaria nas informações adicionais da nota fiscal, no rotapé do danfe.
Então , em caso de devolução de compra que seja mencionado o IPI Devol, poderá ser usado tal impressão como modelo de visualização da informação em questão.
Ressaltando o mesmo para os casos dos campos FCP, FCP ST e FCP Ret.