informais

Obrigado a Todos pelo empenho em me ajudar, foi resolvido com a dica dos amigos apos a dica do amigo BigWings, Consegui resolver. Agradeço a todos que se empenharam em me ajudar

Olá a Todos, resivei, mas não consequi encontrar o erro.. o erro continua validador-cnab240-cobranca.pdf

Ok Obrigado por Responder... Vou refazer a Conferencia, mas já tinha Feito, Lembrando que estou usando VIA TXT, ou seja estou usando o AcbrMonitorPlus 1.2.0.25 Irei revisar Hoje

Estranho que comparei cada campo do layout tudo parece estar correto... muito estranho mesmo...

Obrigado mais uma vez por responderem Baixei e atualizei o ACBR, resolvido em partes, agora está aparecendo esse erro... A linha 3 do arquivo não foi reconhecida como padrão Febraban CNAB240, não possui exatamente 240 caracteres Estou usando esse link para fazer a validação http://www.sicoob.com.br/validador-cnab240-cobranca?p_auth=tcnwzBTv&p_p_id=validadorcnab_WAR_portalsicoobinternetsp&p_p_lifecycle=1&p_p_state=normal&p_p_mode=view&p_p_col_id=column-1&p_p_col_pos=1&p_p_col_count=2&_validadorcnab_WAR_portalsicoobinternetsp_javax.portlet.action=manterCNAB REM_756_0016.REM validador-cnab240-cobranca.pdf

Muito obrigado por tentar me ajudar. fiz assim *---------------------------------------------------------------------------- * Linha incluida apenas para o banco sicob 756 *---------------------------------------------------------------------------- IF substr(ALLTRIM(T_NUMERO_DO_BANCO),01,03) = '756' Linha := Linha +'DigitoVerificadorAgenciaConta=0' + CHR(13)+CHR(10) ELSE Linha := Linha +'DigitoVerificadorAgenciaConta=' + CHR(13)+CHR(10) ENDIF *---------------------------------------------------------------------------- mas infelizmente o erro ainda continua *---------------------------------------------------------------------------- ORIGEM := oDiretorioMonitor+'\titulo.INI' Canal := FCreate( (ORIGEM),0) *---------------------------------------------------------------------------- Linha := '[Cedente]' + CHR(13)+CHR(10) Linha := Linha +'Nome='+ALLTRIM( IF(bancos->CEDENTE_DIFERENTE='N', M->T_NOME_EMPRESA,bancos->NOME_CEDENTE ) )+ CHR(13)+CHR(10) Linha := Linha +'CNPJCPF='+ALLTRIM(IF(bancos->CEDENTE_DIFERENTE='N',M->T_CNPJ_EMPRESA,alltrim(bancos->CPF_CNPJ_CEDENTE) ) ) + CHR(13)+CHR(10) Linha := Linha +'Logradouro='+ALLTRIM(M->T_ENDE_EMPRESA) + CHR(13)+CHR(10) Linha := Linha +'Numero='+ALLTRIM(M->T_NUME_EMPRESA) + CHR(13)+CHR(10) Linha := Linha +'Bairro='+ALLTRIM(M->T_BAIR_EMPRESA) + CHR(13)+CHR(10) Linha := Linha +'Cidade='+ALLTRIM(M->T_CIDA_EMPRESA) + CHR(13)+CHR(10) Linha := Linha +'CEP='+ tiratraco(ALLTRIM(M->T_CEP__EMPRESA)) + CHR(13)+CHR(10) Linha := Linha +'UF='+ALLTRIM(M->T_ESTA_EMPRESA) + CHR(13)+CHR(10) Linha := Linha +'RespEmis='+ IF(EMPTY(SUBSTR(ALLTRIM(T_RESPONSAVEL_PELA_EMISSAO),01,01)),'0',SUBSTR(ALLTRIM(T_RESPONSAVEL_PELA_EMISSAO),01,01) ) + CHR(13)+CHR(10) &&&& {'','0 - Cliente Emite','1 - Banco Emite','2 - Banco Reemite','3 - Banco Nao Reemite'} Linha := Linha +'TipoPessoa='+ IF(bancos->CEDENTE_DIFERENTE='N','1',IF(bancos->TIPO_CEDENTE='F','0','1') ) + CHR(13)+CHR(10) && 0-Pessoa Física 1-Pessoa Juridica 2-Outros Linha := Linha +'CodigoCedente='+ ALLTRIM(T_CODIGO_CEDENTE) + CHR(13)+CHR(10) *---------------------------------------------------------------------------- IF !EMPTY(ALLTRIM(T_VARIACAO_CARTEIRA)) Linha := Linha +'Modalidade=' + ALLTRIM(T_VARIACAO_CARTEIRA) +CHR(13)+CHR(10) ENDIF *---------------------------------------------------------------------------- Linha := Linha +'LayoutBol='+SUBSTR(ALLTRIM(T_LAYOUT_ACBR_BOLETO),01,01) + CHR(13)+CHR(10) &&&& '0 - Padrao','1 - Carne','2 - Fatura (Padrao)','3 - Padrao Entrega' Linha := Linha +'LayoutBol=0' + CHR(13)+CHR(10) Linha := Linha +'CaracTitulo='+'0'+ CHR(13)+CHR(10) &&& 0 - Cobrança Simples 1-Cobrança Vinculada 2-Cobrança Caucionada 3-Cobrança Descontada 4-Cobrança Vendor IF !EMPTY(ALLTRIM(T_CODIGO_TRANSMISSAO)) Linha := Linha +'CODTRANSMISSAO='+ALLTRIM(T_CODIGO_TRANSMISSAO)+CHR(13)+CHR(10) ENDIF IF ALLTRIM(T_NUMERO_DO_BANCO)='001' Linha := Linha +'CONVENIO='+ ALLTRIM(T_NUMERO_CONVENIO)+CHR(13)+CHR(10) ENDIF *---------------------------------------------------------------------------- Linha := Linha +''+ CHR(13)+CHR(10) Linha := Linha +'[Conta]'+ CHR(13)+CHR(10) Linha := Linha +'Conta='+strzero(val(ALLTRIM(T_NUMERO_CONTA_BANCARIA)),12,0) + CHR(13)+CHR(10) Linha := Linha +'DigitoConta='+ALLTRIM(T_DIGITO_CONTA_BANCARIA) + CHR(13)+CHR(10) Linha := Linha +'Agencia='+strzero(val(ALLTRIM(T_AGEN_BANCO)),05,0) + CHR(13)+CHR(10) Linha := Linha +'DigitoAgencia='+ALLTRIM(T_DGV_AGENCIA) + CHR(13)+CHR(10) *---------------------------------------------------------------------------- * Linha incluida apenas para o banco sicob 756 *---------------------------------------------------------------------------- IF substr(ALLTRIM(T_NUMERO_DO_BANCO),01,03) = '756' Linha := Linha +'DigitoVerificadorAgenciaConta=0' + CHR(13)+CHR(10) ELSE Linha := Linha +'DigitoVerificadorAgenciaConta=' + CHR(13)+CHR(10) ENDIF *---------------------------------------------------------------------------- Linha := Linha +''+ CHR(13)+CHR(10) Linha := Linha +'[Banco]' + CHR(13)+CHR(10) Linha := Linha +'Numero='+substr(ALLTRIM(T_NUMERO_DO_BANCO),01,03)+ CHR(13)+CHR(10) Linha := Linha +'CNAB='+ IF(EMPTY(ALLTRIM(SUBSTR(alltrim(T_LAYOUT_REMESSA),1,1))),'0',SUBSTR(alltrim(T_LAYOUT_REMESSA),1,1)) + CHR(13)+CHR(10) &&&&,"0 - CNAB240","1 - CNAB400" *Linha := Linha +'IndiceACBr='+'3' + CHR(13)+CHR(10) Linha := Linha +'Carteira='+if(empty(alltrim(T_CARTEIRA)),'RG',alltrim(T_CARTEIRA) ) + CHR(13)+CHR(10) Linha := Linha +''+ CHR(13)+CHR(10) *---------------------------------------------------------------------------- FOR nI = 1 to Len( aArray_Boletos_abertas ) IF aArray_Boletos_abertas[nI,01] = 'S' T_TXT_PROCESSANDO := 'Gerando Boletos'+ALLTRIM(STR(SEQ_BOLETO,10,0)) oT_TXT_PROCESSANDO : Refresh() *---------------------------------------------------------------------- T_VALOR_DIARIO_JUROS := ( ((VAL(aArray_Boletos_abertas[nI,08])+VAL(aArray_Boletos_abertas[nI,09])) - val(aArray_Boletos_abertas[nI,21])) * (T_INDICE_MORA_BOLETO / 100) ) *---------------------------------------------------------------------- Linha := Linha +'[Titulo'+ALLTRIM(STR(SEQ_BOLETO,10,0))+']'+ CHR(13)+CHR(10) Linha := Linha +'NumeroDocumento='+alltrim(aArray_Boletos_abertas[nI,03]) + CHR(13)+CHR(10) Linha := Linha +'NossoNumero='+alltrim(aArray_Boletos_abertas[nI,06]) + CHR(13)+CHR(10) Linha := Linha +'Carteira='+if(empty(alltrim(T_CARTEIRA)),'RG',alltrim(T_CARTEIRA)) + CHR(13)+CHR(10) Linha := Linha +'ValorDocumento='+ alltrim( Transform( VAL((aArray_Boletos_abertas[nI,08]))+VAL((aArray_Boletos_abertas[nI,09])),'@E 999999999.99') ) + CHR(13)+CHR(10) Linha := Linha +'Vencimento='+alltrim(aArray_Boletos_abertas[nI,07]) + CHR(13)+CHR(10) Linha := Linha +'ValorMoraJuros='+ alltrim( Transform( T_VALOR_DIARIO_JUROS ,'@E 999999999.99') ) + CHR(13)+CHR(10) Linha := Linha +'DataDocumento='+alltrim(aArray_Boletos_abertas[nI,05]) + CHR(13)+CHR(10) Linha := Linha +'DataProcessamento='+alltrim(aArray_Boletos_abertas[nI,05]) + CHR(13)+CHR(10) Linha := Linha +'DataAbatimento='+alltrim(aArray_Boletos_abertas[nI,07]) + CHR(13)+CHR(10) Linha := Linha +'DataDesconto='+alltrim(aArray_Boletos_abertas[nI,07]) + CHR(13)+CHR(10) Linha := Linha +'DataMoraJuros='+alltrim( DTOC(CTOD(aArray_Boletos_abertas[nI,07])) ) + CHR(13)+CHR(10) Linha := Linha +'DiasDeProtesto='+alltrim( alltrim(str(T_DIAS_PROTESTO,05,0)) ) + CHR(13)+CHR(10) Linha := Linha +'DataProtesto='+alltrim( IF(T_DIAS_PROTESTO>0,DTOC(CTOD(aArray_Boletos_abertas[nI,07])+IF(T_DIAS_PROTESTO<0,5,T_DIAS_PROTESTO)), DTOC(CTOD('')) ) ) + CHR(13)+CHR(10) Linha := Linha +'DataMulta='+alltrim(aArray_Boletos_abertas[nI,07]) + CHR(13)+CHR(10) Linha := Linha +'ValorAbatimento='+'0,00'+ CHR(13)+CHR(10) Linha := Linha +'ValorDesconto='+alltrim( Transform( VAL((aArray_Boletos_abertas[nI,21])),'@E 999999999.99') )+ CHR(13)+CHR(10) Linha := Linha +'ValorMoraJuros='+ alltrim( Transform( T_VALOR_DIARIO_JUROS ,'@E 999999999.99') ) + CHR(13)+CHR(10) Linha := Linha +'ValorIOF='+ alltrim( Transform( 0 ,'@E 999999999.99') ) + CHR(13)+CHR(10) Linha := Linha +'ValorOutrasDespesas='+ alltrim( Transform( 0 ,'@E 999999999.99') ) + CHR(13)+CHR(10) Linha := Linha +'MultaValorFixo='+ alltrim( Transform( 0 ,'@E 999999999.99') ) + CHR(13)+CHR(10) Linha := Linha +'PercentualMulta='+ alltrim( Transform( 0 ,'@E 999999999.99') ) + CHR(13)+CHR(10) Linha := Linha +'LocalPagamento='+ ALLTRIM(T_LOCAL_PAGAMENTO) + CHR(13)+CHR(10) Linha := Linha +'Especie='+ if(empty(alltrim(aArray_Boletos_abertas[nI,04])),'DM',alltrim(aArray_Boletos_abertas[nI,04])) + CHR(13)+CHR(10) Linha := Linha +'EspecieMod='+alltrim(M->cSimb) + CHR(13)+CHR(10) &&&&& R$ Linha := Linha +'Sacado.NomeSacado='+ alltrim(aArray_Boletos_abertas[nI,11]) + CHR(13)+CHR(10) Linha := Linha +'Sacado.CNPJCPF='+alltrim(aArray_Boletos_abertas[nI,44]) + CHR(13)+CHR(10) Linha := Linha +'Sacado.Pessoa='+ if(len(alltrim(aArray_Boletos_abertas[nI,44]))=11,'0','1')+ CHR(13)+CHR(10) Linha := Linha +'Sacado.Logradouro='+alltrim(aArray_Boletos_abertas[nI,41]) + CHR(13)+CHR(10) Linha := Linha +'Sacado.Numero='+alltrim(aArray_Boletos_abertas[nI,42]) + CHR(13)+CHR(10) Linha := Linha +'Sacado.Bairro='+alltrim(aArray_Boletos_abertas[nI,43]) + CHR(13)+CHR(10) Linha := Linha +'Sacado.Complemento='+'' + CHR(13)+CHR(10) Linha := Linha +'Sacado.Cidade='+alltrim(aArray_Boletos_abertas[nI,48]) + CHR(13)+CHR(10) Linha := Linha +'Sacado.UF='+alltrim(aArray_Boletos_abertas[nI,47])+ CHR(13)+CHR(10) Linha := Linha +'Sacado.CEP='+ alltrim(aArray_Boletos_abertas[nI,46]) + CHR(13)+CHR(10) Linha := Linha +'Sacado.Email='+' '+ CHR(13)+CHR(10) *------dia 06-11-2018--------------------------------------------------- Linha := Linha +'Sacado.SacadoAvalista.NomeAvalista='+ CHR(13)+CHR(10) Linha := Linha +'Sacado.SacadoAvalista.CNPJCPF='+ CHR(13)+CHR(10) Linha := Linha +'Sacado.SacadoAvalista.Logradouro='+ CHR(13)+CHR(10) Linha := Linha +'Sacado.SacadoAvalista.Numero='+ CHR(13)+CHR(10) Linha := Linha +'Sacado.SacadoAvalista.Complemento='+ CHR(13)+CHR(10) Linha := Linha +'Sacado.SacadoAvalista.Bairro='+ CHR(13)+CHR(10) Linha := Linha +'Sacado.SacadoAvalista.Cidade='+ CHR(13)+CHR(10) Linha := Linha +'Sacado.SacadoAvalista.UF='+ CHR(13)+CHR(10) Linha := Linha +'Sacado.SacadoAvalista.CEP='+ CHR(13)+CHR(10) Linha := Linha +'Sacado.SacadoAvalista.Email='+ CHR(13)+CHR(10) Linha := Linha +'Sacado.SacadoAvalista.Fone='+ CHR(13)+CHR(10) Linha := Linha +'Sacado.SacadoAvalista.InscricaoNr='+ CHR(13)+CHR(10) *---------------------------------------------------------------------- Linha := Linha +'Mensagem=' +'Id.:'+ALLTRIM(STR(VAL(aArray_Boletos_abertas[nI,03]),10,0)) + ' '+ alltrim(aArray_Boletos_abertas[nI,15]) + CHR(13)+CHR(10) Linha := Linha +'Instrucao1=10' + CHR(13)+CHR(10) Linha := Linha +'Instrucao2=11' + CHR(13)+CHR(10) Linha := Linha +'Aceite='+if(alltrim(aArray_Boletos_abertas[nI,18])='S','1','2') + CHR(13)+CHR(10) Linha := Linha +'OcorrenciaOriginal.TipoOcorrencia='+alltrim(aArray_Boletos_abertas[nI,12])+ CHR(13)+CHR(10) Linha := Linha +'Parcela=1' + CHR(13)+CHR(10) Linha := Linha +'TotalParcelas=1' + CHR(13)+CHR(10) Linha := Linha +'SeuNumero='+alltrim(aArray_Boletos_abertas[nI,03]) + CHR(13)+CHR(10) Linha := Linha +'TipoDiasProtesto=0' + CHR(13)+CHR(10) &&& Como preencher o campo TipoDiasProtesto (Tipo de Ocorrência) 0 - Dias corridos 1 - Dias úteis Linha := Linha +'TipoImpressao=1'+ CHR(13)+CHR(10) Linha := Linha +'TipoDesconto=0' + CHR(13)+CHR(10) Linha := Linha +'TipoDesconto2=0' + CHR(13)+CHR(10) Linha := Linha +''+ CHR(13)+CHR(10) *---------------------------------------------------------------------------- *---------------------------------------------------------------------- * alltrim( Transform( (((T_VALOR_BOLETO+T_CUSTO_EMISSAO)-T_DESCONTO) * (bancos_instrucoes->MORA_ATRASO / 100)) 1-Valor por Dia,2-Taxa Mensal,3-Isento,4-Acata Cadastramento CAIXA' *---------------------------------------------------------------------- IF T_INDICE_MORA_BOLETO > 0 Linha := Linha +'CodigoMora=1'+ CHR(13)+CHR(10) T_VALOR_DIARIO_JUROS := ( ((VAL(aArray_Boletos_abertas[nI,08])+VAL(aArray_Boletos_abertas[nI,09])) - val(aArray_Boletos_abertas[nI,21])) * (T_INDICE_MORA_BOLETO / 100) ) ENDIF *---------------------------------------------------------------------- * Se nao colocar esse campo (DataProtesto) ele nao passa *---------------------------------------------------------------------- *---------------------------------------------------------------------- IF T_DIAS_PROTESTO <= 0 Linha := Linha +'DataBaixa='+alltrim( DTOC(CTOD(aArray_Boletos_abertas[nI,07])+5) ) + CHR(13)+CHR(10) ENDIF SEQ_BOLETO := SEQ_BOLETO + 1 ENDIF NEXT fWrite( Canal, Linha ) FClose( Canal ) REM_756_0012.REM validador-cnab240-cobranca_REMESSA_12.pdf

Obrigado por me responder anexo o arquivo de remessa REM_756_0011.REM

Estou usando o AcbrMonitorPlus 1.2.0.24, e mesmo assim está com erros Estou passando os parametros ao gerar o arquivo de remessa, estou usando XHARBOR Linha := '[Cedente]' + CHR(13)+CHR(10) Linha := Linha +'Nome='+ALLTRIM( IF(bancos->CEDENTE_DIFERENTE='N', M->T_NOME_EMPRESA,bancos->NOME_CEDENTE ) )+ CHR(13)+CHR(10) Linha := Linha +'CNPJCPF='+ALLTRIM(IF(bancos->CEDENTE_DIFERENTE='N',M->T_CNPJ_EMPRESA,alltrim(bancos->CPF_CNPJ_CEDENTE) ) ) + CHR(13)+CHR(10) Linha := Linha +'Logradouro='+ALLTRIM(M->T_ENDE_EMPRESA) + CHR(13)+CHR(10) Linha := Linha +'Numero='+ALLTRIM(M->T_NUME_EMPRESA) + CHR(13)+CHR(10) Linha := Linha +'Bairro='+ALLTRIM(M->T_BAIR_EMPRESA) + CHR(13)+CHR(10) Linha := Linha +'Cidade='+ALLTRIM(M->T_CIDA_EMPRESA) + CHR(13)+CHR(10) Linha := Linha +'CEP='+ tiratraco(ALLTRIM(M->T_CEP__EMPRESA)) + CHR(13)+CHR(10) Linha := Linha +'UF='+ALLTRIM(M->T_ESTA_EMPRESA) + CHR(13)+CHR(10) Linha := Linha +'RespEmis='+ IF(EMPTY(SUBSTR(ALLTRIM(T_RESPONSAVEL_PELA_EMISSAO),01,01)),'0',SUBSTR(ALLTRIM(T_RESPONSAVEL_PELA_EMISSAO),01,01) ) + CHR(13)+CHR(10) &&&& {'','0 - Cliente Emite','1 - Banco Emite','2 - Banco Reemite','3 - Banco Nao Reemite'} Linha := Linha +'TipoPessoa='+ IF(bancos->CEDENTE_DIFERENTE='N','1',IF(bancos->TIPO_CEDENTE='F','0','1') ) + CHR(13)+CHR(10) && 0-Pessoa Física 1-Pessoa Juridica 2-Outros Linha := Linha +'CodigoCedente='+ ALLTRIM(T_CODIGO_CEDENTE) + CHR(13)+CHR(10) *---------------------------------------------------------------------------- IF !EMPTY(ALLTRIM(T_VARIACAO_CARTEIRA)) Linha := Linha +'Modalidade=' + ALLTRIM(T_VARIACAO_CARTEIRA) +CHR(13)+CHR(10) ENDIF *---------------------------------------------------------------------------- Linha := Linha +'LayoutBol='+SUBSTR(ALLTRIM(T_LAYOUT_ACBR_BOLETO),01,01) + CHR(13)+CHR(10) &&&& '0 - Padrao','1 - Carne','2 - Fatura (Padrao)','3 - Padrao Entrega' Linha := Linha +'LayoutBol=0' + CHR(13)+CHR(10) Linha := Linha +'CaracTitulo='+'0'+ CHR(13)+CHR(10) &&& 0 - Cobrança Simples 1-Cobrança Vinculada 2-Cobrança Caucionada 3-Cobrança Descontada 4-Cobrança Vendor IF !EMPTY(ALLTRIM(T_CODIGO_TRANSMISSAO)) Linha := Linha +'CODTRANSMISSAO='+ALLTRIM(T_CODIGO_TRANSMISSAO)+CHR(13)+CHR(10) ENDIF IF ALLTRIM(T_NUMERO_DO_BANCO)='001' Linha := Linha +'CONVENIO='+ ALLTRIM(T_NUMERO_CONVENIO)+CHR(13)+CHR(10) ENDIF *---------------------------------------------------------------------------- Linha := Linha +''+ CHR(13)+CHR(10) Linha := Linha +'[Conta]'+ CHR(13)+CHR(10) Linha := Linha +'Conta='+strzero(val(ALLTRIM(T_NUMERO_CONTA_BANCARIA)),12,0) + CHR(13)+CHR(10) Linha := Linha +'DigitoConta='+ALLTRIM(T_DIGITO_CONTA_BANCARIA) + CHR(13)+CHR(10) Linha := Linha +'Agencia='+strzero(val(ALLTRIM(T_AGEN_BANCO)),05,0) + CHR(13)+CHR(10) Linha := Linha +'DigitoAgencia='+ALLTRIM(T_DGV_AGENCIA) + CHR(13)+CHR(10) * Linha incluida apenas para o banco sicob 756 Linha := Linha +'DigitoVerificadorAgenciaConta=' + CHR(13)+CHR(10) *---------------------------------------------------------------------------- Linha := Linha +''+ CHR(13)+CHR(10) Linha := Linha +'[Banco]' + CHR(13)+CHR(10) Linha := Linha +'Numero='+substr(ALLTRIM(T_NUMERO_DO_BANCO),01,03)+ CHR(13)+CHR(10) Linha := Linha +'CNAB='+ IF(EMPTY(ALLTRIM(SUBSTR(alltrim(T_LAYOUT_REMESSA),1,1))),'0',SUBSTR(alltrim(T_LAYOUT_REMESSA),1,1)) + CHR(13)+CHR(10) &&&&,"0 - CNAB240","1 - CNAB400" *Linha := Linha +'IndiceACBr='+'3' + CHR(13)+CHR(10) Linha := Linha +'Carteira='+if(empty(alltrim(T_CARTEIRA)),'RG',alltrim(T_CARTEIRA) ) + CHR(13)+CHR(10) Linha := Linha +''+ CHR(13)+CHR(10) *---------------------------------------------------------------------------- FOR nI = 1 to Len( aArray_Boletos_abertas ) IF aArray_Boletos_abertas[nI,01] = 'S' T_TXT_PROCESSANDO := 'Gerando Boletos'+ALLTRIM(STR(SEQ_BOLETO,10,0)) oT_TXT_PROCESSANDO : Refresh() Linha := Linha +'[Titulo'+ALLTRIM(STR(SEQ_BOLETO,10,0))+']'+ CHR(13)+CHR(10) Linha := Linha +'NumeroDocumento='+alltrim(aArray_Boletos_abertas[nI,03]) + CHR(13)+CHR(10) Linha := Linha +'NossoNumero='+alltrim(aArray_Boletos_abertas[nI,06]) + CHR(13)+CHR(10) Linha := Linha +'Carteira='+if(empty(alltrim(T_CARTEIRA)),'RG',alltrim(T_CARTEIRA)) + CHR(13)+CHR(10) Linha := Linha +'ValorDocumento='+ alltrim( Transform( VAL((aArray_Boletos_abertas[nI,08]))+VAL((aArray_Boletos_abertas[nI,09])),'@E 999999999.99') ) + CHR(13)+CHR(10) Linha := Linha +'Vencimento='+alltrim(aArray_Boletos_abertas[nI,07]) + CHR(13)+CHR(10) Linha := Linha +'DataDocumento='+alltrim(aArray_Boletos_abertas[nI,05]) + CHR(13)+CHR(10) Linha := Linha +'DataProcessamento='+alltrim(aArray_Boletos_abertas[nI,05]) + CHR(13)+CHR(10) Linha := Linha +'DataAbatimento='+alltrim(aArray_Boletos_abertas[nI,07]) + CHR(13)+CHR(10) Linha := Linha +'DataDesconto='+alltrim(aArray_Boletos_abertas[nI,07]) + CHR(13)+CHR(10) *Linha := Linha +'DataMoraJuros='+alltrim( DTOC(CTOD(aArray_Boletos_abertas[nI,07])+1) ) + CHR(13)+CHR(10) Linha := Linha +'DataMoraJuros='+alltrim( DTOC(CTOD(aArray_Boletos_abertas[nI,07])) ) + CHR(13)+CHR(10) *---------------------------------------------------------------------- * alltrim( Transform( (((T_VALOR_BOLETO+T_CUSTO_EMISSAO)-T_DESCONTO) * (bancos_instrucoes->MORA_ATRASO / 100)) 1-Valor por Dia,2-Taxa Mensal,3-Isento,4-Acata Cadastramento CAIXA' *---------------------------------------------------------------------- IF T_INDICE_MORA_BOLETO > 0 Linha := Linha +'CodigoMora=1'+ CHR(13)+CHR(10) T_VALOR_DIARIO_JUROS := ( ((VAL(aArray_Boletos_abertas[nI,08])+VAL(aArray_Boletos_abertas[nI,09])) - val(aArray_Boletos_abertas[nI,21])) * (T_INDICE_MORA_BOLETO / 100) ) Linha := Linha +'ValorMoraJuros='+ alltrim( Transform( T_VALOR_DIARIO_JUROS ,'@E 999999999.99') ) + CHR(13)+CHR(10) ENDIF *---------------------------------------------------------------------- * Se nao colocar esse campo (DataProtesto) ele nao passa *---------------------------------------------------------------------- Linha := Linha +'DataProtesto='+alltrim( IF(T_DIAS_PROTESTO>0,DTOC(CTOD(aArray_Boletos_abertas[nI,07])+IF(T_DIAS_PROTESTO<0,5,T_DIAS_PROTESTO)), DTOC(CTOD('')) ) ) + CHR(13)+CHR(10) *---------------------------------------------------------------------- IF T_DIAS_PROTESTO <= 0 Linha := Linha +'DataBaixa='+alltrim( DTOC(CTOD(aArray_Boletos_abertas[nI,07])+5) ) + CHR(13)+CHR(10) ENDIF Linha := Linha +'ValorAbatimento='+'0,00'+ CHR(13)+CHR(10) Linha := Linha +'ValorDesconto='+alltrim( Transform( VAL((aArray_Boletos_abertas[nI,21])),'@E 999999999.99') )+ CHR(13)+CHR(10) Linha := Linha +'LocalPagamento='+ ALLTRIM(T_LOCAL_PAGAMENTO) + CHR(13)+CHR(10) Linha := Linha +'Especie='+ if(empty(alltrim(aArray_Boletos_abertas[nI,04])),'DM',alltrim(aArray_Boletos_abertas[nI,04])) + CHR(13)+CHR(10) Linha := Linha +'EspecieMod='+alltrim(M->cSimb) + CHR(13)+CHR(10) *Estava Assim **Linha := Linha +'EspecieMod=09' + CHR(13)+CHR(10) Linha := Linha +'Sacado.NomeSacado='+ alltrim(aArray_Boletos_abertas[nI,11]) + CHR(13)+CHR(10) Linha := Linha +'Sacado.CNPJCPF='+alltrim(aArray_Boletos_abertas[nI,44]) + CHR(13)+CHR(10) Linha := Linha +'Sacado.Pessoa='+ if(len(alltrim(aArray_Boletos_abertas[nI,44]))=11,'0','1')+ CHR(13)+CHR(10) Linha := Linha +'Sacado.Logradouro='+alltrim(aArray_Boletos_abertas[nI,41]) + CHR(13)+CHR(10) Linha := Linha +'Sacado.Numero='+alltrim(aArray_Boletos_abertas[nI,42]) + CHR(13)+CHR(10) Linha := Linha +'Sacado.Bairro='+alltrim(aArray_Boletos_abertas[nI,43]) + CHR(13)+CHR(10) Linha := Linha +'Sacado.Complemento='+'' + CHR(13)+CHR(10) Linha := Linha +'Sacado.Cidade='+alltrim(aArray_Boletos_abertas[nI,48]) + CHR(13)+CHR(10) Linha := Linha +'Sacado.UF='+alltrim(aArray_Boletos_abertas[nI,47])+ CHR(13)+CHR(10) Linha := Linha +'Sacado.CEP='+ alltrim(aArray_Boletos_abertas[nI,46]) + CHR(13)+CHR(10) Linha := Linha +'Sacado.Email='+' '+ CHR(13)+CHR(10) Linha := Linha +'Mensagem=' +'Id.:'+ALLTRIM(STR(VAL(aArray_Boletos_abertas[nI,03]),10,0)) + ' '+ alltrim(aArray_Boletos_abertas[nI,15]) + CHR(13)+CHR(10) Linha := Linha +'Instrucao1=10' + CHR(13)+CHR(10) Linha := Linha +'Instrucao2=11' + CHR(13)+CHR(10) Linha := Linha +'Aceite='+if(alltrim(aArray_Boletos_abertas[nI,18])='S','1','2') + CHR(13)+CHR(10) Linha := Linha +'OcorrenciaOriginal.TipoOcorrencia='+alltrim(aArray_Boletos_abertas[nI,12])+ CHR(13)+CHR(10) Linha := Linha +'Parcela=1' + CHR(13)+CHR(10) Linha := Linha +'TotalParcelas=1' + CHR(13)+CHR(10) Linha := Linha +'SeuNumero='+alltrim(aArray_Boletos_abertas[nI,03]) + CHR(13)+CHR(10) Linha := Linha +'TipoDiasProtesto=0' + CHR(13)+CHR(10) &&& Como preencher o campo TipoDiasProtesto (Tipo de Ocorrência) 0 - Dias corridos 1 - Dias úteis Linha := Linha +'TipoImpressao=1'+ CHR(13)+CHR(10) Linha := Linha +''+ CHR(13)+CHR(10) *---------------------------------------------------------------------------- SEQ_BOLETO := SEQ_BOLETO + 1 ENDIF NEXT fWrite( Canal, Linha ) FClose( Canal )

olá amigo, agora só estou com esse problema 19.0 Seqüência (NSA) Número Seqüencial do Arquivo 158 163 6 - Num *G018 G018 Número Seqüencial do Arquivo Número seqüencial adotado e controlado pelo responsável pela geração do arquivo para ordenar a disposição dos arquivos encaminhados. Evoluir um número seqüencial a cada header de arquivo. Para gerar o arquivo estou fazendo assim Linha := 'BOLETO.GerarRemessa(C:\ACBrMonitorPLUS\,1,'+(NOME_BOLETO)+') ' + CHR(13)+CHR(10) fWrite( Canal, Linha ) FClose( Canal ) Preciso de uma forma colocar o numero sequencial da remessa. mesmo eu gerando 10 arquivos ele gera como sendo 0001 obrigado

Anexo manual que o pessoal do banco me mandou Página 9 do manual anexo Documento_cnab240.pdf Vamos partes por partes Primeiro arquivo de remessa que gerei, (cheio de erros) **** Este aplicativo não pode ser utilizado como única forma de validação **** ======================================== HEADER ======================================== Cedente centralizador: A F GUIMARAES E CIA LTDA Tipo de remessa: REMESSA-PRODUCAO Banco: CAIXA ECONOMICA FEDERAL Geracao: 22/11/2016 as 15:51:47 seq 000001 Convenio: 820709 Inscricao: 04.240.667/0001-12 Erro no HEADER. Codigos de erro: DV AGENCIA inválido na posição 58 ====================================== CAPA DE LOTE ==================================== Num remessa: 00000001 Gravacao: 22/11/2016 Convenio: 820709 Inscricao: 04.240.667/0001-12 ====================== Erro na capa de lote. Codigos de erro: DV AGENCIA inválido na posição 59 ================== Linha 3 SEGMENTO P. Codigos de erro: (09.3P) 12.3P, deveria ser 14 ou 11 ou 21 Este Título tem que estar marcado para protestar ou devolver. Data Emissão do título não pode ser igual ou posterior a data vencimento. Titulo com Nosso Numero de Registrada marcado como Sem Registro na posição 41 Linha 4 SEGMENTO Q. Codigos de erro: (20.3Q,21.3Q,22.3Q) Linha 6 SEGMENTO P. Codigos de erro: (09.3P) 12.3P, deveria ser 14 ou 11 ou 21 Este Título tem que estar marcado para protestar ou devolver. Titulo com Nosso Numero de Registrada marcado como Sem Registro na posição 41 Linha 7 SEGMENTO Q. Codigos de erro: (20.3Q,21.3Q,22.3Q) Linha 9 SEGMENTO P. Codigos de erro: (09.3P) 12.3P, deveria ser 14 ou 11 ou 21 Este Título tem que estar marcado para protestar ou devolver. Titulo com Nosso Numero de Registrada marcado como Sem Registro na posição 41 Linha 10 SEGMENTO Q. Codigos de erro: (20.3Q,21.3Q,22.3Q) Linha 12 SEGMENTO P. Codigos de erro: (09.3P) 12.3P, deveria ser 14 ou 11 ou 21 Este Título tem que estar marcado para protestar ou devolver. Titulo com Nosso Numero de Registrada marcado como Sem Registro na posição 41 Linha 13 SEGMENTO Q. Codigos de erro: (20.3Q,21.3Q,22.3Q) Linha 15 SEGMENTO P. Codigos de erro: (09.3P) 12.3P, deveria ser 14 ou 11 ou 21 Este Título tem que estar marcado para protestar ou devolver. Data Emissão do título não pode ser igual ou posterior a data vencimento. Titulo com Nosso Numero de Registrada marcado como Sem Registro na posição 41 Linha 16 SEGMENTO Q. Codigos de erro: (20.3Q,21.3Q,22.3Q) Total de registros do lote = 16 FIM DA VALIDAÇÃO, VERIFIQUE OS ERROS !!! Segunda Tentativa de Homologação **** Este aplicativo não pode ser utilizado como única forma de validação **** ======================================== HEADER ======================================== Cedente centralizador: A F GUIMARAES E CIA LTDA Tipo de remessa: REMESSA-PRODUCAO Banco: CAIXA ECONOMICA FEDERAL Geracao: 24/11/2016 as 10:37:35 seq 000001 Convenio: 820709 Inscricao: 04.240.667/0001-12 ======================================== HEADER OK ===================================== ====================================== CAPA DE LOTE ==================================== Num remessa: 00000001 Gravacao: 24/11/2016 Convenio: 820709 Inscricao: 04.240.667/0001-12 ===================================== CAPA DE LOTE OK ================================== Linha 3 SEGMENTO P. Codigos de erro: Este Título tem que estar marcado para protestar ou devolver. Desconto não pode ser maior ou igual ao valor do título. Linha 4 SEGMENTO Q. Codigos de erro: (20.3Q,21.3Q,22.3Q) Linha 6 SEGMENTO P. Codigos de erro: Este Título tem que estar marcado para protestar ou devolver. Linha 7 SEGMENTO Q. Codigos de erro: (20.3Q,21.3Q,22.3Q) Linha 9 SEGMENTO P. Codigos de erro: Este Título tem que estar marcado para protestar ou devolver. Linha 10 SEGMENTO Q. Codigos de erro: (20.3Q,21.3Q,22.3Q) Linha 12 SEGMENTO P. Codigos de erro: Este Título tem que estar marcado para protestar ou devolver. Linha 13 SEGMENTO Q. Codigos de erro: (20.3Q,21.3Q,22.3Q) Linha 15 SEGMENTO P. Codigos de erro: Este Título tem que estar marcado para protestar ou devolver. Linha 16 SEGMENTO Q. Codigos de erro: (20.3Q,21.3Q,22.3Q) Linha 18 SEGMENTO P. Codigos de erro: Este Título tem que estar marcado para protestar ou devolver. Linha 19 SEGMENTO Q. Codigos de erro: (20.3Q,21.3Q,22.3Q) Total de registros do lote = 19 FIM DA VALIDAÇÃO, VERIFIQUE OS ERROS !!! Terceira Tentativa **** Este aplicativo não pode ser utilizado como única forma de validação **** ======================================== HEADER ======================================== Cedente centralizador: A F GUIMARAES E CIA LTDA Tipo de remessa: REMESSA-PRODUCAO Banco: CAIXA ECONOMICA FEDERAL Geracao: 24/11/2016 as 10:37:35 seq 000001 Convenio: 820709 Inscricao: 04.240.667/0001-12 ======================================== HEADER OK ===================================== ====================================== CAPA DE LOTE ==================================== Num remessa: 00000001 Gravacao: 24/11/2016 Convenio: 820709 Inscricao: 04.240.667/0001-12 ===================================== CAPA DE LOTE OK ================================== Linha 3 SEGMENTO P. Codigos de erro: Este Título tem que estar marcado para protestar ou devolver ou cancelar protesto. Desconto não pode ser maior ou igual ao valor do título. Para -> NN: 14/000000000000002 SeuN: 1576 Linha 6 SEGMENTO P. Codigos de erro: Este Título tem que estar marcado para protestar ou devolver ou cancelar protesto. Para -> NN: 14/000000000000001 SeuN: 1575 Linha 9 SEGMENTO P. Codigos de erro: Este Título tem que estar marcado para protestar ou devolver ou cancelar protesto. Para -> NN: 14/000000000002101 SeuN: 1574 Linha 12 SEGMENTO P. Codigos de erro: Este Título tem que estar marcado para protestar ou devolver ou cancelar protesto. Para -> NN: 14/000000000005551 SeuN: 1573 Linha 15 SEGMENTO P. Codigos de erro: Este Título tem que estar marcado para protestar ou devolver ou cancelar protesto. Para -> NN: 14/000000000005551 SeuN: 1572 Linha 18 SEGMENTO P. Codigos de erro: Este Título tem que estar marcado para protestar ou devolver ou cancelar protesto. Para -> NN: 14/000000000000001 SeuN: 1571 Total de registros do lote = 19 FIM DA VALIDAÇÃO, VERIFIQUE OS ERROS !!! Quarta Tentativa (nesta ultima ele me disse que tem que retirar o Seguimento R do arquivo) **** Este aplicativo não pode ser utilizado como única forma de validação **** ======================================== HEADER ======================================== Cedente centralizador: A F GUIMARAES E CIA LTDA Tipo de remessa: REMESSA-PRODUCAO Banco: CAIXA ECONOMICA FEDERAL Geracao: 19/12/2016 as 09:24:56 seq 000001 Convenio: 820709 Inscricao: 04.240.667/0001-12 ======================================== HEADER OK ===================================== ====================================== CAPA DE LOTE ==================================== Num remessa: 00000001 Gravacao: 19/12/2016 Convenio: 820709 Inscricao: 04.240.667/0001-12 ===================================== CAPA DE LOTE OK ================================== Linha 4 SEGMENTO Q. Codigos de erro: (20.3Q,21.3Q,22.3Q) Linha 5 Total de registros do lote não confere !! informado 5 calculado 4 Linha 6 Total de registros do arquivo não confere !! FIM DA VALIDAÇÃO, VERIFIQUE OS ERROS !!! Ai lascou.... Não vi como resolver

Apos Varios Telefonemas o banco me retornou essa validação Tipo de remessa: REMESSA-PRODUCAO Banco: CAIXA ECONOMICA FEDERAL Geracao: 19/12/2016 as 09:24:56 seq 000001 Convenio: 820709 Inscricao: 04.240.667/0001-12 ======================================== HEADER OK ===================================== ====================================== CAPA DE LOTE ==================================== Num remessa: 00000001 Gravacao: 19/12/2016 Convenio: 820709 Inscricao: 04.240.667/0001-12 ===================================== CAPA DE LOTE OK ================================== Linha 4 SEGMENTO Q. Codigos de erro: (20.3Q,21.3Q,22.3Q) Linha 5 Total de registros do lote não confere !! informado 5 calculado 4 Linha 6 Total de registros do arquivo não confere !! FIM DA VALIDAÇÃO, VERIFIQUE OS ERROS !!! Por fim eles me pediram para retirar o Seguimento R, mas isso nao tem como eu Setar o ACBr MonitorPLUS Ver.1.0.0.10

Tem idiea de quando será compilado Daniel Simões de Almeida

o acbrmonitor já esta atualizado e compilado com essa versão

Bom dia o meu está dando esse erro **** Este aplicativo não pode ser utilizado como única forma de validação **** ======================================== HEADER ======================================== Cedente centralizador: NOME DA EMPRESA E CIA LTDA Tipo de remessa: REMESSA-PRODUCAO Banco: CAIXA ECONOMICA FEDERAL Geracao: 19/12/2016 as 09:24:56 seq 000001 Convenio: 820709 Inscricao: 99.999.9999/0001-12 ======================================== HEADER OK ===================================== ====================================== CAPA DE LOTE ==================================== Num remessa: 00000001 Gravacao: 19/12/2016 Convenio: 820709 Inscricao: 04.240.667/0001-12 ===================================== CAPA DE LOTE OK ================================== Linha 4 SEGMENTO Q. Codigos de erro: (20.3Q,21.3Q,22.3Q) Linha 5 Total de registros do lote não confere !! informado 5 calculado 4 Linha 6 Total de registros do arquivo não confere !! FIM DA VALIDAÇÃO, VERIFIQUE OS ERROS !!!

Probelmas para geracao de arquivo de remessa da caixa ec. federal CNAB 240 O que pode estar errado *** Este aplicativo não pode ser utilizado como única forma de validação **** ======================================== HEADER ======================================== Cedente centralizador: A F GxxxxxxES E CIA LTDA Tipo de remessa: REMESSA-PRODUCAO Banco: CAIXA ECONOMICA FEDERAL Geracao: 24/11/2016 as 10:37:35 seq 000001 Convenio: 820709 Inscricao: 04.xxx.667/0001-12 ======================================== HEADER OK ===================================== ====================================== CAPA DE LOTE ==================================== Num remessa: 00000001 Gravacao: 24/11/2016 Convenio: 820709 Inscricao: 04.240.667/0001-12 ===================================== CAPA DE LOTE OK ================================== Linha 3 SEGMENTO P. Codigos de erro: Este Título tem que estar marcado para protestar ou devolver ou cancelar protesto. Desconto não pode ser maior ou igual ao valor do título. Para -> NN: 14/000000000000002 SeuN: 1576 Linha 6 SEGMENTO P. Codigos de erro: Este Título tem que estar marcado para protestar ou devolver ou cancelar protesto. Para -> NN: 14/000000000000001 SeuN: 1575 Linha 9 SEGMENTO P. Codigos de erro: Este Título tem que estar marcado para protestar ou devolver ou cancelar protesto. Para -> NN: 14/000000000002101 SeuN: 1574 Linha 12 SEGMENTO P. Codigos de erro: Este Título tem que estar marcado para protestar ou devolver ou cancelar protesto. Para -> NN: 14/000000000005551 SeuN: 1573 Linha 15 SEGMENTO P. Codigos de erro: Este Título tem que estar marcado para protestar ou devolver ou cancelar protesto. Para -> NN: 14/000000000005551 SeuN: 1572 Linha 18 SEGMENTO P. Codigos de erro: Este Título tem que estar marcado para protestar ou devolver ou cancelar protesto. Para -> NN: 14/000000000000001 SeuN: 1571 Total de registros do lote = 19 FIM DA VALIDAÇÃO, VERIFIQUE OS ERROS !!!

o lance da validação eu já resolvi. Quanto ao preview nao resolvi

Os dados que o banco mandou para o cliente Segue dados do cedente conforme solicitado Favor configurar os arquivos de remessa e enviar para o meu email para homologação Código Cliente (COCLI): 4580023896458 Carteira: Tipo de Pessoa: JURIDICA CPF/CNPJ: 04.240.667/0001-12 Nome Cedente: AF GUIMARAES CIA LTDA - EPP Razão Social: e-mail: Endereço: FRANCISCO TEIXEIRA DE ABREU, 864 Cedente: 820709 NOME CIDADE, MG Atualizei o acbr e nada

Pessoal uma outra coisa que percebi é que antes eu usava a COBREBEMX,e gerei o mesmo boleto (no acbr e no cobrebemx) Porem os código de barras(linha digitavel ficaram diferentes) Fiz a Validação nesse site pra ter certeza http://www.f2b.com.br/VerifyBoleto 1049016618100020004800123456758169950000112345 Acbr 10498200021107501668070000000276169950000112345 Cobremex Pessoal uma outra coisa que percebi é que antes eu usava a COBREBEMX,e gerei o mesmo boleto (no acbr e no cobrebemx) Porem os código de barras(linha digitavel ficaram diferentes) Fiz a Validação nesse site pra ter certeza http://www.f2b.com.br/VerifyBoleto 1049016618100020004800123456758169950000112345 Acbr 10498200021107501668070000000276169950000112345 Cobremex

Estou conseguindo fazer os boletos (GRAÇAS A DEUS). Porem ele nao dá o preview, só quando clico com o botão direito no icone dele na barra e mando "restaurar" ele exibe o preview dos boletos. Se mando o comando para PDF ele gera o PDF Estou fazendo assim os comandos BOLETO.LimparLista() espero o Retorno OK: Se Deu OK: eu monto o Cedente.INI e envio BOLETO.ConfigurarDados("cedente.INI") Se deu OK: monto o Titulo.ini BOLETO.IncluirTitulos("Titulo.INI","I") Agora as conficuraçoes do ACBrMonitorPLUS Desde já agradeço a Todos os amigos

olá pessoal ainda sem exito

Pelo que entendi, ele processa o arquivo que cai na pasta C:\ACBrMonitorPLUS\ENT.TXT, Então algum amigo teria algum TXT de um boleto. para eu testar. Obrigado e desculpa a minha burrice.

Seria assim se for emitir banco do brasil da conta 01 mudo o arquivo.INI se for da conta 02 mudo o arquivo.ini a cada emissao configuro o cedente e caso de troca seria isso. [Cedente] Nome=São João LTDA. CNPJCPF= 99.999.999/9999-99 Logradouro=Rua Evaristo Mendes Numero=200 Bairro=Centro Cidade=Tatui CEP=18.270-000 Complemento=Sala 10 UF=SP RespEmis=0 TipoPessoa=1 CodigoCedente=123456 LayoutBol=3 CaracTitulo=0 [Conta] Conta=99999 DigitoConta=9 Agencia=9999 DigitoAgencia=9 [Banco] Numero=237 CNAB=1 IndiceACBr=5

Pessoal, obrigado por responder, mas olhei o exemplo e nao localizei nada relacionado para emissao de boletos. Teria algum exemplo em clipper ou xharbor, que possam postar.

Olá a todos os amigos, Sou iniciante com ACBrMonitorPLUS, e estou precisando fazer algo para emitir boletos e gerar remessa para os (BB/CEF/BRADESCO), porem nao ví como configurar mais de um banco. Será que algum amigo poderá me ajudar

alguem tem um XML na versao 2.0 para enviar