[Home] [Help]
110:
111: if mtfr_rec.to_gl_ccid is null then
112:
113: if (p_log_level_rec.statement_level) then
114: fa_debug_pkg.add('FA_MASS_TRANSFERS.famtgcc','to_gl_ccid ','null', p_log_level_rec => p_log_level_rec);
115: end if;
116:
117:
118: -- Get Chart of Accounts ID
131: -- x_to_glccid := -99;
132: if x_to_glccid = -99 then
133:
134: if (p_log_level_rec.statement_level) then
135: fa_debug_pkg.add('FA_MASS_TRANSFERS.famtgcc','x_to_glccid','null', p_log_level_rec => p_log_level_rec);
136: end if;
137:
138:
139: -- the ccid does not exist and so needs to be created
141: -- initialize segment array
142: v_from_segarray.delete;
143:
144: if (p_log_level_rec.statement_level) then
145: fa_debug_pkg.add('FA_MASS_TRANSFERS.famtgcc','calling','FND_FLEX_EXT.GET_SEGMENTS', p_log_level_rec => p_log_level_rec);
146: end if;
147:
148: -- Get from_glccid segment array in the displayed order
149: IF (NOT FND_FLEX_EXT.GET_SEGMENTS(
156: raise flex_error;
157: END IF;
158:
159: if (p_log_level_rec.statement_level) then
160: fa_debug_pkg.add('FA_MASS_TRANSFERS.famtgcc','calling',' get_segarray ', p_log_level_rec => p_log_level_rec);
161: end if;
162:
163: -- Prepare segment array for To_gl_ccid
164: if NOT get_segarray ( x_mass_transfer_id => x_mass_transfer_id,
180: end loop;
181:
182:
183: if (p_log_level_rec.statement_level) then
184: fa_debug_pkg.add('FA_MASS_TRANSFERS.famtgcc','calling','FND_FLEX_EXT.GET_COMBINATION_ID', p_log_level_rec => p_log_level_rec);
185: end if;
186:
187: -- Updating array with new account value
188: IF (NOT FND_FLEX_EXT.GET_COMBINATION_ID( 'SQLGL',
287: mtfr_rec c_mtfr%ROWTYPE := null;
288: BEGIN
289:
290: if (p_log_level_rec.statement_level) then
291: fa_debug_pkg.add('FA_MASS_TRANSFERS.get_segarray','calling','fnd_flex_ext.get_delimiter', p_log_level_rec => p_log_level_rec);
292: end if;
293:
294: x_delimiter := fnd_flex_ext.get_delimiter(
295: application_short_name => 'SQLGL'
296: , key_flex_code => 'GL#'
297: , structure_number => x_structure_number );
298:
299: if (p_log_level_rec.statement_level) then
300: fa_debug_pkg.add('FA_MASS_TRANSFERS.get_segarray','calling','fnd_flex_key_api.set_session_mode', p_log_level_rec => p_log_level_rec);
301: end if;
302:
303:
304: fnd_flex_key_api.set_session_mode('customer_data');
304: fnd_flex_key_api.set_session_mode('customer_data');
305:
306:
307: if (p_log_level_rec.statement_level) then
308: fa_debug_pkg.add('FA_MASS_TRANSFERS.get_segarray','calling','fnd_flex_key_api.find_flexfield', p_log_level_rec => p_log_level_rec);
309: end if;
310:
311: v_flex_type := fnd_flex_key_api.find_flexfield(
312: appl_short_name => 'SQLGL',
312: appl_short_name => 'SQLGL',
313: flex_code => 'GL#' );
314:
315: if (p_log_level_rec.statement_level) then
316: fa_debug_pkg.add('FA_MASS_TRANSFERS.get_segarray','calling','fnd_flex_key_api.find_structure', p_log_level_rec => p_log_level_rec);
317: end if;
318:
319:
320: v_struct_type := fnd_flex_key_api.find_structure(
321: flexfield => v_flex_type,
322: structure_number => x_structure_number );
323:
324: if (p_log_level_rec.statement_level) then
325: fa_debug_pkg.add('FA_MASS_TRANSFERS.get_segarray','calling','fnd_flex_key_api.get_segments', p_log_level_rec => p_log_level_rec);
326: end if;
327:
328:
329: fnd_flex_key_api.get_segments( flexfield => v_flex_type,