create or replace procedure ssp_mm_proc_indent_spec_int(
i_INDREF VARCHAR2,
i_SPECINST VARCHAR2,
i_CREATEDBY NUMBER,
o_ERRMESSAGE OUT NUMBER)
is
li_code_location number(5);
v_errortxt_msg varchar2(250);
v_proc_text varchar2(50);
BEGIN
li_code_location := 1;
insert into SSP_MM_INDENT_SPEC_INS(
INDREF,
SPECINST,
CREATEDBY,
CREATEDATE)
values(
i_INDREF ,
i_SPECINST ,
i_CREATEDBY,
SYSDATE);
commit;
o_ERRMESSAGE :=0;
EXCEPTION
WHEN OTHERS THEN
ROLLBACK;
v_errortxt_msg := SQLERRM || ' : ERROR WHILE Selection.'||' Location : '||li_code_location;
v_proc_text := 'ssp_mm_proc_indent_spec_int';
o_ERRMESSAGE := 1;
insert into ssp_sms_error_log(log_id,error_msg,object_text,createby,createdate) values (log_sms_seq.nextval,v_errortxt_msg,v_proc_text,i_createdby,sysdate);
COMMIT;
END;