oracle ebs 总账 数据结构 account_type,Oracle EBS 总账科目类型

FUNCTION get_acc_type(p_sob_id IN NUMBER, p_account_code IN VARCHAR2)

RETURN VARCHAR2 IS

l_acc_type VARCHAR2(1);

BEGIN

SELECT substr(ffvl.compiled_value_attributes, -1)

INTO l_acc_type

FROM gl_sets_of_books          sob,

fnd_id_flex_structures_vl fifstv,

fnd_id_flex_segments      fifsg,

fnd_flex_values_vl        ffvl

WHERE sob.chart_of_accounts_id = fifstv.id_flex_num

AND fifsg.id_flex_code = fifstv.id_flex_code

AND fifsg.id_flex_num = fifstv.id_flex_num

AND fifsg.application_id = fifstv.application_id

AND ffvl.flex_value_set_id = fifsg.flex_value_set_id

AND sob.set_of_books_id = p_sob_id --帐套

AND fifsg.application_column_name = 'SEGMENT3'

AND ffvl.flex_value = p_account_code; --科目账户

RETURN l_acc_type;

EXCEPTION

WHEN OTHERS THEN

log_msg('get_acc_type error:' || SQLCODE || substr(SQLERRM, 1, 200));

RAISE fnd_api.g_exc_error;

END get_acc_type;