
GONDIM
Membros-
Total de ítens
59 -
Registro em
-
Última visita
Contact Methods
-
Website URL
http://WWW.INFORSERVICE.COM.BR
Últimos Visitantes
1.362 visualizações
GONDIM's Achievements
-
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;
-
Como retornar todos os cupons emitidos em minas gerais
um tópico no fórum postou GONDIM NFC-e - Nota Fiscal do Consumidor Eletrônica
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. -
nfc-e uso de certificado digital de outra empresa
GONDIM replied to GONDIM's tópico in Dúvidas não relacionadas ao ACBr
o fornecedor enviou apenas a chave. o xml a gente não tem. -
nfc-e uso de certificado digital de outra empresa
GONDIM replied to GONDIM's tópico in Dúvidas não relacionadas ao ACBr
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. -
nfc-e uso de certificado digital de outra empresa
GONDIM replied to GONDIM's tópico in Dúvidas não relacionadas ao ACBr
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 -
nfc-e uso de certificado digital de outra empresa
GONDIM replied to GONDIM's tópico in Dúvidas não relacionadas ao ACBr
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? -
nfc-e uso de certificado digital de outra empresa
GONDIM replied to GONDIM's tópico in Dúvidas não relacionadas ao ACBr
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