nildglan

Tenho a seguinte estrutura tenho uma aplicação desktop que faz o controle de todos os dados e agora devo fazer uma aplicação web pra emitir uns boletos e devo faze um servidor pra sincronizar os dados entre minha aplicação desktop e web tanto as duas vai emitir boletos Pessoal estou com o seguinte dilema veja como funciona no meu cliente o Contribuinte do meu cliente deve entrar em portal e emitir um boleto com o valor que ele determinar e depois pagar, isso em php mais como agora os boletos são registrados o contribuinte diante dessa situação não pode pagar logo boleto antes de enviar a remessa certo? então em pergunto tem como o próprio contribuinte enviar essa remessa ao banco que no caso é a caixa econômica federal? existe essa possibilidade? porque eu tenho uma aplicação que faço isso mais quem envia a remessa é o cliente que entra no portal com senha e tudo e envia o arquivo de remessa e depois coleta o retorno, eu digo isso porque um concorrente meu informou ao meu cliente que o sistema dele o próprio contribuinte pode enviar. É possível?

Pessoal estou com a seguinte situação Enviei minha remessa pra o banco bradesco com 10 títulos ou boleto e o boleto de numero 1 por exemplo estava com o valor 100,00 reais e a data de vencimento era pra 30 dias , ai o meu cliente veio em meu estabelecimento e falou que vai pagar logo e agora tenho que remove o juros, logo tenho que imprimir novamente pra ele mais tenho também que mandar minha nova remessa pra o banco com essa mudança ou seja ficou o valor de 90,00 reais, e agora pessoal o banco tem que reconhecer esse novo valor. Diante dessa situação liguei pra o banco e o atendente me falou que tenho que informa na remessa esse abatimento gostaria de saber onde faço isso usando o acbr ? e qual o procedimento melhor?

alguem fez o boleto acbr para Bampará?

o meu ta passando de 240 porque se no acbr eu to gerando no loyate 240?

pessoal eu comenteri esse código aqui // Ret := X509_NAME_print_ex(MemBio, AX509Name, 0, // (XN_FLAG_SEP_CPLUS_SPC and XN_FLAG_SEP_MASK) // {$IfDef FPC} or ASN1_STRFLGS_UTF8_CONVERT{$EndIf} ); // Result := BioToStr(MemBio); e passou agora eu pergunto aonde vai precisar em qual componente? porque se eu não utilizar pode ficar

uso o delphi xe10 seattle e ta dando o mesmo erro no mesmo lugar nessa unit ACBrDFeOpenSSL nesses codigo aqui Ret := X509_NAME_print_ex(MemBio, AX509Name, 0, (XN_FLAG_SEP_CPLUS_SPC and XN_FLAG_SEP_MASK) {$IfDef FPC} or ASN1_STRFLGS_UTF8_CONVERT{$EndIf} e ta dando varios erros nessa unt [dcc32 Error] ACBrDFeOpenSSL.pas(1067): E2003 Undeclared identifier: 'X509_NAME_print_ex' [dcc32 Error] ACBrDFeOpenSSL.pas(1068): E2003 Undeclared identifier: 'XN_FLAG_SEP_CPLUS_SPC' [dcc32 Error] ACBrDFeOpenSSL.pas(1068): E2003 Undeclared identifier: 'XN_FLAG_SEP_MASK' ja fiz varias forma e nada, ja limpei instalei de novo

sim fiz a instalação novamente tirei o libary e instalei novamente e da o erro

Pessoal atualizei o acbr e agota da dando erro nessa unit ACBrDFeOpenSSL extamente nesses códigos Ret := X509_NAME_print_ex(MemBio, AX509Name, 0, (XN_FLAG_SEP_CPLUS_SPC and XN_FLAG_SEP_MASK) {$IfDef FPC} or ASN1_STRFLGS_UTF8_CONVERT{$EndIf} e ta dando varios erros nessa unt [dcc32 Error] ACBrDFeOpenSSL.pas(1067): E2003 Undeclared identifier: 'X509_NAME_print_ex' [dcc32 Error] ACBrDFeOpenSSL.pas(1068): E2003 Undeclared identifier: 'XN_FLAG_SEP_CPLUS_SPC' [dcc32 Error] ACBrDFeOpenSSL.pas(1068): E2003 Undeclared identifier: 'XN_FLAG_SEP_MASK' o que tem que adicionar?

Pessoal não estou entendendo o que ta acontecendo eu to gerando um arquivo remessa de c240 no acbr e o banco está me retornando a seguinte mensagem veja: O formato cadastrado em seu convênio para troca de arquivos com o Banco é o CNAB240. Seu arquivo, porém, utiliza o formato CBR641/643 (CNAB400). Orientamos verificar o que ocorreu, a fim de evitar problema no processamento de seu retorno.Se for o caso, solicite a seu gerente de relacionamento, que nos lê por cópia, a alteração do retorno líder para a adequação do formato.Após efetuar as correções, favor encaminhar-nos arquivo para que possamos concluir a validação. e estou enviando no formado 240 segundo a configuração do acbr Unidade de Apoio

o banco pede o codigo do convenio nessa posição o bradesco, só que no fonte do acbr está colocando o codigo do cedente

Fausto mai na hora de gerar o arquivo na Posição 27 a 46 - Gravar código da empresa: 4975161, completar com zeros a esquerda como está vindo porque esse número ai é do convenio e lá no codigo é do codigo cedente na primeira linha como está?

pessoal eu fiz isso veja if ACBrBoleto1.Banco.TipoCobranca= cobBradesco then ACBrBoleto1.Cedente.CodigoCedente:=dm.dtConfigBoletoEMPRESA_CONVENIO.AsString else ACBrBoleto1.Cedente.CodigoCedente:=dm.dtConfigBoletoEMPRESA_CODIGO_SEDENTE.AsString; e gerei o arquivo e mandei e tive o seguinte retorno É necessário que o arquivo R6_10_10_2016.txt gerado pela empresa seja enviado ao Banco para validação. O envio da remessa é realizado pelo Bradesco Net Empresa: www.bradescopj.com.br > Acesso à conta > Seleção do tipo de acesso: Usuário e Senha / ICP Brasil / Certificado Digital > Aba: Transmissão de Arquivos > Selecione o serviço COBRANÇA *** TESTE *** > Adicionar Arquivos > Selecione o arquivo desenvolvido pela empresa > Confirmar > Enviar Arquivos. Registro Header (primeira linha do arquivo): OK Registro de Transação Tipo 1 (detalhe): OK Registro de Transação Tipo 2 (detalhe): OK Registro Trailer (última linha): OK OBS: 1. Análise do arquivo para impressão e postagem dos boletos pela própria empresa 2. No envio do arquivo de teste (conforme instruções), solicitamos que seja enviado no máximo 10 registros por arquivo. 3. Para envio do boleto impresso para validação, favor encaminhar em PDF no máximo 3 boletos para o e-mail:[email protected]. Recomendamos aguardar a validação dos boletos impressos antes de distribui-los aos clientes. Qualquer dúvida na formatação da remessa, preenchimento dos campos ou envio do arquivo, a empresa deverá contatar a Central de Relacionamento ao Cliente PJ pelo telefone 3003-1000 para Capitais e Regiões Metropolitanas, Demais Localidades: 0800 202 1000 de segunda à sexta-feira das 07:00 às 22:00 horas, Sábado e Domingo das 07:00 às 18:00 horas. Caso o arquivo seja enviado até às 18h, o retorno teste estará disponível após as 20h do mesmo dia com as devidas consistências. Se ainda houver qualquer dúvida após o recebimento do retorno, a empresa poderá consultar o layout do produto que está disponível no site do Banco: www.bradesco.com.br > Para sua empresa > Outros Produtos e Serviços > Layout de Arquivo. Devemos enfatizar que visualmente só podemos identificar erros nos dados cadastrais da empresa e por isso é necessário que o cliente faça o envio do arquivo para que o sistema possa validar todas as informações da remessa. não quiz mexer no fonte do acbr, aguem tem alguma sugestão melhor?

Daniel código da montagem da primeira linha está assim var wLinha, ATipoInscricao: String; begin with ACBrBanco.ACBrBoleto.Cedente do begin case TipoInscricao of pFisica : ATipoInscricao := '1'; pJuridica: ATipoInscricao := '2'; else ATipoInscricao := ' '; end; wLinha:= '0' + // ID do Registro '1' + // ID do Arquivo( 1 - Remessa) 'REMESSA' + // Literal de Remessa '01' + // Código do Tipo de Serviço PadRight( 'COBRANCA', 15 ) + // Descrição do tipo de serviço PadLeft( CodigoCedente, 20, '0') + // Codigo da Empresa no Banco PadRight( Nome, 30) + // Nome da Empresa IntToStr( Numero )+ PadRight('BRADESCO', 15) + // Código e Nome do Banco(237 - Bradesco) FormatDateTime('ddmmyy',Now) + Space(08)+'MX' + // Data de geração do arquivo + brancos IntToStrZero(NumeroRemessa,7) + Space(277) + // Nr. Sequencial de Remessa + brancos IntToStrZero(1,6); // Nr. Sequencial de Remessa + brancos + Contador ARemessa.Text:= ARemessa.Text + UpperCase(wLinha); end; pegando o codigo do sedente e o próprio banco me mandou o seguinte - Posição 27 a 46 - Gravar código da empresa: 4975161, completar com zeros a esquerda e esse numero ai é o convenio e não o codigo do centende

na verdade é quero é saber se isso ta em todos esse erro ? porque ta gerando dessa forma em vez de ser o codigo convenio ta colocando o codigo do sedente

Pessoal estou tentando homologar o boleto no bradesco , fiz a geração para o arquivo teste e veja o que eles me responderam Abaixo análise do arquivo R5_7_10_2016: Verificamos as principais posições da remessa e orientamos realizar as alterações abaixo: Registro Header (primeira linha do arquivo): - Posição 27 a 46 - Gravar código da empresa: 4975161, completar com zeros a esquerda Registro de Transação Tipo 1 (detalhe): Ok Registro Trailer (última linha): Ok OBS: 1. Todos os campos devem ser preenchidos da direita para a esquerda, zerando o que restar na esquerda. 2. No envio do arquivo de teste (conforme instruções abaixo), solicitamos que seja enviado no máximo 10 títulos por arquivo. 3. Para envio do boleto impresso para validação, favor encaminhar em PDF no máximo 3 boletos para o e-mail:[email protected]. Após as correções, é necessário que o arquivo gerado pela empresa seja enviado ao Banco para validação. O envio da remessa é realizado pelo Bradesco Net Empresa: www.bradescopj.com.br > Acesso à conta > Seleção do tipo de acesso: Usuário e Senha / ICP Brasil / Certificado Digital > Aba: Transmissão de Arquivos > Selecione o serviço COBRANÇA *** TESTE ***> Adicionar Arquivos > Selecione o arquivo desenvolvido pela empresa > Confirmar > Enviar Arquivos. Qualquer dúvida na formatação da remessa, preenchimento dos campos ou envio do arquivo, a empresa deverá contatar a Central de Relacionamento ao Cliente PJ pelo telefone 3003-1000 para Capitais e Regiões Metropolitanas, Demais Localidades: 0800 202 1000 de segunda à sexta-feira das 07:00 horas às 22:00 horas, Sábado e Domingo das 07:00 às 18:00 horas. Caso o arquivo seja enviado até às 18h, o retorno do arquivo teste estará disponível após as 20h do mesmo dia com as devidas consistências. Se ainda houver qualquer dúvida após o recebimento do retorno, a empresa poderá consultar o layout do produto que está disponível no site do Banco: www.bradesco.com.br > Para sua empresa > Outros Produtos e Serviços > Layout de Arquivo. Devemos enfatizar que visualmente só podemos identificar erros nos dados cadastrais da empresa e por isso é necessário que o cliente faça o envio do arquivo para que o sistema possa validar todas as informações da remessa. agora eu pergunto porque na geração não gravou esse código? pessoal descobrir que esse numero 4975161 é numero do convenio , mais porque o acbr não fez isso? e eu passe os dados ACBrBoleto1.Cedente.CNPJCPF:=dm.dtConfigBoletoEMPRESA_CNPJ.AsString; ACBrBoleto1.Cedente.CodigoCedente:=dm.dtConfigBoletoEMPRESA_CODIGO_SEDENTE.AsString; ACBrBoleto1.Cedente.CodigoTransmissao:=dm.dtConfigBoletoEMPRESA_CODIGO_TRANSMISSAO.AsString; ACBrBoleto1.Cedente.Complemento:=dm.dtConfigBoletoEMPRESA_COMPLEMENTO.AsString; ACBrBoleto1.Cedente.Conta:=dm.dtConfigBoletoEMPRESA_CONTA.AsString; ACBrBoleto1.Cedente.ContaDigito:=dm.dtConfigBoletoEMPRESA_CONTA_DIGITO.AsString; ACBrBoleto1.Cedente.Convenio:=dm.dtConfigBoletoEMPRESA_CONVENIO.AsString; porque agora como deve proceder trocar o codigo cedente por convenio?

é no dm julimar mais o problema é que o boleto envia depois é que da erro

não to com o mesmo problema, vc viu na imagem ai, é como se tivesse um campo com valor errado

Julimar eu removiir o fast antigo deletei da libary e instalei novamente vou te mostrar quando faço o debug a imagem

instalei a versão 5.5 e deu o mesmo erro

a versão que estou usando é a 5.3 qual versão vc recomenda?

pessoal está dando erro nesse código aqui Result := FormatData(FValue, Format); da unit frxClass do fastreport

pessoal eu percebir que ta enviando mais ta gerando o erro mais envia

Pessoal ao tentar enviar o boleto por email está dando o seguinte erro 19 - Data Type conversion is not supported veja como estou fazendo if FilesExists('boleto.pdf') then DeleteFiles('boleto.pdf'); if (optEspecifico.Checked)and (txtInformarParcela.Value < 1) then begin ShowMessage('Informe o numero do boleto válido'); txtInformarParcela.Value; btnFiltar.Enabled:=true; abort; end; if EmailCliente (DMRelatorio1.dtBoletoCODIGO_CLIENTE.AsInteger)='' then begin ShowMessage('Email do cliente não configurado'); btnEnviarBoleto.Enabled:=true; btnFiltar.Enabled:=true; Abort; end; sCaminhoDir:= (ExtractFilePath(Application.ExeName)) ; ACBrBoleto1.ACBrBoletoFC.NomeArquivo := sCaminhoDir + 'boleto.pdf' ; txtMemoMensagemBoleto.Lines.Clear; txtMemoMensagemBoleto.Lines.Add(sMensagemEmail); Application.ProcessMessages; ACBrBoleto1.EnviarEmail(EmailCliente(DMRelatorio1.dtBoletoCODIGO_CLIENTE.AsInteger),'Boleto ref. ao sistema: SIMOB do mês de ' +MesExtensoEmail(CapturarMes) +' do ano: ' +IntToStr(CapturarAno), txtMemoMensagemBoleto.Lines,True, nil,nil); os mais interessante é que tenho um programa que fiz e funciona e ja tentei encontrar o erro e nada, outra coisa só pra lembrar o arquivo pdf está gerando perfeitamente

Pessoal o meu cliente baixou o arquivo retorno pelo gerenciado do banco do brasil e veio esses montes de arquivos veja qual desse é arquivo para leitura? e outra pessoal quando peço pra ler da erro porque não consegue encontrar o arquivo porque está vindo uma barra antes do caminha do arquivo exemplo era pra ser assim C:\Temp\Arquivo.ret , ta vindo assim \C:\Temp\Arquivo.ret e eu vir que o acbr ta fazendo isso nessa linha NomeArq := IncludeTrailingPathDelimiter(fDirArqRetorno) + NomeArqRetorno; e tentei tirar esse comando aqui IncludeTrailingPathDelimiter(fDirArqRetorno) pra ficar só o nome do arquivo só que dando erro informando que não tem a pasta de backup __history dentro da pasta do AcbrBoleto ai não sei se é meu sistema ou não vou tentar atualizar o acbr e também da erro alguém poderia me ajudar com essas duas questão? Retorno.rar

veja o que recebir do banco agora Prezados Segue análise efetuada no último arquivo remessa enviado em 22/03/2016 para analise a este CENOP: Verificamos que o registro ocorreu de acordo com o arquivo remessa. Perceba que o tipo de juros informado no seu arquivo é "valor por dia" e não por taxa mensal como registrado na abertura deste chamado. Em tempo, sugerimos verificar os pontos abaixo na confecção do seu arquivo remessa: ==================================================================================================== Segmento P > Lote 0001 ---------------------------------------------------------------------------------------------------- Posições 110 a 117: Para carteira 17, a data de emissão não pode ser maior que a data do vencimento do título, nem maior que a data de envio de arquivo ==================================================================================================== Segmento Q > Lote 0001 ---------------------------------------------------------------------------------------------------- Posições 152 a 153: Preencher com a UF do sacado ==================================================================================================== as outras questão ja vir só que tenho q trocar o codigo do juro de 1 para dois, não tem como fazer isso?