[Home] [Help]
4055: end Get_Rounding_factor;
4056:
4057: procedure copy_Header_to_request(
4058: p_header_rec OE_Order_PUB.Header_Rec_Type
4059: ,px_req_line_tbl in out nocopy QP_PREQ_GRP.LINE_TBL_TYPE
4060: --,p_pricing_event varchar2
4061: ,p_Request_Type_Code varchar2
4062: ,p_calculate_price_flag varchar2
4063: )
4100: end copy_Header_to_request;
4101:
4102: procedure copy_Line_to_request(
4103: p_Line_rec OE_Order_PUB.Line_Rec_Type
4104: ,px_req_line_tbl in out nocopy QP_PREQ_GRP.LINE_TBL_TYPE
4105: ,p_pricing_event varchar2
4106: ,p_Request_Type_Code varchar2
4107: ,p_honor_price_flag VARCHAR2 Default 'Y'
4108: )
4322: procedure copy_adjs_to_request(
4323: p_line_index pls_integer
4324: ,p_adj_index pls_integer
4325: ,p_Line_adj_rec OE_Order_PUB.Line_Adj_Rec_Type
4326: ,px_Req_LINE_DETAIL_tbl in out nocopy QP_PREQ_GRP.LINE_DETAIL_tbl_Type
4327: )
4328: is
4329: l_RLD_Index pls_integer := p_adj_index;
4330: begin
4372: procedure copy_attribs_to_Req(
4373: p_line_index number
4374: ,p_pricing_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type
4375: ,p_qualifier_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type
4376: ,px_Req_line_attr_tbl in out nocopy QP_PREQ_GRP.LINE_ATTR_TBL_TYPE
4377: ,px_Req_qual_tbl in out nocopy QP_PREQ_GRP.QUAL_TBL_TYPE
4378: )
4379: is
4380: i pls_integer := 0;
4373: p_line_index number
4374: ,p_pricing_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type
4375: ,p_qualifier_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type
4376: ,px_Req_line_attr_tbl in out nocopy QP_PREQ_GRP.LINE_ATTR_TBL_TYPE
4377: ,px_Req_qual_tbl in out nocopy QP_PREQ_GRP.QUAL_TBL_TYPE
4378: )
4379: is
4380: i pls_integer := 0;
4381: l_attr_index pls_integer := nvl(px_Req_line_attr_tbl.last,0);
4464: procedure Append_asked_for(
4465: p_header_id number default null
4466: ,p_Line_id number default null
4467: ,p_line_index number
4468: ,px_Req_line_attr_tbl in out nocopy QP_PREQ_GRP.LINE_ATTR_TBL_TYPE
4469: ,px_Req_qual_tbl in out nocopy QP_PREQ_GRP.QUAL_TBL_TYPE
4470: )
4471: is
4472: i pls_integer;
4465: p_header_id number default null
4466: ,p_Line_id number default null
4467: ,p_line_index number
4468: ,px_Req_line_attr_tbl in out nocopy QP_PREQ_GRP.LINE_ATTR_TBL_TYPE
4469: ,px_Req_qual_tbl in out nocopy QP_PREQ_GRP.QUAL_TBL_TYPE
4470: )
4471: is
4472: i pls_integer;
4473: -- Using union all to eliminate sort unique
5382: end Append_asked_for;
5383:
5384: procedure Get_the_parent_Line(p_Reference_line_Id Number,
5385: px_Line_Tbl in out nocopy OE_Order_Pub.Line_Tbl_Type,
5386: px_Req_related_lines_tbl in out nocopy QP_PREQ_GRP.Related_Lines_Tbl_Type,
5387: p_line_Tbl_index Number)
5388: is
5389: l_Line_Rec OE_Order_Pub.Line_Rec_Type;
5390: line_Tbl_Index pls_integer;
5421: l_related_lines_Index := px_Req_related_lines_tbl.count+1;
5422: px_Req_related_lines_tbl(l_related_lines_Index).Line_Index := line_Tbl_index;
5423: px_Req_related_lines_tbl(l_related_lines_Index).Related_Line_Index := p_line_Tbl_index;
5424: px_Req_related_lines_tbl(l_related_lines_Index).Relationship_Type_Code
5425: := QP_PREQ_GRP.G_SERVICE_LINE;
5426:
5427: adj_debug('Exiting oe_order_Adj_pvt.Get_the_parent_Line',1);
5428:
5429: End Get_the_parent_Line;
5429: End Get_the_parent_Line;
5430:
5431: procedure set_item_for_iue(
5432: px_line_rec in out nocopy OE_Order_PUB.line_rec_type
5433: ,p_req_line_detail_rec QP_PREQ_GRP.line_detail_rec_type
5434: )
5435: is
5436: -- This change is required since we are dropping the profile OE_ORGANIZATION -- _ID. Change made by Esha.
5437: /*l_org_id NUMBER := FND_PROFILE.Value('OE_ORGANIZATION_ID');*/
5517:
5518: p_line_id number default null,
5519: p_header_id number Default null,
5520: p_Request_Type_Code varchar2 ,
5521: p_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE,
5522: x_req_line_tbl out nocopy QP_PREQ_GRP.LINE_TBL_TYPE,
5523: x_Req_qual_tbl out nocopy QP_PREQ_GRP.QUAL_TBL_TYPE,
5524: x_Req_line_attr_tbl out nocopy QP_PREQ_GRP.LINE_ATTR_TBL_TYPE,
5525: x_Req_LINE_DETAIL_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE,
5518: p_line_id number default null,
5519: p_header_id number Default null,
5520: p_Request_Type_Code varchar2 ,
5521: p_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE,
5522: x_req_line_tbl out nocopy QP_PREQ_GRP.LINE_TBL_TYPE,
5523: x_Req_qual_tbl out nocopy QP_PREQ_GRP.QUAL_TBL_TYPE,
5524: x_Req_line_attr_tbl out nocopy QP_PREQ_GRP.LINE_ATTR_TBL_TYPE,
5525: x_Req_LINE_DETAIL_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE,
5526: x_Req_LINE_DETAIL_qual_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE,
5519: p_header_id number Default null,
5520: p_Request_Type_Code varchar2 ,
5521: p_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE,
5522: x_req_line_tbl out nocopy QP_PREQ_GRP.LINE_TBL_TYPE,
5523: x_Req_qual_tbl out nocopy QP_PREQ_GRP.QUAL_TBL_TYPE,
5524: x_Req_line_attr_tbl out nocopy QP_PREQ_GRP.LINE_ATTR_TBL_TYPE,
5525: x_Req_LINE_DETAIL_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE,
5526: x_Req_LINE_DETAIL_qual_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE,
5527: x_Req_LINE_DETAIL_attr_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE,
5520: p_Request_Type_Code varchar2 ,
5521: p_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE,
5522: x_req_line_tbl out nocopy QP_PREQ_GRP.LINE_TBL_TYPE,
5523: x_Req_qual_tbl out nocopy QP_PREQ_GRP.QUAL_TBL_TYPE,
5524: x_Req_line_attr_tbl out nocopy QP_PREQ_GRP.LINE_ATTR_TBL_TYPE,
5525: x_Req_LINE_DETAIL_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE,
5526: x_Req_LINE_DETAIL_qual_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE,
5527: x_Req_LINE_DETAIL_attr_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE,
5528: x_Req_related_lines_tbl out nocopy QP_PREQ_GRP.RELATED_LINES_TBL_TYPE,
5521: p_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE,
5522: x_req_line_tbl out nocopy QP_PREQ_GRP.LINE_TBL_TYPE,
5523: x_Req_qual_tbl out nocopy QP_PREQ_GRP.QUAL_TBL_TYPE,
5524: x_Req_line_attr_tbl out nocopy QP_PREQ_GRP.LINE_ATTR_TBL_TYPE,
5525: x_Req_LINE_DETAIL_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE,
5526: x_Req_LINE_DETAIL_qual_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE,
5527: x_Req_LINE_DETAIL_attr_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE,
5528: x_Req_related_lines_tbl out nocopy QP_PREQ_GRP.RELATED_LINES_TBL_TYPE,
5529: p_use_current_header in Boolean Default FALSE
5522: x_req_line_tbl out nocopy QP_PREQ_GRP.LINE_TBL_TYPE,
5523: x_Req_qual_tbl out nocopy QP_PREQ_GRP.QUAL_TBL_TYPE,
5524: x_Req_line_attr_tbl out nocopy QP_PREQ_GRP.LINE_ATTR_TBL_TYPE,
5525: x_Req_LINE_DETAIL_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE,
5526: x_Req_LINE_DETAIL_qual_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE,
5527: x_Req_LINE_DETAIL_attr_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE,
5528: x_Req_related_lines_tbl out nocopy QP_PREQ_GRP.RELATED_LINES_TBL_TYPE,
5529: p_use_current_header in Boolean Default FALSE
5530: --if use_current_header set to true, it will not set the header info
5523: x_Req_qual_tbl out nocopy QP_PREQ_GRP.QUAL_TBL_TYPE,
5524: x_Req_line_attr_tbl out nocopy QP_PREQ_GRP.LINE_ATTR_TBL_TYPE,
5525: x_Req_LINE_DETAIL_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE,
5526: x_Req_LINE_DETAIL_qual_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE,
5527: x_Req_LINE_DETAIL_attr_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE,
5528: x_Req_related_lines_tbl out nocopy QP_PREQ_GRP.RELATED_LINES_TBL_TYPE,
5529: p_use_current_header in Boolean Default FALSE
5530: --if use_current_header set to true, it will not set the header info
5531: --and it will use current header information set by the caller.
5524: x_Req_line_attr_tbl out nocopy QP_PREQ_GRP.LINE_ATTR_TBL_TYPE,
5525: x_Req_LINE_DETAIL_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE,
5526: x_Req_LINE_DETAIL_qual_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE,
5527: x_Req_LINE_DETAIL_attr_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE,
5528: x_Req_related_lines_tbl out nocopy QP_PREQ_GRP.RELATED_LINES_TBL_TYPE,
5529: p_use_current_header in Boolean Default FALSE
5530: --if use_current_header set to true, it will not set the header info
5531: --and it will use current header information set by the caller.
5532: --It is useful when getting a quote where header_id is not available.
5552: i2 PLS_INTEGER;
5553: l_all_lines_from_db Boolean :=False;
5554:
5555: l_Line_Rec OE_Order_PUB.Line_Rec_Type;
5556: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
5557: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
5558: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5559: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5560: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5553: l_all_lines_from_db Boolean :=False;
5554:
5555: l_Line_Rec OE_Order_PUB.Line_Rec_Type;
5556: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
5557: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
5558: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5559: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5560: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5561: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
5554:
5555: l_Line_Rec OE_Order_PUB.Line_Rec_Type;
5556: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
5557: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
5558: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5559: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5560: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5561: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
5562: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
5555: l_Line_Rec OE_Order_PUB.Line_Rec_Type;
5556: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
5557: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
5558: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5559: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5560: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5561: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
5562: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
5563: l_pricing_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5556: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
5557: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
5558: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5559: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5560: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5561: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
5562: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
5563: l_pricing_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5564: l_qualifier_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5557: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
5558: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5559: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5560: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5561: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
5562: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
5563: l_pricing_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5564: l_qualifier_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5565: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
5558: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5559: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5560: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5561: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
5562: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
5563: l_pricing_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5564: l_qualifier_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5565: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
5566: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
5561: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
5562: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
5563: l_pricing_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5564: l_qualifier_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5565: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
5566: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
5567: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5568: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5569: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5562: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
5563: l_pricing_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5564: l_qualifier_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5565: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
5566: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
5567: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5568: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5569: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5570: lx_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
5563: l_pricing_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5564: l_qualifier_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5565: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
5566: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
5567: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5568: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5569: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5570: lx_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
5571: lx_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
5564: l_qualifier_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5565: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
5566: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
5567: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5568: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5569: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5570: lx_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
5571: lx_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
5572: Process_Service_Lines Boolean := FALSE;
5565: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
5566: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
5567: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5568: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5569: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5570: lx_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
5571: lx_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
5572: Process_Service_Lines Boolean := FALSE;
5573: l_related_lines_Index pls_integer;
5566: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
5567: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5568: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5569: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5570: lx_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
5571: lx_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
5572: Process_Service_Lines Boolean := FALSE;
5573: l_related_lines_Index pls_integer;
5574: line_tbl_index pls_integer;
5567: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5568: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5569: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5570: lx_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
5571: lx_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
5572: Process_Service_Lines Boolean := FALSE;
5573: l_related_lines_Index pls_integer;
5574: line_tbl_index pls_integer;
5575: i pls_integer;
5582: /* Variables added for bug 1828553 */
5583: l_order_line_id number;
5584: l_service_reference_line_id number;
5585: --btea begin
5586: l_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE;
5587: --btea end
5588: -- Variable for Bug 2124989
5589: l_agreement_name varchar2(240);
5590: l_revision varchar2(50);
6189:
6190: End If; --g_debug
6191:
6192: G_STMT_NO := 'calculate_adjustments#160';
6193: adj_debug('Before QP_PREQ_GRP.PRICE_REQUEST',1);
6194:
6195: --btea begin
6196: l_control_rec := p_control_rec;
6197:
6203: l_set_of_books := Oe_Order_Cache.Load_Set_Of_Books;
6204: l_control_rec.FUNCTION_CURRENCY := l_set_of_books.currency_code;
6205:
6206: G_STMT_NO := 'QP_PRICE_REQUEST_GRP';
6207: QP_PREQ_GRP.PRICE_REQUEST
6208: (p_control_rec => l_control_rec
6209: ,p_line_tbl => l_Req_line_tbl
6210: ,p_qual_tbl => l_Req_qual_tbl
6211: ,p_line_attr_tbl => l_Req_line_attr_tbl
6340: end calculate_adjustments;
6341:
6342: Function Update_Adj_Line_rec(
6343: p_Line_Adj_Rec in out nocopy OE_Order_Pub.Line_Adj_Rec_Type
6344: ,p_req_line_detail_Rec qp_preq_grp.line_detail_rec_type
6345: )
6346: Return Boolean
6347: is
6348: l_updated_Flag Boolean := False;
6638:
6639: Procedure Find_Duplicate_Adj_Lines(
6640: p_header_Id Number default null
6641: ,p_Line_id Number default null
6642: ,p_req_line_detail_Rec qp_preq_grp.line_detail_rec_type
6643: ,px_Line_Adj_Tbl in out nocopy OE_Order_Pub.Line_Adj_Tbl_Type
6644: ,X_Adj_Index out nocopy Number
6645:
6646: ,p_mode in Varchar2
7097: End Query_Adj_Attribs;
7098:
7099: Procedure Find_Duplicate_Adj_Attribs(
7100: p_Req_Line_Detail_Qual_Rec
7101: QP_PREQ_GRP.Line_Detail_Qual_Rec_Type,
7102: p_Req_Line_Detail_Attr_Rec
7103: QP_PREQ_GRP.Line_Detail_Attr_Rec_Type,
7104: p_Adj_index Number,
7105: p_Line_Adj_Att_Tbl in out nocopy OE_Order_Pub.Line_Adj_Att_Tbl_Type,
7099: Procedure Find_Duplicate_Adj_Attribs(
7100: p_Req_Line_Detail_Qual_Rec
7101: QP_PREQ_GRP.Line_Detail_Qual_Rec_Type,
7102: p_Req_Line_Detail_Attr_Rec
7103: QP_PREQ_GRP.Line_Detail_Attr_Rec_Type,
7104: p_Adj_index Number,
7105: p_Line_Adj_Att_Tbl in out nocopy OE_Order_Pub.Line_Adj_Att_Tbl_Type,
7106: p_att_type Varchar2,
7107: p_price_adjustment_id Number
7227:
7228: Function Match_Product_Ids(
7229: p_price_Adjustment_Id Number,
7230: p_Line_Detail_Index Number ,
7231: p_Req_line_detail_Attr_Tbl QP_PREQ_GRP.line_detail_Attr_Tbl_Type
7232: )
7233: Return Boolean
7234: is
7235: l_inventory_item_id Varchar2(240);
7273: End Match_Product_Ids;
7274:
7275: Procedure Process_Other_Item_Line (
7276: p_Line_Detail_Index Number
7277: ,p_req_line_Tbl QP_PREQ_GRP.LINE_TBL_TYPE
7278: ,p_req_line_detail_Tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE
7279: ,p_Req_line_detail_Attr_Tbl QP_PREQ_GRP.line_detail_Attr_Tbl_Type
7280: ,p_Price_Adjustment_Id Number
7281: ,p_Header_Id Number
7274:
7275: Procedure Process_Other_Item_Line (
7276: p_Line_Detail_Index Number
7277: ,p_req_line_Tbl QP_PREQ_GRP.LINE_TBL_TYPE
7278: ,p_req_line_detail_Tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE
7279: ,p_Req_line_detail_Attr_Tbl QP_PREQ_GRP.line_detail_Attr_Tbl_Type
7280: ,p_Price_Adjustment_Id Number
7281: ,p_Header_Id Number
7282: ,p_Parent_Adj_Index Number
7275: Procedure Process_Other_Item_Line (
7276: p_Line_Detail_Index Number
7277: ,p_req_line_Tbl QP_PREQ_GRP.LINE_TBL_TYPE
7278: ,p_req_line_detail_Tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE
7279: ,p_Req_line_detail_Attr_Tbl QP_PREQ_GRP.line_detail_Attr_Tbl_Type
7280: ,p_Price_Adjustment_Id Number
7281: ,p_Header_Id Number
7282: ,p_Parent_Adj_Index Number
7283: ,p_parent_line_index Number
8118: x_Adjusted_Amount := - p_bucketed_price + p_operand;
8119:
8120: Elsif p_arithmetic_operator = 'LUMPSUM' then
8121: --
8122: IF (p_modifier_level_code = QP_PREQ_GRP.G_LINE_GROUP) THEN
8123: --
8124: -- p_modifier_level_code = 'LINEGROUP'
8125: --
8126: adj_debug('LINEGROUP');
8325:
8326: adj_debug('First Time Adj Amount: ' || p_Line_Adj_Tbl(j).Adjusted_Amount_Per_Pqty,3);
8327: --reset adj amount for parent PBH.
8328: --will be recalculated.
8329: If p_line_adj_tbl(j).price_break_type_code = QP_PREQ_GRP.G_RANGE_BREAK Then
8330: p_Line_Adj_Tbl(j).adjusted_amount_per_pqty:=0;
8331: End If;
8332: oe_debug_pub.add('xNo of assoc in assoc_tbl:'|| p_line_adj_assoc_Tbl.count);
8333: J1 := p_line_adj_assoc_Tbl.First;
8414: END IF;
8415:
8416: G_STMT_NO := 'Calculate_Price#50';
8417:
8418: If p_Line_Adj_Tbl(j).Price_break_Type_Code = QP_PREQ_GRP.G_RANGE_BREAK Then
8419: l_pricing_quantity := p_line_adj_tbl(j2).Range_Break_Quantity;
8420:
8421: Else
8422: l_pricing_quantity := p_line_tbl(i).pricing_quantity;
8435: NULL;
8436: ELSE
8437: --For bug 2874499.
8438: If (p_Line_Adj_Tbl(j2).Arithmetic_operator = 'LUMPSUM'
8439: and p_line_adj_tbl(j2).modifier_level_code = QP_PREQ_GRP.G_LINE_GROUP and
8440: p_line_adj_tbl(j2).automatic_flag = 'N')then
8441: p_line_adj_tbl(j2).group_value := 1;
8442: end if ;
8443: CAlculate_Adjusted_Price(
8453: );
8454: END IF;
8455:
8456: G_STMT_NO := 'Calculate_Price#60';
8457: If p_Line_Adj_Tbl(j).Price_break_Type_Code = QP_PREQ_GRP.G_RANGE_BREAK Then
8458: If nvl(p_Line_Adj_Tbl(j).Adjusted_Amount_Per_Pqty,FND_API.G_MISS_NUM)=FND_API.G_MISS_NUM Then
8459: p_Line_Adj_Tbl(j).Adjusted_Amount_Per_Pqty:=0;
8460: End If;
8461:
8485: End If; -- J1 if
8486: J1 := p_line_adj_assoc_Tbl.Next(J1);
8487: End loop; -- J1
8488:
8489: If p_Line_Adj_Tbl(j).Price_Break_Type_Code = QP_PREQ_GRP.G_RANGE_BREAK Then
8490: oe_debug_pub.add('xAdj_amt_pqty:'||p_line_adj_tbl(j).adjusted_amount_per_pqty);
8491: if p_line_adj_tbl(j).range_break_quantity is null and l_total_quantity > 0
8492: then --bug 2813670
8493: oe_debug_pub.add('Value of l_tot_qty :'||l_total_quantity);
8558:
8559: ELSE
8560: --For bug 2874499.
8561: If (p_Line_Adj_Tbl(j).Arithmetic_operator = 'LUMPSUM'
8562: and p_line_adj_tbl(j).modifier_level_code = QP_PREQ_GRP.G_LINE_GROUP and
8563: p_line_adj_tbl(j).automatic_flag = 'N')then
8564: p_line_adj_tbl(j).group_value := 1;
8565: end if ;
8566:
8981: (
8982: p_request_type_code varchar2,
8983: x_return_status out nocopy Varchar2,
8984:
8985: p_Req_Control_Rec QP_PREQ_GRP.Control_record_type,
8986: p_req_line_tbl QP_PREQ_GRP.line_tbl_type,
8987: p_Req_qual_tbl QP_PREQ_GRP.qual_tbl_type,
8988: p_Req_line_attr_tbl QP_PREQ_GRP.line_attr_tbl_type,
8989: p_Req_Line_Detail_tbl QP_PREQ_GRP.line_detail_tbl_type,
8982: p_request_type_code varchar2,
8983: x_return_status out nocopy Varchar2,
8984:
8985: p_Req_Control_Rec QP_PREQ_GRP.Control_record_type,
8986: p_req_line_tbl QP_PREQ_GRP.line_tbl_type,
8987: p_Req_qual_tbl QP_PREQ_GRP.qual_tbl_type,
8988: p_Req_line_attr_tbl QP_PREQ_GRP.line_attr_tbl_type,
8989: p_Req_Line_Detail_tbl QP_PREQ_GRP.line_detail_tbl_type,
8990: p_Req_Line_Detail_Qual_tbl QP_PREQ_GRP.line_detail_qual_tbl_type,
8983: x_return_status out nocopy Varchar2,
8984:
8985: p_Req_Control_Rec QP_PREQ_GRP.Control_record_type,
8986: p_req_line_tbl QP_PREQ_GRP.line_tbl_type,
8987: p_Req_qual_tbl QP_PREQ_GRP.qual_tbl_type,
8988: p_Req_line_attr_tbl QP_PREQ_GRP.line_attr_tbl_type,
8989: p_Req_Line_Detail_tbl QP_PREQ_GRP.line_detail_tbl_type,
8990: p_Req_Line_Detail_Qual_tbl QP_PREQ_GRP.line_detail_qual_tbl_type,
8991: p_Req_Line_Detail_Attr_tbl QP_PREQ_GRP.line_detail_attr_tbl_type,
8984:
8985: p_Req_Control_Rec QP_PREQ_GRP.Control_record_type,
8986: p_req_line_tbl QP_PREQ_GRP.line_tbl_type,
8987: p_Req_qual_tbl QP_PREQ_GRP.qual_tbl_type,
8988: p_Req_line_attr_tbl QP_PREQ_GRP.line_attr_tbl_type,
8989: p_Req_Line_Detail_tbl QP_PREQ_GRP.line_detail_tbl_type,
8990: p_Req_Line_Detail_Qual_tbl QP_PREQ_GRP.line_detail_qual_tbl_type,
8991: p_Req_Line_Detail_Attr_tbl QP_PREQ_GRP.line_detail_attr_tbl_type,
8992: p_Req_related_lines_tbl QP_PREQ_GRP.related_lines_tbl_type
8985: p_Req_Control_Rec QP_PREQ_GRP.Control_record_type,
8986: p_req_line_tbl QP_PREQ_GRP.line_tbl_type,
8987: p_Req_qual_tbl QP_PREQ_GRP.qual_tbl_type,
8988: p_Req_line_attr_tbl QP_PREQ_GRP.line_attr_tbl_type,
8989: p_Req_Line_Detail_tbl QP_PREQ_GRP.line_detail_tbl_type,
8990: p_Req_Line_Detail_Qual_tbl QP_PREQ_GRP.line_detail_qual_tbl_type,
8991: p_Req_Line_Detail_Attr_tbl QP_PREQ_GRP.line_detail_attr_tbl_type,
8992: p_Req_related_lines_tbl QP_PREQ_GRP.related_lines_tbl_type
8993: ,p_write_to_db Boolean
8986: p_req_line_tbl QP_PREQ_GRP.line_tbl_type,
8987: p_Req_qual_tbl QP_PREQ_GRP.qual_tbl_type,
8988: p_Req_line_attr_tbl QP_PREQ_GRP.line_attr_tbl_type,
8989: p_Req_Line_Detail_tbl QP_PREQ_GRP.line_detail_tbl_type,
8990: p_Req_Line_Detail_Qual_tbl QP_PREQ_GRP.line_detail_qual_tbl_type,
8991: p_Req_Line_Detail_Attr_tbl QP_PREQ_GRP.line_detail_attr_tbl_type,
8992: p_Req_related_lines_tbl QP_PREQ_GRP.related_lines_tbl_type
8993: ,p_write_to_db Boolean
8994: ,p_any_frozen_line in Boolean
8987: p_Req_qual_tbl QP_PREQ_GRP.qual_tbl_type,
8988: p_Req_line_attr_tbl QP_PREQ_GRP.line_attr_tbl_type,
8989: p_Req_Line_Detail_tbl QP_PREQ_GRP.line_detail_tbl_type,
8990: p_Req_Line_Detail_Qual_tbl QP_PREQ_GRP.line_detail_qual_tbl_type,
8991: p_Req_Line_Detail_Attr_tbl QP_PREQ_GRP.line_detail_attr_tbl_type,
8992: p_Req_related_lines_tbl QP_PREQ_GRP.related_lines_tbl_type
8993: ,p_write_to_db Boolean
8994: ,p_any_frozen_line in Boolean
8995: ,x_line_Tbl in out nocopy oe_Order_Pub.Line_Tbl_Type
8988: p_Req_line_attr_tbl QP_PREQ_GRP.line_attr_tbl_type,
8989: p_Req_Line_Detail_tbl QP_PREQ_GRP.line_detail_tbl_type,
8990: p_Req_Line_Detail_Qual_tbl QP_PREQ_GRP.line_detail_qual_tbl_type,
8991: p_Req_Line_Detail_Attr_tbl QP_PREQ_GRP.line_detail_attr_tbl_type,
8992: p_Req_related_lines_tbl QP_PREQ_GRP.related_lines_tbl_type
8993: ,p_write_to_db Boolean
8994: ,p_any_frozen_line in Boolean
8995: ,x_line_Tbl in out nocopy oe_Order_Pub.Line_Tbl_Type
8996: ,p_header_rec oe_Order_Pub.header_rec_type
8997: ,p_multiple_events in Varchar2 Default 'N'
8998: ,p_honor_price_flag in Varchar2 Default 'Y' --bug 2503186
8999: )
9000: is
9001: l_Req_Line_Detail_qual_Rec QP_PREQ_GRP.line_detail_qual_rec_type;
9002: l_Req_Line_Detail_attr_Rec QP_PREQ_GRP.line_detail_attr_rec_type;
9003: l_req_line_rec qp_preq_grp.line_rec_type;
9004: l_control_rec Oe_Globals.Control_rec_type;
9005: l_header_rec oe_Order_Pub.header_rec_type := p_header_rec;
8998: ,p_honor_price_flag in Varchar2 Default 'Y' --bug 2503186
8999: )
9000: is
9001: l_Req_Line_Detail_qual_Rec QP_PREQ_GRP.line_detail_qual_rec_type;
9002: l_Req_Line_Detail_attr_Rec QP_PREQ_GRP.line_detail_attr_rec_type;
9003: l_req_line_rec qp_preq_grp.line_rec_type;
9004: l_control_rec Oe_Globals.Control_rec_type;
9005: l_header_rec oe_Order_Pub.header_rec_type := p_header_rec;
9006: --l_old_line_rec oe_order_pub.line_rec_type;
8999: )
9000: is
9001: l_Req_Line_Detail_qual_Rec QP_PREQ_GRP.line_detail_qual_rec_type;
9002: l_Req_Line_Detail_attr_Rec QP_PREQ_GRP.line_detail_attr_rec_type;
9003: l_req_line_rec qp_preq_grp.line_rec_type;
9004: l_control_rec Oe_Globals.Control_rec_type;
9005: l_header_rec oe_Order_Pub.header_rec_type := p_header_rec;
9006: --l_old_line_rec oe_order_pub.line_rec_type;
9007: l_line_rec oe_order_pub.line_rec_type;
9126: End If;
9127: adj_debug('The status code '||p_req_line_tbl(i).status_code);
9128: l_invalid_line := 'N';
9129: if p_req_line_tbl(i).line_Type_code ='LINE' and
9130: p_req_line_tbl(i).status_code in ( QP_PREQ_GRP.G_STATUS_INVALID_PRICE_LIST,
9131: QP_PREQ_GRP.G_STS_LHS_NOT_FOUND,
9132: QP_PREQ_GRP.G_STATUS_FORMULA_ERROR,
9133: QP_PREQ_GRP.G_STATUS_OTHER_ERRORS,
9134: FND_API.G_RET_STS_UNEXP_ERROR,
9127: adj_debug('The status code '||p_req_line_tbl(i).status_code);
9128: l_invalid_line := 'N';
9129: if p_req_line_tbl(i).line_Type_code ='LINE' and
9130: p_req_line_tbl(i).status_code in ( QP_PREQ_GRP.G_STATUS_INVALID_PRICE_LIST,
9131: QP_PREQ_GRP.G_STS_LHS_NOT_FOUND,
9132: QP_PREQ_GRP.G_STATUS_FORMULA_ERROR,
9133: QP_PREQ_GRP.G_STATUS_OTHER_ERRORS,
9134: FND_API.G_RET_STS_UNEXP_ERROR,
9135: FND_API.G_RET_STS_ERROR,
9128: l_invalid_line := 'N';
9129: if p_req_line_tbl(i).line_Type_code ='LINE' and
9130: p_req_line_tbl(i).status_code in ( QP_PREQ_GRP.G_STATUS_INVALID_PRICE_LIST,
9131: QP_PREQ_GRP.G_STS_LHS_NOT_FOUND,
9132: QP_PREQ_GRP.G_STATUS_FORMULA_ERROR,
9133: QP_PREQ_GRP.G_STATUS_OTHER_ERRORS,
9134: FND_API.G_RET_STS_UNEXP_ERROR,
9135: FND_API.G_RET_STS_ERROR,
9136: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
9129: if p_req_line_tbl(i).line_Type_code ='LINE' and
9130: p_req_line_tbl(i).status_code in ( QP_PREQ_GRP.G_STATUS_INVALID_PRICE_LIST,
9131: QP_PREQ_GRP.G_STS_LHS_NOT_FOUND,
9132: QP_PREQ_GRP.G_STATUS_FORMULA_ERROR,
9133: QP_PREQ_GRP.G_STATUS_OTHER_ERRORS,
9134: FND_API.G_RET_STS_UNEXP_ERROR,
9135: FND_API.G_RET_STS_ERROR,
9136: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
9137: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
9132: QP_PREQ_GRP.G_STATUS_FORMULA_ERROR,
9133: QP_PREQ_GRP.G_STATUS_OTHER_ERRORS,
9134: FND_API.G_RET_STS_UNEXP_ERROR,
9135: FND_API.G_RET_STS_ERROR,
9136: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
9137: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
9138: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
9139: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
9140: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
9133: QP_PREQ_GRP.G_STATUS_OTHER_ERRORS,
9134: FND_API.G_RET_STS_UNEXP_ERROR,
9135: FND_API.G_RET_STS_ERROR,
9136: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
9137: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
9138: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
9139: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
9140: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
9141: QP_PREQ_GRP.G_STATUS_INVALID_INCOMP,
9134: FND_API.G_RET_STS_UNEXP_ERROR,
9135: FND_API.G_RET_STS_ERROR,
9136: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
9137: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
9138: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
9139: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
9140: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
9141: QP_PREQ_GRP.G_STATUS_INVALID_INCOMP,
9142: QP_PREQ_GRP.G_STATUS_BEST_PRICE_EVAL_ERROR)
9135: FND_API.G_RET_STS_ERROR,
9136: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
9137: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
9138: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
9139: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
9140: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
9141: QP_PREQ_GRP.G_STATUS_INVALID_INCOMP,
9142: QP_PREQ_GRP.G_STATUS_BEST_PRICE_EVAL_ERROR)
9143: then
9136: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
9137: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
9138: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
9139: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
9140: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
9141: QP_PREQ_GRP.G_STATUS_INVALID_INCOMP,
9142: QP_PREQ_GRP.G_STATUS_BEST_PRICE_EVAL_ERROR)
9143: then
9144: OE_MSG_PUB.set_msg_context
9137: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
9138: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
9139: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
9140: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
9141: QP_PREQ_GRP.G_STATUS_INVALID_INCOMP,
9142: QP_PREQ_GRP.G_STATUS_BEST_PRICE_EVAL_ERROR)
9143: then
9144: OE_MSG_PUB.set_msg_context
9145: ( p_entity_code => 'LINE'
9138: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
9139: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
9140: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
9141: QP_PREQ_GRP.G_STATUS_INVALID_INCOMP,
9142: QP_PREQ_GRP.G_STATUS_BEST_PRICE_EVAL_ERROR)
9143: then
9144: OE_MSG_PUB.set_msg_context
9145: ( p_entity_code => 'LINE'
9146: ,p_entity_id => l_line_rec.line_id
9164: Exception When No_data_found then
9165: l_price_list := l_line_rec.price_list_id;
9166: End;
9167:
9168: If p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STATUS_INVALID_PRICE_LIST then
9169: adj_debug('Invalid Item/Price List combination');
9170: If not G_IPL_ERRORS_TBL.exists(l_line_rec.line_id)
9171: or (G_IPL_ERRORS_TBL.exists(l_line_rec.line_id)
9172: and
9218: l_line_rec.unit_list_price:=NULL;
9219: l_line_rec.unit_selling_price_per_pqty :=NULL;
9220: l_line_rec.unit_list_price_per_pqty:=NULL;
9221:
9222: Elsif p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STS_LHS_NOT_FOUND Then
9223: adj_debug('Price List Not found');
9224: FND_MESSAGE.SET_NAME('ONT','ONT_NO_PRICE_LIST_FOUND');
9225: FND_MESSAGE.SET_TOKEN('ITEM',l_line_rec.Ordered_Item);
9226: FND_MESSAGE.SET_TOKEN('UOM',l_line_rec.Order_Quantity_uom);
9224: FND_MESSAGE.SET_NAME('ONT','ONT_NO_PRICE_LIST_FOUND');
9225: FND_MESSAGE.SET_TOKEN('ITEM',l_line_rec.Ordered_Item);
9226: FND_MESSAGE.SET_TOKEN('UOM',l_line_rec.Order_Quantity_uom);
9227: OE_MSG_PUB.Add;
9228: Elsif p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STATUS_FORMULA_ERROR then
9229: adj_debug('Error in Formula processing');
9230: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_ERROR_IN_FORMULA');
9231: FND_MESSAGE.SET_TOKEN('ERR_TEXT',p_req_line_tbl(i).status_text||SQLERRM);
9232: OE_MSG_PUB.Add;
9230: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_ERROR_IN_FORMULA');
9231: FND_MESSAGE.SET_TOKEN('ERR_TEXT',p_req_line_tbl(i).status_text||SQLERRM);
9232: OE_MSG_PUB.Add;
9233: Elsif p_req_line_tbl(i).status_code in
9234: ( QP_PREQ_GRP.G_STATUS_OTHER_ERRORS , FND_API.G_RET_STS_UNEXP_ERROR,
9235: FND_API.G_RET_STS_ERROR)
9236: then
9237: adj_debug('Other errors processing');
9238: FND_MESSAGE.SET_NAME('ONT','ONT_PRICING_ERRORS'); --bug#7149497
9237: adj_debug('Other errors processing');
9238: FND_MESSAGE.SET_NAME('ONT','ONT_PRICING_ERRORS'); --bug#7149497
9239: FND_MESSAGE.SET_TOKEN('ERR_TEXT',p_req_line_tbl(i).status_text||SQLERRM);
9240: OE_MSG_PUB.Add;
9241: Elsif p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STATUS_INVALID_UOM then
9242: adj_debug('Invalid uom');
9243: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_INVALID_UOM');
9244: FND_MESSAGE.SET_TOKEN('ITEM',l_line_rec.Ordered_Item);
9245: FND_MESSAGE.SET_TOKEN('UOM',l_line_rec.Order_Quantity_uom);
9243: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_INVALID_UOM');
9244: FND_MESSAGE.SET_TOKEN('ITEM',l_line_rec.Ordered_Item);
9245: FND_MESSAGE.SET_TOKEN('UOM',l_line_rec.Order_Quantity_uom);
9246: OE_MSG_PUB.Add;
9247: Elsif p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST then
9248: adj_debug('Duplicate price list');
9249: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_DUPLICATE_PRICE_LIST');
9250:
9251: Begin
9281:
9282: End;
9283: FND_MESSAGE.SET_TOKEN('PRICE_LIST2',l_price_list);
9284: OE_MSG_PUB.Add;
9285: Elsif p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV then
9286: adj_debug('Invalid UOM Conversion');
9287: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_INVALID_UOM_CONVERSION');
9288: FND_MESSAGE.SET_TOKEN('UOM_TEXT','( '||l_line_rec.Ordered_Item||' ) '||
9289: p_req_line_tbl(i).status_text);
9287: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_INVALID_UOM_CONVERSION');
9288: FND_MESSAGE.SET_TOKEN('UOM_TEXT','( '||l_line_rec.Ordered_Item||' ) '||
9289: p_req_line_tbl(i).status_text);
9290: OE_MSG_PUB.Add;
9291: Elsif p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STATUS_INVALID_INCOMP then
9292: adj_debug('Unable to resolve incompatibility');
9293: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_INVALID_INCOMP');
9294: FND_MESSAGE.SET_TOKEN('ERR_TEXT','( '||l_line_rec.Ordered_Item||' ) '||
9295: p_req_line_tbl(i).status_text);
9293: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_INVALID_INCOMP');
9294: FND_MESSAGE.SET_TOKEN('ERR_TEXT','( '||l_line_rec.Ordered_Item||' ) '||
9295: p_req_line_tbl(i).status_text);
9296: OE_MSG_PUB.Add;
9297: Elsif p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STATUS_BEST_PRICE_EVAL_ERROR then
9298: adj_debug('Error while evaluating the best price');
9299: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_BEST_PRICE_ERROR');
9300: FND_MESSAGE.SET_TOKEN('ITEM',l_line_rec.Ordered_Item);
9301: FND_MESSAGE.SET_TOKEN('ERR_TEXT',p_req_line_tbl(i).status_text);
9336:
9337: RAISE FND_API.G_EXC_ERROR;
9338: elsif
9339: p_req_line_tbl(i).line_Type_code ='LINE' and
9340: p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STATUS_OTHER_ERRORS
9341: Then
9342:
9343: FND_MESSAGE.SET_NAME('ONT','OE_PRICING_ERROR');
9344: FND_MESSAGE.SET_TOKEN('ERR_TEXT','( '||l_line_rec.Ordered_Item||' ) '||
9347:
9348: elsif
9349: ( p_req_line_tbl(i).line_Type_code ='LINE' and
9350: p_req_line_tbl(i).status_code in
9351: ( QP_PREQ_GRP.G_STATUS_UPDATED,
9352: QP_PREQ_GRP.G_STATUS_GSA_VIOLATION,
9353: QP_PREQ_GRP.G_STATUS_UNCHANGED) and
9354: nvl(p_req_line_tbl(i).processed_code,'0') <> QP_PREQ_GRP.G_BY_ENGINE
9355: and p_req_line_tbl(i).price_flag IN ('Y','P') )
9348: elsif
9349: ( p_req_line_tbl(i).line_Type_code ='LINE' and
9350: p_req_line_tbl(i).status_code in
9351: ( QP_PREQ_GRP.G_STATUS_UPDATED,
9352: QP_PREQ_GRP.G_STATUS_GSA_VIOLATION,
9353: QP_PREQ_GRP.G_STATUS_UNCHANGED) and
9354: nvl(p_req_line_tbl(i).processed_code,'0') <> QP_PREQ_GRP.G_BY_ENGINE
9355: and p_req_line_tbl(i).price_flag IN ('Y','P') )
9356:
9349: ( p_req_line_tbl(i).line_Type_code ='LINE' and
9350: p_req_line_tbl(i).status_code in
9351: ( QP_PREQ_GRP.G_STATUS_UPDATED,
9352: QP_PREQ_GRP.G_STATUS_GSA_VIOLATION,
9353: QP_PREQ_GRP.G_STATUS_UNCHANGED) and
9354: nvl(p_req_line_tbl(i).processed_code,'0') <> QP_PREQ_GRP.G_BY_ENGINE
9355: and p_req_line_tbl(i).price_flag IN ('Y','P') )
9356:
9357: or -- OPM 2547940 start
9350: p_req_line_tbl(i).status_code in
9351: ( QP_PREQ_GRP.G_STATUS_UPDATED,
9352: QP_PREQ_GRP.G_STATUS_GSA_VIOLATION,
9353: QP_PREQ_GRP.G_STATUS_UNCHANGED) and
9354: nvl(p_req_line_tbl(i).processed_code,'0') <> QP_PREQ_GRP.G_BY_ENGINE
9355: and p_req_line_tbl(i).price_flag IN ('Y','P') )
9356:
9357: or -- OPM 2547940 start
9358: -- pricing by quantity2 - this is for case when order line is split from shipping and new line gets generated
9437: --l_old_line_tbl(i) := l_old_line_rec;
9438:
9439: Elsif -- Process header level adjustments
9440: p_req_line_tbl(i).line_type_code ='ORDER' and
9441: (p_req_line_tbl(i).status_code in ( QP_PREQ_GRP.G_STATUS_UPDATED ,
9442: QP_PREQ_GRP.G_STATUS_GSA_VIOLATION)
9443: --btea
9444: --In this case even engine doesn't update the order (status = UNCHANGED)
9445: --because of one of the lined is frozen,
9438:
9439: Elsif -- Process header level adjustments
9440: p_req_line_tbl(i).line_type_code ='ORDER' and
9441: (p_req_line_tbl(i).status_code in ( QP_PREQ_GRP.G_STATUS_UPDATED ,
9442: QP_PREQ_GRP.G_STATUS_GSA_VIOLATION)
9443: --btea
9444: --In this case even engine doesn't update the order (status = UNCHANGED)
9445: --because of one of the lined is frozen,
9446: --there can be some order level adjustments in database which
9444: --In this case even engine doesn't update the order (status = UNCHANGED)
9445: --because of one of the lined is frozen,
9446: --there can be some order level adjustments in database which
9447: --need to be pulled out by append_adjustment_lines routine
9448: or (p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STATUS_UNCHANGED
9449: -- and p_any_frozen_line = TRUE -- bug 1675449
9450: ))
9451: Then
9452: G_STMT_NO := 'Process_Adjustments#35';
9489:
9490: -- Process header level adjustments -- PROMOTIONS SEP/01 start
9491: adj_debug('limit profile:'||l_limit_hold_action,3);
9492:
9493: IF (p_req_line_tbl(i).hold_code = QP_PREQ_GRP.G_STATUS_LIMIT_HOLD) or
9494: p_req_line_tbl(i).hold_code = QP_PREQ_GRP.G_STATUS_LIMIT_ADJUSTED THEN
9495: IF (l_limit_hold_action = 'NO_HOLD') THEN
9496: FND_MESSAGE.SET_NAME('ONT','ONT_PROMO_LIMIT_EXCEEDED');
9497: OE_MSG_PUB.ADD;
9490: -- Process header level adjustments -- PROMOTIONS SEP/01 start
9491: adj_debug('limit profile:'||l_limit_hold_action,3);
9492:
9493: IF (p_req_line_tbl(i).hold_code = QP_PREQ_GRP.G_STATUS_LIMIT_HOLD) or
9494: p_req_line_tbl(i).hold_code = QP_PREQ_GRP.G_STATUS_LIMIT_ADJUSTED THEN
9495: IF (l_limit_hold_action = 'NO_HOLD') THEN
9496: FND_MESSAGE.SET_NAME('ONT','ONT_PROMO_LIMIT_EXCEEDED');
9497: OE_MSG_PUB.ADD;
9498: ELSE
9513: p_line_id => NULL) ;
9514:
9515: END IF; -- ( p_req_line_tbl(i).line_type_code = 'LINE' )
9516: END IF; -- limit violation action
9517: END IF; -- (p_req_line_tbl(i).hold_code = QP_PREQ_GRP.G_STATUS_LIMIT_HOLD)
9518: IF p_req_line_tbl(i).line_id IS NOT NULL AND
9519: p_req_line_tbl(i).line_id <> FND_API.G_MISS_NUM THEN
9520: BEGIN
9521: IF l_debug_level > 0 THEN
9572:
9573: J:= p_req_line_detail_Tbl.First;
9574: While J is Not null loop
9575: if p_req_line_tbl( p_req_line_detail_Tbl(j).line_index).status_code in (
9576: QP_PREQ_GRP.G_STATUS_UPDATED ,QP_PREQ_GRP.G_STATUS_GSA_VIOLATION )
9577: and nvl(p_req_line_tbl( p_req_line_detail_Tbl(j).line_index).processed_code,'0')
9578: <> QP_PREQ_GRP.G_BY_ENGINE
9579:
9580: --only process/insert automatic adjustments, with freight charge as exception
9574: While J is Not null loop
9575: if p_req_line_tbl( p_req_line_detail_Tbl(j).line_index).status_code in (
9576: QP_PREQ_GRP.G_STATUS_UPDATED ,QP_PREQ_GRP.G_STATUS_GSA_VIOLATION )
9577: and nvl(p_req_line_tbl( p_req_line_detail_Tbl(j).line_index).processed_code,'0')
9578: <> QP_PREQ_GRP.G_BY_ENGINE
9579:
9580: --only process/insert automatic adjustments, with freight charge as exception
9581: and (p_req_line_detail_Tbl(j).automatic_flag = 'Y' or
9582: (p_req_line_detail_Tbl(j).automatic_flag = 'N' and (p_req_line_detail_Tbl(j).list_line_type_code = 'FREIGHT_CHARGE' or l_preinsert_manual_adj = 'Y' )))
9808:
9809: if p_Req_Related_Lines_Tbl(i).Line_Detail_Index =
9810: p_req_line_detail_Tbl(j).line_detail_index and
9811: p_Req_Related_Lines_Tbl(i).Relationship_Type_Code
9812: =QP_PREQ_GRP.G_GENERATED_LINE Then
9813:
9814: adj_debug('The related line is '||p_Req_Related_Lines_Tbl(i).Related_Line_Detail_Index);
9815: -- Process the "Other Item"
9816:
9861: end if; -- for list_line_type
9862:
9863: end if; -- Status_code = Updated.
9864:
9865: If ( (p_req_line_detail_Tbl(j).limit_code = QP_PREQ_GRP.G_STATUS_LIMIT_EXCEEDED ) -- PROMOTIONS SEP/01 START
9866: or (p_req_line_detail_Tbl(j).limit_code = QP_PREQ_GRP.G_STATUS_LIMIT_ADJUSTED ) )
9867: then
9868: -- adj_debug('PAL PROMOTIONS - G_STATUS_LIMIT_EXCEEDED or G_STATUS_LIMIT_ADJUSTED IN _Adj_pvt.process_adjustments',1);
9869: IF (p_req_line_tbl(p_req_line_detail_tbl(j).line_index).LINE_TYPE_CODE='ORDER') THEN
9862:
9863: end if; -- Status_code = Updated.
9864:
9865: If ( (p_req_line_detail_Tbl(j).limit_code = QP_PREQ_GRP.G_STATUS_LIMIT_EXCEEDED ) -- PROMOTIONS SEP/01 START
9866: or (p_req_line_detail_Tbl(j).limit_code = QP_PREQ_GRP.G_STATUS_LIMIT_ADJUSTED ) )
9867: then
9868: -- adj_debug('PAL PROMOTIONS - G_STATUS_LIMIT_EXCEEDED or G_STATUS_LIMIT_ADJUSTED IN _Adj_pvt.process_adjustments',1);
9869: IF (p_req_line_tbl(p_req_line_detail_tbl(j).line_index).LINE_TYPE_CODE='ORDER') THEN
9870: OE_MSG_PUB.set_msg_context
9958: i:= p_Req_Related_Lines_Tbl.First;
9959: While i is not null loop
9960: if
9961: p_Req_Related_Lines_Tbl(i).Relationship_Type_Code in (
9962: QP_PREQ_GRP.G_PBH_LINE ,QP_PREQ_GRP.G_GENERATED_LINE ) and
9963: p_Req_Related_Lines_Tbl(i).Line_Detail_Index is not null and
9964: p_Req_Related_Lines_Tbl(i).Related_Line_Detail_Index is not null and
9965: l_line_details_prcd.exists(p_Req_Related_Lines_Tbl(i).Line_Detail_Index) and
9966: l_line_details_prcd.exists(p_Req_Related_Lines_Tbl(i).Related_Line_Detail_Index)
10081: end loop;
10082:
10083: adj_debug('Before cal #adjs '||l_Line_Adj_Tbl.count);
10084:
10085: --If p_Req_Control_Rec.Calculate_Flag = QP_PREQ_GRP.G_SEARCH_ONLY Then
10086: -- The calculation Engine was not called , when the price request was made
10087: G_STMT_NO := 'process_adjustments#130';
10088:
10089: i:=l_line_adj_tbl.first;
10914:
10915: ,p_Line_id Number Default Null
10916: ,p_Header_id Number Default Null
10917: ,p_Request_Type_code Varchar2
10918: ,p_Control_Rec QP_PREQ_GRP.control_record_type
10919: ,p_write_to_db Boolean Default TRUE
10920: ,p_request_rec OE_Order_PUB.request_rec_type default oe_order_pub.G_MISS_REQUEST_REC
10921: ,x_line_Tbl in out nocopy oe_Order_Pub.Line_Tbl_Type
10922: ,p_honor_price_flag VARCHAR2 Default 'Y'
10924: ,p_action_code in Varchar2 default Null
10925: )
10926: is
10927: l_return_status varchar2(10);
10928: l_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE;
10929: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
10930: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
10931: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
10932: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
10925: )
10926: is
10927: l_return_status varchar2(10);
10928: l_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE;
10929: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
10930: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
10931: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
10932: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
10933: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
10926: is
10927: l_return_status varchar2(10);
10928: l_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE;
10929: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
10930: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
10931: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
10932: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
10933: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
10934: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
10927: l_return_status varchar2(10);
10928: l_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE;
10929: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
10930: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
10931: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
10932: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
10933: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
10934: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
10935: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
10928: l_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE;
10929: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
10930: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
10931: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
10932: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
10933: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
10934: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
10935: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
10936: lx_Header_Rec oe_Order_Pub.Header_REc_Type;
10929: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
10930: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
10931: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
10932: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
10933: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
10934: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
10935: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
10936: lx_Header_Rec oe_Order_Pub.Header_REc_Type;
10937: l_dummy varchar2(1);
10930: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
10931: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
10932: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
10933: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
10934: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
10935: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
10936: lx_Header_Rec oe_Order_Pub.Header_REc_Type;
10937: l_dummy varchar2(1);
10938: l_any_frozen_line Boolean;
10931: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
10932: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
10933: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
10934: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
10935: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
10936: lx_Header_Rec oe_Order_Pub.Header_REc_Type;
10937: l_dummy varchar2(1);
10938: l_any_frozen_line Boolean;
10939: l_price_control_rec OE_ORDER_PRICE_pvt.control_rec_type;
11108: ,p_request_rec OE_Order_PUB.request_rec_type default oe_order_pub.G_MISS_REQUEST_REC
11109:
11110: )
11111: is
11112: l_Req_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE;
11113: l_control_rec Oe_Globals.Control_rec_type;
11114: l_Line_tbl OE_Order_PUB.Line_tbl_type;
11115: l_old_Line_tbl OE_Order_PUB.Line_tbl_type;
11116: l_Line_tbl1 OE_Order_PUB.Line_tbl_type;
11185: nvl(p_request_rec.param1,'XX') <> 'UI') OR
11186: OE_CODE_CONTROL.Get_Code_Release_Level >= '110509'
11187: THEN
11188: l_price_control_rec.p_request_type_code:=p_request_type_code;
11189: l_price_control_rec.p_calculate_flag := QP_PREQ_GRP.G_CALCULATE_ONLY;
11190: IF (p_line_id IS NOT NULL and nvl(p_request_rec.param1,'XX') = 'UI') THEN
11191: l_price_control_rec.p_honor_price_flag := 'N';
11192: END IF;
11193: oe_order_price_pvt.price_line
11510: ,x_msg_data out nocopy varchar2
11511:
11512: )
11513: is
11514: l_Price_Control_rec QP_PREQ_GRP.control_record_type;
11515: l_return_status varchar2(1);
11516: l_x_line_tbl oe_order_pub.line_tbl_type;
11517: l_line_id number;
11518: l_header_id number;
11549:
11550: If P_price_level ='LINE' then
11551:
11552: l_Price_Control_Rec.pricing_event := 'LINE';
11553: l_Price_Control_Rec.calculate_flag := QP_PREQ_GRP.G_SEARCH_N_CALCULATE;
11554: l_Price_Control_Rec.Simulation_Flag := 'N';
11555: l_has_prg_lines := 'Q';
11556:
11557: --MOAC PI BEGIN
11748: l_price_control_rec.pricing_event := 'BATCH,BOOK,SHIP';
11749: l_multiple_events := 'Y';
11750: End If;
11751:
11752: l_Price_Control_Rec.calculate_flag := QP_PREQ_GRP.G_SEARCH_N_CALCULATE;
11753: l_Price_Control_Rec.Simulation_Flag := 'N';
11754:
11755: oe_order_Adj_pvt.Price_line(
11756: X_Return_Status => l_Return_Status
11789: l_price_control_rec.pricing_event := 'BATCH,BOOK,SHIP';
11790: l_multiple_events := 'Y';
11791: End If;
11792:
11793: l_Price_Control_Rec.calculate_flag := QP_PREQ_GRP.G_SEARCH_N_CALCULATE;
11794: l_Price_Control_Rec.Simulation_Flag := 'N';
11795:
11796: oe_order_Adj_pvt.Price_line(
11797: X_Return_Status => l_Return_Status
11876: ,x_msg_data out nocopy varchar2
11877:
11878: )
11879: is
11880: l_Price_Control_rec QP_PREQ_GRP.control_record_type;
11881: l_return_status varchar2(1);
11882: l_x_line_tbl oe_order_pub.line_tbl_type;
11883: l_line_list varchar2(32000) := p_line_list;
11884: l_Header_list varchar2(32000) := p_Header_list;
11905:
11906: If P_price_level ='LINE' then
11907:
11908: l_Price_Control_Rec.pricing_event := 'LINE';
11909: l_Price_Control_Rec.calculate_flag := QP_PREQ_GRP.G_SEARCH_N_CALCULATE;
11910: l_Price_Control_Rec.Simulation_Flag := 'N';
11911: l_has_prg_lines := 'Q';
11912:
11913: -- Made changes to get line_id from p_line_list for Bug 2532740
12024: l_price_control_rec.pricing_event := 'BATCH,BOOK,SHIP';
12025: l_multiple_events := 'Y';
12026: End If;
12027:
12028: l_Price_Control_Rec.calculate_flag := QP_PREQ_GRP.G_SEARCH_N_CALCULATE;
12029: l_Price_Control_Rec.Simulation_Flag := 'N';
12030:
12031: oe_order_Adj_pvt.Price_line(
12032: X_Return_Status => l_Return_Status
12217:
12218: End;
12219:
12220: Procedure Load_Out_Quote_Line (p_line_tbl In Oe_Order_Pub.Line_tbl_Type,
12221: p_req_line_tbl In QP_PREQ_GRP.LINE_TBL_TYPE,
12222: x_quote_line_tbl out nocopy quote_line_tbl_type) As
12223:
12224: i PLS_INTEGER;
12225: Begin
12281: x_quote_line_tbl(i).line_id :=p_line_tbl(i).line_id ;
12282: --use this attribute for place holder of status code. Because there are
12283: --no place holder for status on line_rec record type
12284: If (p_line_tbl(i).industry_attribute30) In
12285: (QP_PREQ_GRP.G_STATUS_INVALID_PRICE_LIST,
12286: QP_PREQ_GRP.G_STS_LHS_NOT_FOUND,
12287: QP_PREQ_GRP.G_STATUS_FORMULA_ERROR,
12288: QP_PREQ_GRP.G_STATUS_OTHER_ERRORS,
12289: FND_API.G_RET_STS_UNEXP_ERROR,
12282: --use this attribute for place holder of status code. Because there are
12283: --no place holder for status on line_rec record type
12284: If (p_line_tbl(i).industry_attribute30) In
12285: (QP_PREQ_GRP.G_STATUS_INVALID_PRICE_LIST,
12286: QP_PREQ_GRP.G_STS_LHS_NOT_FOUND,
12287: QP_PREQ_GRP.G_STATUS_FORMULA_ERROR,
12288: QP_PREQ_GRP.G_STATUS_OTHER_ERRORS,
12289: FND_API.G_RET_STS_UNEXP_ERROR,
12290: FND_API.G_RET_STS_ERROR,
12283: --no place holder for status on line_rec record type
12284: If (p_line_tbl(i).industry_attribute30) In
12285: (QP_PREQ_GRP.G_STATUS_INVALID_PRICE_LIST,
12286: QP_PREQ_GRP.G_STS_LHS_NOT_FOUND,
12287: QP_PREQ_GRP.G_STATUS_FORMULA_ERROR,
12288: QP_PREQ_GRP.G_STATUS_OTHER_ERRORS,
12289: FND_API.G_RET_STS_UNEXP_ERROR,
12290: FND_API.G_RET_STS_ERROR,
12291: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
12284: If (p_line_tbl(i).industry_attribute30) In
12285: (QP_PREQ_GRP.G_STATUS_INVALID_PRICE_LIST,
12286: QP_PREQ_GRP.G_STS_LHS_NOT_FOUND,
12287: QP_PREQ_GRP.G_STATUS_FORMULA_ERROR,
12288: QP_PREQ_GRP.G_STATUS_OTHER_ERRORS,
12289: FND_API.G_RET_STS_UNEXP_ERROR,
12290: FND_API.G_RET_STS_ERROR,
12291: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
12292: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
12287: QP_PREQ_GRP.G_STATUS_FORMULA_ERROR,
12288: QP_PREQ_GRP.G_STATUS_OTHER_ERRORS,
12289: FND_API.G_RET_STS_UNEXP_ERROR,
12290: FND_API.G_RET_STS_ERROR,
12291: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
12292: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
12293: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
12294: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
12295: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
12288: QP_PREQ_GRP.G_STATUS_OTHER_ERRORS,
12289: FND_API.G_RET_STS_UNEXP_ERROR,
12290: FND_API.G_RET_STS_ERROR,
12291: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
12292: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
12293: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
12294: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
12295: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
12296: QP_PREQ_GRP.G_STATUS_INVALID_INCOMP,
12289: FND_API.G_RET_STS_UNEXP_ERROR,
12290: FND_API.G_RET_STS_ERROR,
12291: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
12292: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
12293: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
12294: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
12295: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
12296: QP_PREQ_GRP.G_STATUS_INVALID_INCOMP,
12297: QP_PREQ_GRP.G_STATUS_BEST_PRICE_EVAL_ERROR
12290: FND_API.G_RET_STS_ERROR,
12291: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
12292: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
12293: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
12294: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
12295: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
12296: QP_PREQ_GRP.G_STATUS_INVALID_INCOMP,
12297: QP_PREQ_GRP.G_STATUS_BEST_PRICE_EVAL_ERROR
12298: ) Then
12291: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
12292: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
12293: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
12294: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
12295: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
12296: QP_PREQ_GRP.G_STATUS_INVALID_INCOMP,
12297: QP_PREQ_GRP.G_STATUS_BEST_PRICE_EVAL_ERROR
12298: ) Then
12299:
12292: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
12293: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
12294: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
12295: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
12296: QP_PREQ_GRP.G_STATUS_INVALID_INCOMP,
12297: QP_PREQ_GRP.G_STATUS_BEST_PRICE_EVAL_ERROR
12298: ) Then
12299:
12300: x_quote_line_tbl(i).Status_Code:= p_line_tbl(i).industry_attribute30;
12293: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
12294: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
12295: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
12296: QP_PREQ_GRP.G_STATUS_INVALID_INCOMP,
12297: QP_PREQ_GRP.G_STATUS_BEST_PRICE_EVAL_ERROR
12298: ) Then
12299:
12300: x_quote_line_tbl(i).Status_Code:= p_line_tbl(i).industry_attribute30;
12301: --DBMS_OUTPUT.PUT_LINE('+++F++:'||x_quote_line_tbl(i).Status_Code);
12321: x_return_status_text out nocopy Varchar2) As
12322:
12323:
12324: l_line_tbl Oe_Order_Pub.line_tbl_type;
12325: l_control_rec Qp_Preq_Grp.control_record_type;
12326: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12327: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12328: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12329: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12322:
12323:
12324: l_line_tbl Oe_Order_Pub.line_tbl_type;
12325: l_control_rec Qp_Preq_Grp.control_record_type;
12326: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12327: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12328: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12329: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12330: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12323:
12324: l_line_tbl Oe_Order_Pub.line_tbl_type;
12325: l_control_rec Qp_Preq_Grp.control_record_type;
12326: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12327: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12328: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12329: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12330: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12331: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12324: l_line_tbl Oe_Order_Pub.line_tbl_type;
12325: l_control_rec Qp_Preq_Grp.control_record_type;
12326: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12327: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12328: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12329: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12330: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12331: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12332: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12325: l_control_rec Qp_Preq_Grp.control_record_type;
12326: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12327: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12328: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12329: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12330: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12331: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12332: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12333: l_any_frozen_line Boolean;
12326: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12327: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12328: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12329: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12330: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12331: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12332: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12333: l_any_frozen_line Boolean;
12334: l_hdr_rec Oe_Order_Pub.Header_Rec_Type;
12327: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12328: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12329: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12330: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12331: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12332: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12333: l_any_frozen_line Boolean;
12334: l_hdr_rec Oe_Order_Pub.Header_Rec_Type;
12335: l_stmt Varchar2(50);
12328: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12329: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12330: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12331: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12332: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12333: l_any_frozen_line Boolean;
12334: l_hdr_rec Oe_Order_Pub.Header_Rec_Type;
12335: l_stmt Varchar2(50);
12336: i PLS_INTEGER;
12341:
12342: --getting a quote is always a batch event
12343: l_control_rec.pricing_event := p_event;
12344:
12345: l_control_rec.calculate_flag := QP_PREQ_GRP.G_SEARCH_N_CALCULATE;
12346: l_control_rec.simulation_Flag := 'N';
12347: l_stmt := 'quote 1';
12348: calculate_adjustments
12349: (x_return_status =>x_return_status ,
12521: l_line_tbl oe_Order_Pub.Line_tbl_Type;
12522: l_line_rec oe_order_pub.line_rec_type;
12523: l_pricing_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
12524: l_qualifier_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
12525: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12526: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12527: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12528: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12529: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12522: l_line_rec oe_order_pub.line_rec_type;
12523: l_pricing_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
12524: l_qualifier_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
12525: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12526: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12527: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12528: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12529: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12530: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12523: l_pricing_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
12524: l_qualifier_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
12525: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12526: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12527: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12528: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12529: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12530: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12531: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12524: l_qualifier_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
12525: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12526: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12527: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12528: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12529: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12530: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12531: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12532: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12525: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12526: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12527: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12528: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12529: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12530: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12531: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12532: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12533: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12526: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12527: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12528: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12529: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12530: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12531: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12532: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12533: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12534: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12527: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12528: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12529: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12530: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12531: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12532: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12533: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12534: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12535: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12528: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12529: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12530: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12531: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12532: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12533: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12534: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12535: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12536: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12529: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12530: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12531: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12532: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12533: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12534: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12535: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12536: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12537: lx_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12530: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12531: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12532: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12533: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12534: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12535: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12536: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12537: lx_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12538: lx_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12531: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12532: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12533: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12534: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12535: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12536: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12537: lx_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12538: lx_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12539: l_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE;
12532: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12533: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12534: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12535: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12536: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12537: lx_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12538: lx_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12539: l_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE;
12540: l_event Varchar2(30) Default 'BATCH';
12533: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12534: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12535: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12536: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12537: lx_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12538: lx_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12539: l_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE;
12540: l_event Varchar2(30) Default 'BATCH';
12541: l_return_status Varchar2(10);
12534: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12535: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12536: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12537: lx_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12538: lx_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12539: l_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE;
12540: l_event Varchar2(30) Default 'BATCH';
12541: l_return_status Varchar2(10);
12542: l_return_status_text Varchar2(240);
12535: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12536: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12537: lx_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12538: lx_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12539: l_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE;
12540: l_event Varchar2(30) Default 'BATCH';
12541: l_return_status Varchar2(10);
12542: l_return_status_text Varchar2(240);
12543: i PLS_INTEGER;
12577: ld.pricing_group_sequence
12578: from QP_PREQ_LINES_TMP l, QP_PREQ_LDETS_TMP ld, QP_LIST_LINES ll
12579: where l.line_index = ld.line_index
12580: and ld.CREATED_FROM_LIST_LINE_ID = ll.LIST_LINE_ID
12581: and ld.PRICING_STATUS_CODE = QP_PREQ_GRP.G_STATUS_NEW
12582: ORDER BY ld.list_line_no; -- bug 6323362
12583:
12584: --bucket man
12585: Begin
12928: l_control_rec.request_type_code := 'ONT';
12929: l_control_rec.temp_table_insert_flag := 'N';
12930: END IF;
12931: l_control_rec.pricing_event := l_event;
12932: l_control_rec.calculate_flag:= qp_preq_grp.G_SEARCH_N_CALCULATE;
12933: l_control_rec.manual_adjustments_call_flag:=qp_preq_grp.G_YES;
12934: --Will need to do the same thing for header level manual adjustment
12935: -- sgowtham
12936: if( p_freight_flag = TRUE) then
12929: l_control_rec.temp_table_insert_flag := 'N';
12930: END IF;
12931: l_control_rec.pricing_event := l_event;
12932: l_control_rec.calculate_flag:= qp_preq_grp.G_SEARCH_N_CALCULATE;
12933: l_control_rec.manual_adjustments_call_flag:=qp_preq_grp.G_YES;
12934: --Will need to do the same thing for header level manual adjustment
12935: -- sgowtham
12936: if( p_freight_flag = TRUE) then
12937: l_control_rec.GET_FREIGHT_FLAG := 'Y';
12945: ,x_return_status =>l_return_status
12946: ,x_return_status_Text =>l_return_status_Text
12947: );
12948: ELSE
12949: QP_PREQ_GRP.PRICE_REQUEST
12950: (p_control_rec => l_control_rec
12951: ,p_line_tbl => l_Req_line_tbl
12952: ,p_qual_tbl => l_Req_qual_tbl
12953: ,p_line_attr_tbl => l_Req_line_attr_tbl
13000: )
13001:
13002: Then
13003: If (p_pbh_mode = 'CHILD' and nvl(k.line_quantity,0) > 0
13004: and k.line_detail_type_code = QP_PREQ_GRP.G_CHILD_DETAIL_TYPE)
13005: --Regular discount lines
13006: or (k.list_line_type_code <> 'PBH' AND
13007: k.line_detail_type_code <> QP_PREQ_GRP.G_CHILD_DETAIL_TYPE)
13008: --Price break header (parent)
13003: If (p_pbh_mode = 'CHILD' and nvl(k.line_quantity,0) > 0
13004: and k.line_detail_type_code = QP_PREQ_GRP.G_CHILD_DETAIL_TYPE)
13005: --Regular discount lines
13006: or (k.list_line_type_code <> 'PBH' AND
13007: k.line_detail_type_code <> QP_PREQ_GRP.G_CHILD_DETAIL_TYPE)
13008: --Price break header (parent)
13009: or (p_pbh_mode = 'PARENT' and k.list_line_type_code = 'PBH')
13010: Then
13011: If p_called_from = 'SO' Then
13074: )
13075:
13076: Then
13077: If (p_pbh_mode = 'CHILD' and nvl(lx_req_line_detail_tbl(i).line_quantity,0) > 0
13078: and lx_req_line_detail_tbl(i).line_detail_type_code = QP_PREQ_GRP.G_CHILD_DETAIL_TYPE)
13079: --Regular discount lines
13080: or (lx_req_line_detail_tbl(i).list_line_type_code <> 'PBH' AND
13081: lx_req_line_detail_tbl(i).line_detail_type_code <> QP_PREQ_GRP.G_CHILD_DETAIL_TYPE)
13082: --Price break header (parent)
13077: If (p_pbh_mode = 'CHILD' and nvl(lx_req_line_detail_tbl(i).line_quantity,0) > 0
13078: and lx_req_line_detail_tbl(i).line_detail_type_code = QP_PREQ_GRP.G_CHILD_DETAIL_TYPE)
13079: --Regular discount lines
13080: or (lx_req_line_detail_tbl(i).list_line_type_code <> 'PBH' AND
13081: lx_req_line_detail_tbl(i).line_detail_type_code <> QP_PREQ_GRP.G_CHILD_DETAIL_TYPE)
13082: --Price break header (parent)
13083: or (p_pbh_mode = 'PARENT' and lx_req_line_detail_tbl(i).list_line_type_code = 'PBH')
13084: Then
13085: x_manual_adj_tbl(i).modifier_number:=lx_req_line_detail_tbl(i).list_line_no;