Arnaldo Cruz

Cara eu fico perplexo com certas resposta, se o cara não sabe resposta deixa pra lá vá pra outra que saiba responder, agora responder "Consulte seu contador" se agente pergunta pra quem desenvolve é porque a desgraça do contador não sabe, os melecas a maioria das vezes não sabem nem o que se trata o registro 1601, contadores acostumados que o sistema contábil faz tudo é so apertar um botão pra selecionar alguma coisa, apertar outro pra executar

Colegas o recebimento do caixa através do PIX eu implantei pela chave estática, não existe o cadastro de um PSP ou banco, agora não estou sabendo como informar no campo COD_PART_IP , nas vendas com cartão preencho com o campo do registro 0150 e obviamente do cadastro de fornecedores, já o PIX como não existe cadastro ferrou, alguem procede dessa forma ou existe uma outra maneira. Obrigado

Já sim se vc reparar minhas configurações estão identicas Aqui SSLIB equivale a LT_TLSv1_2 ? Isso mesmo Valor do SSLIB = 5 FDataModule.ACBrBoleto1.Configuracoes.WebService.SSLType := TSSLType(SSLIB); SSLIB = 5

Configurações Dados do Cedente pego do site do BBDeveloper FDataModule.ACBrBoleto1.Banco.TipoCobranca := cobBancoDoBrasilAPI; FDataModule.ACBrBoleto1.Cedente.TipoCarteira := tctRegistrada; FDataModule.ACBrBoletoFCFR1.DirLogo := LocImagem; FDataModule.ACBrBoleto1.ACBrBoletoFC.DirLogo := LocImagem; FDataModule.ACBrBoleto1.ACBrBoletoFC.Filtro := fiNenhum; FDataModule.ACBrBoleto1.ACBrBoletoFC.LayOut := TACBrBolLayOut(edtLayout.ItemIndex); FDataModule.ACBrBoleto1.Banco.Digito := DVBANCO; FDataModule.ACBrBoleto1.Banco.Numero := StrToInt(NBanco); FDataModule.ACBrBoleto1.Banco.Nome := 'Banco do Brasil'; FDataModule.ACBrBoleto1.Cedente.TipoInscricao := pJuridica; FDataModule.ACBrBoleto1.Cedente.Agencia := Agencia; FDataModule.ACBrBoleto1.Cedente.AgenciaDigito := DVAgencia; FDataModule.ACBrBoleto1.Cedente.Conta := Conta; FDataModule.ACBrBoleto1.Cedente.ContaDigito := DVConta; FDataModule.ACBrBoleto1.Cedente.Nome := 'TECIDOS FARIA DUARTE'; FDataModule.ACBrBoleto1.Cedente.CNPJCPF := '74910037000193'; FDataModule.ACBrBoleto1.Cedente.CodigoCedente := '4863177';//CodCedente; FDataModule.ACBrBoleto1.Cedente.Convenio := '1014051';//CONVENIO; FDataModule.ACBrBoleto1.Cedente.Modalidade := '35'; FDataModule.ACBrBoleto1.Cedente.Logradouro := EnderecoEmpresa; FDataModule.ACBrBoleto1.Cedente.NumeroRes := NumeroEmpresa; FDataModule.ACBrBoleto1.Cedente.Bairro := BairroEMpresa ; FDataModule.ACBrBoleto1.Cedente.Cidade := CidadeEmpresa ; FDataModule.ACBrBoleto1.Cedente.UF := UFEmpresa ; FDataModule.ACBrBoleto1.Cedente.CEP := CepEmpresa ; FDataModule.ACBrBoleto1.Cedente.ResponEmissao := tbCliEmite; FDataModule.ACBrBoleto1.Cedente.IdentDistribuicao := tbClienteDistribui; FDataModule.ACBrBoleto1.Cedente.CaracTitulo := tcSimples; FDataModule.ACBrBoleto1.Cedente.CedenteWS.ClientID := CLIENTID; FDataModule.ACBrBoleto1.Cedente.CedenteWS.ClientSecret := CLIENTSECRET; FDataModule.ACBrBoleto1.Cedente.CedenteWS.Scope := SCOPE; FDataModule.ACBrBoleto1.Cedente.CedenteWS.KeyUser := KEYUSER; FDataModule.ACBrBoleto1.Cedente.CedenteWS.IndicadorPix := False; FDataModule.ACBrBoleto1.Configuracoes.WebService.SSLCryptLib := cryOpenSSL ; FDataModule.ACBrBoleto1.Configuracoes.WebService.SSLHTTPLib := httpOpenSSL; FDataModule.ACBrBoleto1.Configuracoes.WebService.SSLType := TSSLType(SSLIB); FDataModule.ACBrBoleto1.Configuracoes.WebService.TimeOut := 30000 ; FDataModule.ACBrBoleto1.Configuracoes.WebService.UseCertificateHTTP := False ; Dados do titulo Dados do sacado pego do site BBDeveloper Titulo := ACBrBoleto1.CriarTituloNaLista; Titulo.Vencimento := 19/11/2022; Titulo.DataDocumento := 19/10/2022; Titulo.NumeroDocumento := '123456'; Titulo.EspecieDoc := 'DM'; Titulo.Aceite := atNao; Titulo.DataProcessamento := 19/10/2022; Titulo.Carteira := '17'; Titulo.NossoNumero := '2'; Titulo.ValorDocumento := 80; Titulo.Sacado.NomeSacado := 'VALERIO DE AGUIAR ZORZATO'; Titulo.Sacado.CNPJCPF := '96050176876'; Titulo.Sacado.Logradouro := 'RUA LAQUEADA'; Titulo.Sacado.Numero := '25'; Titulo.Sacado.Bairro := 'CENTRO'; Titulo.Sacado.Cidade := 'UIRAUNA'; Titulo.Sacado.UF := 'PB'; Titulo.Sacado.CEP := '58915000'; Titulo.ValorAbatimento := 0; Titulo.LocalPagamento := 'PAGAR EM QUALQUER BANCO'; Titulo.ValorMoraJuros := 0.50; Titulo.ValorDesconto := 0; Titulo.ValorAbatimento := 0; Titulo.DataMoraJuros := 0; Titulo.DataDesconto := 0; Titulo.TipoDesconto := tdNaoConcederDesconto; Titulo.DataAbatimento := 0; Titulo.DataProtesto := 0; Titulo.PercentualMulta := 2; Titulo.CodigoMulta := cmPercentual; Titulo.CodigoMoraJuros := cjValorDia; Titulo.CodigoMora := '1'; Titulo.Mensagem.Add(cdsBoletoADICIONAIS.AsString); Titulo.OcorrenciaOriginal.Tipo := toRemessaRegistrar; Titulo.Instrucao2 := IntToStr(NoN); Titulo.QtdeParcelas := 1; Titulo.QtdePagamentoParcial := 1; Titulo.TipoPagamento := tpNao_Aceita_Valor_Divergente; Titulo.PercentualMinPagamento := 0; Titulo.PercentualMaxPagamento := 0; Titulo.ValorMinPagamento := 0; Titulo.ValorMaxPagamento := 0; 19/10/22 13:23:17:645 - Autenticando Token... 19/10/22 13:23:18:989 - Erro ao gerar token de Autenticação: HTTP_Code=400 Erro="Bad Request" 19/10/22 13:23:18:989 - Comando Enviar: {"numeroConvenio":1014051, "numeroCarteira":17, "numeroVariacaoCarteira":35, "codigoModalidade":1, "dataEmissao":"19.10.2022", "dataVencimento":"19.11.2022", "valorOriginal":80, "valorAbatimento":0, "codigoAceite":"N", "codigoTipoTitulo":2, "descricaoTipoTitulo":"DM", "numeroTituloBeneficiario":"123456", "campoUtilizacaoBeneficiario":"", "numeroTituloCliente":"00010140510000000002", "mensagemBloquetoOcorrencia":"2", "jurosMora":{"tipo":1, "valor":0.4}, "pagador":{"tipoInscricao":1, "numeroInscricao":96050176876, "nome":"VALERIO DE AGUIAR ZORZATO", "endereco":"RUA LAQUEADA 25", "cep":58915000, "cidade":"UIRAUNA", "bairro":"CENTRO", "uf":"PB"}, "indicadorPix":"N"} 19/10/22 13:23:19:457 - Retorno Envio: HTTPCode=401 ErrorCode=0 Result={ "statusCode": 401, "error": "Unauthorized", "message": "Bad Credentials", "attributes": { "error": "Bad Credentials" } }

Estou com duvidas quanto ao preechimento da configuração dos campos abaixo calendario.expiracao > coloca se em minuto ou milesegundos ?, pois coloquei 3600 ta gerando para 11/09/1899 se coloco 5 da erro. ACBrPixCD1.NivelLog > quantos niveis tem ? Obrigado

Atualizei o ACBr e vi que tem o novo componente PIX. Gostaria de saber qual o processo para colocar no sistema. 1 - Acessei o site do BB developer criei a aplicação que gerou a - developer_application_key b - client_id c - client_secret d - Basic e - Authorization 2 - Na conta da empresa criei minha chave PIX 3 - Nas configurações do componente tem os itens 1A,1B,1C e o Item 2 Pergunto Em homologação basta colocar estas configurações e já vai funcionar ? Em produção no cliente eu uso os mesmos dados. Estou perdido nesse processo, se alguém puder mim esclarecer como funciona, o que o cliente precisa fazer Obrigado

Colegas peguei uma nota emitida em 04/07/2022 para fazer os testes do gtin. A nota tem 10 itens com codigo de barras, dos 10 itens somente um item retornou stat 9490 e ainda assim sem valor no campo CEST, os demais retornou que o produto não esta cadastrado na CCG, isto está correto, não deveria localizar todos os produtos já que tem o GTIN. Obrigado

é ai que tá o problema, ambos os contabilista dão informações divergentes, o do emitente diz que se o produto entrar com origem 1 e 6 em caso de retorno desta mercadoria a sua origem tem que usar a mesma origem 1 e 6(mercadoria estrangeira importação direta) e se esta for vendida ai sim sai como origem 2 e 7 já o contabilista do destinatário fala o contrario. Este comprou o produto com origem 1 e 6 importação direta, vendeu com origem 1 e 6(mercadoria estrangeira ), o comprador desta mercadoria quando for emitir nota de saída de qualquer natureza tem que colocar na origem 2 e 7 mercadoria estrangeira adquirida no mercado interno. tem uma observação segundo o contabilista do destinatário se a nota for emitida com origem 1 e 6 no retorno cfop 6949 paga a diferença de estado, e se for emitida com origem 2 e 7 não paga. ai estou no meio dessa confusão, pois a coisa já envolve supressão de imposto, o que pode ser bom e pode ser ruim caso seja uma brecha pra sonegação. Como eu sei que a maioria dos colegas possuem sistema fiscal que emitem nota modelo 55 , perguntei pra ver qual o tratamento que vocês adotam obrigado

Colegas estou com uma duvida e o contador não soube responder, e quem sabe um de vocês já não passou por um situação desta. O cliente compra mercadoria na NOta do fornecedor as origens vem como segue Origem 1 - Estrangeira – Importação direta, exceto a indicada no código 6 e origem 6 Estrangeira – Importação direta, sem similar nacional, constante em lista de Resolução CAMEX e gás natural. O cliente necessita emitir uma nota de troca com cfop 6949 o fornecedor exige que a mercadoria que entrou com origem 1 saia com origem 2 - Estrangeira – Adquirida no mercado interno, exceto a indicada no código 7. e a que entrou com origem 6 saia com origem 7 Estrangeira – Adquirida no mercado interno, sem similar nacional, constante em lista de Resolução CAMEX e gás natural. Pergunto... isso está correto Obrigado

Estou tentanto gerar o boleto em homologação via API do banco do brasil, usando as configurações abaixo TDatamodule.ACBrBoleto1.Homologacao := True; TDatamodule.ACBrBoleto1.Configuracoes.WebService.Ambiente := taHomologacao; TDatamodule.ACBrBoleto1.Cedente.Nome := 'TECIDOS FARIA DUARTE' ; TDatamodule.ACBrBoleto1.Cedente.CNPJCPF := '74910037000193' ; TDatamodule.ACBrBoleto1.Banco.TipoCobranca := cobBancoDoBrasilAPI ; TDatamodule.ACBrBoleto1.Cedente.CedenteWS.Scope := 'cobranca.registro-boletos'; TDatamodule.ACBrBoleto1.Cedente.CedenteWS.ClientID := client_id; TDatamodule.ACBrBoleto1.Cedente.CedenteWS.ClientSecret := client_secret; TDatamodule.ACBrBoleto1.Cedente.CedenteWS.KeyUser := developer_application_key ; TDatamodule.ACBrBoleto1.Configuracoes.WebService.SSLHTTPLib := httpOpenSSL; TDatamodule.ACBrBoleto1.Configuracoes.WebService.TimeOut := 30000 ; TDatamodule.ACBrBoleto1.Cedente.TipoCarteira := tctRegistrada; CedenteWS.ClientID-CedenteWS.ClientSecret e .CedenteWS.KeyUser são as credenciais geradas no portal BBDeveloper Recebo a seguinte mensagem Nos dados do cedente Cedente Nome e Cedente CNPJCPF estou usando o recomendado na documentação do bco do brasil, porem os dados de convenio estou usando os dados reias da empresa. Nos dados do sacado estou usando dados verdadeiros de um cliente. Se um dos colegas puder passar alguma dica eu agradeço.

Passando pra informar que resolvi o problema. começou a dá o mesmo erro no wincript, então fui na certificadora e emiti um novo certificado, pronto resolvido passou sem problemas no openSSL e no wincript. o Problema era Certificado corrompido. Nunca tinha visto isso, mas o cara do certificado mim disse que no momento de gerar as chaves tava dando erro, e que tinha muitos pessoas com o mesmo problema com os certificados da Valid emitido no computador dele. Obrigado a todos

fiz o teste com outros certificados e funciona só não funciona com meu certificado, mesmo eu exportando conforme a sua indicação

debugando o ACBr descobri o erro só não sei como resolver procedure ValidarCNPJCertificado CertCNPJ está vindo vazio. Desinstalei o certificado, dei permissão na pasta, instalei o certificado como administrador, executei o o sistema como administrador, testei o certificado no ECAC e tá tudo OK, voltei as configurações para Wincrypt funciona, mas no OpenSSL não funciona dá o erro citado na imagem

libOpenSSL cryOpenSSL htttpOpenSSL xsLibXml2 LT_TLSv1_2 Copiei as dll da pasta DLLs/OpenSSL 1.1.1.10/X86 para pasta do Executavel libcrypto-1_1.dll libssl-1_1.dll Copiei as dll da pasta DLLs/LibXml2/X86 para pasta do Executavel libexslt.dll libiconv.dll libxml2.dll libxslt.dll Copiei as dll da pasta DLLs/Diversos/X86 para pasta do Executavel iconv.dll inpout32.dll msvcr71.dll msvcr120.dll Configurações with ACBrNFe1.Configuracoes.Geral do begin SSLLib := TSSLLib(VscbSSLLib); SSLCryptLib := TSSLCryptLib(VscbCryptLib); SSLHttpLib := TSSLHttpLib(VscbHttpLib); SSLXmlSignLib := TSSLXmlSignLib(VscbXmlSignLib); Salvar := False; ExibirErroSchema := False ; FormatoAlerta := 'TAG:%TAGNIVEL% ID:%ID%/%TAG%(%DESCRICAO%) - %MSG%.'; FormaEmissao := StrToTpEmis(OK,IntToStr(vsIDFE + 1)); ModeloDF := moNFe; VersaoDF := TpcnVersaoDF(VversaoDF);// IdCSC := ''; CSC := ''; ForcarGerarTagRejeicao938 := fgtNunca; VersaoQRCode := veqr200; end; ACBrNFe1.Configuracoes.Certificados.ArquivoPFX := cdsCertificadoCERTIFICADO.AsString ; //Caminho do PFX ACBrNFe1.Configuracoes.Certificados.Senha := cdsCertificadoSENHA.AsString ; Quando tento gerar o xml da erro abaixo no momento de assinar o XML ERRO AO LER INFORMAÇÕES DO CERTIFICADO. PROVAVELMENTE A SENHA ESTÁ ERRADA Obs : se eu usar wincrypt não da erro ao assinar Obrigado

Geração de Boleto via API colegas gerei as credenciais abaixo no BBDeveloper para fazer os testes developer_application_key - client_id - client_secret - Basic. essas credenciais elas são para o aplicatico ou por usuário, tipo quando for colocar no cliente , este cliente tem que entrar em contato com o banco para gerar as credenciais dele ? Obrigado. Acabei de participar no discord sobre o ACBrBoleto, porem não ouvi nem 5% mostrava CTR desconectado e o som não saia. Obrigado

Pessoa não sei se estou equivocado. Baixei a nova tabela de NCMs que entra em vigor amanhã 01/04/2022, baixei a nova tabela do IBPT. Peguei um cadastro de um cliente pra verificar se tinha NCMs descontinuado. Achei uns 50 ncms, verifiquei na nova tabela de NCMs quais NCMs vão substituir, fui consultar na tabela do IBPT com vigência até 30/04/2022 os novos NCMs, para minha surpresa não consta na tabela do IBPT nenhum dos NCMs que entra em vigor em 01/04/2022. Alguém já percebeu isso, ou tem alguma informação sobre isso ? Obrigado

Empresa Simples Nacional Calcula Valor do Difal nas situações abaixo ? 1 - Venda Para consumidor final O Valor do Difal é pago pelo emitente ? 2 - Venda para não Contribuinte O Valor do Difal é pago pelo destinatário ? 3 - Venda para contribuinte para Uso ou Consumo O Valor do Difal é pago pelo destinatário ? Obrigado por qualquer esclarecimento

OBS: 0,82 = 1 - 12/100 (12 é a alíquota interestadual) este calculo está correto ? 1 - 12/100 = 0,88

Um cliente que fabrica sapatos pediu para adicionar a referencia de fabricação do produto no XML, segundo ele os clientes dele utilizam esta referencia para fazer checagem do pedido quando recebem o XML. fabricação de calçados não usa rastreamento, não tem lote, validade etc. não encontrei a existência dessa tag no ACBr Existe essa tag no layout da NF-e ? que não seja a de rastreamento(para medicamentos e produtos controlados) Obrigado

sim baixei Hoje

Quando tento emitir um boleto recebo a mensagem could not convert variant of type(string) into type double para os campo memo113 e memo93, verificando no boleto estes memos corresponde ao campo Aceite de cada via do boleto.

Fiz exatamente isso, no arquivo de remessa está exatamente como esperado pelo layout do banco Segmento P posição 58 = 7 (Carteira Simples) Posição 118 = '1' (1 = Juros diario 2= Juros mensais 3=Isento) posição 127 a 141 (Taxa diária) No questionamento eu coloquei o código de mora = 2 porem foi um erro de digitação o correto é "1"

Colegas estou gerando a remessa do banco do brasil, porem quando o cliente paga o boleto por Aplicativo mobile,Gerenciador do banco ou correspondentes bancarios, o valor de multa não é cobrado como tambem o valor de juros sai errado. a minha geração do titulo está como segue abaixo ValorAbatimento := 0; LocalPagamento := edtLocalPag.Text ; CodigoMora := '2'; CodigoMoraJuros := cjValorDia; = ValorMoraJuros := cdsBoletoVALOR.AsFloat * JUR / 100; //==1,5% dia ValorDesconto := 0; ValorAbatimento := 0; TotalParcelas := 1; Parcela := 1 ; CodigoMulta := cmPercentual; == 2% PercentualMulta := MUL; DataMoraJuros := edtVencimento.Date; DataDesconto := 0; DataAbatimento := 0; Exemplo de recebimento no correspondente bancario vencimento 10/01/2022 Pago dia 17/01/2022 Valor boleto 250,00 Multa 0,00 Juros 7,17 Valor Pago 257,17 Deveria ser vencimento 10/01/2022 6 dias de atraso Valor boleto 250,00 Multa 5,00 2% Juros 22,50 3,75 dia X 6 = 22,50 Valor Pago 277,50 Observação dezembro gerei titulos alterando somente CodigoMora := '1' porem ocorreu a mesma coisa, agora em janeiro alterei para 2 e continua a mesma coisa

Colegas tenho o Delphi Tokyou. no SDKManager indica que esta versão do Delphi usa a API 17 que é do android 4.2, gostaria de saber se tem como nesta versão do delphi desenvolver com a API 29 do android 10. Obrigado

Tenho em produção o TEF PayGoWeb em mercados, está aparecendo muitos clientes com o cartão Ticket Alimentação, Gostaria de saber se a PayGo e o ACBr TefPayGoWeb aceita transações com esse tipo de cartão. Estou perguntando aqui pois já tentei varias vezes entrar em contato com a paygo e não obtive sucesso. Obrigado