DBA Data[Home] [Help]

APPS.QP_PREQ_PUB dependencies on DUAL

Line 10: G_ROUND_INDIVIDUAL_ADJ VARCHAR2(30);

6: G_ATTR_MGR_INSTALLED CONSTANT VARCHAR2(1) := QP_UTIL.Attrmgr_Installed;
7:
8: G_ROUNDING_OPTIONS VARCHAR2(30);
9: G_USE_MULTI_CURRENCY_PUB VARCHAR2(1); -- bug 2943033
10: G_ROUND_INDIVIDUAL_ADJ VARCHAR2(30);
11: G_CALCULATE_FLAG VARCHAR2(30); --3401941
12:
13: G_NO_ROUND CONSTANT VARCHAR2(30) := 'NO_ROUND';
14: G_ROUND_ADJ CONSTANT VARCHAR2(30) := 'ROUND_ADJ';

Line 3785: IF G_ROUND_INDIVIDUAL_ADJ not in (G_NO_ROUND, G_POST_ROUND) AND G_REQUEST_TYPE_CODE <> 'ASO'

3781: ---- 9537858/ 10315863
3782:
3783: -- 9537858/ 10315863 No need to round at this stage.. rounding is done after Back_calculation
3784:
3785: IF G_ROUND_INDIVIDUAL_ADJ not in (G_NO_ROUND, G_POST_ROUND) AND G_REQUEST_TYPE_CODE <> 'ASO'
3786: --[prarasto:Post Round] added check to skip rounding for Post Rounding
3787: AND l_rounding_factor_tbl(i) IS NOT NULL THEN
3788: l_upd_adj_unit_price_tbl(i) :=
3789: round(l_upd_adj_unit_price_tbl(i), - 1 * l_rounding_factor_tbl(i));

Line 3790: END IF; --G_ROUND_INDIVIDUAL_ADJ

3786: --[prarasto:Post Round] added check to skip rounding for Post Rounding
3787: AND l_rounding_factor_tbl(i) IS NOT NULL THEN
3788: l_upd_adj_unit_price_tbl(i) :=
3789: round(l_upd_adj_unit_price_tbl(i), - 1 * l_rounding_factor_tbl(i));
3790: END IF; --G_ROUND_INDIVIDUAL_ADJ
3791:
3792:
3793:
3794: IF ((l_upd_adj_unit_price_tbl(i) -

Line 3862: IF G_ROUND_INDIVIDUAL_ADJ = G_ROUND_ADJ

3858:
3859: -- End Ravi
3860:
3861: --fix for bug 2146050 to round adjustment amt
3862: IF G_ROUND_INDIVIDUAL_ADJ = G_ROUND_ADJ
3863: AND l_rounding_factor_tbl(i) IS NOT NULL THEN
3864: l_back_calc_ret_rec.adjustment_amount :=
3865: round(l_back_calc_ret_rec.adjustment_amount,
3866: - 1 * l_rounding_factor_tbl(i));

Line 3869: END IF; --G_ROUND_INDIVIDUAL_ADJ

3865: round(l_back_calc_ret_rec.adjustment_amount,
3866: - 1 * l_rounding_factor_tbl(i));
3867: l_ord_qty_adj_amt := round(l_ord_qty_adj_amt,
3868: - 1 * l_rounding_factor_tbl(i));
3869: END IF; --G_ROUND_INDIVIDUAL_ADJ
3870:
3871: --load the l_back_calc_ret_rec to plsqltbl to do bulk update
3872: l_ldet_dtl_index(l_ldet_dtl_index.COUNT + 1) :=
3873: l_back_calc_ret_rec.line_detail_index;

Line 3949: --round the selling price if ROUND_INDIVIDUAL_ADJ

3945: l_line_unit_price_tbl(i) := 0;
3946: l_ord_uom_selling_price_tbl(i) := 0;
3947: END IF; --ordered_qty
3948:
3949: --round the selling price if ROUND_INDIVIDUAL_ADJ
3950: --profile is N in this case the adjustment_amt will not be rounded
3951:
3952: --===[prarasto:Post Round] Start : Calculate rounded values ==--
3953: l_adjusted_unit_price_ur(i) := l_adj_unit_price_tbl(i);

Line 3956: IF (G_ROUND_INDIVIDUAL_ADJ not in ( G_NO_ROUND , G_POST_ROUND )) AND (l_rounding_factor_tbl(i) is not null)

3952: --===[prarasto:Post Round] Start : Calculate rounded values ==--
3953: l_adjusted_unit_price_ur(i) := l_adj_unit_price_tbl(i);
3954: l_unit_selling_price_ur(i) := l_ord_uom_selling_price_tbl(i);
3955:
3956: IF (G_ROUND_INDIVIDUAL_ADJ not in ( G_NO_ROUND , G_POST_ROUND )) AND (l_rounding_factor_tbl(i) is not null)
3957: THEN
3958: IF (l_catchwt_qty_tbl(i) is null) and (l_actual_order_qty_tbl(i) is not null) THEN
3959: l_extended_selling_price_ur(i) := round(l_unit_selling_price_ur(i), - 1 * l_rounding_factor_tbl(i))
3960: * l_actual_order_qty_tbl(i);

Line 3979: IF (G_ROUND_INDIVIDUAL_ADJ = G_NO_ROUND) or (l_rounding_factor_tbl(i) is null) THEN

3975: QP_PREQ_GRP.engine_debug('roundingfac to round sellingprice: '
3976: || l_rounding_factor_tbl(i));
3977: END IF; --l_debug
3978:
3979: IF (G_ROUND_INDIVIDUAL_ADJ = G_NO_ROUND) or (l_rounding_factor_tbl(i) is null) THEN
3980: -- l_adj_unit_price_tbl(i) := l_adjusted_unit_price_ur(i);
3981: l_unit_selling_price(i) := l_unit_selling_price_ur(i);
3982: l_extended_selling_price(i) := l_extended_selling_price_ur(i);
3983: ELSE

Line 4012: IF l_rounding_factor_tbl(i) IS NOT NULL and G_ROUND_INDIVIDUAL_ADJ <> G_NO_ROUND THEN

4008: l_ord_uom_selling_price_tbl(i) := (nvl(l_adj_unit_price_tbl(i),l_unit_price_tbl(i)) *
4009: (l_priced_qty_tbl(i)/ l_line_qty_tbl(i)));
4010: END IF;
4011:
4012: IF l_rounding_factor_tbl(i) IS NOT NULL and G_ROUND_INDIVIDUAL_ADJ <> G_NO_ROUND THEN
4013: l_ord_uom_selling_price_tbl(i) := round(l_ord_uom_selling_price_tbl(i), (-1 * l_rounding_factor_tbl(i)));
4014: END IF;--l_rounding_factor_tbl
4015: */
4016:

Line 5774: IF G_ROUND_INDIVIDUAL_ADJ = G_ROUND_ADJ

5770:
5771: --round the adjustment_amount with factor on the line
5772: --engine updates the factor on the line
5773: --w/nvl(user_passed,price_list rounding_factor)
5774: IF G_ROUND_INDIVIDUAL_ADJ = G_ROUND_ADJ
5775: AND l_adj_tbl(j).rounding_factor IS NOT NULL
5776: THEN
5777: l_ldet_adj_amt_tbl(i) :=
5778: round(l_ldet_adj_amt_tbl(i),

Line 6254: IF G_ROUND_INDIVIDUAL_ADJ = G_ROUND_ADJ

6250: THEN
6251: --Update the adjustment amount for each adjustment
6252: -- 2892848_latest
6253: -- so we have correct current USP, considered each adj shall be rounded
6254: IF G_ROUND_INDIVIDUAL_ADJ = G_ROUND_ADJ
6255: AND l_adj_tbl(j).rounding_factor IS NOT NULL
6256: THEN
6257: l_return_adjustment := round (l_return_adjustment, - 1 * l_adj_tbl(j).rounding_factor);
6258: END IF; -- end rounding

Line 6380: --round the selling price if ROUND_INDIVIDUAL_ADJ profile is N

6376: END IF;
6377: l_pricing_sts_txt_tbl(x) := l_adj_tbl(j).pricing_status_text;
6378: l_rounding_factor_tbl(x) := l_adj_tbl(j).rounding_factor;
6379:
6380: --round the selling price if ROUND_INDIVIDUAL_ADJ profile is N
6381: --in this case the adjustment_amt will not be rounded
6382: --IF G_ROUND_INDIVIDUAL_ADJ = G_NO_ROUND_ADJ
6383:
6384: /* 2892848_latest

Line 6382: --IF G_ROUND_INDIVIDUAL_ADJ = G_NO_ROUND_ADJ

6378: l_rounding_factor_tbl(x) := l_adj_tbl(j).rounding_factor;
6379:
6380: --round the selling price if ROUND_INDIVIDUAL_ADJ profile is N
6381: --in this case the adjustment_amt will not be rounded
6382: --IF G_ROUND_INDIVIDUAL_ADJ = G_NO_ROUND_ADJ
6383:
6384: /* 2892848_latest
6385: -- we should round adjs, move rounding ahead
6386: IF G_ROUND_INDIVIDUAL_ADJ <> G_NO_ROUND -- shu fix bug 2239061

Line 6386: IF G_ROUND_INDIVIDUAL_ADJ <> G_NO_ROUND -- shu fix bug 2239061

6382: --IF G_ROUND_INDIVIDUAL_ADJ = G_NO_ROUND_ADJ
6383:
6384: /* 2892848_latest
6385: -- we should round adjs, move rounding ahead
6386: IF G_ROUND_INDIVIDUAL_ADJ <> G_NO_ROUND -- shu fix bug 2239061
6387: -- this is not the final USP since now we order by bucket
6388:
6389: and l_rounding_factor_tbl(x) IS NOT NULL
6390: THEN

Line 6589: IF G_ROUND_INDIVIDUAL_ADJ not in (G_NO_ROUND, G_POST_ROUND) AND G_REQUEST_TYPE_CODE <> 'ASO'

6585: ---- 9537858 / 10315863
6586: /* 9537858 / 10315863 No need to round at this stage.. rounding is done after Back_calculation */
6587:
6588: --fix for bug 2146050
6589: IF G_ROUND_INDIVIDUAL_ADJ not in (G_NO_ROUND, G_POST_ROUND) AND G_REQUEST_TYPE_CODE <> 'ASO'
6590: --[prarasto:Post Round] added check to skip rounding for Post Rounding
6591: AND l_rounding_factor_tbl(i) IS NOT NULL
6592: THEN
6593: l_upd_adj_unit_price_tbl(i) :=

Line 6795: IF G_ROUND_INDIVIDUAL_ADJ = G_ROUND_ADJ

6791:
6792: -- End Ravi
6793:
6794: --fix for bug 2146050 to round adjustment amt
6795: IF G_ROUND_INDIVIDUAL_ADJ = G_ROUND_ADJ
6796: AND l_rounding_factor_tbl(i) IS NOT NULL
6797: THEN
6798: l_ldet_adj_amt_tbl(l_tbl_index) :=
6799: round(l_ldet_adj_amt_tbl(l_tbl_index),

Line 6806: --round the selling price if ROUND_INDIVIDUAL_ADJ

6802: round(l_ldet_ordqty_adjamt_tbl(l_tbl_index),
6803: - 1 * l_rounding_factor_tbl(i));
6804: END IF;
6805:
6806: --round the selling price if ROUND_INDIVIDUAL_ADJ
6807: --profile is N in this case the adjustment_amt
6808: --will not be rounded
6809: IF G_ROUND_INDIVIDUAL_ADJ = G_NO_ROUND_ADJ -- 2892848_latest, not to round current USP for G_ROUND_ADJ case since it is not final USP yet
6810: --IF G_ROUND_INDIVIDUAL_ADJ <> G_NO_ROUND -- shu fix 2239061

Line 6809: IF G_ROUND_INDIVIDUAL_ADJ = G_NO_ROUND_ADJ -- 2892848_latest, not to round current USP for G_ROUND_ADJ case since it is not final USP yet

6805:
6806: --round the selling price if ROUND_INDIVIDUAL_ADJ
6807: --profile is N in this case the adjustment_amt
6808: --will not be rounded
6809: IF G_ROUND_INDIVIDUAL_ADJ = G_NO_ROUND_ADJ -- 2892848_latest, not to round current USP for G_ROUND_ADJ case since it is not final USP yet
6810: --IF G_ROUND_INDIVIDUAL_ADJ <> G_NO_ROUND -- shu fix 2239061
6811: AND l_rounding_factor_tbl(i) IS NOT NULL
6812: THEN
6813: IF l_debug = FND_API.G_TRUE THEN

Line 6810: --IF G_ROUND_INDIVIDUAL_ADJ <> G_NO_ROUND -- shu fix 2239061

6806: --round the selling price if ROUND_INDIVIDUAL_ADJ
6807: --profile is N in this case the adjustment_amt
6808: --will not be rounded
6809: IF G_ROUND_INDIVIDUAL_ADJ = G_NO_ROUND_ADJ -- 2892848_latest, not to round current USP for G_ROUND_ADJ case since it is not final USP yet
6810: --IF G_ROUND_INDIVIDUAL_ADJ <> G_NO_ROUND -- shu fix 2239061
6811: AND l_rounding_factor_tbl(i) IS NOT NULL
6812: THEN
6813: IF l_debug = FND_API.G_TRUE THEN
6814: QP_PREQ_GRP.engine_debug('need to round selling price, rounding factor: '

Line 6857: IF G_ROUND_INDIVIDUAL_ADJ <> G_NO_ROUND -- 2892848_latest, round finalUSP

6853: WHILE j IS NOT NULL
6854: LOOP
6855: -- begin 2892848_latest
6856: /* commented out for bug 3663518
6857: IF G_ROUND_INDIVIDUAL_ADJ <> G_NO_ROUND -- 2892848_latest, round finalUSP
6858: AND l_rounding_factor_tbl(j) IS NOT NULL THEN
6859:
6860: l_adj_unit_price_tbl(j) := round(l_adj_unit_price_tbl(j)
6861: ,-1*l_rounding_factor_tbl(j));

Line 7043: FROM dual

7039: , l_ldet_calc_code_tbl(i)
7040: , l_ldet_ordqty_operand_tbl(i)
7041: , nvl(l_ldet_ordqty_adjamt_tbl(i), l_ldet_adj_amt_tbl(i))
7042: , l_ldet_price_adjust_id_tbl(i) --bug 12731184
7043: FROM dual
7044: WHERE l_ldet_process_code_tbl(i) = G_STATUS_UPDATED;
7045: END IF;
7046:
7047: ---------------------------------------------------------------------

Line 7073: IF (G_ROUND_INDIVIDUAL_ADJ not in ( G_NO_ROUND , G_POST_ROUND )) AND (l_rounding_factor_tbl(i) is not null)

7069: --===[prarasto:Post Round] Start : Calculate rounded values ==--
7070: l_adjusted_unit_price_ur(i) := l_adj_unit_price_tbl(i);
7071: l_unit_selling_price_ur(i) := l_ordqty_selling_price_tbl(i);
7072:
7073: IF (G_ROUND_INDIVIDUAL_ADJ not in ( G_NO_ROUND , G_POST_ROUND )) AND (l_rounding_factor_tbl(i) is not null)
7074: THEN
7075: IF (l_catchweight_qty_tbl(i) is null) and (l_actual_order_qty_tbl(i) is not null) THEN
7076: l_extended_selling_price_ur(i) := round(l_unit_selling_price_ur(i), - 1 * l_rounding_factor_tbl(i))
7077: * l_actual_order_qty_tbl(i);

Line 7090: IF (G_ROUND_INDIVIDUAL_ADJ = G_NO_ROUND) or (l_rounding_factor_tbl(i) is null) THEN

7086: l_extended_selling_price_ur(i) := l_unit_selling_price_ur(i) * l_ordered_qty_tbl(i);
7087: END IF;
7088: END IF;
7089:
7090: IF (G_ROUND_INDIVIDUAL_ADJ = G_NO_ROUND) or (l_rounding_factor_tbl(i) is null) THEN
7091: -- l_adj_unit_price_tbl(i) := l_adjusted_unit_price_ur(i);
7092: l_unit_selling_price(i) := l_unit_selling_price_ur(i);
7093: l_extended_selling_price(i) := l_extended_selling_price_ur(i);
7094: ELSE

Line 7117: /* decode(G_ROUND_INDIVIDUAL_ADJ,

7113: UPDATE qp_npreq_lines_tmp
7114: SET unit_price = l_unit_price_tbl(i),
7115: adjusted_unit_price = l_adj_unit_price_tbl(i), --[prarasto:Post Round]
7116: --adjusted_unit_price_ur = l_adjusted_unit_price_ur(i), --[prarasto:Post Round], [julin/postround] redesign
7117: /* decode(G_ROUND_INDIVIDUAL_ADJ,
7118: G_NO_ROUND, l_adj_unit_price_tbl(i),
7119: decode(l_rounding_factor_tbl(i),
7120: NULL, l_adj_unit_price_tbl(i),
7121: round(l_adj_unit_price_tbl(i), - 1 * l_rounding_factor_tbl(i)))),

Line 7128: /* decode(G_ROUND_INDIVIDUAL_ADJ,

7124: pricing_status_code = l_pricing_sts_code_tbl(i),
7125: pricing_status_text = l_pricing_sts_txt_tbl(i),
7126: processed_flag = G_PROCESSED,
7127: line_unit_price = l_ordqty_unit_price_tbl(i), --[prarasto:Post Round]
7128: /* decode(G_ROUND_INDIVIDUAL_ADJ,
7129: G_NO_ROUND, l_ordqty_unit_price_tbl(i),
7130: decode(l_rounding_factor_tbl(i),
7131: NULL, l_ordqty_unit_price_tbl(i),
7132: round(l_ordqty_unit_price_tbl(i), - 1 * l_rounding_factor_tbl(i)))),

Line 7135: /* decode(G_ROUND_INDIVIDUAL_ADJ,

7131: NULL, l_ordqty_unit_price_tbl(i),
7132: round(l_ordqty_unit_price_tbl(i), - 1 * l_rounding_factor_tbl(i)))),
7133: */
7134: order_uom_selling_price = l_unit_selling_price(i), --[prarasto:Post Round]
7135: /* decode(G_ROUND_INDIVIDUAL_ADJ,
7136: G_NO_ROUND, l_ordqty_selling_price_tbl(i),
7137: decode(l_rounding_factor_tbl(i),
7138: NULL, l_ordqty_selling_price_tbl(i),
7139: round(l_ordqty_selling_price_tbl(i), - 1 * l_rounding_factor_tbl(i)))),

Line 8340: IF G_ROUND_INDIVIDUAL_ADJ = G_ROUND_ADJ -- 2892848_latest

8336: */
8337: --round the adjustment_amount with factor on the line
8338: --engine updates the factor on the line
8339: --w/nvl(user_passed,price_list rounding_factor)
8340: IF G_ROUND_INDIVIDUAL_ADJ = G_ROUND_ADJ -- 2892848_latest
8341: AND l_bucket_price_rec.rounding_factor IS NOT NULL
8342: THEN
8343: l_return_adjustment :=
8344: round(l_return_adjustment,

Line 8504: --round the selling price if G_ROUND_INDIVIDUAL_ADJ=Y

8500: l_lines_tbl(j).line_index := l_bucket_price_rec.line_ind;
8501: l_lines_tbl(j).adjusted_unit_price := l_adjusted_price;
8502:
8503: -- 2892848_latest, do not round here since it is not final USP
8504: --round the selling price if G_ROUND_INDIVIDUAL_ADJ=Y
8505: -- need to re-evaluate how this should work now
8506: /*
8507: IF G_ROUND_INDIVIDUAL_ADJ <> G_NO_ROUND -- shu, fix bug 2239061
8508: and l_lines_tbl(j).rounding_factor IS NOT NULL

Line 8507: IF G_ROUND_INDIVIDUAL_ADJ <> G_NO_ROUND -- shu, fix bug 2239061

8503: -- 2892848_latest, do not round here since it is not final USP
8504: --round the selling price if G_ROUND_INDIVIDUAL_ADJ=Y
8505: -- need to re-evaluate how this should work now
8506: /*
8507: IF G_ROUND_INDIVIDUAL_ADJ <> G_NO_ROUND -- shu, fix bug 2239061
8508: and l_lines_tbl(j).rounding_factor IS NOT NULL
8509: THEN
8510: IF l_debug = FND_API.G_TRUE THEN
8511: QP_PREQ_GRP.engine_debug('round current USP, rounding_factor: '

Line 8517: END IF; -- END IF G_ROUND_INDIVIDUAL_ADJ = G_ROUND_ADJ

8513: END IF;
8514: l_lines_tbl(j).adjusted_unit_price :=
8515: round(l_lines_tbl(j).adjusted_unit_price,
8516: -1*l_lines_tbl(j).rounding_factor);
8517: END IF; -- END IF G_ROUND_INDIVIDUAL_ADJ = G_ROUND_ADJ
8518: */
8519:
8520: IF l_debug = FND_API.G_TRUE THEN
8521: QP_PREQ_GRP.ENGINE_DEBUG('adjusted_price'

Line 8844: AND G_ROUND_INDIVIDUAL_ADJ not in ( G_NO_ROUND, G_POST_ROUND ) --[prarasto:Post Round] added check to

8840: l_adjusted_unit_price_ur(j) := l_lines_tbl(j).adjusted_unit_price; --[prarasto:Post Round]
8841: l_updated_adj_unit_price_ur(j) := l_lines_tbl(j).updated_adjusted_unit_price; --[prarasto:Post Round]
8842:
8843: IF l_lines_tbl(j).rounding_factor IS NOT NULL
8844: AND G_ROUND_INDIVIDUAL_ADJ not in ( G_NO_ROUND, G_POST_ROUND ) --[prarasto:Post Round] added check to
8845: --skip rounding for Post Round option
8846: THEN
8847: --first round the overridden selling price--2146050
8848: l_lines_tbl(j).updated_adjusted_unit_price :=

Line 8951: AND G_ROUND_INDIVIDUAL_ADJ = G_ROUND_ADJ

8947:
8948: END IF;
8949:
8950: IF l_lines_tbl(j).rounding_factor IS NOT NULL
8951: AND G_ROUND_INDIVIDUAL_ADJ = G_ROUND_ADJ
8952: THEN
8953: --round the adjustment amount --2146050
8954: --it must have been rounded already
8955: l_back_calc_ret_rec.adjustment_amount :=

Line 9064: --round the SP if G_ROUND_INDIVIDUAL_ADJ=G_NO_ROUND_ADJ

9060: --[prarasto:Post Round] added to calculate unrounded adjusted unit price after calculating adjustment amount
9061: l_adjusted_unit_price_ur(j) := l_adjusted_unit_price_ur(j) +
9062: nvl(l_back_calc_ret_rec.adjustment_amount, 0);
9063:
9064: --round the SP if G_ROUND_INDIVIDUAL_ADJ=G_NO_ROUND_ADJ
9065: --IF G_ROUND_INDIVIDUAL_ADJ = G_NO_ROUND_ADJ
9066:
9067: -- IF G_ROUND_INDIVIDUAL_ADJ <> G_NO_ROUND -- shu fix 2239061,
9068: IF G_ROUND_INDIVIDUAL_ADJ not in ( G_NO_ROUND, G_POST_ROUND ) --[prarasto:Post Round] added check to

Line 9065: --IF G_ROUND_INDIVIDUAL_ADJ = G_NO_ROUND_ADJ

9061: l_adjusted_unit_price_ur(j) := l_adjusted_unit_price_ur(j) +
9062: nvl(l_back_calc_ret_rec.adjustment_amount, 0);
9063:
9064: --round the SP if G_ROUND_INDIVIDUAL_ADJ=G_NO_ROUND_ADJ
9065: --IF G_ROUND_INDIVIDUAL_ADJ = G_NO_ROUND_ADJ
9066:
9067: -- IF G_ROUND_INDIVIDUAL_ADJ <> G_NO_ROUND -- shu fix 2239061,
9068: IF G_ROUND_INDIVIDUAL_ADJ not in ( G_NO_ROUND, G_POST_ROUND ) --[prarasto:Post Round] added check to
9069: --skip rounding for Post Round option

Line 9067: -- IF G_ROUND_INDIVIDUAL_ADJ <> G_NO_ROUND -- shu fix 2239061,

9063:
9064: --round the SP if G_ROUND_INDIVIDUAL_ADJ=G_NO_ROUND_ADJ
9065: --IF G_ROUND_INDIVIDUAL_ADJ = G_NO_ROUND_ADJ
9066:
9067: -- IF G_ROUND_INDIVIDUAL_ADJ <> G_NO_ROUND -- shu fix 2239061,
9068: IF G_ROUND_INDIVIDUAL_ADJ not in ( G_NO_ROUND, G_POST_ROUND ) --[prarasto:Post Round] added check to
9069: --skip rounding for Post Round option
9070: AND l_lines_tbl(j).rounding_factor IS NOT NULL
9071: THEN

Line 9068: IF G_ROUND_INDIVIDUAL_ADJ not in ( G_NO_ROUND, G_POST_ROUND ) --[prarasto:Post Round] added check to

9064: --round the SP if G_ROUND_INDIVIDUAL_ADJ=G_NO_ROUND_ADJ
9065: --IF G_ROUND_INDIVIDUAL_ADJ = G_NO_ROUND_ADJ
9066:
9067: -- IF G_ROUND_INDIVIDUAL_ADJ <> G_NO_ROUND -- shu fix 2239061,
9068: IF G_ROUND_INDIVIDUAL_ADJ not in ( G_NO_ROUND, G_POST_ROUND ) --[prarasto:Post Round] added check to
9069: --skip rounding for Post Round option
9070: AND l_lines_tbl(j).rounding_factor IS NOT NULL
9071: THEN
9072: IF l_debug = FND_API.G_TRUE THEN

Line 11168: FROM dual

11164: begin
11165:
11166: SELECT 1
11167: INTO l_fgdline_exist
11168: FROM dual
11169: WHERE EXISTS (SELECT 1
11170: FROM qp_npreq_rltd_lines_tmp oldrltd,
11171: qp_npreq_ldets_tmp oldprg,
11172: qp_event_phases ev

Line 13465: G_ROUND_INDIVIDUAL_ADJ := nvl(G_ROUNDING_OPTIONS, G_NO_ROUND);

13461: END IF;
13462:
13463: IF nvl(p_control_rec.rounding_flag, G_YES) = G_ROUNDING_PROFILE
13464: THEN
13465: G_ROUND_INDIVIDUAL_ADJ := nvl(G_ROUNDING_OPTIONS, G_NO_ROUND);
13466: ELSIF nvl(p_control_rec.rounding_flag, G_YES) = G_YES
13467: THEN
13468: --this is done for bug 2635440 for OC to default the rounding_flag to 'Q'
13469: --to look at the profile for rounding if the rounding_flag is null

Line 13474: G_ROUND_INDIVIDUAL_ADJ := nvl(G_ROUNDING_OPTIONS, G_NO_ROUND);

13470: --in the pl/sql code path. OC will pass Q for direct insert path
13471: IF G_REQUEST_TYPE_CODE = 'ASO'
13472: AND nvl(p_control_rec.temp_table_insert_flag, G_YES) = G_YES
13473: AND p_control_rec.rounding_flag IS NULL THEN
13474: G_ROUND_INDIVIDUAL_ADJ := nvl(G_ROUNDING_OPTIONS, G_NO_ROUND);
13475: ELSE
13476: G_ROUND_INDIVIDUAL_ADJ := G_ROUND_ADJ;
13477: END IF; --l_control_rec.request_type_code
13478: ELSIF nvl(p_control_rec.rounding_flag, G_YES) = G_NO

Line 13476: G_ROUND_INDIVIDUAL_ADJ := G_ROUND_ADJ;

13472: AND nvl(p_control_rec.temp_table_insert_flag, G_YES) = G_YES
13473: AND p_control_rec.rounding_flag IS NULL THEN
13474: G_ROUND_INDIVIDUAL_ADJ := nvl(G_ROUNDING_OPTIONS, G_NO_ROUND);
13475: ELSE
13476: G_ROUND_INDIVIDUAL_ADJ := G_ROUND_ADJ;
13477: END IF; --l_control_rec.request_type_code
13478: ELSIF nvl(p_control_rec.rounding_flag, G_YES) = G_NO
13479: THEN
13480: G_ROUND_INDIVIDUAL_ADJ := G_NO_ROUND;

Line 13480: G_ROUND_INDIVIDUAL_ADJ := G_NO_ROUND;

13476: G_ROUND_INDIVIDUAL_ADJ := G_ROUND_ADJ;
13477: END IF; --l_control_rec.request_type_code
13478: ELSIF nvl(p_control_rec.rounding_flag, G_YES) = G_NO
13479: THEN
13480: G_ROUND_INDIVIDUAL_ADJ := G_NO_ROUND;
13481: ELSIF nvl(p_control_rec.rounding_flag, G_YES) = 'U'
13482: THEN
13483: G_ROUND_INDIVIDUAL_ADJ := G_NO_ROUND_ADJ;
13484: ELSIF nvl(p_control_rec.rounding_flag, G_YES) = 'P' --[prarasto:Post Round] added condition to update

Line 13483: G_ROUND_INDIVIDUAL_ADJ := G_NO_ROUND_ADJ;

13479: THEN
13480: G_ROUND_INDIVIDUAL_ADJ := G_NO_ROUND;
13481: ELSIF nvl(p_control_rec.rounding_flag, G_YES) = 'U'
13482: THEN
13483: G_ROUND_INDIVIDUAL_ADJ := G_NO_ROUND_ADJ;
13484: ELSIF nvl(p_control_rec.rounding_flag, G_YES) = 'P' --[prarasto:Post Round] added condition to update
13485: --G_ROUND_INDIVIDUAL_ADJ for post rounding
13486: THEN
13487: G_ROUND_INDIVIDUAL_ADJ := G_POST_ROUND;

Line 13485: --G_ROUND_INDIVIDUAL_ADJ for post rounding

13481: ELSIF nvl(p_control_rec.rounding_flag, G_YES) = 'U'
13482: THEN
13483: G_ROUND_INDIVIDUAL_ADJ := G_NO_ROUND_ADJ;
13484: ELSIF nvl(p_control_rec.rounding_flag, G_YES) = 'P' --[prarasto:Post Round] added condition to update
13485: --G_ROUND_INDIVIDUAL_ADJ for post rounding
13486: THEN
13487: G_ROUND_INDIVIDUAL_ADJ := G_POST_ROUND;
13488: END IF;
13489:

Line 13487: G_ROUND_INDIVIDUAL_ADJ := G_POST_ROUND;

13483: G_ROUND_INDIVIDUAL_ADJ := G_NO_ROUND_ADJ;
13484: ELSIF nvl(p_control_rec.rounding_flag, G_YES) = 'P' --[prarasto:Post Round] added condition to update
13485: --G_ROUND_INDIVIDUAL_ADJ for post rounding
13486: THEN
13487: G_ROUND_INDIVIDUAL_ADJ := G_POST_ROUND;
13488: END IF;
13489:
13490: -- The below code is replaced with QP_PREQ_GRP.Set_QP_Debug
13491:

Line 13555: QP_PREQ_GRP.ENGINE_DEBUG('BEGIN PRICE REQUEST PUB: round_indv_adj '|| G_ROUND_INDIVIDUAL_ADJ);

13551:
13552: IF l_debug = FND_API.G_TRUE THEN
13553: QP_PREQ_GRP.ENGINE_DEBUG('BEGIN PRICE REQUEST PUB: request_type_code '|| G_REQUEST_TYPE_CODE);
13554: QP_PREQ_GRP.ENGINE_DEBUG('BEGIN PRICE REQUEST PUB: check_cust_view_flag '|| G_check_cust_view_flag);
13555: QP_PREQ_GRP.ENGINE_DEBUG('BEGIN PRICE REQUEST PUB: round_indv_adj '|| G_ROUND_INDIVIDUAL_ADJ);
13556:
13557: END IF;
13558: --===========END: Globals Initialization specific only to PL/SQL Engine=======
13559: END IF; --java engine is not installed

Line 13593: QP_PREQ_GRP.ENGINE_DEBUG('BEGIN PRICE REQUEST PUB: round_indv_adj '||G_ROUND_INDIVIDUAL_ADJ);

13589:
13590: IF l_debug = FND_API.G_TRUE THEN
13591: QP_PREQ_GRP.ENGINE_DEBUG('BEGIN PRICE REQUEST PUB: request_type_code '||G_REQUEST_TYPE_CODE);
13592: QP_PREQ_GRP.ENGINE_DEBUG('BEGIN PRICE REQUEST PUB: check_cust_view_flag '||G_check_cust_view_flag);
13593: QP_PREQ_GRP.ENGINE_DEBUG('BEGIN PRICE REQUEST PUB: round_indv_adj '||G_ROUND_INDIVIDUAL_ADJ);
13594:
13595: END IF;
13596: */ --moved up into PL/SQL Engine specific path
13597:

Line 14456: l_time_difference||' Total redo in QP_PREQ_PUB : '|| l_redo_difference||''''||' from dual ';

14452: --Changes for bug2961617
14453:
14454: /*
14455: execute immediate 'select '||''''|| ' Total Time in QP_PREQ_PUB(in sec) : ' ||
14456: l_time_difference||' Total redo in QP_PREQ_PUB : '|| l_redo_difference||''''||' from dual ';
14457: */
14458:
14459: IF G_QP_DEBUG = G_ENGINE_TIME_TRACE_ON THEN --3085171
14460: BEGIN

Line 14464: ' Total redo in QP_PREQ_PUB : '||l_redo_difference into l_time_stats from dual ;

14460: BEGIN
14461:
14462: /*
14463: select 'Total Time in QP_PREQ_PUB(in sec) : ' ||l_time_difference ||
14464: ' Total redo in QP_PREQ_PUB : '||l_redo_difference into l_time_stats from dual ;
14465: */
14466:
14467: EXECUTE IMMEDIATE 'select '|| '''' || ' Total Time in QP_PREQ_PUB(in sec) : ' ||
14468: l_time_difference ||' Total redo in QP_PREQ_PUB : '|| l_redo_difference || '''' ||' from dual ';

Line 14468: l_time_difference ||' Total redo in QP_PREQ_PUB : '|| l_redo_difference || '''' ||' from dual ';

14464: ' Total redo in QP_PREQ_PUB : '||l_redo_difference into l_time_stats from dual ;
14465: */
14466:
14467: EXECUTE IMMEDIATE 'select '|| '''' || ' Total Time in QP_PREQ_PUB(in sec) : ' ||
14468: l_time_difference ||' Total redo in QP_PREQ_PUB : '|| l_redo_difference || '''' ||' from dual ';
14469:
14470: EXCEPTION
14471:
14472: WHEN OTHERS THEN