Cleonir

Em anexo 2 PDF, 1 com o Stretch false que esta assim hoje, e o outro com o Stretch True que deveria ser para se ajustar ao tamanho do TRLImage. Com_Stretch_False.pdf Com_Stretch_True.pdf

Teria que setar true no Stretch do componente imgLogo no ACBrDANFCeFortesFr, para a logo se ajustar de acordo com o tamanho do TRLImage.

Na procedure AdicionarMensagensPadroes esta assim: if ValorDesconto <> 0 then begin if DataDesconto <> 0 then AStringList.Add(ACBrStr('Conceder desconto de ' + FormatCurr('R$ #,##0.00',ValorDesconto) + ' para pagamento até ' + FormatDateTime('dd/mm/yyyy',DataDesconto))) else AStringList.Add(ACBrStr('Conceder desconto de ' + FormatCurr('R$ #,##0.00',ValorDesconto) + ' por dia de antecipaçao')); end; Se tiver a data limite para desconto vai ficar como se fosse valor fixo, se não tiver vai ficar valor por dia de antecipação, esta correto isso? E se for cnab 240 não teria que fazer verificações no campo Código do desconto se é Valor fixo ou valor por dia de antecipação?

Duvida... No CNAB 400 o desconto é valor por dia de antecipação ou valor fixo. Não encontrei em nenhum manual explicando esse tipo de situação. Por exemplo no manual do banco do Bradesco tem os campos (Data Limite P/Concessão de Desconto e Valor do Desconto), não tem nenhum campo identificando se é valor fixo ou valor por dia de antecipação.

Estou precisando de uma ajuda com os boletos para o Banco Sicoob e Santander. Tenho alguns clientes que fazem Adiantamento do valor de boletos no banco. Ao fazer o Adiantamento do valor de boletos no banco do Sicoob, segundo o pessoal do banco no CNAB 240 no arquivo de retorno vai vir a ocorrência 05(Transferência de Carteira/Baixa) nas posições 17 a 17 do Segmento T do arquivo de retorno. E se caso vencer o titulo e o cliente não pagou o titulo viria no retorno a ocorrência 04(Transferência de Carteira/Entrada). Olhando ACBrBancoBancoob percebi que não esta tendo tratamento quanto a estas ocorrências que vem no arquivo de retorno. Eu não quis mexer por que no cnab 400 são outras ocorrências aí precisa ter muito cuidado, se alguém quiser me dar uma mão para implementar isso ficarei grato. Também precisaria isso no banco Santander. Vou ter que tirar um tempo para a analisar o manual do Banco Santander para ver como que funciona este caso de Antecipação de Recebíveis, mas se alguém conseguir me adiantar alguma coisa...

Blza. Obrigado.

Ops, eu tinha esquecido de colocar o tipo de papel para o A4. ACBrCTeDACTeRLRetrato.dfm ACBrCTeDACTeRLRetrato.pas

Fiz um ajuste no ACBrCTeDACTeRLRetrato para imprimir as informações dos tributos federais quando for CTeOS, A contabilidade de alguns clientes meus estão cobrando isso. Não sei se fiz da melhor forma. Favor conferirem e se possível subir para o SVN... Teria que ver também a possiblidade de imprimir os Documentos Referenciados se caso tiver. ACBrCTeDACTeRLRetrato.dfm ACBrCTeDACTeRLRetrato.pas

Também estou com essa rejeição. Transporte de pessoas, tomador é pessoa jurídica mas é não contribuinte. O contador do Emitente do CteOS diz que não pode ir o valor de INSS por que é não contribuinte; Será que nesse caso gerando A tag com valor zerado resolveria?

Boa tarde Juliomar. O problema é que não tenho o Lazarus para compilar e postar o .lfm ACBrCTeDAEventoRLRetrato.dfm ACBrCTeDAEventoRLRetrato.pas

Não esta salvando os Soap. Não certo como funciona. A rejeição que forcei acontece na validação nos Schemas, não sei se mesmo assim teria que salvar os Soap. Coloquei um valor menor que permitido no campo NroRegEstadual. Mas enfim não esta salvando os Soap.

Na impressão do evento do CTeOS no FortesReport, não esta saindo os dados do tomador. É necessário fazer uma verificação no Modelo Se for CTeOS os dados do tomador é preciso pegar assim FCTe.toma.xNome por exemplo. Fiz um case para resolver isso ficando assim no BeforePrint da Banda do Tomador... case FCTe.Ide.modelo of 57://CTe begin if FCTe.Ide.Toma4.xNome = '' then begin case FCTe.Ide.Toma03.Toma of tmRemetente: begin rllRazaoTomador.Caption := FCTe.Rem.xNome; rllCNPJTomador.Caption := FormatarCNPJouCPF(FCTe.Rem.CNPJCPF); rllEnderecoTomador.Caption := FCTe.Rem.EnderReme.xLgr + ', ' + FCTe.Rem.EnderReme.nro; rllBairroTomador.Caption := FCTe.Rem.EnderReme.xBairro; rllCEPTomador.Caption := FormatarCEP(FCTe.Rem.EnderReme.CEP); rllMunTomador.Caption := FCTe.Rem.EnderReme.xMun + ' - ' + FCTe.Rem.EnderReme.UF; rllFoneTomador.Caption := FormatarFone(FCTe.Rem.fone); rllInscEstTomador.Caption := FCTe.Rem.IE; end; tmExpedidor: begin rllRazaoTomador.Caption := FCTe.Exped.xNome; rllCNPJTomador.Caption := FormatarCNPJouCPF(FCTe.Exped.CNPJCPF); rllEnderecoTomador.Caption := FCTe.Exped.EnderExped.xLgr + ', ' + FCTe.Exped.EnderExped.nro; rllBairroTomador.Caption := FCTe.Exped.EnderExped.xBairro; rllCEPTomador.Caption := FormatarCEP(FCTe.Exped.EnderExped.CEP); rllMunTomador.Caption := FCTe.Exped.EnderExped.xMun + ' - ' + FCTe.Exped.EnderExped.UF; rllFoneTomador.Caption := FormatarFone(FCTe.Exped.fone); rllInscEstTomador.Caption := FCTe.Exped.IE; end; tmRecebedor: begin rllRazaoTomador.Caption := FCTe.Receb.xNome; rllCNPJTomador.Caption := FormatarCNPJouCPF(FCTe.Receb.CNPJCPF); rllEnderecoTomador.Caption := FCTe.Receb.EnderReceb.xLgr + ', ' + FCTe.Receb.EnderReceb.nro; rllBairroTomador.Caption := FCTe.Receb.EnderReceb.xBairro; rllCEPTomador.Caption := FormatarCEP(FCTe.Receb.EnderReceb.CEP); rllMunTomador.Caption := FCTe.Receb.EnderReceb.xMun + ' - ' + FCTe.Receb.EnderReceb.UF; rllFoneTomador.Caption := FormatarFone(FCTe.Receb.fone); rllInscEstTomador.Caption := FCTe.Receb.IE; end; tmDestinatario: begin rllRazaoTomador.Caption := FCTe.Dest.xNome; rllCNPJTomador.Caption := FormatarCNPJouCPF(FCTe.Dest.CNPJCPF); rllEnderecoTomador.Caption := FCTe.Dest.EnderDest.xLgr + ', ' + FCTe.Dest.EnderDest.nro; rllBairroTomador.Caption := FCTe.Dest.EnderDest.xBairro; rllCEPTomador.Caption := FormatarCEP(FCTe.Dest.EnderDest.CEP); rllMunTomador.Caption := FCTe.Dest.EnderDest.xMun + ' - ' + FCTe.Dest.EnderDest.UF; rllFoneTomador.Caption := FormatarFone(FCTe.Dest.fone); rllInscEstTomador.Caption := FCTe.Dest.IE; end; end; end else begin rllRazaoTomador.Caption := FCTe.Ide.Toma4.xNome; rllCNPJTomador.Caption := FormatarCNPJouCPF(FCTe.Ide.Toma4.CNPJCPF); rllEnderecoTomador.Caption := FCTe.Ide.Toma4.EnderToma.xLgr + ', ' + FCTe.Ide.Toma4.EnderToma.nro; rllBairroTomador.Caption := FCTe.Ide.Toma4.EnderToma.xBairro; rllCEPTomador.Caption := FormatarCEP(FCTe.Ide.Toma4.EnderToma.CEP); rllMunTomador.Caption := FCTe.Ide.Toma4.EnderToma.xMun + ' - ' + FCTe.Ide.Toma4.EnderToma.UF; rllFoneTomador.Caption := FormatarFone(FCTe.Ide.Toma4.fone); rllInscEstTomador.Caption := FCTe.Ide.Toma4.IE; end; end; 67://CTeOS begin rllRazaoTomador.Caption := FCTe.toma.xNome; rllCNPJTomador.Caption := FormatarCNPJouCPF(FCTe.toma.CNPJCPF); rllEnderecoTomador.Caption := FCTe.toma.EnderToma.xLgr + ', ' + FCTe.toma.EnderToma.nro; rllBairroTomador.Caption := FCTe.toma.EnderToma.xBairro; rllCEPTomador.Caption := FormatarCEP(FCTe.toma.EnderToma.CEP); rllMunTomador.Caption := FCTe.toma.EnderToma.xMun + ' - ' + FCTe.toma.EnderToma.UF; rllFoneTomador.Caption := FormatarFone(FCTe.toma.fone); rllInscEstTomador.Caption := FCTe.toma.IE; end; end;

Bom dia Italo, Faca vazio também.

E se acontece alguma rejeição como que se pega o xml de de retorno? se acontece rejeição fica vazio ACBrCTe.WebServices.Enviar.RetWS.

Obrigado Italo. Era isso mesmo.

Eu também não consegui pegar o xml de retorno! no cte eu pego o xml de retorno do RetWS. CTe1.WebServices.Retorno.RetWS; mas no CTeOS vem vazio RetWS.

Sugestão... Na impressão dos documentos de transporte anterior no FortesReport, não seria possível criar uma outra banda, podendo assim mostrar também os dados do emitente do documento de transporte anterior, assim como foi feito no FastReport. tenho alguns clientes solicitando isso, para resolver isso tive que configurar o FastReport para eles, mas eu não queria mais utilizar o FastReport. Mas enfim é só uma sugestão de melhoria, se alguém puder me ajudar com isso. por que para fazer isso acredito que vai dar bastante trabalho por que vai mudar que mudar bastante os componentes de posição e é preciso ter muito cuidado com isso para não dar problemas nos diferentes tipos de cte, e estou meio sem tempo no momento.

Era isso mesmo. Valeu, obrigado...

Olhando melhor aqui percebi que esta na posição correta a chave, somente quando abro o xml com o navegador que aparece a chave antes da versão, mas enfim não é este o problema então. O que pode ser essa Rejeição?

uma diferença que vi comparando os xmls no xml antigo era assim <infMDFe versao="3.00" Id="MDFe42170781581324000162580250000117361000001303"> primeiro a versão depois o id nesse que estou enviando agora esta assim <infMDFe Id="MDFe42170981581324000162580250000117421000001359" versao="3.00"> primeiro o id depois a versão. Será que pode ser esse o problema?

Atualizei o acbr hoje e começou a dar rejeição no envio do mdfe. Atualizei os shemas também. Rejeição:Falha no Schema XML do MDF-e. Peguei o xml que estou gerando para enviar e coloquei no validador do mdfe e retornou assim: Parser Xml: Ok Tipo de Mensagem: MDF-e Schema: Não foi possível identificar a versão da mensagem. O que pode ter de errado? dei uma olhada mas não consegui descobrir onde esta o problema.

Em anexo imagem da impressão do CTe para você entender melhor o que alterei. E quando for CTeOS vai ficar assim.

Mas as alterações que fiz foi justamente para alterar a posição e do tamanho do campo Indicador do cte globalizado, e do campo Observação do cte globalizado, antes só tinha espaço para imprimir uma palavra da observação e a observação do cte globalizado pode conter 250 caracteres se não me engano. em anexo lfm para o lazarus que estava faltando. ACBrCTeDACTeRLRetrato.lfm

Não trabalho com o Lazarus, não sei certo como funciona! é só postar o arquivo lfm ou é preciso ajustar também? E quais são as alterações desnecessárias no dfm?