616: IS
617: l_cursor NUMBER;
618: l_is_valid BOOLEAN;
619: BEGIN
620: l_cursor := DBMS_SQL.Open_Cursor;
621: BEGIN
622: DBMS_SQL.Parse(l_cursor, p_sql_stmt, DBMS_SQL.NATIVE);
623: l_is_valid := TRUE;
624: EXCEPTION
618: l_is_valid BOOLEAN;
619: BEGIN
620: l_cursor := DBMS_SQL.Open_Cursor;
621: BEGIN
622: DBMS_SQL.Parse(l_cursor, p_sql_stmt, DBMS_SQL.NATIVE);
623: l_is_valid := TRUE;
624: EXCEPTION
625: WHEN OTHERS THEN
626: l_is_valid := FALSE;
625: WHEN OTHERS THEN
626: l_is_valid := FALSE;
627: END;
628:
629: DBMS_SQL.Close_Cursor(l_cursor);
630: RETURN l_is_valid;
631: END Is_SQL_Valid;
632:
633: END IBE_Prod_Relation_Rule_PVT;