IgorAcertSoft

Sexta as 19:24

vou tentar implementar, ainda e novidade a programacao voltada para android para mim.

Sexta as 18:44

tenho uma documentação vou encaminhar por aqui quPrinterApi_v3.pdfeUtilizando Bitmaps para impressão v1.0.0.pdf Quick_Start-Servico_de_Impressão para_POS-V1.3.pdfm sabe tem a informação que tu precisa saber

Sexta as 18:17

consegui que a impressora imprima usando a classe externa Elgin E1 Lib
so que elea so imoprime o qrcode o texto ficar minusculo e borrado

Sexta as 18:13

tem isso aqui nesse link

Sistema Operacional
Android 7.1

Memória RAM e armazenamento
1 GB RAM | 8 GB ROM

Processador
Quad Core ARM Cortex A53 1.5GHz

Leitores de cartão
Smart Card, Contactless, Tarja Magnética

Slots
1x SIM | 1X SAM

Display
5.0", TFT IPS (720 x 1280), Capacitivo

Teclado
Digital, Android Keyboard | Físico: 15 teclas
Botão liga/desliga e volume dedicados

Áudio
Alto-falante, Entrada de fone 3.5 mm

Conectividade
Rede Móvel 4G, 3G, 2G
Wifi 2.4GHz & 5 GHz (dual band)
Bluetooth

Localização
GPS, A-GPS, Beidou, GLONASS

Conexões
USB Tipo-C | Conector magnético

Câmera
Traseira 5 MP Auto Foco | Frontal VGA Foco Fixo

Bateria
7.4 V - 2.600 mAh (Equivalente a 3.6 V 5.200 mAh)

Dimensões e Peso
200 x 82 x 70 mm, 327 g

Impressora
Térmica Rápida 40x58 mm

Certiﬁcações
PCI PTS 5.x, EMV L1 & L2, EMV CTLSS L1, Visa payWave, MasterCard PayPass, ExpressPay, D-PAS, ABECS , Anatel

Sexta as 18:04

o que encontrei foi esse aqui
https://www.positivotecnologia.com.br/solucoesempagamentos/

Sexta as 15:57

Existe alguma configuração na ACBrPosPrinter para impressão em Equipamentos POS L300 e L400, ou é necessária alguma implementação adicional para viabilizar essa funcionalidade?

23 Abril

Postei no tópico errado, desculpe.

18 Março

apos instalação ele pede para informar cnpj e ponto de captura ai apresenta este erro

Apos clicar em ok abre a tela abaixo, como devo proceder? os passos foram realizados conforme manual da paygo.

18 Março

Não existe outra forma?? Pois hoje se torna inviável termos de passar cliente por cliente, tendo de fazer ativação.

18 Março

Bom dia, seguimos as instruções relativas a instalação em modo silencioso do novo pgweb,
e constatamos mesmo em modo /verysilent a exibição de telas de instalação inclusive pedindo
a tela para informar os dados para instalação do ponto de captura, tem alguma instrução diferente
que precisa ser executada para evitar a exibição destas telas?
estouprocurando aqui no formum mas ainda não localizei algo a respeito, pode ser que estaja fazendo a pergunta errada.
se tiver alguma instrução ou forum que fale a respeito, desde já agradeço.

15 Março

Muito obrigado pela ajuda, deu certo trocar ChaveAcesso por InfID.id, a nota foi cancelada perfeitamente.

15 Março

Acabei de testar mudar ChNFSe := ACBrNFSeX1.NotasFiscais.Items[0].NFSe.ChaveAcesso; para ChNFSe := ACBrNFSeX1.NotasFiscais.Items[0].NFSe.CodigoVerificacao; e o mesmo trouxe o valor certo do código de verificação, estou testando para ver porque a chave não esta trazendo.

15 Março

Ele entra na validação do if (ACBrNFSeX1.Configuracoes.Geral.Provedor = proInfisc), mas quando ele faz isso ChNFSe := ACBrNFSeX1.NotasFiscais.Items[0].NFSe.ChaveAcesso; o valor vem em branco

15 Março

Boa tarde Diego,

O trecho que estou com dificuldade seria:

Seria nesta linha em especifico -> ACBrNFSeX1.NotasFiscais.LoadFromString(NFSE_NOTASARQUIVO.Value, False),

Posso garantir que o mesmo XML que te enviei esta na variável NFSE_NOTASARQUIVO.Value.

with Dados do
    begin
      ACBrNFSeX1.NotasFiscais.Clear;
      //CARREGA O XML DA NOTA PELO BANCO
      NFSE_NOTAS.Close;
      NFSE_NOTAS.ParamByName('NUMERONOTA').Value := CodNota;
      NFSE_NOTAS.Open;
      //procura no banco, se não achar procura no arquivo .xml
      if not NFSE_NOTAS.IsEmpty then
        ACBrNFSeX1.NotasFiscais.LoadFromString(NFSE_NOTASARQUIVO.Value, False)
      else
        begin
          MessageBox(0, 'Não foi possível localizar o xml da nota.', 'Aviso', MB_OK+MB_ICONERROR);
          Exit;
        end;

      // Os Provedores da lista requerem que seja informado a chave e o código
      // de cancelamento
      if (ACBrNFSeX1.Configuracoes.Geral.Provedor = proInfisc) and
         (ACBrNFSeX1.Configuracoes.Geral.Versao <> ve201) then
      begin
        {
          A Chave é composta por:
           2 | N |Código IBGE para UF do prestador
          14 | N |CNPJ do prestador
           2 | N |Modelo da nota (valor 98 por padrão)
           3 | C |Série da nota (em maiúsculas, com zeros à direita)
           9 | N |Número da nota (com zeros à esquerda)
           9 | N |Código numérico aleatório
        }
        ChNFSe := ACBrNFSeX1.NotasFiscais.Items[0].NFSe.ChaveAcesso;
        // Codigo de Cancelamento
        // 1 - Erro de emissão
        // 2 - Serviço não concluido
        // 3 - RPS Cancelado na Emissão

        if not(InputQuery('Cancelar NFSe', 'Informe o Código de Cancelamento'+ #13+
                                       '1 - Erro de emissão'+ #13+
                                       '2 - Serviço não concluido'+ #13+
                                       '3 - RPS Cancelado na Emissão'+ #13+
                                       'Digite apenas o número:' +#13, Codigo)) then
          exit;
      end

15 Março

Bom dia Italo,

O xml é o retorno do webservice ao emitir a nota, o provedor é a INFISC, na cidade de Canoas / RS,

o momento que estou tentando usar o LoadFromString é antes de cancelar a nota, pois estou tentando ler o xml da nota validada,

para ai sim passar para o InfCancelamento todas as informações que ele precisa, e por fim executar o ACBrNFSeX1.CancelarNFSe(InfCancelamento),

mas como o LoadFromString não me retorna nada os valores do InfCancelamento estão em branco.

E para chegar a reposta do cancelamento estou usando a função ChecarResposta.

Mas desse jeito que eu faço funciona para todos os outros provedores que trabalho, mas sei que isso pode variar de provedor para provedor.

15 Março

Bom dia Juliomar...

Meu componente já esta configurado, até porque a emissão da nota já esta funcionando normalmente, mas quando eu tento fazer o cancelamento da nota, que a função LoadFromString não me retorna os valores do XML.

14 Março

Boa tarde...

Estou usando a função LoadFromString para carregar um xml para o componente ACBrNFSeX mas o mesmo não esta me retornando as variáveis de dentro do xml.

Teria alguma coisa que posso fazer?

xml exemplo.xml

30 Outubro, 2023

52 minutos atrás, Jhonlenon Ribeiro disse:

Coloquei as tag

<origComb>

<indImport>0</indImport>

<cUFOrig>31</cUFOrig>

<pOrig>0.0043</pOrig>

</origComb>

<origComb>

<indImport>0</indImport>

<cUFOrig>35</cUFOrig>

<pOrig>99.9957</pOrig>

</origComb>

<origComb>

<indImport>1</indImport>

<cUFOrig>31</cUFOrig>

<pOrig>47.7186</pOrig>

</origComb>

<origComb>

<indImport>1</indImport>

<cUFOrig>35</cUFOrig>

<pOrig>52.2814</pOrig>

</origComb>

</comb>

ai emitiu...agora fiquei sem entender....porque a empresa é do Simples Nacional e CSOSN 500

Estávamos com o mesmo problema em um cliente, no meu caso o cliente estava tentando emitir a nota como indFinal = 0 e gerando a rejeição, no nosso caso como foi uma venda para consumidor final, foi alterado o indFinal e emitido a nota. Pelo que percebi essa validação está sendo feita somente quando for material para revenda, mesmo sendo do Simples.

23 Outubro, 2023

Em 11/10/2023 at 15:49, Juliomar Marchetti disse:
troca
QRCode.Encoding  := qrUTF8NoBOM;

Resolvido, foi alterado para qrUTF8oBOM.
Pode fechar o tópico. Obrigado.

11 Outubro, 2023

Boa tarde pessoal,
Estou com um problema a alguns dias sobre a visualização do QRCode na tela, acaba que alguns bancos ele funciona e outros não. Gostaria de ver com vocês se teriam algum outro relato sobre isso ou se meu código estaria com algum parâmetro incorreto, segue o código a baixo:

procedure TDadosTefApi.ACBrTEFAPI1QuandoExibirQRCode(
  const DadosQRCode: String);
var
  QRCode: TDelphiZXingQRCode;
  QRCodeBitmap: TBitmap;
  Row, Column: Integer;
begin
  if not (StatusVenda in [stsAguardandoTEF, stsOperacaoTEF]) then
    StatusVenda := stsAguardandoTEF;

  if (TefConfiguracaoQRCODE.AsInteger = 4) then  // 4 - Imprimir
  begin
    if (DadosQRCode <> '') then
      ImprimirRelatorio( '</ce>'+
                         '<qrcode_largura>8</qrcode_largura>'+
                         '<qrcode>'+DadosQRCode+'</qrcode>'+
                         '</lf>');

    Exit;
  end;
  
  if (DadosQRCode = '') and (FProcessando.pQRCode.Visible) then
    begin
      FProcessando.pQRCode.Visible := False;
      FProcessando.Pix := False;
      FProcessando.AjustaTela;
      Application.ProcessMessages;
      Exit;
    end;

  QRCode := TDelphiZXingQRCode.Create;
  QRCodeBitmap := TBitmap.Create;
  try
    QRCode.Encoding  := qrUTF8NoBOM;
    QRCode.QuietZone := 2;
    QRCode.Data      := widestring(DadosQRCode);

    QRCodeBitmap.Width  := QRCode.Columns;
    QRCodeBitmap.Height := QRCode.Rows;

    for Row := 0 to QRCode.Rows - 1 do
    begin
      for Column := 0 to QRCode.Columns - 1 do
      begin
        if (QRCode.IsBlack[Row, Column]) then
          QRCodeBitmap.Canvas.Pixels[Column, Row] := clBlack
        else
          QRCodeBitmap.Canvas.Pixels[Column, Row] := clWhite;
      end;
    end;
    FProcessando.LabValorPix.Caption    := FormatFloat('R$ 0.00',DadosVendaBalcao.VendasVALOR1.AsCurrency);
    FProcessando.imgQRCode.Picture.Bitmap.Assign(QRCodeBitmap);
    FProcessando.pQRCode.Visible := True;
    FProcessando.Pix := True;
    FProcessando.AjustaTela;
  finally
    QRCode.Free;
    QRCodeBitmap.Free;
  end;

Abaixo segue uma foto do erro:

3 Fevereiro, 2023

18 horas atrás, Italo Giurizzato Junior disse:

Boa tarde Igor,

Favor atualizar os fontes, reinstale o ACBr e faça os testes usando esses 2 XML que você anexou.

Perfeito @Italo Giurizzato Junior, muito obrigado pela sua atenção neste caso.
Podemos encerrar o tópico...

2 Fevereiro, 2023

Em 31/01/2023 at 17:42, Italo Giurizzato Junior disse:

Boa tarde Igor,

Você poderia anexar o XML de uma nota para que eu possa fazer um teste?

Bom dia @Italo Giurizzato Junior posso sim, vou anexar os xmls.
Segue em anexo xml e pdf de antes e depois.

4323013515830700010856000000000000399-nfse.xml-nfse.xml 4323013515830700010856000000000000402-nfse.xml-nfse.xml NFS-e 399.pdf NFSE_402.pdf

30 Janeiro, 2023

Em 27/01/2023 at 15:16, Italo Giurizzato Junior disse:

Boa tarde Igor,

Por favor anexe as units alteradas para que possamos avaliar.

Desde já muito obrigado pela colaboração.

Bom dia @Italo Giurizzato Junior, como explicado a cima, hoje não temos mais esse arquivo alterado, devido a já ter atualizado os fontes do componente e sobrescrito as alterações, para que eu possa lhe encaminhar o arquivo, teria que refazer para poder lhe mandar. As alterações estão descritas no arquivo que anexei no primeiro post, sei que foge do padrão de controle dos fontes de vocês, mas se existisse a possibilidade de alteração com base no arquivo que mandei, seria de suma importância para nossos clientes.

27 Janeiro, 2023

Em 25/01/2023 at 15:02, Italo Giurizzato Junior disse:

Boa tarde Igor,

Todas essas informações constam no XML da nota?

Você chegou a alterar o componente?

Boa tarde @Italo Giurizzato Junior na NFS-e chegamos a alterar e cada vez que tinha que ser atualizado o componente acabávamos tendo que alterar de novo, porém agora com a migração para a NFS-eX optamos por não alterar mais o componente, porém os clientes estão nos questionando, devido a essas informações saírem se impresso o rps pelo site da prefeitura. Por este motivo gostaríamos de ver com vocês se existe a possibilidade de adicionar nos fontes esta alteração, claro, isso se for para agregar com o desenvolvimento do mesmo sem gerar problemas aos demais.

25 Janeiro, 2023

Bom dia colaboradores,

Gostaria de ver com vocês, a possibilidade de fazer uma alteração no modelo de DANFE Fortes, para o provedor Betha, vou encaminhar duas fotos em anexo dos itens, onde uma delas mostra como fica a alteração (igual o que é impresso no site da prefeitura) e a outra como está saindo hoje. Juntamente com as imagens vou anexar um arquivo com o possível código a ser analisado e adicionado ao componente, se viável.

Hoje utilizamos da NFS-eX juntamente com o Fortes para impressão.

Provedor: Betha

Acbr Reposição: 28239

@INSTRUCOES ALTERAR DANFSE FORTES.docx

Entrar

Sobre nós...

Blocks

Notes ACBrLibNFe

Fóruns

Downloads

Calendário

Posts postados por IgorAcertSoft

Sobre nós...

Informação Importante