332: n NUMBER;
333: l_custom BOOLEAN;
334:
335: BEGIN
336: c := dbms_sql.open_cursor;
337: l_sql := 'select ' || proc ||
338: '(:attrval,:lang,:attr,:entity,:ctx) from dual';
339: dbms_sql.parse(c,l_sql,2);
340: DBMS_SQL.BIND_VARIABLE(c,':attrval','x');
335: BEGIN
336: c := dbms_sql.open_cursor;
337: l_sql := 'select ' || proc ||
338: '(:attrval,:lang,:attr,:entity,:ctx) from dual';
339: dbms_sql.parse(c,l_sql,2);
340: DBMS_SQL.BIND_VARIABLE(c,':attrval','x');
341: DBMS_SQL.BIND_VARIABLE(c,':lang','x');
342: DBMS_SQL.BIND_VARIABLE(c,':attr','x');
343: DBMS_SQL.BIND_VARIABLE(c,':entity','x');
336: c := dbms_sql.open_cursor;
337: l_sql := 'select ' || proc ||
338: '(:attrval,:lang,:attr,:entity,:ctx) from dual';
339: dbms_sql.parse(c,l_sql,2);
340: DBMS_SQL.BIND_VARIABLE(c,':attrval','x');
341: DBMS_SQL.BIND_VARIABLE(c,':lang','x');
342: DBMS_SQL.BIND_VARIABLE(c,':attr','x');
343: DBMS_SQL.BIND_VARIABLE(c,':entity','x');
344: DBMS_SQL.BIND_VARIABLE(c,':ctx','x');
337: l_sql := 'select ' || proc ||
338: '(:attrval,:lang,:attr,:entity,:ctx) from dual';
339: dbms_sql.parse(c,l_sql,2);
340: DBMS_SQL.BIND_VARIABLE(c,':attrval','x');
341: DBMS_SQL.BIND_VARIABLE(c,':lang','x');
342: DBMS_SQL.BIND_VARIABLE(c,':attr','x');
343: DBMS_SQL.BIND_VARIABLE(c,':entity','x');
344: DBMS_SQL.BIND_VARIABLE(c,':ctx','x');
345: n:=DBMS_SQL.execute(c);
338: '(:attrval,:lang,:attr,:entity,:ctx) from dual';
339: dbms_sql.parse(c,l_sql,2);
340: DBMS_SQL.BIND_VARIABLE(c,':attrval','x');
341: DBMS_SQL.BIND_VARIABLE(c,':lang','x');
342: DBMS_SQL.BIND_VARIABLE(c,':attr','x');
343: DBMS_SQL.BIND_VARIABLE(c,':entity','x');
344: DBMS_SQL.BIND_VARIABLE(c,':ctx','x');
345: n:=DBMS_SQL.execute(c);
346: dbms_sql.close_cursor(c);
339: dbms_sql.parse(c,l_sql,2);
340: DBMS_SQL.BIND_VARIABLE(c,':attrval','x');
341: DBMS_SQL.BIND_VARIABLE(c,':lang','x');
342: DBMS_SQL.BIND_VARIABLE(c,':attr','x');
343: DBMS_SQL.BIND_VARIABLE(c,':entity','x');
344: DBMS_SQL.BIND_VARIABLE(c,':ctx','x');
345: n:=DBMS_SQL.execute(c);
346: dbms_sql.close_cursor(c);
347: RETURN TRUE;
340: DBMS_SQL.BIND_VARIABLE(c,':attrval','x');
341: DBMS_SQL.BIND_VARIABLE(c,':lang','x');
342: DBMS_SQL.BIND_VARIABLE(c,':attr','x');
343: DBMS_SQL.BIND_VARIABLE(c,':entity','x');
344: DBMS_SQL.BIND_VARIABLE(c,':ctx','x');
345: n:=DBMS_SQL.execute(c);
346: dbms_sql.close_cursor(c);
347: RETURN TRUE;
348: EXCEPTION
341: DBMS_SQL.BIND_VARIABLE(c,':lang','x');
342: DBMS_SQL.BIND_VARIABLE(c,':attr','x');
343: DBMS_SQL.BIND_VARIABLE(c,':entity','x');
344: DBMS_SQL.BIND_VARIABLE(c,':ctx','x');
345: n:=DBMS_SQL.execute(c);
346: dbms_sql.close_cursor(c);
347: RETURN TRUE;
348: EXCEPTION
349: WHEN OTHERS THEN
342: DBMS_SQL.BIND_VARIABLE(c,':attr','x');
343: DBMS_SQL.BIND_VARIABLE(c,':entity','x');
344: DBMS_SQL.BIND_VARIABLE(c,':ctx','x');
345: n:=DBMS_SQL.execute(c);
346: dbms_sql.close_cursor(c);
347: RETURN TRUE;
348: EXCEPTION
349: WHEN OTHERS THEN
350: dbms_sql.close_cursor(c);
346: dbms_sql.close_cursor(c);
347: RETURN TRUE;
348: EXCEPTION
349: WHEN OTHERS THEN
350: dbms_sql.close_cursor(c);
351: RETURN FALSE;
352: END;
353:
354: FUNCTION chk_for_trunc (