Everton Garcia

Juliomar, Pelo menos em relação a layout, não estou tendo mais problemas com o PVA. []´s Everton Garcia

Bom dia pessoal! Implementei o contador dos blocos E311, E312 e E313. []´s Everton Garcia ACBrSpedFiscal.pas

Bom dia pessoal! Como ninguém se manifestou sobre os registros acima citados, implementei-os. Segue anexo as units para análise. Implementados os registros E300, E310, E311, E312, E313, E316; Adicionado em ACBrEFDBlocos.pas o tipo TACBrMovimentoDIFAL; []´s Everton Garcia ACBrEFDBloco_E_Class.pas ACBrEFDBlocos.pas ACBrEFDBloco_E.pas

Olá DenerBuzato! Sim, já tentei debugar. O erro ocorre na linha 346 da unit ACBrBoletoFCFR. Result := DmBoleto.frxReport.PrepareReport Como não tenho os fontes do Fast, não tenho como debugar este método. []´s Everton Garcia

Olá pessoal! Estou tentando imprimir um boleto ou gerar um arquivo PDF utilizando o Fast e estou recebendo o erro que consta na imagem anexa. Estou usando o ACBrBoletoDemo. Apenas modifiquei o ACBrBoletoFC para utilizar o Fast. Ao clicar em imprimir ou Gerar PDF ocorre a mensagem anexa. Alguém que utiliza Fast poderia me dar um auxílio? As versões instaladas do Fast são as disponibilizadas no site da Embarcadero para usuários registrados, e a versão do Delphi é a Seattle. []´s Everton Garcia

Olá pessoal! Gostaria de saber se já estão sendo implementados os registros definidos no Ato COTEPE/ICMS 44. https://www.confaz.fazenda.gov.br/legislacao/atos/atos_cotepe/2015/ato-cotepe-icms-44-15 []´s Everton Garcia

Olá Daniel. Apaguei a pasta Serial e baixei novamente. Agora deu certo. Estranho. Não havia nenhuma alteração na pasta. O importante é que eu estava enganado e que está resolvido. Obrigado pela dica.

Bom dia! Observei que a propriedade "TagsNaoSuportadas" (inserida na revisão 10303) não consta na revisão 10333, ocasionando erro ao instalar o pacote ACBrSAT (unit ACBrSATExtratoESCPOS, linha 438). Fontes atualizados com a revisão 10539. Windows 10. Delphi Seattle. []´s Everton Garcia

Olá Daniel e Regys. A demora ocorre ao tentar capturar o CNPJ de um certificado A3 Token. Não testei fora de domínio como citado no tópico que mencionei acima. Porém, não quis arriscar em liberar uma versão do sistema com essa possibilidade de demora. Por isso, resolvi remover a rotina que extraia o CNPJ do certificado e também a validação que era feita entre o CNPJ do emissor e do certificado. Vou tentar fazer o teste em um ambiente sem domínio para ver se o problema ocorre. []´s Everton Garcia

Boa noite. A minha intenção foi reportar um erro no código, independente da propriedade ser preenchida ou não, de forma correta. Att.

Segue a unit alterada. []´s Everton Garcia ACBrBancoSantander.pas

Olá pessoal! Enviamos um arquivo de remessa (240) contendo Data de Protesto, e o banco recusou, acusando erro nos dados informados nas posições 222-223 (Dias Protesto), 224-224 (Código de Baixa/Devolução) e 228-229 (Código da Moeda). Analisando a rotina do ACBrSantander, no método GerarRegistroTransacao240, identifiquei que a variável Instrucao1, responsável por receber a instrução de protesto, não estava sendo alimentada, ficando vazia e consequentemente mexendo nos campos posteriores. A rotina estava verificando a variável Instrucao2 (conforme código abaixo): {Instruções} if (DataProtesto <> 0) and (DataProtesto > Vencimento) then begin if (Trim(Instrucao2) = '') then {*********************** AQUI ********************} Instrucao2 := '1' // Protestar Dias Corridos {*********************** AQUI ********************} else begin if not MatchText(Instrucao2, ['0', '1', '2', '3', '9']) then {*********************** AQUI ********************} raise Exception.Create('Código de protesto informado incorretamente!'); end; // Calcular os dias para protesto sDiasProtesto := PadLeft(IntToStr(Trunc(DataProtesto) - Trunc(Vencimento)), 2, '0'); end else begin Instrucao1 := '0'; // Não protestar SDiasProtesto := '00'; end; Pra resolver, bastou trocarmos Instrucao2 por Instrucao1 nas linhas marcadas com {*********************** AQUI ********************}. []´s Everton Garcia

Olá Juliana! Caso o endereço do sacado não esteja completo (UF vazia), o arquivo será invalidado por não conter 240 ou 400 caracteres. Todos os demais campos de endereçamento possuem este tratamento nos métodos citados. Por isso a minha sugestão. []´s Everton.

Boa tarde pessoal! Gostaria de sugerir a seguinte alteração nos métodos GerarRegistroTransacao240 e GerarRegistroTransacao400 da unit ACBrBancoSantander: Substituir: Sacado.UF Por: PadRight(Sacado.UF, 2) []´s Everton.

Olá Professor! Este erro ocorreu em alguns clientes nossos também. Porém, de forma esporádica. O cliente reportou e pedimos que ele tentasse transmitir a nota fiscal minutos mais tarde. Dez minutos depois entramos em contato com ele e ele havia conseguido transmitir. P.S: A versão instalada foi compilada com Trunk2. []´s Everton Garcia