Thaís Caliman

Muito Obrigada Sérgio, mas como percebemos que ela esta passando, criamos uma rotina para verificar o schema do xml pos xds, assim ela mostra que o xml esta com erro.

Então, não sabemos como foi gerado.

Segue o XML com erro AD35181216588577000104590000871670051011415090.xml

Olá, Possuo um xml que está com erro em uma das tags (a tag aparece como <!>) mas é carregado mesmo assim. Há como fazer a validação no componente? Se não, há algum outro jeito para validar? Obrigada

Bom dia, estou tentando gerar o boleto de um cliente e quando tenta-se efetuar o pagamento pelo internet banking (de qualquer banco), aparece um outro valor e o nome do pagador muda em cada leitura que é feito. Esse problema ocorre somente em um cliente que utiliza o SICOOB. Alguma ideia do que pode estar acontecendo?

Bom dia Italo, segue em anexo os dois XML's. Quanto a verificação, fizemos e estava dando como correta 1-env-lot.xml 1-rec.xml

Boa Tarde, estou tentando enviar um lote RPS pela DEMO do ACBrNFSe, porém retorna a seguinte mensagem "Código CNAE Inexistente". Verifiquei o CNAE da Empresa que estou utilizando e ele está correto. O XML está sendo gerado corretamente. Tenho preenchido o campo ItemListaServico no formato 00.00

Pelos testes feitos e pelo do cliente foi enviada a remessa e registrou sem erros.

Bom dia, estou gerando boleto normalmente, com a remessa também gerada normalmente mas o cliente informa que quando alguém tenta pagar um boleto emitido está constando como SEM REGISTRO. Isso esta ocorrendo para o cliente que usa banco itau com carteira registrada (109) e banco do brasil (carteira registrada - 17/019).

Primeiramente eu percebi que estava deixando a propriedade LeRetornoCedente como falso, mudei para true e não estou mais tendo problemas. Alterei também o modo de tratamento do arquivo de retorno.

Resolvido. ^^

Olá, sou iniciante mexendo no acbrboleto, e quando faço a leitura do retorno, após configurar os componentes, a leitura do retorno volta vazia. me baseei nessas configurações e nessa rotina: procedure TForm1.Retorno; var i : Integer; begin if OpenDialog1.Execute then begin //Configurar ConfiguracoesACBr; // ACBrBoleto.NomeArqRetorno := OpenDialog1.FileName; ACBrBoleto.LerRetorno; for i := 0 to ACBrBoleto.ListadeBoletos.Count-1 do begin if ACBrBoleto.ListadeBoletos.Objects[i].ValorRecebido > 0 then begin SQLAux.Close; SQLAux.SQL.Clear; SQLAux.SQL.Add('update conrec set'); SQLAux.SQL.Add('data_baixa = :pData,'); SQLAux.SQL.Add('valor_pago = :pValor,'); SQLAux.SQL.Add('taxa_cobranca = :pTaxa'); SQLAux.SQL.Add('where nosso_numero = :pNossoNum'); SQLAux.Params.ParamByName('pData').AsDate := ACBrBoleto.ListadeBoletos.Objects[i].DataCredito; SQLAux.Params.ParamByName('pValor').AsFloat := ACBrBoleto.ListadeBoletos.Objects[i].ValorRecebido; SQLAux.Params.ParamByName('pNossoNum').AsString:= Copy(ACBrBoleto.ListadeBoletos.Objects[i].NossoNumero,1,ACBrBoleto.Banco.TamanhoMaximoNossoNum); // vir sem o dígito, se quiser SQLAux.Params.ParamByName('pTaxa').AsFloat := ACBrBoleto.ListadeBoletos.Objects[i].ValorDespesaCobranca; SQLAux.ExecSQL(False); end; end; SQLAux.Close; end; end; procedure TForm1.ConfiguracoesACBr; begin ACBrBoleto.ACBrBoletoFC.DirLogo := sPathLogo; ACBrBoleto.ACBrBoletoFC.Filtro := fiNenhum; ACBrBoleto.ACBrBoletoFC.LayOut := lPadrao; ACBrBoleto.ACBrBoletoFC.MostrarSetup:= true; ACBrBoleto.ACBrBoletoFC.SoftwareHouse:= 'SUA EMPRESA'; ACBrBoleto.Banco.TipoCobranca := cobSantander; // escolha o seu tipo de cobrança ACBrBoleto.Banco.Digito := iDigBanco; // 33 ACBrBoleto.Banco.Numero := iBanco; // 7 ACBrBoleto.Banco.Nome := sBanco; // 'Santander'; ACBrBoleto.Banco.TamanhoMaximoNossoNum := iTamNossoNum; // 12 ACBrBoleto.Cedente.CaracTitulo := tcSimples; // simples com registro ACBrBoleto.Cedente.Nome := sNomCedente; ACBrBoleto.Cedente.Telefone := sTelefoneCedente; ACBrBoleto.Cedente.UF := sUFCedente; ACBrBoleto.Cedente.Bairro := sBairroCedente; ACBrBoleto.Cedente.CEP := sCepCedente; ACBrBoleto.Cedente.Cidade := sCidadeCedente; ACBrBoleto.Cedente.CNPJCPF := sCnpjCedente; ACBrBoleto.Cedente.Complemento := ''; ACBrBoleto.Cedente.Conta := sContaCorrente; ACBrBoleto.Cedente.ContaDigito := sContaCorrenteDig; ACBrBoleto.Cedente.Logradouro := sLogradouroCedente; ACBrBoleto.Cedente.NumeroRes := ''; ACBrBoleto.Cedente.Convenio := sConvenio; // ACBrBoleto.Cedente.Modalidade := sModalidade; //  ACBrBoleto.Cedente.CodigoCedente := sCodCedente; ACBrBoleto.Cedente.CodigoTransmissao:= sCodigoTransmissao; // no santander tem ACBrBoleto.Cedente.ResponEmissao := Iif(Trim(sBancoEmite)='SIM', tbBancoEmite, tbCliEmite); ACBrBoleto.Cedente.TipoInscricao := pJuridica; ACBrBoleto.Cedente.TipoCarteira := Iif(Trim(sRegistrar)='SIM', tctRegistrada, tctSimples); ACBrBoleto.DataArquivo := Date; ACBrBoleto.NomeArqRemessa := FormatDateTime('DDMMYYYYHHMMSS',Now)+'.TXT'; ACBrBoleto.DirArqRemessa := sPathRemessa; ACBrBoleto.DirArqRetorno := sPathRetorno; ACBrBoleto.ImprimirMensagemPadrao := False; ACBrBoleto.LayoutRemessa := Iif(Pos(sLayoutArqRet,'400')>0,c400,c240); ACBrBoleto.LeCedenteRetorno := true; end;

Consegui resolver agorinha mesmo, o erro da data dava apenas no debug.

Olá novamente pessoal, estou com problemas para ler um retorno vindo do banco Itaú que acaba gerando o erro: "econverterror with message "00/00/00" is not a valid date and time" .Não estou conseguindo tratar esse erro. Ele da esse erro quando uso a função LerRetorno. Muito Obrigada desde já.

Oi Luciano, muito obrigado. Não sabia que precisava ser registrado para poder ocorrer o pagamento. ^^