DBA Data[Home] [Help]

APPS.AHL_OSP_SHIPMENT_PUB dependencies on OE_GLOBALS

Line 993: l_action_request_rec.entity_code := OE_GLOBALS.G_ENTITY_HEADER;

989: --LOOP throught all header ids
990: IF (p_oe_header_tbl.COUNT > 0) THEN
991: FOR i IN p_oe_header_tbl.FIRST..p_oe_header_tbl.LAST LOOP
992: l_action_request_rec := OE_ORDER_PUB.G_MISS_REQUEST_REC;
993: l_action_request_rec.entity_code := OE_GLOBALS.G_ENTITY_HEADER;
994: l_action_request_rec.entity_id := p_oe_header_tbl(i);
995: l_action_request_rec.request_type := OE_GLOBALS.G_BOOK_ORDER;
996: l_action_request_tbl(i) := l_action_request_rec;
997: END LOOP;

Line 995: l_action_request_rec.request_type := OE_GLOBALS.G_BOOK_ORDER;

991: FOR i IN p_oe_header_tbl.FIRST..p_oe_header_tbl.LAST LOOP
992: l_action_request_rec := OE_ORDER_PUB.G_MISS_REQUEST_REC;
993: l_action_request_rec.entity_code := OE_GLOBALS.G_ENTITY_HEADER;
994: l_action_request_rec.entity_id := p_oe_header_tbl(i);
995: l_action_request_rec.request_type := OE_GLOBALS.G_BOOK_ORDER;
996: l_action_request_tbl(i) := l_action_request_rec;
997: END LOOP;
998: END IF;
999:

Line 1244: l_header_rec.operation := OE_GLOBALS.G_OPR_DELETE;

1240: -- If deleteable and not gapless type
1241: IF (ahl_is_header_deleteable_csr%FOUND
1242: AND l_type <> 'G') THEN
1243: l_header_rec := OE_HEADER_UTIL.QUERY_ROW(p_header_id => p_oe_header_id);
1244: l_header_rec.operation := OE_GLOBALS.G_OPR_DELETE;
1245: ELSE
1246: l_header_rec := OE_HEADER_UTIL.QUERY_ROW(p_header_id => p_oe_header_id);
1247: l_header_rec.cancelled_flag := 'Y';
1248: l_header_rec.operation := OE_GLOBALS.G_OPR_UPDATE;

Line 1248: l_header_rec.operation := OE_GLOBALS.G_OPR_UPDATE;

1244: l_header_rec.operation := OE_GLOBALS.G_OPR_DELETE;
1245: ELSE
1246: l_header_rec := OE_HEADER_UTIL.QUERY_ROW(p_header_id => p_oe_header_id);
1247: l_header_rec.cancelled_flag := 'Y';
1248: l_header_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
1249: END IF;
1250:
1251: CLOSE ahl_is_header_deleteable_csr;
1252:

Line 1279: l_line_rec.operation := OE_GLOBALS.G_OPR_DELETE;

1275: IF (ahl_is_line_deleteable_csr%FOUND) THEN
1276: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1277: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Line is deletable: Deleting line');
1278: END IF;
1279: l_line_rec.operation := OE_GLOBALS.G_OPR_DELETE;
1280: ELSE
1281: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1282: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Line is not deletable: Setting Quantity to 0 and change_reason to Not provided');
1283: END IF;

Line 1286: l_line_rec.operation := OE_GLOBALS.G_OPR_UPDATE;

1282: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Line is not deletable: Setting Quantity to 0 and change_reason to Not provided');
1283: END IF;
1284: l_line_rec.ordered_quantity := 0;
1285: l_line_rec.change_reason := 'Not provided'; --No reason provided
1286: l_line_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
1287: END IF;
1288: CLOSE ahl_is_line_deleteable_csr;
1289:
1290: l_line_tbl(i) := l_line_rec;

Line 1681: x_header_rec.operation := OE_GLOBALS.G_OPR_DELETE;

1677:
1678: IF (p_header_rec.operation = 'D') THEN
1679: x_header_rec := OE_HEADER_UTIL.QUERY_ROW(p_header_id => p_header_rec.header_id);
1680: x_header_val_rec := OE_ORDER_PUB.G_MISS_HEADER_VAL_REC;
1681: x_header_rec.operation := OE_GLOBALS.G_OPR_DELETE;
1682:
1683: ELSE
1684:
1685: -- Changed by jaramana on Sep 9, 2005 for MOAC Uptake

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

1985: x_header_rec.orig_sys_document_ref := p_header_rec.osp_order_number;
1986:
1987: ------------- Operations ----------------
1988: IF (p_header_rec.operation = 'C') THEN
1989: x_header_rec.operation := OE_GLOBALS.G_OPR_CREATE;
1990: ELSIF (p_header_rec.operation = 'U') THEN
1991: x_header_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
1992: END IF;
1993: END IF; -- Not 'D'

Line 1991: x_header_rec.operation := OE_GLOBALS.G_OPR_UPDATE;

1987: ------------- Operations ----------------
1988: IF (p_header_rec.operation = 'C') THEN
1989: x_header_rec.operation := OE_GLOBALS.G_OPR_CREATE;
1990: ELSIF (p_header_rec.operation = 'U') THEN
1991: x_header_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
1992: END IF;
1993: END IF; -- Not 'D'
1994:
1995: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 3943: l_line_rec.operation := OE_GLOBALS.G_OPR_DELETE;

3939: -- If the shipment is booked, Delete_Cancel_Order just zeroes out the ordered quantity.
3940: -- If not, it actually deletes the shipment line.
3941: l_line_rec := OE_LINE_UTIL.QUERY_ROW(p_line_id => p_line_tbl(i).line_id);
3942: l_line_val_rec := OE_ORDER_PUB.G_MISS_LINE_VAL_REC;
3943: l_line_rec.operation := OE_GLOBALS.G_OPR_DELETE;
3944: */
3945: l_del_count := l_del_count + 1;
3946: x_del_oe_lines_tbl(l_del_count) := p_line_tbl(i).line_id;
3947: ELSE

Line 4078: l_line_rec.operation := OE_GLOBALS.G_OPR_CREATE;

4074: CLOSE ahl_oe_header_csr;
4075: END IF;
4076:
4077: IF (p_line_tbl(i).operation = 'C') THEN
4078: l_line_rec.operation := OE_GLOBALS.G_OPR_CREATE;
4079: ELSIF (p_line_tbl(i).operation = 'U') THEN
4080: l_line_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
4081: END IF;
4082:

Line 4080: l_line_rec.operation := OE_GLOBALS.G_OPR_UPDATE;

4076:
4077: IF (p_line_tbl(i).operation = 'C') THEN
4078: l_line_rec.operation := OE_GLOBALS.G_OPR_CREATE;
4079: ELSIF (p_line_tbl(i).operation = 'U') THEN
4080: l_line_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
4081: END IF;
4082:
4083: -- NEED TO FIX: 'Return'
4084: IF (p_line_tbl(i).line_type_id = FND_PROFILE.VALUE('AHL_OSP_OE_RETURN_ID') AND

Line 4093: l_lot_serial_rec.operation := OE_GLOBALS.G_OPR_CREATE;

4089: l_lot_serial_rec.from_serial_number := p_line_tbl(i).serial_number;
4090: l_lot_serial_rec.lot_number := p_line_tbl(i).lot_number;
4091: l_lot_serial_rec.quantity := p_line_tbl(i).ordered_quantity;
4092: l_lot_serial_rec.line_index := i;
4093: l_lot_serial_rec.operation := OE_GLOBALS.G_OPR_CREATE;
4094: x_lot_serial_tbl(l_count) := l_lot_serial_rec;
4095: l_count := l_count + 1;
4096: ELSIF (p_line_tbl(i).operation = 'U') THEN
4097: OPEN ahl_oe_lot_serial_id (p_line_tbl(i).line_id);

Line 4105: l_lot_serial_rec.operation := OE_GLOBALS.G_OPR_UPDATE;

4101: x_lot_serial_rec =>l_lot_serial_rec);
4102: l_lot_serial_rec.from_serial_number := p_line_tbl(i).serial_number;
4103: l_lot_serial_rec.lot_number := p_line_tbl(i).lot_number;
4104: l_lot_serial_rec.quantity := p_line_tbl(i).ordered_quantity;
4105: l_lot_serial_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
4106: x_lot_serial_tbl(l_count) := l_lot_serial_rec;
4107: l_count := l_count + 1;
4108: END IF;
4109: CLOSE ahl_oe_lot_serial_id;

Line 6233: l_header_rec.operation := OE_GLOBALS.G_OPR_UPDATE;

6229: l_header_rec := OE_ORDER_PUB.G_MISS_HEADER_REC;
6230: l_line_tbl := OE_ORDER_PUB.G_MISS_LINE_TBL;
6231:
6232: l_header_rec.header_id := l_oe_header_id;
6233: l_header_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
6234: l_header_rec.sold_to_org_id := l_vendor_cust_dtls.customer_id;
6235: l_header_rec.ship_to_org_id := l_vendor_cust_dtls.customer_site_id;
6236:
6237: --Retrieve all the order lines

Line 6250: l_oe_line_rec.operation := OE_GLOBALS.G_OPR_UPDATE;

6246: END IF;
6247: l_oe_line_rec.line_id := l_oe_line_id;
6248: l_oe_line_rec.sold_to_org_id := l_vendor_cust_dtls.customer_id;
6249: l_oe_line_rec.ship_to_org_id := l_vendor_cust_dtls.customer_site_id;
6250: l_oe_line_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
6251: l_line_tbl(l_count) := l_oe_line_rec;
6252: l_count := l_count + 1;
6253: END LOOP;
6254: CLOSE get_oe_order_lines;

Line 7253: l_oe_line_tbl(1).operation := OE_GLOBALS.G_OPR_CREATE;

7249: l_oe_line_tbl(1) := l_oe_line_rec;
7250: l_oe_line_tbl(1).inventory_item_id := l_inventory_item_id;
7251: l_oe_line_tbl(1).line_id := FND_API.G_MISS_NUM;
7252: l_oe_line_tbl(1).line_number := FND_API.G_MISS_NUM;
7253: l_oe_line_tbl(1).operation := OE_GLOBALS.G_OPR_CREATE;
7254: --l_oe_lot_serial_tbl(1) := l_oe_lot_serial_rec;
7255: --Do not use the lot serial record as is.
7256: l_oe_lot_serial_tbl(1).lot_serial_id := FND_API.G_MISS_NUM;
7257: l_oe_lot_serial_tbl(1).lot_number := l_serialnum_change_rec.new_lot_number;

Line 7261: l_oe_lot_serial_tbl(1).operation := OE_GLOBALS.G_OPR_CREATE;

7257: l_oe_lot_serial_tbl(1).lot_number := l_serialnum_change_rec.new_lot_number;
7258: l_oe_lot_serial_tbl(1).from_serial_number := l_serialnum_change_rec.new_serial_number;
7259: l_oe_lot_serial_tbl(1).quantity := l_oe_lot_serial_rec.quantity;
7260: l_oe_lot_serial_tbl(1).line_index := 1;
7261: l_oe_lot_serial_tbl(1).operation := OE_GLOBALS.G_OPR_CREATE;
7262:
7263: ELSIF (l_serial_num_changed = 'Y') THEN
7264: --Part Number change has not happened. Do not create a new shipment line. But only update the serial num record.
7265: --Just populate the lot serial record to be updated.

Line 7275: l_oe_lot_serial_rec.operation := OE_GLOBALS.G_OPR_UPDATE;

7271: though it will effectively not have any changes.
7272: */
7273: l_oe_lot_serial_rec.from_serial_number := l_serialnum_change_rec.new_serial_number;
7274: l_oe_lot_serial_rec.lot_number := l_serialnum_change_rec.new_lot_number;
7275: l_oe_lot_serial_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
7276: l_oe_lot_serial_tbl(1) := l_oe_lot_serial_rec;
7277: END IF;
7278:
7279: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN