[Home] [Help]
200: get_obj_def(hier_id, effective_date, obj_info);
201: end if;
202:
203: end GET_HIER_INFO;
204: -- procedure to populate tp nodes on ftp_tp_pp_node_map for the situation
205: -- where there is no hierarchy
206: procedure populate_non_hier_tp(map_id in number,
207: tp_obj_def in number,
208: l_value_set_id in number) is
210: login_id number;
211: begin
212: user_id := fnd_global.user_id;
213: login_id := fnd_global.login_id;
214: delete ftp_tp_pp_node_map where map_id = node_map_id;
215: insert into ftp_tp_pp_node_map
216: (node_map_id, line_item_id, value_set_id,
217: currency, tp_node,
218: pp_node,
211: begin
212: user_id := fnd_global.user_id;
213: login_id := fnd_global.login_id;
214: delete ftp_tp_pp_node_map where map_id = node_map_id;
215: insert into ftp_tp_pp_node_map
216: (node_map_id, line_item_id, value_set_id,
217: currency, tp_node,
218: pp_node,
219: creation_date, created_by, last_updated_by,
236: login_id number;
237: begin
238: user_id := fnd_global.user_id;
239: login_id := fnd_global.login_id;
240: update ftp_tp_pp_node_map a set pp_node =
241: (select distinct line_item_id from ftp_prepayment_rule p
242: where p.object_definition_id = pp_obj_def
243: and p.line_item_id = a.line_item_id
244: and p.currency = a.currency),
267: --When found means TP assumptions exists and we need to update adjustment
268: --assumptions
269: --When not found means TP assumptions doesn't exists for the line_item,
270: --currency combo and we need to insert adjustment assumptions
271: MERGE INTO ftp_tp_pp_node_map nm USING
272: (select distinct line_item_id, currency from ftp_adjustment_rule
273: where object_definition_id = adj_obj_def) adj
274: ON (nm.line_item_id =adj.line_item_id and nm.currency=adj.currency
275: and nm.node_map_id = map_id)
299: where object_definition_id = tp_obj_def;
300: begin
301: user_id := fnd_global.user_id;
302: login_id := fnd_global.login_id;
303: delete ftp_tp_pp_node_map where map_id = node_map_id;
304: -- move things currency by currency
305: for cur in c loop
306: insert into ftp_tp_pp_node_map
307: (node_map_id, line_item_id,
302: login_id := fnd_global.login_id;
303: delete ftp_tp_pp_node_map where map_id = node_map_id;
304: -- move things currency by currency
305: for cur in c loop
306: insert into ftp_tp_pp_node_map
307: (node_map_id, line_item_id,
308: value_set_id,
309: currency,
310: tp_node,
367: user_id := fnd_global.user_id;
368: login_id := fnd_global.login_id;
369: -- move things currency by currency
370: for cur in c loop
371: update ftp_tp_pp_node_map a set pp_node =
372: (select h.parent_id
373: from fem_ln_items_hier h
374: where h.hierarchy_obj_def_id = hier_id
375: and h.parent_value_set_id = l_value_set_id
405: end loop;
406: end populate_hierarchical_pp;
407:
408: /***************************************************************************
409: Desc : Procedure to populate ftp_tp_pp_node_map when a hierarchy is used for
410: adjustment rule.
411: Pgmr : Raghuram K Nanda
412: Date : 16-Oct-2006
413: ***************************************************************************/
431: --currency combo and we need to insert adjustment assumptions
432:
433: -- move things currency by currency
434: for cur in c loop
435: MERGE INTO ftp_tp_pp_node_map nm USING
436: (select h.child_id, cur.currency, h.parent_id
437: from fem_ln_items_hier h
438: where h.hierarchy_obj_def_id = hier_id
439: /* restrict to this value set */
879:
880: --if hierarchy updated, update the node map detail table
881: if hier_updated then
882: --delete existing details and recreate them
883: delete ftp_tp_pp_node_map a where a.node_map_id = node_map_id;
884: build_node_map(node_map_id,
885: tp_info.value_set_id,
886: tp_info.obj_id,
887: tp_hier_info.obj_id,
1413: END IF;
1414: END LOOP;
1415:
1416: -- Register the Node Map Tables as well
1417: -- Register FTP_TP_PP_NODE_HEADER and FTP_TP_PP_NODE_MAP
1418: FEM_PL_PKG.register_table(
1419: p_api_version => c_api_version,
1420: p_request_id => p_request_id,
1421: p_object_id => p_object_id,
1436: FEM_PL_PKG.register_table(
1437: p_api_version => c_api_version,
1438: p_request_id => p_request_id,
1439: p_object_id => p_object_id,
1440: p_table_name => 'FTP_TP_PP_NODE_MAP',
1441: p_statement_type => c_stmt_type,
1442: p_num_of_output_rows => 0,
1443: p_user_id => p_user_id,
1444: p_last_update_login => p_last_update_login,
1890: l_total_out := l_total_out + l_output_cnt;
1891:
1892: END LOOP;
1893:
1894: -- Register teh FTP_TP_PP_NODE_MAP and FTP_TP_PP_NODE_HEADER info
1895: select count(*) into l_output_cnt from FTP_TP_PP_NODE_HEADER
1896: where created_by_object_id = OBJECT_ID and created_by_request_id = REQUEST_ID;
1897:
1898: FEM_ENGINES_PKG.TECH_MESSAGE(
1924: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1925: RAISE FND_API.G_EXC_ERROR;
1926: END IF;
1927:
1928: select count(*) into l_output_cnt from FTP_TP_PP_NODE_MAP
1929: where created_by_object_id = OBJECT_ID and created_by_request_id = REQUEST_ID;
1930:
1931: FEM_ENGINES_PKG.TECH_MESSAGE(
1932: p_severity => fnd_log.level_error,
1937: FEM_PL_PKG.update_num_of_output_rows(
1938: p_api_version => c_api_version,
1939: p_request_id => p_request_id,
1940: p_object_id => p_object_id,
1941: p_table_name => 'FTP_TP_PP_NODE_MAP',
1942: p_statement_type => c_stmt_type,
1943: p_num_of_output_rows => l_output_cnt,
1944: p_user_id => p_user_id,
1945: p_last_update_login => p_last_update_login,