54: PO_MESSAGE_S.add_exc_msg
55: ( p_pkg_name => d_pkg_name,
56: p_procedure_name => d_api_name || '.' || d_position
57: );
58: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
59: END delete_rows;
60:
61:
62: -----------------------------------------------------------------------
120: -- Created an associative array to store what id has appeared.
121: l_duplicate_flag_tbl.EXTEND(p_po_header_id_tbl.COUNT);
122:
123: FOR i IN 1..p_po_header_id_tbl.COUNT LOOP
124: IF (x_record_already_exist_tbl(i) = FND_API.G_FALSE) THEN
125:
126: IF (l_distinct_id_list.EXISTS(p_po_header_id_tbl(i))) THEN
127:
128: l_duplicate_flag_tbl(i) := FND_API.G_TRUE;
124: IF (x_record_already_exist_tbl(i) = FND_API.G_FALSE) THEN
125:
126: IF (l_distinct_id_list.EXISTS(p_po_header_id_tbl(i))) THEN
127:
128: l_duplicate_flag_tbl(i) := FND_API.G_TRUE;
129: ELSE
130: l_duplicate_flag_tbl(i) := FND_API.G_FALSE;
131:
132: l_distinct_id_list(p_po_header_id_tbl(i)) := 1;
126: IF (l_distinct_id_list.EXISTS(p_po_header_id_tbl(i))) THEN
127:
128: l_duplicate_flag_tbl(i) := FND_API.G_TRUE;
129: ELSE
130: l_duplicate_flag_tbl(i) := FND_API.G_FALSE;
131:
132: l_distinct_id_list(p_po_header_id_tbl(i)) := 1;
133: END IF;
134:
469: cat_admin_auth_enabled_flag, -- bug5022835
470: pay_when_paid -- E and C ER
471: FROM po_headers_all
472: WHERE po_header_id = p_po_header_id_tbl(i)
473: AND x_record_already_exist_tbl(i) = FND_API.G_FALSE
474: AND l_duplicate_flag_tbl(i) = FND_API.G_FALSE;
475:
476: d_position := 20;
477: IF (PO_LOG.d_stmt) THEN
470: pay_when_paid -- E and C ER
471: FROM po_headers_all
472: WHERE po_header_id = p_po_header_id_tbl(i)
473: AND x_record_already_exist_tbl(i) = FND_API.G_FALSE
474: AND l_duplicate_flag_tbl(i) = FND_API.G_FALSE;
475:
476: d_position := 20;
477: IF (PO_LOG.d_stmt) THEN
478: PO_LOG.stmt(d_module, d_position, 'transfer count = ' || SQL%ROWCOUNT);
483: SET delete_flag = p_delete_flag_tbl(i)
484: WHERE po_header_id = p_po_header_id_tbl(i)
485: AND draft_id = p_draft_id_tbl(i)
486: AND NVL(delete_flag, 'N') <> 'Y' -- bug5570989
487: AND x_record_already_exist_tbl(i) = FND_API.G_TRUE;
488:
489: d_position := 30;
490:
491: IF (PO_LOG.d_stmt) THEN
504: PO_MESSAGE_S.add_exc_msg
505: ( p_pkg_name => d_pkg_name,
506: p_procedure_name => d_api_name || '.' || d_position
507: );
508: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
509: END sync_draft_from_txn;
510:
511: -----------------------------------------------------------------------
512: --Start of Comments
575: PO_MESSAGE_S.add_exc_msg
576: ( p_pkg_name => d_pkg_name,
577: p_procedure_name => d_api_name || '.' || d_position
578: );
579: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
580: END sync_draft_from_txn;
581:
582: -----------------------------------------------------------------------
583: --Start of Comments
1286: PO_MESSAGE_S.add_exc_msg
1287: ( p_pkg_name => d_pkg_name,
1288: p_procedure_name => d_api_name || '.' || d_position
1289: );
1290: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1291: END merge_changes;
1292:
1293: -----------------------------------------------------------------------
1294: --Start of Comments