TPHProcesso

Revisão de 19h12min de 25 de fevereiro de 2023 por Admin (discussão | contribs) (Criou página com 'O objeto TPHProcesso é utilizado para monitoramento de scripts de executados junto ao servidor de aplicação, principalmente quando realizado de forma assíncrona. O acompan...')
(dif) ← Edição anterior | Revisão atual (dif) | Versão posterior → (dif)

O objeto TPHProcesso é utilizado para monitoramento de scripts de executados junto ao servidor de aplicação, principalmente quando realizado de forma assíncrona. O acompanhamento da execução poderá ser realizado através do PHERP ou Serverconf, conforme descrito em processos.

Propriedades

Nome Tipo Descrição
Identificação String Nome de identificação do processo que será executado.
Percentual Total Double Valor correspondente ao total de registros ou itens que serão processados. Exemplo: 100.
Percentual Double Valor correspondente ao ponto atual da execução do processo. Exemplo: Se o processo estiver na metade, informar 50, quando 100 foi o percentual total informado.

Procedimentos

  • Iniciar: Iniciar o registro do processo junto a tabela DB_PROCESSOS.
  • Atualizar: Atualizar o percentual junto ao registo do processo.
  • Cancelar: Registrar o cancelamento do processo.
  • Concluir: Registrar a conclusão do processo.
  • Erro: Registrar que ocorreu erro no processo.
  • AddLog(pLog:String): Adicionar registro de log ao processo.

Exemplo

 { Exemplo aplicação da classe TPHProcesso ao script  }
 
 ScriptObj := TPHProcScript.Create;
 try
   ScriptObj.ScriptNome := 'C_ImportacaoXML';
   ScriptObj.Procedimento                          := 'ImportaXML';
   ScriptObj.RequestTimeOut                        := 300000;    
   // Pode ser informado diversos parâmetros para serem lidos no servidor
   ScriptObj.ParamByName('Arquivo').AsString       := ConteudoXML;
   ScriptObj.ParamByName('DocumentoID').AsLargeInt := IDDocumento;  
   
   // Método para executar
   ScriptObj.Executar;
   // Pegar parâmetros do Retorno
   Result := ScriptObj.ParamByName('Resultado').AsString; 
 finally
   ScriptObj.Free;                              
 end;