tborges

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

Sim, mas a NF-e não existe. Conforme exemplo, imagine que você tem um romaneio de carga com 50 Pedidos de Venda, ao mandar faturar, é gerado um lote e enviados todos juntos para a SEFAZ, que responde o lote inteiro. Nós checamos a resposta de cada um dos pedidos e fazemos as atualizações necessárias dentro do nosso ERP, no entanto, a lista populada na lb da acbr ainda constam os 50 pedidos. Imagine que 5 desses pedidos foram rejeitados. Ao mandar imprimir, o componente da ACBR gera 50 DANFES. O usuário imprime e despacha a carga, já tentou fazer um usuário prestar atenção nas informações detalhadas? Ou seja, o sistema o esta induzindo ao erro, o correto seria imprimir DANFE apenas das 45 NF-es autorizadas. O componente já tem uma propriedade que define que somente xmls de notas autorizadas sejam salvos, o mesmo deveria valer para todo o processo. Vamos além, ao mandar enviar os DANFEs+XMLs por e-mail, é enviado tudo que esta dentro da lista. Porque eu enviaria a um cliente um DANFE rejeitado? então deveria ser enviado apenas o que esta efetivamente autorizado. Hoje estamos limpando a lista do componente e repopulando apenas com as NF-es aprovadas, mas veja que isso tem um custo computacional desnecessário uma vez que bastaria ter um filtro na lista que foi utilizada para enviar as notas para a SEFAZ.

Boa tarde, Pessoal. Poderiam me ajudar com uma dúvida em relação a impressão dos DANFEs? Quando que eu mando enviar as NF-es para a SEFAZ, faço isso em lotes e dento desse lote podem ter várias notas, imaginemos que tenho 10 notas enviadas para a SEFAZ. No meu código faço o seguinte: Resposta = ACNFe.Enviar(CInt(Lote), False, False, True) Depois disso, pego a resposta e populo o status de cada uma das NF-es que estavam dentro do lote, algumas podem estar rejeitadas, então digamos que das 10 NFs envidas, 3 a SEFAZ rejeitou, mas elas já estão na lista do componente. Quando mando imprimir os danfes com o código abaixo, acabam sendo gerados 10 DANFES, inclusive das NFes que foram rejeitados. Existe uma propriedade que eu diga para não imprimir as NFs rejeitadas ou uma forma q excluir agumas NFs da lista do componente? Isso causa problema pq o usuario acha q a nf-e esta ok pq gerou danfe (Eles não leem q esta rejeitado) If Not ACNFe Is Nothing Then ACNFe.Config.DANFe.TipoDANFE = dgr.Cells("ImpressaoDANFE").FormattedValue ACNFe.Imprimir("", 1, "", True) Else MsgBox("Não existe nenhum documento para ser Impresso.", vbInformation, "Faturamento") End If

@Daniel InfoCotidiano só para te deixar sem nenhuma resposta, estamos com uma prioridade aqui na frente, tento atualizar e te dar uma resposta final até o final do dia. Obrigado.

enviado

O mesmo ocorre na geração do CNAB, apesar de existirem 5 boletos, o cnab é gerado apenas com 1

@Daniel InfoCotidiano eu gero o array de forma dinamica. Olhe esse trecho de código Dim Titulo As ACBrLib.Boleto.Titulo Dim Titulos As New List(Of ACBrLib.Boleto.Titulo) For Each dr As DataRow In DTTitulo.Rows boTF = dr("Titulo.NossoNumero") > 0 And dr("A.BancoNr") = drConta("Banco.Numero") 'True - mantém mesmo número do boleto If Not boTF Then nNossoNumero += 1 dr("Titulo.NossoNumero") = nNossoNumero End If 'aqui prepara valores de colunas e passar corrreto para a function abaixo If dr.Table.Columns("Mensagem") IsNot Nothing Then dr("Mensagem") = RemoveAcentos(dr("Mensagem").ToString) Else dr("Titulo.Mensagem") = RemoveAcentos(dr("Titulo.Mensagem").ToString) End If Titulo = New ACBrLib.Boleto.Titulo Call DataRowObject(dr, Titulo, "Titulo.", True) Call DataRowObject(dr, Titulo.Sacado, "Sacado.", True) Call DataRowObject(dr, Titulo.Sacado.Avalista, "Sacado.Avalista.", True) Titulos.Add(Titulo) Se você olhar o código fonte do ACBRLib.Boleto vera que ele seta index = 0, por isso meu array fica sempre [Titulo] namespace ACBrLib.Boleto { public sealed class Titulo { [IniIgnore] public int Index { get; internal set; } = 0; O que eu fiz, editei o código e compilei uma nova dll com public int Index { get; set; } dentro do meu for, eu contei titulo.index, então agora chega um array da forma como você pediu (mas só depois que eu mexi no código fonte de vocês) No entanto, apesar de agora ele passar no ACBoleto.IncluirTitulos(Titulos.ToArray) e como você pode ver na imagem acima, tem 5 boletos dentro do array, quando chamo ACBoleto.Imprimir(), ele imprime apenas 1 boleto (o primeiro item do array) Repito, todo esse código funciona há 3 anos, ele só deu problema agora que atualizei a dll de vocês visando tentar resolver um erro no arquivo retorno do C6 bank, se não tivesse erro na versão 0.2.0.156, eu nem estaria perdendo tempo tentando refazer o que já esta rodando. Alguma coisa foi alterada nesse sentido? Apenas mais um detalhe, mesmo index sendo = 0 como estava antes, IncluirTitulos deveria estar contando eles e o erro de item com a mesma chave não deveria ocorrer public void IncluirTitulos(params Titulo[] titulos) { ACBrIniFile aCBrIniFile = new ACBrIniFile(); for (int i = 0; i < titulos.Length; i++) { titulos[i].WriteToIni(aCBrIniFile); titulos[i].Index = i++; } IncluirTitulos(aCBrIniFile.ToString()); }

Olá, bom dia. Estou com a versão 0.2.0.267 e nela da esse erro descrito, anteriormente eu estava com a versão 0.2.0.156 e nela o erro não ocorre, se eu voltar ela, tudo funciona normalmente. Eu gero os boletos usando as classes titulos, monto um array com todos os boletos que o usuário deseja imprimir e chamo IncluirTitulos passando esse array: ACBoleto.LimparLista() ACBoleto.IncluirTitulos(Titulos.ToArray) ACBoleto.Imprimir() O problema ocorre com qualquer banco. Abaixo um exemplo de 3 titulos dentro do array que estou passando para IncluirTitulos, se eu voltar a versão 0.2.0.156 isso funciona normal: {[Titulo] Aceite=1 TipoDiasProtesto=1 TipoDiasNegativacao=0 TipoImpressao=1 TipoDesconto=0 TipoDesconto2=0 CarteiraEnvio=0 MultaValorFixo=0 LocalPagamento=PAGÁVEL EM QUALQUER AGÊNCIA BANCÁRIA MESMO APÓS O VENCIMENTO Vencimento=31/01/2023 DataDocumento=20/12/2023 DataProcessamento=20/12/2023 DataMoraJuros=01/02/2023 DataMulta=01/02/2023 DiasDeProtesto=0 CodigoNegativacao=3 DiasDeNegativacao=0 DataBaixa=15/02/2023 DataLimitePagto=15/02/2023 NumeroDocumento=2023-56511/1 Especie=RC Carteira=RG NossoNumero=6 ValorDocumento=6951 EspecieMod=R$ Parcela=1 TotalParcelas=0 ValorAbatimento=0,00 ValorDesconto=0 ValorMoraJuros=20,853 ValorIOF=0,00 ValorOutrasDespesas=0,00 SeuNumero=1082 PercentualMulta=2 CodigoMora=1 CodigoMoraJuros=0 ArquivoLogoEmp=C:\Projetos\AGE\01. Dev\bin\x86\Debug\Temp\logo1.PNG Verso=0 OcorrenciaOriginal.TipoOcorrencia=0 Sacado.Pessoa=1 Sacado.NomeSacado=ESTRA PRODUTOS ALIMENTÍCIOS LTDA [email protected] Sacado.CNPJCPF=82957335150134 Sacado.Logradouro=RUA ARISTÍDES DE OLIVEIRA PATRÍCIO Sacado.Numero=34 Sacado.Bairro=JARDIM ANA EMILIA Sacado.Cidade=TAUBATE Sacado.UF=SP Sacado.CEP=12070-230 Sacado.SacadoAvalista.Pessoa=0 Sacado.SacadoAvalista.CNPJCPF=00000000000000 Mensagem= } {[Titulo] Aceite=1 TipoDiasProtesto=1 TipoDiasNegativacao=0 TipoImpressao=1 TipoDesconto=0 TipoDesconto2=0 CarteiraEnvio=0 MultaValorFixo=1 LocalPagamento=PAGÁVEL EM QUALQUER AGÊNCIA BANCÁRIA MESMO APÓS O VENCIMENTO Vencimento=31/01/2023 DataDocumento=20/12/2023 DataProcessamento=20/12/2023 DataMoraJuros=01/02/2023 DataMulta=01/02/2023 DiasDeProtesto=0 CodigoNegativacao=3 DiasDeNegativacao=0 DataBaixa=15/02/2023 DataLimitePagto=15/02/2023 NumeroDocumento=2023-5515/1 Especie=RC Carteira=RG NossoNumero=7 ValorDocumento=500 EspecieMod=R$ Parcela=1 TotalParcelas=0 ValorAbatimento=0,00 ValorDesconto=0 ValorMoraJuros=1,5 ValorIOF=0,00 ValorOutrasDespesas=0,00 SeuNumero=1078 PercentualMulta=2 CodigoMora=1 CodigoMoraJuros=0 ArquivoLogoEmp=C:\Projetos\AGE\01. Dev\bin\x86\Debug\Temp\logo1.PNG Verso=0 OcorrenciaOriginal.TipoOcorrencia=0 Sacado.Pessoa=1 Sacado.NomeSacado=ESTRA PRODUTOS ALIMENTÍCIOS LTDA [email protected] Sacado.CNPJCPF=82957335150134 Sacado.Logradouro=RUA ARISTÍDES DE OLIVEIRA PATRÍCIO Sacado.Numero=34 Sacado.Bairro=JARDIM ANA EMILIA Sacado.Cidade=TAUBATE Sacado.UF=SP Sacado.CEP=12070-230 Sacado.SacadoAvalista.Pessoa=0 Sacado.SacadoAvalista.CNPJCPF=00000000000000 Mensagem= } {[Titulo] Aceite=1 TipoDiasProtesto=1 TipoDiasNegativacao=0 TipoImpressao=1 TipoDesconto=0 TipoDesconto2=0 CarteiraEnvio=0 MultaValorFixo=1 LocalPagamento=PAGÁVEL EM QUALQUER AGÊNCIA BANCÁRIA MESMO APÓS O VENCIMENTO Vencimento=31/01/2023 DataDocumento=20/12/2023 DataProcessamento=20/12/2023 DataMoraJuros=01/02/2023 DataMulta=01/02/2023 DiasDeProtesto=0 CodigoNegativacao=3 DiasDeNegativacao=0 DataBaixa=15/02/2023 DataLimitePagto=15/02/2023 NumeroDocumento=2023-505450/1 Especie=RC Carteira=RG NossoNumero=8 ValorDocumento=600 EspecieMod=R$ Parcela=1 TotalParcelas=0 ValorAbatimento=0,00 ValorDesconto=0 ValorMoraJuros=1,8 ValorIOF=0,00 ValorOutrasDespesas=0,00 SeuNumero=1075 PercentualMulta=2 CodigoMora=1 CodigoMoraJuros=0 ArquivoLogoEmp=C:\Projetos\AGE\01. Dev\bin\x86\Debug\Temp\logo1.PNG Verso=0 OcorrenciaOriginal.TipoOcorrencia=0 Sacado.Pessoa=1 Sacado.NomeSacado=ESTRA PRODUTOS ALIMENTÍCIOS LTDA [email protected] Sacado.CNPJCPF=82957335150134 Sacado.Logradouro=RUA ARISTÍDES DE OLIVEIRA PATRÍCIO Sacado.Numero=34 Sacado.Bairro=JARDIM ANA EMILIA Sacado.Cidade=TAUBATE Sacado.UF=SP Sacado.CEP=12070-230 Sacado.SacadoAvalista.Pessoa=0 Sacado.SacadoAvalista.CNPJCPF=00000000000000 Mensagem= }

boa noite pessoal, eu uso o acbrlib boleto já algum tempo e td esta rodando normal...Fui atualizar as dlls e não consigo mais gerar mais de um boleto junto. ele me retorna a msg "Já foi adicionado um item com a mesma chave." qnd chamo IncluirTitulos ACBoleto.LimparLista() CBoleto.IncluirTitulos(Titulos.ToArray) CBoleto.Imprimir() alguém tem ideia do que pode ser? se eu não atualizar a dll td funciona normalmente td esta preenchido corretamente, nenhum SeNumero, NossoNumero ou NumeroDocumento se repete

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...

O que esta dizendo é que jamais poderei usar um código como o abaixo.(Pegar um xml do em algum lugar e carregar na Lib) Isso mesmo? tenho que tomar o caminho de NFE_CarregarXML(), apesar de os exemplos nas Demos estarem .CarregarXML(str)! Desculpe pela falta de conhecimento sobre os dois métodos, mas preciso saber alguns 'porques', para que eu possa montar um Classe de Negócio sobre a ACBrLIB com a maior performance possível. E .CarregarXML(stringxml) seria uma 'baita' mão na roda, em um sufoco no Cliente, poderia editar o XML, carrega-lo e enviar a SEFAZ. Grato pela atenção, e código abaixo jamais? Dim ACNFe As New ACBrNFe ACNFe.Config(.......) Dim StrIni As String = IO.File.ReadAllText("C:\Temp\NFe.xml") ACNFe.CarregarXML(StrIni)

Junior quanto a dll corrigida, agora esta gerando correto a section ICMS, parabéns e vlw. [rastro001001] qLote=0 dFab=01/01/0001 dVal=01/01/0001 [ICMS001] orig=0 CSOSN=201 modBCST=4 pMVAST=33,3300 vBCST=287,99 pICMSST=18,0000 vICMSST=12,96 pCredSN=0,0000 vCredICMSSN=0,00

Junior aproveitando olhe este outro problema. Se antes disso você carregar um ini como abaixo, ai ele permite carregar o xml, mas no meu caso eu preciso é que carregue o xml. Dim StrIni As String = IO.File.ReadAllText("C:\Temp\1302.txt") ACNFe.CarregarINI(StrIni) Dim X As String = ACNFe.ObterIni(0) NFe.xml

OK, vamos testar pela manhã e lhe dou um feedback. Obrigado.

Estou obtendo a seguinte validação de regra de negócio de uma NFe. se eu continuar e mandar validar obtenho mais esta mensagem. o String Ini da Classe gerada é este...local onde obtive o string ' ACNFe.CarregarNota(ACNotaFiscal)' [Produto001] cProd=025 cEAN=17898955143022 cEANTrib=17898955143022 xProd=Achocolatado EstraFoods Pacote 200 Gr NCM=18069000 CEST=1700600 CFOP=5.401 uCom=PCT qCom=400,000000 vUnCom=0,540000 vProd=216,00 uTrib=PCT qTrib=400,000000 vUnTrib=0,540000 vFrete=0,000000 vSeg=0,000000 vDesc=0 indTot=1 nItemPed=1 pDevol=0 vIPIDevol=0 vTotTrib=12,96 indEscala=S [rastro001001] qLote=0 dFab=01/01/0001 dVal=01/01/0001 [ICMS002] orig=0 CSOSN=201 modBCST=4 pMVAST=33,3300 vBCST=287,99 pICMSST=18,0000 vICMSST=12,96 pCredSN=0,0000 vCredICMSSN=0,00 [Total] vBC=0 vICMS=0 vICMSDeson=0 vBCST=287,99 vST=12,96 vProd=216,000000 vFrete=0,000000 vSeg=0,000000 vDesc=0,000000 vII=0 vPIS=0 vCOFINS=0 vOutro=0,000000 vNF=228,960000 vFCP=0,00 vFCPST=0,00 vFCPSTRet=0 vIPI=0 vTotTrib=12,96 vIPIDevol=0 O Codigo que gerou a Classe ACNotaFiscal = New ACBrLib.NFe.NotaFiscal é este Se observarem a Section [ICMS002] é a unica incorreta, se eu editar a string para [ICMS001] gravar um arquivo texto, chamar via CarregarINI, não ocorre nenhuma mensagem. Minha pergunta é : No codigo acima esta faltando alguma linha para definir que a Sections que foi gerada é '001' ou o Metodo da Classe esta contanto o [ICMS] incorretamente?