[Home] [Help]
439: IF l_debug_level > 0 THEN
440: oe_debug_pub.add( 'ORDER HEADER IS '||TO_CHAR ( P_HEADER_ID ) , 2 ) ;
441: END IF;
442:
443: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
444: OE_Version_History_Util.Query_row(p_header_id => p_header_id,
445: p_version_number => p_copy_rec.version_number,
446: p_phase_change_flag => p_copy_rec.phase_change_flag,
447: x_header_rec => x_header_rec);
476:
477: /* End of code added to fix the bug 1862719 */
478:
479: -- Adding Code for New COPY chnages for 11.5.10
480: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
481:
482: x_header_rec.USER_STATUS_CODE := FND_API.G_MISS_CHAR;
483: x_header_rec.DRAFT_SUBMITTED_FLAG := FND_API.G_MISS_CHAR;
484: x_header_rec.QUOTE_DATE := FND_API.G_MISS_DATE;
863: -- Load Header Sales Credits
864: BEGIN
865:
866: x_Header_Scredit_tbl.delete; -- 1724939
867: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
868: OE_Version_History_UTIL.query_rows(
869: p_sales_credit_id => NULL,
870: p_header_id => p_header_id,
871: p_version_number => p_version_number,
962: IF p_phase_change_flag = 'Y' THEN
963: RETURN l_action_request_tbl;
964: END IF;
965:
966: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
967: SELECT version_number
968: INTO l_v_number
969: FROM oe_order_headers_all /*Modified to base table for bug 9701486 */
970: WHERE header_id = p_header_id;
1335: WHILE k IS NOT NULL LOOP
1336: BEGIN
1337:
1338: -- RetroBill Fix
1339: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
1340: -- Do not copy RetroBill Line
1341: IF p_x_line_tbl(k).retrobill_request_id IS NOT NULL THEN
1342: l_line_tbl.DELETE(k);
1343: GOTO Excluded_cancelled_line;
1511:
1512:
1513: --MACD------------------------------------------------------
1514:
1515: IF OE_CODE_CONTROL.GET_CODE_RELEASE_LEVEL >= '110510' THEN
1516: IF l_debug_level > 0 THEN
1517: OE_DEBUG_PUB.Add('RowCount:'||l_line_tbl.COUNT,3);
1518: OE_DEBUG_PUB.Add('MACD-Copy Level is:'
1519: ||G_ORDER_LEVEL_COPY,3);
1604: --bug3441056 contd
1605: --MACD------------------------------------------------------
1606:
1607: -- RetroBill Fix
1608: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
1609: -- Do not copy RetroBill Line
1610: IF p_x_line_tbl(k).retrobill_request_id IS NOT NULL THEN
1611: l_line_tbl.DELETE(k);
1612: GOTO Excluded_cancelled_line;
1984: l_line_category := get_line_category(p_line_type_id);
1985: END If;
1986:
1987: IF FND_API.to_Boolean(p_all_lines) THEN
1988: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
1989: OE_Version_History_UTIL.query_rows(
1990: p_line_id => NULL
1991: ,p_header_id => p_header_id
1992: ,p_line_set_id => NULL
2102: x_line_tbl(I).config_rev_nbr IS NOT NULL AND
2103: x_line_tbl(I).cancelled_flag <> 'Y' AND
2104: NVL(x_top_model_tbl(I).has_canceled_lines, 'N') = 'N'
2105: THEN
2106: IF OE_CODE_CONTROL.Get_Code_Release_Level < '110509' THEN
2107: IF l_debug_level > 0 THEN
2108: oe_debug_pub.add('1923460: ABOUT TO RUN COPY CONFIGURATION' , 1 ) ;
2109: END IF;
2110:
2646: p_x_line_tbl(k).ACCOUNTING_RULE_ID := FND_API.G_MISS_NUM; -- added for Bug 6519067
2647: end if;
2648: */
2649: -- Clear Transaction Phase for New Lines
2650: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
2651: p_x_line_tbl(k).transaction_phase_code := FND_API.G_MISS_CHAR;
2652:
2653: IF p_reason_code IS NOT NULL THEN
2654: p_x_line_tbl(k).change_reason := p_reason_code;
2805: p_x_line_tbl(k).link_to_line_id := FND_API.G_MISS_NUM;
2806:
2807: IF
2808: ---- G_ORDER_LEVEL_COPY = 1 AND bug# 7436888 ,8439061
2809: OE_CODE_CONTROL.Get_Code_Release_Level >= '110508' AND
2810: p_x_line_tbl(k).config_header_id is not NULL AND
2811: p_x_line_tbl(k).config_header_id <> FND_API.G_MISS_NUM AND
2812: p_x_line_tbl(k).cancelled_flag <> 'Y'
2813: THEN
2885: p_x_line_tbl(k).actual_fulfillment_date := FND_API.G_MISS_DATE ;
2886: --end
2887:
2888: -- Pack J catchweight
2889: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
2890: p_x_line_tbl(k).shipped_quantity2 := NULL;
2891: END IF;
2892: -- Pack J catchweight
2893: p_x_line_tbl(k).invoiced_quantity := FND_API.G_MISS_NUM;
3097: p_x_line_tbl(k).reference_line_id := l_temp_line_rec.line_id;
3098: p_x_line_tbl(k).reference_type := 'ORDER';
3099: p_x_line_tbl(k).reference_header_id := l_temp_line_rec.header_id;
3100:
3101: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
3102: IF p_reason_code IS NOT NULL THEN
3103: p_x_line_tbl(k).change_reason := p_reason_code;
3104: END IF;
3105:
3237: p_x_line_tbl(k).calculate_price_flag := 'N';
3238:
3239: -- Set pricing date if we are re-pricing and a date is provided.
3240: ELSIF (p_line_price_mode = G_CPY_REPRICE) THEN
3241: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
3242: p_x_line_tbl(k).original_list_price := NULL;
3243: END IF;
3244: IF (p_line_price_date IS NOT NULL) THEN
3245: p_x_line_tbl(k).pricing_date := p_line_price_date;
3354:
3355: l_line_id := p_line_tbl(k).line_id;
3356: -- Load line level Sales Credits into temporary table
3357: BEGIN
3358: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
3359:
3360: OE_Version_History_UTIL.Query_Rows(
3361: p_sales_credit_id => NULL
3362: ,p_line_id => l_line_id
3970: IF p_copy_rec.manual_order_number IS NOT NULL THEN
3971: l_header_rec.order_number := p_copy_rec.manual_order_number;
3972: END IF;
3973:
3974: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
3975: IF p_copy_rec.new_phase = 'N' THEN
3976: l_header_rec.TRANSACTION_PHASE_CODE := 'N';
3977: ELSE
3978: l_header_rec.TRANSACTION_PHASE_CODE := 'F';
4486: ,x_return_status => l_return_status);
4487: END IF; -- attachments
4488:
4489: --Copy Articles takintoy
4490: IF OE_CODE_CONTROL.Get_Code_Release_Level >='110510'Then
4491: OE_Contracts_Util.copy_articles
4492: (p_api_version => 1,
4493: p_doc_type => OE_Contracts_Util.G_SO_DOC_TYPE,
4494: p_copy_from_doc_id => G_ATT_HEADER_ID,
4547: IF (l_all_lines_copied AND
4548: NOT G_Canceled_Line_Deleted AND
4549: NOT G_Order_Has_Split_Lines) OR
4550: G_REGULAR_TO_RMA OR
4551: OE_CODE_CONTROL.Get_Code_Release_Level < '110509' THEN
4552: -- Do nothing as the Line numbers will match
4553: NULL;
4554: ELSE
4555:
5824: -- Populate the full line record by calling the oe_line_util.query_row
5825:
5826: FOR i IN 1..l_line_id.COUNT LOOP
5827:
5828: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
5829: OE_Version_History_UTIL.query_row(
5830: p_line_id => l_line_id(i)
5831: ,p_version_number => p_version_number
5832: ,p_phase_change_flag => p_phase_change_flag