tborges

Estou com esse problema, mas usando o componente acbrNF na versão 1.4.7.394. Já atualizei tudo agora pouco e o componente gera o xml com algumas tags, mesmo sem eu as ter preenchido e isso gera rejeição.

Ok, não devo ter me atentado a isso, como iniciei essa conversa lá no discord acabou passando batido já que já tinha explicado tudo lá.

Bom dia, Alexandre. Nós utilizamos a acbrlib em VB.Net, não usamos Delphi. Tentamos de todas as formas utilizar um PNG da transparente e não conseguimos. Nossa solução (com um custo alto), foi salvar a imagem que esta no banco de dados em uma pasta temporaria com o fundo branco e ai passar essa imagem para a lib Call Financeira.Bancos.InitACBoleto(dtConta.Rows(0), ACBoleto) If ACBoleto Is Nothing Then Exit Sub If Not File.Exists(Application.StartupPath.ToString() + $"\\Temp\\Logo{DBNumber(FGrade.SelectedRows(0).Cells("PVendaNr").FormattedValue)}.JPG") Then Using cmd As New SqlCommand($"Select Logotipo from PVenda where PVendaNr={DBNumber(FGrade.SelectedRows(0).Cells("PVendaNr").FormattedValue)}", Global.ETL.Global.SQLConnect) Using reader As SqlDataReader = cmd.ExecuteReader() While reader.Read If Not reader("LogoTipo").ToString = "" Then Dim bytes = CType(reader("LogoTipo"), Byte()) Using ms As New MemoryStream(bytes) Dim originalImage As Image = Image.FromStream(ms) Dim newImage As New Bitmap(originalImage.Width, originalImage.Height) Using g As Graphics = Graphics.FromImage(newImage) g.Clear(Color.White) ' Preencher o fundo com branco g.DrawImage(originalImage, 0, 0, originalImage.Width, originalImage.Height) End Using Dim jpgEncoder As Imaging.ImageCodecInfo = Imaging.ImageCodecInfo.GetImageDecoders().FirstOrDefault(Function(codec) codec.FormatID = Imaging.ImageFormat.Jpeg.Guid) Dim encoderParameters As New Imaging.EncoderParameters(1) encoderParameters.Param(0) = New Imaging.EncoderParameter(Imaging.Encoder.Quality, 75L) Dim filePath As String = Application.StartupPath.ToString() & "\\Temp\\Logo" & FGrade.SelectedRows(0).Cells("PVendaNr").Value & ".JPG" newImage.Save(filePath, jpgEncoder, encoderParameters) End Using ' Dim I As Image = CType(((New ImageConverter()).ConvertFrom(bytes)), Bitmap) ' I.Save(Application.StartupPath.ToString() + "\\Temp\\Logo" & FGrade.SelectedRows(0).Cells("PVendaNr").Value & ".JPG", Imaging.ImageFormat.Jpeg) End If End While End Using End Using End If ACBoleto.Config.Impressao.DirLogo = Application.StartupPath.ToString() + "\Recursos\Boletos"

Utilizamos a dll acbrNfe, eu gostaria de editar a propriedade detMedicamentos como diz no manual, não usamos o .Ini para setar as propriedade, usamos tudo como [MEMORY] O Manual diz o seguinte: Define quais campos das informações do medicamento devem ser exibidas. Valores possíveis: dm_nLote, dm_qLote, dm_dFab, dm_dVal, dm_vPMC os valores deverá ser informado dentro de colchetes e separados por virgula. Ex.: [dm_nLote,dm_qLote,dm_dFab,dm_dVal] Apesar de preencher a propriedade conforme orientado no Discord, continua imprimindo todas as tags no DANFE: ACBrNFe.Config.DANFe.NFe.DetMedicamentos = DetMedicamentos.dm_nLote | DetMedicamentos.dm_dFab; Conforme Orientado pelo Diego Folieni, estou abrindo esse tópico para analise do problema, quando não utilizado o .ini para setar as propriedades Diego: "Fiz um teste aqui utilizando com a ACBrLib.ini e de fato, mesmo passando mais de uma opção, ele só ficou com um valor no arquivo ACBrLib.ini; Será necessário uma análise mais aprofundada do caso, realizando debug"

Nós podemos customizar esses modelos que utilizamos com o fast report? caso sim, poderia me dar uma orientação? nos arquivos de exemplo não há nada sobre isso.

Isso é para o logo do Banco certo? estou falando do logotipo da empresa

Julio, não localizei uma forma de informar diretamente a imagem via componente e nem uma forma do png não estar com fundo preto. Em conversa com o Daniel, ele disse que isso ainda esta em analise. Se já existe, poderia me ajudar como fazer?

Aproveitando o tópico, seria possivel criar uma propriedade do tipo Image no boleto, para que ao invés de eu informar o caminho de um arquivo salvo na pasta local, já possa passar diretamente o valor Byte salvo no banco de dados? Hoje nosso sistema armazena a logo direto no banco de dados e preciso salvar essa imagem em uma pasta temp antes de emitir um boleto para preencher a propriedade ArquivoLogoEmp

Ao tentar imprimir um boleto, onde a logo é uma imagem .png com fundo transparante, o componente esta imprimindo ela com fundo preto. Conforme orientado via discord, poderiam analisar esse ceário e verificar a possibilidade de ser impresso normalmente?

Boa tarde, Julio. O problema do OrientcaoBanco quando utilizado com memory permanece. Eu atualizei todas as dlls ontem pela manha, no entanto, apesr de baixar o arquivo zip ACBrLibBoleto-1.2.1.309, dentro dele, na pasta bin\Cdecl a dll ACBrBoleto32.ddl (que utilizamos), esta na versão 1.2.1.308 conforme imagem anexada. Poderia checar por favor?

Seguem as imagens novamente. Não, as informações no post não resultam nenhuma solução. Principalmente pelo fato de só ocorrer quando declaramos da seguinte forma: Public ACBoleto As New ACBrLib.Boleto.ACBrBoleto("[Memory]") e precisamos que se mantenha assim para não gerar o arquivo .ini, nós populamos os dados via classe.

@Daniel InfoCotidiano estou tendo o mesmo problema com relação ao campo OrientacaoBanco. O erro só ocorre se declaramos a lib usando [Memory]: Public ACBoleto As New ACBrLib.Boleto.ACBrBoleto("[Memory]") a imagem mostra com e sem, sem ‘Memory’ OrientacaoBanco inicializa normal. Se eu removo o Memory, o componente gera o arquivo .ini, o que não queremos que ocorra. @Daniel InfoCotidiano já testamos não informar o campo OrientacaoBanco, mas o erro segue o mesmo

Muitíssimo obrigado por apontar um descuido meu. Tudo funcionando, pode encerrar este post. Tenha um bom dia.

Junior bom dia. AGENFe.Configuracao(ACNFe, dtEmpresa.Rows(0), dhEmi, CInt(Controls("NFeAmbiente").Text)) Dim FNFe As String = IO.File.ReadAllText("C:\Temp\NFe.xml") ACNFe.CarregarXML(FNFe) ACNFe.Assinar() ACNFe.Validar() ACNFe.Imprimir() Este código nada acontece, passa 'batido' por todas as linhas e nada ocorre. Em anexo o xml carregado. NFe.xml

Ok...Na 2ª eu carrego xmls válidos e inválidos para analisar o comportamento e reporto o ocorrido. Bom final de semana...