1 Executar o seguinte script:--USUÁRIO alter table PRXUSER_MOBILID add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_USUARIO before INSERT OR UPDATE OR DELETE ON PRXUSER_MOBILID FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_PRXUSER_MOBILID:'||:OLD.ID_PRXUSER_MOBILID,'PM', sysdate,'D'); END IF; END;
-- USUÁRIO VS MÓDULO alter table PRXUSER_MOBILID_MOD add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_USUARIO_MOD before INSERT OR UPDATE OR DELETE ON PRXUSER_MOBILID_MOD FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_PRXUSER_MOBILID_MOD:'||:OLD.ID_PRXUSER_MOBILID_MOD,'UM', sysdate,'D'); END IF; END;
-- PARAMETROS MC alter table PRXPARAMETER add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_PRXPARAMETER before INSERT OR UPDATE OR DELETE ON PRXPARAMETER FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_PRXPARAMETER:'||:OLD.ID_PRXPARAMETER,'PP', sysdate,'D'); END IF; END;
-- TIPO DE APONTAMENTO DIVERSOS alter table AD_TIPO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_TP_APTO_DIVERSOS before INSERT OR UPDATE OR DELETE ON AD_TIPO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_AD_TIPO:'||:OLD.ID_AD_TIPO, 'AD_TIPO', sysdate,'D'); END IF; END;
-- SAFRA alter table SAFRA add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_SAFRA before INSERT OR UPDATE OR DELETE ON SAFRA FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_SAFRA:'||:OLD.ID_SAFRA, 'SAFRA', sysdate,'D'); END IF; END;
-- PERIODO DE SAFRA alter table PERIODOSAFRA add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_PERIODOSAFRA before INSERT OR UPDATE OR DELETE ON PERIODOSAFRA FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_PERIODOSAFRA:'|| :OLD.ID_PERIODOSAFRA, 'P', sysdate,'D'); END IF; END;
-- PERIODO DE SAFRA – CENTRO DE CUSTO alter table PERIODOSAFRA_CC add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_PERIODOSAFRA_CC before INSERT OR UPDATE OR DELETE ON PERIODOSAFRA_CC FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_PERIODOSAFRA_CC:'|| :OLD.ID_PERIODOSAFRA_CC, 'PC', sysdate,'D'); END IF; END;
-- BLOCO DE PESQUISA alter table PE_BLOCPESQ add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_PE_BLOCPESQ before INSERT OR UPDATE OR DELETE ON PE_BLOCPESQ FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_PE_BLOCPESQ:'|| :OLD.ID_PE_BLOCPESQ, 'PE_BLOCPESQ', sysdate,'D'); END IF; END;
--FAZENDA alter table UPNIVEL1 add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_UPNIVEL1 before INSERT OR UPDATE OR DELETE ON UPNIVEL1 FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_UPNIVEL1:'||:OLD.ID_UPNIVEL1,'U', sysdate,'D'); END IF; END;
--SETOR alter table UPNIVEL2 add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_UPNIVEL2 before INSERT OR UPDATE OR DELETE ON UPNIVEL2 FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_UPNIVEL2:'||:OLD.ID_UPNIVEL2,'U2', sysdate,'D'); END IF; END;
-- TALHAO alter table UPNIVEL3 add (MOB_LASTUPDATE DATE);
CREATE OR REPLACE TRIGGER TGB_MOBILE_UPNIVEL3 BEFORE INSERT OR UPDATE OR DELETE ON UPNIVEL3 FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_UPNIVEL3:'||:OLD.ID_UPNIVEL3,'U3', sysdate,'D'); END IF; END;
-- PROJETO DE PESQUISA alter table PE_PROJPESQ add (MOB_LASTUPDATE DATE);
CREATE OR REPLACE TRIGGER TGB_MOBILE_PE_PROJPESQ BEFORE INSERT OR UPDATE OR DELETE ON PE_PROJPESQ FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_PE_PROJPESQ:'|| :OLD.ID_PE_PROJPESQ, 'PE_PROJPESQ', sysdate,'D'); END IF; END;
-- ESTAÇÃO DE PESQUISA alter table PE_ESTAPESQ add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_PE_ESTAPESQ before INSERT OR UPDATE OR DELETE ON PE_ESTAPESQ FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_PE_ESTAPESQ:'|| :OLD.ID_PE_ESTAPESQ, 'PE_ESTAPESQ', sysdate,'D'); END IF; END;
-- PROGRAMA DE PESQUISA alter table PE_PRGPESQ add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_PE_PRGPESQ before INSERT OR UPDATE OR DELETE ON PE_PRGPESQ FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_PE_PRGPESQ:'||:OLD.ID_PE_PRGPESQ ,'PE_PRGPESQ', sysdate,'D'); END IF; END;
-- TIPOS DE ENSAIO alter table PE_TPENSAIO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_PE_TPENSAIO before INSERT OR UPDATE OR DELETE ON PE_TPENSAIO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_PE_TPENSAIO:'||:OLD.ID_PE_TPENSAIO ,'PE_TPENSAIO', sysdate,'D'); END IF; END;
-- ENSAIO alter table PE_ENSAIO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_PE_ENSAIO before INSERT OR UPDATE OR DELETE ON PE_ENSAIO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_PE_ENSAIO:'||:OLD.ID_PE_ENSAIO ,'PE_ENSAIO', sysdate,'D'); END IF; END;
-- TRATAMENTO DE PESQUISA E EXPERIMENTO alter table PE_TRATPESQ add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_PE_TRATPESQ before INSERT OR UPDATE OR DELETE ON PE_TRATPESQ FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_PE_TRATPESQ:'||:OLD.ID_PE_TRATPESQ ,'PE_TRATPESQ', sysdate,'D'); END IF; END;
-- GRUPO DE VARIAVEL alter table GRPVARIAVEL add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_GRPVARIAVEL before INSERT OR UPDATE OR DELETE ON GRPVARIAVEL FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_GRPVARIAVEL:'||:OLD.ID_GRPVARIAVEL ,'GRPVARIAVEL', sysdate,'D'); END IF; END;
-- VARIAVEL alter table VARIAVEL add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_VARIAVEL before INSERT OR UPDATE OR DELETE ON VARIAVEL FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_VARIAVEL:'||:OLD.ID_VARIAVEL ,'VARIAVEL', sysdate,'D'); END IF; END;
-- DEFINIÇÃO TABELA AUXILIAR alter table IF_DTABAUX add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_IF_DTABAUX before INSERT OR UPDATE OR DELETE ON IF_DTABAUX FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_IF_DTABAUX:'||:OLD.ID_IF_DTABAUX ,'IF_DTABAUX', sysdate,'D'); END IF; END;
-- TABELA AUXILIAR alter table IF_TABAUX add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_IF_TABAUX before INSERT OR UPDATE OR DELETE ON IF_TABAUX FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_IF_TABAUX:'||:OLD.ID_IF_TABAUX ,'IF_TABAUX', sysdate,'D'); END IF; END;
-- ELEMENTO CLIMÁTICO alter table ELEMCLIMAT add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_ELEMCLIMAT before INSERT OR UPDATE OR DELETE ON ELEMCLIMAT FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_ELEMCLIMAT:'||:OLD.ID_ELEMCLIMAT , 'E', sysdate,'D'); END IF; END;
-- POSTO METEREOLÓGICO alter table POSTOMETER add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_POSTOMETER before INSERT OR UPDATE OR DELETE ON POSTOMETER FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_POSTOMETER:'||:OLD.ID_POSTOMETER , 'P1', sysdate,'D'); END IF; END;
-- MÓDULO ADMINISTRATIVO alter table MODULOADM add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_MODULOADM before INSERT OR UPDATE OR DELETE ON MODULOADM FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_MODULOADM:'||:OLD.ID_MODULOADM , 'MODULOADM', sysdate,'D'); END IF; END;
-- FITOSSANIDADE alter table FITOSSANIDADE add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_FITOSSANIDADE before INSERT OR UPDATE OR DELETE ON FITOSSANIDADE FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_FITOSSANIDADE:'||:OLD.ID_FITOSSANIDADE , 'FITOSSANIDADE', sysdate,'D'); END IF; END;
-- CENTRO DE CUSTO alter table CCUSTO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_CCUSTO before INSERT OR UPDATE OR DELETE ON CCUSTO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_CCUSTO:'||:OLD.ID_CCUSTO , 'C', sysdate,'D'); END IF; END;
-- CENTRO DE CUSTO VS OPERACAO alter table CCUSTOPER add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_CCUSTOPER before INSERT OR UPDATE OR DELETE ON CCUSTOPER FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_CCUSTO:'||:OLD.ID_CCUSTO ||';ID_OPERACAO:'||:OLD.ID_OPERACAO, 'CO', sysdate,'D'); END IF; END;
-- COMPONENTE alter table COMPONENTE add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_COMPONENTE before INSERT OR UPDATE OR DELETE ON COMPONENTE FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_COMPONENTE:'||:OLD.ID_COMPONENTE , 'COMPONENTE', sysdate,'D'); END IF; END;
-- COMPONENTE MATERIAL alter table COMPONENTE_MAT add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_COMPONENTE_MAT before INSERT OR UPDATE OR DELETE ON COMPONENTE_MAT FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_COMPONENTE_MAT:'||:OLD.ID_COMPONENTE_MAT , 'CM', sysdate,'D'); END IF; END;
-- CONTRATO alter table SV_CONTRATO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_SV_CONTRATO before INSERT OR UPDATE OR DELETE ON SV_CONTRATO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_SV_CONTRATO:'||:OLD.ID_SV_CONTRATO , 'SV_CONTRATO', sysdate,'D'); END IF; END;
-- EQUIPE alter table EQUIPE add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_EQUIPE before INSERT OR UPDATE OR DELETE ON EQUIPE FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_EQUIPE:'||:OLD.ID_EQUIPE , 'E', sysdate,'D'); END IF; END; -- FITOSSANIDADE OCUPAÇÃO alter table FITOSSANIDADE_CULT
add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_FITOSSANIDADE_CULT before INSERT OR UPDATE OR DELETE ON FITOSSANIDADE_CULT FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_FITOSSANIDADE_CULT:'||:OLD.ID_FITOSSANIDADE_CULT , 'FITOSSANIDADE_CULT', sysdate,'D'); END IF; END;
-- INSUMOS alter table INSUMO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_INSUMO before INSERT OR UPDATE OR DELETE ON INSUMO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_INSUMO:'||:OLD.ID_INSUMO , 'I', sysdate,'D'); END IF; END;
-- INSUMOS VS EMBALAGEM alter table INSUMO_EMB add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_INSUMO_EMB before INSERT OR UPDATE OR DELETE ON INSUMO_EMB FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_INSUMO_EMB:'||:OLD.ID_INSUMO_EMB, 'IE', sysdate,'D'); END IF; END;
-- EMBALAGEM alter table EMBALAGEM add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_EMBALAGEM before INSERT OR UPDATE OR DELETE ON EMBALAGEM FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_EMBALAGEM:'||:OLD.ID_EMBALAGEM, 'EMBALAGEM', sysdate,'D'); END IF; END;
-- OCUPAÇÃO alter table OCUPACAO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_OCUPACAO before INSERT OR UPDATE OR DELETE ON OCUPACAO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_OCUPACAO:'||:OLD.ID_OCUPACAO, 'O', sysdate,'D'); END IF; END;
-- OPERAÇÃO alter table OPERACAO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_OPERACAO before INSERT OR UPDATE OR DELETE ON OPERACAO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_OPERACAO:'||:OLD.ID_OPERACAO, 'OP', sysdate,'D'); END IF; END;
-- OPERAÇÃO VS VERBA alter table MDO_OPER_VERBA add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_MDO_OPER_VERBA before INSERT OR UPDATE OR DELETE ON MDO_OPER_VERBA FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_MDO_OPER_VERBA:'||:OLD.ID_MDO_OPER_VERBA, 'MDO', sysdate,'D'); END IF; END; -- OPERAÇÃO VS EQUIPAMENTO
alter table OPERACAO_EQ add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_OPERACAO_EQ before INSERT OR UPDATE OR DELETE ON OPERACAO_EQ FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_OPERACAO_EQ:'||:OLD.ID_OPERACAO_EQ, 'OEQ', sysdate,'D'); END IF; END;
-- OPERAÇÃO VS GRUPO OPERATIVO alter table OPERACAO_GRPOPEQ add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_OPERACAO_GRPOPEQ before INSERT OR UPDATE OR DELETE ON OPERACAO_GRPOPEQ FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_OPERACAO_GRPOPEQ:'||:OLD.ID_OPERACAO_GRPOPEQ, 'OG', sysdate,'D'); END IF; END;
-- OPERAÇÃO VS GRUPO INSUMOS alter table OPERACAO_GRPINS add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_OPERACAO_GRPINS before INSERT OR UPDATE OR DELETE ON OPERACAO_GRPINS FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_OPERACAO:'||:OLD.ID_OPERACAO ||';ID_GRPINSUMO:'||:OLD.ID_GRPINSUMO ||';ID_OCUPACAO:'||:OLD.ID_OCUPACAO, 'OGRP', sysdate,'D'); END IF; END;
-- OPERAÇÃO VS INSUMOS alter table OPERACAO_INS add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_OPERACAO_INS before INSERT OR UPDATE OR DELETE ON OPERACAO_INS FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_OPERACAO_INS:'||:OLD.ID_OPERACAO_INS, 'OI', sysdate,'D'); END IF; END;
-- UNIDADE ADM RECURSOS MÃO DE OBRA alter table UNIDADEADM_REC_MDO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_UNIDADEADM_REC_MDO before INSERT OR UPDATE OR DELETE ON UNIDADEADM_REC_MDO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_UNIDADEADM_REC_MDO:'||:OLD.ID_UNIDADEADM_REC_MDO , 'UNIDADEADM_REC_MDO', sysdate,'D'); END IF; END;
-- ORDEM DE SERVIÇO - CABEÇALHO alter table APORDSERVICO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_APORDSERVICO before INSERT OR UPDATE OR DELETE ON APORDSERVICO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_APORDSERVICO:'||:OLD.ID_APORDSERVICO , 'OSC', sysdate,'D'); END IF; END;
-- ORDEM DE SERVIÇO - LOCAIS alter table APORDSERVICO_LC add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_APORDSERVICO_LC before INSERT OR UPDATE OR DELETE ON APORDSERVICO_LC FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_APORDSERVICO_LC:'||:OLD.ID_APORDSERVICO_LC , 'LC', sysdate,'D'); END IF; END;
-- ORDEM DE SERVIÇO - EMBALAGEM alter table APORDSERVICO_EMB add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_APORDSERVICO_EMB before INSERT OR UPDATE OR DELETE ON APORDSERVICO_EMB FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_APORDSERVICO_EMB:'||:OLD.ID_APORDSERVICO_EMB , 'ae', sysdate,'D'); END IF; END;
-- ORDEM DE SERVIÇO - COMPONENTE alter table APORDSERVICO_CO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_APORDSERVICO_CO before INSERT OR UPDATE OR DELETE ON APORDSERVICO_CO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_APORDSERVICO_CO:'||:OLD.ID_APORDSERVICO_CO , 'co', sysdate,'D'); END IF; END;
-- ORDEM DE SERVIÇO - ALVOS alter table APORDSERVICO_ALV add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_APORDSERVICO_ALV before INSERT OR UPDATE OR DELETE ON APORDSERVICO_ALV FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_APORDSERVICO_ALV:'||:OLD.ID_APORDSERVICO_ALV , 'alv', sysdate,'D'); END IF; END;
-- ORDEM DE SERVIÇO - DETALHES alter table SV_OS_CONTRATO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_SV_OS_CONTRATO before INSERT OR UPDATE OR DELETE ON SV_OS_CONTRATO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_APORDSERVICO:'||:OLD.ID_APORDSERVICO , 'de', sysdate,'D'); END IF; END;
-- CONTRATO - SEQUENCIA alter table SV_CONTRATO_DE add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_SV_CONTRATO_DE before INSERT OR UPDATE OR DELETE ON SV_CONTRATO_DE FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_SV_CONTRATO_DE:'||:OLD.ID_SV_CONTRATO_DE , 'SCD', sysdate,'D'); END IF; END;
-- RESPONSAVEL VS APONTAMENTO DIVERSO alter table AD_TIPO_MOB add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_AD_TIPO_MOB before INSERT OR UPDATE OR DELETE ON AD_TIPO_MOB FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_AD_TIPO_MOB:'||:OLD.ID_AD_TIPO_MOB , 'AD_TIPO_MOB', sysdate,'D'); END IF; END;
-- AVALIAÇÃO DE LAVOURA - AVALIAÇÃO alter table AV_AVALIA add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_AV_AVALIA before INSERT OR UPDATE OR DELETE ON AV_AVALIA FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_AV_AVALIA:'||:OLD.ID_AV_AVALIA , 'AV_AVALIA', sysdate,'D'); END IF; END;
-- AVALIAÇÃO DE LAVOURA – AVALIAÇÃO VIGÊNCIA alter table AV_AVALIA_VG add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_AV_AVALIA_VG before INSERT OR UPDATE OR DELETE ON AV_AVALIA_VG FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_AV_AVALIA_VG:'||:OLD.ID_AV_AVALIA_VG , 'AV_AVALIA_VG', sysdate,'D'); END IF; END;
-- AVALIAÇÃO DE LAVOURA – AVALIAÇÃO OCUPAÇÃO alter table AV_AVALIA_OC add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_AV_AVALIA_OC before INSERT OR UPDATE OR DELETE ON AV_AVALIA_OC FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_AV_AVALIA_OC:'||:OLD.ID_AV_AVALIA_OC , 'AV_AVALIA_OC', sysdate,'D'); END IF; END;
-- AVALIAÇÃO DE LAVOURA – AVALIAÇÃO CLASSIFICAÇÃO alter table AV_AVALIA_CL add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_AV_AVALIA_CL before INSERT OR UPDATE OR DELETE ON AV_AVALIA_CL FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_AV_AVALIA_CL:'||:OLD.ID_AV_AVALIA_CL , 'AV_AVALIA_CL', sysdate,'D'); END IF; END;
-- AVALIAÇÃO DE LAVOURA – ORDEM APONTAMENTO alter table AV_AVALIA_OR add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_AV_AVALIA_OR before INSERT OR UPDATE OR DELETE ON AV_AVALIA_OR FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_AV_AVALIA_OR:'||:OLD.ID_AV_AVALIA_OR , 'AV_AVALIA_OR', sysdate,'D'); END IF; END;
-- AVALIAÇÃO DE LAVOURA – USUÁRIO MOBILE alter table AV_AVALIA_MOB add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_AV_AVALIA_MOB before INSERT OR UPDATE OR DELETE ON AV_AVALIA_MOB FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_AV_AVALIA_MOB:'||:OLD.ID_AV_AVALIA_MOB , 'AV_AVALIA_MOB', sysdate,'D'); END IF; END;
-- AVALIAÇÃO DE LAVOURA – CADASTRO LOCAL AVALIAÇÃO alter table AV_APTO_LC add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_AV_APTO_LC before INSERT OR UPDATE OR DELETE ON AV_APTO_LC FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_AV_APTO_LC:'||:OLD.ID_AV_APTO_LC , 'ALC', sysdate,'D'); END IF; END;
-- AVALIAÇÃO DE LAVOURA – APTO CAD AVALIAÇÃO alter table AV_APTO_AVA add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_AV_APTO_AVA before INSERT OR UPDATE OR DELETE ON AV_APTO_AVA FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_AV_APTO_AVA:'||:OLD.ID_AV_APTO_AVA , 'AV_APTO_AVA', sysdate,'D'); END IF; END;
-- CONVERSOR DE UNIDADE DE MEDIDAS alter table CONV_UNIMEDIDA add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_CONV_UNIMEDIDA before INSERT OR UPDATE OR DELETE ON CONV_UNIMEDIDA FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_CONV_UNIMEDIDA:'||:OLD.ID_CONV_UNIMEDIDA , 'CONV_UNIMEDIDA', sysdate,'D'); END IF; END;
-- MUNICIPIO alter table MUNICIPIO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_MUNICIPIO before INSERT OR UPDATE OR DELETE ON MUNICIPIO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_MUNICIPIO:'||:OLD.ID_MUNICIPIO , 'M', sysdate,'D'); END IF; END;
-- PONTO DE PREVISÃO alter table CM_PONTOPREV add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_CM_PONTOPREV before INSERT OR UPDATE OR DELETE ON CM_PONTOPREV FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_CM_PONTOPREV:'||:OLD.ID_CM_PONTOPREV , 'CM_PONTOPREV', sysdate,'D'); END IF; END;
-- CONDIÇÕES DO TEMPO alter table CM_CONTEMPO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_CM_CONTEMPO before INSERT OR UPDATE OR DELETE ON CM_CONTEMPO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_CM_CONTEMPO:'||:OLD.ID_CM_CONTEMPO , 'CM_CONTEMPO', sysdate,'D'); END IF; END;
-- DEPÓSITO alter table DEPOSITO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_DEPOSITO before INSERT OR UPDATE OR DELETE ON DEPOSITO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_DEPOSITO:'||:OLD.ID_DEPOSITO , 'DE', sysdate,'D'); END IF; END;
-- APONTAMENTO AGRÍCOLA – TIPOS DE APONTAMENTO POR USUÁRIO alter table AU_TIPO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_AU_TIPO before INSERT OR UPDATE OR DELETE ON AU_TIPO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_AU_TIPO:'||:OLD.ID_AU_TIPO , 'TP', sysdate,'D'); END IF; END;
-- APONTAMENTO AGRÍCOLA – CONFIGURAÇÃO DOS TIPOS DE APONTAMENTO alter table AU_TIPO_CPO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_AU_TIPO_CPO before INSERT OR UPDATE OR DELETE ON AU_TIPO_CPO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_AU_TIPO_CPO:'||:OLD.ID_AU_TIPO_CPO , 'TPC', sysdate,'D'); END IF; END;
-- FILIAL alter table FILIAL add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_FILIAL before INSERT OR UPDATE OR DELETE ON FILIAL FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_FILIAL:'||:OLD.ID_FILIAL , 'F', sysdate,'D'); END IF; END;
-- TRATAMENTO DE SEMENTE - HEADER alter table APTRATSEMENT add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_APTRATSEMENT before INSERT OR UPDATE OR DELETE ON APTRATSEMENT FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_APTRATSEMENT:'||:OLD.ID_APTRATSEMENT , 'A', sysdate,'D'); END IF; END;
-- TRATAMENTO DE SEMENTE - INSUMOS alter table APTRATSEMENT_IN add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_APTRATSEMENT_IN before INSERT OR UPDATE OR DELETE ON APTRATSEMENT_IN FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_APTRATSEMENT_IN:'||:OLD.ID_APTRATSEMENT_IN , 'ATS', sysdate,'D'); END IF; END;
-- SISTEMA DE PLANTIO VS OPERAÇÃO alter table SISTPLANTIO_OPER add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_SISTPLANTIO_OPER before INSERT OR UPDATE OR DELETE ON SISTPLANTIO_OPER FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_SISTPLANTIO_OPER:'||:OLD.ID_SISTPLANTIO_OPER , 'SO', sysdate,'D'); END IF; END;
-- OPERAÇÃO VS RESTRIÇÕES METEOROLOGICAS -- RESTRIÇÃO METEREOLÓGICA alter table OPERACAO_RM add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_OPERACAO_RM before INSERT OR UPDATE OR DELETE ON OPERACAO_RM FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_OPERACAO_RM:'||:OLD.ID_OPERACAO_RM , 'OPM', sysdate,'D'); END IF; END;
-- OPERAÇÃO VS OPERAÇÃO ASSOCIADA alter table OPERACAOASSOC add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_OPERACAOASSOC before INSERT OR UPDATE OR DELETE ON OPERACAOASSOC FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_OPERACAO:'||:OLD.ID_OPERACAO || '; ID_OPERACAO_ASSOC:' || OLD.ID_OPERACAO_ASSOC || '; ID_UNIDADEADM:' || :OLD.ID_UNIDADEADM, 'OPEASSOC', sysdate,'D'); END IF; END;
-- INSUMO VS CULTURA OCUPAÇÃO alter table INSUMO_CULT add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_INSUMO_CULT before INSERT OR UPDATE OR DELETE ON INSUMO_CULT FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_INSUMO_CULT:'||:OLD.ID_INSUMO_CULT, 'INSCUL', sysdate,'D'); END IF; END;
-- PROCEDÊNCIA alter table PROCEDENCIA add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_PROCEDENCIA before INSERT OR UPDATE OR DELETE ON PROCEDENCIA FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_PROCEDENCIA:'||:OLD.ID_PROCEDENCIA, 'PROCEDENCIA', sysdate,'D'); END IF; END;
-- FUNCIONÁRIO alter table FUNCIONAR add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_FUNCIONAR before INSERT OR UPDATE OR DELETE ON FUNCIONAR FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_FUNCIONAR:'||:OLD.ID_FUNCIONAR, 'FUNC', sysdate,'D'); END IF; END;
-- FUNCIONÁRIO VS CLASSE PAGAMENTO alter table FUNCIONARCLASSE add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_FUNCIONARCLASSE before INSERT OR UPDATE OR DELETE ON FUNCIONARCLASSE FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_FUNCIONARCLASSE:'||:OLD.ID_FUNCIONARCLASSE, 'FUNCLAS', sysdate,'D'); END IF; END;
TGB_MOBILE_EQUIPTO -- FUNCIONÁRIO VS EQUIPE alter table FUNCIONAREQUIPE add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_FUNCIONAREQUIPE before INSERT OR UPDATE OR DELETE ON FUNCIONAREQUIPE FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_FUNCIONAREQUIPE:'||:OLD.ID_FUNCIONAREQUIPE, 'FUNEQUI', sysdate,'D'); END IF; END;
-- EQUIPAMENTO alter table EQUIPTO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_EQUIPTO before INSERT OR UPDATE OR DELETE ON EQUIPTO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_EQUIPTO:'||:OLD.ID_EQUIPTO, 'EQUIPTO', sysdate,'D'); END IF; END;
-- ESTÁDIO VS OCUPAÇÃO -- AVALIAÇÃO DE LAVOURA – ESTADIO alter table ESTADIO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_ESTADIO before INSERT OR UPDATE OR DELETE ON ESTADIO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_ESTADIO:'||:OLD.ID_ESTADIO, 'EST', sysdate,'D'); END IF; END;
-- TIPO DE APLICAÇÃO alter table TIPOAPLICACAO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_TIPOAPLICACAO before INSERT OR UPDATE OR DELETE ON TIPOAPLICACAO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_TIPOAPLICACAO:'||:OLD.ID_TIPOAPLICACAO, 'TIPOAPLICACAO', sysdate,'D'); END IF; END;
-- SISTEMA DE APLICAÇÃO alter table SISTAPLICACAO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_SISTAPLICACAO before INSERT OR UPDATE OR DELETE ON SISTAPLICACAO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_SISTAPLICACAO:'||:OLD.ID_SISTAPLICACAO, 'SISTAPLICACAO', sysdate,'D'); END IF; END;
-- TIPO DE BICO PULVERIZADOR alter table BICOPULVERIZ add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_BICOPULVERIZ before INSERT OR UPDATE OR DELETE ON BICOPULVERIZ FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_BICOPULVERIZ:'||:OLD.ID_BICOPULVERIZ, 'BICOPULVERIZ', sysdate,'D'); END IF; END;
-- VARIEDADE alter table VARIEDADE add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_VARIEDADE before INSERT OR UPDATE OR DELETE ON VARIEDADE FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_VARIEDADE:'||:OLD.ID_VARIEDADE, 'VARIEDADE', sysdate,'D'); END IF; END;
-- VARIEDADE VS INSUMOS alter table VARIEDADE_INS add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_VARIEDADE_INS before INSERT OR UPDATE OR DELETE ON VARIEDADE_INS FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_VARIEDADE_INS:'||:OLD.ID_VARIEDADE_INS, 'VI', sysdate,'D'); END IF; END;
-- HORÁRIO alter table MDO_HORARIO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_MDO_HORARIO before INSERT OR UPDATE OR DELETE ON MDO_HORARIO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_MDO_HORARIO:'||:OLD.ID_MDO_HORARIO, 'HOR', sysdate,'D'); END IF; END;
-- DISPONIBILIDADE FUNCIONÁRIO alter table FUNCIONARDISP add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_FUNCIONARDISP before INSERT OR UPDATE OR DELETE ON FUNCIONARDISP FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_FUNCIONARDISP:'||:OLD.ID_FUNCIONARDISP, 'FD', sysdate,'D'); END IF; END;
-- FUNCIONÁRIO VS HORÁRIO alter table FUNCIONARHR add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_FUNCIONARHR before INSERT OR UPDATE OR DELETE ON FUNCIONARHR FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_FUNCIONARHR:'||:OLD.ID_FUNCIONARHR, 'FUNCIONARHR', sysdate,'D'); END IF; END;
-- MODELO alter table MODELO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_MODELO before INSERT OR UPDATE OR DELETE ON MODELO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_MODELO:'||:OLD.ID_MODELO, 'MODEL', sysdate,'D'); END IF; END;
-- ORDEM DE SERVIÇO – INSUMOS POR LOCAIS HE alter table APORDSERVICO_INS_LC add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_APORDSERVICO_INS_LC before INSERT OR UPDATE OR DELETE ON APORDSERVICO_INS_LC FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_APORDSERVICO_INS_LC:'||:OLD.ID_APORDSERVICO_INS_LC, 'APORDSERVICO_INS_LC', sysdate,'D'); END IF; END;
-- ORDEM DE SERVIÇO – INSUMOS POR LOCAIS DE alter table APORDSERVICO_INS_LC_DE add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_APORDSERV_INS_LC_DE before INSERT OR UPDATE OR DELETE ON APORDSERVICO_INS_LC_DE FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_APORDSERVICO_INS_LC_DE:'||:OLD.ID_APORDSERVICO_INS_LC_DE, 'APTO', sysdate,'D'); END IF; END;
-- SISTEMA DE CULTIVO alter table SISTCULTIVO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_SISTCULTIVO before INSERT OR UPDATE OR DELETE ON SISTCULTIVO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_SISTCULTIVO:'||:OLD.ID_SISTCULTIVO, 'SISTCULTIVO', sysdate,'D'); END IF; END;
-- SISTEMA DE PLANTIO alter table SISTPLANTIO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_SISTPLANTIO before INSERT OR UPDATE OR DELETE ON SISTPLANTIO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_SISTPLANTIO:'||:OLD.ID_SISTPLANTIO, 'SISTPLANTIO', sysdate,'D'); END IF; END;
-- ESPAÇAMENTO alter table ESPACAMENTO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_ESPACAMENTO before INSERT OR UPDATE OR DELETE ON ESPACAMENTO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_ESPACAMENTO:'||:OLD.ID_ESPACAMENTO, 'ESPACAMENTO', sysdate,'D'); END IF; END;
-- EVENTO DA PLANTA – SITUAÇÃO ANTERIOR alter table EVENTO_PLANTA_SIT add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_EVENTO_PLANTA_SIT before INSERT OR UPDATE OR DELETE ON EVENTO_PLANTA_SIT FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_EVENTO_PLANTA_SIT:'||:OLD.ID_EVENTO_PLANTA_SIT, 'EVENTO_PLANTA_SIT', sysdate,'D'); END IF; END;
-- APTO. EVENTOS EM PLANTAS - HE alter table APEVPLANTA_LP add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_APEVPLANTA_LP before INSERT OR UPDATE OR DELETE ON APEVPLANTA_LP FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_APEVPLANTA_LP:'||:OLD.ID_APEVPLANTA_LP, 'APEVPLANTA_LP', sysdate,'D'); END IF; END;
-- APTO. EVENTOS EM PLANTAS - DE alter table APEVPLANTA_LP_LNHP add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_APEVPLANTA_LP_LNHP before INSERT OR UPDATE OR DELETE ON APEVPLANTA_LP_LNHP FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_APEVPLANTA_LP_LNHP:'||:OLD.ID_APEVPLANTA_LP_LNHP, 'DEEVEP', sysdate,'D'); END IF; END;
-- EVENTO DA PLANTA alter table EVENTO_PLANTA add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_EVENTO_PLANTA before INSERT OR UPDATE OR DELETE ON EVENTO_PLANTA FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_EVENTO_PLANTA:'||:OLD.ID_EVENTO_PLANTA, 'EVEPL', sysdate,'D'); END IF; END;
-- TALHAO FISICO VS LINHA DE PLANTIO -- TALHÃO FÍSICO alter table UPN3_FISICO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_UPN3_FISICO before INSERT OR UPDATE OR DELETE ON UPN3_FISICO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_UPN3_FISICO:'||:OLD.ID_UPN3_FISICO, 'UP3FI', sysdate,'D'); END IF; END;
-- GRUPO OPERATIVO alter table GRPOPERATIVO add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_GRPOPERATIVO before INSERT OR UPDATE OR DELETE ON GRPOPERATIVO FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_GRPOPERATIVO:'||:OLD.ID_GRPOPERATIVO, 'GRPOPERATIVO', sysdate,'D'); END IF; END;
-- FITOSSANIDADE VS INSUMOS alter table FITOSSANID_INS add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_FITOSSANID_INS before INSERT OR UPDATE OR DELETE ON FITOSSANID_INS FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_FITOSSANID_INS:'||:OLD.ID_FITOSSANID_INS, 'FITOSSANID_INS', sysdate,'D'); END IF; END;
-- DISPONIBILIDADE EQUIPAMENTO alter table EQUIPTODISP add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_EQUIPTODISP before INSERT OR UPDATE OR DELETE ON EQUIPTODISP FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_EQUIPTODISP:'||:OLD.ID_EQUIPTODISP, 'ED', sysdate,'D'); END IF; END;
-- ORDEM DE SERVIÇO - CONDIÇÃO DO TEMPO alter table APORDSERVICO_FAIXA add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_APORDSERVICO_FAIXA before INSERT OR UPDATE OR DELETE ON APORDSERVICO_FAIXA FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_APORDSERVICO_FAIXA:'||:OLD.ID_APORDSERVICO_FAIXA , 'APORDSERVICO_FAIXA', sysdate,'D'); END IF; END;
-- DEFINIÇÃO DA FAIXA DE VALORES alter table DEF_FAIXAVAL add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_DEF_FAIXAVAL before INSERT OR UPDATE OR DELETE ON DEF_FAIXAVAL FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_DEF_FAIXAVAL:'||:OLD.ID_DEF_FAIXAVAL , 'DEF_FAIXAVAL', sysdate,'D'); END IF; END;
-- FAIXA DE VALORES alter table FAIXAVAL add (MOB_LASTUPDATE DATE);
create or replace trigger TGB_MOBILE_FAIXAVAL before INSERT OR UPDATE OR DELETE ON FAIXAVAL FOR EACH ROW BEGIN IF(updating OR inserting) THEN :NEW.MOB_LASTUPDATE := sysdate; ELSE INSERT INTO MOBCONTROLREG(IDENTIFICACAO,TABELA,LASTUPDATE,MOBSTATUS) VALUES('ID_FAIXAVAL:'||:OLD.ID_FAIXAVAL , 'FAIXAVAL', sysdate,'D'); END IF; END; |