49: -- Constants.
50: ---------------------------------------------------------------------------
51:
52: c_result_type_rank_WARNING CONSTANT NUMBER :=
53: PO_VALIDATIONS.result_type_rank(PO_VALIDATIONS.c_result_type_warning);
54:
55: c_ENTITY_TYPE_LINE CONSTANT VARCHAR2(30) := PO_VALIDATIONS.c_ENTITY_TYPE_LINE;
56:
57: c_UNIT_PRICE CONSTANT VARCHAR2(30) := 'UNIT_PRICE';
51:
52: c_result_type_rank_WARNING CONSTANT NUMBER :=
53: PO_VALIDATIONS.result_type_rank(PO_VALIDATIONS.c_result_type_warning);
54:
55: c_ENTITY_TYPE_LINE CONSTANT VARCHAR2(30) := PO_VALIDATIONS.c_ENTITY_TYPE_LINE;
56:
57: c_UNIT_PRICE CONSTANT VARCHAR2(30) := 'UNIT_PRICE';
58:
59: -- PO_HEADERS_ALL.type_lookup_code
133: IF PO_LOG.d_stmt THEN
134: PO_LOG.stmt(d_mod, d_position, 'l_line_id_tbl', l_line_id_tbl);
135: END IF;
136:
137: PO_VALIDATIONS.validate_unit_price_change(
138: p_line_id_tbl => l_line_id_tbl
139: , p_price_break_lookup_code_tbl => l_price_break_lookup_code_tbl
140: , p_amount_changed_flag_tbl => l_amount_changed_flag_tbl --
141: , p_stopping_result_type => PO_VALIDATIONS.c_result_type_FAILURE
137: PO_VALIDATIONS.validate_unit_price_change(
138: p_line_id_tbl => l_line_id_tbl
139: , p_price_break_lookup_code_tbl => l_price_break_lookup_code_tbl
140: , p_amount_changed_flag_tbl => l_amount_changed_flag_tbl --
141: , p_stopping_result_type => PO_VALIDATIONS.c_result_type_FAILURE
142: , x_result_type => l_result_type
143: , x_result_set_id => l_result_set_id
144: , x_results => l_results);
145:
148: PO_LOG.stmt(d_mod, d_position, 'l_result_set_id', l_result_set_id);
149: PO_LOG.stmt(d_mod, d_position, 'l_result_type', l_result_type);
150: END IF;
151:
152: IF (PO_VALIDATIONS.result_type_rank(l_result_type) >=
153: c_result_type_rank_WARNING)
154: THEN
155: x_system_allows_update := 'Y';
156: ELSE
379: END IF;
380:
381: d_position := 1;
382: IF (x_result_set_id IS NULL) THEN
383: x_result_set_id := PO_VALIDATIONS.next_result_set_id();
384: END IF;
385:
386: d_position := 100;
387: /* Bug#10397036 : Unable to change Price in Modification */
384: END IF;
385:
386: d_position := 100;
387: /* Bug#10397036 : Unable to change Price in Modification */
388: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
389:
390: FOR i IN 1 .. p_line_id_tbl.Count LOOP
391: l_is_clm_po := PO_CLM_INTG_GRP.Is_clm_po(p_po_line_id => p_line_id_tbl(i));
392:
422: AND NVL(p_amt_changed_flag_tbl(i),'N') = 'N'; --
423:
424: d_position := 200;
425: IF (SQL%ROWCOUNT > 0) THEN
426: x_result_type := PO_VALIDATIONS.c_result_type_FAILURE;
427: END IF;
428: END IF;
429: END LOOP;
430:
594:
595: END LOOP;
596:
597: IF (l_results_count < x_results.result_type.COUNT) THEN
598: x_result_type := PO_VALIDATIONS.c_result_type_FAILURE;
599: ELSE
600: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
601: END IF;
602:
596:
597: IF (l_results_count < x_results.result_type.COUNT) THEN
598: x_result_type := PO_VALIDATIONS.c_result_type_FAILURE;
599: ELSE
600: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
601: END IF;
602:
603: IF PO_LOG.d_proc THEN
604: PO_LOG.proc_end(d_mod, 'x_result_type', x_result_type);
698: END IF;
699:
700: d_position := 1;
701: IF (x_result_set_id IS NULL) THEN
702: x_result_set_id := PO_VALIDATIONS.next_result_set_id();
703: END IF;
704:
705: d_position := 100;
706: FORALL i IN 1 .. p_line_id_tbl.COUNT
731: ;
732:
733: d_position := 200;
734: IF (SQL%ROWCOUNT > 0) THEN
735: x_result_type := PO_VALIDATIONS.c_result_type_FAILURE;
736: ELSE
737: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
738: END IF;
739:
733: d_position := 200;
734: IF (SQL%ROWCOUNT > 0) THEN
735: x_result_type := PO_VALIDATIONS.c_result_type_FAILURE;
736: ELSE
737: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
738: END IF;
739:
740: IF PO_LOG.d_proc THEN
741: PO_LOG.proc_end(d_mod, 'x_result_set_id', x_result_set_id);
900:
901: END IF;
902:
903: IF (l_results_count < x_results.result_type.COUNT) THEN
904: x_result_type := PO_VALIDATIONS.c_result_type_FAILURE;
905: ELSE
906: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
907: END IF;
908:
902:
903: IF (l_results_count < x_results.result_type.COUNT) THEN
904: x_result_type := PO_VALIDATIONS.c_result_type_FAILURE;
905: ELSE
906: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
907: END IF;
908:
909: IF PO_LOG.d_proc THEN
910: PO_LOG.proc_end(d_mod, 'x_result_type', x_result_type);