[Home] [Help]
200: AND OLQ.ID= p_parent_object_id;
201: --Added Cursors to get Adjustment(DN,Trade In Subsidy) for LQ
202: cursor c_lq_cost_adj_rec(p_quote_id NUMBER,p_adj_type VARCHAR2) IS
203: SELECT SUM(VALUE)
204: FROM OKL_COST_ADJUSTMENTS_B OCA,
205: OKL_ASSETS_B OAB
206: where OAB.PARENT_OBJECT_CODE = 'LEASEQUOTE'
207: AND OCA.PARENT_OBJECT_CODE='ASSET'
208: AND OCA.PARENT_OBJECT_ID=OAB.ID
1072: --Fetch Cost Adj For a Quote
1073: CURSOR c_okl_cost_adj_rec(p_quote_id NUMBER,
1074: p_adj_source_type VARCHAR2) IS
1075: SELECT OCA.id,OCA.adjustment_source_id
1076: FROM OKL_COST_ADJUSTMENTS_B OCA,OKL_ASSETS_B OAB
1077: WHERE OCA.PARENT_OBJECT_CODE = 'ASSET'
1078: AND OCA.PARENT_OBJECT_ID = OAB.ID
1079: AND OAB.PARENT_OBJECT_CODE='LEASEQUOTE'
1080: AND OAB.PARENT_OBJECT_ID = p_quote_id
1156: CLOSE c_okl_cost_adj_rec;
1157: END IF;--End of Checking for Trade In (SI method)
1158:
1159: --Check for Subsidy Adj on a Quote Having payment Method 'SS'
1160: --if the Subsidy Id in okl_cost_adjustments_b is not null
1161: --then It should not exist else it can exist(Calculated by ISG)
1162: IF(lp_lq_header_rec.pricing_method = 'SS') THEN
1163: OPEN c_okl_cost_adj_rec(lp_quote_id,'SUBSIDY');
1164: FETCH c_okl_cost_adj_rec INTO lp_okl_cost_adj_rec;
2216: and t2.basis = 'ASSET_COST'
2217: and t2.QUICK_QUOTE_ID=p_quick_quote_id;
2218:
2219: cursor c_lq_cost_adj_rec(p_asset_id NUMBER) IS
2220: SELECT SUM(NVL(VALUE,0)) FROM OKL_COST_ADJUSTMENTS_B
2221: where PARENT_OBJECT_CODE='ASSET'
2222: and ADJUSTMENT_SOURCE_TYPE IN('DOWN_PAYMENT','TRADEIN','SUBSIDY')
2223: AND PARENT_OBJECT_ID=p_asset_id;
2224:
2668:
2669: lp_lq_asset_lines_rec c_lq_asset_lines_rec%ROWTYPE;
2670:
2671: cursor c_lq_cost_adj_rec(p_asset_id NUMBER) IS
2672: SELECT BASIS FROM OKL_COST_ADJUSTMENTS_B
2673: where PARENT_OBJECT_CODE='ASSET'
2674: and ADJUSTMENT_SOURCE_TYPE='SUBSIDY'
2675: AND PARENT_OBJECT_ID=p_asset_id;
2676: