Painel de líderes

Ola, Como falado aqui basta habilitar o Windows update e atualizar ou com update habilitado rodar os dois patch abaixo que deve resolver o problema windows6.1-kb2992611-x64 windows6.1-kb3140245-x64

Bom dia! Conferindo no Portal da Nota Fiscal Eletrônica, é possível observar que múltiplas Sefaz estão com contingência agendada no dia 03/09/2023, com previsão de inicio as 07h e término as 11h. Para usar o ACBr em contingência durante este período, siga as orientações deste tópico:

Boa tarde, Italo Giurizzato Junior... Atualizei meu fontes para ultima versão e verifiquei a propriedades SSLLib, CryptLib, HttpLib, XmlSignLib e SSLType, ai deu certo, obrigado!

Olá! Foi detectado uma memory leak no objeto FIniParamsTAB linha 112 adicionado na linha 119 FIniParamsTab.Free; ACBrNFSeXLerXml.pas

verifique as atualizacoes do assunto nesse tópico: Verifique também se seus fontes estão atualizados. os schemas do reinf vc pode encontrar nessa pasta: http://svn.code.sf.net/p/acbr/code/trunk2/Exemplos/ACBrDFe/Schemas/Reinf/

@HelioNeto Maravilha meu amigo, as dicas foram valiosas. Acabei caindo aqui fórum do ACBR por acaso depois de um vídeo seu. Estou desenvolvendo um middleware de integração bancaria que recebe dados por meio de WSDL e comunica REST com o banco escolhido, isso em linguagem PHP. Deixo meu https://github.com/rafabarzotto, caso alguém encontre dificuldade e precise tirar alguma duvida sobre essa API do Bradesco.

Boa tarde segue esse topico ai que voce vai encontrar tudo o que precisa

Boa tarde Diogo, Já inclui na minha lista de tarefas para analise. TK-4372

Boa tarde Ricardo, Veja se a postagem abaixo lhe ajuda.

Obrigado pela contribuição, em breve será validada para possível inclusão ao svn #TK-4370

Olá, boa tarde @gilsoftware 1) Estou aplicando os 1,2%; 2) Tags Total.retTrib.vBCIRRF := TotalProduto; Total.retTrib.vIRRF := VlrIRRF_Prod; 3) Nao efetue o desconto, apenas informe as tags acima e reforce os valores retido na observação da nota; Sãos os procedimentos que estamos disponibilizando;;

Segue units, xml vou mandar no email. pcesNaoPeriodicos.pas pcesS2200.pas

@rafabarzotto eu quebrei a cabeça também, mas consegui fazer a requisição. No meu caso, está retornando um ERRO que os caras do Bradesco estão tentando resolver internamente, abriram um Ticket para tentar resolver. mas vou colocar o código que eu fiz aqui para você dar uma olhada: const URL_CRIABOLETO = 'https://proxy.api.prebanco.com.br/v1/boleto/registrarBoleto'; URI_REG_BOLETO = '/v1/boleto/registrarBoleto'; procedure TfrmBradescoApi.CriarBoleto; var strResult: String; objJson: TJSONObject; strTimeStamp, strObj, strLinha1, strLinha2, strLinha3, strLinha4, strLinha5, strLinha6, strLinha7, strLinha8 : String; intMiliSegundos: int64; dataAtual: TDateTime; stremRequest : TStringStream; strRequestAssinado : WideString; xRequestBody : TStringStream; objCriaBoleto : TLibBradescoApiCriaBoleto; begin {*** BLOCO FORMATACAO DA DATA***} dataAtual := Now; intMiliSegundos := DateTimeToUnix(dataAtual, False) * 1000 + MilliSecondsBetween(dataAtual, Trunc(dataAtual)); //Data Atual UTC em Milisegundos. strTimeStamp := ConverteDateISO(dataAtual, False); {*** FIM BLOCO FORMATACAO DA***} {*** BLOCO DE ASSINATURA ***} DFeSSL.SSLCryptLib := cryOpenSSL; DFeSSL.ArquivoPFX := 'certificado.pfx'; DFeSSL.Senha := '123456'; DFeSSL.CarregarCertificado; strLinha1 := 'POST'+#10; //Methodo HTTP strLinha2 := URI_REG_BOLETO+#10; //URI de Requisição strLinha2 := ''+#10; //Parâmetros. quando houver, se não tem deixa linha em branco. strLinha4 := strObj+#10; //Json de criação do Boleto que vai no Body. strLinha5 := editToken.Text+#10; //Access-token retornado da API. strLinha6 := IntToStr(intMiliSegundos)+#10; //Hora Atual em Milisegundos. strLinha7 := strTimeStamp+#10; //TimeStamp; strLinha8 := 'SHA256'; //Algoritimo Usado. stremRequest := TStringStream.Create(strLinha1+strLinha2+strLinha3+strLinha4+strLinha5+strLinha6+strLinha7+strLinha8); //Aqui vai o arquivo para Assinar. stremRequest.SaveToFile('request.txt'); strRequestAssinado := CalcularHash(stremRequest);//aqui realiza a assinatura. {*** FIM BLOCO DE ASSINATURA ***} {*** CRIAÇAO DO PAYLOAD DO BOLETO ***} objCriaBoleto := TLibBradescoApiCriaBoleto.Create; //Classe contento todos os campos do boleto. objCriaBoleto.isacdoTitloCobr := 'HELIO NETO'; //NOME DO CLIENTE objCriaBoleto.elogdrSacdoTitlo := 'RUA AFONSO PENA'; //RUA. objCriaBoleto.enroLogdrSacdo := 999; //NUMERO objCriaBoleto.ccepSacdoTitlo := 79000000; //CEP objCriaBoleto.ebairoLogdrSacdo := 'CENTRO'; //BAIRRO objCriaBoleto.imunSacdoTitlo := 'CAMPO GRANDE'; //CIDADE CLIENTE objCriaBoleto.csglUfSacdo := 'MS'; //UF CLIENTE objCriaBoleto.indCpfCnpjSacdo := 1; //TIPO 1 CPF objCriaBoleto.nroCpfCnpjSacdo := '00000000000'; //CEP DO CLIENTE. objCriaBoleto.demisTitloCobr := FormatDateTime('dd.mm.yyyy', Now); //'30.08.2023'; //Data Emissão. objCriaBoleto.dvctoTitloCobr := FormatDateTime('dd.mm.yyyy', IncDay(Now,1)); //'31.08.2023'; //Data Vencimento. strObj := TJson.ObjectToJsonString(objCriaBoleto); //Converte de Objeto para Json. {*** FIM CRIAÇAO DO PAYLOAD DO BOLETO ***} {*** MONTAGEM DO HEADER ***} FHTTP.Request.Clear; FHTTP.Request.CustomHeaders.Clear; FHTTP.Request.UserAgent := 'Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 6.0; Acoo Browser; GTB5; Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1) ; Maxthon; InfoPath.1; .NET CLR 3.5.30729; .NET CLR 3.0.30618)'; FHTTP.Request.AcceptCharSet := 'UTF-8, *;q=0.8'; FHTTP.Request.AcceptEncoding := 'gzip, deflate, br'; FHTTP.Request.BasicAuthentication := False; FHTTP.Request.CustomHeaders.FoldLines := False; FHTTP.Request.ContentType := 'application/x-www-form-urlencoded'; FHTTP.Request.CustomHeaders.Add('Authorization: Bearer ' + editToken.Text); //TOKEN OBTIDO. FHTTP.Request.CustomHeaders.Add('cpf-cnpj: 00000000000000'); //CNPJ DA EMPRESA FHTTP.Request.CustomHeaders.Add('X-Brad-Nonce: ' + IntToStr(intMiliSegundos)); FHTTP.Request.CustomHeaders.Add('X-Brad-Timestamp: ' + strTimeStamp); FHTTP.Request.CustomHeaders.Add('X-Brad-Algorithm: SHA256'); {*** FIM MONTAGEM DO HEADER ***} xRequestBody := TStringStream.Create(strObj); //Preenche o Body para enviar no Post. try strResult := FHTTP.Post(URL_CRIABOLETO, xRequestBody); //Envia. MemoResp.lines.add(strResult); objJson := TJSONObject.ParseJSONValue(TEncoding.UTF8.GetBytes(strResult), 0) as TJSONObject; except on E: EIdHTTPProtocolException do begin MemoResp.Lines.add(E.ErrorMessage); end; end; FreeAndNil(xRequestBody); end; function TfrmBradescoApi.ConverteDateISO(AData: TDateTime; AInputIsUTC : Boolean = True): String; const SDateFormat: string = 'yyyy''-''mm''-''dd''T''hh'':''nn'':''ss''Z'''; { Do not localize } SOffsetFormat: string = '%s%s%.02d:%.02d'; { Do not localize } Neg: array[Boolean] of string = ('+', '-'); { Do not localize } var Bias: Integer; TimeZone: TTimeZone; begin Result := FormatDateTime(SDateFormat, AData); if not AInputIsUTC then begin TimeZone := TTimeZone.Local; Bias := Trunc(TimeZone.GetUTCOffset(AData).Negate.TotalMinutes); if Bias <> 0 then begin // Remove the Z, in order to add the UTC_Offset to the string. SetLength(Result, Result.Length - 1); Result := Format(SOffsetFormat, [Result, Neg[Bias > 0], Abs(Bias) div MinsPerHour, Abs(Bias) mod MinsPerHour]); end end; end; Entendo que eles tem essas regras de segurança, mas eles poderiam simplificar algumas coisas. Espero ter ajudado.

Fala pessoal, Estou implementando a comunicação com essa API do Bradesco também. Até agora gerar o token fluiu sem problemas. Estou com um pouco de dificuldade em assinar a requisição de Registro de Boleto, acusa erro de assinatura. Segue mais alguns manuais que tenho aqui: API Bradesco Docs.

Essa DLLs não são de C# para serem referenciadas... são bibliotecas compartilhadas Veja Nesse aula, como usar a Lib no C#; https://acbr.nutror.com/curso/e4f38b5c7398e4ccca8731c2d305952d389ac693/aula/4541887

Tenha em mente o seguinte: Brinde ou bonificação ofertada pelos seus clientes, via de regra não podem ser os produtos da atividade preponderante destes, pois, bonificação e brindes devem observar a aquisição para esta finalidade. A saída para esta solução seria descontar na NFC-e o valor que deseja "bonificar", é como aquelas promoções, compre 5 e pague 4, neste caso, todas as mercadorias devem estar registradas na NFC-e, destacando o desconto desejado. Veja se não há alguma instrução normativa no estado onde estão estes clientes.

Bom dia, neste caso é melhor você ver com o escritório contábil para consultar junto a sua legislação. Como acima usamos a legislação de RJ, mas acredito que vários estados sejam semelhantes você tem: Muito provalmente neste caso poderá ser exigido a inclusão do item na NFCe com o desconto total dele informando desta forma o valor que o cliente não pagou pelo produto.