Boa tarde João Henrique,
Realizei algumas implementações e alterações nos fontes:
ACBrNFe, ACBrNFeUtil, ACBrNFeWebService, pcnConversao, pcnGerador e pcnAuxiliar.
Temos agora a seguinte função:
// Incluido por Italo em 17/07/2012
function ConsultaNFeDest(CNPJ: String;
IndNFe: TpcnIndicadorNFe;
IndEmi: TpcnIndicadorEmissor;
ultNSU: String): Boolean;
E os valores que IndNFe e IndEmi podem receber são:
// Incluido por Italo em 17/07/2012
TpcnIndicadorNFe = (inTodas, inSemManifestacaoComCiencia, inSemManifestacaoSemCiencia);
TpcnIndicadorEmissor = (ieTodos, ieRaizCNPJDiferente);
Esta faltando agora a Unit para ler o XML de retorno da consulta, para poder terminar a rotina de acesso a SEFAZ.
Segundo o aviso de 06/07/2012 que encontra-se no Portal Nacional da NFe temos as seguintes URLs para o ambiente de homologação:
Não sei se cada SEFAZ vai disponibilizar a sua URL, sendo assim inclui a linha abaixo para todos os GetURLxx
// Incluido por Italo em 17/07/2012
LayNfeConsNFeDest : Result := NotaUtil.SeSenao(AAmbiente=1, '', 'hom.nfe.fazenda.gov.br/NFeConsultaDest/NFeConsultaDest.asmx');
Aonde você quer que eu disponibilize esses fontes, no Trunk ou Branches?