andreiluis

Segue em anexo, além da alteração ref ao MostraSetup, adicionei diretivas de compilação para FMX e VCL na cláusula uses. ACBrDANFCeFortesFrA4.pas

Então, achei o problema, acho: ACBrDANFCeFortesFrA4.pas RLLayout.PrintDialog := FACBrNFeDANFCeFortesA4.MostraPreview; Aqui não deveria ser MostraSetup? Alterei e funcionou aqui.

Boa tarde, Segue trecho do meu código, mesmo setando MostraSetup como True, não traz o diálogo da impressora. Testei com o ACBrNFeDANFCeFortes "normal" e o diálogo é exibido corretamente. Não encontrei onde está a versão do componente, a data da unit ACBrDANFCeFortesFrA4.pas é de 04/05/2023. Tem mais alguma propriedade para setar para o diálogo ser exibido na DANFE em A4? dm.ACBrNFe1.DANFE := dm.ACBrNFeDANFCeFortesA41; dm.ACBrNFeDANFCeFortesA41.MostraSetup := True; dm.ACBrNFe1.DANFE.MostraSetup := True; dm.ACBrNFe1.NotasFiscais.Imprimir; Grato, Andrei

Bom dia, estou com um problema sério em dois clientes que atualizei recentemente meu sistema com versão mais recente do ACBr. Ambos utilizam certificado A3 com token, e em ambos tiveram os certificados excluídos do token! Um deles aconteceu duas vezes, na quinta passada, geraram outro certificado no mesmo token na segunda-feira, e hoje deu problema novamente! Tinha o Kaspersky instalado nessa máquina, desinstalei após o primeiro problema. Alguém já passou por algo assim? Alguma chance desse problema estar sendo causado pelo ACBr através do meu sistema? Estou utilizando a seguinte configuração: A máquina utiliza Win 10 64 bits, meu sistema foi desenvolvido em Delphi 2006 32 bits.

Segue pequena alteração no dfm e no pas para compatibilidade. ACBrBoletoFCFR.zip

Boa tarde, segue pequena atualização para tornar compatível com Fastreport 4 ACBrGNREGuiaFRDM.pas

Deixar registrado aqui nesse tópico a solução que encontrei:

Então..... depois de quebrar muito a cabeça, pesquisa daqui, pesquisa dali, resolvi abrir os .fr3 (o novo o trunk, e o meu que ainda funciona) no notepad++, e eis que são arquivos xml e no .fr3 do trunk identifiquei de cara as classes datasets, formats e variables que aparecem no print do post anterior (vide prints abaixo). Excluí essas seções, e copiei o PropData do xml que funcionava para o novo e..... voilá! As definições de vírus foram atualizadas. Ahh não, .... layout atualizado! Ufa! Facinho. Fazer mais alguns testes, mas parece que está tudo ok. Muito obrigado @BigWings e @Juliomar Marchetti pelo tempo e paciência.

Fiz em design e execução, mesmo problema, quando abre exibe a msg abaixo e os datasets ficam do jeito que mandei no outro post. Se eu fosse montar um layout do zero, como setaria os datasets dentro do FR3?

Claro, que tipo de "bocaberta" tu acha que sou? ..... Opa, não, tô usando o DANFE NFe. Ahhhhhh meu coraçaummmmm, é vergonha alheia que chama né? Muito obrigado @BigWings Aproveitando, quando abro o layout novo e aparece msg de erro, o layout até abre, mas não seta os datasets, a lista dos datasets está vazia, saberia me dizer onde eu ajusto isso?

Bem, seguindo a orientação do @BigWings no tópico abaixo e pelo tempo exíguo que tenho, vou ajustar o DANFE_NFCe que tenho aqui que está abrindo. Está quase tudo à contento, mas o maior problema é que não está aparecendo as informações de pagamento O dataset está setado para Pagamento na banda MasterData4 e no xml a tag pag está preenchida, porque não puxa os dados para o DANFE? Coloquei no rodapé do DANFE os campos ref ao pagamento, mas vem em branco / zerado. Onde os datasets do layout são alimentados?

Agora estou , qual teu nick?

Sim, daqui: https://github.com/fortesinformatica/fortesreport-ce/trunk

Fiz, mesmo erro. Mas mudou a qtde referenciada: D:\CompsD2006\FortesReportCE\Source\RLMetaVCL.pas(681) Error: E2072 Number of elements (13) differs from declaration (9) D:\CompsD2006\FortesReportCE\Source\RLMetaFile.pas(1068) Fatal: F2063 Could not compile used unit 'RLMetaVCL' Pelo que entendi tá sendo passado mais elementos do que está sendo declarado, então fiz o seguinte, deixei o {$IfDef DELPHI2007_UP} assim, e comentei 2 linhas do {$ifdef DELPHI2006} ficando assim: {$ifdef DELPHI2006} (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)), // psClear (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)), // psClear // (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)), // (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)), {$endif} Mandei instalar pelo instalador, passou desse ponto, mas choveu outros erros: D:\CompsD2006\FortesReportCE\Source\RLXLSXFileFormat.pas(779) Error: E2003 Undeclared identifier: 'RawByteString' D:\CompsD2006\FortesReportCE\Source\RLXLSXFileFormat.pas(782) Error: E2008 Incompatible types D:\CompsD2006\FortesReportCE\Source\RLXLSXFileFormat.pas(1397) Error: E2003 Undeclared identifier: 'RawByteString' D:\CompsD2006\FortesReportCE\Source\RLXLSXFileFormat.pas(1401) Error: E2008 Incompatible types D:\CompsD2006\FortesReportCE\Source\RLXLSXFileFormat.pas(1423) Error: E2008 Incompatible types D:\CompsD2006\FortesReportCE\Source\RLXLSXFileFormat.pas(1424) Error: E2008 Incompatible types D:\CompsD2006\FortesReportCE\Source\RLXLSXFileFormat.pas(1431) Error: E2003 Undeclared identifier: 'RawByteString' D:\CompsD2006\FortesReportCE\Source\RLXLSXFileFormat.pas(1438) Error: E2008 Incompatible types D:\CompsD2006\FortesReportCE\Source\RLXLSXFileFormat.pas(1441) Error: E2003 Undeclared identifier: 'UTF8ToUnicodeString' D:\CompsD2006\FortesReportCE\Source\RLXLSXFilter.pas(71) Fatal: F2063 Could not compile used unit '..\Source\RLXLSXFileFormat.pas'

Pois é, mas o arquivo está na pasta, [Pascal Fatal Error] RLReport.inc(64): F1026 File not found: 'D:\CompsD2006\FortesReportCE\Source\RLReport_jedi.inc'

Corrigindo uma informação que passei antes, a sequência do que fiz foi: - abri o frce.dpk e compilei, alterei a linha que o @BigWings sugeriu e compilei, deu erro na linha 64 do RLReport.inc: {$I RLReport_jedi.inc} - comentei a linha {$I RLReport_jedi.inc} e compilei, o erro volta na function CanvasGetPixels com o mesmo erro anterior [Pascal Error] RLMetaVCL.pas(681): E2072 Number of elements (7) differs from declaration (9)

Obrigado mais uma vez pelo seu tempo @BigWings. Alterei, mas o erro persiste. Aliás, desculpe, também não está encontrando o RLReport_jedi.inc, mas o arquivo está na pasta que aparece na msg, coloquei o caminho no Library path e no Browsing path, comentei a diretiva que inclui esse arquivo no RLReport.inc pois o Jedi instalado (mas não está atualizado), e aí que acusa o erro no CanvasGetPixels.

Obrigado pela disposição Juliomar. Sim, faz uma pá de tempo que não atualizo, justamente pelos mesmo erros de agora. O erro no instalador do Fortes é o abaixo, tentei pelo frceInstall e direto pelo dpr, o erro é na function CanvasGetPixels. [Pascal Error] RLMetaVCL.pas(681): E2072 Number of elements (7) differs from declaration (9) function CanvasGetPixels(ACanvas: TCanvas; X, Y: Integer): TColor; begin Result := ACanvas.Pixels[X, Y]; end; type TLinePattern = record Count: Byte; Lengths: array[0..5] of Byte; end; const LinePatterns: array[TPenStyle] of TLinePattern = ( (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)), // psSolid (Count: 2;Lengths: (3, 1, 0, 0, 0, 0)), // psDash (Count: 2;Lengths: (1, 1, 0, 0, 0, 0)), // psDot (Count: 4;Lengths: (2, 1, 1, 1, 0, 0)), // psDashDot (Count: 6;Lengths: (3, 1, 1, 1, 1, 1)), // psDashDotDot {$IfDef FPC} (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)), // psInsideFrame (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)), // psPattern (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)) // psClear {$Else} (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)), // psClear {$ifdef DELPHI2006} (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)), // psClear (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)), // psClear (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)), (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)), {$endif} (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)) // psInsideFrame {$IfDef DELPHI2007_UP}// delphi 2007 em diante , (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)), // psUserStyle (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)) // psAlternate {$endif} {$endif} );

Bom dia, ontem criei no fórum aberto o tópico abaixo e pra resumir, utilizo Delphi 2006 e FastReport 4 e não consigo abrir os layouts atuais das DANFES, dá erro que não encontra algumas classes. @BigWings respondeu que já há algum tempo o ACBr não é mais compatível com esta versão do FR. Bem, estou tentando instalar o FortesReport e está acusando um erro, estou pesquisando uma solução para isso, mas preciso emitir NFCe a partir do dia 29 e bateu o desespero. Existe alguma possibilidade de conseguir um layout FR atualizado que funcione no FR 4? Ou, outra possibilidade (mas que pelo prazo apertado é complicado) que pensei foi em utilizar o ACBrMonitorPLUS ou ACBrLib, nesses casos (acredito que só no ACBrMonitorPLUS, me corrijam se eu estiver errado) a impressão ocorre por fora do meu software e não vou abrir os layouts das DANFEs no meu software, é isso? Grato pela ajuda, Andrei

Boa tarde, utilizo o ACBrNFe e NFCe a bastante tempo, e já a um tempo estou utilizando um layout de DANFE defasado pois dá erro quando utilizo layouts atualizados. Utilizo o Delphi 2006, com Fast Report Professional 4.12. Quanto tempo abrir qqr layout (inclusive os Basic) recebo erros de Classe não encontrada Datasets, Formats e Variables. Tentei abrir no designer vários layouts, todos dão o mesmo erro, o layout até é aberto, mas claro, dá erro ao imprimir. Existe alguma solução para este conjunto Delphi 2006 + Fastreport Pro 4.12? Procurei no fórum e vi problemas parecidos que foi sugerido utilizar o Fortes, mas se pudesse evitar isso seria melhor, não tenho nenhum problema no uso dos WS, xml, etc, "somente" a impressão das DANFEs.

Obrigado pela ajuda Juliomar, Windows estava atualizado, ontem antes de postar aqui no fórum atualizei o ACBr (o problema era na minha máquina de desenvolvimento), então os dlls já estavam ok, reinstalei o pacote do C++ que você indicou e setei SSLType para TLS1.2 e deu certo. Abraço.

Obrigado pela resposta Juliomar, alterei para TLS 1.2, e alterei nas opções da internet do windows, continua com erro, abaixo prints do debug:

Boa tarde, estou tentando fazer testes na minha máquina e em ambiente de homologação dá erro até no webservice de consulta (print abaixo), em ambiente de produção a consulta funciona. Windows 7 Certificado A1 SSLType: LT_all SSLLib: libWinCrypt CryptLib: cryWinCrypt HTTPLib: httpWinHttp XMLSignLib: xsMsXML

Boa tarde, existe alguma rotina no ACBrNFe que atualize o XML da NFe com as informações de cancelamento?

Olá Daniel, sempre esteve como LibXML2, e começou a dar erro agora. Troquei para MsXML e deu certo. Mas porque o exemplo do ACBr funciona com LibXML2, e quando chamo o form do exemplo dentro do meu executável dá erro?