Olá amigos, boa noite!
Ressucitando o tópico com o seguinte desafio (Obs.: Estou usando o emulador offline)
Setando o ambiente no SATTeste para taProducao;
Colocando o Ambiente = 0 no SATTeste.ini;
Colocando Config.ide_tpAmb := TpcnTipoAmbiente( cbxAmbiente.ItemIndex ) por Config.ide_tpAmb := TpcnTipoAmbiente( 0 ) no procedure TForm.AjustaACBrSAT;
Mesmo assim, quando o programa passa por essa condicional:
// Numero do Extrato ou Homologação //
if (ide.tpAmb = taHomologacao) then
NumExtrato := '000000'
else
NumExtrato := Trim( IntToStr( ide.nCFe ) );
O Extrato gerado pelo Fortes, sempre vem com Número 000000, sendo que eu setei de 3 formas diferentes, o ambiente para produção.
O curioso é que o retorno da aplicação, vem com o número correto (no XML Recebido, a tag também vem com o número adequado):
if ACBrSAT1.Resposta.codigoDeRetorno = 6000 then
begin
LoadXML( ACBrSAT1.CFe.AsXMLString, mRecebido );
PageControl1.ActivePage := tsRecebido;
ShowMessage(IntToStr(ACBrSAT1.CFe.ide.nCFe));
end;
Porque isso está acontecendo?