391:
392: l_ledger_id number := P_LEDGER_ID;
393: l_cc_id number := P_CCID;
394:
395: l_delimiter_label FND_ID_FLEX_STRUCTURES.Concatenated_Segment_Delimiter%TYPE;
396:
397: TYPE t_segemnt_type IS RECORD ( seg_num FND_ID_FLEX_SEGMENTS.SEGMENT_NUM%TYPE
398: ,seg_name FND_ID_FLEX_SEGMENTS.Segment_Name%TYPE
399: ,column_name FND_ID_FLEX_SEGMENTS.APPLICATION_COLUMN_NAME%TYPE
419: --Get delimiter label
420: SELECT FIFStr.Concatenated_Segment_Delimiter
421: INTO l_delimiter_label
422: FROM GL_CODE_COMBINATIONS gcc
423: ,FND_ID_FLEX_STRUCTURES FIFStr
424: WHERE gcc.code_combination_id = l_cc_id --using variable l_cc_id
425: AND FIFStr.APPLICATION_ID=101
426: AND FIFStr.ID_FLEX_CODE='GL#'
427: AND FIFStr.ID_FLEX_NUM = gcc.chart_of_accounts_id