DBA Data[Home] [Help]

APPS.AHL_OSP_SHIPMENT_PUB dependencies on OE_GLOBALS

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

954: --LOOP throught all header ids
955: IF (p_oe_header_tbl.COUNT > 0) THEN
956: FOR i IN p_oe_header_tbl.FIRST..p_oe_header_tbl.LAST LOOP
957: l_action_request_rec := OE_ORDER_PUB.G_MISS_REQUEST_REC;
958: l_action_request_rec.entity_code := OE_GLOBALS.G_ENTITY_HEADER;
959: l_action_request_rec.entity_id := p_oe_header_tbl(i);
960: l_action_request_rec.request_type := OE_GLOBALS.G_BOOK_ORDER;
961: l_action_request_tbl(i) := l_action_request_rec;
962: END LOOP;

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

956: FOR i IN p_oe_header_tbl.FIRST..p_oe_header_tbl.LAST LOOP
957: l_action_request_rec := OE_ORDER_PUB.G_MISS_REQUEST_REC;
958: l_action_request_rec.entity_code := OE_GLOBALS.G_ENTITY_HEADER;
959: l_action_request_rec.entity_id := p_oe_header_tbl(i);
960: l_action_request_rec.request_type := OE_GLOBALS.G_BOOK_ORDER;
961: l_action_request_tbl(i) := l_action_request_rec;
962: END LOOP;
963: END IF;
964:

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

1205: -- If deleteable and not gapless type
1206: IF (ahl_is_header_deleteable_csr%FOUND
1207: AND l_type <> 'G') THEN
1208: l_header_rec := OE_HEADER_UTIL.QUERY_ROW(p_header_id => p_oe_header_id);
1209: l_header_rec.operation := OE_GLOBALS.G_OPR_DELETE;
1210: ELSE
1211: l_header_rec := OE_HEADER_UTIL.QUERY_ROW(p_header_id => p_oe_header_id);
1212: l_header_rec.cancelled_flag := 'Y';
1213: l_header_rec.operation := OE_GLOBALS.G_OPR_UPDATE;

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

1209: l_header_rec.operation := OE_GLOBALS.G_OPR_DELETE;
1210: ELSE
1211: l_header_rec := OE_HEADER_UTIL.QUERY_ROW(p_header_id => p_oe_header_id);
1212: l_header_rec.cancelled_flag := 'Y';
1213: l_header_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
1214: END IF;
1215:
1216: CLOSE ahl_is_header_deleteable_csr;
1217:

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

1240: IF (ahl_is_line_deleteable_csr%FOUND) THEN
1241: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1242: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Line is deletable: Deleting line');
1243: END IF;
1244: l_line_rec.operation := OE_GLOBALS.G_OPR_DELETE;
1245: ELSE
1246: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1247: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Line is not deletable: Setting Quantity to 0 and change_reason to Not provided');
1248: END IF;

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

1247: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Line is not deletable: Setting Quantity to 0 and change_reason to Not provided');
1248: END IF;
1249: l_line_rec.ordered_quantity := 0;
1250: l_line_rec.change_reason := 'Not provided'; --No reason provided
1251: l_line_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
1252: END IF;
1253: CLOSE ahl_is_line_deleteable_csr;
1254:
1255: l_line_tbl(i) := l_line_rec;

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

1642:
1643: IF (p_header_rec.operation = 'D') THEN
1644: x_header_rec := OE_HEADER_UTIL.QUERY_ROW(p_header_id => p_header_rec.header_id);
1645: x_header_val_rec := OE_ORDER_PUB.G_MISS_HEADER_VAL_REC;
1646: x_header_rec.operation := OE_GLOBALS.G_OPR_DELETE;
1647:
1648: ELSE
1649:
1650: -- Changed by jaramana on Sep 9, 2005 for MOAC Uptake

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

1950: x_header_rec.orig_sys_document_ref := p_header_rec.osp_order_number;
1951:
1952: ------------- Operations ----------------
1953: IF (p_header_rec.operation = 'C') THEN
1954: x_header_rec.operation := OE_GLOBALS.G_OPR_CREATE;
1955: ELSIF (p_header_rec.operation = 'U') THEN
1956: x_header_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
1957: END IF;
1958: END IF; -- Not 'D'

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

1952: ------------- Operations ----------------
1953: IF (p_header_rec.operation = 'C') THEN
1954: x_header_rec.operation := OE_GLOBALS.G_OPR_CREATE;
1955: ELSIF (p_header_rec.operation = 'U') THEN
1956: x_header_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
1957: END IF;
1958: END IF; -- Not 'D'
1959:
1960: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

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

3955: -- If the shipment is booked, Delete_Cancel_Order just zeroes out the ordered quantity.
3956: -- If not, it actually deletes the shipment line.
3957: l_line_rec := OE_LINE_UTIL.QUERY_ROW(p_line_id => p_line_tbl(i).line_id);
3958: l_line_val_rec := OE_ORDER_PUB.G_MISS_LINE_VAL_REC;
3959: l_line_rec.operation := OE_GLOBALS.G_OPR_DELETE;
3960: */
3961: l_del_count := l_del_count + 1;
3962: x_del_oe_lines_tbl(l_del_count) := p_line_tbl(i).line_id;
3963: ELSE

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

4090: CLOSE ahl_oe_header_csr;
4091: END IF;
4092:
4093: IF (p_line_tbl(i).operation = 'C') THEN
4094: l_line_rec.operation := OE_GLOBALS.G_OPR_CREATE;
4095: ELSIF (p_line_tbl(i).operation = 'U') THEN
4096: l_line_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
4097: END IF;
4098:

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

4092:
4093: IF (p_line_tbl(i).operation = 'C') THEN
4094: l_line_rec.operation := OE_GLOBALS.G_OPR_CREATE;
4095: ELSIF (p_line_tbl(i).operation = 'U') THEN
4096: l_line_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
4097: END IF;
4098:
4099: -- NEED TO FIX: 'Return'
4100: IF (p_line_tbl(i).line_type_id = FND_PROFILE.VALUE('AHL_OSP_OE_RETURN_ID') AND

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

4105: l_lot_serial_rec.from_serial_number := p_line_tbl(i).serial_number;
4106: l_lot_serial_rec.lot_number := p_line_tbl(i).lot_number;
4107: l_lot_serial_rec.quantity := p_line_tbl(i).ordered_quantity;
4108: l_lot_serial_rec.line_index := i;
4109: l_lot_serial_rec.operation := OE_GLOBALS.G_OPR_CREATE;
4110: x_lot_serial_tbl(l_count) := l_lot_serial_rec;
4111: l_count := l_count + 1;
4112: ELSIF (p_line_tbl(i).operation = 'U') THEN
4113: OPEN ahl_oe_lot_serial_id (p_line_tbl(i).line_id);

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

4117: x_lot_serial_rec =>l_lot_serial_rec);
4118: l_lot_serial_rec.from_serial_number := p_line_tbl(i).serial_number;
4119: l_lot_serial_rec.lot_number := p_line_tbl(i).lot_number;
4120: l_lot_serial_rec.quantity := p_line_tbl(i).ordered_quantity;
4121: l_lot_serial_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
4122: x_lot_serial_tbl(l_count) := l_lot_serial_rec;
4123: l_count := l_count + 1;
4124: END IF;
4125: CLOSE ahl_oe_lot_serial_id;

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

6184: l_header_rec := OE_ORDER_PUB.G_MISS_HEADER_REC;
6185: l_line_tbl := OE_ORDER_PUB.G_MISS_LINE_TBL;
6186:
6187: l_header_rec.header_id := l_oe_header_id;
6188: l_header_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
6189: l_header_rec.sold_to_org_id := l_vendor_cust_dtls.customer_id;
6190: l_header_rec.ship_to_org_id := l_vendor_cust_dtls.customer_site_id;
6191:
6192: --Retrieve all the order lines

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

6201: END IF;
6202: l_oe_line_rec.line_id := l_oe_line_id;
6203: l_oe_line_rec.sold_to_org_id := l_vendor_cust_dtls.customer_id;
6204: l_oe_line_rec.ship_to_org_id := l_vendor_cust_dtls.customer_site_id;
6205: l_oe_line_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
6206: l_line_tbl(l_count) := l_oe_line_rec;
6207: l_count := l_count + 1;
6208: END LOOP;
6209: CLOSE get_oe_order_lines;

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

7199: l_oe_line_tbl(1) := l_oe_line_rec;
7200: l_oe_line_tbl(1).inventory_item_id := l_inventory_item_id;
7201: l_oe_line_tbl(1).line_id := FND_API.G_MISS_NUM;
7202: l_oe_line_tbl(1).line_number := FND_API.G_MISS_NUM;
7203: l_oe_line_tbl(1).operation := OE_GLOBALS.G_OPR_CREATE;
7204: --l_oe_lot_serial_tbl(1) := l_oe_lot_serial_rec;
7205: --Do not use the lot serial record as is.
7206: l_oe_lot_serial_tbl(1).lot_serial_id := FND_API.G_MISS_NUM;
7207: l_oe_lot_serial_tbl(1).lot_number := l_serialnum_change_rec.new_lot_number;

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

7207: l_oe_lot_serial_tbl(1).lot_number := l_serialnum_change_rec.new_lot_number;
7208: l_oe_lot_serial_tbl(1).from_serial_number := l_serialnum_change_rec.new_serial_number;
7209: l_oe_lot_serial_tbl(1).quantity := l_oe_lot_serial_rec.quantity;
7210: l_oe_lot_serial_tbl(1).line_index := 1;
7211: l_oe_lot_serial_tbl(1).operation := OE_GLOBALS.G_OPR_CREATE;
7212:
7213: ELSIF (l_serial_num_changed = 'Y') THEN
7214: --Part Number change has not happened. Do not create a new shipment line. But only update the serial num record.
7215: --Just populate the lot serial record to be updated.

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

7221: though it will effectively not have any changes.
7222: */
7223: l_oe_lot_serial_rec.from_serial_number := l_serialnum_change_rec.new_serial_number;
7224: l_oe_lot_serial_rec.lot_number := l_serialnum_change_rec.new_lot_number;
7225: l_oe_lot_serial_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
7226: l_oe_lot_serial_tbl(1) := l_oe_lot_serial_rec;
7227: END IF;
7228:
7229: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN