[Home] [Help]
400: IF l_debug_level > 0 THEN
401: oe_debug_pub.add( 'ORDER HEADER IS '||TO_CHAR ( P_HEADER_ID ) , 2 ) ;
402: END IF;
403:
404: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
405: OE_Version_History_Util.Query_row(p_header_id => p_header_id,
406: p_version_number => p_copy_rec.version_number,
407: p_phase_change_flag => p_copy_rec.phase_change_flag,
408: x_header_rec => x_header_rec);
425:
426: /* End of code added to fix the bug 1862719 */
427:
428: -- Adding Code for New COPY chnages for 11.5.10
429: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
430:
431: x_header_rec.USER_STATUS_CODE := FND_API.G_MISS_CHAR;
432: x_header_rec.DRAFT_SUBMITTED_FLAG := FND_API.G_MISS_CHAR;
433: x_header_rec.QUOTE_DATE := FND_API.G_MISS_DATE;
791: -- Load Header Sales Credits
792: BEGIN
793:
794: x_Header_Scredit_tbl.delete; -- 1724939
795: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
796: OE_Version_History_UTIL.query_rows(
797: p_sales_credit_id => NULL,
798: p_header_id => p_header_id,
799: p_version_number => p_version_number,
890: IF p_phase_change_flag = 'Y' THEN
891: RETURN l_action_request_tbl;
892: END IF;
893:
894: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
895: SELECT version_number
896: INTO l_v_number
897: FROM oe_order_headers
898: WHERE header_id = p_header_id;
1263: WHILE k IS NOT NULL LOOP
1264: BEGIN
1265:
1266: -- RetroBill Fix
1267: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
1268: -- Do not copy RetroBill Line
1269: IF p_x_line_tbl(k).retrobill_request_id IS NOT NULL THEN
1270: l_line_tbl.DELETE(k);
1271: GOTO Excluded_cancelled_line;
1439:
1440:
1441: --MACD------------------------------------------------------
1442:
1443: IF OE_CODE_CONTROL.GET_CODE_RELEASE_LEVEL >= '110510' THEN
1444: IF l_debug_level > 0 THEN
1445: OE_DEBUG_PUB.Add('RowCount:'||l_line_tbl.COUNT,3);
1446: OE_DEBUG_PUB.Add('MACD-Copy Level is:'
1447: ||G_ORDER_LEVEL_COPY,3);
1532: --bug3441056 contd
1533: --MACD------------------------------------------------------
1534:
1535: -- RetroBill Fix
1536: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
1537: -- Do not copy RetroBill Line
1538: IF p_x_line_tbl(k).retrobill_request_id IS NOT NULL THEN
1539: l_line_tbl.DELETE(k);
1540: GOTO Excluded_cancelled_line;
1874: l_line_category := get_line_category(p_line_type_id);
1875: END If;
1876:
1877: IF FND_API.to_Boolean(p_all_lines) THEN
1878: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
1879: OE_Version_History_UTIL.query_rows(
1880: p_line_id => NULL
1881: ,p_header_id => p_header_id
1882: ,p_line_set_id => NULL
1983: x_line_tbl(I).config_rev_nbr IS NOT NULL AND
1984: x_line_tbl(I).cancelled_flag <> 'Y' AND
1985: NVL(x_top_model_tbl(I).has_canceled_lines, 'N') = 'N'
1986: THEN
1987: IF OE_CODE_CONTROL.Get_Code_Release_Level < '110509' THEN
1988: IF l_debug_level > 0 THEN
1989: oe_debug_pub.add('1923460: ABOUT TO RUN COPY CONFIGURATION' , 1 ) ;
1990: END IF;
1991:
2527: p_x_line_tbl(k).ACCOUNTING_RULE_ID := FND_API.G_MISS_NUM; -- added for Bug 6519067
2528: end if;
2529:
2530: -- Clear Transaction Phase for New Lines
2531: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
2532: p_x_line_tbl(k).transaction_phase_code := FND_API.G_MISS_CHAR;
2533:
2534: IF p_reason_code IS NOT NULL THEN
2535: p_x_line_tbl(k).change_reason := p_reason_code;
2685: p_x_line_tbl(k).top_model_line_id := FND_API.G_MISS_NUM;
2686: p_x_line_tbl(k).link_to_line_id := FND_API.G_MISS_NUM;
2687:
2688: IF G_ORDER_LEVEL_COPY = 1 AND
2689: OE_CODE_CONTROL.Get_Code_Release_Level >= '110508' AND
2690: p_x_line_tbl(k).config_header_id is not NULL AND
2691: p_x_line_tbl(k).config_header_id <> FND_API.G_MISS_NUM AND
2692: p_x_line_tbl(k).cancelled_flag <> 'Y'
2693: THEN
2760: p_x_line_tbl(k).actual_fulfillment_date := FND_API.G_MISS_DATE ;
2761: --end
2762:
2763: -- Pack J catchweight
2764: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
2765: p_x_line_tbl(k).shipped_quantity2 := NULL;
2766: END IF;
2767: -- Pack J catchweight
2768: p_x_line_tbl(k).invoiced_quantity := FND_API.G_MISS_NUM;
2968: p_x_line_tbl(k).reference_line_id := l_temp_line_rec.line_id;
2969: p_x_line_tbl(k).reference_type := 'ORDER';
2970: p_x_line_tbl(k).reference_header_id := l_temp_line_rec.header_id;
2971:
2972: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
2973: IF p_reason_code IS NOT NULL THEN
2974: p_x_line_tbl(k).change_reason := p_reason_code;
2975: END IF;
2976:
3087: p_x_line_tbl(k).calculate_price_flag := 'N';
3088:
3089: -- Set pricing date if we are re-pricing and a date is provided.
3090: ELSIF (p_line_price_mode = G_CPY_REPRICE) THEN
3091: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
3092: p_x_line_tbl(k).original_list_price := NULL;
3093: END IF;
3094: IF (p_line_price_date IS NOT NULL) THEN
3095: p_x_line_tbl(k).pricing_date := p_line_price_date;
3204:
3205: l_line_id := p_line_tbl(k).line_id;
3206: -- Load line level Sales Credits into temporary table
3207: BEGIN
3208: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
3209:
3210: OE_Version_History_UTIL.Query_Rows(
3211: p_sales_credit_id => NULL
3212: ,p_line_id => l_line_id
3820: IF p_copy_rec.manual_order_number IS NOT NULL THEN
3821: l_header_rec.order_number := p_copy_rec.manual_order_number;
3822: END IF;
3823:
3824: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
3825: IF p_copy_rec.new_phase = 'N' THEN
3826: l_header_rec.TRANSACTION_PHASE_CODE := 'N';
3827: ELSE
3828: l_header_rec.TRANSACTION_PHASE_CODE := 'F';
4336: ,x_return_status => l_return_status);
4337: END IF; -- attachments
4338:
4339: --Copy Articles takintoy
4340: IF OE_CODE_CONTROL.Get_Code_Release_Level >='110510'Then
4341: OE_Contracts_Util.copy_articles
4342: (p_api_version => 1,
4343: p_doc_type => OE_Contracts_Util.G_SO_DOC_TYPE,
4344: p_copy_from_doc_id => G_ATT_HEADER_ID,
4397: IF (l_all_lines_copied AND
4398: NOT G_Canceled_Line_Deleted AND
4399: NOT G_Order_Has_Split_Lines) OR
4400: G_REGULAR_TO_RMA OR
4401: OE_CODE_CONTROL.Get_Code_Release_Level < '110509' THEN
4402: -- Do nothing as the Line numbers will match
4403: NULL;
4404: ELSE
4405:
5653: -- Populate the full line record by calling the oe_line_util.query_row
5654:
5655: FOR i IN 1..l_line_id.COUNT LOOP
5656:
5657: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
5658: OE_Version_History_UTIL.query_row(
5659: p_line_id => l_line_id(i)
5660: ,p_version_number => p_version_number
5661: ,p_phase_change_flag => p_phase_change_flag