[Home] [Help]
825: -- In case of the OAF application, the COMMIT that is
826: -- executed in the aggregate_parent must not be called
827: -- ntungare
828: --
829: qa_parent_child_pkg.relate(x_par_plan_id, x_par_col_id,
830: x_par_occ, x_plan_id,
831: x_collection_id, x_occurrence,
832: x_txn_header_id,
833: agg_elements,
855: --
856: /*
857: else
858: if (agg_elements IS NOT NULL) THEN
859: l_dummy := QA_PARENT_CHILD_PKG.update_hist_children(
860: p_parent_plan_id => x_par_plan_id,
861: p_parent_collection_id => x_par_col_id,
862: p_parent_occurrence => x_par_occ);
863: end if;
872: -- srhariha. Wed May 26 22:31:28 PDT 2004
873:
874:
875: /*
876: qa_parent_child_pkg.insert_history_auto_rec_QWB(x_plan_id,
877: x_txn_header_id,
878: 1,
879: 2);
880: qa_parent_child_pkg.insert_history_auto_rec_QWB(x_plan_id,
876: qa_parent_child_pkg.insert_history_auto_rec_QWB(x_plan_id,
877: x_txn_header_id,
878: 1,
879: 2);
880: qa_parent_child_pkg.insert_history_auto_rec_QWB(x_plan_id,
881: x_txn_header_id,
882: 1,
883: 4);
884: */
894:
895: -- insert automatic records
896: if (x_enabled = 2 or x_enabled is null) then
897:
898: qa_parent_child_pkg.insert_history_auto_rec_QWB(p_plan_id => x_plan_id,
899: p_collection_id => y_collection_id,
900: p_occurrence => x_occurrence,
901: p_organization_id => x_org_id,
902: p_txn_header_id => x_txn_header_id,
903: p_relationship_type => 1,
904: p_data_entry_mode => 2,
905: x_status => return_status);
906: -- insert history records
907: qa_parent_child_pkg.insert_history_auto_rec_QWB(p_plan_id => x_plan_id,
908: p_collection_id => y_collection_id,
909: p_occurrence => x_occurrence,
910: p_organization_id => x_org_id,
911: p_txn_header_id => x_txn_header_id,
926: -- anagarwa Wed May 26 17:07:29 PDT 2004
927: -- bug 3667449
928: -- if parent copy source element is updated, then update the
929: -- child too.
930: l_ret_value:= QA_PARENT_CHILD_PKG.update_child(x_par_plan_id,
931: x_par_col_id,
932: x_par_occ, x_plan_id,
933: x_collection_id, x_occurrence);
934: end if;
1317: -- backward relationships to be fired and if there are actions associated
1318: -- with those then they should be fired too. So we set txn header id
1319: -- of the parent records so that actions get fired in
1320: -- qapcb.ssqr_post_commit
1321: IF(QA_PARENT_CHILD_PKG.update_parent(
1322: x_par_plan_id,
1323: x_par_col_id,
1324: x_par_occ,
1325: x_plan_id,
1342: --
1343: /*
1344: if ((x_enabled = 2 or x_enabled is null) AND
1345: x_agg_elements IS NOT NULL) then
1346: qa_parent_child_pkg.insert_history_auto_rec_QWB(
1347: p_plan_id => x_par_plan_id,
1348: p_collection_id => x_par_col_id,
1349: p_occurrence => x_par_occ,
1350: p_organization_id => x_org_id,
1364: -- and doesnot fire actions for child plans.
1365: -- srhariha. Wed May 26 22:31:28 PDT 2004.
1366:
1367: /*
1368: qa_parent_child_pkg.insert_history_auto_rec_QWB(x_plan_id,
1369: x_txn_header_id,
1370: 1,
1371: 4);
1372: */
1406:
1407: -- If the Hist plan data not collected then
1408: -- insert the history records
1409: IF (hist_plan_tab.count = 0) THEN
1410: qa_parent_child_pkg.insert_history_auto_rec_QWB(p_plan_id => x_plan_id,
1411: p_collection_id => y_collection_id,
1412: p_occurrence => x_occurrence,
1413: p_organization_id => x_org_id,
1414: p_txn_header_id => x_txn_header_id,
1423: -- reflect in them
1424: -- ntungare
1425: FOR hist_plan_cntr in 1..hist_plan_tab.count
1426: LOOP
1427: l_ret_value:= QA_PARENT_CHILD_PKG.update_child(x_plan_id,
1428: y_collection_id,
1429: x_occurrence,
1430: hist_plan_tab(hist_plan_cntr).plan_id,
1431: hist_plan_tab(hist_plan_cntr).collection_id,
1445: -- Element X is copied from B to C to D. If D is updated and
1446: -- X is updated in B , we want both C and D to be updated.
1447:
1448: IF (x_par_occ > 0 ) THEN
1449: l_ret_value:= QA_PARENT_CHILD_PKG.update_child(x_par_plan_id,
1450: x_par_col_id,
1451: x_par_occ,
1452: x_plan_id,
1453: x_collection_id,
1452: x_plan_id,
1453: x_collection_id,
1454: x_occurrence);
1455: ELSE
1456: l_ret_value := QA_PARENT_CHILD_PKG.update_all_children(x_plan_id,
1457: x_collection_id, x_occurrence);
1458: END IF;
1459:
1460: RETURN 0;
1847: -- esig status is false for child plan
1848: -- check esig status in ancestor plans
1849: -- before check if ancestor plans exists
1850:
1851: l_ancestors_exists := qa_parent_child_pkg.get_ancestors(
1852: p_child_plan_id => p_plan_id,
1853: p_child_occurrence => p_plan_occurrence,
1854: p_child_collection_id => p_plan_collection_id,
1855: x_parent_plan_ids => parent_plan_ids,
1933: -- esig status is false for child plan
1934: -- check esig status in ancestor plans
1935: -- before check if ancestor plans exists
1936: l_ancestors_exists :=
1937: QA_PARENT_CHILD_PKG.get_ancestors(p_child_plan_id => p_plan_id,
1938: p_child_occurrence => p_plan_occurrence,
1939: p_child_collection_id => p_plan_collection_id,
1940: x_parent_plan_ids => parent_plan_ids,
1941: x_parent_collection_ids => parent_collection_ids,
1994: AND child_enabled_flag = 1;
1995:
1996: agg_rel_flag NUMBER;
1997: BEGIN
1998: delete_api_ret_val := QA_PARENT_CHILD_PKG.delete_row (
1999: p_plan_id => p_plan_id,
2000: p_collection_id => p_collection_id,
2001: p_occurrence => p_occurrence);
2002:
2017: IF (agg_rel_flag = 1) THEN --Aggregate relation exists
2018: -- Hence insert history record for the parent
2019: -- as the deletion of the child record would
2020: -- impact the aggregated value on the parent.
2021: qa_parent_child_pkg.insert_history_auto_rec_QWB(
2022: p_plan_id => p_par_plan_id,
2023: p_collection_id => p_par_col_id,
2024: p_occurrence => p_par_occ,
2025: p_organization_id => p_org_id,