[Home] [Help]
894: -- In case of the OAF application, the COMMIT that is
895: -- executed in the aggregate_parent must not be called
896: -- ntungare
897: --
898: qa_parent_child_pkg.relate(x_par_plan_id, x_par_col_id,
899: x_par_occ, x_plan_id,
900: x_collection_id, x_occurrence,
901: x_txn_header_id,
902: agg_elements,
924: --
925: /*
926: else
927: if (agg_elements IS NOT NULL) THEN
928: l_dummy := QA_PARENT_CHILD_PKG.update_hist_children(
929: p_parent_plan_id => x_par_plan_id,
930: p_parent_collection_id => x_par_col_id,
931: p_parent_occurrence => x_par_occ);
932: end if;
941: -- srhariha. Wed May 26 22:31:28 PDT 2004
942:
943:
944: /*
945: qa_parent_child_pkg.insert_history_auto_rec_QWB(x_plan_id,
946: x_txn_header_id,
947: 1,
948: 2);
949: qa_parent_child_pkg.insert_history_auto_rec_QWB(x_plan_id,
945: qa_parent_child_pkg.insert_history_auto_rec_QWB(x_plan_id,
946: x_txn_header_id,
947: 1,
948: 2);
949: qa_parent_child_pkg.insert_history_auto_rec_QWB(x_plan_id,
950: x_txn_header_id,
951: 1,
952: 4);
953: */
963:
964: -- insert automatic records
965: if (x_enabled = 2 or x_enabled is null) then
966:
967: qa_parent_child_pkg.insert_history_auto_rec_QWB(p_plan_id => x_plan_id,
968: p_collection_id => y_collection_id,
969: p_occurrence => x_occurrence,
970: p_organization_id => x_org_id,
971: p_txn_header_id => x_txn_header_id,
972: p_relationship_type => 1,
973: p_data_entry_mode => 2,
974: x_status => return_status);
975: -- insert history records
976: qa_parent_child_pkg.insert_history_auto_rec_QWB(p_plan_id => x_plan_id,
977: p_collection_id => y_collection_id,
978: p_occurrence => x_occurrence,
979: p_organization_id => x_org_id,
980: p_txn_header_id => x_txn_header_id,
995: -- anagarwa Wed May 26 17:07:29 PDT 2004
996: -- bug 3667449
997: -- if parent copy source element is updated, then update the
998: -- child too.
999: l_ret_value:= QA_PARENT_CHILD_PKG.update_child(x_par_plan_id,
1000: x_par_col_id,
1001: x_par_occ, x_plan_id,
1002: x_collection_id, x_occurrence);
1003: end if;
1386: -- backward relationships to be fired and if there are actions associated
1387: -- with those then they should be fired too. So we set txn header id
1388: -- of the parent records so that actions get fired in
1389: -- qapcb.ssqr_post_commit
1390: IF(QA_PARENT_CHILD_PKG.update_parent(
1391: x_par_plan_id,
1392: x_par_col_id,
1393: x_par_occ,
1394: x_plan_id,
1411: --
1412: /*
1413: if ((x_enabled = 2 or x_enabled is null) AND
1414: x_agg_elements IS NOT NULL) then
1415: qa_parent_child_pkg.insert_history_auto_rec_QWB(
1416: p_plan_id => x_par_plan_id,
1417: p_collection_id => x_par_col_id,
1418: p_occurrence => x_par_occ,
1419: p_organization_id => x_org_id,
1433: -- and doesnot fire actions for child plans.
1434: -- srhariha. Wed May 26 22:31:28 PDT 2004.
1435:
1436: /*
1437: qa_parent_child_pkg.insert_history_auto_rec_QWB(x_plan_id,
1438: x_txn_header_id,
1439: 1,
1440: 4);
1441: */
1475:
1476: -- If the Hist plan data not collected then
1477: -- insert the history records
1478: IF (hist_plan_tab.count = 0) THEN
1479: qa_parent_child_pkg.insert_history_auto_rec_QWB(p_plan_id => x_plan_id,
1480: p_collection_id => y_collection_id,
1481: p_occurrence => x_occurrence,
1482: p_organization_id => x_org_id,
1483: p_txn_header_id => x_txn_header_id,
1492: -- reflect in them
1493: -- ntungare
1494: FOR hist_plan_cntr in 1..hist_plan_tab.count
1495: LOOP
1496: l_ret_value:= QA_PARENT_CHILD_PKG.update_child(x_plan_id,
1497: y_collection_id,
1498: x_occurrence,
1499: hist_plan_tab(hist_plan_cntr).plan_id,
1500: hist_plan_tab(hist_plan_cntr).collection_id,
1514: -- Element X is copied from B to C to D. If D is updated and
1515: -- X is updated in B , we want both C and D to be updated.
1516:
1517: IF (x_par_occ > 0 ) THEN
1518: l_ret_value:= QA_PARENT_CHILD_PKG.update_child(x_par_plan_id,
1519: x_par_col_id,
1520: x_par_occ,
1521: x_plan_id,
1522: x_collection_id,
1521: x_plan_id,
1522: x_collection_id,
1523: x_occurrence);
1524: ELSE
1525: l_ret_value := QA_PARENT_CHILD_PKG.update_all_children(x_plan_id,
1526: x_collection_id, x_occurrence);
1527: END IF;
1528:
1529: RETURN 0;
1916: -- esig status is false for child plan
1917: -- check esig status in ancestor plans
1918: -- before check if ancestor plans exists
1919:
1920: l_ancestors_exists := qa_parent_child_pkg.get_ancestors(
1921: p_child_plan_id => p_plan_id,
1922: p_child_occurrence => p_plan_occurrence,
1923: p_child_collection_id => p_plan_collection_id,
1924: x_parent_plan_ids => parent_plan_ids,
2002: -- esig status is false for child plan
2003: -- check esig status in ancestor plans
2004: -- before check if ancestor plans exists
2005: l_ancestors_exists :=
2006: QA_PARENT_CHILD_PKG.get_ancestors(p_child_plan_id => p_plan_id,
2007: p_child_occurrence => p_plan_occurrence,
2008: p_child_collection_id => p_plan_collection_id,
2009: x_parent_plan_ids => parent_plan_ids,
2010: x_parent_collection_ids => parent_collection_ids,
2063: AND child_enabled_flag = 1;
2064:
2065: agg_rel_flag NUMBER;
2066: BEGIN
2067: delete_api_ret_val := QA_PARENT_CHILD_PKG.delete_row (
2068: p_plan_id => p_plan_id,
2069: p_collection_id => p_collection_id,
2070: p_occurrence => p_occurrence);
2071:
2086: IF (agg_rel_flag = 1) THEN --Aggregate relation exists
2087: -- Hence insert history record for the parent
2088: -- as the deletion of the child record would
2089: -- impact the aggregated value on the parent.
2090: qa_parent_child_pkg.insert_history_auto_rec_QWB(
2091: p_plan_id => p_par_plan_id,
2092: p_collection_id => p_par_col_id,
2093: p_occurrence => p_par_occ,
2094: p_organization_id => p_org_id,