GONDIM

bom dia, montei o arquivo em cobrança 400 e gerou o seguinte erro: Prezados, bom dia! Segue validação do arquivo e descrição dos ajustes. RELATÓRIO ARQUIVO REMESSA COBRANCA 400 Dados do arquivo: Código do convênio (acessório escritural): 1054406 Nome da Empresa: ASTRA Data de Gravação do Arquivo: 24/05/23 Número do sequencial de arquivo: 0000006 Contratos no arquivo: Car Agên Conta-Produto 009 0265-0010440-6 ============================================================================================================================ Linha 1, colunas 027 a 046, Header de arquivo, acessório escritural inválido. Zeros à esquerda. Linha 2, colunas 037 a 037, Registro tipo 1, Dígito da conta-corrente inválido. Linha 3, colunas 037 a 037, Registro tipo 1, Dígito da conta-corrente inválido. Linha 4, colunas 037 a 037, Registro tipo 1, Dígito da conta-corrente inválido. Linha 5, colunas 037 a 037, Registro tipo 1, Dígito da conta-corrente inválido. Linha 6, colunas 037 a 037, Registro tipo 1, Dígito da conta-corrente inválido. Linha 7, colunas 037 a 037, Registro tipo 1, Dígito da conta-corrente inválido. ============================================================================================================================ Não sei onde estou fazendo errado, alguém pode me ajudar, se for o caso pago um consultoria. segue o arquivo. CB24500.REM BRADESCO_BOLETOS_PDF_REMESSA_NRO_6_24-05-2023_09-56-55.pdf

pessoal boa tarde, não sei o que estou fazendo errado, coloquei os dados corretos conforme a imagem abaixo: o sistema gerou o arquivo e os campos foram unificados conforme abaixo, o arquivo este em anexo, e o banco fala que esta gerando este erro. Alguém pode ajudar? Se for o caso pago por uma consultória, deve ser coisa simples mas não sei o que eh. Linha 1, Header de arquivo, colunas 071 a 071, dígito da conta-corrente inválido. Linha 2, Header de lote, colunas 072 a 072, dígito da conta-corrente inválido. Linha 3, colunas 036 a 036, dígito da conta-corrente inválido. Linha 6, colunas 036 a 036, dígito da conta-corrente inválido. Linha 9, colunas 036 a 036, dígito da conta-corrente inválido. Linha 12, colunas 036 a 036, dígito da conta-corrente inválido.BRADESCO_BOLETOS_PDF_REMESSA_NRO_6_23-05-2023_10-38-27.pdf Linha 15, colunas 036 a 036, dígito da conta-corrente inválido. Linha 18, colunas 036 a 036, dígito da conta-corrente inválido. Número da Conta: 000000010440 - 6 INFORMAR CTA.PRODUTO: 02650105440 - 6 ACBrBoleto1.Cedente.Agencia := qryContaDS_AGENCIA.AsString; ACBrBoleto1.Cedente.AgenciaDigito := qryContaDS_DIGAG.AsString; ACBrBoleto1.Cedente.Conta := qryContaNR_CEDENTE.AsString;//qryContaCT_CORRENTE.AsString; ACBrBoleto1.Cedente.ContaDigito := qryContaDS_DIGCC.AsString; ACBrBoleto1.Cedente.CodigoCedente := qryContaNR_CEDENTE.AsString; ACBrBoleto1.Cedente.Nome := Trim(qryEmpresaNM_RAZAO_SOCIAL.AsString); ACBrBoleto1.Cedente.CNPJCPF := qryEmpresaNR_CGC.AsString; ACBrBoleto1.Cedente.Cidade := qryEmpresaDS_CIDADE.AsString; ACBrBoleto1.Cedente.Bairro := qryEmpresaDS_BAIRRO.AsString; ACBrBoleto1.Cedente.UF := qryEmpresaDS_ESTADO.AsString; ACBrBoleto1.Cedente.CEP := qryEmpresaDS_CEP.AsString; ACBrBoleto1.Cedente.Logradouro := qryEmpresaDS_ENDERECO.AsString; ACBrBoleto1.Cedente.NumeroRes := qryEmpresaNR_LOGRADOURO.AsString; ACBrBoleto1.Cedente.Complemento := qryEmpresaDS_COMPL_LOGR.AsString; ACBrBoleto1.Cedente.Convenio := qryContaNR_CONVENIO.AsString; ACBrBoleto1.Cedente.Modalidade := qryContaNR_MODALIDADE.AsString; CB23500.REM

Pessoal, bom dia, estou gerando o boleto do bradesco alguém sabe me informar como vou casar os campo, pois o gerente me mandou estas informações: Conta produto 02650105440-6 onde informo este campo ? Carteira 09 Acessório estrutural negociado 5686515 onde informo este campo ? O campo espécie e modalidade seria qual ? minha tela possui estas informações a serem colocadas:

bom dia, já tentei de todo jeito o que vc me aconselha, por favor

bom dia estou usando libcrypto-1_1.dll, libssl-1_1.dll, libeay32.dll, ssleay32.dll

boa tarde, não sei se é possível verificar este erro estou tentando enviar uma chamada de uma url que não tem retorno, já tentei de varias formas e todas geram o mesmo erro, conforme foto em anexo alguém consegue me ajudar, segue o exemplo. exemplo 1: mIdHTTP := TIdHTTP.Create(NIL); mIdSSL := TIdSSLIOHandlerSocketOpenSSL.Create(nil); try try mIdHTTP.IOHandler := mIdSSL; mIdHTTP.Get('https://fornacedelivery.com.br/admin/endpointNotificacoes.php?t=9u2i0B6#!6UB&pedido=' + IntTOStr(CodigoPedido)); except on E:Exception do begin frmErros.AddErro('Erro na função VerificaAltCliente. ' + E.Message); frmErros.AcionaPopupErro; end; end; finally mIdHTTP.Free; mIdSSL.Free; end; exemplo 2: {try SSLSocket.SSLOptions.Method := sslvSSLv23; SSLSocket.SSLOptions.Mode := sslmClient; JsonStreamRetorno := TStringStream.Create('', TEncoding.UTF8); HTTPClient.Request.Clear; HTTPClient.Request.ContentType := 'application/json'; HTTPClient.Request.Charset := 'UTF-8'; HTTPClient.Request.BasicAuthentication := false; HTTPClient.Request.CustomHeaders.Clear; HTTPClient.Request.CustomHeaders.AddValue('cache-control', 'no-cache'); HTTPClient.Request.CustomHeaders.AddValue('Content-Type', 'application/json'); HTTPClient.Request.CustomHeaders.AddValue('Accept', 'application/json'); HTTPClient.Request.CustomHeaders.AddValue('cache-control', 'no-cache'); HTTPClient.Request.Accept := 'application/json'; HTTPClient.Get('https://fornacedelivery.com.br/admin/endpointNotificacoes.php?t=9u2i0B6#!6UB&pedido=' + IntTOStr(CodigoPedido));//, JsonStreamRetorno except on E : Exception do begin frmErros.AddErro('Erro na função VerificaAltCliente. ' + E.Message); frmErros.AcionaPopupErro; end; end; }

Pessoal bom dia, consegui terminar o sicredi Se alguém tiver duvida, os campos que alteram em relação as outros bancos são: Numero banco = 748 Digito banco = 0 Agencia = colocar o numero sem o digito exemplo 0333-8 no caso seria apenas 0333 digito agencia = seria no numero do posto exemplo 26 numero da conta e digito são os valores normais. numero convenio = '' numero carteira = '1' modalidade = '' especie = 'DMI' eles não aceitam 'DM' quando for passar os parâmetros as mudanças principais que eu tive que alterar foi: ACBrBoleto1.Cedente.DigitoVerificadorAgenciaConta := ''; CodigoMoraJuros := cjTaxaMensal; ValorMoraJuros := StrToCurrDef(FormatFloat('#,##0.00',qryRemessaVR_MORADIARIA.Asfloat),0); colocar o percentual não o valor em R$ //ACBrBoleto1.AdicionarMensagensPadroes(Titulo,Mensagem); tive que deixar em comentário pois eles não aceitam mensagens fora do padrão. //Mensagem.Text := qryRemessaDS_MEMBOLETO.AsString + #13#10 + qryRemessaDS_MEMBOLETO2.AsString; Espera ter ajudado. Abraços.

bom dia, no caso do exemplo acima ACBrBoleto1.Cedente.Agencia := '03338' sendo 8 o digito da agencia ACBrBoleto1.Cedente.Agencia := '0333' ficaria desta forma e o digito da agencia onde vou passar que seria o 8 no caso? ACBrBoleto1.Cedente.AgenciaDigito := '26' seria o numero do posto. Eu passo neste lugar mesmo ? ACBrBoleto1.Cedente.DigitoVerificadorAgenciaConta := '0'; ACBrBoleto1.Cedente.DigitoVerificadorAgenciaConta := '' vai ficar vazio correto;

Pessoal boa tarde, estou fazendo o boleto da Sicredi, gostaria de saber se estou casando do campos corretamente, tem um campo posto que segundo a informações, pediu para colocar a agencia junto com o digito dela e no campo agencia digito o campo posto, e o nosso numero o máximo seria 5 ou 10 dígitos eu verifiquei o valor é 5 mesmo? Estou pedindo para verificar antes que enviar para homologar: ACBrBoleto1.Cedente.Agencia := '03338' sendo 8 o digito da agencia ACBrBoleto1.Cedente.AgenciaDigito := '26' numero o posto ACBrBoleto1.Cedente.Conta := '22816'; ACBrBoleto1.Cedente.ContaDigito := '6'; ACBrBoleto1.Cedente.CodigoCedente := '22816'; ACBrBoleto1.Cedente.Nome := 'TESTE' ACBrBoleto1.Cedente.CNPJCPF := '04.048.938/0001-22' ACBrBoleto1.Cedente.Cidade := 'TESTE' ACBrBoleto1.Cedente.Bairro := 'TESTE' ACBrBoleto1.Cedente.UF := 'MG' ACBrBoleto1.Cedente.CEP := '38400000' ACBrBoleto1.Cedente.Logradouro := 'RUA TESTE' ACBrBoleto1.Cedente.NumeroRes := '1' ACBrBoleto1.Cedente.Complemento := ''; ACBrBoleto1.Cedente.Convenio := ''; ACBrBoleto1.Cedente.Modalidade := ''; ACBrBoleto1.LayoutRemessa := c240; ACBrBoleto1.DataArquivo := Date; ACBrBoleto1.Cedente.DigitoVerificadorAgenciaConta := '0'; with Titulo do begin LocalPagamento := 'EM QULAQUER BANCO ATE O VENCIMENTO'; Vencimento := '07/10/2022'; DataDocumento := '07/10/2022'; NumeroDocumento := '123456' EspecieDoc := 'DM' Aceite := atSim; DataProcessamento := '07/10/2022'; Carteira := 'RG'; NossoNumero := IntToStrZero(qryContasReceberNR_BOLETO.AsInteger,5); ValorDocumento := '5950' Sacado.NomeSacado := 'TESTE' Sacado.CNPJCPF := OnlyNumber(qryClienteDS_CNPJFAT.AsString); if qryClienteTP_PESSOA.AsString = 'J' then Sacado.Pessoa := pJuridica else Sacado.Pessoa := pFisica; Sacado.Logradouro := qryClienteDS_ENDERECO.AsString; Sacado.Numero := qryClienteNR_ENDFATU.AsString; Sacado.Bairro := qryClienteDS_BAIRRO.AsString; Sacado.Cidade := qryClienteDS_CIDADE.AsString; Sacado.UF := qryClienteDS_SIGLA.AsString; Sacado.CEP := TiraPontoVirgula(qryClienteDS_CEPFATU.AsString); ValorAbatimento := StrToCurrDef('0',0); LocalPagamento := qryContasReceberDS_LOCALPAGTO.AsString; ValorMoraJuros := StrToCurrDef(FormatFloat('#,##0.00',qryContasReceberVrMoraRS.Asfloat),0); ValorDesconto := StrToCurrDef('0',0); ValorAbatimento := StrToCurrDef('0',0); DataMoraJuros := StrToDateDef(DatetoStr(qryContasReceberDT_MULTA.AsDateTime), 0); DataMulta := StrToDateDef(DatetoStr(qryContasReceberDT_MULTA.AsDateTime), 0); //DataDesconto := StrToDateDef(edtDataDesconto.Text, 0); //DataAbatimento := StrToDateDef(edtDataAbatimento.Text, 0); DataProtesto := StrToDateDef(DatetoStr(qryContasReceberDT_PROTESTO.AsDateTime), 0); PercentualMulta := StrToCurrDef(FormatFloat('#,##0.00',qryContasReceberVR_MULTA.Asfloat),0); Mensagem.Text := qryContasReceberDS_MEMBOLETO.AsString + #13#10 + qryContasReceberDS_MEMBOLETO2.AsString + #13#10 + qryContasReceberDS_MEMBOLETO3.AsString; //Instrucao1 := padL(trim(edtInstrucoes1.Text),2,'0'); //Instrucao2 := padL(trim(edtInstrucoes2.Text),2,'0'); ACBrBoleto1.AdicionarMensagensPadroes(Titulo,Mensagem); end;

Bom dia, Em minas gerais existe alguma forma do sistema retornar todos os cupons fiscais emitidos. Tipo manifesto do destinatário só que retorna o que o cliente emitiu. Se existir como pode ser implementado. Abraços.

o fornecedor enviou apenas a chave. o xml a gente não tem.

bom dia, esta eh uma chave: 3121 0529 7352 0400 0152 6510 1000 0453 2714 2923 4987 verifique que o nome fantasia e o telefone são alterados.

Boa tarde, Eu não sei como o pessoal conseguiu fazer, sei que fizeram, mas já foi feito o boletim e a denuncia na receita. Mas com o certificado digital eles conseguem o CSC. Abraços

Foi através de fornecedores, fizeram uma promoção no supermercado estava chegando vários cupons desta empresa quando o fornecedor(Ex: Coca Cola) colocou o CNPJ do cupom verificou que era outra empresa que no caso seria meu cliente. Eles entraram em contato com meu cliente e fomos ver o que estava ocorrendo. O fornecedor (tipo coca cola) enviou os cupons que foram gerados e no caso peguei para consultar, onde foi detectado a serie alta (tipo 100). No cupom eles mudam o nome fantasia e o telefone. Entendeu?

Bom dia, a todos, peço desculpas por se tratar de um assunto que não faz parte do forum. Mas consegui falar com o pessoal da receita, me informaram que se trata de uma quadrilha no Espírito Santo que esta fazendo isto. Com certeza deve ter alguma empresa de gera certificados por traz disto, na verdade eles geram outro certificado com os dados da empresa de minas. Como o site da receita de minas não tem como verificar todos os cupons gerados no mês pode consultar apenas chave por chave fica difícil descobrir, pois eles colocam uma serie alta tipo 100 para não gerar duplicidade de notas. Se alguém estiver passando por isto, é o que esta ocorrendo. Abraços

Pessoal, boa tarde, Estou em Uberlândia, minas gerais, é esta acontecendo o seguinte, é o terceiro cliente que me liga e fala que estão emitindo cupons ficais no CNPJ deles, ou seja, sonegação fiscal sendo que esta empresas estão em São Paulo, Belo Horizonte e meus clientes em Uberlândia-MG; Agora como isto este acontecendo sendo que eles precisão do certificado digital e a senha do mesmo. Alguém pode explicar, já foi feito boletim de ocorrência e denuncia na receita. Realmente não sei como o pessoal esta conseguindo fazer isto.

bom dia, Você tem o link desta api e o exemplo de como fazer o envio, por favor. Este api cobra alguma valor por envio de SMS ? abraços

Bom dia, Mas a única forma de fazer é via modem?

boa tarde, Preciso enviar dados via SMS, gostaria de saber se o componente ACBRSMS, funciona em Delphi 7 ou tem que ser acima Xe10 por exemplo. Pelo que entendi vou precisar de um modem para fazer o envio qual seria o modelo ideal sendo que não tenho porta serial no meu computador. Existe outra forma sem ser por modem ? Abraços

pessoal bom dia, estou desenvolvendo a nova api do ifood, mas não estou conseguindo retorno. Não sei o que estou fazendo errado vou enviar as imagens para ver se alguém pode me ajudar. Pelo RestDebugger não tenho nenhum retorno. Abraços

Pessoal, boa noite, Fiz um teste retirando a função retorna status onde checava a todo momento se o csat =107 antes de emitir o cupom, o problema parou, não sei o que pode ser mas fiz isto deu certo. Fica a dica.

bom dia, já tentei todas configurações esta foi ultima que estou usando, só que o sistema perde a comunicação e entra em contingencia depois ele consegue comunicar e volta ao normal, só que isto fica de 3 em 3 segundo um loop direto entra e sai a todo momento da contingencia e esta gerando vários erros nos cupons inutilizando vários. Estou deixando em contingência direto mas tenho que transmitir depois e o problema continua. Abraços

Bom dia o problema continua, não sei mais o que fazer. Alguém tem alguma solução. Abraços

Boa tarde, O problema em minas continua esta desde o dia 04/06/2021 até hoje 10/06/2021 alguém conseguiu achar uma solução ou o erro é do servidor da receita mesmo? Abraços.