BigWings

Versões mais antigas do Delphi não tem suporte a PNG. Tente usar uma imagem em bmp ou jpg.

Apenas inclua um componente RLPreviewSetup e configure a propriedade EnableButtons.

@douglaswf @Leandro Vignoto Enviei ajuste para o repositório, rev. 16555. Favor atualizar os fontes e testar novamente.

Realmente parece ter um erro na rotina. Pode anexar o XML para testes?

Veja que configurou a versão para ve200...

Sim.

Estranho, esse é erro de validação por falta de assinatura no XML. Está usando a opção "Consultar carregando XML" do demo? Que saiba a consulta não faz validação do arquivo.

Qual o erro?

Houve uma alteração recente que acredito resolver essa situação: function TNFeR.LerXml: Boolean; var ok: Boolean; i, j, k, nItem: Integer; Arquivo, Itens, ItensTemp, VersaoInfNFe, NumItem: AnsiString; Aspas, tagPag: String; begin Leitor.Grupo := Leitor.Arquivo; { ****** Remoção do NameSpace do XML ****** XML baixados dos sites de algumas SEFAZ constuma ter ocorrências do NameSpace em grupos diversos não previstos no MOC. Essas ocorrências acabam prejudicando a leitura correta do XML. } Leitor.Grupo := StringReplace(Leitor.Grupo, ' xmlns="http://www.portalfiscal.inf.br/nfe"', '', [rfReplaceAll]); Está com os fontes atualizados?

Estava comparando com o schemas do repositório, estão realmente diferentes. Tente informar o código com 9 dígitos, p.ex. 000118879.

Sua mensagem de erro é diferente, diz que o valor informado 118879 não é um valor válido para o campo. Olhando os schemas do provedor SJP, não faz sentido, deveria aceitar qualquer string com comprimento entre 1 e 20.

Provavelmente não é esse o XML onde ocorreu o erro, já que está inclusive autorizado pela SEFAZ.

Pela mensagem de erro, está faltando informar o campo CodigoTributacaoMunicipio.

Você pode usar o visualizador que a Caixa disponibiliza. http://www.caixa.gov.br/empresa/pagamentos-recebimentos/recebimentos/nova-cobranca-bancaria/Paginas/default.aspx Pelo que vi esse campo não é mesmo disponibilizado no retorno. Se você quer saber a data do pagamento do boleto o correto é usar DataOcorrencia conforme o Felipe sugeriu.

30/12/1899 é data em branco, valor 0 no tipo TDateTime. Significa que a data da baixa não está sendo retornada ou capturada. Veja no arquivo de retorno se a informação existe.

Subi as alterações para o repositório. Favor atualizar os fontes e efetuar os testes.

Você vai mostrar essas tags em campos próprios no DANFE? A instrução atual é informar eles nas informações complementares.

A diferença nas imagens está na modalidade da conta (01 / 00) e no número da parcela (001 / 002). Veja se está passando esses dados corretamente.

Tem um erro no código do exemplo do ACBrNFe:

O erro indicado nesse arquivo é por falta do preenchimento do DV da agência/conta (específico para esse banco): ACBrBoleto1.Cedente.DigitoVerificadorAgenciaConta := '0'; Algumas cooperativas pedem que se informe 0, outras que se informe em branco.

CSOSN só existe para o CRT = 1, então você pode validar por essa tag.

Para NFCe o ideal é usar o modo síncrono (terceiro parâmetro do método Enviar) onde a resposta do processamento vem na mesma chamada, sem a necessidade de se fazer a consulta da situação do lote como ocorre no modo assíncrono. Estude o demo do ACBrNFe para saber como capturar os retornos nos dois modos.

2.2 - Permaneça no assunto - Quando tiver uma dúvida diferente do assunto no tópico, poste em novo tópico. Não use algo equivalente a "aproveitando o gancho... [dúvida não relacionada com o tópico aqui]". Favor leia as regras do fórum. 6.3 - Mostre respeito pelo modo de escrever. Escreva de modo claro, gramaticalmente e semanticamente correto. Não escreva TUDO EM MAIÚSCULAS. Isso é lido como se estivesse gritando e é considerado rude. Favor leia as regras do fórum.

6.3 - Mostre respeito pelo modo de escrever. Escreva de modo claro, gramaticalmente e semanticamente correto. Não escreva TUDO EM MAIÚSCULAS. Isso é lido como se estivesse gritando e é considerado rude. Favor leia as regras do fórum. O segundo parâmetro do método ACBrNFe.Enviar indica se deve imprimir o DANFE ou não. Então basta usar ACBrNFe1.Enviar(nLote, False);

Por o processo ser síncrono e não haver a consulta do retorno nada é preenchido em ACBrCTe.WebServices.Retorno. Você pode usar: cdsCadMasterCSTAT.AsInteger := CTE.WebServices.Enviar.CTeRetornoOS.cStat; cdsCadMasterSTATUS.AsString := CTE.WebServices.Enviar.CTeRetornoOS.xMotivo; cdsCadMasterPROTOCOLO.AsString := CTE.WebServices.Enviar.CTeRetornoOS.protCTe.nProt;