Este erro ocorre porque você esta tentando enviar uma nota
para um cliente de um estado diferente do estado da empresa emitente e
a Identificação do Destinatário está para
Operação Interna ou Exterior.
Este é só um exemplo de como resolver o problema da rejeição,
o código pode ser alterado ou melhorado conforme a sua necessidade.
Ele se aplica para quem está utilizando o TACBrNFe para o envio de
notas eletrônicas.
Verifique com o seu contador se a lógica está correta.
Abaixo segue um trecho se sugestão de código:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 | // ... Seu código if (Trim(QryNota.FieldByName('CFOP').AsString) <> '') then begin // Entradas ou saídas dentro do estado if QryNota.FieldByName('CFOP').AsString[1] in ['1', '5'] then Ide.idDest := doInterna; // Entradas ou saídas em estados diferentes if QryNota.FieldByName('CFOP').AsString[1] in ['2', '6'] then Ide.idDest := doInterestadual; // Entradas ou saídas do exterior if QryNota.FieldByName('CFOP').AsString[1] in ['3', '7'] then Ide.idDest := doExterior; end else begin Ide.idDest := doInterna; end; // ... Seu código |
