Consultar Cadastro Do Contribuinte Antes De Enviar Um Nfc-E

[fpasqueto]

Bom dia.

Como devo proceder para consultar o cadastro do contribuinte na hora de enviar a NFC-e, sempre que mando a NFC-e informando o CPF ou CNPJ me retorna a menssagem dizendo q o kra e contribuinte de icms, passei a tag Dest.indIEDest         := inNaoContribuinte resolveu, mas sei que nao e correto enviar todas NFC-e dessa maneira, tentei utilizar a rotina existente do demo do acbr 

 

 UF, Documento : String;

begin

 if not(InputQuery('WebServices Consulta Cadastro ', 'UF do Documento a ser Consultado:',    UF)) then

    exit;

 if not(InputQuery('WebServices Consulta Cadastro ', 'Documento(CPF/CNPJ)',    Documento)) then

    exit;

  Documento :=  Trim(DFeUtil.LimpaNumero(Documento));

  ACBrNFe1.WebServices.ConsultaCadastro.UF  := UF;

  if Length(Documento) > 11 then

     ACBrNFe1.WebServices.ConsultaCadastro.CNPJ := Documento

  else

     ACBrNFe1.WebServices.ConsultaCadastro.CPF := Documento;

  ACBrNFe1.WebServices.ConsultaCadastro.Executar;

 

  MemoResp.Lines.Text :=  UTF8Encode(ACBrNFe1.WebServices.ConsultaCadastro.RetWS);

  memoRespWS.Lines.Text :=  UTF8Encode(ACBrNFe1.WebServices.ConsultaCadastro.RetornoWS);

  LoadXML(MemoResp, WBResposta);

 

  ShowMessage(ACBrNFe1.WebServices.ConsultaCadastro.xMotivo);

  ShowMessage(ACBrNFe1.WebServices.ConsultaCadastro.RetConsCad.InfCad.Items[0].xNome);

 

porem sempre me retorna que URL nao esta disponivel para o estado

Editado 18 Junho, 2014 por fpasqueto

[fpasqueto]

Atualizei o os fontes do acbr e tudo funcionou