Fernando Rodrigo

backup no 2.5 e restaure no 3.0 somente pq tem que atualizar o ods para o novo

foi feito o ajuste no cnab 240 do sicred. Ele estava gerando o campo SeuNumero errado, no local estava enviando o NumeroDocumento conforme abaixo, Foi so substituir os campos segmento P PadRight(NumeroDocumento, 25) + // 196 a 220 - Identificação do título na empresa PadRight(SeuNumero,25) + // 196 a 220 - Identificação do título na empresa ACBrBancoSicredi.pas

Alguem ja fez a integração no site de olho no imposto usando a API do proprio site https://deolhonoimposto.ibpt.org.br/Site/API#!//Produtos_Get

quando vc usa esse comando grant RDB$ADMIN TO SYSDBA , USUARIO CRIADO vc esta passando as permissões do SYSDBA para seu usuario, então seu usuario vai ter permissão normal em todas as tabelas

faço dessa forma e nunca tive problema, tanto para usuarios novos quanto para usuarios ja existentes

grant RDB$ADMIN TO SYSDBA , USUARIO CRIADO

tudo com problema, ate no site estava com problema

uso dessa forma e não esta dando erro, funciona normal, ja checou se não tem alguma atualização para fazer ?

pegar o codigo de barras var_CodigoBarras.text := .ACBrBoleto1.Banco.MontarCodigoBarras(ACBrBoleto1.ListadeBoletos[x]); LINHA_DIGITAVEL.Text := ACBrBoleto1.Banco.MontarLinhaDigitavel(var_CodigoBarras,ACBrBoleto1.ListadeBoletos[X]); onde x e o numero do boleto, exemplo se tiver 5 boletos o x será o numero sequencial dos boletos

caros amigos, tenho alguns clientes que utilizam windows 2008 server e no meu sistema tenho uma tela de configuração de impressoras, onde a nota fiscal é impressa em uma impressora, meu pedido de venda em outra e os meus boletos em outra impressora. quando o usuario entre no windows é criado uma sessão e as impressoras mudam de nome e como meu sistema na hora de imprimir pega a impressora ja cadastrada no sistema, ele não acha e não consegue fazer a impressão. no fastreport eu faço a impressão conforme abaixo PrepareReport(True); PrintOptions.Printer := 'ELGIN i9(USB); Nesse caso se o usuario conectar no TS ira criar a impressa dessa forma abaixo na imagem, dai o fastreport não encontra pq o nome dela mudou e foi adicionado um (redirected) Alguem ja passou por isso ? teria alguma solução ? Eu uso outro componente RDPrint da deltress e com ele não tenho esse problema, pq ele pega pelas iniciais da impressora

problema resolvido, no componente acbr não estava marcado para gerar TXT

Tente enviar com o codigo 84 with camposExtras.Add do begin camposExtras.Items[0].CampoExtra.codigo := 84; camposExtras.Items[0].CampoExtra.tipo := 'T'; camposExtras.Items[0].CampoExtra.valor := danfe; end;

fiz a alteração e estou passando conforme acima, mas mesmo assim, so aparece lote em processamento <c02_receita>100099</c02_receita><c25_detalhamentoReceita>000003</c25_detalhamentoReceita>

Boa tarde pessoal, Estou enviando as GNRE mas não estão processando o envio. O arquivo -env-lot.xml e gerado normal, mas não estou conseguindo fazer o envio para o site O XML esta correto pois ja fiz a validação dele no site e esta correto, como segue em anexo O retorno do componente esta vindo vazio ACBrGNRE1.WebServices.Retorno.RetWS Depois de toda configuração do componente com os dados estou enviando da forma abaixo if ACBrGNRE1.Enviar(False) then begin ACBrGNRE1.GuiasRetorno.Clear; ACBrGNRE1.GuiasRetorno.LoadFromFile(ACBrGNRE1.Configuracoes.Arquivos.PathArqTXT + ACBrGNRE1.WebServices.Retorno.GNRERetorno.resGuia[0].RepresentacaoNumerica + '-gnre.txt'); ACBrGNRE1.GuiasRetorno.Imprimir; ACBrGNRE1.GuiasRetorno.ImprimirPDF; end Se tiver algo de errado favor me avisar para eu fazer a correção. obs: o componente esta atualizado -env-lot.xml

bom dia, estou tendo outro problema que não é no monitor, vc preenche todos os dados e envia para o site e processa os arquivos, o componente não gera o arquivo TXT da guia, mas o xml esta normal e validado, se vc pegar o xml e validar ele no site esta correto, mas não é retornado o TXT para impressão

em goias, apesar de não usar o acbr para manifestação tambem não baixa na hora, leva mais de 1 hora para o sefaz disponilizar o xml na versao 3.1 era na hora, agora tem esse problema

o componente ja fazia isso sozinho e ja fazia a impressão, ele gera um txt que é a impressão da GNRE

isso mesmo Italo, tem todas as informações e foi processado o arquivo so que não retorna o arquivo para impressão, muito estranho isso, se vc pegar o arquivo e faz o teste la no site é gerado a guia normal , mas pelo componente não

boa noite a todos, estou tentando enviar uma guia de gnre para o estado do tocantins o arquivo e gerado e enviado normal, so que não é gerado o arquivo para impressão da guia depois de preencher todos os campos referente ao estado estou enviando da forma abaixo e para teste estou mostrando no log o retorno so que o numero do protocolo esta vindo zerado ACBrGNRE1.Enviar; memoLog.Lines.Add('Envio GNRE'); memoLog.Lines.Add('codigo: '+ IntToStr(ACBrGNRE1.WebServices.Retorno.codigo)); memoLog.Lines.Add('descricao: '+ ACBrGNRE1.WebServices.Retorno.descricao); memoLog.Lines.Add('Recibo: '+ ACBrGNRE1.WebServices.Retorno.numeroRecibo); memoLog.Lines.Add('Protocolo: '+ ACBrGNRE1.WebServices.Retorno.protocolo); ACBrGNRE1.GuiasRetorno.Clear; ACBrGNRE1.GuiasRetorno.LoadFromFile(ACBrGNRE1.Configuracoes.Arquivos.PathArqTXT + ACBrGNRE1.WebServices.Retorno.GNRERetorno.resGuia[0].RepresentacaoNumerica + '-gnre.txt'); ACBrGNRE1.GuiasRetorno.Imprimir; ACBrGNRE1.GuiasRetorno.ImprimirPDF; Vejam o arquivo em anexo que não tem erros nem nada, então deveria ser gerado o arquivo -gnre.txt 1857861091-ped-rec.xml 1857861091-pro-rec.xml 1857861091-rec.xml -env-lot.xml

Boa noite Rodrigo, essa alteração ja foi feita e homologada pelo banco, tente fazer um update do componente e dar uma checada

boa noite rchiarato, como esta o componente que vc esta criando ? alguma novidade ?

blz pessoal, muito grato, problema resolvido

Fiz a atualização do acbr e esta dando erro nessa função modFreteToStr Ela foi removida do acbr ? // ??? - Modalidade do frete function modFreteToStr(const t: TpcnModalidadeFrete): string; begin result := EnumeradoToStr(t, ['0', '1', '2', '3', '4', '9'], [mfContaEmitente, mfContaDestinatario, mfContaTerceiros, mfProprioRemetente, mfProprioDestinatario, mfSemFrete]); end;

blz consegui fazer a instalação valeu

veja o log do erro quando é instalado e marcado o gerador de relatorios por FastReport Embarcadero Delphi for Win32 compiler version 32.0 Copyright (c) 1983,2017 Embarcadero Technologies, Inc. ACBr_GNREGuiaFR.dpk(95) Fatal: E2202 Required package 'fs25' not found Compilation failure Erro ao compilar o pacote "ACBr_GNREGuiaFR.dpk". Abortando... Ocorreram erros na compilação dos pacotes.