DBA Data[Home] [Help]

APPS.OE_ORDER_COPY_UTIL dependencies on OE_GLOBALS

Line 30: PROCEDURE sort_line_tbl(p_line_id_tbl IN OE_GLOBALS.Selected_Record_Tbl,

26: PROCEDURE EXTEND_TBL(p_num IN NUMBER);
27:
28: PROCEDURE DELETE_TBL;
29:
30: PROCEDURE sort_line_tbl(p_line_id_tbl IN OE_GLOBALS.Selected_Record_Tbl,
31: p_version_number IN NUMBER,
32: p_phase_change_flag IN VARCHAR2,
33: p_num_lines IN NUMBER,
34: x_line_tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Tbl_Type);

Line 516: x_header_rec.operation := OE_GLOBALS.G_OPR_CREATE;

512: END IF;
513:
514: x_header_rec.header_id := FND_API.G_MISS_NUM;
515: x_header_rec.version_number := FND_API.G_MISS_NUM;
516: x_header_rec.operation := OE_GLOBALS.G_OPR_CREATE;
517:
518: IF (x_header_rec.ordered_date < sysdate) THEN
519: x_header_rec.ordered_date := FND_API.G_MISS_DATE;
520: END IF;

Line 819: x_header_scredit_tbl(k).operation := OE_GLOBALS.G_OPR_CREATE;

815: IF x_header_scredit_tbl.COUNT > 0 THEN
816:
817: FOR k IN x_header_scredit_tbl.FIRST .. x_header_scredit_tbl.LAST LOOP
818:
819: x_header_scredit_tbl(k).operation := OE_GLOBALS.G_OPR_CREATE;
820: x_header_scredit_tbl(k).header_id := FND_API.G_MISS_NUM;
821: x_header_scredit_tbl(k).sales_credit_id := FND_API.G_MISS_NUM;
822:
823: END LOOP;

Line 900: IF NOT OE_GLOBALS.EQUAL(l_v_number,p_version_number) THEN

896: INTO l_v_number
897: FROM oe_order_headers
898: WHERE header_id = p_header_id;
899:
900: IF NOT OE_GLOBALS.EQUAL(l_v_number,p_version_number) THEN
901: RETURN l_action_request_tbl;
902: END IF;
903: END IF;
904:

Line 937: l_action_request_tbl(k).entity_code := OE_GLOBALS.G_ENTITY_HEADER;

933: IF l_debug_level > 0 THEN
934: oe_debug_pub.add( 'LOADING HOLD SOURCE '|| TO_CHAR ( L_HOLD_SOURCE_TBL ( CURR ) .HOLD_ID ) , 2 ) ;
935: END IF;
936:
937: l_action_request_tbl(k).entity_code := OE_GLOBALS.G_ENTITY_HEADER;
938: l_action_request_tbl(k).request_type:= OE_Globals.G_APPLY_HOLD;
939: l_action_request_tbl(k).param1 := l_hold_source_tbl(curr).hold_id;
940: l_action_request_tbl(k).param2 := 'O';
941:

Line 938: l_action_request_tbl(k).request_type:= OE_Globals.G_APPLY_HOLD;

934: oe_debug_pub.add( 'LOADING HOLD SOURCE '|| TO_CHAR ( L_HOLD_SOURCE_TBL ( CURR ) .HOLD_ID ) , 2 ) ;
935: END IF;
936:
937: l_action_request_tbl(k).entity_code := OE_GLOBALS.G_ENTITY_HEADER;
938: l_action_request_tbl(k).request_type:= OE_Globals.G_APPLY_HOLD;
939: l_action_request_tbl(k).param1 := l_hold_source_tbl(curr).hold_id;
940: l_action_request_tbl(k).param2 := 'O';
941:
942: -- load other source fields

Line 1041: x_header_payment_tbl(k).operation := OE_GLOBALS.G_OPR_CREATE;

1037:
1038: IF x_header_payment_tbl.COUNT > 0 THEN
1039: -- assign G_MISS to those attributes that are not copied.
1040: FOR k IN x_header_payment_tbl.FIRST .. x_header_payment_tbl.LAST LOOP
1041: x_header_payment_tbl(k).operation := OE_GLOBALS.G_OPR_CREATE;
1042: x_header_payment_tbl(k).header_id := FND_API.G_MISS_NUM;
1043: x_header_payment_tbl(k).line_id := FND_API.G_MISS_NUM;
1044: x_header_payment_tbl(k).prepaid_amount := FND_API.G_MISS_NUM;
1045: x_header_payment_tbl(k).commitment_applied_amount:= FND_API.G_MISS_NUM;

Line 1163: p_action_request_tbl(k).entity_code := OE_GLOBALS.G_ENTITY_LINE;

1159: IF l_debug_level > 0 THEN
1160: oe_debug_pub.add( 'LOADING HOLD SOURCE '|| TO_CHAR ( L_HOLD_SOURCE_TBL ( CURR ) .HOLD_ID ) , 2 ) ;
1161: END IF;
1162:
1163: p_action_request_tbl(k).entity_code := OE_GLOBALS.G_ENTITY_LINE;
1164: p_action_request_tbl(k).entity_id := p_new_line_id;
1165: p_action_request_tbl(k).request_type:= OE_Globals.G_APPLY_HOLD;
1166: p_action_request_tbl(k).param1 := l_hold_source_tbl(curr).hold_id;
1167: p_action_request_tbl(k).param2 := 'O';

Line 1165: p_action_request_tbl(k).request_type:= OE_Globals.G_APPLY_HOLD;

1161: END IF;
1162:
1163: p_action_request_tbl(k).entity_code := OE_GLOBALS.G_ENTITY_LINE;
1164: p_action_request_tbl(k).entity_id := p_new_line_id;
1165: p_action_request_tbl(k).request_type:= OE_Globals.G_APPLY_HOLD;
1166: p_action_request_tbl(k).param1 := l_hold_source_tbl(curr).hold_id;
1167: p_action_request_tbl(k).param2 := 'O';
1168:
1169: -- load other source fields

Line 1285: IF l_line_tbl(k).item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,

1281:
1282: END IF;
1283:
1284: -- If Model or Standard then do nothing.
1285: IF l_line_tbl(k).item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
1286: OE_GLOBALS.G_ITEM_MODEL) THEN
1287:
1288: GOTO Leave_record_as_is;
1289:

Line 1286: OE_GLOBALS.G_ITEM_MODEL) THEN

1282: END IF;
1283:
1284: -- If Model or Standard then do nothing.
1285: IF l_line_tbl(k).item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
1286: OE_GLOBALS.G_ITEM_MODEL) THEN
1287:
1288: GOTO Leave_record_as_is;
1289:
1290: END IF;

Line 1300: (OE_GLOBALS.G_ITEM_CONFIG,

1296: -- passed in. It gets deleted if parent is passed in since
1297: -- Process Order will re-exploded based on Freeze date.
1298:
1299: IF l_line_tbl(k).item_type_code IN
1300: (OE_GLOBALS.G_ITEM_CONFIG,
1301: OE_GLOBALS.G_ITEM_INCLUDED,
1302: OE_GLOBALS.G_ITEM_OPTION) THEN
1303:
1304: -- Find if Parent Line has been passed In

Line 1301: OE_GLOBALS.G_ITEM_INCLUDED,

1297: -- Process Order will re-exploded based on Freeze date.
1298:
1299: IF l_line_tbl(k).item_type_code IN
1300: (OE_GLOBALS.G_ITEM_CONFIG,
1301: OE_GLOBALS.G_ITEM_INCLUDED,
1302: OE_GLOBALS.G_ITEM_OPTION) THEN
1303:
1304: -- Find if Parent Line has been passed In
1305: IF l_line_tbl(k).top_model_line_id IS NOT NULL THEN

Line 1302: OE_GLOBALS.G_ITEM_OPTION) THEN

1298:
1299: IF l_line_tbl(k).item_type_code IN
1300: (OE_GLOBALS.G_ITEM_CONFIG,
1301: OE_GLOBALS.G_ITEM_INCLUDED,
1302: OE_GLOBALS.G_ITEM_OPTION) THEN
1303:
1304: -- Find if Parent Line has been passed In
1305: IF l_line_tbl(k).top_model_line_id IS NOT NULL THEN
1306: l_top_model_index := Find_LineIndex(l_line_tbl,

Line 1309: l_line_tbl(k).item_type_code := OE_GLOBALS.G_ITEM_STANDARD;

1305: IF l_line_tbl(k).top_model_line_id IS NOT NULL THEN
1306: l_top_model_index := Find_LineIndex(l_line_tbl,
1307: l_line_tbl(k).top_model_line_id);
1308: IF l_top_model_index = FND_API.G_MISS_NUM THEN
1309: l_line_tbl(k).item_type_code := OE_GLOBALS.G_ITEM_STANDARD;
1310: GOTO Leave_record_as_is;
1311: END IF;
1312: END IF;
1313:

Line 1322: IF l_line_tbl(k).item_type_code = OE_GLOBALS.G_ITEM_CLASS THEN

1318: GOTO Leave_record_as_is;
1319: END IF; -- End Included, Option or Config Item
1320:
1321: -- Delete class lines.
1322: IF l_line_tbl(k).item_type_code = OE_GLOBALS.G_ITEM_CLASS THEN
1323:
1324: l_line_tbl.DELETE(k);
1325: GOTO Leave_record_as_is;
1326:

Line 1331: IF l_line_tbl(k).item_type_code = OE_GLOBALS.G_ITEM_SERVICE THEN

1327: END IF;
1328:
1329: -- Delete Service Line if the Line category is Return
1330: -- Delete service lines.
1331: IF l_line_tbl(k).item_type_code = OE_GLOBALS.G_ITEM_SERVICE THEN
1332: l_line_tbl.DELETE(k);
1333: GOTO Leave_record_as_is;
1334: END IF;
1335:

Line 1337: IF (l_line_tbl(k).item_type_code = OE_GLOBALS.G_ITEM_KIT) AND

1333: GOTO Leave_record_as_is;
1334: END IF;
1335:
1336: /* Following If condition added to fix the bug 2012594 */
1337: IF (l_line_tbl(k).item_type_code = OE_GLOBALS.G_ITEM_KIT) AND
1338: (l_line_tbl(k).top_model_line_id IS NOT NULL) AND
1339: (l_line_tbl(k).top_model_line_id <>l_line_tbl(k).line_id) THEN
1340: l_top_model_index := Find_LineIndex(l_line_tbl,l_line_tbl(k).top_model_line_id);
1341: IF l_top_model_index <> FND_API.G_MISS_NUM THEN

Line 1562: IF l_line_tbl(k).item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,

1558:
1559: END IF;
1560:
1561: -- If Model or Standard or KIT then do nothing.
1562: IF l_line_tbl(k).item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
1563: OE_GLOBALS.G_ITEM_MODEL,
1564: OE_GLOBALS.G_ITEM_KIT) THEN
1565:
1566: GOTO Leave_record_as_is;

Line 1563: OE_GLOBALS.G_ITEM_MODEL,

1559: END IF;
1560:
1561: -- If Model or Standard or KIT then do nothing.
1562: IF l_line_tbl(k).item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
1563: OE_GLOBALS.G_ITEM_MODEL,
1564: OE_GLOBALS.G_ITEM_KIT) THEN
1565:
1566: GOTO Leave_record_as_is;
1567:

Line 1564: OE_GLOBALS.G_ITEM_KIT) THEN

1560:
1561: -- If Model or Standard or KIT then do nothing.
1562: IF l_line_tbl(k).item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
1563: OE_GLOBALS.G_ITEM_MODEL,
1564: OE_GLOBALS.G_ITEM_KIT) THEN
1565:
1566: GOTO Leave_record_as_is;
1567:
1568: END IF;

Line 1586: IF l_line_tbl(k).item_type_code IN (OE_GLOBALS.G_ITEM_CONFIG,

1582: -- Included item gets copied over as Standard if parent is not
1583: -- passed in. It gets deleted if parent is passed in since
1584: -- Process Order will re-exploded based on Freeze date.
1585:
1586: IF l_line_tbl(k).item_type_code IN (OE_GLOBALS.G_ITEM_CONFIG,
1587: OE_GLOBALS.G_ITEM_INCLUDED) THEN
1588:
1589:
1590: -- Find if Link to Line has been passed in.

Line 1587: OE_GLOBALS.G_ITEM_INCLUDED) THEN

1583: -- passed in. It gets deleted if parent is passed in since
1584: -- Process Order will re-exploded based on Freeze date.
1585:
1586: IF l_line_tbl(k).item_type_code IN (OE_GLOBALS.G_ITEM_CONFIG,
1587: OE_GLOBALS.G_ITEM_INCLUDED) THEN
1588:
1589:
1590: -- Find if Link to Line has been passed in.
1591:

Line 1596: l_line_tbl(k).item_type_code := OE_GLOBALS.G_ITEM_STANDARD;

1592: IF l_line_tbl(k).link_to_line_id IS NOT NULL THEN
1593: l_link_to_index := Find_LineIndex(l_line_tbl,l_line_tbl(k).link_to_line_id);
1594: IF l_link_to_index = FND_API.G_MISS_NUM THEN
1595:
1596: l_line_tbl(k).item_type_code := OE_GLOBALS.G_ITEM_STANDARD;
1597: l_line_tbl(k).option_number := NULL;
1598: l_line_tbl(k).component_number := NULL;
1599: l_line_tbl(k).split_from_line_id := NULL;
1600: l_line_tbl(k).split_by := NULL;

Line 1618: IF l_line_tbl(k).item_type_code = (OE_GLOBALS.G_ITEM_OPTION) THEN

1614:
1615: -- Option gets copied over as such if parent is passed in
1616: -- else it gets converted to a Standard item.
1617:
1618: IF l_line_tbl(k).item_type_code = (OE_GLOBALS.G_ITEM_OPTION) THEN
1619:
1620: IF l_debug_level > 0 THEN
1621: oe_debug_pub.add( ' OPTION 1' || TO_CHAR ( L_LINE_TBL ( K ) .LINE_ID ) , 1 ) ;
1622: END IF;

Line 1631: l_line_tbl(k).item_type_code := OE_GLOBALS.G_ITEM_STANDARD;

1627: l_line_tbl(k).top_model_line_id);
1628:
1629: IF l_top_model_index = FND_API.G_MISS_NUM THEN
1630:
1631: l_line_tbl(k).item_type_code := OE_GLOBALS.G_ITEM_STANDARD;
1632: l_line_tbl(k).option_number := NULL;
1633: l_line_tbl(k).component_number := NULL;
1634: l_line_tbl(k).split_from_line_id := NULL;
1635: l_line_tbl(k).split_by := NULL;

Line 1648: l_line_tbl(k).item_type_code := OE_GLOBALS.G_ITEM_STANDARD;

1644: l_line_tbl(k).link_to_line_id);
1645:
1646: IF l_link_to_index = FND_API.G_MISS_NUM THEN
1647:
1648: l_line_tbl(k).item_type_code := OE_GLOBALS.G_ITEM_STANDARD;
1649: l_line_tbl(k).option_number := NULL;
1650: l_line_tbl(k).component_number := NULL;
1651: l_line_tbl(k).split_from_line_id := NULL;
1652: l_line_tbl(k).split_by := NULL;

Line 1685: IF l_line_tbl(k).item_type_code = (OE_GLOBALS.G_ITEM_CLASS) THEN

1681:
1682: -- Classes get copied over as such if the parent is passed in
1683: -- else it gets deleted(Classes cannot be conveted to STANDARD)
1684:
1685: IF l_line_tbl(k).item_type_code = (OE_GLOBALS.G_ITEM_CLASS) THEN
1686:
1687: IF l_debug_level > 0 THEN
1688: oe_debug_pub.add( 'CLASS 1' || TO_CHAR ( L_LINE_TBL ( K ) .LINE_ID ) , 1 ) ;
1689: END IF;

Line 1736: IF l_line_tbl(k).item_type_code = (OE_GLOBALS.G_ITEM_SERVICE) THEN

1732: END IF; -- Class
1733:
1734: -- For the Service Lines
1735:
1736: IF l_line_tbl(k).item_type_code = (OE_GLOBALS.G_ITEM_SERVICE) THEN
1737:
1738: IF l_debug_level > 0 THEN
1739: oe_debug_pub.add( 'SERVICE ' || TO_CHAR ( L_LINE_TBL ( K ) .LINE_ID ) , 2 ) ;
1740: END IF;

Line 1755: (OE_GLOBALS.G_ITEM_CLASS) THEN

1751: l_line_tbl.delete(k);
1752: GOTO Leave_record_as_is;
1753: ELSE
1754: IF l_line_tbl(l_service_index).item_type_code =
1755: (OE_GLOBALS.G_ITEM_CLASS) THEN
1756:
1757: IF l_line_tbl(l_service_index).top_model_line_id
1758: IS NOT NULL THEN
1759:

Line 1814: ,p_line_id_tbl IN OE_GLOBALS.Selected_Record_Tbl

1810: END Handle_NonStandard_Lines;
1811:
1812: Procedure Load_Lines
1813: ( p_num_lines IN NUMBER
1814: ,p_line_id_tbl IN OE_GLOBALS.Selected_Record_Tbl
1815: ,p_all_lines IN VARCHAR2
1816: ,p_incl_cancelled IN VARCHAR2
1817: ,p_header_id IN NUMBER
1818: ,p_hdr_type_id IN NUMBER

Line 1941: IF x_line_tbl(I).item_type_code = OE_GLOBALS.G_ITEM_OPTION

1937: FOR I in x_line_tbl.FIRST .. x_line_tbl.LAST LOOP
1938:
1939: l_top_model_index := FND_API.G_MISS_NUM;
1940:
1941: IF x_line_tbl(I).item_type_code = OE_GLOBALS.G_ITEM_OPTION
1942: OR x_line_tbl(I).item_type_code = OE_GLOBALS.G_ITEM_CLASS THEN
1943:
1944:
1945: l_top_model_index := Find_LineIndex(x_line_tbl,

Line 1942: OR x_line_tbl(I).item_type_code = OE_GLOBALS.G_ITEM_CLASS THEN

1938:
1939: l_top_model_index := FND_API.G_MISS_NUM;
1940:
1941: IF x_line_tbl(I).item_type_code = OE_GLOBALS.G_ITEM_OPTION
1942: OR x_line_tbl(I).item_type_code = OE_GLOBALS.G_ITEM_CLASS THEN
1943:
1944:
1945: l_top_model_index := Find_LineIndex(x_line_tbl,
1946: x_line_tbl(I).top_model_line_id);

Line 1949: ELSIF x_line_tbl(I).item_type_code = OE_GLOBALS.G_ITEM_KIT

1945: l_top_model_index := Find_LineIndex(x_line_tbl,
1946: x_line_tbl(I).top_model_line_id);
1947: x_line_tbl(I).top_model_line_index := l_top_model_index;
1948:
1949: ELSIF x_line_tbl(I).item_type_code = OE_GLOBALS.G_ITEM_KIT
1950: THEN
1951:
1952: IF x_line_tbl(I).top_model_line_id <> x_line_tbl(I).line_id THEN
1953:

Line 1964: ELSIF x_line_tbl(I).item_type_code = OE_GLOBALS.G_ITEM_MODEL

1960: -- ## fixed as a prt of 1826688, however we need to always
1961: -- populate the top_model_line_index on the model line,
1962: -- irrespective of this bug fix.
1963:
1964: ELSIF x_line_tbl(I).item_type_code = OE_GLOBALS.G_ITEM_MODEL
1965: THEN
1966: x_line_tbl(I).top_model_line_index := I;
1967:
1968: /* Start 3923574 */

Line 2117: ELSIF x_line_tbl(I).item_type_code = OE_GLOBALS.G_ITEM_SERVICE

2113: END IF;
2114: /* End - Code for bug 1923460 */
2115:
2116: -- Set service line index for service lines.
2117: ELSIF x_line_tbl(I).item_type_code = OE_GLOBALS.G_ITEM_SERVICE
2118: THEN
2119:
2120: l_top_model_index := Find_LineIndex(x_line_tbl,
2121: x_line_tbl(I).service_reference_line_id);

Line 3108: p_x_line_tbl(k).operation := OE_GLOBALS.G_OPR_CREATE;

3104: p_x_line_tbl(k).calculate_price_flag := 'P';
3105: END IF;
3106:
3107: -- Set operation
3108: p_x_line_tbl(k).operation := OE_GLOBALS.G_OPR_CREATE;
3109:
3110: -- Set source Information
3111: p_x_line_tbl(k).source_document_type_id := 2;
3112: p_x_line_tbl(k).source_document_id := l_temp_line_rec.header_id;

Line 3238: x_line_scredit_tbl(I).operation := OE_GLOBALS.G_OPR_CREATE;

3234:
3235: x_Line_scredit_tbl(I) := l_sub_scredit_tbl(j);
3236:
3237: -- Init columns
3238: x_line_scredit_tbl(I).operation := OE_GLOBALS.G_OPR_CREATE;
3239: x_Line_scredit_tbl(I).line_index := k;
3240: x_Line_scredit_tbl(I).header_id := FND_API.G_MISS_NUM;
3241: x_Line_scredit_tbl(I).line_id := FND_API.G_MISS_NUM;
3242: x_Line_scredit_tbl(I).sales_credit_id := FND_API.G_MISS_NUM;

Line 3365: x_line_payment_tbl(I).operation := OE_GLOBALS.G_OPR_CREATE;

3361: goto Next_Payment;
3362: END IF;
3363: x_Line_payment_tbl(I) := l_sub_payment_tbl(j);
3364: -- Init columns
3365: x_line_payment_tbl(I).operation := OE_GLOBALS.G_OPR_CREATE;
3366: x_Line_payment_tbl(I).header_id := FND_API.G_MISS_NUM;
3367: x_Line_payment_tbl(I).line_id := FND_API.G_MISS_NUM;
3368: x_Line_payment_tbl(I).line_index := k;
3369: --bug5741708 setting the payment_number to G_MISS_NUM since we aren't copying commitments

Line 3553: ,p_hdr_id_tbl IN OE_GLOBALS.Selected_Record_Tbl

3549:
3550:
3551: PROCEDURE Copy_Order
3552: ( p_copy_rec IN copy_rec_type
3553: ,p_hdr_id_tbl IN OE_GLOBALS.Selected_Record_Tbl
3554: ,p_line_id_tbl IN OE_GLOBALS.Selected_Record_Tbl
3555: ,x_header_id OUT NOCOPY NUMBER
3556: ,x_return_status OUT NOCOPY VARCHAR2
3557: ,x_msg_count OUT NOCOPY NUMBER

Line 3554: ,p_line_id_tbl IN OE_GLOBALS.Selected_Record_Tbl

3550:
3551: PROCEDURE Copy_Order
3552: ( p_copy_rec IN copy_rec_type
3553: ,p_hdr_id_tbl IN OE_GLOBALS.Selected_Record_Tbl
3554: ,p_line_id_tbl IN OE_GLOBALS.Selected_Record_Tbl
3555: ,x_header_id OUT NOCOPY NUMBER
3556: ,x_return_status OUT NOCOPY VARCHAR2
3557: ,x_msg_count OUT NOCOPY NUMBER
3558: ,x_msg_data OUT NOCOPY VARCHAR2)

Line 3578: l_control_rec OE_GLOBALS.Control_Rec_Type;

3574: k NUMBER; -- Used as loop index.
3575: j NUMBER; -- Used as loop index.
3576:
3577: l_header_rec OE_Order_PUB.Header_Rec_Type;
3578: l_control_rec OE_GLOBALS.Control_Rec_Type;
3579: l_line_tbl OE_Order_PUB.Line_Tbl_Type;
3580: /* Added the following line to fix the bug 1923460 */
3581: l_top_model_tbl top_model_tbl_type;
3582: l_line_final_tbl OE_Order_PUB.Line_Tbl_Type;

Line 3641: l_hdr_id_sets_tbl OE_GLOBALS.Selected_Record_Tbl;

3637: l_cc_line_payments NUMBER;
3638:
3639: -- Copy Sets ER #2830872 , #1566254 Begin.
3640: l_sets_result VARCHAR2(1);
3641: l_hdr_id_sets_tbl OE_GLOBALS.Selected_Record_Tbl;
3642: l_sets_found_flag BOOLEAN := FALSE;
3643: l_sets NUMBER := 0;
3644: l_sets_header_id NUMBER;
3645: l_copy_fulfill_sets BOOLEAN := FALSE;

Line 3748: l_header_rec.operation := OE_GLOBALS.G_OPR_CREATE;

3744: p_copy_rec,
3745: l_header_rec);
3746:
3747: ---- Creating New Sales Order or Quoted Order
3748: l_header_rec.operation := OE_GLOBALS.G_OPR_CREATE;
3749: l_header_rec.transaction_phase_code := p_copy_rec.new_phase;
3750:
3751: IF l_debug_level > 0 THEN
3752: oe_debug_pub.add( 'AK1 HEADER ID ' || TO_CHAR ( L_HEADER_ID ) , 2 ) ;

Line 3850: l_header_rec.operation := OE_GLOBALS.G_OPR_CREATE;

3846:
3847: END IF;
3848:
3849: END IF; -- l_line_header_id
3850: l_header_rec.operation := OE_GLOBALS.G_OPR_CREATE;
3851: END IF; -- IF FND_API.to_Boolean(p_copy_rec.hdr_info)
3852:
3853: -- Copy Header Sales Credits if desired.
3854: IF FND_API.to_Boolean(p_copy_rec.hdr_scredits) THEN

Line 3992: l_header_rec.operation := OE_GLOBALS.G_OPR_NONE; -- Add Lines to Existing Order

3988: -- R12 CC Encryption
3989: ELSE -- Append to Existing Order
3990: l_destination_header_id := p_copy_rec.append_to_header_id;
3991: l_header_rec.header_id := p_copy_rec.append_to_header_id;
3992: l_header_rec.operation := OE_GLOBALS.G_OPR_NONE; -- Add Lines to Existing Order
3993: -- May need to explode config for line level COPY.
3994: IF p_copy_rec.source_block_type = 'LINE' AND
3995: p_copy_rec.copy_complete_config = FND_API.G_TRUE
3996: THEN

Line 4125: l_control_rec.process_entity := OE_GLOBALS.G_ENTITY_ALL;

4121: l_control_rec.clear_dependents := FALSE;
4122: l_control_rec.validate_entity := TRUE;
4123: l_control_rec.write_to_DB := TRUE;
4124: l_control_rec.process := TRUE;
4125: l_control_rec.process_entity := OE_GLOBALS.G_ENTITY_ALL;
4126:
4127: -- Instruct API to process as many records as it can
4128:
4129: l_control_rec.Process_Partial := TRUE;

Line 4171: ,p_validation_level => OE_GLOBALS.G_VALID_PARTIAL_WITH_DEF

4167: OE_Order_PVT.Process_Order(
4168: p_api_version_number => 1
4169: ,p_init_msg_list => FND_API.G_FALSE
4170: -- to keep messages between calls
4171: ,p_validation_level => OE_GLOBALS.G_VALID_PARTIAL_WITH_DEF
4172: -- to miss out invalid attrs.
4173: ,p_control_rec => l_control_rec
4174: ,p_x_header_rec => l_header_rec
4175: ,p_x_header_Adj_tbl => l_header_Adj_out_tbl

Line 4332: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER

4328:
4329: IF FND_API.to_Boolean( p_copy_rec.hdr_attchmnts ) THEN
4330:
4331: OE_Atchmt_Util.Copy_Attachments
4332: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER
4333: ,p_from_entity_id => G_ATT_HEADER_ID
4334: ,p_to_entity_id => l_header_rec.header_id
4335: ,p_manual_attachments_only => 'Y'
4336: ,x_return_status => l_return_status);

Line 4365: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE

4361: IF ( l_line_tbl(k).return_status = FND_API.g_ret_sts_success ) THEN
4362:
4363: IF FND_API.to_Boolean( p_copy_rec.line_attchmnts ) THEN
4364: OE_Atchmt_Util.Copy_Attachments
4365: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE
4366: ,p_from_entity_id => l_line_tbl(k).source_document_line_id
4367: ,p_to_entity_id => l_line_tbl(k).line_id
4368: ,p_manual_attachments_only => 'Y'
4369: ,x_return_status => l_return_status);

Line 4905: IF NOT OE_GLOBALS.EQUAL(l_copied_rec.source_document_type_id(i),2) THEN

4901:
4902: -- Ignore the line if it is not created by COPY. This may also include
4903: -- lines which are created as a part of the COPY call.
4904:
4905: IF NOT OE_GLOBALS.EQUAL(l_copied_rec.source_document_type_id(i),2) THEN
4906: IF l_debug_level > 0 THEN
4907: oe_debug_pub.add( 'THIS IS NON COPIED LINE' , 1 ) ;
4908: END IF;
4909: GOTO NOT_COPIED_LINE;

Line 5016: NOT OE_GLOBALS.EQUAL(l_line_number_ctr,l_copied_rec.line_number(i))

5012: <>
5013:
5014:
5015: IF l_copied_rec.line_number(i) IS NOT NULL AND
5016: NOT OE_GLOBALS.EQUAL(l_line_number_ctr,l_copied_rec.line_number(i))
5017: AND NOT OE_GLOBALS.EQUAL(l_copied_rec.line_number(i),
5018: l_prev_line_number)
5019: THEN
5020: l_line_number_ctr := NVL(l_line_number_ctr,0) + 1;

Line 5017: AND NOT OE_GLOBALS.EQUAL(l_copied_rec.line_number(i),

5013:
5014:
5015: IF l_copied_rec.line_number(i) IS NOT NULL AND
5016: NOT OE_GLOBALS.EQUAL(l_line_number_ctr,l_copied_rec.line_number(i))
5017: AND NOT OE_GLOBALS.EQUAL(l_copied_rec.line_number(i),
5018: l_prev_line_number)
5019: THEN
5020: l_line_number_ctr := NVL(l_line_number_ctr,0) + 1;
5021: l_shipment_number_ctr := NULL;

Line 5033: NOT OE_GLOBALS.EQUAL(l_shipment_number_ctr,

5029:
5030: l_copied_rec.line_number(i) := l_line_number_ctr;
5031:
5032: IF l_copied_rec.shipment_number(i) IS NOT NULL AND
5033: NOT OE_GLOBALS.EQUAL(l_shipment_number_ctr,
5034: l_copied_rec.shipment_number(i))
5035: THEN
5036: l_shipment_number_ctr := NVL(l_shipment_number_ctr,0) + 1;
5037: l_option_number_ctr := NULL;

Line 5049: NOT OE_GLOBALS.EQUAL(l_option_number_ctr,

5045: l_copied_rec.shipment_number(i) := l_shipment_number_ctr;
5046:
5047: <> --Bug5757050
5048: IF l_copied_rec.option_number(i) IS NOT NULL AND
5049: NOT OE_GLOBALS.EQUAL(l_option_number_ctr,
5050: l_copied_rec.option_number(i))
5051: THEN
5052: l_option_number_ctr := NVL(l_option_number_ctr,0) + 1;
5053: l_comp_number_ctr := NULL;

Line 5064: NOT OE_GLOBALS.EQUAL(l_comp_number_ctr,

5060: l_copied_rec.option_number(i) := l_option_number_ctr;
5061:
5062: <>
5063: IF l_copied_rec.component_number(i) IS NOT NULL AND
5064: NOT OE_GLOBALS.EQUAL(l_comp_number_ctr,
5065: l_copied_rec.component_number(i))
5066: THEN
5067: l_comp_number_ctr := NVL(l_comp_number_ctr,0) + 1;
5068: l_service_number_ctr := NULL;

Line 5078: NOT OE_GLOBALS.EQUAL(l_service_number_ctr,

5074: l_copied_rec.component_number(i) := l_comp_number_ctr;
5075:
5076: <>
5077: IF l_copied_rec.service_number(i) IS NOT NULL AND
5078: NOT OE_GLOBALS.EQUAL(l_service_number_ctr,
5079: l_copied_rec.service_number(i))
5080: THEN
5081: l_service_number_ctr := NVL(l_service_number_ctr,0) + 1;
5082: IF l_debug_level > 0 THEN

Line 5219: PROCEDURE sort_line_tbl(p_line_id_tbl IN OE_GLOBALS.Selected_Record_Tbl,

5215: -- This is called from the Load Lines procedure if any
5216: -- lines are being copied.
5217: ---------------------------------------------------------------------------------
5218:
5219: PROCEDURE sort_line_tbl(p_line_id_tbl IN OE_GLOBALS.Selected_Record_Tbl,
5220: p_version_number IN NUMBER,
5221: p_phase_change_flag IN VARCHAR2,
5222: p_num_lines IN NUMBER,
5223: x_line_tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Tbl_Type)

Line 5813: l_selected_line_tbl OE_GLOBALS.Selected_Record_Tbl;

5809: x_result OUT NOCOPY VARCHAR2)
5810: IS
5811:
5812: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
5813: l_selected_line_tbl OE_GLOBALS.Selected_Record_Tbl;
5814: I NUMBER := 0;
5815: l_set_id NUMBER;
5816: l_return_status VARCHAR2(30);
5817: l_msg_count NUMBER :=0;