RicardoVoigt

Boa tarde, botei a mão na massa aqui e implementei a propriedade "QuebraLinhaLetra" conforme descrevi acima... OBS 1: correção, serve também para o InfCpl (e não InfSupl) - Informações Complementares. OBS 2: não mexi no formato Paisagem. OBS 3: se aprovado, com essa propriedade, também poderá ser criado o respectivo parâmetro no ACBrMonitorPLUS. OBS 4: se não quiser fazer nenhuma quebra de linha, basta informar #0 na propriedade. Att Ricardo ACBrNFeDANFeRL.pas ACBrNFeDANFeRLClass.pas ACBrNFeDANFeRLRetrato.pas

Bom dia, não caberia uma propriedade no componente (ACBrNFeDANFeRL) para indicar o caractere que define quebras de linha? com valor padrão contendo o caractere ";" (ponto-e-virgula) Acho que a mesma propriedade poderia servir para os principais campos, como xProd, InfAdProd e InfSupl. Não estudei muito a fundo ainda essa parte, não tenho certeza como o componente se comunica com as outras classes do DANFe em Fortes, mas imagino que esta propriedade teria de ser verificada (estar visível) nestes métodos: TfrlDANFeRL.InsereLinhas e TfrlDANFeRLRetrato.Observacoes Att Ricardo

Olá, acho que a dica que vc precisa é usar esta propriedade ACBrNFeDANFeRL1.QuebraLinhaEmDetalhamentoEspecifico := True; define ela com TRUE que vai ser feita a quebra de linha entre o xProd e o InfAdProd. Att Ricardo

Bom dia, acho que precisa de um IF pra testar se (infAdProd <> ''), pois assim vc vai inserir quebra de linha em todos os itens, mesmo naqueles sem informações adicionais... (Imagino que essa quebra de linha #13+#10 pode gerar uma linha a mais em branco na impressão...) Att Ricardo

Boa tarde, caso alguém puder testar a emissão/geração do XML de uma NFC-e a partir de um arquivo INI no ACBrMonitorPLUS, segue em anexo os 2 arquivos (DoACBrNFeUnit.pas e ACBrMonitor1.pas) para análise da alteração que eu sugeri na resposta acima, tratando o troco na emissão da NFC-e. Enfim, é só uma sugestão "paliativa" enquanto não sai a tag do troco no XML, eu vi que tem outros usuários pedindo isso no fórum, espero que seja útil. Att Ricardo gambi-troco.zip

bom dia, enquanto o XML não tiver uma tag específica para o troco, ACHO que o ACBrMonitorPLUS não terá suporte ao valor do troco, nem passando como INI... Já os componentes de impressão da NFC-e já permitem vc informar um valor de troco na forma de uma propriedade, mas daí precisa do componente dentro da sua aplicação (se usar Delphi ou Lazarus). Impossível de fazer não é, mas seria meio que uma "gambiarra" pra fazer funcionar esse parâmetro ser recebido pelo INI e tratado pelo ACBrMonitorPLUS. Na tela em anexo aparece o trecho de código no ACBrMonitorPLUS onde ACHO que poderia ser feito esse ajuste. Seria necessário (não sei o impacto que daria) trocar a ordem da chamada das procedures ConfiguraDANFe e GerarIniNFe, para que o campo do troco fosse lido do INI (retornando com uma var) e passado como parâmetro para o ConfiguraDANFe, onde o valor do troco seria alimentado no DANFCeFortes ou no PostPrinter... Enfim, é só uma ideia, alguém teria de botar a mão e testar OBS: Eu não uso a emissão com arquivo INI. Att Ricardo

Bom dia, eu fiquei curioso com essa frase Dá algum erro específico na compilação? Att Ricardo

Ola, dica: vc tem que gerar um CSC diferente para cada ambiente (Homologação e Produção). Att Ricardo

Se não me engano, esta consulta só é possível pelo próprio emitente, usando o certificado digital, diretamente no portal da respectiva SEFAZ. Talvez esta consulta também seja possível, por terceiros, utilizando a tag autXML (Autorização para obter XML) nos arquivos XML das NF-e. Imagino que esta opção seja usada geralmente para informar o CPF ou CNPJ do contador ou escritório contábil, para que estes também possam consultar ou baixar os arquivos XML, mas também utilizando seus respectivos certificados digitais. Att Ricardo

Bom dia, Até onde me lembro, o Delphi (tipo TDateTime) só trabalha com "hora do relógio", entre 00:00 e 23:59... Uma vez fiz uma coisa parecida, onde convertia e somava sempre em minutos... Acho que era assim, segue um exemplo: 45:40 + 04:17 (quarenta e cinco horas e quarenta minutos MAIS quatro horas e dezessete minutos) 45 * 60 = 2700 mais 40 minutos: 2700 + 40 = 2740 4 * 60 = 240 mais 17 minutos: 257 2740 + 257 = 2997 (total de minutos) 2997 div 60 = 49 (divisão inteira = 49 horas) 2997 mod 60 = 57 (resto da divisão por 60 = 57 minutos) resultado final = 49:57 (quarenta e nove horas e cinquenta e sete minutos) Att Ricardo

Bom dia, por acaso ele (MonitorPLUS) não está em execução? Att Ricardo

Bom dia, só por curiosidade, novas placas a partir de 2017. http://g1.globo.com/carros/noticia/2016/05/placas-do-mercosul-serao-exigidas-em-veiculos-ate-o-final-de-2020.html Att Ricardo

NCM_I = inicial NCM_F = final Att Ricardo

deve informar vBC nos itens e no total da nota... somatório dos itens deve bater com o total da nota...

Pergunta que não quer calar: e o ACBr ? Ops: achei um tópico perguntando sobre a instalação do ACBr no Delphi Starter... Att Ricardo

Não sei se alguém já tentou essa ideia no Lazarus... Segundo esse wiki (http://wiki.freepascal.org/Project_Groups) dá pra instalar uma package para habilitar o recurso "project group" no Lazarus... Pelo teste que fiz aqui, ele serviria apenas para compilar todas as packages numa tacada só, acho que não ajudaria muito na instalação... Att Ricardo

Olá, Acho que seria interessante comentar qual marca e modelo de impressora vc está usando... Att Ricardo

oi, outra pergunta que é interessante comentar no fórum quando abrir um tópico com problema de impressão, qual marca e modelo de impressora que vc está usando para imprimir? E qual a largura da bobina (papel) que está usando? (Eu sou meio suspeito de falar sobre a impressão de NFC-e com o DANFCeFortes, pois fiz um ajuste aqui na minha cópia em função de um cliente que imprime numa impressora laser, com folhas A4 cortadas ao meio...) Enfim, se vc tiver coragem de testar, segue meu arquivo ACBrDANFCeFortesFr.pas em anexo para vc atualizar ai (recompilar a package ACBr_NFeDnafeRL.dpk) e testar. Basicamente, eu implementei estas 3 propriedades: MargensAjustaveis : Boolean; // define o rlVenda.AdjustableMargins PapelAltura : Integer; // define o rlVenda.PageSetup.PapelHeight em mm PapelLargura : Integer; // define o rlVenda.PageSetup.PageWidth em mm Faça um teste, boa sorte... (obs: Pra desfazer, é só usar a opção "revert" do SVN - cuidado que hoje é sexta-feira ) Att Ricardo ACBrDANFCeFortesFr.pas

Bom dia, qual componente usa? fortes, fast ou escpos? Att Ricardo

Opa.. mais uma ideia para tentar verificar seu problema: tente isolar o trecho de código da impressão, pra tentar identificar se não é alguma configuração que pode estar definida apenas no seu projeto. crie um novo projeto, coloque apenas estes 4 componentes: 1 TButton, 1 OpenDialog, 1 ACBRNFe e 1 ACBrNFeDANFCeFortes. e execute apenas este trecho de código no onclick do botão... (OBS: o OpenDialog é pra selecionar o XML) if OpenDialog1.Execute then begin ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromFile(OpenDialog1.FileName); ACBrNFeDANFCeFortes1.ACBrNFe := ACBrNFe1; //ACBrNFeDANFCeFortes1.CasasDecimais.Formato := tdetMascara; //ACBrNFeDANFCeFortes1.CasasDecimais._Mask_qCom := '###,###,###,##0.000'; ACBrNFeDANFCeFortes1.CasasDecimais.Formato := tdetInteger; ACBrNFeDANFCeFortes1.CasasDecimais._qCom := 4; ACBrNFeDANFCeFortes1.MostrarPreview := true; ACBrNFeDANFCeFortes1.ImprimirDANFE(); end; Att Ricardo

Bom dia, qual a versão do seu Delphi? Esse caso tá me lembrando do tempo que trabalhava com QuickReport... dependendo do que tu fazia nos "beforeprint", no preview aparecia uma coisa, e no papel saia outra... Vou dar mais uma sugestão/palpite: tente atualizar (update) a pasta do FORTESREPORT-CE Att Ricardo

solivam, o problema relatado neste tópico é nos acentos que foram perdidos ao gerar uma NF-e (arquivo XML) a partir de um arquivo INI. o problema que vc relatou está na impressão do DANFE. São informações fixas no layout do relatório. Veja este outro tópico recente, com o mesmo problema ao gerar o PDF do DANFE. Aparentemente, os 2 problemas tem a ver com essas "tranqueiras" de ansi, unicode, utf-8 e tal... Att Ricardo

Cara, realmente, eu não prestei muita atenção nas telas e perguntei coisa q já estava ali... mas notei alguns detalhes, acho que seu fonte do ACBR NÃO está atualizado... no método "TACBrNFeDANFCeFortesFr.rlbDetItemBeforePrint" está faltando código ali na tua tela... Na minha cópia aqui tem o tratamento para inserir o infAdProd no meio... Ainda não dá pra ter certeza se é esse o problema... E a sugestão que eu dei antes foi para definir a propriedade Formato para tdetInteger. Att Ricardo

Opa, no meu teste aqui estava MARCADA. Att Ricardo

Eu usei o ACBrMonitorPLUS pra testar, o parâmetro para indicar a qtde de casas decimais está funcionando corretamente... vc esta usando o componente diretamente na sua aplicação? Além do _qCom, tente configurar também esta outra propriedade: ACBrNFeDANFCeFortes1.CasasDecimais.Formato := tdetInteger; Att Ricardo