[Home] [Help]
4138: end Get_Rounding_factor;
4139:
4140: procedure copy_Header_to_request(
4141: p_header_rec OE_Order_PUB.Header_Rec_Type
4142: ,px_req_line_tbl in out nocopy QP_PREQ_GRP.LINE_TBL_TYPE
4143: --,p_pricing_event varchar2
4144: ,p_Request_Type_Code varchar2
4145: ,p_calculate_price_flag varchar2
4146: )
4183: end copy_Header_to_request;
4184:
4185: procedure copy_Line_to_request(
4186: p_Line_rec OE_Order_PUB.Line_Rec_Type
4187: ,px_req_line_tbl in out nocopy QP_PREQ_GRP.LINE_TBL_TYPE
4188: ,p_pricing_event varchar2
4189: ,p_Request_Type_Code varchar2
4190: ,p_honor_price_flag VARCHAR2 Default 'Y'
4191: )
4405: procedure copy_adjs_to_request(
4406: p_line_index pls_integer
4407: ,p_adj_index pls_integer
4408: ,p_Line_adj_rec OE_Order_PUB.Line_Adj_Rec_Type
4409: ,px_Req_LINE_DETAIL_tbl in out nocopy QP_PREQ_GRP.LINE_DETAIL_tbl_Type
4410: )
4411: is
4412: l_RLD_Index pls_integer := p_adj_index;
4413: begin
4455: procedure copy_attribs_to_Req(
4456: p_line_index number
4457: ,p_pricing_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type
4458: ,p_qualifier_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type
4459: ,px_Req_line_attr_tbl in out nocopy QP_PREQ_GRP.LINE_ATTR_TBL_TYPE
4460: ,px_Req_qual_tbl in out nocopy QP_PREQ_GRP.QUAL_TBL_TYPE
4461: )
4462: is
4463: i pls_integer := 0;
4456: p_line_index number
4457: ,p_pricing_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type
4458: ,p_qualifier_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type
4459: ,px_Req_line_attr_tbl in out nocopy QP_PREQ_GRP.LINE_ATTR_TBL_TYPE
4460: ,px_Req_qual_tbl in out nocopy QP_PREQ_GRP.QUAL_TBL_TYPE
4461: )
4462: is
4463: i pls_integer := 0;
4464: l_attr_index pls_integer := nvl(px_Req_line_attr_tbl.last,0);
4547: procedure Append_asked_for(
4548: p_header_id number default null
4549: ,p_Line_id number default null
4550: ,p_line_index number
4551: ,px_Req_line_attr_tbl in out nocopy QP_PREQ_GRP.LINE_ATTR_TBL_TYPE
4552: ,px_Req_qual_tbl in out nocopy QP_PREQ_GRP.QUAL_TBL_TYPE
4553: )
4554: is
4555: i pls_integer;
4548: p_header_id number default null
4549: ,p_Line_id number default null
4550: ,p_line_index number
4551: ,px_Req_line_attr_tbl in out nocopy QP_PREQ_GRP.LINE_ATTR_TBL_TYPE
4552: ,px_Req_qual_tbl in out nocopy QP_PREQ_GRP.QUAL_TBL_TYPE
4553: )
4554: is
4555: i pls_integer;
4556: -- Using union all to eliminate sort unique
5465: end Append_asked_for;
5466:
5467: procedure Get_the_parent_Line(p_Reference_line_Id Number,
5468: px_Line_Tbl in out nocopy OE_Order_Pub.Line_Tbl_Type,
5469: px_Req_related_lines_tbl in out nocopy QP_PREQ_GRP.Related_Lines_Tbl_Type,
5470: p_line_Tbl_index Number)
5471: is
5472: l_Line_Rec OE_Order_Pub.Line_Rec_Type;
5473: line_Tbl_Index pls_integer;
5504: l_related_lines_Index := px_Req_related_lines_tbl.count+1;
5505: px_Req_related_lines_tbl(l_related_lines_Index).Line_Index := line_Tbl_index;
5506: px_Req_related_lines_tbl(l_related_lines_Index).Related_Line_Index := p_line_Tbl_index;
5507: px_Req_related_lines_tbl(l_related_lines_Index).Relationship_Type_Code
5508: := QP_PREQ_GRP.G_SERVICE_LINE;
5509:
5510: adj_debug('Exiting oe_order_Adj_pvt.Get_the_parent_Line',1);
5511:
5512: End Get_the_parent_Line;
5512: End Get_the_parent_Line;
5513:
5514: procedure set_item_for_iue(
5515: px_line_rec in out nocopy OE_Order_PUB.line_rec_type
5516: ,p_req_line_detail_rec QP_PREQ_GRP.line_detail_rec_type
5517: )
5518: is
5519: -- This change is required since we are dropping the profile OE_ORGANIZATION -- _ID. Change made by Esha.
5520: /*l_org_id NUMBER := FND_PROFILE.Value('OE_ORGANIZATION_ID');*/
5600:
5601: p_line_id number default null,
5602: p_header_id number Default null,
5603: p_Request_Type_Code varchar2 ,
5604: p_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE,
5605: x_req_line_tbl out nocopy QP_PREQ_GRP.LINE_TBL_TYPE,
5606: x_Req_qual_tbl out nocopy QP_PREQ_GRP.QUAL_TBL_TYPE,
5607: x_Req_line_attr_tbl out nocopy QP_PREQ_GRP.LINE_ATTR_TBL_TYPE,
5608: x_Req_LINE_DETAIL_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE,
5601: p_line_id number default null,
5602: p_header_id number Default null,
5603: p_Request_Type_Code varchar2 ,
5604: p_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE,
5605: x_req_line_tbl out nocopy QP_PREQ_GRP.LINE_TBL_TYPE,
5606: x_Req_qual_tbl out nocopy QP_PREQ_GRP.QUAL_TBL_TYPE,
5607: x_Req_line_attr_tbl out nocopy QP_PREQ_GRP.LINE_ATTR_TBL_TYPE,
5608: x_Req_LINE_DETAIL_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE,
5609: x_Req_LINE_DETAIL_qual_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE,
5602: p_header_id number Default null,
5603: p_Request_Type_Code varchar2 ,
5604: p_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE,
5605: x_req_line_tbl out nocopy QP_PREQ_GRP.LINE_TBL_TYPE,
5606: x_Req_qual_tbl out nocopy QP_PREQ_GRP.QUAL_TBL_TYPE,
5607: x_Req_line_attr_tbl out nocopy QP_PREQ_GRP.LINE_ATTR_TBL_TYPE,
5608: x_Req_LINE_DETAIL_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE,
5609: x_Req_LINE_DETAIL_qual_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE,
5610: x_Req_LINE_DETAIL_attr_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE,
5603: p_Request_Type_Code varchar2 ,
5604: p_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE,
5605: x_req_line_tbl out nocopy QP_PREQ_GRP.LINE_TBL_TYPE,
5606: x_Req_qual_tbl out nocopy QP_PREQ_GRP.QUAL_TBL_TYPE,
5607: x_Req_line_attr_tbl out nocopy QP_PREQ_GRP.LINE_ATTR_TBL_TYPE,
5608: x_Req_LINE_DETAIL_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE,
5609: x_Req_LINE_DETAIL_qual_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE,
5610: x_Req_LINE_DETAIL_attr_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE,
5611: x_Req_related_lines_tbl out nocopy QP_PREQ_GRP.RELATED_LINES_TBL_TYPE,
5604: p_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE,
5605: x_req_line_tbl out nocopy QP_PREQ_GRP.LINE_TBL_TYPE,
5606: x_Req_qual_tbl out nocopy QP_PREQ_GRP.QUAL_TBL_TYPE,
5607: x_Req_line_attr_tbl out nocopy QP_PREQ_GRP.LINE_ATTR_TBL_TYPE,
5608: x_Req_LINE_DETAIL_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE,
5609: x_Req_LINE_DETAIL_qual_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE,
5610: x_Req_LINE_DETAIL_attr_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE,
5611: x_Req_related_lines_tbl out nocopy QP_PREQ_GRP.RELATED_LINES_TBL_TYPE,
5612: p_use_current_header in Boolean Default FALSE
5605: x_req_line_tbl out nocopy QP_PREQ_GRP.LINE_TBL_TYPE,
5606: x_Req_qual_tbl out nocopy QP_PREQ_GRP.QUAL_TBL_TYPE,
5607: x_Req_line_attr_tbl out nocopy QP_PREQ_GRP.LINE_ATTR_TBL_TYPE,
5608: x_Req_LINE_DETAIL_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE,
5609: x_Req_LINE_DETAIL_qual_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE,
5610: x_Req_LINE_DETAIL_attr_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE,
5611: x_Req_related_lines_tbl out nocopy QP_PREQ_GRP.RELATED_LINES_TBL_TYPE,
5612: p_use_current_header in Boolean Default FALSE
5613: --if use_current_header set to true, it will not set the header info
5606: x_Req_qual_tbl out nocopy QP_PREQ_GRP.QUAL_TBL_TYPE,
5607: x_Req_line_attr_tbl out nocopy QP_PREQ_GRP.LINE_ATTR_TBL_TYPE,
5608: x_Req_LINE_DETAIL_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE,
5609: x_Req_LINE_DETAIL_qual_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE,
5610: x_Req_LINE_DETAIL_attr_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE,
5611: x_Req_related_lines_tbl out nocopy QP_PREQ_GRP.RELATED_LINES_TBL_TYPE,
5612: p_use_current_header in Boolean Default FALSE
5613: --if use_current_header set to true, it will not set the header info
5614: --and it will use current header information set by the caller.
5607: x_Req_line_attr_tbl out nocopy QP_PREQ_GRP.LINE_ATTR_TBL_TYPE,
5608: x_Req_LINE_DETAIL_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE,
5609: x_Req_LINE_DETAIL_qual_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE,
5610: x_Req_LINE_DETAIL_attr_tbl out nocopy QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE,
5611: x_Req_related_lines_tbl out nocopy QP_PREQ_GRP.RELATED_LINES_TBL_TYPE,
5612: p_use_current_header in Boolean Default FALSE
5613: --if use_current_header set to true, it will not set the header info
5614: --and it will use current header information set by the caller.
5615: --It is useful when getting a quote where header_id is not available.
5635: i2 PLS_INTEGER;
5636: l_all_lines_from_db Boolean :=False;
5637:
5638: l_Line_Rec OE_Order_PUB.Line_Rec_Type;
5639: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
5640: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
5641: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5642: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5643: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5636: l_all_lines_from_db Boolean :=False;
5637:
5638: l_Line_Rec OE_Order_PUB.Line_Rec_Type;
5639: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
5640: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
5641: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5642: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5643: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5644: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
5637:
5638: l_Line_Rec OE_Order_PUB.Line_Rec_Type;
5639: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
5640: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
5641: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5642: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5643: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5644: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
5645: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
5638: l_Line_Rec OE_Order_PUB.Line_Rec_Type;
5639: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
5640: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
5641: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5642: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5643: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5644: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
5645: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
5646: l_pricing_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5639: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
5640: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
5641: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5642: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5643: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5644: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
5645: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
5646: l_pricing_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5647: l_qualifier_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5640: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
5641: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5642: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5643: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5644: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
5645: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
5646: l_pricing_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5647: l_qualifier_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5648: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
5641: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5642: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5643: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5644: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
5645: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
5646: l_pricing_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5647: l_qualifier_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5648: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
5649: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
5644: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
5645: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
5646: l_pricing_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5647: l_qualifier_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5648: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
5649: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
5650: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5651: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5652: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5645: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
5646: l_pricing_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5647: l_qualifier_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5648: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
5649: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
5650: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5651: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5652: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5653: lx_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
5646: l_pricing_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5647: l_qualifier_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5648: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
5649: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
5650: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5651: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5652: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5653: lx_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
5654: lx_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
5647: l_qualifier_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
5648: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
5649: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
5650: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5651: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5652: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5653: lx_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
5654: lx_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
5655: Process_Service_Lines Boolean := FALSE;
5648: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
5649: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
5650: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5651: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5652: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5653: lx_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
5654: lx_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
5655: Process_Service_Lines Boolean := FALSE;
5656: l_related_lines_Index pls_integer;
5649: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
5650: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5651: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5652: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5653: lx_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
5654: lx_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
5655: Process_Service_Lines Boolean := FALSE;
5656: l_related_lines_Index pls_integer;
5657: line_tbl_index pls_integer;
5650: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
5651: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
5652: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
5653: lx_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
5654: lx_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
5655: Process_Service_Lines Boolean := FALSE;
5656: l_related_lines_Index pls_integer;
5657: line_tbl_index pls_integer;
5658: i pls_integer;
5665: /* Variables added for bug 1828553 */
5666: l_order_line_id number;
5667: l_service_reference_line_id number;
5668: --btea begin
5669: l_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE;
5670: --btea end
5671: -- Variable for Bug 2124989
5672: l_agreement_name varchar2(240);
5673: l_revision varchar2(50);
6280:
6281: End If; --g_debug
6282:
6283: G_STMT_NO := 'calculate_adjustments#160';
6284: adj_debug('Before QP_PREQ_GRP.PRICE_REQUEST',1);
6285:
6286: --btea begin
6287: l_control_rec := p_control_rec;
6288:
6294: l_set_of_books := Oe_Order_Cache.Load_Set_Of_Books;
6295: l_control_rec.FUNCTION_CURRENCY := l_set_of_books.currency_code;
6296:
6297: G_STMT_NO := 'QP_PRICE_REQUEST_GRP';
6298: QP_PREQ_GRP.PRICE_REQUEST
6299: (p_control_rec => l_control_rec
6300: ,p_line_tbl => l_Req_line_tbl
6301: ,p_qual_tbl => l_Req_qual_tbl
6302: ,p_line_attr_tbl => l_Req_line_attr_tbl
6431: end calculate_adjustments;
6432:
6433: Function Update_Adj_Line_rec(
6434: p_Line_Adj_Rec in out nocopy OE_Order_Pub.Line_Adj_Rec_Type
6435: ,p_req_line_detail_Rec qp_preq_grp.line_detail_rec_type
6436: )
6437: Return Boolean
6438: is
6439: l_updated_Flag Boolean := False;
6729:
6730: Procedure Find_Duplicate_Adj_Lines(
6731: p_header_Id Number default null
6732: ,p_Line_id Number default null
6733: ,p_req_line_detail_Rec qp_preq_grp.line_detail_rec_type
6734: ,px_Line_Adj_Tbl in out nocopy OE_Order_Pub.Line_Adj_Tbl_Type
6735: ,X_Adj_Index out nocopy Number
6736:
6737: ,p_mode in Varchar2
7189: End Query_Adj_Attribs;
7190:
7191: Procedure Find_Duplicate_Adj_Attribs(
7192: p_Req_Line_Detail_Qual_Rec
7193: QP_PREQ_GRP.Line_Detail_Qual_Rec_Type,
7194: p_Req_Line_Detail_Attr_Rec
7195: QP_PREQ_GRP.Line_Detail_Attr_Rec_Type,
7196: p_Adj_index Number,
7197: p_Line_Adj_Att_Tbl in out nocopy OE_Order_Pub.Line_Adj_Att_Tbl_Type,
7191: Procedure Find_Duplicate_Adj_Attribs(
7192: p_Req_Line_Detail_Qual_Rec
7193: QP_PREQ_GRP.Line_Detail_Qual_Rec_Type,
7194: p_Req_Line_Detail_Attr_Rec
7195: QP_PREQ_GRP.Line_Detail_Attr_Rec_Type,
7196: p_Adj_index Number,
7197: p_Line_Adj_Att_Tbl in out nocopy OE_Order_Pub.Line_Adj_Att_Tbl_Type,
7198: p_att_type Varchar2,
7199: p_price_adjustment_id Number
7319:
7320: Function Match_Product_Ids(
7321: p_price_Adjustment_Id Number,
7322: p_Line_Detail_Index Number ,
7323: p_Req_line_detail_Attr_Tbl QP_PREQ_GRP.line_detail_Attr_Tbl_Type
7324: )
7325: Return Boolean
7326: is
7327: l_inventory_item_id Varchar2(240);
7365: End Match_Product_Ids;
7366:
7367: Procedure Process_Other_Item_Line (
7368: p_Line_Detail_Index Number
7369: ,p_req_line_Tbl QP_PREQ_GRP.LINE_TBL_TYPE
7370: ,p_req_line_detail_Tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE
7371: ,p_Req_line_detail_Attr_Tbl QP_PREQ_GRP.line_detail_Attr_Tbl_Type
7372: ,p_Price_Adjustment_Id Number
7373: ,p_Header_Id Number
7366:
7367: Procedure Process_Other_Item_Line (
7368: p_Line_Detail_Index Number
7369: ,p_req_line_Tbl QP_PREQ_GRP.LINE_TBL_TYPE
7370: ,p_req_line_detail_Tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE
7371: ,p_Req_line_detail_Attr_Tbl QP_PREQ_GRP.line_detail_Attr_Tbl_Type
7372: ,p_Price_Adjustment_Id Number
7373: ,p_Header_Id Number
7374: ,p_Parent_Adj_Index Number
7367: Procedure Process_Other_Item_Line (
7368: p_Line_Detail_Index Number
7369: ,p_req_line_Tbl QP_PREQ_GRP.LINE_TBL_TYPE
7370: ,p_req_line_detail_Tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE
7371: ,p_Req_line_detail_Attr_Tbl QP_PREQ_GRP.line_detail_Attr_Tbl_Type
7372: ,p_Price_Adjustment_Id Number
7373: ,p_Header_Id Number
7374: ,p_Parent_Adj_Index Number
7375: ,p_parent_line_index Number
8210: x_Adjusted_Amount := - p_bucketed_price + p_operand;
8211:
8212: Elsif p_arithmetic_operator = 'LUMPSUM' then
8213: --
8214: IF (p_modifier_level_code = QP_PREQ_GRP.G_LINE_GROUP) THEN
8215: --
8216: -- p_modifier_level_code = 'LINEGROUP'
8217: --
8218: adj_debug('LINEGROUP');
8417:
8418: adj_debug('First Time Adj Amount: ' || p_Line_Adj_Tbl(j).Adjusted_Amount_Per_Pqty,3);
8419: --reset adj amount for parent PBH.
8420: --will be recalculated.
8421: If p_line_adj_tbl(j).price_break_type_code = QP_PREQ_GRP.G_RANGE_BREAK Then
8422: p_Line_Adj_Tbl(j).adjusted_amount_per_pqty:=0;
8423: End If;
8424: oe_debug_pub.add('xNo of assoc in assoc_tbl:'|| p_line_adj_assoc_Tbl.count);
8425: J1 := p_line_adj_assoc_Tbl.First;
8506: END IF;
8507:
8508: G_STMT_NO := 'Calculate_Price#50';
8509:
8510: If p_Line_Adj_Tbl(j).Price_break_Type_Code = QP_PREQ_GRP.G_RANGE_BREAK Then
8511: l_pricing_quantity := p_line_adj_tbl(j2).Range_Break_Quantity;
8512:
8513: Else
8514: l_pricing_quantity := p_line_tbl(i).pricing_quantity;
8527: NULL;
8528: ELSE
8529: --For bug 2874499.
8530: If (p_Line_Adj_Tbl(j2).Arithmetic_operator = 'LUMPSUM'
8531: and p_line_adj_tbl(j2).modifier_level_code = QP_PREQ_GRP.G_LINE_GROUP and
8532: p_line_adj_tbl(j2).automatic_flag = 'N')then
8533: p_line_adj_tbl(j2).group_value := 1;
8534: end if ;
8535: CAlculate_Adjusted_Price(
8545: );
8546: END IF;
8547:
8548: G_STMT_NO := 'Calculate_Price#60';
8549: If p_Line_Adj_Tbl(j).Price_break_Type_Code = QP_PREQ_GRP.G_RANGE_BREAK Then
8550: If nvl(p_Line_Adj_Tbl(j).Adjusted_Amount_Per_Pqty,FND_API.G_MISS_NUM)=FND_API.G_MISS_NUM Then
8551: p_Line_Adj_Tbl(j).Adjusted_Amount_Per_Pqty:=0;
8552: End If;
8553:
8577: End If; -- J1 if
8578: J1 := p_line_adj_assoc_Tbl.Next(J1);
8579: End loop; -- J1
8580:
8581: If p_Line_Adj_Tbl(j).Price_Break_Type_Code = QP_PREQ_GRP.G_RANGE_BREAK Then
8582: oe_debug_pub.add('xAdj_amt_pqty:'||p_line_adj_tbl(j).adjusted_amount_per_pqty);
8583: if p_line_adj_tbl(j).range_break_quantity is null and l_total_quantity > 0
8584: then --bug 2813670
8585: oe_debug_pub.add('Value of l_tot_qty :'||l_total_quantity);
8650:
8651: ELSE
8652: --For bug 2874499.
8653: If (p_Line_Adj_Tbl(j).Arithmetic_operator = 'LUMPSUM'
8654: and p_line_adj_tbl(j).modifier_level_code = QP_PREQ_GRP.G_LINE_GROUP and
8655: p_line_adj_tbl(j).automatic_flag = 'N')then
8656: p_line_adj_tbl(j).group_value := 1;
8657: end if ;
8658:
9073: (
9074: p_request_type_code varchar2,
9075: x_return_status out nocopy Varchar2,
9076:
9077: p_Req_Control_Rec QP_PREQ_GRP.Control_record_type,
9078: p_req_line_tbl QP_PREQ_GRP.line_tbl_type,
9079: p_Req_qual_tbl QP_PREQ_GRP.qual_tbl_type,
9080: p_Req_line_attr_tbl QP_PREQ_GRP.line_attr_tbl_type,
9081: p_Req_Line_Detail_tbl QP_PREQ_GRP.line_detail_tbl_type,
9074: p_request_type_code varchar2,
9075: x_return_status out nocopy Varchar2,
9076:
9077: p_Req_Control_Rec QP_PREQ_GRP.Control_record_type,
9078: p_req_line_tbl QP_PREQ_GRP.line_tbl_type,
9079: p_Req_qual_tbl QP_PREQ_GRP.qual_tbl_type,
9080: p_Req_line_attr_tbl QP_PREQ_GRP.line_attr_tbl_type,
9081: p_Req_Line_Detail_tbl QP_PREQ_GRP.line_detail_tbl_type,
9082: p_Req_Line_Detail_Qual_tbl QP_PREQ_GRP.line_detail_qual_tbl_type,
9075: x_return_status out nocopy Varchar2,
9076:
9077: p_Req_Control_Rec QP_PREQ_GRP.Control_record_type,
9078: p_req_line_tbl QP_PREQ_GRP.line_tbl_type,
9079: p_Req_qual_tbl QP_PREQ_GRP.qual_tbl_type,
9080: p_Req_line_attr_tbl QP_PREQ_GRP.line_attr_tbl_type,
9081: p_Req_Line_Detail_tbl QP_PREQ_GRP.line_detail_tbl_type,
9082: p_Req_Line_Detail_Qual_tbl QP_PREQ_GRP.line_detail_qual_tbl_type,
9083: p_Req_Line_Detail_Attr_tbl QP_PREQ_GRP.line_detail_attr_tbl_type,
9076:
9077: p_Req_Control_Rec QP_PREQ_GRP.Control_record_type,
9078: p_req_line_tbl QP_PREQ_GRP.line_tbl_type,
9079: p_Req_qual_tbl QP_PREQ_GRP.qual_tbl_type,
9080: p_Req_line_attr_tbl QP_PREQ_GRP.line_attr_tbl_type,
9081: p_Req_Line_Detail_tbl QP_PREQ_GRP.line_detail_tbl_type,
9082: p_Req_Line_Detail_Qual_tbl QP_PREQ_GRP.line_detail_qual_tbl_type,
9083: p_Req_Line_Detail_Attr_tbl QP_PREQ_GRP.line_detail_attr_tbl_type,
9084: p_Req_related_lines_tbl QP_PREQ_GRP.related_lines_tbl_type
9077: p_Req_Control_Rec QP_PREQ_GRP.Control_record_type,
9078: p_req_line_tbl QP_PREQ_GRP.line_tbl_type,
9079: p_Req_qual_tbl QP_PREQ_GRP.qual_tbl_type,
9080: p_Req_line_attr_tbl QP_PREQ_GRP.line_attr_tbl_type,
9081: p_Req_Line_Detail_tbl QP_PREQ_GRP.line_detail_tbl_type,
9082: p_Req_Line_Detail_Qual_tbl QP_PREQ_GRP.line_detail_qual_tbl_type,
9083: p_Req_Line_Detail_Attr_tbl QP_PREQ_GRP.line_detail_attr_tbl_type,
9084: p_Req_related_lines_tbl QP_PREQ_GRP.related_lines_tbl_type
9085: ,p_write_to_db Boolean
9078: p_req_line_tbl QP_PREQ_GRP.line_tbl_type,
9079: p_Req_qual_tbl QP_PREQ_GRP.qual_tbl_type,
9080: p_Req_line_attr_tbl QP_PREQ_GRP.line_attr_tbl_type,
9081: p_Req_Line_Detail_tbl QP_PREQ_GRP.line_detail_tbl_type,
9082: p_Req_Line_Detail_Qual_tbl QP_PREQ_GRP.line_detail_qual_tbl_type,
9083: p_Req_Line_Detail_Attr_tbl QP_PREQ_GRP.line_detail_attr_tbl_type,
9084: p_Req_related_lines_tbl QP_PREQ_GRP.related_lines_tbl_type
9085: ,p_write_to_db Boolean
9086: ,p_any_frozen_line in Boolean
9079: p_Req_qual_tbl QP_PREQ_GRP.qual_tbl_type,
9080: p_Req_line_attr_tbl QP_PREQ_GRP.line_attr_tbl_type,
9081: p_Req_Line_Detail_tbl QP_PREQ_GRP.line_detail_tbl_type,
9082: p_Req_Line_Detail_Qual_tbl QP_PREQ_GRP.line_detail_qual_tbl_type,
9083: p_Req_Line_Detail_Attr_tbl QP_PREQ_GRP.line_detail_attr_tbl_type,
9084: p_Req_related_lines_tbl QP_PREQ_GRP.related_lines_tbl_type
9085: ,p_write_to_db Boolean
9086: ,p_any_frozen_line in Boolean
9087: ,x_line_Tbl in out nocopy oe_Order_Pub.Line_Tbl_Type
9080: p_Req_line_attr_tbl QP_PREQ_GRP.line_attr_tbl_type,
9081: p_Req_Line_Detail_tbl QP_PREQ_GRP.line_detail_tbl_type,
9082: p_Req_Line_Detail_Qual_tbl QP_PREQ_GRP.line_detail_qual_tbl_type,
9083: p_Req_Line_Detail_Attr_tbl QP_PREQ_GRP.line_detail_attr_tbl_type,
9084: p_Req_related_lines_tbl QP_PREQ_GRP.related_lines_tbl_type
9085: ,p_write_to_db Boolean
9086: ,p_any_frozen_line in Boolean
9087: ,x_line_Tbl in out nocopy oe_Order_Pub.Line_Tbl_Type
9088: ,p_header_rec oe_Order_Pub.header_rec_type
9089: ,p_multiple_events in Varchar2 Default 'N'
9090: ,p_honor_price_flag in Varchar2 Default 'Y' --bug 2503186
9091: )
9092: is
9093: l_Req_Line_Detail_qual_Rec QP_PREQ_GRP.line_detail_qual_rec_type;
9094: l_Req_Line_Detail_attr_Rec QP_PREQ_GRP.line_detail_attr_rec_type;
9095: l_req_line_rec qp_preq_grp.line_rec_type;
9096: l_control_rec Oe_Globals.Control_rec_type;
9097: l_header_rec oe_Order_Pub.header_rec_type := p_header_rec;
9090: ,p_honor_price_flag in Varchar2 Default 'Y' --bug 2503186
9091: )
9092: is
9093: l_Req_Line_Detail_qual_Rec QP_PREQ_GRP.line_detail_qual_rec_type;
9094: l_Req_Line_Detail_attr_Rec QP_PREQ_GRP.line_detail_attr_rec_type;
9095: l_req_line_rec qp_preq_grp.line_rec_type;
9096: l_control_rec Oe_Globals.Control_rec_type;
9097: l_header_rec oe_Order_Pub.header_rec_type := p_header_rec;
9098: --l_old_line_rec oe_order_pub.line_rec_type;
9091: )
9092: is
9093: l_Req_Line_Detail_qual_Rec QP_PREQ_GRP.line_detail_qual_rec_type;
9094: l_Req_Line_Detail_attr_Rec QP_PREQ_GRP.line_detail_attr_rec_type;
9095: l_req_line_rec qp_preq_grp.line_rec_type;
9096: l_control_rec Oe_Globals.Control_rec_type;
9097: l_header_rec oe_Order_Pub.header_rec_type := p_header_rec;
9098: --l_old_line_rec oe_order_pub.line_rec_type;
9099: l_line_rec oe_order_pub.line_rec_type;
9218: End If;
9219: adj_debug('The status code '||p_req_line_tbl(i).status_code);
9220: l_invalid_line := 'N';
9221: if p_req_line_tbl(i).line_Type_code ='LINE' and
9222: p_req_line_tbl(i).status_code in ( QP_PREQ_GRP.G_STATUS_INVALID_PRICE_LIST,
9223: QP_PREQ_GRP.G_STS_LHS_NOT_FOUND,
9224: QP_PREQ_GRP.G_STATUS_FORMULA_ERROR,
9225: QP_PREQ_GRP.G_STATUS_OTHER_ERRORS,
9226: FND_API.G_RET_STS_UNEXP_ERROR,
9219: adj_debug('The status code '||p_req_line_tbl(i).status_code);
9220: l_invalid_line := 'N';
9221: if p_req_line_tbl(i).line_Type_code ='LINE' and
9222: p_req_line_tbl(i).status_code in ( QP_PREQ_GRP.G_STATUS_INVALID_PRICE_LIST,
9223: QP_PREQ_GRP.G_STS_LHS_NOT_FOUND,
9224: QP_PREQ_GRP.G_STATUS_FORMULA_ERROR,
9225: QP_PREQ_GRP.G_STATUS_OTHER_ERRORS,
9226: FND_API.G_RET_STS_UNEXP_ERROR,
9227: FND_API.G_RET_STS_ERROR,
9220: l_invalid_line := 'N';
9221: if p_req_line_tbl(i).line_Type_code ='LINE' and
9222: p_req_line_tbl(i).status_code in ( QP_PREQ_GRP.G_STATUS_INVALID_PRICE_LIST,
9223: QP_PREQ_GRP.G_STS_LHS_NOT_FOUND,
9224: QP_PREQ_GRP.G_STATUS_FORMULA_ERROR,
9225: QP_PREQ_GRP.G_STATUS_OTHER_ERRORS,
9226: FND_API.G_RET_STS_UNEXP_ERROR,
9227: FND_API.G_RET_STS_ERROR,
9228: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
9221: if p_req_line_tbl(i).line_Type_code ='LINE' and
9222: p_req_line_tbl(i).status_code in ( QP_PREQ_GRP.G_STATUS_INVALID_PRICE_LIST,
9223: QP_PREQ_GRP.G_STS_LHS_NOT_FOUND,
9224: QP_PREQ_GRP.G_STATUS_FORMULA_ERROR,
9225: QP_PREQ_GRP.G_STATUS_OTHER_ERRORS,
9226: FND_API.G_RET_STS_UNEXP_ERROR,
9227: FND_API.G_RET_STS_ERROR,
9228: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
9229: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
9224: QP_PREQ_GRP.G_STATUS_FORMULA_ERROR,
9225: QP_PREQ_GRP.G_STATUS_OTHER_ERRORS,
9226: FND_API.G_RET_STS_UNEXP_ERROR,
9227: FND_API.G_RET_STS_ERROR,
9228: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
9229: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
9230: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
9231: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
9232: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
9225: QP_PREQ_GRP.G_STATUS_OTHER_ERRORS,
9226: FND_API.G_RET_STS_UNEXP_ERROR,
9227: FND_API.G_RET_STS_ERROR,
9228: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
9229: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
9230: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
9231: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
9232: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
9233: QP_PREQ_GRP.G_STATUS_INVALID_INCOMP,
9226: FND_API.G_RET_STS_UNEXP_ERROR,
9227: FND_API.G_RET_STS_ERROR,
9228: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
9229: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
9230: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
9231: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
9232: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
9233: QP_PREQ_GRP.G_STATUS_INVALID_INCOMP,
9234: QP_PREQ_GRP.G_STATUS_BEST_PRICE_EVAL_ERROR)
9227: FND_API.G_RET_STS_ERROR,
9228: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
9229: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
9230: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
9231: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
9232: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
9233: QP_PREQ_GRP.G_STATUS_INVALID_INCOMP,
9234: QP_PREQ_GRP.G_STATUS_BEST_PRICE_EVAL_ERROR)
9235: then
9228: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
9229: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
9230: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
9231: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
9232: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
9233: QP_PREQ_GRP.G_STATUS_INVALID_INCOMP,
9234: QP_PREQ_GRP.G_STATUS_BEST_PRICE_EVAL_ERROR)
9235: then
9236: OE_MSG_PUB.set_msg_context
9229: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
9230: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
9231: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
9232: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
9233: QP_PREQ_GRP.G_STATUS_INVALID_INCOMP,
9234: QP_PREQ_GRP.G_STATUS_BEST_PRICE_EVAL_ERROR)
9235: then
9236: OE_MSG_PUB.set_msg_context
9237: ( p_entity_code => 'LINE'
9230: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
9231: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
9232: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
9233: QP_PREQ_GRP.G_STATUS_INVALID_INCOMP,
9234: QP_PREQ_GRP.G_STATUS_BEST_PRICE_EVAL_ERROR)
9235: then
9236: OE_MSG_PUB.set_msg_context
9237: ( p_entity_code => 'LINE'
9238: ,p_entity_id => l_line_rec.line_id
9256: Exception When No_data_found then
9257: l_price_list := l_line_rec.price_list_id;
9258: End;
9259:
9260: If p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STATUS_INVALID_PRICE_LIST then
9261: adj_debug('Invalid Item/Price List combination');
9262: If not G_IPL_ERRORS_TBL.exists(MOD(l_line_rec.line_id, G_BINARY_LIMIT)) -- Bug 8631297
9263: or (G_IPL_ERRORS_TBL.exists(MOD(l_line_rec.line_id, G_BINARY_LIMIT)) -- Bug 8631297
9264: and
9309: l_line_rec.unit_list_price:=NULL;
9310: l_line_rec.unit_selling_price_per_pqty :=NULL;
9311: l_line_rec.unit_list_price_per_pqty:=NULL;
9312:
9313: Elsif p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STS_LHS_NOT_FOUND Then
9314: adj_debug('Price List Not found');
9315: FND_MESSAGE.SET_NAME('ONT','ONT_NO_PRICE_LIST_FOUND');
9316: FND_MESSAGE.SET_TOKEN('ITEM',l_line_rec.Ordered_Item);
9317: FND_MESSAGE.SET_TOKEN('UOM',l_line_rec.Order_Quantity_uom);
9315: FND_MESSAGE.SET_NAME('ONT','ONT_NO_PRICE_LIST_FOUND');
9316: FND_MESSAGE.SET_TOKEN('ITEM',l_line_rec.Ordered_Item);
9317: FND_MESSAGE.SET_TOKEN('UOM',l_line_rec.Order_Quantity_uom);
9318: OE_MSG_PUB.Add;
9319: Elsif p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STATUS_FORMULA_ERROR then
9320: adj_debug('Error in Formula processing');
9321: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_ERROR_IN_FORMULA');
9322: FND_MESSAGE.SET_TOKEN('ERR_TEXT',p_req_line_tbl(i).status_text||SQLERRM);
9323: OE_MSG_PUB.Add;
9321: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_ERROR_IN_FORMULA');
9322: FND_MESSAGE.SET_TOKEN('ERR_TEXT',p_req_line_tbl(i).status_text||SQLERRM);
9323: OE_MSG_PUB.Add;
9324: Elsif p_req_line_tbl(i).status_code in
9325: ( QP_PREQ_GRP.G_STATUS_OTHER_ERRORS , FND_API.G_RET_STS_UNEXP_ERROR,
9326: FND_API.G_RET_STS_ERROR)
9327: then
9328: adj_debug('Other errors processing');
9329: FND_MESSAGE.SET_NAME('ONT','ONT_PRICING_ERRORS'); --bug#7149497
9328: adj_debug('Other errors processing');
9329: FND_MESSAGE.SET_NAME('ONT','ONT_PRICING_ERRORS'); --bug#7149497
9330: FND_MESSAGE.SET_TOKEN('ERR_TEXT',p_req_line_tbl(i).status_text||SQLERRM);
9331: OE_MSG_PUB.Add;
9332: Elsif p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STATUS_INVALID_UOM then
9333: adj_debug('Invalid uom');
9334: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_INVALID_UOM');
9335: FND_MESSAGE.SET_TOKEN('ITEM',l_line_rec.Ordered_Item);
9336: FND_MESSAGE.SET_TOKEN('UOM',l_line_rec.Order_Quantity_uom);
9334: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_INVALID_UOM');
9335: FND_MESSAGE.SET_TOKEN('ITEM',l_line_rec.Ordered_Item);
9336: FND_MESSAGE.SET_TOKEN('UOM',l_line_rec.Order_Quantity_uom);
9337: OE_MSG_PUB.Add;
9338: Elsif p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST then
9339: adj_debug('Duplicate price list');
9340: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_DUPLICATE_PRICE_LIST');
9341:
9342: Begin
9372:
9373: End;
9374: FND_MESSAGE.SET_TOKEN('PRICE_LIST2',l_price_list);
9375: OE_MSG_PUB.Add;
9376: Elsif p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV then
9377: adj_debug('Invalid UOM Conversion');
9378: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_INVALID_UOM_CONVERSION');
9379: FND_MESSAGE.SET_TOKEN('UOM_TEXT','( '||l_line_rec.Ordered_Item||' ) '||
9380: p_req_line_tbl(i).status_text);
9378: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_INVALID_UOM_CONVERSION');
9379: FND_MESSAGE.SET_TOKEN('UOM_TEXT','( '||l_line_rec.Ordered_Item||' ) '||
9380: p_req_line_tbl(i).status_text);
9381: OE_MSG_PUB.Add;
9382: Elsif p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STATUS_INVALID_INCOMP then
9383: adj_debug('Unable to resolve incompatibility');
9384: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_INVALID_INCOMP');
9385: FND_MESSAGE.SET_TOKEN('ERR_TEXT','( '||l_line_rec.Ordered_Item||' ) '||
9386: p_req_line_tbl(i).status_text);
9384: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_INVALID_INCOMP');
9385: FND_MESSAGE.SET_TOKEN('ERR_TEXT','( '||l_line_rec.Ordered_Item||' ) '||
9386: p_req_line_tbl(i).status_text);
9387: OE_MSG_PUB.Add;
9388: Elsif p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STATUS_BEST_PRICE_EVAL_ERROR then
9389: adj_debug('Error while evaluating the best price');
9390: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_BEST_PRICE_ERROR');
9391: FND_MESSAGE.SET_TOKEN('ITEM',l_line_rec.Ordered_Item);
9392: FND_MESSAGE.SET_TOKEN('ERR_TEXT',p_req_line_tbl(i).status_text);
9427:
9428: RAISE FND_API.G_EXC_ERROR;
9429: elsif
9430: p_req_line_tbl(i).line_Type_code ='LINE' and
9431: p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STATUS_OTHER_ERRORS
9432: Then
9433:
9434: FND_MESSAGE.SET_NAME('ONT','OE_PRICING_ERROR');
9435: FND_MESSAGE.SET_TOKEN('ERR_TEXT','( '||l_line_rec.Ordered_Item||' ) '||
9438:
9439: elsif
9440: ( p_req_line_tbl(i).line_Type_code ='LINE' and
9441: p_req_line_tbl(i).status_code in
9442: ( QP_PREQ_GRP.G_STATUS_UPDATED,
9443: QP_PREQ_GRP.G_STATUS_GSA_VIOLATION,
9444: QP_PREQ_GRP.G_STATUS_UNCHANGED) and
9445: nvl(p_req_line_tbl(i).processed_code,'0') <> QP_PREQ_GRP.G_BY_ENGINE
9446: and p_req_line_tbl(i).price_flag IN ('Y','P') )
9439: elsif
9440: ( p_req_line_tbl(i).line_Type_code ='LINE' and
9441: p_req_line_tbl(i).status_code in
9442: ( QP_PREQ_GRP.G_STATUS_UPDATED,
9443: QP_PREQ_GRP.G_STATUS_GSA_VIOLATION,
9444: QP_PREQ_GRP.G_STATUS_UNCHANGED) and
9445: nvl(p_req_line_tbl(i).processed_code,'0') <> QP_PREQ_GRP.G_BY_ENGINE
9446: and p_req_line_tbl(i).price_flag IN ('Y','P') )
9447:
9440: ( p_req_line_tbl(i).line_Type_code ='LINE' and
9441: p_req_line_tbl(i).status_code in
9442: ( QP_PREQ_GRP.G_STATUS_UPDATED,
9443: QP_PREQ_GRP.G_STATUS_GSA_VIOLATION,
9444: QP_PREQ_GRP.G_STATUS_UNCHANGED) and
9445: nvl(p_req_line_tbl(i).processed_code,'0') <> QP_PREQ_GRP.G_BY_ENGINE
9446: and p_req_line_tbl(i).price_flag IN ('Y','P') )
9447:
9448: or -- OPM 2547940 start
9441: p_req_line_tbl(i).status_code in
9442: ( QP_PREQ_GRP.G_STATUS_UPDATED,
9443: QP_PREQ_GRP.G_STATUS_GSA_VIOLATION,
9444: QP_PREQ_GRP.G_STATUS_UNCHANGED) and
9445: nvl(p_req_line_tbl(i).processed_code,'0') <> QP_PREQ_GRP.G_BY_ENGINE
9446: and p_req_line_tbl(i).price_flag IN ('Y','P') )
9447:
9448: or -- OPM 2547940 start
9449: -- pricing by quantity2 - this is for case when order line is split from shipping and new line gets generated
9528: --l_old_line_tbl(i) := l_old_line_rec;
9529:
9530: Elsif -- Process header level adjustments
9531: p_req_line_tbl(i).line_type_code ='ORDER' and
9532: (p_req_line_tbl(i).status_code in ( QP_PREQ_GRP.G_STATUS_UPDATED ,
9533: QP_PREQ_GRP.G_STATUS_GSA_VIOLATION)
9534: --btea
9535: --In this case even engine doesn't update the order (status = UNCHANGED)
9536: --because of one of the lined is frozen,
9529:
9530: Elsif -- Process header level adjustments
9531: p_req_line_tbl(i).line_type_code ='ORDER' and
9532: (p_req_line_tbl(i).status_code in ( QP_PREQ_GRP.G_STATUS_UPDATED ,
9533: QP_PREQ_GRP.G_STATUS_GSA_VIOLATION)
9534: --btea
9535: --In this case even engine doesn't update the order (status = UNCHANGED)
9536: --because of one of the lined is frozen,
9537: --there can be some order level adjustments in database which
9535: --In this case even engine doesn't update the order (status = UNCHANGED)
9536: --because of one of the lined is frozen,
9537: --there can be some order level adjustments in database which
9538: --need to be pulled out by append_adjustment_lines routine
9539: or (p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STATUS_UNCHANGED
9540: -- and p_any_frozen_line = TRUE -- bug 1675449
9541: ))
9542: Then
9543: G_STMT_NO := 'Process_Adjustments#35';
9580:
9581: -- Process header level adjustments -- PROMOTIONS SEP/01 start
9582: adj_debug('limit profile:'||l_limit_hold_action,3);
9583:
9584: IF (p_req_line_tbl(i).hold_code = QP_PREQ_GRP.G_STATUS_LIMIT_HOLD) or
9585: p_req_line_tbl(i).hold_code = QP_PREQ_GRP.G_STATUS_LIMIT_ADJUSTED THEN
9586: IF (l_limit_hold_action = 'NO_HOLD') THEN
9587: FND_MESSAGE.SET_NAME('ONT','ONT_PROMO_LIMIT_EXCEEDED');
9588: OE_MSG_PUB.ADD;
9581: -- Process header level adjustments -- PROMOTIONS SEP/01 start
9582: adj_debug('limit profile:'||l_limit_hold_action,3);
9583:
9584: IF (p_req_line_tbl(i).hold_code = QP_PREQ_GRP.G_STATUS_LIMIT_HOLD) or
9585: p_req_line_tbl(i).hold_code = QP_PREQ_GRP.G_STATUS_LIMIT_ADJUSTED THEN
9586: IF (l_limit_hold_action = 'NO_HOLD') THEN
9587: FND_MESSAGE.SET_NAME('ONT','ONT_PROMO_LIMIT_EXCEEDED');
9588: OE_MSG_PUB.ADD;
9589: ELSE
9604: p_line_id => NULL) ;
9605:
9606: END IF; -- ( p_req_line_tbl(i).line_type_code = 'LINE' )
9607: END IF; -- limit violation action
9608: END IF; -- (p_req_line_tbl(i).hold_code = QP_PREQ_GRP.G_STATUS_LIMIT_HOLD)
9609: IF p_req_line_tbl(i).line_id IS NOT NULL AND
9610: p_req_line_tbl(i).line_id <> FND_API.G_MISS_NUM THEN
9611: BEGIN
9612: IF l_debug_level > 0 THEN
9663:
9664: J:= p_req_line_detail_Tbl.First;
9665: While J is Not null loop
9666: if p_req_line_tbl( p_req_line_detail_Tbl(j).line_index).status_code in (
9667: QP_PREQ_GRP.G_STATUS_UPDATED ,QP_PREQ_GRP.G_STATUS_GSA_VIOLATION )
9668: and nvl(p_req_line_tbl( p_req_line_detail_Tbl(j).line_index).processed_code,'0')
9669: <> QP_PREQ_GRP.G_BY_ENGINE
9670:
9671: --only process/insert automatic adjustments, with freight charge as exception
9665: While J is Not null loop
9666: if p_req_line_tbl( p_req_line_detail_Tbl(j).line_index).status_code in (
9667: QP_PREQ_GRP.G_STATUS_UPDATED ,QP_PREQ_GRP.G_STATUS_GSA_VIOLATION )
9668: and nvl(p_req_line_tbl( p_req_line_detail_Tbl(j).line_index).processed_code,'0')
9669: <> QP_PREQ_GRP.G_BY_ENGINE
9670:
9671: --only process/insert automatic adjustments, with freight charge as exception
9672: and (p_req_line_detail_Tbl(j).automatic_flag = 'Y' or
9673: (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' )))
9899:
9900: if p_Req_Related_Lines_Tbl(i).Line_Detail_Index =
9901: p_req_line_detail_Tbl(j).line_detail_index and
9902: p_Req_Related_Lines_Tbl(i).Relationship_Type_Code
9903: =QP_PREQ_GRP.G_GENERATED_LINE Then
9904:
9905: adj_debug('The related line is '||p_Req_Related_Lines_Tbl(i).Related_Line_Detail_Index);
9906: -- Process the "Other Item"
9907:
9952: end if; -- for list_line_type
9953:
9954: end if; -- Status_code = Updated.
9955:
9956: If ( (p_req_line_detail_Tbl(j).limit_code = QP_PREQ_GRP.G_STATUS_LIMIT_EXCEEDED ) -- PROMOTIONS SEP/01 START
9957: or (p_req_line_detail_Tbl(j).limit_code = QP_PREQ_GRP.G_STATUS_LIMIT_ADJUSTED ) )
9958: then
9959: -- adj_debug('PAL PROMOTIONS - G_STATUS_LIMIT_EXCEEDED or G_STATUS_LIMIT_ADJUSTED IN _Adj_pvt.process_adjustments',1);
9960: IF (p_req_line_tbl(p_req_line_detail_tbl(j).line_index).LINE_TYPE_CODE='ORDER') THEN
9953:
9954: end if; -- Status_code = Updated.
9955:
9956: If ( (p_req_line_detail_Tbl(j).limit_code = QP_PREQ_GRP.G_STATUS_LIMIT_EXCEEDED ) -- PROMOTIONS SEP/01 START
9957: or (p_req_line_detail_Tbl(j).limit_code = QP_PREQ_GRP.G_STATUS_LIMIT_ADJUSTED ) )
9958: then
9959: -- adj_debug('PAL PROMOTIONS - G_STATUS_LIMIT_EXCEEDED or G_STATUS_LIMIT_ADJUSTED IN _Adj_pvt.process_adjustments',1);
9960: IF (p_req_line_tbl(p_req_line_detail_tbl(j).line_index).LINE_TYPE_CODE='ORDER') THEN
9961: OE_MSG_PUB.set_msg_context
10049: i:= p_Req_Related_Lines_Tbl.First;
10050: While i is not null loop
10051: if
10052: p_Req_Related_Lines_Tbl(i).Relationship_Type_Code in (
10053: QP_PREQ_GRP.G_PBH_LINE ,QP_PREQ_GRP.G_GENERATED_LINE ) and
10054: p_Req_Related_Lines_Tbl(i).Line_Detail_Index is not null and
10055: p_Req_Related_Lines_Tbl(i).Related_Line_Detail_Index is not null and
10056: l_line_details_prcd.exists(p_Req_Related_Lines_Tbl(i).Line_Detail_Index) and
10057: l_line_details_prcd.exists(p_Req_Related_Lines_Tbl(i).Related_Line_Detail_Index)
10172: end loop;
10173:
10174: adj_debug('Before cal #adjs '||l_Line_Adj_Tbl.count);
10175:
10176: --If p_Req_Control_Rec.Calculate_Flag = QP_PREQ_GRP.G_SEARCH_ONLY Then
10177: -- The calculation Engine was not called , when the price request was made
10178: G_STMT_NO := 'process_adjustments#130';
10179:
10180: i:=l_line_adj_tbl.first;
11022:
11023: ,p_Line_id Number Default Null
11024: ,p_Header_id Number Default Null
11025: ,p_Request_Type_code Varchar2
11026: ,p_Control_Rec QP_PREQ_GRP.control_record_type
11027: ,p_write_to_db Boolean Default TRUE
11028: ,p_request_rec OE_Order_PUB.request_rec_type default oe_order_pub.G_MISS_REQUEST_REC
11029: ,x_line_Tbl in out nocopy oe_Order_Pub.Line_Tbl_Type
11030: ,p_honor_price_flag VARCHAR2 Default 'Y'
11032: ,p_action_code in Varchar2 default Null
11033: )
11034: is
11035: l_return_status varchar2(10);
11036: l_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE;
11037: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
11038: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
11039: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
11040: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
11033: )
11034: is
11035: l_return_status varchar2(10);
11036: l_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE;
11037: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
11038: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
11039: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
11040: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
11041: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
11034: is
11035: l_return_status varchar2(10);
11036: l_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE;
11037: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
11038: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
11039: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
11040: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
11041: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
11042: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
11035: l_return_status varchar2(10);
11036: l_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE;
11037: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
11038: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
11039: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
11040: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
11041: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
11042: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
11043: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
11036: l_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE;
11037: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
11038: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
11039: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
11040: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
11041: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
11042: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
11043: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
11044: lx_Header_Rec oe_Order_Pub.Header_REc_Type;
11037: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
11038: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
11039: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
11040: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
11041: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
11042: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
11043: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
11044: lx_Header_Rec oe_Order_Pub.Header_REc_Type;
11045: l_dummy varchar2(1);
11038: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
11039: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
11040: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
11041: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
11042: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
11043: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
11044: lx_Header_Rec oe_Order_Pub.Header_REc_Type;
11045: l_dummy varchar2(1);
11046: l_any_frozen_line Boolean;
11039: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
11040: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
11041: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
11042: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
11043: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
11044: lx_Header_Rec oe_Order_Pub.Header_REc_Type;
11045: l_dummy varchar2(1);
11046: l_any_frozen_line Boolean;
11047: l_price_control_rec OE_ORDER_PRICE_pvt.control_rec_type;
11216: ,p_request_rec OE_Order_PUB.request_rec_type default oe_order_pub.G_MISS_REQUEST_REC
11217:
11218: )
11219: is
11220: l_Req_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE;
11221: l_control_rec Oe_Globals.Control_rec_type;
11222: l_Line_tbl OE_Order_PUB.Line_tbl_type;
11223: l_old_Line_tbl OE_Order_PUB.Line_tbl_type;
11224: l_Line_tbl1 OE_Order_PUB.Line_tbl_type;
11293: nvl(p_request_rec.param1,'XX') <> 'UI') OR
11294: OE_CODE_CONTROL.Get_Code_Release_Level >= '110509'
11295: THEN
11296: l_price_control_rec.p_request_type_code:=p_request_type_code;
11297: l_price_control_rec.p_calculate_flag := QP_PREQ_GRP.G_CALCULATE_ONLY;
11298: IF (p_line_id IS NOT NULL and nvl(p_request_rec.param1,'XX') = 'UI') THEN
11299: l_price_control_rec.p_honor_price_flag := 'N';
11300: END IF;
11301: oe_order_price_pvt.price_line
11618: ,x_msg_data out nocopy varchar2
11619:
11620: )
11621: is
11622: l_Price_Control_rec QP_PREQ_GRP.control_record_type;
11623: l_return_status varchar2(1);
11624: l_x_line_tbl oe_order_pub.line_tbl_type;
11625: l_line_id number;
11626: l_header_id number;
11658:
11659: If P_price_level ='LINE' then
11660:
11661: l_Price_Control_Rec.pricing_event := 'LINE';
11662: l_Price_Control_Rec.calculate_flag := QP_PREQ_GRP.G_SEARCH_N_CALCULATE;
11663: l_Price_Control_Rec.Simulation_Flag := 'N';
11664: l_has_prg_lines := 'Q';
11665:
11666: --MOAC PI BEGIN
11859: l_price_control_rec.pricing_event := 'BATCH,BOOK,SHIP';
11860: l_multiple_events := 'Y';
11861: End If;
11862:
11863: l_Price_Control_Rec.calculate_flag := QP_PREQ_GRP.G_SEARCH_N_CALCULATE;
11864: l_Price_Control_Rec.Simulation_Flag := 'N';
11865:
11866: --13727700 start
11867: OE_Header_Util.Lock_Row
11914: l_price_control_rec.pricing_event := 'BATCH,BOOK,SHIP';
11915: l_multiple_events := 'Y';
11916: End If;
11917:
11918: l_Price_Control_Rec.calculate_flag := QP_PREQ_GRP.G_SEARCH_N_CALCULATE;
11919: l_Price_Control_Rec.Simulation_Flag := 'N';
11920:
11921: --13727700 start
11922: OE_Header_Util.Lock_Row
12016: ,x_msg_data out nocopy varchar2
12017:
12018: )
12019: is
12020: l_Price_Control_rec QP_PREQ_GRP.control_record_type;
12021: l_return_status varchar2(1);
12022: l_x_line_tbl oe_order_pub.line_tbl_type;
12023: l_line_list varchar2(32000) := p_line_list;
12024: l_Header_list varchar2(32000) := p_Header_list;
12046:
12047: If P_price_level ='LINE' then
12048:
12049: l_Price_Control_Rec.pricing_event := 'LINE';
12050: l_Price_Control_Rec.calculate_flag := QP_PREQ_GRP.G_SEARCH_N_CALCULATE;
12051: l_Price_Control_Rec.Simulation_Flag := 'N';
12052: l_has_prg_lines := 'Q';
12053:
12054: -- Made changes to get line_id from p_line_list for Bug 2532740
12165: l_price_control_rec.pricing_event := 'BATCH,BOOK,SHIP';
12166: l_multiple_events := 'Y';
12167: End If;
12168:
12169: l_Price_Control_Rec.calculate_flag := QP_PREQ_GRP.G_SEARCH_N_CALCULATE;
12170: l_Price_Control_Rec.Simulation_Flag := 'N';
12171:
12172: --14647325 start
12173: OE_Header_Util.Lock_Row
12372:
12373: End;
12374:
12375: Procedure Load_Out_Quote_Line (p_line_tbl In Oe_Order_Pub.Line_tbl_Type,
12376: p_req_line_tbl In QP_PREQ_GRP.LINE_TBL_TYPE,
12377: x_quote_line_tbl out nocopy quote_line_tbl_type) As
12378:
12379: i PLS_INTEGER;
12380: Begin
12436: x_quote_line_tbl(i).line_id :=p_line_tbl(i).line_id ;
12437: --use this attribute for place holder of status code. Because there are
12438: --no place holder for status on line_rec record type
12439: If (p_line_tbl(i).industry_attribute30) In
12440: (QP_PREQ_GRP.G_STATUS_INVALID_PRICE_LIST,
12441: QP_PREQ_GRP.G_STS_LHS_NOT_FOUND,
12442: QP_PREQ_GRP.G_STATUS_FORMULA_ERROR,
12443: QP_PREQ_GRP.G_STATUS_OTHER_ERRORS,
12444: FND_API.G_RET_STS_UNEXP_ERROR,
12437: --use this attribute for place holder of status code. Because there are
12438: --no place holder for status on line_rec record type
12439: If (p_line_tbl(i).industry_attribute30) In
12440: (QP_PREQ_GRP.G_STATUS_INVALID_PRICE_LIST,
12441: QP_PREQ_GRP.G_STS_LHS_NOT_FOUND,
12442: QP_PREQ_GRP.G_STATUS_FORMULA_ERROR,
12443: QP_PREQ_GRP.G_STATUS_OTHER_ERRORS,
12444: FND_API.G_RET_STS_UNEXP_ERROR,
12445: FND_API.G_RET_STS_ERROR,
12438: --no place holder for status on line_rec record type
12439: If (p_line_tbl(i).industry_attribute30) In
12440: (QP_PREQ_GRP.G_STATUS_INVALID_PRICE_LIST,
12441: QP_PREQ_GRP.G_STS_LHS_NOT_FOUND,
12442: QP_PREQ_GRP.G_STATUS_FORMULA_ERROR,
12443: QP_PREQ_GRP.G_STATUS_OTHER_ERRORS,
12444: FND_API.G_RET_STS_UNEXP_ERROR,
12445: FND_API.G_RET_STS_ERROR,
12446: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
12439: If (p_line_tbl(i).industry_attribute30) In
12440: (QP_PREQ_GRP.G_STATUS_INVALID_PRICE_LIST,
12441: QP_PREQ_GRP.G_STS_LHS_NOT_FOUND,
12442: QP_PREQ_GRP.G_STATUS_FORMULA_ERROR,
12443: QP_PREQ_GRP.G_STATUS_OTHER_ERRORS,
12444: FND_API.G_RET_STS_UNEXP_ERROR,
12445: FND_API.G_RET_STS_ERROR,
12446: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
12447: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
12442: QP_PREQ_GRP.G_STATUS_FORMULA_ERROR,
12443: QP_PREQ_GRP.G_STATUS_OTHER_ERRORS,
12444: FND_API.G_RET_STS_UNEXP_ERROR,
12445: FND_API.G_RET_STS_ERROR,
12446: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
12447: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
12448: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
12449: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
12450: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
12443: QP_PREQ_GRP.G_STATUS_OTHER_ERRORS,
12444: FND_API.G_RET_STS_UNEXP_ERROR,
12445: FND_API.G_RET_STS_ERROR,
12446: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
12447: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
12448: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
12449: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
12450: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
12451: QP_PREQ_GRP.G_STATUS_INVALID_INCOMP,
12444: FND_API.G_RET_STS_UNEXP_ERROR,
12445: FND_API.G_RET_STS_ERROR,
12446: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
12447: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
12448: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
12449: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
12450: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
12451: QP_PREQ_GRP.G_STATUS_INVALID_INCOMP,
12452: QP_PREQ_GRP.G_STATUS_BEST_PRICE_EVAL_ERROR
12445: FND_API.G_RET_STS_ERROR,
12446: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
12447: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
12448: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
12449: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
12450: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
12451: QP_PREQ_GRP.G_STATUS_INVALID_INCOMP,
12452: QP_PREQ_GRP.G_STATUS_BEST_PRICE_EVAL_ERROR
12453: ) Then
12446: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
12447: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
12448: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
12449: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
12450: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
12451: QP_PREQ_GRP.G_STATUS_INVALID_INCOMP,
12452: QP_PREQ_GRP.G_STATUS_BEST_PRICE_EVAL_ERROR
12453: ) Then
12454:
12447: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
12448: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
12449: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
12450: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
12451: QP_PREQ_GRP.G_STATUS_INVALID_INCOMP,
12452: QP_PREQ_GRP.G_STATUS_BEST_PRICE_EVAL_ERROR
12453: ) Then
12454:
12455: x_quote_line_tbl(i).Status_Code:= p_line_tbl(i).industry_attribute30;
12448: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
12449: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,
12450: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
12451: QP_PREQ_GRP.G_STATUS_INVALID_INCOMP,
12452: QP_PREQ_GRP.G_STATUS_BEST_PRICE_EVAL_ERROR
12453: ) Then
12454:
12455: x_quote_line_tbl(i).Status_Code:= p_line_tbl(i).industry_attribute30;
12456: --DBMS_OUTPUT.PUT_LINE('+++F++:'||x_quote_line_tbl(i).Status_Code);
12476: x_return_status_text out nocopy Varchar2) As
12477:
12478:
12479: l_line_tbl Oe_Order_Pub.line_tbl_type;
12480: l_control_rec Qp_Preq_Grp.control_record_type;
12481: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12482: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12483: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12484: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12477:
12478:
12479: l_line_tbl Oe_Order_Pub.line_tbl_type;
12480: l_control_rec Qp_Preq_Grp.control_record_type;
12481: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12482: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12483: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12484: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12485: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12478:
12479: l_line_tbl Oe_Order_Pub.line_tbl_type;
12480: l_control_rec Qp_Preq_Grp.control_record_type;
12481: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12482: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12483: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12484: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12485: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12486: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12479: l_line_tbl Oe_Order_Pub.line_tbl_type;
12480: l_control_rec Qp_Preq_Grp.control_record_type;
12481: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12482: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12483: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12484: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12485: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12486: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12487: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12480: l_control_rec Qp_Preq_Grp.control_record_type;
12481: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12482: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12483: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12484: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12485: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12486: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12487: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12488: l_any_frozen_line Boolean;
12481: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12482: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12483: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12484: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12485: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12486: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12487: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12488: l_any_frozen_line Boolean;
12489: l_hdr_rec Oe_Order_Pub.Header_Rec_Type;
12482: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12483: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12484: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12485: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12486: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12487: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12488: l_any_frozen_line Boolean;
12489: l_hdr_rec Oe_Order_Pub.Header_Rec_Type;
12490: l_stmt Varchar2(50);
12483: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12484: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12485: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12486: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12487: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12488: l_any_frozen_line Boolean;
12489: l_hdr_rec Oe_Order_Pub.Header_Rec_Type;
12490: l_stmt Varchar2(50);
12491: i PLS_INTEGER;
12496:
12497: --getting a quote is always a batch event
12498: l_control_rec.pricing_event := p_event;
12499:
12500: l_control_rec.calculate_flag := QP_PREQ_GRP.G_SEARCH_N_CALCULATE;
12501: l_control_rec.simulation_Flag := 'N';
12502: l_stmt := 'quote 1';
12503: calculate_adjustments
12504: (x_return_status =>x_return_status ,
12676: l_line_tbl oe_Order_Pub.Line_tbl_Type;
12677: l_line_rec oe_order_pub.line_rec_type;
12678: l_pricing_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
12679: l_qualifier_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
12680: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12681: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12682: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12683: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12684: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12677: l_line_rec oe_order_pub.line_rec_type;
12678: l_pricing_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
12679: l_qualifier_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
12680: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12681: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12682: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12683: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12684: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12685: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12678: l_pricing_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
12679: l_qualifier_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
12680: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12681: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12682: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12683: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12684: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12685: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12686: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12679: l_qualifier_contexts_Tbl QP_Attr_Mapping_PUB.Contexts_Result_Tbl_Type;
12680: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12681: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12682: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12683: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12684: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12685: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12686: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12687: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12680: l_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12681: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12682: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12683: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12684: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12685: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12686: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12687: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12688: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12681: l_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12682: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12683: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12684: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12685: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12686: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12687: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12688: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12689: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12682: l_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12683: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12684: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12685: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12686: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12687: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12688: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12689: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12690: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12683: l_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12684: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12685: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12686: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12687: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12688: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12689: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12690: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12691: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12684: l_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12685: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12686: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12687: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12688: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12689: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12690: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12691: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12692: lx_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12685: l_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12686: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12687: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12688: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12689: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12690: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12691: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12692: lx_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12693: lx_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12686: l_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12687: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12688: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12689: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12690: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12691: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12692: lx_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12693: lx_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12694: l_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE;
12687: lx_Req_qual_tbl QP_PREQ_GRP.QUAL_TBL_TYPE;
12688: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12689: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12690: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12691: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12692: lx_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12693: lx_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12694: l_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE;
12695: l_event Varchar2(30) Default 'BATCH';
12688: lx_Req_line_attr_tbl QP_PREQ_GRP.LINE_ATTR_TBL_TYPE;
12689: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12690: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12691: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12692: lx_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12693: lx_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12694: l_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE;
12695: l_event Varchar2(30) Default 'BATCH';
12696: l_return_status Varchar2(10);
12689: lx_req_line_tbl QP_PREQ_GRP.LINE_TBL_TYPE;
12690: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12691: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12692: lx_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12693: lx_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12694: l_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE;
12695: l_event Varchar2(30) Default 'BATCH';
12696: l_return_status Varchar2(10);
12697: l_return_status_text Varchar2(240);
12690: lx_Req_LINE_DETAIL_tbl QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
12691: lx_Req_LINE_DETAIL_qual_tbl QP_PREQ_GRP.LINE_DETAIL_QUAL_TBL_TYPE;
12692: lx_Req_LINE_DETAIL_attr_tbl QP_PREQ_GRP.LINE_DETAIL_ATTR_TBL_TYPE;
12693: lx_Req_related_lines_tbl QP_PREQ_GRP.RELATED_LINES_TBL_TYPE;
12694: l_Control_Rec QP_PREQ_GRP.CONTROL_RECORD_TYPE;
12695: l_event Varchar2(30) Default 'BATCH';
12696: l_return_status Varchar2(10);
12697: l_return_status_text Varchar2(240);
12698: i PLS_INTEGER;
12732: ld.pricing_group_sequence
12733: from QP_PREQ_LINES_TMP l, QP_PREQ_LDETS_TMP ld, QP_LIST_LINES ll
12734: where l.line_index = ld.line_index
12735: and ld.CREATED_FROM_LIST_LINE_ID = ll.LIST_LINE_ID
12736: and ld.PRICING_STATUS_CODE = QP_PREQ_GRP.G_STATUS_NEW
12737: ORDER BY ld.list_line_no; -- bug 6323362
12738:
12739: --bucket man
12740: Begin
13102: l_control_rec.request_type_code := 'ONT';
13103: l_control_rec.temp_table_insert_flag := 'N';
13104: END IF;
13105: l_control_rec.pricing_event := l_event;
13106: l_control_rec.calculate_flag:= qp_preq_grp.G_SEARCH_N_CALCULATE;
13107: l_control_rec.manual_adjustments_call_flag:=qp_preq_grp.G_YES;
13108: --Will need to do the same thing for header level manual adjustment
13109: -- sgowtham
13110: if( p_freight_flag = TRUE) then
13103: l_control_rec.temp_table_insert_flag := 'N';
13104: END IF;
13105: l_control_rec.pricing_event := l_event;
13106: l_control_rec.calculate_flag:= qp_preq_grp.G_SEARCH_N_CALCULATE;
13107: l_control_rec.manual_adjustments_call_flag:=qp_preq_grp.G_YES;
13108: --Will need to do the same thing for header level manual adjustment
13109: -- sgowtham
13110: if( p_freight_flag = TRUE) then
13111: l_control_rec.GET_FREIGHT_FLAG := 'Y';
13119: ,x_return_status =>l_return_status
13120: ,x_return_status_Text =>l_return_status_Text
13121: );
13122: ELSE
13123: QP_PREQ_GRP.PRICE_REQUEST
13124: (p_control_rec => l_control_rec
13125: ,p_line_tbl => l_Req_line_tbl
13126: ,p_qual_tbl => l_Req_qual_tbl
13127: ,p_line_attr_tbl => l_Req_line_attr_tbl
13174: )
13175:
13176: Then
13177: If (p_pbh_mode = 'CHILD' and nvl(k.line_quantity,0) > 0
13178: and k.line_detail_type_code = QP_PREQ_GRP.G_CHILD_DETAIL_TYPE)
13179: --Regular discount lines
13180: or (k.list_line_type_code <> 'PBH' AND
13181: k.line_detail_type_code <> QP_PREQ_GRP.G_CHILD_DETAIL_TYPE)
13182: --Price break header (parent)
13177: If (p_pbh_mode = 'CHILD' and nvl(k.line_quantity,0) > 0
13178: and k.line_detail_type_code = QP_PREQ_GRP.G_CHILD_DETAIL_TYPE)
13179: --Regular discount lines
13180: or (k.list_line_type_code <> 'PBH' AND
13181: k.line_detail_type_code <> QP_PREQ_GRP.G_CHILD_DETAIL_TYPE)
13182: --Price break header (parent)
13183: or (p_pbh_mode = 'PARENT' and k.list_line_type_code = 'PBH')
13184: Then
13185: If p_called_from = 'SO' Then
13248: )
13249:
13250: Then
13251: If (p_pbh_mode = 'CHILD' and nvl(lx_req_line_detail_tbl(i).line_quantity,0) > 0
13252: and lx_req_line_detail_tbl(i).line_detail_type_code = QP_PREQ_GRP.G_CHILD_DETAIL_TYPE)
13253: --Regular discount lines
13254: or (lx_req_line_detail_tbl(i).list_line_type_code <> 'PBH' AND
13255: lx_req_line_detail_tbl(i).line_detail_type_code <> QP_PREQ_GRP.G_CHILD_DETAIL_TYPE)
13256: --Price break header (parent)
13251: If (p_pbh_mode = 'CHILD' and nvl(lx_req_line_detail_tbl(i).line_quantity,0) > 0
13252: and lx_req_line_detail_tbl(i).line_detail_type_code = QP_PREQ_GRP.G_CHILD_DETAIL_TYPE)
13253: --Regular discount lines
13254: or (lx_req_line_detail_tbl(i).list_line_type_code <> 'PBH' AND
13255: lx_req_line_detail_tbl(i).line_detail_type_code <> QP_PREQ_GRP.G_CHILD_DETAIL_TYPE)
13256: --Price break header (parent)
13257: or (p_pbh_mode = 'PARENT' and lx_req_line_detail_tbl(i).list_line_type_code = 'PBH')
13258: Then
13259: x_manual_adj_tbl(i).modifier_number:=lx_req_line_detail_tbl(i).list_line_no;