1: PACKAGE BODY PO_VAL_PRICE_DIFFS AS
2: -- $Header: PO_VAL_PRICE_DIFFS.plb 120.1 2006/08/16 22:46:53 dedelgad noship $
3:
4: c_entity_type_PRICE_DIFF CONSTANT VARCHAR2(30) := PO_VALIDATIONS.c_entity_type_PRICE_DIFF;
5:
6: -- Constants for columns.
7: c_PRICE_DIFFERENTIAL_NUM CONSTANT VARCHAR2(30) := 'PRICE_DIFFERENTIAL_NUM';
8: c_PRICE_TYPE CONSTANT VARCHAR2(30) := 'PRICE_TYPE';
286: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
287: END IF;
288:
289: IF (x_result_set_id IS NULL) THEN
290: x_result_set_id := PO_VALIDATIONS.next_result_set_id();
291: END IF;
292:
293: FORALL i IN 1 .. p_price_differential_id_tbl.COUNT
294: INSERT INTO PO_VALIDATION_RESULTS_GT
323: )
324: ;
325:
326: IF (SQL%ROWCOUNT > 0) THEN
327: x_result_type := PO_VALIDATIONS.c_result_type_FAILURE;
328: ELSE
329: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
330: END IF;
331:
325:
326: IF (SQL%ROWCOUNT > 0) THEN
327: x_result_type := PO_VALIDATIONS.c_result_type_FAILURE;
328: ELSE
329: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
330: END IF;
331:
332: IF PO_LOG.d_proc THEN
333: PO_VALIDATIONS.log_validation_results_gt(d_mod,9,x_result_set_id);
329: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
330: END IF;
331:
332: IF PO_LOG.d_proc THEN
333: PO_VALIDATIONS.log_validation_results_gt(d_mod,9,x_result_set_id);
334: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
335: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
336: END IF;
337:
373: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
374: END IF;
375:
376: IF (x_result_set_id IS NULL) THEN
377: x_result_set_id := PO_VALIDATIONS.next_result_set_id();
378: END IF;
379:
380: FORALL i IN 1 .. p_price_differential_id_tbl.COUNT
381: INSERT INTO PO_VALIDATION_RESULTS_GT
419: OR p_multiplier_tbl(i) > SRC_PRICE_DIFF.max_multiplier
420: );
421:
422: IF (SQL%ROWCOUNT > 0) THEN
423: x_result_type := PO_VALIDATIONS.c_result_type_FAILURE;
424: ELSE
425: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
426: END IF;
427:
421:
422: IF (SQL%ROWCOUNT > 0) THEN
423: x_result_type := PO_VALIDATIONS.c_result_type_FAILURE;
424: ELSE
425: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
426: END IF;
427:
428: IF PO_LOG.d_proc THEN
429: PO_VALIDATIONS.log_validation_results_gt(d_mod,9,x_result_set_id);
425: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
426: END IF;
427:
428: IF PO_LOG.d_proc THEN
429: PO_VALIDATIONS.log_validation_results_gt(d_mod,9,x_result_set_id);
430: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
431: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
432: END IF;
433:
470: PO_LOG.proc_begin(d_mod,'x_result_set_id',x_result_set_id);
471: END IF;
472:
473: IF (x_result_set_id IS NULL) THEN
474: x_result_set_id := PO_VALIDATIONS.next_result_set_id();
475: END IF;
476:
477: FORALL i IN 1 .. p_price_differential_id_tbl.COUNT
478: INSERT INTO PO_VALIDATION_RESULTS_GT
510: AND p_multiplier_tbl(i) < SRC_PRICE_DIFF.min_multiplier;
511: --
512:
513: IF (SQL%ROWCOUNT > 0) THEN
514: x_result_type := PO_VALIDATIONS.c_result_type_FAILURE;
515: ELSE
516: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
517: END IF;
518:
512:
513: IF (SQL%ROWCOUNT > 0) THEN
514: x_result_type := PO_VALIDATIONS.c_result_type_FAILURE;
515: ELSE
516: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
517: END IF;
518:
519: IF PO_LOG.d_proc THEN
520: PO_VALIDATIONS.log_validation_results_gt(d_mod,9,x_result_set_id);
516: x_result_type := PO_VALIDATIONS.c_result_type_SUCCESS;
517: END IF;
518:
519: IF PO_LOG.d_proc THEN
520: PO_VALIDATIONS.log_validation_results_gt(d_mod,9,x_result_set_id);
521: PO_LOG.proc_end(d_mod,'x_result_type',x_result_type);
522: PO_LOG.proc_end(d_mod,'x_result_set_id',x_result_set_id);
523: END IF;
524: