Olá...
Em SP já esta funcional também.
O processo do EPEC é exatamente o mesmo do DPEC com a diferença que agora consumimos o WebService de EVENTOS e não um WebService específico para o DPEC. E que diferentemente do DPEC, não existe como consultar o EPEC antes de enviar a NFe para Receita.
Após a entrada em contigencia, criamos e enviamos o evento do EPEC.
Após a normalização no sistema, temos 7 dias para enviar o arquivo XML para Receita e validá-lo.
No meu sistema não precisei de grandes alterações, precisei só mudar onde estava o consumo do webservice DPEC para um EVENTO.
Resumindo:
1) Preenchimento das propriedades para ENVIAR o EPEC:
<Já fiz em outro post meu aqui neste tópico mesmo>
2) Como Ler o Retorno:
{$REGION 'Seta Valores'}
cStat := loAcbrNFe.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat;
tpAmb := loACBrNFe.WebServices.EnvEvento.EventoRetorno.tpAmb;
lMsg := loAcbrNFe.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.xEvento+#13+
loAcbrNFe.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.xMotivo;
Chave := loACBrNFe.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.chNFe;
nProtDPEC := loAcbrNFe.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.nProt;
dhRectoDPEC := loAcbrNFe.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.dhRegEvento;
lXMLDPEC := loAcbrNFe.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.XML;
{$ENDREGION}
Obs: Importante guardar o Protocolo do EPEC pois é ele que tem de ir impresso no DANFE.
3) Enviar o EPEC para Receita (até 7 dias) após normalização dos serviços:
loACBrNFe.Configuracoes.Geral.FormaEmissao:=teNormal; //seta normal para enviar o EPEC para SEFAZ
lPass := loACBrNFe.WebServices.Envia(loDataSet.FieldByName('n_nf').AsInteger); //envia o XML para a SEFAZ
loACBrNFe.Configuracoes.Geral.FormaEmissao:=teDPEC; //volta para tipo EPEC
Ou Seja, muda para Normal (tpEmiss = 1), envia e depois volta pra EPEC (tpEmiss = 4).
Espero ter ajudado,
Att