eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.AHL_UMP_UF_PVT dependencies on AHL_UMP_UF_PVT

Line 1: PACKAGE BODY AHL_UMP_UF_PVT AS

1: PACKAGE BODY AHL_UMP_UF_PVT AS
2: /* $Header: AHLVUMFB.pls 120.2 2008/02/11 00:35:06 sracha ship $ */
3:
4: --G_DEBUG varchar2(1) := FND_PROFILE.VALUE('AHL_API_FILE_DEBUG_ON');
5: G_DEBUG VARCHAR2(1) := AHL_DEBUG_PUB.is_log_enabled;

Line 6: G_PKG_NAME CONSTANT VARCHAR2(30) := 'AHL_UMP_UF_PVT';

2: /* $Header: AHLVUMFB.pls 120.2 2008/02/11 00:35:06 sracha ship $ */
3:
4: --G_DEBUG varchar2(1) := FND_PROFILE.VALUE('AHL_API_FILE_DEBUG_ON');
5: G_DEBUG VARCHAR2(1) := AHL_DEBUG_PUB.is_log_enabled;
6: G_PKG_NAME CONSTANT VARCHAR2(30) := 'AHL_UMP_UF_PVT';
7: G_APP_NAME CONSTANT VARCHAR2(3) := 'AHL';
8:
9:
10: ------------------------------

Line 15: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_Rec_type

11: -- Declare Local Procedures --
12: ------------------------------
13: PROCEDURE process_uf_header(
14: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
15: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_Rec_type
16: );
17:
18: PROCEDURE convert_uf_header_val_to_id(
19: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type

Line 19: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type

15: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_Rec_type
16: );
17:
18: PROCEDURE convert_uf_header_val_to_id(
19: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type
20: );
21:
22: PROCEDURE convert_unit_header_val_to_id(
23: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type

Line 23: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type

19: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type
20: );
21:
22: PROCEDURE convert_unit_header_val_to_id(
23: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type
24: );
25:
26: PROCEDURE convert_part_header_val_to_id(
27: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type

Line 27: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type

23: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type
24: );
25:
26: PROCEDURE convert_part_header_val_to_id(
27: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type
28: );
29:
30: PROCEDURE convert_node_header_val_to_id(
31: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type

Line 31: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type

27: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type
28: );
29:
30: PROCEDURE convert_node_header_val_to_id(
31: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type
32: );
33:
34: PROCEDURE validate_uf_header(
35: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type

Line 35: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type

31: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type
32: );
33:
34: PROCEDURE validate_uf_header(
35: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type
36: );
37: PROCEDURE validate_uf_header_pm(
38: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type
39: );

Line 38: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type

34: PROCEDURE validate_uf_header(
35: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type
36: );
37: PROCEDURE validate_uf_header_pm(
38: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type
39: );
40:
41: PROCEDURE default_unchanged_uf_header(
42: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_Rec_type

Line 42: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_Rec_type

38: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type
39: );
40:
41: PROCEDURE default_unchanged_uf_header(
42: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_Rec_type
43: );
44:
45: PROCEDURE process_uf_details(
46: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

Line 47: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type,

43: );
44:
45: PROCEDURE process_uf_details(
46: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
47: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type,
48: p_x_uf_details_tbl IN OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type
49: );
50:
51:

Line 48: p_x_uf_details_tbl IN OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type

44:
45: PROCEDURE process_uf_details(
46: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
47: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type,
48: p_x_uf_details_tbl IN OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type
49: );
50:
51:
52: PROCEDURE validate_uf_details(

Line 53: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type,

49: );
50:
51:
52: PROCEDURE validate_uf_details(
53: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type,
54: p_x_uf_details_tbl IN OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type
55: );
56:
57: PROCEDURE default_unchanged_uf_details(

Line 54: p_x_uf_details_tbl IN OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type

50:
51:
52: PROCEDURE validate_uf_details(
53: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type,
54: p_x_uf_details_tbl IN OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type
55: );
56:
57: PROCEDURE default_unchanged_uf_details(
58: p_x_uf_details_tbl IN OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type

Line 58: p_x_uf_details_tbl IN OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type

54: p_x_uf_details_tbl IN OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type
55: );
56:
57: PROCEDURE default_unchanged_uf_details(
58: p_x_uf_details_tbl IN OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type
59: );
60:
61: PROCEDURE validate_utilization_forecast(
62: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_rec_type,

Line 62: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_rec_type,

58: p_x_uf_details_tbl IN OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type
59: );
60:
61: PROCEDURE validate_utilization_forecast(
62: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_rec_type,
63: x_uf_details_tbl OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type
64: );
65:
66: PROCEDURE post_process_uf_header(

Line 63: x_uf_details_tbl OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type

59: );
60:
61: PROCEDURE validate_utilization_forecast(
62: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_rec_type,
63: x_uf_details_tbl OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type
64: );
65:
66: PROCEDURE post_process_uf_header(
67: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type

Line 67: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type

63: x_uf_details_tbl OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type
64: );
65:
66: PROCEDURE post_process_uf_header(
67: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type
68: );
69:
70: ------------------------
71: -- Declare Procedures --

Line 100: -- p_x_uf_header_rec IN OUT AHL_UMP_UF_PVT.uf_header_rec_type Required

96: -- on which the Id's are populated.
97: --
98: -- process_utilization_forecast Parameters:
99: --
100: -- p_x_uf_header_rec IN OUT AHL_UMP_UF_PVT.uf_header_rec_type Required
101: -- Utilization Forecast Header Details
102: -- p_x_uf_detail_tbl IN OUT AHL_UMP_UF_PVT.uf_detail_tbl_type Required
103: -- Utilization Forecast details
104: --

Line 102: -- p_x_uf_detail_tbl IN OUT AHL_UMP_UF_PVT.uf_detail_tbl_type Required

98: -- process_utilization_forecast Parameters:
99: --
100: -- p_x_uf_header_rec IN OUT AHL_UMP_UF_PVT.uf_header_rec_type Required
101: -- Utilization Forecast Header Details
102: -- p_x_uf_detail_tbl IN OUT AHL_UMP_UF_PVT.uf_detail_tbl_type Required
103: -- Utilization Forecast details
104: --
105: --
106: -- Version :

Line 117: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type,

113: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
114: p_commit IN VARCHAR2 := FND_API.G_FALSE,
115: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
116: p_module_type IN VARCHAR2 := NULL,
117: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type,
118: p_x_uf_details_tbl IN OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type,
119: x_return_status OUT NOCOPY VARCHAR2,
120: x_msg_count OUT NOCOPY NUMBER,
121: x_msg_data OUT NOCOPY VARCHAR2) IS

Line 118: p_x_uf_details_tbl IN OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type,

114: p_commit IN VARCHAR2 := FND_API.G_FALSE,
115: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
116: p_module_type IN VARCHAR2 := NULL,
117: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type,
118: p_x_uf_details_tbl IN OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type,
119: x_return_status OUT NOCOPY VARCHAR2,
120: x_msg_count OUT NOCOPY NUMBER,
121: x_msg_data OUT NOCOPY VARCHAR2) IS
122:

Line 260: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_Rec_type

256: -- This procedure processes uf_header_rec
257: ----------------------------------------------------------
258: PROCEDURE process_uf_header(
259: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
260: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_Rec_type
261: ) IS
262: BEGIN
263: -- Convert values to ID's for header rec
264: IF (p_validation_level = FND_API.G_VALID_LEVEL_FULL )

Line 278: IF(p_x_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE) THEN

274: END IF;
275: default_unchanged_uf_header(p_x_uf_header_rec => p_x_uf_header_rec);
276:
277: --save uf header now
278: IF(p_x_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE) THEN
279: --setting object version number for create
280: p_x_uf_header_rec.object_version_number := 1;
281: --setting up user/create/update information
282: p_x_uf_header_rec.created_by := fnd_global.user_id;

Line 319: ELSIF (p_x_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_UPDATE) THEN

315: x_attribute13 => p_x_uf_header_rec.attribute13,
316: x_attribute14 => p_x_uf_header_rec.attribute14,
317: x_attribute15 => p_x_uf_header_rec.attribute15
318: );
319: ELSIF (p_x_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_UPDATE) THEN
320:
321: -- setting up object version number
322: p_x_uf_header_rec.object_version_number := p_x_uf_header_rec.object_version_number + 1;
323: --setting up user/create/update information

Line 366: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type

362: ----------------------------------------------------------
363: -- This procedure converts values to ids for uf_header_rec
364: ----------------------------------------------------------
365: PROCEDURE convert_uf_header_val_to_id(
366: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type
367: ) IS
368:
369: BEGIN
370: -- conversion between uf_header_id : unit_config_header_id, inventory_item_id, pc_node_id

Line 372: IF(p_x_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_UNIT)THEN

368:
369: BEGIN
370: -- conversion between uf_header_id : unit_config_header_id, inventory_item_id, pc_node_id
371:
372: IF(p_x_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_UNIT)THEN
373: convert_unit_header_val_to_id(p_x_uf_header_rec);
374: ELSIF (p_x_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_PART)THEN
375: convert_part_header_val_to_id(p_x_uf_header_rec);
376: ELSIF (p_x_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_PC_NODE)THEN

Line 374: ELSIF (p_x_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_PART)THEN

370: -- conversion between uf_header_id : unit_config_header_id, inventory_item_id, pc_node_id
371:
372: IF(p_x_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_UNIT)THEN
373: convert_unit_header_val_to_id(p_x_uf_header_rec);
374: ELSIF (p_x_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_PART)THEN
375: convert_part_header_val_to_id(p_x_uf_header_rec);
376: ELSIF (p_x_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_PC_NODE)THEN
377: convert_node_header_val_to_id(p_x_uf_header_rec);
378: END IF;

Line 376: ELSIF (p_x_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_PC_NODE)THEN

372: IF(p_x_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_UNIT)THEN
373: convert_unit_header_val_to_id(p_x_uf_header_rec);
374: ELSIF (p_x_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_PART)THEN
375: convert_part_header_val_to_id(p_x_uf_header_rec);
376: ELSIF (p_x_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_PC_NODE)THEN
377: convert_node_header_val_to_id(p_x_uf_header_rec);
378: END IF;
379:
380: IF FND_MSG_PUB.count_msg > 0 THEN

Line 390: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type

386: ----------------------------------------------------------------------------------------
387: -- This procedure converts values to ids for uf_header_rec for unit utilization forecast
388: ----------------------------------------------------------------------------------------
389: PROCEDURE convert_unit_header_val_to_id(
390: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type
391: )IS
392:
393: l_uf_header_id NUMBER;
394: l_unit_config_header_id NUMBER;

Line 425: p_x_uf_header_rec.operation_flag <> AHL_UMP_UF_PVT.G_OP_CREATE) THEN

421: CLOSE unit_config_header_id_csr;
422: END IF;
423: --fetching uf_header_id based on unit_config_header_id
424: IF (p_x_uf_header_rec.unit_config_header_id IS NOT NULL AND
425: p_x_uf_header_rec.operation_flag <> AHL_UMP_UF_PVT.G_OP_CREATE) THEN
426: OPEN uf_header_id_uid_csr(p_x_uf_header_rec.unit_config_header_id);
427: FETCH uf_header_id_uid_csr INTO l_uf_header_id;
428: IF(uf_header_id_uid_csr%NOTFOUND)THEN
429: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INVOP_HREC_NOTINDB');

Line 444: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type

440: ----------------------------------------------------------------------------------------
441: -- This procedure converts values to ids for uf_header_rec for part/item utilization forecast
442: ----------------------------------------------------------------------------------------
443: PROCEDURE convert_part_header_val_to_id(
444: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type
445: )IS
446:
447: l_uf_header_id NUMBER;
448: l_inventory_item_id NUMBER;

Line 480: p_x_uf_header_rec.operation_flag <> AHL_UMP_UF_PVT.G_OP_CREATE) THEN

476: CLOSE inventory_item_id_csr;
477: END IF;
478: --fetching uf_header_id based on inventory_item_id
479: IF (p_x_uf_header_rec.inventory_item_id IS NOT NULL AND
480: p_x_uf_header_rec.operation_flag <> AHL_UMP_UF_PVT.G_OP_CREATE) THEN
481: OPEN uf_header_id_pid_csr(p_x_uf_header_rec.inventory_item_id);
482: FETCH uf_header_id_pid_csr INTO l_uf_header_id;
483: IF(uf_header_id_pid_csr%NOTFOUND)THEN
484: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INVOP_HREC_NOTINDB');

Line 498: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type

494: ----------------------------------------------------------------------------------------
495: -- This procedure converts values to ids for uf_header_rec for pc node utilization forecast
496: ----------------------------------------------------------------------------------------
497: PROCEDURE convert_node_header_val_to_id(
498: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_rec_type
499: )IS
500:
501: CURSOR uf_header_id_nid_csr(p_pc_node_id IN NUMBER) IS
502: SELECT uf_header_id

Line 510: IF p_x_uf_header_rec.operation_flag <> AHL_UMP_UF_PVT.G_OP_CREATE THEN

506: l_uf_header_id NUMBER;
507:
508:
509: BEGIN
510: IF p_x_uf_header_rec.operation_flag <> AHL_UMP_UF_PVT.G_OP_CREATE THEN
511: IF(p_x_uf_header_rec.uf_header_id IS NULL) THEN
512: IF(p_x_uf_header_rec.pc_node_id IS NULL) THEN
513: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_UFH_NODEID_NLL');
514: FND_MSG_PUB.ADD;

Line 533: -- check whether forecast type is AHL_UMP_UF_PVT.G_UF_TYPE_UNIT,AHL_UMP_UF_PVT.G_UF_TYPE_PART or AHL_UMP_UF_PVT.G_UF_TYPE_PC_NODE

529: END convert_node_header_val_to_id;
530:
531: ------------------------------------------------------------------------
532: -- This procedure does the following validations for uf_header_rec
533: -- check whether forecast type is AHL_UMP_UF_PVT.G_UF_TYPE_UNIT,AHL_UMP_UF_PVT.G_UF_TYPE_PART or AHL_UMP_UF_PVT.G_UF_TYPE_PC_NODE
534: -- check of uf_header_id , if null, verify operation flag is create AHL_UMP_UF_PVT.G_OP_CREATE, else AHL_UMP_UF_PVT.G_UF_TYPE_UNIT
535: -- check for object version number if latest. If uf_header_id is null, it should be null too.
536: -- for forecast type U : Unit
537: -- validate whether this unit is a complete Unit Configuration.

Line 534: -- check of uf_header_id , if null, verify operation flag is create AHL_UMP_UF_PVT.G_OP_CREATE, else AHL_UMP_UF_PVT.G_UF_TYPE_UNIT

530:
531: ------------------------------------------------------------------------
532: -- This procedure does the following validations for uf_header_rec
533: -- check whether forecast type is AHL_UMP_UF_PVT.G_UF_TYPE_UNIT,AHL_UMP_UF_PVT.G_UF_TYPE_PART or AHL_UMP_UF_PVT.G_UF_TYPE_PC_NODE
534: -- check of uf_header_id , if null, verify operation flag is create AHL_UMP_UF_PVT.G_OP_CREATE, else AHL_UMP_UF_PVT.G_UF_TYPE_UNIT
535: -- check for object version number if latest. If uf_header_id is null, it should be null too.
536: -- for forecast type U : Unit
537: -- validate whether this unit is a complete Unit Configuration.
538: -- validate whether this unit is attached to a complete primary PC.

Line 550: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type

546: -- validate whether this node is attached to a complete primary PC.
547: -- use unit flag should be null.
548: -------------------------------------------------------------------------
549: PROCEDURE validate_uf_header(
550: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type
551: ) IS
552:
553: CURSOR uf_header_csr (p_uf_header_id IN NUMBER) IS
554: SELECT object_version_number, unit_config_header_id,pc_node_id,inventory_item_id,inventory_org_id,use_unit_flag

Line 602: IF (p_uf_header_rec.forecast_type NOT IN(AHL_UMP_UF_PVT.G_UF_TYPE_UNIT,AHL_UMP_UF_PVT.G_UF_TYPE_PART,AHL_UMP_UF_PVT.G_UF_TYPE_PC_NODE))THEN

598:
599: BEGIN
600:
601: -- Operation Flag and Header ID validation.
602: IF (p_uf_header_rec.forecast_type NOT IN(AHL_UMP_UF_PVT.G_UF_TYPE_UNIT,AHL_UMP_UF_PVT.G_UF_TYPE_PART,AHL_UMP_UF_PVT.G_UF_TYPE_PC_NODE))THEN
603: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INV_UF_TYPE');
604: FND_MSG_PUB.ADD;
605: ELSIF (p_uf_header_rec.operation_flag IS NOT NULL AND p_uf_header_rec.operation_flag NOT IN(AHL_UMP_UF_PVT.G_OP_CREATE,AHL_UMP_UF_PVT.G_OP_UPDATE,AHL_UMP_UF_PVT.G_OP_DELETE))THEN
606: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INVOP_HEADER');

Line 605: ELSIF (p_uf_header_rec.operation_flag IS NOT NULL AND p_uf_header_rec.operation_flag NOT IN(AHL_UMP_UF_PVT.G_OP_CREATE,AHL_UMP_UF_PVT.G_OP_UPDATE,AHL_UMP_UF_PVT.G_OP_DELETE))THEN

601: -- Operation Flag and Header ID validation.
602: IF (p_uf_header_rec.forecast_type NOT IN(AHL_UMP_UF_PVT.G_UF_TYPE_UNIT,AHL_UMP_UF_PVT.G_UF_TYPE_PART,AHL_UMP_UF_PVT.G_UF_TYPE_PC_NODE))THEN
603: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INV_UF_TYPE');
604: FND_MSG_PUB.ADD;
605: ELSIF (p_uf_header_rec.operation_flag IS NOT NULL AND p_uf_header_rec.operation_flag NOT IN(AHL_UMP_UF_PVT.G_OP_CREATE,AHL_UMP_UF_PVT.G_OP_UPDATE,AHL_UMP_UF_PVT.G_OP_DELETE))THEN
606: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INVOP_HEADER');
607: FND_MSG_PUB.ADD;
608: ELSIF ((p_uf_header_rec.uf_header_id IS NULL)
609: AND (p_uf_header_rec.operation_flag IS NULL OR p_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_UPDATE)) THEN

Line 609: AND (p_uf_header_rec.operation_flag IS NULL OR p_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_UPDATE)) THEN

605: ELSIF (p_uf_header_rec.operation_flag IS NOT NULL AND p_uf_header_rec.operation_flag NOT IN(AHL_UMP_UF_PVT.G_OP_CREATE,AHL_UMP_UF_PVT.G_OP_UPDATE,AHL_UMP_UF_PVT.G_OP_DELETE))THEN
606: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INVOP_HEADER');
607: FND_MSG_PUB.ADD;
608: ELSIF ((p_uf_header_rec.uf_header_id IS NULL)
609: AND (p_uf_header_rec.operation_flag IS NULL OR p_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_UPDATE)) THEN
610: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INVOP_UFHID_NLL');
611: FND_MSG_PUB.ADD;
612: ELSIF(p_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE AND
613: p_uf_header_rec.uf_header_id IS NOT NULL ) THEN

Line 612: ELSIF(p_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE AND

608: ELSIF ((p_uf_header_rec.uf_header_id IS NULL)
609: AND (p_uf_header_rec.operation_flag IS NULL OR p_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_UPDATE)) THEN
610: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INVOP_UFHID_NLL');
611: FND_MSG_PUB.ADD;
612: ELSIF(p_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE AND
613: p_uf_header_rec.uf_header_id IS NOT NULL ) THEN
614: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INVOP_UFHID_N_NLL');
615: FND_MSG_PUB.ADD;
616: END IF;

Line 624: IF (( p_uf_header_rec.operation_flag IS NULL OR p_uf_header_rec.operation_flag <> AHL_UMP_UF_PVT.G_OP_CREATE) AND p_uf_header_rec.uf_header_id IS NOT NULL)THEN

620: IF(FND_MSG_PUB.count_msg > 0)THEN
621: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
622: END IF;
623:
624: IF (( p_uf_header_rec.operation_flag IS NULL OR p_uf_header_rec.operation_flag <> AHL_UMP_UF_PVT.G_OP_CREATE) AND p_uf_header_rec.uf_header_id IS NOT NULL)THEN
625: OPEN uf_header_csr(p_uf_header_rec.uf_header_id);
626: FETCH uf_header_csr INTO l_object_version_number, l_unit_config_header_id,l_pc_node_id,l_inventory_item_id,l_inventory_org_id,l_use_unit_flag;
627: IF (uf_header_csr%NOTFOUND) THEN
628: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INVOP_HREC_NOTINDB');

Line 640: IF(p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_UNIT) THEN

636: IF(FND_MSG_PUB.count_msg > 0)THEN
637: RAISE FND_API.G_EXC_ERROR;
638: END IF;
639:
640: IF(p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_UNIT) THEN
641: IF(p_uf_header_rec.unit_config_header_id = FND_API.G_MISS_NUM)THEN
642: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_UFHID_UCHID_NLL');
643: FND_MSG_PUB.ADD;
644: ELSIF (p_uf_header_rec.unit_config_header_id IS NOT NULL AND

Line 653: ELSIF (l_unit_config_status_code = AHL_UMP_UF_PVT.G_DRAFT_STATUS)THEN

649: FETCH unit_status_check_csr INTO l_unit_config_status_code;
650: IF (unit_status_check_csr%NOTFOUND) THEN
651: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_UNIT_INV');
652: FND_MSG_PUB.ADD;
653: ELSIF (l_unit_config_status_code = AHL_UMP_UF_PVT.G_DRAFT_STATUS)THEN
654: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_UC_STATUS_DRAFT');
655: FND_MSG_PUB.ADD;
656: END IF;
657: CLOSE unit_status_check_csr;

Line 659: OPEN pc_status_check_up_csr(l_unit_config_header_id,AHL_UMP_UF_PVT.G_PC_UNIT_ASSOCIATION);

655: FND_MSG_PUB.ADD;
656: END IF;
657: CLOSE unit_status_check_csr;
658:
659: OPEN pc_status_check_up_csr(l_unit_config_header_id,AHL_UMP_UF_PVT.G_PC_UNIT_ASSOCIATION);
660: FETCH pc_status_check_up_csr INTO l_pc_primary_flag,l_pc_status;
661: IF (pc_status_check_up_csr%NOTFOUND) THEN
662: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_UNIT_PC_INV');
663: FND_MSG_PUB.ADD;

Line 664: ELSIF (l_pc_primary_flag <> AHL_UMP_UF_PVT.G_PC_PRIMARY_FLAG OR l_pc_status <> AHL_UMP_UF_PVT.G_COMPLETE_STATUS) THEN

660: FETCH pc_status_check_up_csr INTO l_pc_primary_flag,l_pc_status;
661: IF (pc_status_check_up_csr%NOTFOUND) THEN
662: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_UNIT_PC_INV');
663: FND_MSG_PUB.ADD;
664: ELSIF (l_pc_primary_flag <> AHL_UMP_UF_PVT.G_PC_PRIMARY_FLAG OR l_pc_status <> AHL_UMP_UF_PVT.G_COMPLETE_STATUS) THEN
665: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_UNIT_PC_INV');
666: FND_MSG_PUB.ADD;
667: END IF;
668: CLOSE pc_status_check_up_csr;

Line 672: ELSIF(p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_PART) THEN

668: CLOSE pc_status_check_up_csr;
669:
670:
671: END IF;
672: ELSIF(p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_PART) THEN
673: IF(p_uf_header_rec.inventory_item_id = FND_API.G_MISS_NUM)THEN
674: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_UFH_INVID_NLL');
675: FND_MSG_PUB.ADD;
676: ELSIF (p_uf_header_rec.inventory_item_id IS NOT NULL AND

Line 689: OPEN pc_status_check_up_csr(l_inventory_item_id,AHL_UMP_UF_PVT.G_PC_ITEM_ASSOCIATION);

685: FND_MSG_PUB.ADD;
686: END IF;
687: CLOSE part_check_csr;
688:
689: OPEN pc_status_check_up_csr(l_inventory_item_id,AHL_UMP_UF_PVT.G_PC_ITEM_ASSOCIATION);
690: FETCH pc_status_check_up_csr INTO l_pc_primary_flag,l_pc_status;
691: IF (pc_status_check_up_csr%NOTFOUND) THEN
692: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_PART_PC_INV');
693: FND_MSG_PUB.ADD;

Line 694: ELSIF (l_pc_primary_flag <> AHL_UMP_UF_PVT.G_PC_PRIMARY_FLAG OR l_pc_status <> AHL_UMP_UF_PVT.G_COMPLETE_STATUS) THEN

690: FETCH pc_status_check_up_csr INTO l_pc_primary_flag,l_pc_status;
691: IF (pc_status_check_up_csr%NOTFOUND) THEN
692: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_PART_PC_INV');
693: FND_MSG_PUB.ADD;
694: ELSIF (l_pc_primary_flag <> AHL_UMP_UF_PVT.G_PC_PRIMARY_FLAG OR l_pc_status <> AHL_UMP_UF_PVT.G_COMPLETE_STATUS) THEN
695: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_PART_PC_INV');
696: FND_MSG_PUB.ADD;
697: END IF;
698: CLOSE pc_status_check_up_csr;

Line 701: ELSIF(p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_PC_NODE) THEN

697: END IF;
698: CLOSE pc_status_check_up_csr;
699:
700: END IF;
701: ELSIF(p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_PC_NODE) THEN
702: IF(p_uf_header_rec.pc_node_id = FND_API.G_MISS_NUM)THEN
703: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_UFH_NODEID_NLL');
704: FND_MSG_PUB.ADD;
705: ELSIF (p_uf_header_rec.pc_node_id IS NOT NULL AND

Line 715: ELSIF (l_pc_primary_flag <> AHL_UMP_UF_PVT.G_PC_PRIMARY_FLAG OR l_pc_status <> AHL_UMP_UF_PVT.G_COMPLETE_STATUS) THEN

711: FETCH pc_status_check_n_csr INTO l_pc_primary_flag,l_pc_status;
712: IF (pc_status_check_n_csr%NOTFOUND) THEN
713: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_NODE_PC_INV');
714: FND_MSG_PUB.ADD;
715: ELSIF (l_pc_primary_flag <> AHL_UMP_UF_PVT.G_PC_PRIMARY_FLAG OR l_pc_status <> AHL_UMP_UF_PVT.G_COMPLETE_STATUS) THEN
716: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_NODE_PC_INV');
717: FND_MSG_PUB.ADD;
718: END IF;
719: CLOSE pc_status_check_n_csr;

Line 723: ELSIF (p_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE AND

719: CLOSE pc_status_check_n_csr;
720:
721: END IF;
722: END IF;
723: ELSIF (p_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE AND
724: p_uf_header_rec.uf_header_id IS NULL)THEN
725: IF(p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_UNIT) THEN
726: IF(p_uf_header_rec.unit_config_header_id IS NULL OR
727: p_uf_header_rec.unit_config_header_id = FND_API.G_MISS_NUM) THEN

Line 725: IF(p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_UNIT) THEN

721: END IF;
722: END IF;
723: ELSIF (p_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE AND
724: p_uf_header_rec.uf_header_id IS NULL)THEN
725: IF(p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_UNIT) THEN
726: IF(p_uf_header_rec.unit_config_header_id IS NULL OR
727: p_uf_header_rec.unit_config_header_id = FND_API.G_MISS_NUM) THEN
728: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_UFHID_UCHID_NLL');
729: FND_MSG_PUB.ADD;

Line 736: ELSIF (l_unit_config_status_code = AHL_UMP_UF_PVT.G_DRAFT_STATUS)THEN

732: FETCH unit_status_check_csr INTO l_unit_config_status_code;
733: IF (unit_status_check_csr%NOTFOUND) THEN
734: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_UNIT_INV');
735: FND_MSG_PUB.ADD;
736: ELSIF (l_unit_config_status_code = AHL_UMP_UF_PVT.G_DRAFT_STATUS)THEN
737: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_UC_STATUS_DRAFT');
738: FND_MSG_PUB.ADD;
739: END IF;
740: CLOSE unit_status_check_csr;

Line 742: OPEN pc_status_check_up_csr(p_uf_header_rec.unit_config_header_id, AHL_UMP_UF_PVT.G_PC_UNIT_ASSOCIATION);

738: FND_MSG_PUB.ADD;
739: END IF;
740: CLOSE unit_status_check_csr;
741:
742: OPEN pc_status_check_up_csr(p_uf_header_rec.unit_config_header_id, AHL_UMP_UF_PVT.G_PC_UNIT_ASSOCIATION);
743: FETCH pc_status_check_up_csr INTO l_pc_primary_flag,l_pc_status;
744: IF (pc_status_check_up_csr%NOTFOUND) THEN
745: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_UNIT_PC_INV');
746: FND_MSG_PUB.ADD;

Line 747: ELSIF (l_pc_primary_flag <> AHL_UMP_UF_PVT.G_PC_PRIMARY_FLAG OR l_pc_status <> AHL_UMP_UF_PVT.G_COMPLETE_STATUS) THEN

743: FETCH pc_status_check_up_csr INTO l_pc_primary_flag,l_pc_status;
744: IF (pc_status_check_up_csr%NOTFOUND) THEN
745: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_UNIT_PC_INV');
746: FND_MSG_PUB.ADD;
747: ELSIF (l_pc_primary_flag <> AHL_UMP_UF_PVT.G_PC_PRIMARY_FLAG OR l_pc_status <> AHL_UMP_UF_PVT.G_COMPLETE_STATUS) THEN
748: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_UNIT_PC_INV');
749: FND_MSG_PUB.ADD;
750: END IF;
751: CLOSE pc_status_check_up_csr;

Line 754: ELSIF (p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_PART) THEN

750: END IF;
751: CLOSE pc_status_check_up_csr;
752:
753: END IF;
754: ELSIF (p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_PART) THEN
755: IF(p_uf_header_rec.inventory_item_id IS NULL OR
756: p_uf_header_rec.inventory_item_id = FND_API.G_MISS_NUM) THEN
757: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_UFH_INVID_NLL');
758: FND_MSG_PUB.ADD;

Line 768: OPEN pc_status_check_up_csr(p_uf_header_rec.inventory_item_id, AHL_UMP_UF_PVT.G_PC_ITEM_ASSOCIATION);

764: FND_MSG_PUB.ADD;
765: END IF;
766: CLOSE part_check_csr;
767:
768: OPEN pc_status_check_up_csr(p_uf_header_rec.inventory_item_id, AHL_UMP_UF_PVT.G_PC_ITEM_ASSOCIATION);
769: FETCH pc_status_check_up_csr INTO l_pc_primary_flag,l_pc_status;
770: IF (pc_status_check_up_csr%NOTFOUND) THEN
771: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_PART_PC_INV');
772: FND_MSG_PUB.ADD;

Line 773: ELSIF (l_pc_primary_flag <> AHL_UMP_UF_PVT.G_PC_PRIMARY_FLAG OR l_pc_status <> AHL_UMP_UF_PVT.G_COMPLETE_STATUS) THEN

769: FETCH pc_status_check_up_csr INTO l_pc_primary_flag,l_pc_status;
770: IF (pc_status_check_up_csr%NOTFOUND) THEN
771: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_PART_PC_INV');
772: FND_MSG_PUB.ADD;
773: ELSIF (l_pc_primary_flag <> AHL_UMP_UF_PVT.G_PC_PRIMARY_FLAG OR l_pc_status <> AHL_UMP_UF_PVT.G_COMPLETE_STATUS) THEN
774: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_PART_PC_INV');
775: FND_MSG_PUB.ADD;
776: END IF;
777: CLOSE pc_status_check_up_csr;

Line 780: ELSIF (p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_PC_NODE) THEN

776: END IF;
777: CLOSE pc_status_check_up_csr;
778:
779: END IF;
780: ELSIF (p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_PC_NODE) THEN
781: IF(p_uf_header_rec.pc_node_id IS NULL OR
782: p_uf_header_rec.pc_node_id = FND_API.G_MISS_NUM) THEN
783: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_UFH_NODEID_NLL');
784: FND_MSG_PUB.ADD;

Line 791: ELSIF (l_pc_primary_flag <> AHL_UMP_UF_PVT.G_PC_PRIMARY_FLAG OR l_pc_status <> AHL_UMP_UF_PVT.G_COMPLETE_STATUS) THEN

787: FETCH pc_status_check_n_csr INTO l_pc_primary_flag,l_pc_status;
788: IF (pc_status_check_n_csr%NOTFOUND) THEN
789: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_NODE_PC_INV');
790: FND_MSG_PUB.ADD;
791: ELSIF (l_pc_primary_flag <> AHL_UMP_UF_PVT.G_PC_PRIMARY_FLAG OR l_pc_status <> AHL_UMP_UF_PVT.G_COMPLETE_STATUS) THEN
792: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_NODE_PC_INV');
793: FND_MSG_PUB.ADD;
794: END IF;
795: CLOSE pc_status_check_n_csr;

Line 808: AND p_uf_header_rec.use_unit_flag NOT IN (AHL_UMP_UF_PVT.G_UF_USE_UNIT_DEFAULT,AHL_UMP_UF_PVT.G_UF_USE_UNIT_YES)) THEN

804: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
805: END IF;
806:
807: IF((p_uf_header_rec.use_unit_flag IS NOT NULL OR p_uf_header_rec.use_unit_flag <> FND_API.G_MISS_CHAR)
808: AND p_uf_header_rec.use_unit_flag NOT IN (AHL_UMP_UF_PVT.G_UF_USE_UNIT_DEFAULT,AHL_UMP_UF_PVT.G_UF_USE_UNIT_YES)) THEN
809: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INV_UNT_FLG');
810: FND_MSG_PUB.ADD;
811: END IF;
812:

Line 822: -- check whether forecast type is AHL_UMP_UF_PVT.G_UF_TYPE_PART or AHL_UMP_UF_PVT.G_UF_TYPE_INSTANCE

818: END validate_uf_header;
819: ----------------------------------------------------------
820: ------------------------------------------------------------------------
821: -- This procedure does the following validations for uf_header_rec when preventive maintenance is installed
822: -- check whether forecast type is AHL_UMP_UF_PVT.G_UF_TYPE_PART or AHL_UMP_UF_PVT.G_UF_TYPE_INSTANCE
823: -- check of uf_header_id , if null, verify operation flag is create AHL_UMP_UF_PVT.G_OP_CREATE
824: -- check for object version number if latest. If uf_header_id is null, it should be null too.
825: -- for forecast type P : Part
826: -- validate whether this part is in inventory.A VALID Part--

Line 823: -- check of uf_header_id , if null, verify operation flag is create AHL_UMP_UF_PVT.G_OP_CREATE

819: ----------------------------------------------------------
820: ------------------------------------------------------------------------
821: -- This procedure does the following validations for uf_header_rec when preventive maintenance is installed
822: -- check whether forecast type is AHL_UMP_UF_PVT.G_UF_TYPE_PART or AHL_UMP_UF_PVT.G_UF_TYPE_INSTANCE
823: -- check of uf_header_id , if null, verify operation flag is create AHL_UMP_UF_PVT.G_OP_CREATE
824: -- check for object version number if latest. If uf_header_id is null, it should be null too.
825: -- for forecast type P : Part
826: -- validate whether this part is in inventory.A VALID Part--
827: -- use unit flag should be "N" or null.

Line 834: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type

830: -- validate whether this is an instanc of a valid part.
831: -- use unit flag should be valid.
832: -------------------------------------------------------------------------
833: PROCEDURE validate_uf_header_pm(
834: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type
835: ) IS
836:
837: CURSOR uf_header_csr (p_uf_header_id IN NUMBER) IS
838: SELECT object_version_number, inventory_item_id,csi_item_instance_id,use_unit_flag

Line 865: IF (p_uf_header_rec.forecast_type NOT IN(AHL_UMP_UF_PVT.G_UF_TYPE_PART,AHL_UMP_UF_PVT.G_UF_TYPE_INSTANCE))THEN

861:
862:
863: BEGIN
864: -- Operation Flag and Header ID validation.
865: IF (p_uf_header_rec.forecast_type NOT IN(AHL_UMP_UF_PVT.G_UF_TYPE_PART,AHL_UMP_UF_PVT.G_UF_TYPE_INSTANCE))THEN
866: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INV_UF_TYPE');
867: FND_MSG_PUB.ADD;
868: ELSIF (p_uf_header_rec.operation_flag IS NOT NULL AND p_uf_header_rec.operation_flag NOT IN(AHL_UMP_UF_PVT.G_OP_CREATE,AHL_UMP_UF_PVT.G_OP_UPDATE,AHL_UMP_UF_PVT.G_OP_DELETE))THEN
869: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INVOP_HEADER');

Line 868: ELSIF (p_uf_header_rec.operation_flag IS NOT NULL AND p_uf_header_rec.operation_flag NOT IN(AHL_UMP_UF_PVT.G_OP_CREATE,AHL_UMP_UF_PVT.G_OP_UPDATE,AHL_UMP_UF_PVT.G_OP_DELETE))THEN

864: -- Operation Flag and Header ID validation.
865: IF (p_uf_header_rec.forecast_type NOT IN(AHL_UMP_UF_PVT.G_UF_TYPE_PART,AHL_UMP_UF_PVT.G_UF_TYPE_INSTANCE))THEN
866: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INV_UF_TYPE');
867: FND_MSG_PUB.ADD;
868: ELSIF (p_uf_header_rec.operation_flag IS NOT NULL AND p_uf_header_rec.operation_flag NOT IN(AHL_UMP_UF_PVT.G_OP_CREATE,AHL_UMP_UF_PVT.G_OP_UPDATE,AHL_UMP_UF_PVT.G_OP_DELETE))THEN
869: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INVOP_HEADER');
870: FND_MSG_PUB.ADD;
871: ELSIF ((p_uf_header_rec.uf_header_id IS NULL)
872: AND (p_uf_header_rec.operation_flag IS NULL OR p_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_UPDATE)) THEN

Line 872: AND (p_uf_header_rec.operation_flag IS NULL OR p_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_UPDATE)) THEN

868: ELSIF (p_uf_header_rec.operation_flag IS NOT NULL AND p_uf_header_rec.operation_flag NOT IN(AHL_UMP_UF_PVT.G_OP_CREATE,AHL_UMP_UF_PVT.G_OP_UPDATE,AHL_UMP_UF_PVT.G_OP_DELETE))THEN
869: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INVOP_HEADER');
870: FND_MSG_PUB.ADD;
871: ELSIF ((p_uf_header_rec.uf_header_id IS NULL)
872: AND (p_uf_header_rec.operation_flag IS NULL OR p_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_UPDATE)) THEN
873: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INVOP_UFHID_NLL');
874: FND_MSG_PUB.ADD;
875: ELSIF(p_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE AND
876: p_uf_header_rec.uf_header_id IS NOT NULL ) THEN

Line 875: ELSIF(p_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE AND

871: ELSIF ((p_uf_header_rec.uf_header_id IS NULL)
872: AND (p_uf_header_rec.operation_flag IS NULL OR p_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_UPDATE)) THEN
873: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INVOP_UFHID_NLL');
874: FND_MSG_PUB.ADD;
875: ELSIF(p_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE AND
876: p_uf_header_rec.uf_header_id IS NOT NULL ) THEN
877: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INVOP_UFHID_N_NLL');
878: FND_MSG_PUB.ADD;
879: END IF;

Line 887: IF (( p_uf_header_rec.operation_flag IS NULL OR p_uf_header_rec.operation_flag <> AHL_UMP_UF_PVT.G_OP_CREATE) AND p_uf_header_rec.uf_header_id IS NOT NULL)THEN

883: IF(FND_MSG_PUB.count_msg > 0)THEN
884: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
885: END IF;
886:
887: IF (( p_uf_header_rec.operation_flag IS NULL OR p_uf_header_rec.operation_flag <> AHL_UMP_UF_PVT.G_OP_CREATE) AND p_uf_header_rec.uf_header_id IS NOT NULL)THEN
888: OPEN uf_header_csr(p_uf_header_rec.uf_header_id);
889: FETCH uf_header_csr INTO l_object_version_number, l_inventory_item_id,l_csi_item_instance_id,l_use_unit_flag;
890: IF (uf_header_csr%NOTFOUND) THEN
891: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INVOP_HREC_NOTINDB');

Line 903: IF(p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_PART) THEN

899: IF(FND_MSG_PUB.count_msg > 0)THEN
900: RAISE FND_API.G_EXC_ERROR;
901: END IF;
902:
903: IF(p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_PART) THEN
904: IF(p_uf_header_rec.inventory_item_id = FND_API.G_MISS_NUM)THEN
905: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_UFH_INVID_NLL');
906: FND_MSG_PUB.ADD;
907: ELSIF (p_uf_header_rec.inventory_item_id IS NOT NULL AND

Line 920: ELSIF(p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_INSTANCE) THEN

916: FND_MSG_PUB.ADD;
917: END IF;
918: CLOSE part_check_csr;
919: END IF;
920: ELSIF(p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_INSTANCE) THEN
921: IF(p_uf_header_rec.csi_item_instance_id = FND_API.G_MISS_NUM)THEN
922: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_UFH_INSTID_NLL');
923: FND_MSG_PUB.ADD;
924: ELSIF (p_uf_header_rec.csi_item_instance_id IS NOT NULL AND

Line 938: ELSIF (p_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE AND

934: END IF;
935: CLOSE instance_check_csr;
936: END IF;
937: END IF;
938: ELSIF (p_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE AND
939: p_uf_header_rec.uf_header_id IS NULL)THEN
940: IF (p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_PART) THEN
941: IF(p_uf_header_rec.inventory_item_id IS NULL OR
942: p_uf_header_rec.inventory_item_id = FND_API.G_MISS_NUM) THEN

Line 940: IF (p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_PART) THEN

936: END IF;
937: END IF;
938: ELSIF (p_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE AND
939: p_uf_header_rec.uf_header_id IS NULL)THEN
940: IF (p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_PART) THEN
941: IF(p_uf_header_rec.inventory_item_id IS NULL OR
942: p_uf_header_rec.inventory_item_id = FND_API.G_MISS_NUM) THEN
943: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_UFH_INVID_NLL');
944: FND_MSG_PUB.ADD;

Line 954: ELSIF (p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_INSTANCE) THEN

950: FND_MSG_PUB.ADD;
951: END IF;
952: CLOSE part_check_csr;
953: END IF;
954: ELSIF (p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_INSTANCE) THEN
955: IF(p_uf_header_rec.csi_item_instance_id IS NULL OR
956: p_uf_header_rec.csi_item_instance_id = FND_API.G_MISS_NUM) THEN
957: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_UFH_INSTID_NLL');
958: FND_MSG_PUB.ADD;

Line 979: AND p_uf_header_rec.use_unit_flag NOT IN (AHL_UMP_UF_PVT.G_UF_USE_UNIT_DEFAULT,AHL_UMP_UF_PVT.G_UF_USE_UNIT_YES)) THEN

975: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
976: END IF;
977:
978: IF((p_uf_header_rec.use_unit_flag IS NOT NULL OR p_uf_header_rec.use_unit_flag <> FND_API.G_MISS_CHAR)
979: AND p_uf_header_rec.use_unit_flag NOT IN (AHL_UMP_UF_PVT.G_UF_USE_UNIT_DEFAULT,AHL_UMP_UF_PVT.G_UF_USE_UNIT_YES)) THEN
980: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INV_UNT_FLG');
981: FND_MSG_PUB.ADD;
982: END IF;
983:

Line 995: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_Rec_type

991: ----------------------------------------------------------
992: -- This procedure processes defaults unchanged attribute in uf header record
993: ----------------------------------------------------------
994: PROCEDURE default_unchanged_uf_header(
995: p_x_uf_header_rec IN OUT NOCOPY AHL_UMP_UF_PVT.uf_header_Rec_type
996: ) IS
997:
998: CURSOR uf_header_csr(p_uf_header_id IN NUMBER, p_object_version_number IN NUMBER) IS
999: SELECT unit_config_header_id, inventory_item_id, pc_node_id, inventory_org_id,csi_item_instance_id,

Line 1007: l_uf_header_rec AHL_UMP_UF_PVT.uf_header_Rec_type;

1003: FROM ahl_uf_headers
1004: WHERE object_version_number= p_object_version_number
1005: AND uf_header_id = p_uf_header_id;
1006:
1007: l_uf_header_rec AHL_UMP_UF_PVT.uf_header_Rec_type;
1008:
1009: BEGIN
1010: IF(p_x_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_UPDATE) THEN
1011: OPEN uf_header_csr(p_x_uf_header_rec.uf_header_id, p_x_uf_header_rec.object_version_number);

Line 1010: IF(p_x_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_UPDATE) THEN

1006:
1007: l_uf_header_rec AHL_UMP_UF_PVT.uf_header_Rec_type;
1008:
1009: BEGIN
1010: IF(p_x_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_UPDATE) THEN
1011: OPEN uf_header_csr(p_x_uf_header_rec.uf_header_id, p_x_uf_header_rec.object_version_number);
1012: FETCH uf_header_csr INTO l_uf_header_rec.unit_config_header_id, l_uf_header_rec.inventory_item_id,l_uf_header_rec.csi_item_instance_id,
1013: l_uf_header_rec.pc_node_id, l_uf_header_rec.inventory_org_id, l_uf_header_rec.use_unit_flag,
1014: l_uf_header_rec.attribute_category,l_uf_header_rec.attribute1,l_uf_header_rec.attribute2,

Line 1056: p_x_uf_header_rec.use_unit_flag := AHL_UMP_UF_PVT.G_UF_USE_UNIT_DEFAULT;

1052:
1053: IF (p_x_uf_header_rec.use_unit_flag is null) THEN
1054: p_x_uf_header_rec.use_unit_flag := l_uf_header_rec.use_unit_flag;
1055: ELSIF(p_x_uf_header_rec.use_unit_flag = FND_API.G_MISS_CHAR) THEN
1056: p_x_uf_header_rec.use_unit_flag := AHL_UMP_UF_PVT.G_UF_USE_UNIT_DEFAULT;
1057: END IF;
1058:
1059: IF (p_x_uf_header_rec.attribute_category is null) THEN
1060: p_x_uf_header_rec.attribute_category := l_uf_header_rec.attribute_category;

Line 1157: ELSIF (p_x_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE) THEN

1153: END IF;
1154:
1155: END IF;
1156: CLOSE uf_header_csr;
1157: ELSIF (p_x_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE) THEN
1158:
1159: IF (p_x_uf_header_rec.unit_config_header_id = FND_API.G_MISS_NUM) THEN
1160: p_x_uf_header_rec.unit_config_header_id := null;
1161: END IF;

Line 1180: p_x_uf_header_rec.use_unit_flag := AHL_UMP_UF_PVT.G_UF_USE_UNIT_DEFAULT;

1176: p_x_uf_header_rec.inventory_org_id := null;
1177: END IF;
1178:
1179: IF (p_x_uf_header_rec.use_unit_flag is null) THEN
1180: p_x_uf_header_rec.use_unit_flag := AHL_UMP_UF_PVT.G_UF_USE_UNIT_DEFAULT;
1181: ELSIF(p_x_uf_header_rec.use_unit_flag = FND_API.G_MISS_CHAR) THEN
1182: p_x_uf_header_rec.use_unit_flag := AHL_UMP_UF_PVT.G_UF_USE_UNIT_DEFAULT;
1183: END IF;
1184:

Line 1182: p_x_uf_header_rec.use_unit_flag := AHL_UMP_UF_PVT.G_UF_USE_UNIT_DEFAULT;

1178:
1179: IF (p_x_uf_header_rec.use_unit_flag is null) THEN
1180: p_x_uf_header_rec.use_unit_flag := AHL_UMP_UF_PVT.G_UF_USE_UNIT_DEFAULT;
1181: ELSIF(p_x_uf_header_rec.use_unit_flag = FND_API.G_MISS_CHAR) THEN
1182: p_x_uf_header_rec.use_unit_flag := AHL_UMP_UF_PVT.G_UF_USE_UNIT_DEFAULT;
1183: END IF;
1184:
1185: IF (p_x_uf_header_rec.attribute_category = FND_API.G_MISS_CHAR) THEN
1186: p_x_uf_header_rec.attribute_category := null;

Line 1241: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type,

1237: -- This procedure processes uf_detail_rec
1238: ----------------------------------------------------------
1239: PROCEDURE process_uf_details(
1240: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1241: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type,
1242: p_x_uf_details_tbl IN OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type
1243: ) IS
1244:
1245: BEGIN

Line 1242: p_x_uf_details_tbl IN OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type

1238: ----------------------------------------------------------
1239: PROCEDURE process_uf_details(
1240: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1241: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type,
1242: p_x_uf_details_tbl IN OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type
1243: ) IS
1244:
1245: BEGIN
1246: --no value to id conversion involved here

Line 1256: IF(p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_DELETE) THEN

1252:
1253: default_unchanged_uf_details(p_x_uf_details_tbl => p_x_uf_details_tbl);
1254: --save details now
1255: FOR i IN p_x_uf_details_tbl.FIRST..p_x_uf_details_tbl.LAST LOOP
1256: IF(p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_DELETE) THEN
1257: AHL_UF_DETAILS_PKG.delete_row(p_x_uf_details_tbl(i).uf_detail_id);
1258: END IF;
1259: END LOOP;
1260:

Line 1262: IF (p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_UPDATE) THEN

1258: END IF;
1259: END LOOP;
1260:
1261: FOR i IN p_x_uf_details_tbl.FIRST..p_x_uf_details_tbl.LAST LOOP
1262: IF (p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_UPDATE) THEN
1263:
1264: --setting object version number for create
1265: p_x_uf_details_tbl(i).object_version_number := p_x_uf_details_tbl(i).object_version_number + 1;
1266: --setting up user/create/update information

Line 1302: IF(p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE) THEN

1298: );
1299: END IF;
1300: END LOOP;
1301: FOR i IN p_x_uf_details_tbl.FIRST..p_x_uf_details_tbl.LAST LOOP
1302: IF(p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE) THEN
1303: --setting object version number for create
1304: p_x_uf_details_tbl(i).object_version_number := 1;
1305: --setting up user/create/update information
1306: p_x_uf_details_tbl(i).created_by := fnd_global.user_id;

Line 1363: -- check if uf_header_id , if null, verify operation flag is create AHL_UMP_UF_PVT.G_OP_CREATE for all records in details

1359:
1360: ---------------------------------------------------------------------------------------------------------------------------------------------------
1361: -- This procedure does the following validations for uf_details_tbl
1362: -- verify operation flag is not null for all records
1363: -- check if uf_header_id , if null, verify operation flag is create AHL_UMP_UF_PVT.G_OP_CREATE for all records in details
1364: -- check if uf_detail_id is not null then operation flag is update AHL_UMP_UF_PVT.G_UF_TYPE_UNIT or 'D' and uf_header_id is not null
1365: -- Validate that for every record in p_x_uf_details_tbl, start_date is < end_date(IF not null) and start_date is not null.
1366: -- Validate that for every record in p_x_uf_details_tbl, usage_per_day is a valid number +ve,-ve or 0 .
1367: -- Validate that for every record in p_x_uf_details_tbl, uom is valid.

Line 1364: -- check if uf_detail_id is not null then operation flag is update AHL_UMP_UF_PVT.G_UF_TYPE_UNIT or 'D' and uf_header_id is not null

1360: ---------------------------------------------------------------------------------------------------------------------------------------------------
1361: -- This procedure does the following validations for uf_details_tbl
1362: -- verify operation flag is not null for all records
1363: -- check if uf_header_id , if null, verify operation flag is create AHL_UMP_UF_PVT.G_OP_CREATE for all records in details
1364: -- check if uf_detail_id is not null then operation flag is update AHL_UMP_UF_PVT.G_UF_TYPE_UNIT or 'D' and uf_header_id is not null
1365: -- Validate that for every record in p_x_uf_details_tbl, start_date is < end_date(IF not null) and start_date is not null.
1366: -- Validate that for every record in p_x_uf_details_tbl, usage_per_day is a valid number +ve,-ve or 0 .
1367: -- Validate that for every record in p_x_uf_details_tbl, uom is valid.
1368: -- If operation_flag is "U" or "D" verfiy object version number if they are same as in database.

Line 1371: -- add a new one with with start date as SYSDATE and operation flag as AHL_UMP_UF_PVT.G_OP_CREATE

1367: -- Validate that for every record in p_x_uf_details_tbl, uom is valid.
1368: -- If operation_flag is "U" or "D" verfiy object version number if they are same as in database.
1369: -- If operation_flag is "U", if start_date < SYSDATE, split this record and
1370: -- update current record with UOM for this record in DB and end date as SYSDATE - 1
1371: -- add a new one with with start date as SYSDATE and operation flag as AHL_UMP_UF_PVT.G_OP_CREATE
1372: -- If operation_flag is "D", if start_date < SYSDATE, put end date as SYSDATE -1 (yesterday's date).set operation_flag as AHL_UMP_UF_PVT.G_UF_TYPE_UNIT
1373: -- update x_return_status on error , break if required
1374: ---------------------------------------------------------------------------------------------------------------------------------------------------
1375: PROCEDURE validate_uf_details(

Line 1372: -- If operation_flag is "D", if start_date < SYSDATE, put end date as SYSDATE -1 (yesterday's date).set operation_flag as AHL_UMP_UF_PVT.G_UF_TYPE_UNIT

1368: -- If operation_flag is "U" or "D" verfiy object version number if they are same as in database.
1369: -- If operation_flag is "U", if start_date < SYSDATE, split this record and
1370: -- update current record with UOM for this record in DB and end date as SYSDATE - 1
1371: -- add a new one with with start date as SYSDATE and operation flag as AHL_UMP_UF_PVT.G_OP_CREATE
1372: -- If operation_flag is "D", if start_date < SYSDATE, put end date as SYSDATE -1 (yesterday's date).set operation_flag as AHL_UMP_UF_PVT.G_UF_TYPE_UNIT
1373: -- update x_return_status on error , break if required
1374: ---------------------------------------------------------------------------------------------------------------------------------------------------
1375: PROCEDURE validate_uf_details(
1376: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type,

Line 1376: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type,

1372: -- If operation_flag is "D", if start_date < SYSDATE, put end date as SYSDATE -1 (yesterday's date).set operation_flag as AHL_UMP_UF_PVT.G_UF_TYPE_UNIT
1373: -- update x_return_status on error , break if required
1374: ---------------------------------------------------------------------------------------------------------------------------------------------------
1375: PROCEDURE validate_uf_details(
1376: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type,
1377: p_x_uf_details_tbl IN OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type
1378: ) IS
1379:
1380: CURSOR uf_details_csr (p_uf_detail_id IN NUMBER) IS

Line 1377: p_x_uf_details_tbl IN OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type

1373: -- update x_return_status on error , break if required
1374: ---------------------------------------------------------------------------------------------------------------------------------------------------
1375: PROCEDURE validate_uf_details(
1376: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type,
1377: p_x_uf_details_tbl IN OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type
1378: ) IS
1379:
1380: CURSOR uf_details_csr (p_uf_detail_id IN NUMBER) IS
1381: SELECT object_version_number, uf_header_id,uom_code,start_date,end_date,usage_per_day

Line 1416: IF ( p_x_uf_details_tbl(i).operation_flag IS NOT NULL AND p_x_uf_details_tbl(i).operation_flag NOT IN(AHL_UMP_UF_PVT.G_OP_CREATE,AHL_UMP_UF_PVT.G_OP_UPDATE,AHL_UMP_UF_PVT.G_OP_DELETE))THEN

1412: BEGIN
1413: l_total := p_x_uf_details_tbl.count;
1414: FOR i IN p_x_uf_details_tbl.FIRST..l_total LOOP
1415: --checking for unexpected errors
1416: IF ( p_x_uf_details_tbl(i).operation_flag IS NOT NULL AND p_x_uf_details_tbl(i).operation_flag NOT IN(AHL_UMP_UF_PVT.G_OP_CREATE,AHL_UMP_UF_PVT.G_OP_UPDATE,AHL_UMP_UF_PVT.G_OP_DELETE))THEN
1417: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INVOP_DETAIL');
1418: FND_MSG_PUB.ADD;
1419: ELSIF (p_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE AND p_x_uf_details_tbl(i).operation_flag <> AHL_UMP_UF_PVT.G_OP_CREATE) THEN
1420: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INV_OP_DET_HED');

Line 1419: ELSIF (p_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE AND p_x_uf_details_tbl(i).operation_flag <> AHL_UMP_UF_PVT.G_OP_CREATE) THEN

1415: --checking for unexpected errors
1416: IF ( p_x_uf_details_tbl(i).operation_flag IS NOT NULL AND p_x_uf_details_tbl(i).operation_flag NOT IN(AHL_UMP_UF_PVT.G_OP_CREATE,AHL_UMP_UF_PVT.G_OP_UPDATE,AHL_UMP_UF_PVT.G_OP_DELETE))THEN
1417: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INVOP_DETAIL');
1418: FND_MSG_PUB.ADD;
1419: ELSIF (p_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE AND p_x_uf_details_tbl(i).operation_flag <> AHL_UMP_UF_PVT.G_OP_CREATE) THEN
1420: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INV_OP_DET_HED');
1421: FND_MSG_PUB.ADD;
1422: ELSIF ((p_x_uf_details_tbl(i).operation_flag <> AHL_UMP_UF_PVT.G_OP_CREATE AND p_x_uf_details_tbl(i).uf_detail_id IS NULL) OR
1423: (p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE AND p_x_uf_details_tbl(i).uf_detail_id IS NOT NULL)) THEN

Line 1422: ELSIF ((p_x_uf_details_tbl(i).operation_flag <> AHL_UMP_UF_PVT.G_OP_CREATE AND p_x_uf_details_tbl(i).uf_detail_id IS NULL) OR

1418: FND_MSG_PUB.ADD;
1419: ELSIF (p_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE AND p_x_uf_details_tbl(i).operation_flag <> AHL_UMP_UF_PVT.G_OP_CREATE) THEN
1420: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INV_OP_DET_HED');
1421: FND_MSG_PUB.ADD;
1422: ELSIF ((p_x_uf_details_tbl(i).operation_flag <> AHL_UMP_UF_PVT.G_OP_CREATE AND p_x_uf_details_tbl(i).uf_detail_id IS NULL) OR
1423: (p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE AND p_x_uf_details_tbl(i).uf_detail_id IS NOT NULL)) THEN
1424: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INVOP_DETAIL');
1425: FND_MSG_PUB.ADD;
1426: END IF;

Line 1423: (p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE AND p_x_uf_details_tbl(i).uf_detail_id IS NOT NULL)) THEN

1419: ELSIF (p_uf_header_rec.operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE AND p_x_uf_details_tbl(i).operation_flag <> AHL_UMP_UF_PVT.G_OP_CREATE) THEN
1420: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INV_OP_DET_HED');
1421: FND_MSG_PUB.ADD;
1422: ELSIF ((p_x_uf_details_tbl(i).operation_flag <> AHL_UMP_UF_PVT.G_OP_CREATE AND p_x_uf_details_tbl(i).uf_detail_id IS NULL) OR
1423: (p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE AND p_x_uf_details_tbl(i).uf_detail_id IS NOT NULL)) THEN
1424: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INVOP_DETAIL');
1425: FND_MSG_PUB.ADD;
1426: END IF;
1427: -- Raise if unexpected errors

Line 1432: IF (p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE AND

1428: IF FND_MSG_PUB.count_msg > 0 THEN
1429: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1430: END IF;
1431:
1432: IF (p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE AND
1433: p_x_uf_details_tbl(i).end_date = FND_API.G_MISS_DATE) THEN
1434: p_x_uf_details_tbl(i).end_date := NULL;
1435:
1436: -- checking for expected error if record is modified

Line 1437: ELSIF (p_x_uf_details_tbl(i).operation_flag <> AHL_UMP_UF_PVT.G_OP_CREATE AND p_x_uf_details_tbl(i).uf_detail_id IS NOT NULL)THEN

1433: p_x_uf_details_tbl(i).end_date = FND_API.G_MISS_DATE) THEN
1434: p_x_uf_details_tbl(i).end_date := NULL;
1435:
1436: -- checking for expected error if record is modified
1437: ELSIF (p_x_uf_details_tbl(i).operation_flag <> AHL_UMP_UF_PVT.G_OP_CREATE AND p_x_uf_details_tbl(i).uf_detail_id IS NOT NULL)THEN
1438: OPEN uf_details_csr(p_x_uf_details_tbl(i).uf_detail_id);
1439: FETCH uf_details_csr INTO l_object_version_number, l_uf_header_id,l_uom_code,l_start_date,l_end_date,l_usage_per_day;
1440: IF (uf_details_csr%NOTFOUND) THEN
1441: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_DET_INV_NOTINDB');

Line 1470: IF(p_x_uf_details_tbl(i).operation_flag IN (AHL_UMP_UF_PVT.G_OP_CREATE,AHL_UMP_UF_PVT.G_OP_UPDATE))THEN

1466: RAISE FND_API.G_EXC_ERROR;
1467: END IF;
1468:
1469: -- checking for expected error if start date , end date,UOM are invalid
1470: IF(p_x_uf_details_tbl(i).operation_flag IN (AHL_UMP_UF_PVT.G_OP_CREATE,AHL_UMP_UF_PVT.G_OP_UPDATE))THEN
1471: -- checking for start and end dates
1472: IF(p_x_uf_details_tbl(i).start_date IS NULL) THEN
1473: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INV_SDATE_NLL');
1474: FND_MESSAGE.Set_Token('START_DATE',p_x_uf_details_tbl(i).start_date);

Line 1488: ELSIF (p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE) THEN

1484: FND_MESSAGE.Set_Token('END_DATE',p_x_uf_details_tbl(i).end_date);
1485: FND_MESSAGE.Set_Token('UOM_CODE',p_x_uf_details_tbl(i).uom_code);
1486: FND_MESSAGE.Set_Token('USAGE_PER_DAY',p_x_uf_details_tbl(i).usage_per_day);
1487: FND_MSG_PUB.ADD;
1488: ELSIF (p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE) THEN
1489: IF(TRUNC(p_x_uf_details_tbl(i).start_date) < TRUNC(SYSDATE))THEN
1490: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INV_SDATE');
1491: FND_MESSAGE.Set_Token('START_DATE',p_x_uf_details_tbl(i).start_date);
1492: FND_MESSAGE.Set_Token('END_DATE',p_x_uf_details_tbl(i).end_date);

Line 1497: ELSIF (p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_UPDATE) THEN

1493: FND_MESSAGE.Set_Token('UOM_CODE',p_x_uf_details_tbl(i).uom_code);
1494: FND_MESSAGE.Set_Token('USAGE_PER_DAY',p_x_uf_details_tbl(i).usage_per_day);
1495: FND_MSG_PUB.ADD;
1496: END IF;
1497: ELSIF (p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_UPDATE) THEN
1498: IF ( TRUNC(p_x_uf_details_tbl(i).start_date) < TRUNC(SYSDATE) AND
1499: (TRUNC(p_x_uf_details_tbl(i).start_date) <> TRUNC(l_start_date) OR
1500: p_x_uf_details_tbl(i).uom_code <> l_uom_code)) THEN
1501: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_DONCHG_STD_UOM');

Line 1510: IF (p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE) THEN

1506: FND_MSG_PUB.ADD;
1507: END IF;
1508: END IF;
1509: ELSIF (p_x_uf_details_tbl(i).end_date IS NULL) THEN
1510: IF (p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE) THEN
1511: IF(TRUNC(p_x_uf_details_tbl(i).start_date) < TRUNC(SYSDATE))THEN
1512: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INV_SDATE');
1513: FND_MESSAGE.Set_Token('START_DATE',p_x_uf_details_tbl(i).start_date);
1514: FND_MESSAGE.Set_Token('END_DATE',p_x_uf_details_tbl(i).end_date);

Line 1519: ELSIF (p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_UPDATE) THEN

1515: FND_MESSAGE.Set_Token('UOM_CODE',p_x_uf_details_tbl(i).uom_code);
1516: FND_MESSAGE.Set_Token('USAGE_PER_DAY',p_x_uf_details_tbl(i).usage_per_day);
1517: FND_MSG_PUB.ADD;
1518: END IF;
1519: ELSIF (p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_UPDATE) THEN
1520: IF ( TRUNC(p_x_uf_details_tbl(i).start_date) < TRUNC(SYSDATE) AND
1521: (TRUNC(p_x_uf_details_tbl(i).start_date) <> TRUNC(l_start_date) OR
1522: p_x_uf_details_tbl(i).uom_code <> l_uom_code)) THEN
1523: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_DONCHG_STD_UOM');

Line 1542: IF (p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_OP_UPDATE)THEN

1538: FND_MESSAGE.Set_Token('UOM_CODE',p_x_uf_details_tbl(i).uom_code);
1539: FND_MESSAGE.Set_Token('USAGE_PER_DAY',p_x_uf_details_tbl(i).usage_per_day);
1540: FND_MSG_PUB.ADD;
1541: ELSE
1542: IF (p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_OP_UPDATE)THEN
1543: OPEN unit_uom_code_ckeck_csr(p_x_uf_details_tbl(i).uom_code);
1544: FETCH unit_uom_code_ckeck_csr into l_exists;
1545: IF (unit_uom_code_ckeck_csr%NOTFOUND) THEN
1546: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INV_UOMCD');

Line 1554: ELSIF (p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_PART)THEN

1550: FND_MESSAGE.Set_Token('USAGE_PER_DAY',p_x_uf_details_tbl(i).usage_per_day);
1551: FND_MSG_PUB.ADD;
1552: END IF;
1553: CLOSE unit_uom_code_ckeck_csr;
1554: ELSIF (p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_PART)THEN
1555: OPEN part_uom_code_ckeck_csr(p_x_uf_details_tbl(i).uom_code);
1556: FETCH part_uom_code_ckeck_csr into l_exists;
1557: IF (part_uom_code_ckeck_csr%NOTFOUND) THEN
1558: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INV_UOMCD');

Line 1566: ELSIF (p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_PC_NODE)THEN

1562: FND_MESSAGE.Set_Token('USAGE_PER_DAY',p_x_uf_details_tbl(i).usage_per_day);
1563: FND_MSG_PUB.ADD;
1564: END IF;
1565: CLOSE part_uom_code_ckeck_csr;
1566: ELSIF (p_uf_header_rec.forecast_type = AHL_UMP_UF_PVT.G_UF_TYPE_PC_NODE)THEN
1567: OPEN node_uom_code_ckeck_csr(p_x_uf_details_tbl(i).uom_code);
1568: FETCH node_uom_code_ckeck_csr into l_exists;
1569: IF (node_uom_code_ckeck_csr%NOTFOUND) THEN
1570: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_INV_UOMCD');

Line 1584: IF(p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_UPDATE)THEN

1580: END IF;
1581:
1582: --spliting and end-dating
1583: IF (FND_MSG_PUB.count_msg = 0) THEN
1584: IF(p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_UPDATE)THEN
1585: IF TRUNC(p_x_uf_details_tbl(i).start_date) < TRUNC(SYSDATE) THEN
1586: IF((TRUNC(p_x_uf_details_tbl(i).start_date) <> TRUNC(l_start_date))OR
1587: (p_x_uf_details_tbl(i).uom_code <> l_uom_code)) THEN
1588: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_UMP_UF_DONCHG_STD_UOM');

Line 1602: p_x_uf_details_tbl(l_last).operation_flag := AHL_UMP_UF_PVT.G_OP_CREATE;

1598: p_x_uf_details_tbl(l_last).start_date := SYSDATE;
1599: p_x_uf_details_tbl(l_last).end_date := p_x_uf_details_tbl(i).end_date;
1600: p_x_uf_details_tbl(l_last).usage_per_day := p_x_uf_details_tbl(i).usage_per_day;
1601: p_x_uf_details_tbl(l_last).uom_code := p_x_uf_details_tbl(i).uom_code;
1602: p_x_uf_details_tbl(l_last).operation_flag := AHL_UMP_UF_PVT.G_OP_CREATE;
1603: p_x_uf_details_tbl(l_last).uf_header_id := p_x_uf_details_tbl(i).uf_header_id;
1604: -- Modifying and end-dating existing record.
1605: p_x_uf_details_tbl(i).end_date := TRUNC(SYSDATE - 1);
1606: p_x_uf_details_tbl(i).uom_code := l_uom_code;

Line 1612: ELSIF (p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_DELETE)THEN

1608:
1609: END IF;
1610: END IF;
1611: -- end dating if start date < sysdate
1612: ELSIF (p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_DELETE)THEN
1613: IF(TRUNC(l_start_date) < TRUNC(SYSDATE))THEN
1614: p_x_uf_details_tbl(i).start_date := l_start_date;
1615: p_x_uf_details_tbl(i).end_date := SYSDATE - 1;
1616: p_x_uf_details_tbl(i).uom_code := l_uom_code;

Line 1618: p_x_uf_details_tbl(i).operation_flag := AHL_UMP_UF_PVT.G_OP_UPDATE;

1614: p_x_uf_details_tbl(i).start_date := l_start_date;
1615: p_x_uf_details_tbl(i).end_date := SYSDATE - 1;
1616: p_x_uf_details_tbl(i).uom_code := l_uom_code;
1617: p_x_uf_details_tbl(i).usage_per_day := l_usage_per_day;
1618: p_x_uf_details_tbl(i).operation_flag := AHL_UMP_UF_PVT.G_OP_UPDATE;
1619: END IF;
1620: END IF;
1621: END IF; --end splitting and end dating
1622:

Line 1640: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_rec_type,

1636: -----------------------------------------------------------------------------------------------------------------------------------------------------
1637:
1638:
1639: PROCEDURE validate_utilization_forecast(
1640: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_rec_type,
1641: x_uf_details_tbl OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type
1642: ) IS
1643:
1644: CURSOR uf_sorted_details_csr (p_uf_header_id IN NUMBER) IS

Line 1641: x_uf_details_tbl OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type

1637:
1638:
1639: PROCEDURE validate_utilization_forecast(
1640: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_rec_type,
1641: x_uf_details_tbl OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type
1642: ) IS
1643:
1644: CURSOR uf_sorted_details_csr (p_uf_header_id IN NUMBER) IS
1645: SELECT object_version_number, uf_detail_id, uf_header_id,uom_code,start_date,end_date,usage_per_day

Line 1716: p_x_uf_details_tbl IN OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type

1712: --------------------------------------------------------------------------------
1713: -- This procedure writes message.
1714: --------------------------------------------------------------------------------
1715: PROCEDURE default_unchanged_uf_details(
1716: p_x_uf_details_tbl IN OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type
1717: ) IS
1718:
1719: CURSOR uf_details_csr(p_uf_detail_id IN NUMBER, p_object_version_number IN NUMBER) IS
1720: SELECT uf_header_id,end_date,attribute_category, attribute1,attribute2, attribute3, attribute4,

Line 1727: l_uf_details_rec AHL_UMP_UF_PVT.uf_details_rec_type;

1723: FROM ahl_uf_details
1724: WHERE object_version_number= p_object_version_number
1725: AND uf_detail_id = p_uf_detail_id;
1726:
1727: l_uf_details_rec AHL_UMP_UF_PVT.uf_details_rec_type;
1728:
1729: BEGIN
1730: FOR i IN p_x_uf_details_tbl.FIRST..p_x_uf_details_tbl.LAST LOOP
1731: IF(p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_UPDATE) THEN

Line 1731: IF(p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_UPDATE) THEN

1727: l_uf_details_rec AHL_UMP_UF_PVT.uf_details_rec_type;
1728:
1729: BEGIN
1730: FOR i IN p_x_uf_details_tbl.FIRST..p_x_uf_details_tbl.LAST LOOP
1731: IF(p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_UPDATE) THEN
1732: OPEN uf_details_csr(p_x_uf_details_tbl(i).uf_detail_id, p_x_uf_details_tbl(i).object_version_number);
1733: FETCH uf_details_csr INTO l_uf_details_rec.uf_header_id,l_uf_details_rec.end_date,l_uf_details_rec.attribute_category,l_uf_details_rec.attribute1,l_uf_details_rec.attribute2,
1734: l_uf_details_rec.attribute3, l_uf_details_rec.attribute4, l_uf_details_rec.attribute5, l_uf_details_rec.attribute6, l_uf_details_rec.attribute7,
1735: l_uf_details_rec.attribute8, l_uf_details_rec.attribute9, l_uf_details_rec.attribute10, l_uf_details_rec.attribute11, l_uf_details_rec.attribute12,

Line 1851: ELSIF (p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE) THEN

1847: END IF;
1848:
1849: END IF;
1850: CLOSE uf_details_csr;
1851: ELSIF (p_x_uf_details_tbl(i).operation_flag = AHL_UMP_UF_PVT.G_OP_CREATE) THEN
1852:
1853: IF(p_x_uf_details_tbl(i).uf_header_id = FND_API.G_MISS_NUM) THEN
1854: p_x_uf_details_tbl(i).uf_header_id := null;
1855: END IF;

Line 1917: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type

1913: -------------------------------------------------------------------------------------
1914: -- This procedure deletes header if no forecast detials and use unit flag is also 'N'
1915: -------------------------------------------------------------------------------------
1916: PROCEDURE post_process_uf_header(
1917: p_uf_header_rec IN AHL_UMP_UF_PVT.uf_header_Rec_type
1918: ) IS
1919:
1920: CURSOR uf_details_csr (p_uf_header_id IN NUMBER) IS
1921: SELECT 'x'

Line 1955: x_UF_details_tbl OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type,

1951: p_unit_name IN VARCHAR2:=NULL,
1952: p_part_number IN VARCHAR2 :=NULL,
1953: p_onward_end_date IN DATE := NULL,
1954: p_add_unit_item_forecast IN VARCHAR2 := 'N',
1955: x_UF_details_tbl OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type,
1956: x_return_status OUT NOCOPY VARCHAR2)
1957: IS
1958: --
1959: CURSOR ahl_get_config_header_id_csr(c_unit_name IN VARCHAR2) IS

Line 2241: l_UF_details_tbl AHL_UMP_UF_PVT.uf_details_tbl_type;

2237: AND a.uf_header_id = b.uf_header_id
2238: AND a.uom_code = p_uom_code
2239: AND b.unit_config_header_id = p_unit_config_id;
2240: --
2241: l_UF_details_tbl AHL_UMP_UF_PVT.uf_details_tbl_type;
2242: l_UF_details_rec AHL_UMP_UF_PVT.uf_details_rec_type;
2243: l_temp_details_rec ahl_uf_details_csr%ROWTYPE;
2244: l_unit_config_header_id NUMBER DEFAULT p_unit_config_header_id;
2245: l_inventory_item_id NUMBER DEFAULT p_inventory_item_id;

Line 2242: l_UF_details_rec AHL_UMP_UF_PVT.uf_details_rec_type;

2238: AND a.uom_code = p_uom_code
2239: AND b.unit_config_header_id = p_unit_config_id;
2240: --
2241: l_UF_details_tbl AHL_UMP_UF_PVT.uf_details_tbl_type;
2242: l_UF_details_rec AHL_UMP_UF_PVT.uf_details_rec_type;
2243: l_temp_details_rec ahl_uf_details_csr%ROWTYPE;
2244: l_unit_config_header_id NUMBER DEFAULT p_unit_config_header_id;
2245: l_inventory_item_id NUMBER DEFAULT p_inventory_item_id;
2246: l_pc_node_id NUMBER DEFAULT p_PC_node_id;

Line 2305: AHL_UMP_UF_PVT.G_PC_PRIMARY_FLAG,

2301:
2302: --Now verify pc node id is in 'COMPLETE' and 'PRIMARY' PC tree
2303: IF (l_pc_node_id IS NOT NULL) THEN
2304: OPEN ahl_check_pc_id_csr(l_pc_node_id,
2305: AHL_UMP_UF_PVT.G_PC_PRIMARY_FLAG,
2306: AHL_UMP_UF_PVT.G_COMPLETE_STATUS);
2307: FETCH ahl_check_pc_id_csr INTO l_junk;
2308: IF (ahl_check_pc_id_csr%NOTFOUND) THEN
2309: l_pc_node_id := NULL;

Line 2306: AHL_UMP_UF_PVT.G_COMPLETE_STATUS);

2302: --Now verify pc node id is in 'COMPLETE' and 'PRIMARY' PC tree
2303: IF (l_pc_node_id IS NOT NULL) THEN
2304: OPEN ahl_check_pc_id_csr(l_pc_node_id,
2305: AHL_UMP_UF_PVT.G_PC_PRIMARY_FLAG,
2306: AHL_UMP_UF_PVT.G_COMPLETE_STATUS);
2307: FETCH ahl_check_pc_id_csr INTO l_junk;
2308: IF (ahl_check_pc_id_csr%NOTFOUND) THEN
2309: l_pc_node_id := NULL;
2310: -- FND_MESSAGE.Set_Name('AHL','AHL_UMP_UTIL_NO_PRIM_PC');

Line 2320: AHL_UMP_UF_PVT.G_PC_UNIT_ASSOCIATION,

2316:
2317: --Resolve unit_config_header_id into a pc node id
2318: IF (l_unit_config_header_id IS NOT NULL) THEN
2319: OPEN ahl_pc_id_from_assoc_csr(l_unit_config_header_id,
2320: AHL_UMP_UF_PVT.G_PC_UNIT_ASSOCIATION,
2321: AHL_UMP_UF_PVT.G_PC_PRIMARY_FLAG,
2322: AHL_UMP_UF_PVT.G_COMPLETE_STATUS);
2323: FETCH ahl_pc_id_from_assoc_csr INTO l_pc_node_id;
2324: IF (ahl_pc_id_from_assoc_csr%NOTFOUND) THEN

Line 2321: AHL_UMP_UF_PVT.G_PC_PRIMARY_FLAG,

2317: --Resolve unit_config_header_id into a pc node id
2318: IF (l_unit_config_header_id IS NOT NULL) THEN
2319: OPEN ahl_pc_id_from_assoc_csr(l_unit_config_header_id,
2320: AHL_UMP_UF_PVT.G_PC_UNIT_ASSOCIATION,
2321: AHL_UMP_UF_PVT.G_PC_PRIMARY_FLAG,
2322: AHL_UMP_UF_PVT.G_COMPLETE_STATUS);
2323: FETCH ahl_pc_id_from_assoc_csr INTO l_pc_node_id;
2324: IF (ahl_pc_id_from_assoc_csr%NOTFOUND) THEN
2325: l_pc_node_id := NULL;

Line 2322: AHL_UMP_UF_PVT.G_COMPLETE_STATUS);

2318: IF (l_unit_config_header_id IS NOT NULL) THEN
2319: OPEN ahl_pc_id_from_assoc_csr(l_unit_config_header_id,
2320: AHL_UMP_UF_PVT.G_PC_UNIT_ASSOCIATION,
2321: AHL_UMP_UF_PVT.G_PC_PRIMARY_FLAG,
2322: AHL_UMP_UF_PVT.G_COMPLETE_STATUS);
2323: FETCH ahl_pc_id_from_assoc_csr INTO l_pc_node_id;
2324: IF (ahl_pc_id_from_assoc_csr%NOTFOUND) THEN
2325: l_pc_node_id := NULL;
2326:

Line 2432: AHL_UMP_UF_PVT.G_PC_ITEM_ASSOCIATION,

2428:
2429: --Or resolve inventory item id into l_pc_node_id
2430: IF (l_inventory_item_id IS NOT NULL) THEN
2431: OPEN ahl_pc_id_from_assoc_csr(l_inventory_item_id,
2432: AHL_UMP_UF_PVT.G_PC_ITEM_ASSOCIATION,
2433: AHL_UMP_UF_PVT.G_PC_PRIMARY_FLAG,
2434: AHL_UMP_UF_PVT.G_COMPLETE_STATUS);
2435: FETCH ahl_pc_id_from_assoc_csr INTO l_pc_node_id;
2436: IF (ahl_pc_id_from_assoc_csr%NOTFOUND) THEN

Line 2433: AHL_UMP_UF_PVT.G_PC_PRIMARY_FLAG,

2429: --Or resolve inventory item id into l_pc_node_id
2430: IF (l_inventory_item_id IS NOT NULL) THEN
2431: OPEN ahl_pc_id_from_assoc_csr(l_inventory_item_id,
2432: AHL_UMP_UF_PVT.G_PC_ITEM_ASSOCIATION,
2433: AHL_UMP_UF_PVT.G_PC_PRIMARY_FLAG,
2434: AHL_UMP_UF_PVT.G_COMPLETE_STATUS);
2435: FETCH ahl_pc_id_from_assoc_csr INTO l_pc_node_id;
2436: IF (ahl_pc_id_from_assoc_csr%NOTFOUND) THEN
2437: l_pc_node_id := NULL;

Line 2434: AHL_UMP_UF_PVT.G_COMPLETE_STATUS);

2430: IF (l_inventory_item_id IS NOT NULL) THEN
2431: OPEN ahl_pc_id_from_assoc_csr(l_inventory_item_id,
2432: AHL_UMP_UF_PVT.G_PC_ITEM_ASSOCIATION,
2433: AHL_UMP_UF_PVT.G_PC_PRIMARY_FLAG,
2434: AHL_UMP_UF_PVT.G_COMPLETE_STATUS);
2435: FETCH ahl_pc_id_from_assoc_csr INTO l_pc_node_id;
2436: IF (ahl_pc_id_from_assoc_csr%NOTFOUND) THEN
2437: l_pc_node_id := NULL;
2438: -- FND_MESSAGE.Set_Name('AHL','AHL_UMP_UTIL_NO_PRIM_PC');

Line 2658: x_UF_details_tbl OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type,

2654:
2655: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2656: p_csi_item_instance_id IN NUMBER,
2657: p_onward_end_date IN DATE := NULL,
2658: x_UF_details_tbl OUT NOCOPY AHL_UMP_UF_PVT.uf_details_tbl_type,
2659: x_return_status OUT NOCOPY VARCHAR2)
2660: IS
2661:
2662: --

Line 2733: l_UF_details_tbl AHL_UMP_UF_PVT.uf_details_tbl_type;

2729: AND b.inventory_item_id = c.inventory_item_id
2730: AND c.instance_id = p_csi_item_instance_id;
2731:
2732:
2733: l_UF_details_tbl AHL_UMP_UF_PVT.uf_details_tbl_type;
2734: l_UF_details_rec AHL_UMP_UF_PVT.uf_details_rec_type;
2735: l_temp_details_rec ahl_uf_details_csr%ROWTYPE;
2736: j NUMBER;
2737:

Line 2734: l_UF_details_rec AHL_UMP_UF_PVT.uf_details_rec_type;

2730: AND c.instance_id = p_csi_item_instance_id;
2731:
2732:
2733: l_UF_details_tbl AHL_UMP_UF_PVT.uf_details_tbl_type;
2734: l_UF_details_rec AHL_UMP_UF_PVT.uf_details_rec_type;
2735: l_temp_details_rec ahl_uf_details_csr%ROWTYPE;
2736: j NUMBER;
2737:
2738:

Line 2832: END AHL_UMP_UF_PVT;

2828:
2829:
2830: END get_uf_from_part;
2831: -----------------------------------
2832: END AHL_UMP_UF_PVT;