53: PO_MESSAGE_S.add_exc_msg
54: ( p_pkg_name => d_pkg_name,
55: p_procedure_name => d_api_name || '.' || d_position
56: );
57: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
58: END delete_rows;
59:
60: -----------------------------------------------------------------------
61: --Start of Comments
118: -- Created an associative array to store what id has appeared.
119: l_duplicate_flag_tbl.EXTEND(p_po_distribution_id_tbl.COUNT);
120:
121: FOR i IN 1..p_po_distribution_id_tbl.COUNT LOOP
122: IF (x_record_already_exist_tbl(i) = FND_API.G_FALSE) THEN
123:
124: IF (l_distinct_id_list.EXISTS(p_po_distribution_id_tbl(i))) THEN
125:
126: l_duplicate_flag_tbl(i) := FND_API.G_TRUE;
122: IF (x_record_already_exist_tbl(i) = FND_API.G_FALSE) THEN
123:
124: IF (l_distinct_id_list.EXISTS(p_po_distribution_id_tbl(i))) THEN
125:
126: l_duplicate_flag_tbl(i) := FND_API.G_TRUE;
127: ELSE
128: l_duplicate_flag_tbl(i) := FND_API.G_FALSE;
129:
130: l_distinct_id_list(p_po_distribution_id_tbl(i)) := 1;
124: IF (l_distinct_id_list.EXISTS(p_po_distribution_id_tbl(i))) THEN
125:
126: l_duplicate_flag_tbl(i) := FND_API.G_TRUE;
127: ELSE
128: l_duplicate_flag_tbl(i) := FND_API.G_FALSE;
129:
130: l_distinct_id_list(p_po_distribution_id_tbl(i)) := 1;
131: END IF;
132:
409: Nvl(revision_num, 0), --
410: amount_changed_flag --13503748 Encumbrance ER
411: FROM po_distributions_all
412: WHERE po_distribution_id = p_po_distribution_id_tbl(i)
413: AND x_record_already_exist_tbl(i) = FND_API.G_FALSE
414: AND l_duplicate_flag_tbl(i) = FND_API.G_FALSE;
415:
416: d_position := 20;
417: IF (PO_LOG.d_stmt) THEN
410: amount_changed_flag --13503748 Encumbrance ER
411: FROM po_distributions_all
412: WHERE po_distribution_id = p_po_distribution_id_tbl(i)
413: AND x_record_already_exist_tbl(i) = FND_API.G_FALSE
414: AND l_duplicate_flag_tbl(i) = FND_API.G_FALSE;
415:
416: d_position := 20;
417: IF (PO_LOG.d_stmt) THEN
418: PO_LOG.stmt(d_module, d_position, 'transfer count = ' || SQL%ROWCOUNT);
423: SET delete_flag = p_delete_flag_tbl(i)
424: WHERE po_distribution_id = p_po_distribution_id_tbl(i)
425: AND draft_id = p_draft_id_tbl(i)
426: AND NVL(delete_flag, 'N') <> 'Y' -- bug5570989
427: AND x_record_already_exist_tbl(i) = FND_API.G_TRUE;
428:
429: d_position := 30;
430:
431: IF (PO_LOG.d_stmt) THEN
444: PO_MESSAGE_S.add_exc_msg
445: ( p_pkg_name => d_pkg_name,
446: p_procedure_name => d_api_name || '.' || d_position
447: );
448: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
449: END sync_draft_from_txn;
450:
451: -----------------------------------------------------------------------
452: --Start of Comments
515: PO_MESSAGE_S.add_exc_msg
516: ( p_pkg_name => d_pkg_name,
517: p_procedure_name => d_api_name || '.' || d_position
518: );
519: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
520: END sync_draft_from_txn;
521:
522: -----------------------------------------------------------------------
523: --Start of Comments
1100: PO_MESSAGE_S.add_exc_msg
1101: ( p_pkg_name => d_pkg_name,
1102: p_procedure_name => d_api_name || '.' || d_position
1103: );
1104: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1105: END merge_changes;
1106:
1107: -----------------------------------------------------------------------
1108: --Start of Comments