12 lines
432 B
MySQL
12 lines
432 B
MySQL
declare
|
|
dup_val_on_index exception;
|
|
pragma exception_init (dup_val_on_index , -00001);
|
|
begin
|
|
execute immediate
|
|
'Insert into FUNCION_SISTEMA (FUNCIONSISTEMA_ID,SISTEMA_ID,NOMBFUNCION,DESCRUTA,ACTIVO,FECMODIF,USUARIO_ID) values
|
|
(FUNCION_SISTEMA_SEQ.NEXTVAL,''1'',''VDA > GRC >> CLIENTE COMPRADOR'',''VDA.GRC.CLIENTECOMPRADOR'',''1'',sysdate,''1'')';
|
|
exception when dup_val_on_index then null;
|
|
end;
|
|
|
|
|