Mudanças No Rg Param. De Configuração

[Cleber Ferreira]

Boa tarde galera!

 

Em conversa com o Deinison agora a pouco, ele me disse que o RG de Parametros de Configuração do PAF onde informamos S ou N para aquele tanto de requisito, não é mais necessário. Agora basta informar apenas o perfil adotado pela UF. Segundo o exemplo que ele me passou, basta colocar dessa forma: 

 

S W E D A
Rua Dona Brígida, 713
Vila Mariana - São Paulo - SP
CNPJ: 53.485.215/0001-06
IE: 111.072.115.110
SIMULADOR SWEDA CONNECT/SIM
————————————————————————————————————————————————————————
09/08/2013  15:47:24  GNF:000050              COO:000259
GRG:000046  CER:0001
NÃO É DOCUMENTO FISCAL
RELATÓRIO GERENCIAL
          PARAM CONFIG
========================================================
               PARÂMETROS DE CONFIGURAÇÃO
========================================================

"Perfil de requisitos configurado: Letra do perfil de requisitos aqui"

————————————————————————————————————————————————————————
SWEDA IF ST200
ECF-IF VERSÃO: 01.00.01 ECF: 001 
RVVZAZA 09/08/2013 15:47:28
FAB: 00000000000000000001 

Minha opinião sobre isso é que seria uma mudança meio bombástica, pois influenciaria também no funcionamento do ACBrACC, já que nele configuramos os requisitos.

 

E se formos analisar o requisito VII item 15, realmente basta apenas isso. Alguém aí pode se manifestar à respeito? Daniel, Régys, demais colegas que convivem com homologadores?

 

 

 

Abraço

Editado 9 Agosto, 2013 por Cleber

[Cleber Ferreira]

Galera localizei essa linha aqui no ACBrECF.pas que resolve minha questão

 

if versaoPafECF >= 201 then

      Relatorio.Add('Perfil de Requisitos Configurado: ' + AInfoPafECF.PerfilRequisitos)

 

onde mudo para ativar essa opção?

[Cleber Ferreira]

Pode deixar pessoal!

 

Achei as propriedades aqui. Só para poupar trabalho, a partir do momento em que eu informar 

 

with DMACBr.AAC do

    begin

      IdentPAF.VersaoER               := Sistema.SH_ER;

      IdentPAF.Paf.PerfilRequisitos   := Sistema.PAF_Perfil;

 

[Cleber Ferreira]

Pode deixar pessoal!

 

Achei as propriedades aqui. Só para poupar trabalho, a partir do momento em que eu informar 

 

with DMACBr.AAC do
    begin
      IdentPAF.VersaoER               := Sistema.SH_ER;
      IdentPAF.Paf.PerfilRequisitos   := Sistema.PAF_Perfil;
    end;

posso deixar o resto em branco ?

 

Editado 9 Agosto, 2013 por Cleber

[Régys Silveira]

Sim pode, mas geralmente o AAC é utilizado para mais coisas.

[Cleber Ferreira]

Nesse trecho aqui Regys:

  if (not Assigned(AInfoPafECF)) then
  begin
    if Assigned(fsAAC) then
    begin
      AInfoPafECF  := fsAAC.IdentPAF.Paf;
      versaoPafECF := StrToInt(OnlyNumber(fsAAC.IdentPAF.VersaoER));
    end
    else
      raise EACBrECFErro.Create( ACBrStr('Parâmetros de configuração do Paf-ECF não informados') ) ;
  end;

Estou usando dessa forma no menu fiscal: 

 

DMACBr.ECF.PafMF_RelParametrosConfiguracao(DMACBr.AAC.IdentPAF.Paf, StrToInt(rel.Indice));

 

Com isso não está entrando na condicional. É certo isso?

[Daniel Simoes]

Seu PAF-ECF só roda em um Estado ?

[Cleber Ferreira]

Fala Daniel!

 

Estou preparando para rodar em todos. Mas dei um jeito aqui. Até hoje eu estava tendo problemas com o ACBrAAC pois não utilizava ele vinculado ao ACBrECF pelo fato do controle automático dele matar algumas rotinas minhas. Então sempre que vou imprimir os relatórios de parametros e identificação, eu passava o IdentPAF aos procedimentos dos respectivos relatórios. Mas agora a tarde no evento AACAntesAbrirArquivo(var Continua: Boolean) coloquei um controle assim:

procedure TDMACBr.AACAntesAbrirArquivo(var Continua: Boolean);
begin
  Continua := FilesExists(Sistema.Pasta + Sistema.ArqAuxiliar);
end;

Com isso consigo controlar o fluxo e parar o ACBrAAC caso o arquivo auxiliar não exista para que eu possa recriar o mesmo. E não preciso mais passar o IdentPAF nos relatórios acima citados.

 

Obrigado.

Editado 9 Agosto, 2013 por Cleber

[Cleber Ferreira]

Galera, mais uma vez com problemas em marcar o tópico como "Resolvido".