-
Total de ítens
26 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Posts postados por Daniel Sonda
-
-
Alguma novidade sobre esse problema?
Também estou recebendo o mesmo erro.
A empresa é de SC, mas o cliente é de MG.Vi que no post abaixo foi dado uma resposta, mas não ficou claro o motivo.
-
Diz que é preciso ter uma impressora padrão válida.
Estava gerando esse erro apenas em modo de debug com FastReport. Defini uma impressora padrão e parou de ocorrer.
-
Conforme o manual em anexo, o código de juros de mora para o banco Cresol no layout 240 segmento P é:
1 - (real ao dia)
2 - Percentual ao mêsAtualmente está enviando "0" para valor e "1" para percentual, conforme o trecho de código abaixo:
if (CodigoMora = '') then begin CodigoMora := '0'; if (ValorMoraJuros > 0) then // cjValorDia, cjTaxaMensal begin if (CodigoMoraJuros = cjValorDia) then CodigoMora := '0' else if (CodigoMoraJuros = cjTaxaMensal) then CodigoMora := '1'; end; end;
Quando o valor de juro de mora é maior que zero, ocorre o erro em anexo ao importar a remessa no sistema do banco.
-
- 3
-
-
-
Obrigado Daniel.
Encontrei o método EnviaString do Device.
- 1
-
Tenho o layout da etiqueta PPLA pronto num arquivo texto e gostaria de apenas preencher os campos (tags) com os dados necessários e enviar para a impressora usando o TACBrETQ.
Não encontrei nenhum método que possa ser passado uma string ou arquivo pronto a ser enviado para a impressora. Apenas os métodos específicos para imprimir texto, códigos de barras, linhas etc.
-
O manual citado no post abaixo acho que é o de pagamentos e não o de cobranças. A alteração que envia o código do convênio nas posições 33 a 52, talvez tenha sido feita equivocadamente usando o manual de pagamentos.
Também passei a ter problemas, com homologações rejeitadas, e agora não preencho mais a propriedade convênio quando for Sicoob.
-
Quando uso o FastReport para imprimir boletos e mudo a propriedade ModoThread do TACBrBoletoFCFR para True, o logotipo do banco não é carregado usando o evento OnObterLogo. Estou usando o evento OnObterLogo para usar imagens JPG que já tinha no meu app.
Descobri que o evento OnProgressStart do TfrxReport não é disparado no ModoThread. Alterei para o evento OnBeforePrint, pois ele dispara mesmo no ModoThread.
Também adicionei a linha "frxReport.EngineOptions.NewSilentMode := simReThrow" no ModoThread para levantar as exceções e facilitar a identificação dos bugs em produção.
Em anexo os arquivos alterados.
-
@econdotta por acaso você teve problemas na validação da Agência e Conta no retorno com layout CNAB 400?
Estou recebendo o erro "Agencia: 14800 \ Conta: 00001843 do arquivo não correspondem aos dados do Cedente!".
Na leitura do retorno 400, a agência é extraída assim:
rAgencia := trim(Copy(ARetorno[1], 18, 5));
rDigitoAgencia := trim(Copy(ARetorno[1], 22, 1));No arquivo, da posição 18 em diante tem "14800", onde 1480 é a agência e 0 é DV. Então, o correto seria:
rAgencia := trim(Copy(ARetorno[1], 18, 4));
rDigitoAgencia := trim(Copy(ARetorno[1], 22, 1)); -
Boa tarde.
Em anexo as units, alterada e criada, para suportar o indicador de pesagem citado.
Testei no cliente com a transmissão em modo contínuo, mas implementei tentando tratar um modo manual, que não acumule as strings de resposta.
-
Preciso integrar com o indicador de pesagem Weightech WT1000-LED, mas nenhuma das implementações atuais parece funcionar.
Alguém já fez isso e poderia me indicar o caminho? Ou será necessário implementar?
No log, as respostas variam de posição. O indicador está configurado para transmissão contínua, então parece que são concatenadas várias respostas, em posições diferentes.
Exemplo 1: 00025.6[CR][LF]0,00025.6,00000.0,00025.6[CR][LF]0,00025.6,00000.0,
Exemplo 2: [LF]0,00025.6,00000.0,00025.6[CR][LF]0,00025.6,00000.0,00025.6[CR]
-
Alguma previsão para a alteração ser commitada no trunk?
-
Na impressão do boleto usando Fast Report (unit ACBrBoletoFCFR), a logo do banco é carregada sempre pelo diretório de logos, através do método ImprimeLogoMarca.
Anexei a unit com as alterações para chamar o método CarregaLogo da TACBrBoletoFCClass no ImprimeLogoMarca, com o objetivo de disparar primeiro o evento OnObterLogo e, se não tratado, daí carregar a imagem do diretório de logos.
Olhei os fontes da impressão usando Fortes Report e lá é usado o CarregaLogo.
- 1
-
14 horas atrás, Juliomar Marchetti disse:
olá Daniel
veja que no método que trabalha no componente ele verifica se é o path de um arquivo ou o xml do fr3 que foi carregado no campo então por isso tu vai conseguir usar em um stream no banco
No método CarregaFastReportFile é feito isso mesmo.
Obrigado.
- 1
-
Analisei o projeto de exemplo, os fontes do componente e pesquisei no fórum, mas não ficou claro como editar a impressão do boleto usando o designer do FastReport.
Também, considerando que o layout editado (FR3) seja salvo no banco de dados, como posso carregá-lo para o componente usando Report.LoadFromStream? Analisei o método imprimir e parece ser necessário alterá-lo ou criar outro método passando a Stream por parâmetro.
-
Em 04/04/2018 at 16:15, Davi disse:
Eu ainda estou dando continuidade aos poucos, ja terminei sicred estou começando a colocar nos padrões TRUCK2 assim que tiver mais tempo posto as alterações novamente.
Bom dia Davi.
Como está o suporte à Sicredi? Homologado? Em produção?
Poderia postar os fontes? Posso ajudar nos ajustes e conversão pro trunk2.
-
20 minutos atrás, Daniel Sonda disse:
Apliquei as alterações nos fontes originais do projeto.
Houve correção também na identação da unit ACBrEFDBloco_C_Class.pas.
Agora com os arquivos corretos. Me desculpem.
- 1
-
3 horas atrás, Juliomar Marchetti disse:
Não é possível aplicar seu código tem em todos os locais que vi um DadosAdicionais que foge ao padrão do componente e não tem esse procedimento nos códigos enviados.
Apliquei as alterações nos fontes originais do projeto.
Houve correção também na identação da unit ACBrEFDBloco_C_Class.pas.
-
-
Boa tarde.
Mesmo que o registro D100 use uma lista diferente de tipos para o campo do indicador do frete no registro C100, creio que seja possível usar o mesmo tipo de dados e apenas mapear os valores ao gerar o conteúdo do arquivo.
Não vou postar as units porque uso uma versão modificada do projeto, com propriedades adicionais. Então, pra reduzir os conflitos, vou postar apenas o código modificado em cada unit.
ACBrEFDBlocos.pas
/// Indicador do tipo do frete
TACBrIndFrt = (tfPorContaEmitente, // 0 - Contratação do Frete por conta do Remetente (CIF)
tfPorContaDestinatario, // 1 - Contratação do Frete por conta do Destinatário (FOB)
tfPorContaTerceiros, // 2 - Contratação do Frete por conta de Terceiros
tfProprioPorContaRemetente, // 3 - Transporte Próprio por conta do Remetente
tfProprioPorContaDestinatario, // 4 - Transporte Próprio por conta do Destinatário
tfSemCobrancaFrete, // 9 - Sem Ocorrência de Transporte
tfNenhum // Preencher vazio
);ACBrEFDBloco_D_Class.pas
if DT_INI < EncodeDate(2012,07,01) then
begin
case IND_FRT of
tfPorContaTerceiros: strIND_FRT := '0';
tfPorContaEmitente, tfProprioPorContaRemetente: strIND_FRT := '1';
tfPorContaDestinatario, tfProprioPorContaDestinatario: strIND_FRT := '2';
tfSemCobrancaFrete: strIND_FRT := '9';
tfNenhum: strIND_FRT := '';
end
end
else
begin
case IND_FRT of
tfPorContaEmitente, tfProprioPorContaRemetente: strIND_FRT := '0';
tfPorContaDestinatario, tfProprioPorContaDestinatario: strIND_FRT := '1';
tfPorContaTerceiros: strIND_FRT := '2';
tfSemCobrancaFrete: strIND_FRT := '9';
tfNenhum: strIND_FRT := '';
end;
end;ACBrEFDBloco_C_Class.pas
if DT_INI < EncodeDate(2012,01,01) then
begin
case IND_FRT of
tfPorContaTerceiros: strIND_FRT := '0';
tfPorContaEmitente, tfProprioPorContaRemetente: strIND_FRT := '1';
tfPorContaDestinatario, tfProprioPorContaDestinatario: strIND_FRT := '2';
tfSemCobrancaFrete: strIND_FRT := '9';
tfNenhum: strIND_FRT := '';
end
end
else if DT_INI < EncodeDate(2018,01,01) then
begin
case IND_FRT of
tfPorContaEmitente, tfProprioPorContaRemetente: strIND_FRT := '0';
tfPorContaDestinatario, tfProprioPorContaDestinatario: strIND_FRT := '1';
tfPorContaTerceiros: strIND_FRT := '2';
tfSemCobrancaFrete: strIND_FRT := '9';
tfNenhum: strIND_FRT := '';
end;
end
else
begin
case IND_FRT of
tfPorContaEmitente: strIND_FRT := '0';
tfPorContaDestinatario: strIND_FRT := '1';
tfPorContaTerceiros: strIND_FRT := '2';
tfProprioPorContaRemetente: strIND_FRT := '3';
tfProprioPorContaDestinatario: strIND_FRT := '4';
tfSemCobrancaFrete: strIND_FRT := '9';
tfNenhum: strIND_FRT := '';
end;
end; -
Descobri a solução no issue tracker da JEDI: http://issuetracker.delphi-jedi.org/view.php?id=6511
Desmarque as opções abaixo, que são relacionadas com o C++:
- Copy HPP files to configured HPP directory
- Check HPP files- 3
-
Consulta Cadastro - 257-Rejeicao: Solicitante nao habilitado para emissao da NF-e - MG Minas Gerais
em ACBrNFe
Postado
No portal da NFe não consta mais a contingência de MG, mas a consulta de cadastro de um CPF continua retornando:
cStat>257</cStat>
<xMotivo>Rejeicao: Solicitante nao habilitado para emissao da NF-e</xMotivo>