Boa tarde,
Favor informe porque quando gero arquivo remessa Banco Brasil só gera no formato CNAB240, banco quer no formato CNAB400,
alimento assim:
// Atribuir propriedades...
with dm.ACBrBoleto.Cedente do
begin
// Conta
Agencia := edAgencia.Text;
AgenciaDigito := edAgenciaDigito.Text;
Conta := edConta.Text;
ContaDigito := edContaDigito.Text;
Convenio := edConvenio.Text;
CodigoCedente := ''; // em branco caso banco do brasil;
TipoDocumento := Tradicional;
ResponEmissao := tbCliEmite;
// se banco do brasil
if cbTipoBanco.ItemIndex in [1,3] then
Modalidade := Copy(edtCarteira.Text,4)
else
Modalidade := '';
// cedente
FantasiaCedente := ADODSFarqParFANTASIA.Text; //'Nome Fantasia' ;
Nome := ADODSFarqParFEMP.Text; // 'Nome do edente' ;
CNPJCPF := ADODSFarqParFCGC.Text; // 'Nome do edente' ;
Logradouro := ADODSFarqParFEND.Text; //'Logradouro do edente' ;
Bairro := ADODSFarqParFBAIR.Text; //'Bairro do edente' ;
Cidade := ADODSFarqParFCIDA.Text; //'Cidade do edente' ;
CEP := TiraPontos(ADODSFarqParFCEP.Text); //'CEP do edente' ;
UF := ADODSFarqParFUF.Text; //'CEP do edente' ;
end;
segue arquivo anexo,
de já agradeço,
Domingos Dimas
cb220601.rem