DBA Data[Home] [Help]

APPS.AHL_MEL_CDL_ATA_SEQS_PVT dependencies on FND_API

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

72: PROCEDURE Process_Ata_Sequences
73: (
74: -- Standard IN params
75: p_api_version IN NUMBER,
76: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
77: p_commit IN VARCHAR2 := FND_API.G_FALSE,
78: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
79: p_default IN VARCHAR2 := FND_API.G_FALSE,
80: p_module_type IN VARCHAR2 := NULL,

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

73: (
74: -- Standard IN params
75: p_api_version IN NUMBER,
76: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
77: p_commit IN VARCHAR2 := FND_API.G_FALSE,
78: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
79: p_default IN VARCHAR2 := FND_API.G_FALSE,
80: p_module_type IN VARCHAR2 := NULL,
81: -- Standard OUT params

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

74: -- Standard IN params
75: p_api_version IN NUMBER,
76: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
77: p_commit IN VARCHAR2 := FND_API.G_FALSE,
78: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
79: p_default IN VARCHAR2 := FND_API.G_FALSE,
80: p_module_type IN VARCHAR2 := NULL,
81: -- Standard OUT params
82: x_return_status OUT NOCOPY VARCHAR2,

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

75: p_api_version IN NUMBER,
76: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
77: p_commit IN VARCHAR2 := FND_API.G_FALSE,
78: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
79: p_default IN VARCHAR2 := FND_API.G_FALSE,
80: p_module_type IN VARCHAR2 := NULL,
81: -- Standard OUT params
82: x_return_status OUT NOCOPY VARCHAR2,
83: x_msg_count OUT NOCOPY NUMBER,

Line 142: x_return_status := FND_API.G_RET_STS_SUCCESS;

138: -- Standard start of API savepoint
139: SAVEPOINT Process_Ata_Sequences_SP;
140:
141: -- Initialize return status to success before any code logic/validation
142: x_return_status := FND_API.G_RET_STS_SUCCESS;
143:
144: -- Standard call to check for call compatibility
145: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
146: THEN

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

141: -- Initialize return status to success before any code logic/validation
142: x_return_status := FND_API.G_RET_STS_SUCCESS;
143:
144: -- Standard call to check for call compatibility
145: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
146: THEN
147: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
148: END IF;
149:

Line 147: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

143:
144: -- Standard call to check for call compatibility
145: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
146: THEN
147: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
148: END IF;
149:
150: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
151: IF FND_API.TO_BOOLEAN(p_init_msg_list)

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

146: THEN
147: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
148: END IF;
149:
150: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
151: IF FND_API.TO_BOOLEAN(p_init_msg_list)
152: THEN
153: FND_MSG_PUB.INITIALIZE;
154: END IF;

Line 151: IF FND_API.TO_BOOLEAN(p_init_msg_list)

147: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
148: END IF;
149:
150: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
151: IF FND_API.TO_BOOLEAN(p_init_msg_list)
152: THEN
153: FND_MSG_PUB.INITIALIZE;
154: END IF;
155:

Line 182: RAISE FND_API.G_EXC_ERROR;

178: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_COM_INVALID_DML_REC');
179: -- Invalid DML operation FIELD specified
180: FND_MESSAGE.SET_TOKEN('FIELD', p_x_ata_sequences_tbl(l_rec_idx).dml_operation);
181: FND_MSG_PUB.ADD;
182: RAISE FND_API.G_EXC_ERROR;
183: END IF;
184:
185: -- Verify MEL/CDL is in DRAFT status and change to DRAFT if APPROVAL_REJECTED; Also verify whether MEL/CDL information is provided
186: Check_Mel_Cdl_Status(p_x_ata_sequences_tbl(l_rec_idx).mel_cdl_header_id, p_x_ata_sequences_tbl(l_rec_idx).mel_cdl_ata_sequence_id);

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

203: l_msg_data
204: );
205:
206: -- Check Error Message stack.
207: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)
208: THEN
209: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)
210: THEN
211: fnd_log.string

Line 220: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

216: );
217: END IF;
218:
219: -- Throwing unexpected error since this delete should have happened without any hiccup
220: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
221: END IF;
222: END LOOP;
223: */
224:

Line 272: RAISE FND_API.G_EXC_ERROR;

268: -- Cannot modify System Sequence from "OLDATA" to "ATA" for existing record
269: FND_MESSAGE.SET_TOKEN('OLDATA', l_ata_code);
270: FND_MESSAGE.SET_TOKEN('ATA', p_x_ata_sequences_tbl(l_rec_idx).ata_code);
271: FND_MSG_PUB.ADD;
272: RAISE FND_API.G_EXC_ERROR;
273: END IF;
274: END IF;
275:
276: -- For C/U, verify ATA code is not null and correct, Repair Category is not null and correct, Installed Number and Dispatch Number are okay

Line 281: IF (p_x_ata_sequences_tbl(l_rec_idx).installed_number IS NULL OR p_x_ata_sequences_tbl(l_rec_idx).installed_number = FND_API.G_MISS_NUM)

277: Convert_Value_To_Id(p_x_ata_sequences_tbl(l_rec_idx));
278: --amsriniv. Begin
279: --amsriniv. Bug 6659422
280: /*
281: IF (p_x_ata_sequences_tbl(l_rec_idx).installed_number IS NULL OR p_x_ata_sequences_tbl(l_rec_idx).installed_number = FND_API.G_MISS_NUM)
282: THEN
283: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_INST_NUM_MAND');
284: -- Installed Number for System Sequence "ATA" is invalid
285: FND_MESSAGE.SET_TOKEN('ATA', p_x_ata_sequences_tbl(l_rec_idx).ata_code);

Line 289: IF (p_x_ata_sequences_tbl(l_rec_idx).dispatch_number IS NULL OR p_x_ata_sequences_tbl(l_rec_idx).dispatch_number = FND_API.G_MISS_NUM)

285: FND_MESSAGE.SET_TOKEN('ATA', p_x_ata_sequences_tbl(l_rec_idx).ata_code);
286: FND_MSG_PUB.ADD;
287: END IF;
288:
289: IF (p_x_ata_sequences_tbl(l_rec_idx).dispatch_number IS NULL OR p_x_ata_sequences_tbl(l_rec_idx).dispatch_number = FND_API.G_MISS_NUM)
290: THEN
291: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_DISP_NUM_MAND');
292: -- Dispatch Number for System Sequence "ATA" is invalid
293: FND_MESSAGE.SET_TOKEN('ATA', p_x_ata_sequences_tbl(l_rec_idx).ata_code);

Line 340: RAISE FND_API.G_EXC_ERROR;

336: -- Check Error Message stack.
337: x_msg_count := FND_MSG_PUB.count_msg;
338: IF (x_msg_count > 0)
339: THEN
340: RAISE FND_API.G_EXC_ERROR;
341: END IF;
342:
343: -- Default attributes for update
344: p_x_ata_sequences_tbl(l_rec_idx).object_version_number := p_x_ata_sequences_tbl(l_rec_idx).object_version_number + 1;

Line 384: IF (p_x_ata_sequences_tbl(l_rec_idx).remarks_note IS NOT NULL AND p_x_ata_sequences_tbl(l_rec_idx).remarks_note <> FND_API.G_MISS_CHAR)

380: );
381: END IF;
382:
383: -- Update the JTF note for Remarks...
384: IF (p_x_ata_sequences_tbl(l_rec_idx).remarks_note IS NOT NULL AND p_x_ata_sequences_tbl(l_rec_idx).remarks_note <> FND_API.G_MISS_CHAR)
385: THEN
386: OPEN get_ata_notes(p_x_ata_sequences_tbl(l_rec_idx).mel_cdl_ata_sequence_id);
387: FETCH get_ata_notes INTO l_note_rec;
388: -- If the JTF note for Remarks already exists, update the same or create a new one...

Line 396: p_init_msg_list => FND_API.G_FALSE,

392:
393: JTF_NOTES_PUB.Update_Note
394: (
395: p_api_version => 1.0,
396: p_init_msg_list => FND_API.G_FALSE,
397: p_commit => FND_API.G_FALSE,
398: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
399: x_return_status => l_return_status,
400: x_msg_count => l_msg_count,

Line 397: p_commit => FND_API.G_FALSE,

393: JTF_NOTES_PUB.Update_Note
394: (
395: p_api_version => 1.0,
396: p_init_msg_list => FND_API.G_FALSE,
397: p_commit => FND_API.G_FALSE,
398: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
399: x_return_status => l_return_status,
400: x_msg_count => l_msg_count,
401: x_msg_data => l_msg_data,

Line 398: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

394: (
395: p_api_version => 1.0,
396: p_init_msg_list => FND_API.G_FALSE,
397: p_commit => FND_API.G_FALSE,
398: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
399: x_return_status => l_return_status,
400: x_msg_count => l_msg_count,
401: x_msg_data => l_msg_data,
402: p_jtf_note_id => l_note_rec.jtf_note_id,

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

412: p_jtf_note_contexts_tab => l_note_contexts_tbl
413: );
414:
415: -- Check Error Message stack.
416: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)
417: THEN
418: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)
419: THEN
420: fnd_log.string

Line 429: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

425: );
426: END IF;
427:
428: -- Throwing unexpected error since this delete should have happened without any hiccup
429: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
430: END IF;
431:
432: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
433: THEN

Line 449: p_init_msg_list => FND_API.G_FALSE,

445: (
446: p_parent_note_id => null,
447: p_jtf_note_id => null,
448: p_api_version => 1.0,
449: p_init_msg_list => FND_API.G_FALSE,
450: p_commit => FND_API.G_FALSE,
451: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
452: x_return_status => l_return_status,
453: x_msg_count => l_msg_count,

Line 450: p_commit => FND_API.G_FALSE,

446: p_parent_note_id => null,
447: p_jtf_note_id => null,
448: p_api_version => 1.0,
449: p_init_msg_list => FND_API.G_FALSE,
450: p_commit => FND_API.G_FALSE,
451: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
452: x_return_status => l_return_status,
453: x_msg_count => l_msg_count,
454: x_msg_data => l_msg_data,

Line 451: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

447: p_jtf_note_id => null,
448: p_api_version => 1.0,
449: p_init_msg_list => FND_API.G_FALSE,
450: p_commit => FND_API.G_FALSE,
451: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
452: x_return_status => l_return_status,
453: x_msg_count => l_msg_count,
454: x_msg_data => l_msg_data,
455: p_org_id => null,

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

486: p_jtf_note_contexts_tab => l_note_contexts_tbl
487: );
488:
489: -- Check Error Message stack.
490: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)
491: THEN
492: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)
493: THEN
494: fnd_log.string

Line 503: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

499: );
500: END IF;
501:
502: -- Throwing unexpected error since this delete should have happened without any hiccup
503: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
504: END IF;
505:
506: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
507: THEN

Line 531: IF (p_x_ata_sequences_tbl(l_rec_idx).installed_number IS NULL OR p_x_ata_sequences_tbl(l_rec_idx).installed_number = FND_API.G_MISS_NUM)

527:
528: --amsriniv. Begin
529: --amsriniv. Bug 6659422
530: /*
531: IF (p_x_ata_sequences_tbl(l_rec_idx).installed_number IS NULL OR p_x_ata_sequences_tbl(l_rec_idx).installed_number = FND_API.G_MISS_NUM)
532: THEN
533: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_INST_NUM_MAND');
534: -- Installed Number for System Sequence "ATA" is invalid
535: FND_MESSAGE.SET_TOKEN('ATA', p_x_ata_sequences_tbl(l_rec_idx).ata_code);

Line 539: IF (p_x_ata_sequences_tbl(l_rec_idx).dispatch_number IS NULL OR p_x_ata_sequences_tbl(l_rec_idx).dispatch_number = FND_API.G_MISS_NUM)

535: FND_MESSAGE.SET_TOKEN('ATA', p_x_ata_sequences_tbl(l_rec_idx).ata_code);
536: FND_MSG_PUB.ADD;
537: END IF;
538:
539: IF (p_x_ata_sequences_tbl(l_rec_idx).dispatch_number IS NULL OR p_x_ata_sequences_tbl(l_rec_idx).dispatch_number = FND_API.G_MISS_NUM)
540: THEN
541: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_DISP_NUM_MAND');
542: -- Dispatch Number for System Sequence "ATA" is invalid
543: FND_MESSAGE.SET_TOKEN('ATA', p_x_ata_sequences_tbl(l_rec_idx).ata_code);

Line 604: RAISE FND_API.G_EXC_ERROR;

600: -- Check Error Message stack.
601: x_msg_count := FND_MSG_PUB.count_msg;
602: IF (x_msg_count > 0)
603: THEN
604: RAISE FND_API.G_EXC_ERROR;
605: END IF;
606:
607: -- Default attributes for create
608: p_x_ata_sequences_tbl(l_rec_idx).object_version_number := 1;

Line 690: IF (p_x_ata_sequences_tbl(l_rec_idx).remarks_note IS NOT NULL AND p_x_ata_sequences_tbl(l_rec_idx).remarks_note <> FND_API.G_MISS_CHAR)

686: );
687: END IF;
688:
689: -- Enter the JTF note for Remarks...
690: IF (p_x_ata_sequences_tbl(l_rec_idx).remarks_note IS NOT NULL AND p_x_ata_sequences_tbl(l_rec_idx).remarks_note <> FND_API.G_MISS_CHAR)
691: THEN
692: -- Create a new JTF note for Remarks, ofcourse it cannot exist before the ATA sequence is created...
693: JTF_NOTES_PUB.Create_Note
694: (

Line 698: p_init_msg_list => FND_API.G_FALSE,

694: (
695: p_parent_note_id => null,
696: p_jtf_note_id => null,
697: p_api_version => 1.0,
698: p_init_msg_list => FND_API.G_FALSE,
699: p_commit => FND_API.G_FALSE,
700: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
701: x_return_status => l_return_status,
702: x_msg_count => l_msg_count,

Line 699: p_commit => FND_API.G_FALSE,

695: p_parent_note_id => null,
696: p_jtf_note_id => null,
697: p_api_version => 1.0,
698: p_init_msg_list => FND_API.G_FALSE,
699: p_commit => FND_API.G_FALSE,
700: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
701: x_return_status => l_return_status,
702: x_msg_count => l_msg_count,
703: x_msg_data => l_msg_data,

Line 700: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

696: p_jtf_note_id => null,
697: p_api_version => 1.0,
698: p_init_msg_list => FND_API.G_FALSE,
699: p_commit => FND_API.G_FALSE,
700: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
701: x_return_status => l_return_status,
702: x_msg_count => l_msg_count,
703: x_msg_data => l_msg_data,
704: p_org_id => null,

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

735: p_jtf_note_contexts_tab => l_note_contexts_tbl
736: );
737:
738: -- Check Error Message stack.
739: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)
740: THEN
741: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)
742: THEN
743: fnd_log.string

Line 752: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

748: );
749: END IF;
750:
751: -- Throwing unexpected error since this delete should have happened without any hiccup
752: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
753: END IF;
754:
755: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
756: THEN

Line 785: RAISE FND_API.G_EXC_ERROR;

781: -- Check Error Message stack.
782: x_msg_count := FND_MSG_PUB.count_msg;
783: IF (x_msg_count > 0)
784: THEN
785: RAISE FND_API.G_EXC_ERROR;
786: END IF;
787:
788: -- Commit if p_commit = FND_API.G_TRUE
789: IF FND_API.TO_BOOLEAN(p_commit)

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

784: THEN
785: RAISE FND_API.G_EXC_ERROR;
786: END IF;
787:
788: -- Commit if p_commit = FND_API.G_TRUE
789: IF FND_API.TO_BOOLEAN(p_commit)
790: THEN
791: COMMIT WORK;
792: END IF;

Line 789: IF FND_API.TO_BOOLEAN(p_commit)

785: RAISE FND_API.G_EXC_ERROR;
786: END IF;
787:
788: -- Commit if p_commit = FND_API.G_TRUE
789: IF FND_API.TO_BOOLEAN(p_commit)
790: THEN
791: COMMIT WORK;
792: END IF;
793:

Line 799: p_encoded => FND_API.G_FALSE

795: FND_MSG_PUB.count_and_get
796: (
797: p_count => x_msg_count,
798: p_data => x_msg_data,
799: p_encoded => FND_API.G_FALSE
800: );
801:
802: EXCEPTION
803: WHEN FND_API.G_EXC_ERROR THEN

Line 803: WHEN FND_API.G_EXC_ERROR THEN

799: p_encoded => FND_API.G_FALSE
800: );
801:
802: EXCEPTION
803: WHEN FND_API.G_EXC_ERROR THEN
804: x_return_status := FND_API.G_RET_STS_ERROR;
805: Rollback to Process_Ata_Sequences_SP;
806: FND_MSG_PUB.count_and_get
807: (

Line 804: x_return_status := FND_API.G_RET_STS_ERROR;

800: );
801:
802: EXCEPTION
803: WHEN FND_API.G_EXC_ERROR THEN
804: x_return_status := FND_API.G_RET_STS_ERROR;
805: Rollback to Process_Ata_Sequences_SP;
806: FND_MSG_PUB.count_and_get
807: (
808: p_count => x_msg_count,

Line 810: p_encoded => FND_API.G_FALSE

806: FND_MSG_PUB.count_and_get
807: (
808: p_count => x_msg_count,
809: p_data => x_msg_data,
810: p_encoded => FND_API.G_FALSE
811: );
812:
813: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
814: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 813: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

809: p_data => x_msg_data,
810: p_encoded => FND_API.G_FALSE
811: );
812:
813: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
814: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
815: Rollback to Process_Ata_Sequences_SP;
816: FND_MSG_PUB.count_and_get
817: (

Line 814: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

810: p_encoded => FND_API.G_FALSE
811: );
812:
813: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
814: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
815: Rollback to Process_Ata_Sequences_SP;
816: FND_MSG_PUB.count_and_get
817: (
818: p_count => x_msg_count,

Line 820: p_encoded => FND_API.G_FALSE

816: FND_MSG_PUB.count_and_get
817: (
818: p_count => x_msg_count,
819: p_data => x_msg_data,
820: p_encoded => FND_API.G_FALSE
821: );
822:
823: WHEN OTHERS THEN
824: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 824: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

820: p_encoded => FND_API.G_FALSE
821: );
822:
823: WHEN OTHERS THEN
824: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
825: Rollback to Process_Ata_Sequences_SP;
826: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
827: THEN
828: FND_MSG_PUB.add_exc_msg

Line 839: p_encoded => FND_API.G_FALSE

835: FND_MSG_PUB.count_and_get
836: (
837: p_count => x_msg_count,
838: p_data => x_msg_data,
839: p_encoded => FND_API.G_FALSE
840: );
841: END Process_Ata_Sequences;
842:
843: ------------------------------------------

Line 850: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,

846: PROCEDURE Process_Mo_Procedures
847: (
848: -- Standard IN params
849: p_api_version IN NUMBER,
850: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
851: p_commit IN VARCHAR2 := FND_API.G_TRUE,
852: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
853: p_default IN VARCHAR2 := FND_API.G_FALSE,
854: p_module_type IN VARCHAR2 := NULL,

Line 851: p_commit IN VARCHAR2 := FND_API.G_TRUE,

847: (
848: -- Standard IN params
849: p_api_version IN NUMBER,
850: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
851: p_commit IN VARCHAR2 := FND_API.G_TRUE,
852: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
853: p_default IN VARCHAR2 := FND_API.G_FALSE,
854: p_module_type IN VARCHAR2 := NULL,
855: -- Standard OUT params

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

848: -- Standard IN params
849: p_api_version IN NUMBER,
850: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
851: p_commit IN VARCHAR2 := FND_API.G_TRUE,
852: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
853: p_default IN VARCHAR2 := FND_API.G_FALSE,
854: p_module_type IN VARCHAR2 := NULL,
855: -- Standard OUT params
856: x_return_status OUT NOCOPY VARCHAR2,

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

849: p_api_version IN NUMBER,
850: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
851: p_commit IN VARCHAR2 := FND_API.G_TRUE,
852: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
853: p_default IN VARCHAR2 := FND_API.G_FALSE,
854: p_module_type IN VARCHAR2 := NULL,
855: -- Standard OUT params
856: x_return_status OUT NOCOPY VARCHAR2,
857: x_msg_count OUT NOCOPY NUMBER,

Line 927: x_return_status := FND_API.G_RET_STS_SUCCESS;

923: -- Standard start of API savepoint
924: SAVEPOINT Process_Mo_Procedures_SP;
925:
926: -- Initialize return status to success before any code logic/validation
927: x_return_status := FND_API.G_RET_STS_SUCCESS;
928:
929: -- Standard call to check for call compatibility
930: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
931: THEN

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

926: -- Initialize return status to success before any code logic/validation
927: x_return_status := FND_API.G_RET_STS_SUCCESS;
928:
929: -- Standard call to check for call compatibility
930: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
931: THEN
932: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
933: END IF;
934:

Line 932: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

928:
929: -- Standard call to check for call compatibility
930: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
931: THEN
932: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
933: END IF;
934:
935: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
936: IF FND_API.TO_BOOLEAN(p_init_msg_list)

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

931: THEN
932: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
933: END IF;
934:
935: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
936: IF FND_API.TO_BOOLEAN(p_init_msg_list)
937: THEN
938: FND_MSG_PUB.INITIALIZE;
939: END IF;

Line 936: IF FND_API.TO_BOOLEAN(p_init_msg_list)

932: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
933: END IF;
934:
935: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
936: IF FND_API.TO_BOOLEAN(p_init_msg_list)
937: THEN
938: FND_MSG_PUB.INITIALIZE;
939: END IF;
940:

Line 966: RAISE FND_API.G_EXC_ERROR;

962: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_COM_INVALID_DML_REC');
963: -- Invalid DML operation FIELD specified
964: FND_MESSAGE.SET_TOKEN('FIELD', p_x_mo_procedures_tbl(l_rec_idx).dml_operation);
965: FND_MSG_PUB.ADD;
966: RAISE FND_API.G_EXC_ERROR;
967: END IF;
968:
969: --Perform Deletion
970: IF (p_x_mo_procedures_tbl(l_rec_idx).dml_operation = 'D')

Line 989: IF (p_x_mo_procedures_tbl(l_rec_idx).mr_header_id IS NOT NULL or p_x_mo_procedures_tbl(l_rec_idx).mr_header_id <> FND_API.G_MISS_NUM)

985: LOOP
986: IF (p_x_mo_procedures_tbl(l_rec_idx).dml_operation = 'C')
987: THEN
988: --Check if mr_header_id is of program type MO Procedure
989: IF (p_x_mo_procedures_tbl(l_rec_idx).mr_header_id IS NOT NULL or p_x_mo_procedures_tbl(l_rec_idx).mr_header_id <> FND_API.G_MISS_NUM)
990: THEN
991: OPEN validate_mr_header_id( p_x_mo_procedures_tbl(l_rec_idx).mr_header_id);
992: FETCH validate_mr_header_id INTO l_dummy_varchar;
993:

Line 1014: ELSIF (p_x_mo_procedures_tbl(l_rec_idx).mr_header_id IS NULL or p_x_mo_procedures_tbl(l_rec_idx).mr_header_id = FND_API.G_MISS_NUM)

1010: FND_MSG_PUB.ADD;
1011: END IF;
1012: CLOSE validate_mr_header_status;
1013:
1014: ELSIF (p_x_mo_procedures_tbl(l_rec_idx).mr_header_id IS NULL or p_x_mo_procedures_tbl(l_rec_idx).mr_header_id = FND_API.G_MISS_NUM)
1015: THEN
1016: IF (p_x_mo_procedures_tbl(l_rec_idx).mr_title IS NULL OR p_x_mo_procedures_tbl(l_rec_idx).mr_version_number IS NULL )
1017: THEN
1018: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_MO_MR_MAND');

Line 1059: RAISE FND_API.G_EXC_ERROR;

1055: THEN
1056: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_UPDATA_STS_INV');
1057: -- Cannot process if MEL/CDL is not in draft or approval rejected status
1058: FND_MSG_PUB.ADD;
1059: RAISE FND_API.G_EXC_ERROR;
1060: END IF;
1061: END IF;
1062:
1063: -- Check if the MO Procedure is already associated to the Ata Sequence

Line 1085: RAISE FND_API.G_EXC_ERROR;

1081: -- Check Error Message stack.
1082: x_msg_count := FND_MSG_PUB.count_msg;
1083: IF (x_msg_count > 0)
1084: THEN
1085: RAISE FND_API.G_EXC_ERROR;
1086: END IF;
1087:
1088: -- Default attributes for create
1089: p_x_mo_procedures_tbl(l_rec_idx).object_version_number := 1;

Line 1185: RAISE FND_API.G_EXC_ERROR;

1181: -- Check Error Message stack.
1182: x_msg_count := FND_MSG_PUB.count_msg;
1183: IF (x_msg_count > 0)
1184: THEN
1185: RAISE FND_API.G_EXC_ERROR;
1186: END IF;
1187:
1188: -- Commit if p_commit = FND_API.G_TRUE
1189: IF FND_API.TO_BOOLEAN(p_commit)

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

1184: THEN
1185: RAISE FND_API.G_EXC_ERROR;
1186: END IF;
1187:
1188: -- Commit if p_commit = FND_API.G_TRUE
1189: IF FND_API.TO_BOOLEAN(p_commit)
1190: THEN
1191: COMMIT WORK;
1192: END IF;

Line 1189: IF FND_API.TO_BOOLEAN(p_commit)

1185: RAISE FND_API.G_EXC_ERROR;
1186: END IF;
1187:
1188: -- Commit if p_commit = FND_API.G_TRUE
1189: IF FND_API.TO_BOOLEAN(p_commit)
1190: THEN
1191: COMMIT WORK;
1192: END IF;
1193:

Line 1199: p_encoded => FND_API.G_FALSE

1195: FND_MSG_PUB.count_and_get
1196: (
1197: p_count => x_msg_count,
1198: p_data => x_msg_data,
1199: p_encoded => FND_API.G_FALSE
1200: );
1201:
1202: EXCEPTION
1203: WHEN FND_API.G_EXC_ERROR THEN

Line 1203: WHEN FND_API.G_EXC_ERROR THEN

1199: p_encoded => FND_API.G_FALSE
1200: );
1201:
1202: EXCEPTION
1203: WHEN FND_API.G_EXC_ERROR THEN
1204: x_return_status := FND_API.G_RET_STS_ERROR;
1205: Rollback to Process_Mo_Procedures_SP;
1206: FND_MSG_PUB.count_and_get
1207: (

Line 1204: x_return_status := FND_API.G_RET_STS_ERROR;

1200: );
1201:
1202: EXCEPTION
1203: WHEN FND_API.G_EXC_ERROR THEN
1204: x_return_status := FND_API.G_RET_STS_ERROR;
1205: Rollback to Process_Mo_Procedures_SP;
1206: FND_MSG_PUB.count_and_get
1207: (
1208: p_count => x_msg_count,

Line 1210: p_encoded => FND_API.G_FALSE

1206: FND_MSG_PUB.count_and_get
1207: (
1208: p_count => x_msg_count,
1209: p_data => x_msg_data,
1210: p_encoded => FND_API.G_FALSE
1211: );
1212:
1213: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1214: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1213: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1209: p_data => x_msg_data,
1210: p_encoded => FND_API.G_FALSE
1211: );
1212:
1213: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1214: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1215: Rollback to Process_Mo_Procedures_SP;
1216: FND_MSG_PUB.count_and_get
1217: (

Line 1214: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1210: p_encoded => FND_API.G_FALSE
1211: );
1212:
1213: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1214: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1215: Rollback to Process_Mo_Procedures_SP;
1216: FND_MSG_PUB.count_and_get
1217: (
1218: p_count => x_msg_count,

Line 1220: p_encoded => FND_API.G_FALSE

1216: FND_MSG_PUB.count_and_get
1217: (
1218: p_count => x_msg_count,
1219: p_data => x_msg_data,
1220: p_encoded => FND_API.G_FALSE
1221: );
1222:
1223: WHEN OTHERS THEN
1224: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1224: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1220: p_encoded => FND_API.G_FALSE
1221: );
1222:
1223: WHEN OTHERS THEN
1224: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1225: Rollback to Process_Mo_Procedures_SP;
1226: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1227: THEN
1228: FND_MSG_PUB.add_exc_msg

Line 1239: p_encoded => FND_API.G_FALSE

1235: FND_MSG_PUB.count_and_get
1236: (
1237: p_count => x_msg_count,
1238: p_data => x_msg_data,
1239: p_encoded => FND_API.G_FALSE
1240: );
1241: END Process_Mo_Procedures;
1242:
1243: ------------------------------------------

Line 1250: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,

1246: PROCEDURE Process_Ata_Relations
1247: (
1248: -- Standard IN params
1249: p_api_version IN NUMBER,
1250: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
1251: p_commit IN VARCHAR2 := FND_API.G_TRUE,
1252: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1253: p_default IN VARCHAR2 := FND_API.G_FALSE,
1254: p_module_type IN VARCHAR2 := NULL,

Line 1251: p_commit IN VARCHAR2 := FND_API.G_TRUE,

1247: (
1248: -- Standard IN params
1249: p_api_version IN NUMBER,
1250: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
1251: p_commit IN VARCHAR2 := FND_API.G_TRUE,
1252: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1253: p_default IN VARCHAR2 := FND_API.G_FALSE,
1254: p_module_type IN VARCHAR2 := NULL,
1255: x_return_status OUT NOCOPY VARCHAR2,

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

1248: -- Standard IN params
1249: p_api_version IN NUMBER,
1250: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
1251: p_commit IN VARCHAR2 := FND_API.G_TRUE,
1252: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1253: p_default IN VARCHAR2 := FND_API.G_FALSE,
1254: p_module_type IN VARCHAR2 := NULL,
1255: x_return_status OUT NOCOPY VARCHAR2,
1256: x_msg_count OUT NOCOPY NUMBER,

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

1249: p_api_version IN NUMBER,
1250: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
1251: p_commit IN VARCHAR2 := FND_API.G_TRUE,
1252: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1253: p_default IN VARCHAR2 := FND_API.G_FALSE,
1254: p_module_type IN VARCHAR2 := NULL,
1255: x_return_status OUT NOCOPY VARCHAR2,
1256: x_msg_count OUT NOCOPY NUMBER,
1257: x_msg_data OUT NOCOPY VARCHAR2,

Line 1317: x_return_status := FND_API.G_RET_STS_SUCCESS;

1313: -- Standard start of API savepoint
1314: SAVEPOINT Process_Ata_Relations_SP;
1315:
1316: -- Initialize return status to success before any code logic/validation
1317: x_return_status := FND_API.G_RET_STS_SUCCESS;
1318:
1319: -- Standard call to check for call compatibility
1320: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
1321: THEN

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

1316: -- Initialize return status to success before any code logic/validation
1317: x_return_status := FND_API.G_RET_STS_SUCCESS;
1318:
1319: -- Standard call to check for call compatibility
1320: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
1321: THEN
1322: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1323: END IF;
1324:

Line 1322: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1318:
1319: -- Standard call to check for call compatibility
1320: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
1321: THEN
1322: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1323: END IF;
1324:
1325: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
1326: IF FND_API.TO_BOOLEAN(p_init_msg_list)

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

1321: THEN
1322: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1323: END IF;
1324:
1325: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
1326: IF FND_API.TO_BOOLEAN(p_init_msg_list)
1327: THEN
1328: FND_MSG_PUB.INITIALIZE;
1329: END IF;

Line 1326: IF FND_API.TO_BOOLEAN(p_init_msg_list)

1322: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1323: END IF;
1324:
1325: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
1326: IF FND_API.TO_BOOLEAN(p_init_msg_list)
1327: THEN
1328: FND_MSG_PUB.INITIALIZE;
1329: END IF;
1330:

Line 1357: RAISE FND_API.G_EXC_ERROR;

1353: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_COM_INVALID_DML_REC');
1354: -- Invalid DML operation FIELD specified
1355: FND_MESSAGE.SET_TOKEN('FIELD', p_x_ata_relations_tbl(l_rec_idx).dml_operation);
1356: FND_MSG_PUB.ADD;
1357: RAISE FND_API.G_EXC_ERROR;
1358: END IF;
1359:
1360: --Perform Deletion
1361: IF (p_x_ata_relations_tbl(l_rec_idx).dml_operation = 'D')

Line 1437: RAISE FND_API.G_EXC_ERROR;

1433: THEN
1434: FND_MESSAGE.SET_NAME(G_APP_NAME, ' AHL_MEL_CDL_UPDATA_STS_INV');
1435: -- Cannot process if MEL/CDL is not in draft or approval rejected status
1436: FND_MSG_PUB.ADD;
1437: RAISE FND_API.G_EXC_ERROR;
1438: END IF;
1439: END IF;
1440:
1441: --Validate the Related Ata Sequence Id

Line 1500: p_x_ata_relations_tbl(l_rec_idx).ata_sequence_id <> FND_API.G_MISS_NUM AND p_x_ata_relations_tbl(l_rec_idx).related_ata_sequence_id <> FND_API.G_MISS_NUM )

1496: -- Check for Cyclic Association (If the Ata Seq chosen for Association is same as the one to which it is getting associated
1497: -- In the above case, a cyclic relation existance.
1498:
1499: IF (p_x_ata_relations_tbl(l_rec_idx).ata_sequence_id IS NOT NULL AND p_x_ata_relations_tbl(l_rec_idx).related_ata_sequence_id IS NOT NULL AND
1500: p_x_ata_relations_tbl(l_rec_idx).ata_sequence_id <> FND_API.G_MISS_NUM AND p_x_ata_relations_tbl(l_rec_idx).related_ata_sequence_id <> FND_API.G_MISS_NUM )
1501: THEN
1502: IF (p_x_ata_relations_tbl(l_rec_idx).ata_sequence_id = p_x_ata_relations_tbl(l_rec_idx).related_ata_sequence_id )
1503: THEN
1504: FND_MESSAGE.Set_Name('AHL','AHL_MEL_CDL_RELN_CYCLIC');

Line 1514: RAISE FND_API.G_EXC_ERROR;

1510: -- Check Error Message stack.
1511: x_msg_count := FND_MSG_PUB.count_msg;
1512: IF (x_msg_count > 0)
1513: THEN
1514: RAISE FND_API.G_EXC_ERROR;
1515: END IF;
1516:
1517: -- Default attributes for create
1518: p_x_ata_relations_tbl(l_rec_idx).object_version_number := 1;

Line 1611: RAISE FND_API.G_EXC_ERROR;

1607: -- Check Error Message stack.
1608: x_msg_count := FND_MSG_PUB.count_msg;
1609: IF (x_msg_count > 0)
1610: THEN
1611: RAISE FND_API.G_EXC_ERROR;
1612: END IF;
1613:
1614: -- Commit if p_commit = FND_API.G_TRUE
1615: IF FND_API.TO_BOOLEAN(p_commit)

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

1610: THEN
1611: RAISE FND_API.G_EXC_ERROR;
1612: END IF;
1613:
1614: -- Commit if p_commit = FND_API.G_TRUE
1615: IF FND_API.TO_BOOLEAN(p_commit)
1616: THEN
1617: COMMIT WORK;
1618: END IF;

Line 1615: IF FND_API.TO_BOOLEAN(p_commit)

1611: RAISE FND_API.G_EXC_ERROR;
1612: END IF;
1613:
1614: -- Commit if p_commit = FND_API.G_TRUE
1615: IF FND_API.TO_BOOLEAN(p_commit)
1616: THEN
1617: COMMIT WORK;
1618: END IF;
1619:

Line 1625: p_encoded => FND_API.G_FALSE

1621: FND_MSG_PUB.count_and_get
1622: (
1623: p_count => x_msg_count,
1624: p_data => x_msg_data,
1625: p_encoded => FND_API.G_FALSE
1626: );
1627:
1628: EXCEPTION
1629: WHEN FND_API.G_EXC_ERROR THEN

Line 1629: WHEN FND_API.G_EXC_ERROR THEN

1625: p_encoded => FND_API.G_FALSE
1626: );
1627:
1628: EXCEPTION
1629: WHEN FND_API.G_EXC_ERROR THEN
1630: x_return_status := FND_API.G_RET_STS_ERROR;
1631: Rollback to Process_Ata_Relations_SP;
1632: FND_MSG_PUB.count_and_get
1633: (

Line 1630: x_return_status := FND_API.G_RET_STS_ERROR;

1626: );
1627:
1628: EXCEPTION
1629: WHEN FND_API.G_EXC_ERROR THEN
1630: x_return_status := FND_API.G_RET_STS_ERROR;
1631: Rollback to Process_Ata_Relations_SP;
1632: FND_MSG_PUB.count_and_get
1633: (
1634: p_count => x_msg_count,

Line 1636: p_encoded => FND_API.G_FALSE

1632: FND_MSG_PUB.count_and_get
1633: (
1634: p_count => x_msg_count,
1635: p_data => x_msg_data,
1636: p_encoded => FND_API.G_FALSE
1637: );
1638:
1639: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1640: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1639: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1635: p_data => x_msg_data,
1636: p_encoded => FND_API.G_FALSE
1637: );
1638:
1639: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1640: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1641: Rollback to Process_Ata_Relations_SP;
1642: FND_MSG_PUB.count_and_get
1643: (

Line 1640: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1636: p_encoded => FND_API.G_FALSE
1637: );
1638:
1639: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1640: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1641: Rollback to Process_Ata_Relations_SP;
1642: FND_MSG_PUB.count_and_get
1643: (
1644: p_count => x_msg_count,

Line 1646: p_encoded => FND_API.G_FALSE

1642: FND_MSG_PUB.count_and_get
1643: (
1644: p_count => x_msg_count,
1645: p_data => x_msg_data,
1646: p_encoded => FND_API.G_FALSE
1647: );
1648:
1649: WHEN OTHERS THEN
1650: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1650: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1646: p_encoded => FND_API.G_FALSE
1647: );
1648:
1649: WHEN OTHERS THEN
1650: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1651: Rollback to Process_Ata_Relations_SP;
1652: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1653: THEN
1654: FND_MSG_PUB.add_exc_msg

Line 1665: p_encoded => FND_API.G_FALSE

1661: FND_MSG_PUB.count_and_get
1662: (
1663: p_count => x_msg_count,
1664: p_data => x_msg_data,
1665: p_encoded => FND_API.G_FALSE
1666: );
1667: END Process_Ata_Relations;
1668:
1669: ------------------------------------------

Line 1676: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,

1672: PROCEDURE Copy_MO_Proc_Revision
1673: (
1674: -- Standard IN params
1675: p_api_version IN NUMBER,
1676: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
1677: p_commit IN VARCHAR2 := FND_API.G_TRUE,
1678: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1679: p_default IN VARCHAR2 := FND_API.G_FALSE,
1680: p_module_type IN VARCHAR2 := NULL,

Line 1677: p_commit IN VARCHAR2 := FND_API.G_TRUE,

1673: (
1674: -- Standard IN params
1675: p_api_version IN NUMBER,
1676: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
1677: p_commit IN VARCHAR2 := FND_API.G_TRUE,
1678: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1679: p_default IN VARCHAR2 := FND_API.G_FALSE,
1680: p_module_type IN VARCHAR2 := NULL,
1681: -- Standard OUT params

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

1674: -- Standard IN params
1675: p_api_version IN NUMBER,
1676: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
1677: p_commit IN VARCHAR2 := FND_API.G_TRUE,
1678: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1679: p_default IN VARCHAR2 := FND_API.G_FALSE,
1680: p_module_type IN VARCHAR2 := NULL,
1681: -- Standard OUT params
1682: x_return_status OUT NOCOPY VARCHAR2,

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

1675: p_api_version IN NUMBER,
1676: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
1677: p_commit IN VARCHAR2 := FND_API.G_TRUE,
1678: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1679: p_default IN VARCHAR2 := FND_API.G_FALSE,
1680: p_module_type IN VARCHAR2 := NULL,
1681: -- Standard OUT params
1682: x_return_status OUT NOCOPY VARCHAR2,
1683: x_msg_count OUT NOCOPY NUMBER,

Line 1713: x_return_status := FND_API.G_RET_STS_SUCCESS;

1709: -- Standard start of API savepoint
1710: SAVEPOINT Copy_MO_Proc_Revision_SP;
1711:
1712: -- Initialize return status to success before any code logic/validation
1713: x_return_status := FND_API.G_RET_STS_SUCCESS;
1714:
1715: -- Standard call to check for call compatibility
1716: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
1717: THEN

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

1712: -- Initialize return status to success before any code logic/validation
1713: x_return_status := FND_API.G_RET_STS_SUCCESS;
1714:
1715: -- Standard call to check for call compatibility
1716: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
1717: THEN
1718: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1719: END IF;
1720:

Line 1718: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1714:
1715: -- Standard call to check for call compatibility
1716: IF NOT FND_API.COMPATIBLE_API_CALL (l_api_version, p_api_version, l_api_name, G_PKG_NAME)
1717: THEN
1718: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1719: END IF;
1720:
1721: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
1722: IF FND_API.TO_BOOLEAN(p_init_msg_list)

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

1717: THEN
1718: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1719: END IF;
1720:
1721: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
1722: IF FND_API.TO_BOOLEAN(p_init_msg_list)
1723: THEN
1724: FND_MSG_PUB.INITIALIZE;
1725: END IF;

Line 1722: IF FND_API.TO_BOOLEAN(p_init_msg_list)

1718: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1719: END IF;
1720:
1721: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
1722: IF FND_API.TO_BOOLEAN(p_init_msg_list)
1723: THEN
1724: FND_MSG_PUB.INITIALIZE;
1725: END IF;
1726:

Line 1739: IF (p_old_mr_header_id IS NOT NULL AND p_old_mr_header_id <> FND_API.G_MISS_NUM

1735: );
1736: END IF;
1737:
1738: -- API body Begins
1739: IF (p_old_mr_header_id IS NOT NULL AND p_old_mr_header_id <> FND_API.G_MISS_NUM
1740: AND
1741: p_new_mr_header_id IS NOT NULL AND p_new_mr_header_id <> FND_API.G_MISS_NUM)
1742: THEN
1743: -- Fetch all ATA sequences which are associated to the old revision of the M and O Procedure

Line 1741: p_new_mr_header_id IS NOT NULL AND p_new_mr_header_id <> FND_API.G_MISS_NUM)

1737:
1738: -- API body Begins
1739: IF (p_old_mr_header_id IS NOT NULL AND p_old_mr_header_id <> FND_API.G_MISS_NUM
1740: AND
1741: p_new_mr_header_id IS NOT NULL AND p_new_mr_header_id <> FND_API.G_MISS_NUM)
1742: THEN
1743: -- Fetch all ATA sequences which are associated to the old revision of the M and O Procedure
1744: OPEN get_all_ata_for_mo_pro(p_old_mr_header_id);
1745: LOOP

Line 1825: RAISE FND_API.G_EXC_ERROR;

1821: -- Check Error Message stack.
1822: x_msg_count := FND_MSG_PUB.count_msg;
1823: IF (x_msg_count > 0)
1824: THEN
1825: RAISE FND_API.G_EXC_ERROR;
1826: END IF;
1827:
1828: -- Commit if p_commit = FND_API.G_TRUE
1829: IF FND_API.TO_BOOLEAN(p_commit)

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

1824: THEN
1825: RAISE FND_API.G_EXC_ERROR;
1826: END IF;
1827:
1828: -- Commit if p_commit = FND_API.G_TRUE
1829: IF FND_API.TO_BOOLEAN(p_commit)
1830: THEN
1831: COMMIT WORK;
1832: END IF;

Line 1829: IF FND_API.TO_BOOLEAN(p_commit)

1825: RAISE FND_API.G_EXC_ERROR;
1826: END IF;
1827:
1828: -- Commit if p_commit = FND_API.G_TRUE
1829: IF FND_API.TO_BOOLEAN(p_commit)
1830: THEN
1831: COMMIT WORK;
1832: END IF;
1833:

Line 1839: p_encoded => FND_API.G_FALSE

1835: FND_MSG_PUB.count_and_get
1836: (
1837: p_count => x_msg_count,
1838: p_data => x_msg_data,
1839: p_encoded => FND_API.G_FALSE
1840: );
1841:
1842: EXCEPTION
1843: WHEN FND_API.G_EXC_ERROR THEN

Line 1843: WHEN FND_API.G_EXC_ERROR THEN

1839: p_encoded => FND_API.G_FALSE
1840: );
1841:
1842: EXCEPTION
1843: WHEN FND_API.G_EXC_ERROR THEN
1844: x_return_status := FND_API.G_RET_STS_ERROR;
1845: Rollback to Copy_MO_Proc_Revision_SP;
1846: FND_MSG_PUB.count_and_get
1847: (

Line 1844: x_return_status := FND_API.G_RET_STS_ERROR;

1840: );
1841:
1842: EXCEPTION
1843: WHEN FND_API.G_EXC_ERROR THEN
1844: x_return_status := FND_API.G_RET_STS_ERROR;
1845: Rollback to Copy_MO_Proc_Revision_SP;
1846: FND_MSG_PUB.count_and_get
1847: (
1848: p_count => x_msg_count,

Line 1850: p_encoded => FND_API.G_FALSE

1846: FND_MSG_PUB.count_and_get
1847: (
1848: p_count => x_msg_count,
1849: p_data => x_msg_data,
1850: p_encoded => FND_API.G_FALSE
1851: );
1852:
1853: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1854: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1853: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1849: p_data => x_msg_data,
1850: p_encoded => FND_API.G_FALSE
1851: );
1852:
1853: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1854: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1855: Rollback to Copy_MO_Proc_Revision_SP;
1856: FND_MSG_PUB.count_and_get
1857: (

Line 1854: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1850: p_encoded => FND_API.G_FALSE
1851: );
1852:
1853: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1854: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1855: Rollback to Copy_MO_Proc_Revision_SP;
1856: FND_MSG_PUB.count_and_get
1857: (
1858: p_count => x_msg_count,

Line 1860: p_encoded => FND_API.G_FALSE

1856: FND_MSG_PUB.count_and_get
1857: (
1858: p_count => x_msg_count,
1859: p_data => x_msg_data,
1860: p_encoded => FND_API.G_FALSE
1861: );
1862:
1863: WHEN OTHERS THEN
1864: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1864: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1860: p_encoded => FND_API.G_FALSE
1861: );
1862:
1863: WHEN OTHERS THEN
1864: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1865: Rollback to Copy_MO_Proc_Revision_SP;
1866: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1867: THEN
1868: FND_MSG_PUB.add_exc_msg

Line 1879: p_encoded => FND_API.G_FALSE

1875: FND_MSG_PUB.count_and_get
1876: (
1877: p_count => x_msg_count,
1878: p_data => x_msg_data,
1879: p_encoded => FND_API.G_FALSE
1880: );
1881: END Copy_MO_Proc_Revision;
1882:
1883: ---------------------------------------------

Line 1911: RAISE FND_API.G_EXC_ERROR;

1907: CLOSE check_exists;
1908: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_ATA_NOTFOUND');
1909: -- System Sequence is not found
1910: FND_MSG_PUB.ADD;
1911: RAISE FND_API.G_EXC_ERROR;
1912: ELSE
1913: CLOSE check_exists;
1914: IF (l_ovn <> p_ata_object_version)
1915: THEN

Line 1919: RAISE FND_API.G_EXC_ERROR;

1915: THEN
1916: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_COM_RECORD_CHANGED');
1917: -- Record has been modified by another user
1918: FND_MSG_PUB.ADD;
1919: RAISE FND_API.G_EXC_ERROR;
1920: END IF;
1921: END IF;
1922:
1923: END Check_Ata_Seq_Exists;

Line 1955: IF (p_x_ata_sequences_rec.ata_code IS NULL OR p_x_ata_sequences_rec.ata_code = FND_API.G_MISS_CHAR)

1951:
1952: BEGIN
1953:
1954: -- Convert value-to-id for ata_code
1955: IF (p_x_ata_sequences_rec.ata_code IS NULL OR p_x_ata_sequences_rec.ata_code = FND_API.G_MISS_CHAR)
1956: THEN
1957: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_ATA_MAND');
1958: -- System Sequence is mandatory
1959: FND_MSG_PUB.ADD;

Line 1968: IF (p_x_ata_sequences_rec.repair_category_id IS NULL OR p_x_ata_sequences_rec.repair_category_id = FND_API.G_MISS_NUM)

1964: FND_MSG_PUB.ADD;
1965: END IF;
1966:
1967: -- Convert value-to-id for sr_urgency
1968: IF (p_x_ata_sequences_rec.repair_category_id IS NULL OR p_x_ata_sequences_rec.repair_category_id = FND_API.G_MISS_NUM)
1969: THEN
1970: IF (p_x_ata_sequences_rec.repair_category_name IS NULL OR p_x_ata_sequences_rec.repair_category_name = FND_API.G_MISS_CHAR)
1971: THEN
1972: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_REPCAT_MAND');

Line 1970: IF (p_x_ata_sequences_rec.repair_category_name IS NULL OR p_x_ata_sequences_rec.repair_category_name = FND_API.G_MISS_CHAR)

1966:
1967: -- Convert value-to-id for sr_urgency
1968: IF (p_x_ata_sequences_rec.repair_category_id IS NULL OR p_x_ata_sequences_rec.repair_category_id = FND_API.G_MISS_NUM)
1969: THEN
1970: IF (p_x_ata_sequences_rec.repair_category_name IS NULL OR p_x_ata_sequences_rec.repair_category_name = FND_API.G_MISS_CHAR)
1971: THEN
1972: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_REPCAT_MAND');
1973: -- Repair Category for System Sequence "ATA" is mandatory
1974: FND_MESSAGE.SET_TOKEN('ATA', p_x_ata_sequences_rec.ata_code);

Line 2044: RAISE FND_API.G_EXC_ERROR;

2040: ELSE
2041: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_HDR_MAND');
2042: -- MEL/CDL information is mandatory for processing System Sequence(s)
2043: FND_MSG_PUB.ADD;
2044: RAISE FND_API.G_EXC_ERROR;
2045: END IF;
2046:
2047: IF (l_status NOT IN ('DRAFT', 'APPROVAL_REJECTED'))
2048: THEN

Line 2052: RAISE FND_API.G_EXC_ERROR;

2048: THEN
2049: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_NOT_DRAFT_ATA');
2050: -- Cannot process System Sequence(s) for MEL/CDL not in draft or approval rejected status
2051: FND_MSG_PUB.ADD;
2052: RAISE FND_API.G_EXC_ERROR;
2053: ELSIF (l_status = 'APPROVAL_REJECTED')
2054: THEN
2055: UPDATE ahl_mel_cdl_headers
2056: SET status_code = 'DRAFT'

Line 2091: RAISE FND_API.G_EXC_ERROR;

2087: CLOSE check_exists;
2088: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_MO_PROC_NOTFOUND');
2089: -- MO Procedure is not found
2090: FND_MSG_PUB.ADD;
2091: RAISE FND_API.G_EXC_ERROR;
2092: ELSE
2093: CLOSE check_exists;
2094: IF (l_ovn <> p_mo_proc_object_version)
2095: THEN

Line 2099: RAISE FND_API.G_EXC_ERROR;

2095: THEN
2096: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_COM_RECORD_CHANGED');
2097: -- Record has been modified by another user
2098: FND_MSG_PUB.ADD;
2099: RAISE FND_API.G_EXC_ERROR;
2100: END IF;
2101: END IF;
2102:
2103: END Check_MO_Proc_Exists;

Line 2135: RAISE FND_API.G_EXC_ERROR;

2131:
2132: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_MEL_CDL_REL_NOTFOUND');
2133: -- MO Procedure is not found
2134: FND_MSG_PUB.ADD;
2135: RAISE FND_API.G_EXC_ERROR;
2136:
2137: ELSE
2138: CLOSE check_exists;
2139:

Line 2145: RAISE FND_API.G_EXC_ERROR;

2141: THEN
2142: FND_MESSAGE.SET_NAME(G_APP_NAME, 'AHL_COM_RECORD_CHANGED');
2143: -- Record has been modified by another user
2144: FND_MSG_PUB.ADD;
2145: RAISE FND_API.G_EXC_ERROR;
2146: END IF;
2147:
2148: END IF;
2149: