[Home] [Help]
97: DECODE(L.ORDERED_QUANTITY,0,0,NULL,NULL,P.OPERAND),
98: L.ORDERED_QUANTITY* nvl(P.ADJUSTED_AMOUNT,0)))
99: ,OE_ORDER_UTIL.G_Precision),0))
100: INTO l_charge_amount
101: FROM OE_PRICE_ADJUSTMENTS P,
102: OE_ORDER_LINES_ALL L
103: WHERE P.HEADER_ID = p_header_id
104: AND P.LINE_ID = L.LINE_ID(+)
105: AND P.LIST_LINE_TYPE_CODE = 'FREIGHT_CHARGE'
125: DECODE(P.CREDIT_OR_CHARGE_FLAG,'C',-P.OPERAND,P.OPERAND)
126: ,OE_ORDER_UTIL.G_Precision)
127: )
128: INTO l_charge_amount
129: FROM OE_PRICE_ADJUSTMENTS P
130: WHERE P.HEADER_ID = p_header_id
131: AND P.LINE_ID IS NULL
132: AND P.LIST_LINE_TYPE_CODE = 'FREIGHT_CHARGE'
133: AND P.APPLIED_FLAG = 'Y';
151: (L.ORDERED_QUANTITY* nvl(P.ADJUSTED_AMOUNT,0)))
152: ,OE_ORDER_UTIL.G_Precision)
153: )
154: INTO l_charge_amount
155: FROM OE_PRICE_ADJUSTMENTS P,
156: OE_ORDER_LINES_ALL L
157: WHERE P.HEADER_ID = p_header_id
158: AND P.LINE_ID = p_line_id
159: AND P.LINE_ID = L.LINE_ID
213: -- Function to source the Pricing Attributes for COST_AMOUNTS.
214: -- (E.g. INSURANCE_COST, HANDLING_COST, DUTY_COST, EXPORT_COST)
215: -- If the Order line is Shippable and shipping has transferred all costs for
216: -- this line, then this function takes the cost_type_code as an input and finds
217: -- the cost amount for this cost_type_code from OE_PRICE_ADJUSTMENTS table.
218: --
219: -- Type Private
220: --
221: -- Pre-reqs
292:
293: IF l_line_rec.shippable_flag = 'Y' AND
294: l_line_rec.shipped_quantity > 0 THEN
295:
296: -- Cost records are stored in OE_PRICE_ADJUSTMENTS table with
297: -- list_line_type_code = 'COST'
298: IF l_debug_level > 0 THEN
299: oe_debug_pub.add( 'LINE IS SHIPPABLE AND IS SHIPPED' ) ;
300: END IF;
299: oe_debug_pub.add( 'LINE IS SHIPPABLE AND IS SHIPPED' ) ;
300: END IF;
301: SELECT SUM(ADJUSTED_AMOUNT)
302: INTO l_cost_amount
303: FROM OE_PRICE_ADJUSTMENTS_V
304: WHERE LINE_ID = l_line_rec.line_id
305: AND LIST_LINE_TYPE_CODE = 'COST'
306: AND CHARGE_TYPE_CODE = p_cost_type_code;
307:
322: EXCEPTION
323:
324: WHEN NO_DATA_FOUND THEN
325: IF l_debug_level > 0 THEN
326: oe_debug_pub.add( 'NO COST INFORMATION FOUND IN OE_PRICE_ADJUSTMENTS' ) ;
327: END IF;
328: RETURN NULL;
329:
330: WHEN OTHERS THEN
347: --
348: -- Function to source the Qualifier Attribute FREIGHT_COST_TYPE
349: -- If the Order line is Shippable and shipping has transferred all costs for
350: -- this line, then this function finds and returns all cost_type_codes from
351: -- OE_PRICE_ADJUSTMENTS table where costs are maintained. It returns a table of
352: -- VARCHAR2 as output.
353: --
354: -- Type Private
355: --
373: l_count NUMBER := 0;
374: l_line_rec OE_Order_PUB.Line_Rec_Type;
375: Cursor C_Get_Cost_Types(p_line_id NUMBER) IS
376: SELECT DISTINCT CHARGE_TYPE_CODE
377: FROM OE_PRICE_ADJUSTMENTS_V
378: WHERE LINE_ID = p_line_id
379: AND LIST_LINE_TYPE_CODE = 'COST';
380: --
381: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1023: pa.cost_id,
1024: pa.list_line_type_code,
1025: pa.adjusted_amount,
1026: pa.operand
1027: from oe_price_adjustments pa,
1028: wsh_delivery_details dd,
1029: wsh_delivery_assignments da,
1030: wsh_new_deliveries dl
1031: where dl.name = 'delivery_name'
1036: and pa.list_line_type_code = 'COST'; */
1037:
1038: Cursor Other_Cost is
1039: Select CHARGE_TYPE_CODE,Adjusted_amount
1040: From oe_price_adjustments
1041: Where line_id = l_line_rec.line_id
1042: and list_line_type_code = 'COST';
1043:
1044: --Type list_line_info_type list_line_info1%rowtype;
1245: IF l_debug_level > 0 THEN
1246: oe_debug_pub.add( 'CHECKING IF FREIGHT COST HAS BEEN PASSED TO OM' ) ;
1247: END IF;
1248:
1249: -- Cost records are stored in OE_PRICE_ADJUSTMENTS table with
1250: -- list_line_type_code = 'COST'
1251: Begin
1252: SELECT SUM(ADJUSTED_AMOUNT)
1253: INTO l_cost_amount
1250: -- list_line_type_code = 'COST'
1251: Begin
1252: SELECT SUM(ADJUSTED_AMOUNT)
1253: INTO l_cost_amount
1254: FROM OE_PRICE_ADJUSTMENTS_V
1255: WHERE LINE_ID = l_line_rec.line_id
1256: AND LIST_LINE_TYPE_CODE = 'COST'
1257: AND CHARGE_TYPE_CODE = l_cost_type_code;
1258: IF l_debug_level > 0 THEN
1342: )
1343: ,OE_ORDER_UTIL.G_Precision)
1344: )
1345: INTO l_charge_amount
1346: FROM OE_PRICE_ADJUSTMENTS P,
1347: OE_ORDER_LINES_ALL L
1348: WHERE P.HEADER_ID = p_header_id
1349: AND P.LINE_ID = L.LINE_ID(+)
1350: AND nvl(L.CHARGE_PERIODICITY_CODE,'ONE') = p_charge_periodicity_code