Histórico da Página

Produto:

RMS

Ocorrência:

Criação da PROC_IMPORTACAO_AUTO na PC_RMS_PDV_IMPORTACAO para ser chamada via JOB.

Script:

DECLARE

id  

INTEGER;

--

Id do job criado
  v_job_id NUMBER; -- Retorno da função PC_RMS_JOBS.

job_

existe
  
  v_parametros_pc varchar2(500) := 'PC_RMS_PDV_IMPORTACAO.PROC_IMPORTACAO_AUTO(1,dateto_rms7(sysdate),0);';
  v_intervalo_job varchar2(30) := 'SYSDATE+1';
  --   Se  =0, job não existe
  --   Se <>0, armazena ID do job
  -- PARAMETROS DA CHAMADA DA (PC_RMS_PDV_IMPORTACAO.PROC_IMPORTACAO_AUTO)

--

1

-

FILIAL

(SEM

DIGITO)

--

2

-

DATA

IMPORTACAO

(PADRAO

RMS

ou 0)
 

--

3

-

DIA

ANTERIOR

(0

ou 1)

--

Regra:

-- Se a data da importação vier preenchida, esta será considerada
  -- Caso a data de importação vier 0, será testado o parâmetro do Dia Anterior.
  -- Caso o dia anterior seja diferente de 0, então o sistema irá considerar SYSDATE-1, caso contrário será SYSDATE.

begin
  v_job_id := 0;
  v_job_id := PC_RMS_JOBS.

job_

existe(

v_

parametros_pc);

  IF v_job_id = 0 THEN
    id := 0;
    dbms_job.submit(id, v_parametros_pc, to_date('20-05-2021 12:30:00', 'dd-mm-yyyy hh24:mi:ss'), v_intervalo_job, false, dbms_job.ANY_INSTANCE);
    commit;
  ELSE
    DBMS_JOB.REMOVE(v_job_id);
    dbms_job.submit(id, v_parametros_pc, to_date('20-05-2021 12:30:00',

'

dd-

mm-

yyyy hh24:

mi:

ss'),

v_intervalo_job, false, dbms_job.ANY_INSTANCE);
 

END IF;

end;