If used function
EXCEPTION
WHEN NO_DATA_FOUND THEN
RETURN null;
end;
Others
EXCEPTION
WHEN NO_DATA_FOUND THEN
null;
end;
...
Monday, January 29, 2018
Thursday, January 25, 2018
Colling form condition add.
12:14 PM
No comments
DECLARE
cl_frm varchar2(10);
begin
cl_frm := GET_APPLICATION_PROPERTY(calling_form);
if
cl_frm='ORF_M03' THEN
SET_TAB_PAGE_PROPERTY('OR_ADVICE', enabled, property_false);
SET_TAB_PAGE_PROPERTY('OR_ADVICE', visible, property_false);
END IF;
EXCEPTION
WHEN OTHERS THEN NULL;
END; &nbs...
Sunday, January 7, 2018
oracle forms where condition default where
6:01 PM
No comments
PROCEDURE PRC_SEARCH IS
V_WHERE varchar2(4000);
BEGIN
V_WHERE := 'COMPANY_NO=:GLOBAL.G_COMPANY_NO';
IF :CTRL_SEARCH.SLOT_GROUP IS NOT NULL THEN
V_WHERE := V_WHERE||' AND SLOT_GROUP = :CTRL_SEARCH.SLOT_GROUP';
END IF;
IF :CTRL_SEARCH.SURGERY_NAME IS NOT NULL THEN
V_WHERE := V_WHERE||' AND SURGERY_NO IN (SELECT PROCEDURE_ID FROM OT_PROCEDURE WHERE UPPER(PROCEDURE_NAME) LIKE ''%'||UPPER(:CTRL_SEARCH.SURGERY_NAME)||'%'')';
END IF;
IF :CTRL_SEARCH.PRIORITY IS NOT NULL THEN
V_WHERE := V_WHERE||'...