DBA Data[Home] [Help]

APPS.AHL_MEL_CDL_HEADERS_PVT dependencies on FND_API

Line 35: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

31: PROCEDURE Create_Mel_Cdl
32: (
33: -- Standard IN params
34: p_api_version IN NUMBER,
35: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
36: p_commit IN VARCHAR2 := FND_API.G_FALSE,
37: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
38: p_default IN VARCHAR2 := FND_API.G_FALSE,
39: p_module_type IN VARCHAR2 := NULL,

Line 36: p_commit IN VARCHAR2 := FND_API.G_FALSE,

32: (
33: -- Standard IN params
34: p_api_version IN NUMBER,
35: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
36: p_commit IN VARCHAR2 := FND_API.G_FALSE,
37: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
38: p_default IN VARCHAR2 := FND_API.G_FALSE,
39: p_module_type IN VARCHAR2 := NULL,
40: -- Standard OUT params

Line 37: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

33: -- Standard IN params
34: p_api_version IN NUMBER,
35: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
36: p_commit IN VARCHAR2 := FND_API.G_FALSE,
37: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
38: p_default IN VARCHAR2 := FND_API.G_FALSE,
39: p_module_type IN VARCHAR2 := NULL,
40: -- Standard OUT params
41: x_return_status OUT NOCOPY VARCHAR2,

Line 38: p_default IN VARCHAR2 := FND_API.G_FALSE,

34: p_api_version IN NUMBER,
35: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
36: p_commit IN VARCHAR2 := FND_API.G_FALSE,
37: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
38: p_default IN VARCHAR2 := FND_API.G_FALSE,
39: p_module_type IN VARCHAR2 := NULL,
40: -- Standard OUT params
41: x_return_status OUT NOCOPY VARCHAR2,
42: x_msg_count OUT NOCOPY NUMBER,

Line 80: x_return_status := FND_API.G_RET_STS_SUCCESS;

76: -- Standard start of API savepoint
77: SAVEPOINT Create_Mel_Cdl_SP;
78:
79: -- Initialize return status to success before any code logic/validation
80: x_return_status := FND_API.G_RET_STS_SUCCESS;
81:
82: -- Standard call to check for call compatibility
83: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
84: THEN

Line 83: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)

79: -- Initialize return status to success before any code logic/validation
80: x_return_status := FND_API.G_RET_STS_SUCCESS;
81:
82: -- Standard call to check for call compatibility
83: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
84: THEN
85: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
86: END IF;
87:

Line 85: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

81:
82: -- Standard call to check for call compatibility
83: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
84: THEN
85: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
86: END IF;
87:
88: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
89: IF FND_API.TO_BOOLEAN(p_init_msg_list)

Line 88: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE

84: THEN
85: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
86: END IF;
87:
88: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
89: IF FND_API.TO_BOOLEAN(p_init_msg_list)
90: THEN
91: FND_MSG_PUB.INITIALIZE;
92: END IF;

Line 89: IF FND_API.TO_BOOLEAN(p_init_msg_list)

85: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
86: END IF;
87:
88: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
89: IF FND_API.TO_BOOLEAN(p_init_msg_list)
90: THEN
91: FND_MSG_PUB.INITIALIZE;
92: END IF;
93:

Line 115: RAISE FND_API.G_EXC_ERROR;

111: CLOSE check_pc_right;
112: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_PC_INVALID');
113: -- MEL/CDL can only be associated to nodes of primary complete Product Classifications of unit association type.
114: FND_MSG_PUB.ADD;
115: RAISE FND_API.G_EXC_ERROR;
116: END IF;
117: CLOSE check_pc_right;
118:
119: -- Verify MEL/CDL type is not null and exists as lookup

Line 137: IF (p_x_mel_cdl_header_rec.revision_date IS NULL OR p_x_mel_cdl_header_rec.revision_date = FND_API.G_MISS_DATE)

133: -- Verify revision is unique across all revisions of MEL/CDL
134: Check_Duplicate_Revision(p_x_mel_cdl_header_rec);
135:
136: -- Verify revision date is not null, it is a mandatory field
137: IF (p_x_mel_cdl_header_rec.revision_date IS NULL OR p_x_mel_cdl_header_rec.revision_date = FND_API.G_MISS_DATE)
138: THEN
139: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_REV_DATE_MAND');
140: -- MEL/CDL revision date is mandatory
141: FND_MSG_PUB.ADD;

Line 156: RAISE FND_API.G_EXC_ERROR;

152: -- Check Error Message stack.
153: x_msg_count := FND_MSG_PUB.count_msg;
154: IF (x_msg_count > 0)
155: THEN
156: RAISE FND_API.G_EXC_ERROR;
157: END IF;
158:
159: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
160: THEN

Line 273: RAISE FND_API.G_EXC_ERROR;

269: -- Check Error Message stack.
270: x_msg_count := FND_MSG_PUB.count_msg;
271: IF (x_msg_count > 0)
272: THEN
273: RAISE FND_API.G_EXC_ERROR;
274: END IF;
275:
276: -- Commit if p_commit = FND_API.G_TRUE
277: IF FND_API.TO_BOOLEAN(p_commit)

Line 276: -- Commit if p_commit = FND_API.G_TRUE

272: THEN
273: RAISE FND_API.G_EXC_ERROR;
274: END IF;
275:
276: -- Commit if p_commit = FND_API.G_TRUE
277: IF FND_API.TO_BOOLEAN(p_commit)
278: THEN
279: COMMIT WORK;
280: END IF;

Line 277: IF FND_API.TO_BOOLEAN(p_commit)

273: RAISE FND_API.G_EXC_ERROR;
274: END IF;
275:
276: -- Commit if p_commit = FND_API.G_TRUE
277: IF FND_API.TO_BOOLEAN(p_commit)
278: THEN
279: COMMIT WORK;
280: END IF;
281:

Line 287: p_encoded => FND_API.G_FALSE

283: FND_MSG_PUB.count_and_get
284: (
285: p_count => x_msg_count,
286: p_data => x_msg_data,
287: p_encoded => FND_API.G_FALSE
288: );
289:
290: EXCEPTION
291: WHEN FND_API.G_EXC_ERROR THEN

Line 291: WHEN FND_API.G_EXC_ERROR THEN

287: p_encoded => FND_API.G_FALSE
288: );
289:
290: EXCEPTION
291: WHEN FND_API.G_EXC_ERROR THEN
292: x_return_status := FND_API.G_RET_STS_ERROR;
293: Rollback to Create_Mel_Cdl_SP;
294: FND_MSG_PUB.count_and_get
295: (

Line 292: x_return_status := FND_API.G_RET_STS_ERROR;

288: );
289:
290: EXCEPTION
291: WHEN FND_API.G_EXC_ERROR THEN
292: x_return_status := FND_API.G_RET_STS_ERROR;
293: Rollback to Create_Mel_Cdl_SP;
294: FND_MSG_PUB.count_and_get
295: (
296: p_count => x_msg_count,

Line 298: p_encoded => FND_API.G_FALSE

294: FND_MSG_PUB.count_and_get
295: (
296: p_count => x_msg_count,
297: p_data => x_msg_data,
298: p_encoded => FND_API.G_FALSE
299: );
300:
301: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
302: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 301: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

297: p_data => x_msg_data,
298: p_encoded => FND_API.G_FALSE
299: );
300:
301: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
302: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
303: Rollback to Create_Mel_Cdl_SP;
304: FND_MSG_PUB.count_and_get
305: (

Line 302: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

298: p_encoded => FND_API.G_FALSE
299: );
300:
301: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
302: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
303: Rollback to Create_Mel_Cdl_SP;
304: FND_MSG_PUB.count_and_get
305: (
306: p_count => x_msg_count,

Line 308: p_encoded => FND_API.G_FALSE

304: FND_MSG_PUB.count_and_get
305: (
306: p_count => x_msg_count,
307: p_data => x_msg_data,
308: p_encoded => FND_API.G_FALSE
309: );
310:
311: WHEN OTHERS THEN
312: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 312: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

308: p_encoded => FND_API.G_FALSE
309: );
310:
311: WHEN OTHERS THEN
312: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
313: Rollback to Create_Mel_Cdl_SP;
314: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
315: THEN
316: FND_MSG_PUB.add_exc_msg

Line 327: p_encoded => FND_API.G_FALSE

323: FND_MSG_PUB.count_and_get
324: (
325: p_count => x_msg_count,
326: p_data => x_msg_data,
327: p_encoded => FND_API.G_FALSE
328: );
329: END Create_Mel_Cdl;
330:
331: -----------------------------------

Line 338: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

334: PROCEDURE Update_Mel_Cdl
335: (
336: -- Standard IN params
337: p_api_version IN NUMBER,
338: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
339: p_commit IN VARCHAR2 := FND_API.G_FALSE,
340: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
341: p_default IN VARCHAR2 := FND_API.G_FALSE,
342: p_module_type IN VARCHAR2 := NULL,

Line 339: p_commit IN VARCHAR2 := FND_API.G_FALSE,

335: (
336: -- Standard IN params
337: p_api_version IN NUMBER,
338: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
339: p_commit IN VARCHAR2 := FND_API.G_FALSE,
340: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
341: p_default IN VARCHAR2 := FND_API.G_FALSE,
342: p_module_type IN VARCHAR2 := NULL,
343: -- Standard OUT params

Line 340: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

336: -- Standard IN params
337: p_api_version IN NUMBER,
338: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
339: p_commit IN VARCHAR2 := FND_API.G_FALSE,
340: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
341: p_default IN VARCHAR2 := FND_API.G_FALSE,
342: p_module_type IN VARCHAR2 := NULL,
343: -- Standard OUT params
344: x_return_status OUT NOCOPY VARCHAR2,

Line 341: p_default IN VARCHAR2 := FND_API.G_FALSE,

337: p_api_version IN NUMBER,
338: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
339: p_commit IN VARCHAR2 := FND_API.G_FALSE,
340: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
341: p_default IN VARCHAR2 := FND_API.G_FALSE,
342: p_module_type IN VARCHAR2 := NULL,
343: -- Standard OUT params
344: x_return_status OUT NOCOPY VARCHAR2,
345: x_msg_count OUT NOCOPY NUMBER,

Line 401: x_return_status := FND_API.G_RET_STS_SUCCESS;

397: -- Standard start of API savepoint
398: SAVEPOINT Update_Mel_Cdl_SP;
399:
400: -- Initialize return status to success before any code logic/validation
401: x_return_status := FND_API.G_RET_STS_SUCCESS;
402:
403: -- Standard call to check for call compatibility
404: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
405: THEN

Line 404: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)

400: -- Initialize return status to success before any code logic/validation
401: x_return_status := FND_API.G_RET_STS_SUCCESS;
402:
403: -- Standard call to check for call compatibility
404: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
405: THEN
406: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
407: END IF;
408:

Line 406: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

402:
403: -- Standard call to check for call compatibility
404: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
405: THEN
406: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
407: END IF;
408:
409: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
410: IF FND_API.TO_BOOLEAN(p_init_msg_list)

Line 409: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE

405: THEN
406: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
407: END IF;
408:
409: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
410: IF FND_API.TO_BOOLEAN(p_init_msg_list)
411: THEN
412: FND_MSG_PUB.INITIALIZE;
413: END IF;

Line 410: IF FND_API.TO_BOOLEAN(p_init_msg_list)

406: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
407: END IF;
408:
409: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
410: IF FND_API.TO_BOOLEAN(p_init_msg_list)
411: THEN
412: FND_MSG_PUB.INITIALIZE;
413: END IF;
414:

Line 441: IF (p_x_mel_cdl_header_rec.pc_node_id IS NULL OR p_x_mel_cdl_header_rec.pc_node_id = FND_API.G_MISS_NUM)

437: FETCH get_prev_mel_cdl_details INTO l_prev_rev_date;
438: CLOSE get_prev_mel_cdl_details;
439:
440: -- Verify PC association is not changed
441: IF (p_x_mel_cdl_header_rec.pc_node_id IS NULL OR p_x_mel_cdl_header_rec.pc_node_id = FND_API.G_MISS_NUM)
442: THEN
443: p_x_mel_cdl_header_rec.pc_node_id := l_pc_node_id;
444: ELSIF (l_pc_node_id <> p_x_mel_cdl_header_rec.pc_node_id)
445: THEN

Line 449: RAISE FND_API.G_EXC_ERROR;

445: THEN
446: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_PC_ASSOC_NOTCHG');
447: -- Cannot modify MEL/CDL association to Product Classification node
448: FND_MSG_PUB.ADD;
449: RAISE FND_API.G_EXC_ERROR;
450: END IF;
451:
452: -- Verify only DRAFT/APPROVAL_PENDING MEL/CDL is being modified
453: IF (l_status NOT IN ('DRAFT','APPROVAL_REJECTED'))

Line 458: RAISE FND_API.G_EXC_ERROR;

454: THEN
455: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_NOT_DRAFT_UPD');
456: -- Cannot update MEL/CDL not in draft or approval rejected status
457: FND_MSG_PUB.ADD;
458: RAISE FND_API.G_EXC_ERROR;
459: END IF;
460:
461: -- Verify MEL/CDL type is not null and exists as lookup
462: Convert_Value_To_Id(p_x_mel_cdl_header_rec);

Line 475: RAISE FND_API.G_EXC_ERROR;

471: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_OTH_EXISTS');
472: -- A TYPE is already associated with the Product Classification Node, hence cannot modify MEL/CDL type
473: FND_MESSAGE.SET_TOKEN('TYPE', p_x_mel_cdl_header_rec.mel_cdl_type_code);
474: FND_MSG_PUB.ADD;
475: RAISE FND_API.G_EXC_ERROR;
476: ELSE
477: -- This means that the changed MEL/CDL is the 1st revision of the changed type, hence default version number
478: p_x_mel_cdl_header_rec.version_number := 1;
479: END IF;

Line 487: IF (p_x_mel_cdl_header_rec.revision_date IS NULL OR p_x_mel_cdl_header_rec.revision_date = FND_API.G_MISS_DATE)

483: -- Verify revision is unique across all revisions of MEL/CDL
484: Check_Duplicate_Revision(p_x_mel_cdl_header_rec);
485:
486: -- Verify revision date is not null, it is a mandatory field
487: IF (p_x_mel_cdl_header_rec.revision_date IS NULL OR p_x_mel_cdl_header_rec.revision_date = FND_API.G_MISS_DATE)
488: THEN
489: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_REV_DATE_MAND');
490: -- MEL/CDL revision date is mandatory
491: FND_MSG_PUB.ADD;

Line 511: RAISE FND_API.G_EXC_ERROR;

507: -- Check Error Message stack.
508: x_msg_count := FND_MSG_PUB.count_msg;
509: IF (x_msg_count > 0)
510: THEN
511: RAISE FND_API.G_EXC_ERROR;
512: END IF;
513:
514: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
515: THEN

Line 583: RAISE FND_API.G_EXC_ERROR;

579: -- Check Error Message stack.
580: x_msg_count := FND_MSG_PUB.count_msg;
581: IF (x_msg_count > 0)
582: THEN
583: RAISE FND_API.G_EXC_ERROR;
584: END IF;
585:
586: -- Commit if p_commit = FND_API.G_TRUE
587: IF FND_API.TO_BOOLEAN(p_commit)

Line 586: -- Commit if p_commit = FND_API.G_TRUE

582: THEN
583: RAISE FND_API.G_EXC_ERROR;
584: END IF;
585:
586: -- Commit if p_commit = FND_API.G_TRUE
587: IF FND_API.TO_BOOLEAN(p_commit)
588: THEN
589: COMMIT WORK;
590: END IF;

Line 587: IF FND_API.TO_BOOLEAN(p_commit)

583: RAISE FND_API.G_EXC_ERROR;
584: END IF;
585:
586: -- Commit if p_commit = FND_API.G_TRUE
587: IF FND_API.TO_BOOLEAN(p_commit)
588: THEN
589: COMMIT WORK;
590: END IF;
591:

Line 597: p_encoded => FND_API.G_FALSE

593: FND_MSG_PUB.count_and_get
594: (
595: p_count => x_msg_count,
596: p_data => x_msg_data,
597: p_encoded => FND_API.G_FALSE
598: );
599:
600: EXCEPTION
601: WHEN FND_API.G_EXC_ERROR THEN

Line 601: WHEN FND_API.G_EXC_ERROR THEN

597: p_encoded => FND_API.G_FALSE
598: );
599:
600: EXCEPTION
601: WHEN FND_API.G_EXC_ERROR THEN
602: x_return_status := FND_API.G_RET_STS_ERROR;
603: Rollback to Update_Mel_Cdl_SP;
604: FND_MSG_PUB.count_and_get
605: (

Line 602: x_return_status := FND_API.G_RET_STS_ERROR;

598: );
599:
600: EXCEPTION
601: WHEN FND_API.G_EXC_ERROR THEN
602: x_return_status := FND_API.G_RET_STS_ERROR;
603: Rollback to Update_Mel_Cdl_SP;
604: FND_MSG_PUB.count_and_get
605: (
606: p_count => x_msg_count,

Line 608: p_encoded => FND_API.G_FALSE

604: FND_MSG_PUB.count_and_get
605: (
606: p_count => x_msg_count,
607: p_data => x_msg_data,
608: p_encoded => FND_API.G_FALSE
609: );
610:
611: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
612: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 611: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

607: p_data => x_msg_data,
608: p_encoded => FND_API.G_FALSE
609: );
610:
611: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
612: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
613: Rollback to Update_Mel_Cdl_SP;
614: FND_MSG_PUB.count_and_get
615: (

Line 612: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

608: p_encoded => FND_API.G_FALSE
609: );
610:
611: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
612: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
613: Rollback to Update_Mel_Cdl_SP;
614: FND_MSG_PUB.count_and_get
615: (
616: p_count => x_msg_count,

Line 618: p_encoded => FND_API.G_FALSE

614: FND_MSG_PUB.count_and_get
615: (
616: p_count => x_msg_count,
617: p_data => x_msg_data,
618: p_encoded => FND_API.G_FALSE
619: );
620:
621: WHEN OTHERS THEN
622: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 622: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

618: p_encoded => FND_API.G_FALSE
619: );
620:
621: WHEN OTHERS THEN
622: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
623: Rollback to Update_Mel_Cdl_SP;
624: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
625: THEN
626: FND_MSG_PUB.add_exc_msg

Line 637: p_encoded => FND_API.G_FALSE

633: FND_MSG_PUB.count_and_get
634: (
635: p_count => x_msg_count,
636: p_data => x_msg_data,
637: p_encoded => FND_API.G_FALSE
638: );
639: END Update_Mel_Cdl;
640:
641: -----------------------------------

Line 648: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

644: PROCEDURE Delete_Mel_Cdl
645: (
646: -- Standard IN params
647: p_api_version IN NUMBER,
648: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
649: p_commit IN VARCHAR2 := FND_API.G_FALSE,
650: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
651: p_default IN VARCHAR2 := FND_API.G_FALSE,
652: p_module_type IN VARCHAR2 := NULL,

Line 649: p_commit IN VARCHAR2 := FND_API.G_FALSE,

645: (
646: -- Standard IN params
647: p_api_version IN NUMBER,
648: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
649: p_commit IN VARCHAR2 := FND_API.G_FALSE,
650: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
651: p_default IN VARCHAR2 := FND_API.G_FALSE,
652: p_module_type IN VARCHAR2 := NULL,
653: -- Standard OUT params

Line 650: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

646: -- Standard IN params
647: p_api_version IN NUMBER,
648: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
649: p_commit IN VARCHAR2 := FND_API.G_FALSE,
650: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
651: p_default IN VARCHAR2 := FND_API.G_FALSE,
652: p_module_type IN VARCHAR2 := NULL,
653: -- Standard OUT params
654: x_return_status OUT NOCOPY VARCHAR2,

Line 651: p_default IN VARCHAR2 := FND_API.G_FALSE,

647: p_api_version IN NUMBER,
648: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
649: p_commit IN VARCHAR2 := FND_API.G_FALSE,
650: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
651: p_default IN VARCHAR2 := FND_API.G_FALSE,
652: p_module_type IN VARCHAR2 := NULL,
653: -- Standard OUT params
654: x_return_status OUT NOCOPY VARCHAR2,
655: x_msg_count OUT NOCOPY NUMBER,

Line 693: x_return_status := FND_API.G_RET_STS_SUCCESS;

689: -- Standard start of API savepoint
690: SAVEPOINT Delete_Mel_Cdl_SP;
691:
692: -- Initialize return status to success before any code logic/validation
693: x_return_status := FND_API.G_RET_STS_SUCCESS;
694:
695: -- Standard call to check for call compatibility
696: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
697: THEN

Line 696: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)

692: -- Initialize return status to success before any code logic/validation
693: x_return_status := FND_API.G_RET_STS_SUCCESS;
694:
695: -- Standard call to check for call compatibility
696: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
697: THEN
698: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
699: END IF;
700:

Line 698: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

694:
695: -- Standard call to check for call compatibility
696: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
697: THEN
698: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
699: END IF;
700:
701: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
702: IF FND_API.TO_BOOLEAN(p_init_msg_list)

Line 701: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE

697: THEN
698: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
699: END IF;
700:
701: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
702: IF FND_API.TO_BOOLEAN(p_init_msg_list)
703: THEN
704: FND_MSG_PUB.INITIALIZE;
705: END IF;

Line 702: IF FND_API.TO_BOOLEAN(p_init_msg_list)

698: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
699: END IF;
700:
701: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
702: IF FND_API.TO_BOOLEAN(p_init_msg_list)
703: THEN
704: FND_MSG_PUB.INITIALIZE;
705: END IF;
706:

Line 733: RAISE FND_API.G_EXC_ERROR;

729: THEN
730: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_NOT_DRAFT_DEL');
731: -- Cannot delete MEL/CDL not in draft or approval rejected status
732: FND_MSG_PUB.ADD;
733: RAISE FND_API.G_EXC_ERROR;
734: END IF;
735:
736: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
737: THEN

Line 762: IF (x_msg_count > 0 OR x_return_status <> FND_API.G_RET_STS_SUCCESS)

758: );
759:
760: -- Check Error Message stack.
761: x_msg_count := FND_MSG_PUB.count_msg;
762: IF (x_msg_count > 0 OR x_return_status <> FND_API.G_RET_STS_SUCCESS)
763: THEN
764: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)
765: THEN
766: fnd_log.string

Line 775: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

771: );
772: END IF;
773:
774: -- Throwing unexpected error since this delete should have happened without any hiccup
775: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
776: END IF;
777: END LOOP;
778:
779: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)

Line 873: RAISE FND_API.G_EXC_ERROR;

869: -- Check Error Message stack.
870: x_msg_count := FND_MSG_PUB.count_msg;
871: IF (x_msg_count > 0)
872: THEN
873: RAISE FND_API.G_EXC_ERROR;
874: END IF;
875:
876: -- Commit if p_commit = FND_API.G_TRUE
877: IF FND_API.TO_BOOLEAN(p_commit)

Line 876: -- Commit if p_commit = FND_API.G_TRUE

872: THEN
873: RAISE FND_API.G_EXC_ERROR;
874: END IF;
875:
876: -- Commit if p_commit = FND_API.G_TRUE
877: IF FND_API.TO_BOOLEAN(p_commit)
878: THEN
879: COMMIT WORK;
880: END IF;

Line 877: IF FND_API.TO_BOOLEAN(p_commit)

873: RAISE FND_API.G_EXC_ERROR;
874: END IF;
875:
876: -- Commit if p_commit = FND_API.G_TRUE
877: IF FND_API.TO_BOOLEAN(p_commit)
878: THEN
879: COMMIT WORK;
880: END IF;
881:

Line 887: p_encoded => FND_API.G_FALSE

883: FND_MSG_PUB.count_and_get
884: (
885: p_count => x_msg_count,
886: p_data => x_msg_data,
887: p_encoded => FND_API.G_FALSE
888: );
889:
890: EXCEPTION
891: WHEN FND_API.G_EXC_ERROR THEN

Line 891: WHEN FND_API.G_EXC_ERROR THEN

887: p_encoded => FND_API.G_FALSE
888: );
889:
890: EXCEPTION
891: WHEN FND_API.G_EXC_ERROR THEN
892: x_return_status := FND_API.G_RET_STS_ERROR;
893: Rollback to Delete_Mel_Cdl_SP;
894: FND_MSG_PUB.count_and_get
895: (

Line 892: x_return_status := FND_API.G_RET_STS_ERROR;

888: );
889:
890: EXCEPTION
891: WHEN FND_API.G_EXC_ERROR THEN
892: x_return_status := FND_API.G_RET_STS_ERROR;
893: Rollback to Delete_Mel_Cdl_SP;
894: FND_MSG_PUB.count_and_get
895: (
896: p_count => x_msg_count,

Line 898: p_encoded => FND_API.G_FALSE

894: FND_MSG_PUB.count_and_get
895: (
896: p_count => x_msg_count,
897: p_data => x_msg_data,
898: p_encoded => FND_API.G_FALSE
899: );
900:
901: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 901: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

897: p_data => x_msg_data,
898: p_encoded => FND_API.G_FALSE
899: );
900:
901: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
903: Rollback to Delete_Mel_Cdl_SP;
904: FND_MSG_PUB.count_and_get
905: (

Line 902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

898: p_encoded => FND_API.G_FALSE
899: );
900:
901: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
903: Rollback to Delete_Mel_Cdl_SP;
904: FND_MSG_PUB.count_and_get
905: (
906: p_count => x_msg_count,

Line 908: p_encoded => FND_API.G_FALSE

904: FND_MSG_PUB.count_and_get
905: (
906: p_count => x_msg_count,
907: p_data => x_msg_data,
908: p_encoded => FND_API.G_FALSE
909: );
910:
911: WHEN OTHERS THEN
912: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 912: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

908: p_encoded => FND_API.G_FALSE
909: );
910:
911: WHEN OTHERS THEN
912: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
913: Rollback to Delete_Mel_Cdl_SP;
914: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
915: THEN
916: FND_MSG_PUB.add_exc_msg

Line 927: p_encoded => FND_API.G_FALSE

923: FND_MSG_PUB.count_and_get
924: (
925: p_count => x_msg_count,
926: p_data => x_msg_data,
927: p_encoded => FND_API.G_FALSE
928: );
929: END Delete_Mel_Cdl;
930:
931: --------------------------------------------

Line 938: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

934: PROCEDURE Create_Mel_Cdl_Revision
935: (
936: -- Standard IN params
937: p_api_version IN NUMBER,
938: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
939: p_commit IN VARCHAR2 := FND_API.G_FALSE,
940: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
941: p_default IN VARCHAR2 := FND_API.G_FALSE,
942: p_module_type IN VARCHAR2 := NULL,

Line 939: p_commit IN VARCHAR2 := FND_API.G_FALSE,

935: (
936: -- Standard IN params
937: p_api_version IN NUMBER,
938: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
939: p_commit IN VARCHAR2 := FND_API.G_FALSE,
940: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
941: p_default IN VARCHAR2 := FND_API.G_FALSE,
942: p_module_type IN VARCHAR2 := NULL,
943: -- Standard OUT params

Line 940: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

936: -- Standard IN params
937: p_api_version IN NUMBER,
938: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
939: p_commit IN VARCHAR2 := FND_API.G_FALSE,
940: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
941: p_default IN VARCHAR2 := FND_API.G_FALSE,
942: p_module_type IN VARCHAR2 := NULL,
943: -- Standard OUT params
944: x_return_status OUT NOCOPY VARCHAR2,

Line 941: p_default IN VARCHAR2 := FND_API.G_FALSE,

937: p_api_version IN NUMBER,
938: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
939: p_commit IN VARCHAR2 := FND_API.G_FALSE,
940: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
941: p_default IN VARCHAR2 := FND_API.G_FALSE,
942: p_module_type IN VARCHAR2 := NULL,
943: -- Standard OUT params
944: x_return_status OUT NOCOPY VARCHAR2,
945: x_msg_count OUT NOCOPY NUMBER,

Line 1127: x_return_status := FND_API.G_RET_STS_SUCCESS;

1123: -- Standard start of API savepoint
1124: SAVEPOINT Create_Mel_Cdl_Revision_SP;
1125:
1126: -- Initialize return status to success before any code logic/validation
1127: x_return_status := FND_API.G_RET_STS_SUCCESS;
1128:
1129: -- Standard call to check for call compatibility
1130: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
1131: THEN

Line 1130: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)

1126: -- Initialize return status to success before any code logic/validation
1127: x_return_status := FND_API.G_RET_STS_SUCCESS;
1128:
1129: -- Standard call to check for call compatibility
1130: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
1131: THEN
1132: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1133: END IF;
1134:

Line 1132: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1128:
1129: -- Standard call to check for call compatibility
1130: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
1131: THEN
1132: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1133: END IF;
1134:
1135: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
1136: IF FND_API.TO_BOOLEAN(p_init_msg_list)

Line 1135: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE

1131: THEN
1132: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1133: END IF;
1134:
1135: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
1136: IF FND_API.TO_BOOLEAN(p_init_msg_list)
1137: THEN
1138: FND_MSG_PUB.INITIALIZE;
1139: END IF;

Line 1136: IF FND_API.TO_BOOLEAN(p_init_msg_list)

1132: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1133: END IF;
1134:
1135: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
1136: IF FND_API.TO_BOOLEAN(p_init_msg_list)
1137: THEN
1138: FND_MSG_PUB.INITIALIZE;
1139: END IF;
1140:

Line 1188: RAISE FND_API.G_EXC_ERROR;

1184: -- Check Error Message stack.
1185: x_msg_count := FND_MSG_PUB.count_msg;
1186: IF (x_msg_count > 0)
1187: THEN
1188: RAISE FND_API.G_EXC_ERROR;
1189: END IF;
1190:
1191: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
1192: THEN

Line 1421: IF (x_msg_count > 0 OR l_return_status <> FND_API.G_RET_STS_SUCCESS)

1417: );
1418:
1419: -- Check Error Message stack.
1420: x_msg_count := FND_MSG_PUB.count_msg;
1421: IF (x_msg_count > 0 OR l_return_status <> FND_API.G_RET_STS_SUCCESS)
1422: THEN
1423: IF (fnd_log.level_unexpected >= fnd_log.g_current_runtime_level)
1424: THEN
1425: fnd_log.string

Line 1434: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1430: );
1431: END IF;
1432:
1433: -- Raise unexpected error since this is supposed to go through without any hiccups
1434: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1435: END IF;
1436: END LOOP;
1437:
1438: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)

Line 1626: RAISE FND_API.G_EXC_ERROR;

1622: -- Check Error Message stack.
1623: x_msg_count := FND_MSG_PUB.count_msg;
1624: IF (x_msg_count > 0)
1625: THEN
1626: RAISE FND_API.G_EXC_ERROR;
1627: END IF;
1628:
1629: -- If there exists open NRs for the MEL/CDL, need to throw a warning...
1630: AHL_UMP_NONROUTINES_PVT.Check_Open_NRs

Line 1637: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)

1633: p_mel_cdl_header_id => l_mel_cdl_header_id
1634: );
1635: -- Need to verify whether to pass all PC nodes within the tree, etc or not
1636:
1637: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)
1638: THEN
1639: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_OPEN_NRS_EXIST');
1640: -- There exist(s) open Non-routines for the MEL/CDL
1641: FND_MSG_PUB.ADD;

Line 1656: -- Commit if p_commit = FND_API.G_TRUE

1652: 'At the end of PLSQL procedure'
1653: );
1654: END IF;
1655:
1656: -- Commit if p_commit = FND_API.G_TRUE
1657: IF FND_API.TO_BOOLEAN(p_commit)
1658: THEN
1659: COMMIT WORK;
1660: END IF;

Line 1657: IF FND_API.TO_BOOLEAN(p_commit)

1653: );
1654: END IF;
1655:
1656: -- Commit if p_commit = FND_API.G_TRUE
1657: IF FND_API.TO_BOOLEAN(p_commit)
1658: THEN
1659: COMMIT WORK;
1660: END IF;
1661:

Line 1667: p_encoded => FND_API.G_FALSE

1663: FND_MSG_PUB.count_and_get
1664: (
1665: p_count => x_msg_count,
1666: p_data => x_msg_data,
1667: p_encoded => FND_API.G_FALSE
1668: );
1669:
1670: EXCEPTION
1671: WHEN FND_API.G_EXC_ERROR THEN

Line 1671: WHEN FND_API.G_EXC_ERROR THEN

1667: p_encoded => FND_API.G_FALSE
1668: );
1669:
1670: EXCEPTION
1671: WHEN FND_API.G_EXC_ERROR THEN
1672: x_return_status := FND_API.G_RET_STS_ERROR;
1673: Rollback to Create_Mel_Cdl_Revision_SP;
1674: FND_MSG_PUB.count_and_get
1675: (

Line 1672: x_return_status := FND_API.G_RET_STS_ERROR;

1668: );
1669:
1670: EXCEPTION
1671: WHEN FND_API.G_EXC_ERROR THEN
1672: x_return_status := FND_API.G_RET_STS_ERROR;
1673: Rollback to Create_Mel_Cdl_Revision_SP;
1674: FND_MSG_PUB.count_and_get
1675: (
1676: p_count => x_msg_count,

Line 1678: p_encoded => FND_API.G_FALSE

1674: FND_MSG_PUB.count_and_get
1675: (
1676: p_count => x_msg_count,
1677: p_data => x_msg_data,
1678: p_encoded => FND_API.G_FALSE
1679: );
1680:
1681: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1681: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1677: p_data => x_msg_data,
1678: p_encoded => FND_API.G_FALSE
1679: );
1680:
1681: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1683: Rollback to Create_Mel_Cdl_Revision_SP;
1684: FND_MSG_PUB.count_and_get
1685: (

Line 1682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1678: p_encoded => FND_API.G_FALSE
1679: );
1680:
1681: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1683: Rollback to Create_Mel_Cdl_Revision_SP;
1684: FND_MSG_PUB.count_and_get
1685: (
1686: p_count => x_msg_count,

Line 1688: p_encoded => FND_API.G_FALSE

1684: FND_MSG_PUB.count_and_get
1685: (
1686: p_count => x_msg_count,
1687: p_data => x_msg_data,
1688: p_encoded => FND_API.G_FALSE
1689: );
1690:
1691: WHEN OTHERS THEN
1692: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1692: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1688: p_encoded => FND_API.G_FALSE
1689: );
1690:
1691: WHEN OTHERS THEN
1692: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1693: Rollback to Create_Mel_Cdl_Revision_SP;
1694: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1695: THEN
1696: FND_MSG_PUB.add_exc_msg

Line 1707: p_encoded => FND_API.G_FALSE

1703: FND_MSG_PUB.count_and_get
1704: (
1705: p_count => x_msg_count,
1706: p_data => x_msg_data,
1707: p_encoded => FND_API.G_FALSE
1708: );
1709: END Create_Mel_Cdl_Revision;
1710:
1711: ----------------------------------------------

Line 1718: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1714: PROCEDURE Initiate_Mel_Cdl_Approval
1715: (
1716: -- Standard IN params
1717: p_api_version IN NUMBER,
1718: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1719: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1720: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1721: p_default IN VARCHAR2 := FND_API.G_FALSE,
1722: p_module_type IN VARCHAR2 := NULL,

Line 1719: p_commit IN VARCHAR2 := FND_API.G_FALSE,

1715: (
1716: -- Standard IN params
1717: p_api_version IN NUMBER,
1718: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1719: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1720: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1721: p_default IN VARCHAR2 := FND_API.G_FALSE,
1722: p_module_type IN VARCHAR2 := NULL,
1723: -- Standard OUT params

Line 1720: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1716: -- Standard IN params
1717: p_api_version IN NUMBER,
1718: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1719: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1720: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1721: p_default IN VARCHAR2 := FND_API.G_FALSE,
1722: p_module_type IN VARCHAR2 := NULL,
1723: -- Standard OUT params
1724: x_return_status OUT NOCOPY VARCHAR2,

Line 1721: p_default IN VARCHAR2 := FND_API.G_FALSE,

1717: p_api_version IN NUMBER,
1718: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1719: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1720: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1721: p_default IN VARCHAR2 := FND_API.G_FALSE,
1722: p_module_type IN VARCHAR2 := NULL,
1723: -- Standard OUT params
1724: x_return_status OUT NOCOPY VARCHAR2,
1725: x_msg_count OUT NOCOPY NUMBER,

Line 1805: x_return_status := FND_API.G_RET_STS_SUCCESS;

1801: -- Standard start of API savepoint
1802: SAVEPOINT Initiate_Mel_Cdl_Approval_SP;
1803:
1804: -- Initialize return status to success before any code logic/validation
1805: x_return_status := FND_API.G_RET_STS_SUCCESS;
1806:
1807: -- Standard call to check for call compatibility
1808: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
1809: THEN

Line 1808: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)

1804: -- Initialize return status to success before any code logic/validation
1805: x_return_status := FND_API.G_RET_STS_SUCCESS;
1806:
1807: -- Standard call to check for call compatibility
1808: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
1809: THEN
1810: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1811: END IF;
1812:

Line 1810: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1806:
1807: -- Standard call to check for call compatibility
1808: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
1809: THEN
1810: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1811: END IF;
1812:
1813: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
1814: IF FND_API.TO_BOOLEAN(p_init_msg_list)

Line 1813: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE

1809: THEN
1810: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1811: END IF;
1812:
1813: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
1814: IF FND_API.TO_BOOLEAN(p_init_msg_list)
1815: THEN
1816: FND_MSG_PUB.INITIALIZE;
1817: END IF;

Line 1814: IF FND_API.TO_BOOLEAN(p_init_msg_list)

1810: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1811: END IF;
1812:
1813: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
1814: IF FND_API.TO_BOOLEAN(p_init_msg_list)
1815: THEN
1816: FND_MSG_PUB.INITIALIZE;
1817: END IF;
1818:

Line 1855: RAISE FND_API.G_EXC_ERROR;

1851: THEN
1852: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_NOT_DRAFT_APPR');
1853: -- MEL/CDL is not in draft or approval rejected status, hence cannot submit for approval
1854: FND_MSG_PUB.ADD;
1855: RAISE FND_API.G_EXC_ERROR;
1856: END IF;
1857:
1858: -- Verify that revision of the MEL/CDL being submitted for approval is unique
1859: OPEN check_dup_rev(l_pc_node_id, l_mel_cdl_type, l_revision, p_mel_cdl_header_id);

Line 1904: IF (x_msg_count > 0 OR l_return_status <> FND_API.G_RET_STS_SUCCESS)

1900: END IF;
1901:
1902: -- Check Error Message stack.
1903: x_msg_count := FND_MSG_PUB.count_msg;
1904: IF (x_msg_count > 0 OR l_return_status <> FND_API.G_RET_STS_SUCCESS)
1905: THEN
1906: RAISE FND_API.G_EXC_ERROR;
1907: END IF;
1908:

Line 1906: RAISE FND_API.G_EXC_ERROR;

1902: -- Check Error Message stack.
1903: x_msg_count := FND_MSG_PUB.count_msg;
1904: IF (x_msg_count > 0 OR l_return_status <> FND_API.G_RET_STS_SUCCESS)
1905: THEN
1906: RAISE FND_API.G_EXC_ERROR;
1907: END IF;
1908:
1909: IF (l_active = 'Y')
1910: THEN

Line 2016: RAISE FND_API.G_EXC_ERROR;

2012: -- Check Error Message stack.
2013: x_msg_count := FND_MSG_PUB.count_msg;
2014: IF (x_msg_count > 0)
2015: THEN
2016: RAISE FND_API.G_EXC_ERROR;
2017: END IF;
2018:
2019: -- Commit if p_commit = FND_API.G_TRUE
2020: IF FND_API.TO_BOOLEAN(p_commit)

Line 2019: -- Commit if p_commit = FND_API.G_TRUE

2015: THEN
2016: RAISE FND_API.G_EXC_ERROR;
2017: END IF;
2018:
2019: -- Commit if p_commit = FND_API.G_TRUE
2020: IF FND_API.TO_BOOLEAN(p_commit)
2021: THEN
2022: COMMIT WORK;
2023: END IF;

Line 2020: IF FND_API.TO_BOOLEAN(p_commit)

2016: RAISE FND_API.G_EXC_ERROR;
2017: END IF;
2018:
2019: -- Commit if p_commit = FND_API.G_TRUE
2020: IF FND_API.TO_BOOLEAN(p_commit)
2021: THEN
2022: COMMIT WORK;
2023: END IF;
2024:

Line 2030: p_encoded => FND_API.G_FALSE

2026: FND_MSG_PUB.count_and_get
2027: (
2028: p_count => x_msg_count,
2029: p_data => x_msg_data,
2030: p_encoded => FND_API.G_FALSE
2031: );
2032:
2033: EXCEPTION
2034: WHEN FND_API.G_EXC_ERROR THEN

Line 2034: WHEN FND_API.G_EXC_ERROR THEN

2030: p_encoded => FND_API.G_FALSE
2031: );
2032:
2033: EXCEPTION
2034: WHEN FND_API.G_EXC_ERROR THEN
2035: x_return_status := FND_API.G_RET_STS_ERROR;
2036: Rollback to Initiate_Mel_Cdl_Approval_SP;
2037: FND_MSG_PUB.count_and_get
2038: (

Line 2035: x_return_status := FND_API.G_RET_STS_ERROR;

2031: );
2032:
2033: EXCEPTION
2034: WHEN FND_API.G_EXC_ERROR THEN
2035: x_return_status := FND_API.G_RET_STS_ERROR;
2036: Rollback to Initiate_Mel_Cdl_Approval_SP;
2037: FND_MSG_PUB.count_and_get
2038: (
2039: p_count => x_msg_count,

Line 2041: p_encoded => FND_API.G_FALSE

2037: FND_MSG_PUB.count_and_get
2038: (
2039: p_count => x_msg_count,
2040: p_data => x_msg_data,
2041: p_encoded => FND_API.G_FALSE
2042: );
2043:
2044: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2045: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2044: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2040: p_data => x_msg_data,
2041: p_encoded => FND_API.G_FALSE
2042: );
2043:
2044: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2045: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2046: Rollback to Initiate_Mel_Cdl_Approval_SP;
2047: FND_MSG_PUB.count_and_get
2048: (

Line 2045: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2041: p_encoded => FND_API.G_FALSE
2042: );
2043:
2044: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2045: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2046: Rollback to Initiate_Mel_Cdl_Approval_SP;
2047: FND_MSG_PUB.count_and_get
2048: (
2049: p_count => x_msg_count,

Line 2051: p_encoded => FND_API.G_FALSE

2047: FND_MSG_PUB.count_and_get
2048: (
2049: p_count => x_msg_count,
2050: p_data => x_msg_data,
2051: p_encoded => FND_API.G_FALSE
2052: );
2053:
2054: WHEN OTHERS THEN
2055: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2055: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2051: p_encoded => FND_API.G_FALSE
2052: );
2053:
2054: WHEN OTHERS THEN
2055: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2056: Rollback to Initiate_Mel_Cdl_Approval_SP;
2057: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2058: THEN
2059: FND_MSG_PUB.add_exc_msg

Line 2070: p_encoded => FND_API.G_FALSE

2066: FND_MSG_PUB.count_and_get
2067: (
2068: p_count => x_msg_count,
2069: p_data => x_msg_data,
2070: p_encoded => FND_API.G_FALSE
2071: );
2072: END Initiate_Mel_Cdl_Approval;
2073:
2074: ---------------------------------------------

Line 2102: RAISE FND_API.G_EXC_ERROR;

2098: CLOSE check_exists;
2099: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_NOTFOUND');
2100: -- MEL/CDL is not found
2101: FND_MSG_PUB.ADD;
2102: RAISE FND_API.G_EXC_ERROR;
2103: ELSE
2104: CLOSE check_exists;
2105: IF (l_ovn <> p_mel_cdl_object_version)
2106: THEN

Line 2110: RAISE FND_API.G_EXC_ERROR;

2106: THEN
2107: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_COM_RECORD_CHANGED');
2108: -- Record has been modified by another user
2109: FND_MSG_PUB.ADD;
2110: RAISE FND_API.G_EXC_ERROR;
2111: END IF;
2112: END IF;
2113:
2114: END Check_Mel_Cdl_Exists;

Line 2128: IF (p_x_mel_cdl_header_rec.mel_cdl_type_code IS NULL OR p_x_mel_cdl_header_rec.mel_cdl_type_code = FND_API.G_MISS_CHAR)

2124: l_ret_val BOOLEAN;
2125: BEGIN
2126:
2127: -- Convert value-to-id for mel_cdl_type
2128: IF (p_x_mel_cdl_header_rec.mel_cdl_type_code IS NULL OR p_x_mel_cdl_header_rec.mel_cdl_type_code = FND_API.G_MISS_CHAR)
2129: THEN
2130: IF (p_x_mel_cdl_header_rec.mel_cdl_type_meaning IS NULL OR p_x_mel_cdl_header_rec.mel_cdl_type_meaning = FND_API.G_MISS_CHAR)
2131: THEN
2132: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_TYPE_MAND');

Line 2130: IF (p_x_mel_cdl_header_rec.mel_cdl_type_meaning IS NULL OR p_x_mel_cdl_header_rec.mel_cdl_type_meaning = FND_API.G_MISS_CHAR)

2126:
2127: -- Convert value-to-id for mel_cdl_type
2128: IF (p_x_mel_cdl_header_rec.mel_cdl_type_code IS NULL OR p_x_mel_cdl_header_rec.mel_cdl_type_code = FND_API.G_MISS_CHAR)
2129: THEN
2130: IF (p_x_mel_cdl_header_rec.mel_cdl_type_meaning IS NULL OR p_x_mel_cdl_header_rec.mel_cdl_type_meaning = FND_API.G_MISS_CHAR)
2131: THEN
2132: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_TYPE_MAND');
2133: -- MEL/CDL type is mandatory
2134: FND_MSG_PUB.ADD;

Line 2178: IF (p_x_mel_cdl_header_rec.revision IS NULL OR p_x_mel_cdl_header_rec.revision = FND_API.G_MISS_CHAR)

2174: mel_cdl_type_code = p_x_mel_cdl_header_rec.mel_cdl_type_code AND
2175: revision = p_x_mel_cdl_header_rec.revision AND
2176: mel_cdl_header_id <> nvl(p_x_mel_cdl_header_rec.mel_cdl_header_id, -1);
2177: BEGIN
2178: IF (p_x_mel_cdl_header_rec.revision IS NULL OR p_x_mel_cdl_header_rec.revision = FND_API.G_MISS_CHAR)
2179: THEN
2180: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_REV_MAND');
2181: -- MEL/CDL revision is mandatory
2182: FND_MSG_PUB.ADD;