623: BEGIN
624: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
625: -- check params
626: IF(p_element_type_id IS NULL OR p_name IS NULL) THEN
627: FND_MSG_PUB.initialize;
628: FND_MESSAGE.set_name('CS', 'CS_KB_C_MISS_PARAM');
629: FND_MSG_PUB.ADD;
630: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
631: X_ELEMENT_ID := -1;
625: -- check params
626: IF(p_element_type_id IS NULL OR p_name IS NULL) THEN
627: FND_MSG_PUB.initialize;
628: FND_MESSAGE.set_name('CS', 'CS_KB_C_MISS_PARAM');
629: FND_MSG_PUB.ADD;
630: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
631: X_ELEMENT_ID := -1;
632: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE ,
633: p_count => x_msg_count,
628: FND_MESSAGE.set_name('CS', 'CS_KB_C_MISS_PARAM');
629: FND_MSG_PUB.ADD;
630: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
631: X_ELEMENT_ID := -1;
632: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE ,
633: p_count => x_msg_count,
634: p_data => x_msg_data);
635:
636: ELSE
639: FROM CS_KB_ELEMENT_TYPES_B
640: WHERE element_type_id = p_element_type_id;
641:
642: IF(l_count <1) THEN
643: FND_MSG_PUB.initialize;
644: FND_MESSAGE.set_name('CS', 'CS_KB_C_INVALID_ELE_TYPE_ID');
645: FND_MSG_PUB.ADD;
646: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
647: X_ELEMENT_ID := -2;
641:
642: IF(l_count <1) THEN
643: FND_MSG_PUB.initialize;
644: FND_MESSAGE.set_name('CS', 'CS_KB_C_INVALID_ELE_TYPE_ID');
645: FND_MSG_PUB.ADD;
646: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
647: X_ELEMENT_ID := -2;
648: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE ,
649: p_count => x_msg_count,
644: FND_MESSAGE.set_name('CS', 'CS_KB_C_INVALID_ELE_TYPE_ID');
645: FND_MSG_PUB.ADD;
646: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
647: X_ELEMENT_ID := -2;
648: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE ,
649: p_count => x_msg_count,
650: p_data => x_msg_data);
651: ELSE
652: -- SEDATE
654: Fetch check_active_type_csr Into l_dummy;
655: Close check_active_type_csr;
656:
657: If l_dummy Is Null Then
658: FND_MSG_PUB.initialize;
659: FND_MESSAGE.set_name('CS', 'CS_KB_EXPIRED_STMT_TYPE');
660: FND_MSG_PUB.ADD;
661: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
662: X_ELEMENT_ID := -3;
656:
657: If l_dummy Is Null Then
658: FND_MSG_PUB.initialize;
659: FND_MESSAGE.set_name('CS', 'CS_KB_EXPIRED_STMT_TYPE');
660: FND_MSG_PUB.ADD;
661: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
662: X_ELEMENT_ID := -3;
663: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE ,
664: p_count => x_msg_count,
659: FND_MESSAGE.set_name('CS', 'CS_KB_EXPIRED_STMT_TYPE');
660: FND_MSG_PUB.ADD;
661: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
662: X_ELEMENT_ID := -3;
663: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE ,
664: p_count => x_msg_count,
665: p_data => x_msg_data);
666: ELSE
667:
679: SELECT TO_CHAR(CS_KB_ELEMENT_NUMBER_S.NEXTVAL) INTO l_element_number FROM DUAL;
680: END LOOP;
681:
682: IF x_element_id IS NULL OR l_element_number IS NULL THEN
683: FND_MSG_PUB.initialize;
684: FND_MESSAGE.set_name('CS', 'CS_KB_C_MISS_PARAM');
685: FND_MSG_PUB.ADD;
686: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
687: X_ELEMENT_ID := -1;
681:
682: IF x_element_id IS NULL OR l_element_number IS NULL THEN
683: FND_MSG_PUB.initialize;
684: FND_MESSAGE.set_name('CS', 'CS_KB_C_MISS_PARAM');
685: FND_MSG_PUB.ADD;
686: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
687: X_ELEMENT_ID := -1;
688: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE ,
689: p_count => x_msg_count,
684: FND_MESSAGE.set_name('CS', 'CS_KB_C_MISS_PARAM');
685: FND_MSG_PUB.ADD;
686: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
687: X_ELEMENT_ID := -1;
688: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE ,
689: p_count => x_msg_count,
690: p_data => x_msg_data);
691: ELSE
692:
751: WHEN others THEN
752: FND_MESSAGE.set_name('CS', 'CS_KB_C_UNEXP_ERR');
753: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
754:
755: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
756: p_data => x_msg_data);
757: END Create_Statement;
758:
759:
831:
832: -- validate params
833: IF (p_element_id IS NULL) OR ( NOT p_element_type_id > 0) THEN
834: X_RETURN := -1; -- 'CS_KB_C_MISS_PARAM'
835: FND_MSG_PUB.initialize;
836: FND_MESSAGE.set_name('CS', 'CS_KB_C_MISS_PARAM');
837: FND_MSG_PUB.ADD;
838: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
839: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE ,
833: IF (p_element_id IS NULL) OR ( NOT p_element_type_id > 0) THEN
834: X_RETURN := -1; -- 'CS_KB_C_MISS_PARAM'
835: FND_MSG_PUB.initialize;
836: FND_MESSAGE.set_name('CS', 'CS_KB_C_MISS_PARAM');
837: FND_MSG_PUB.ADD;
838: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
839: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE ,
840: p_count => X_MSG_COUNT,
841: p_data => X_MSG_DATA);
835: FND_MSG_PUB.initialize;
836: FND_MESSAGE.set_name('CS', 'CS_KB_C_MISS_PARAM');
837: FND_MSG_PUB.ADD;
838: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
839: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE ,
840: p_count => X_MSG_COUNT,
841: p_data => X_MSG_DATA);
842: ELSE
843:
847: WHERE element_type_id = p_element_type_id;
848:
849: IF(l_count <1) THEN
850: X_RETURN := -2;
851: FND_MSG_PUB.initialize;
852: FND_MESSAGE.set_name('CS', 'CS_KB_C_INVALID_ELE_TYPE_ID');
853: FND_MSG_PUB.ADD;
854: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
855: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE ,
849: IF(l_count <1) THEN
850: X_RETURN := -2;
851: FND_MSG_PUB.initialize;
852: FND_MESSAGE.set_name('CS', 'CS_KB_C_INVALID_ELE_TYPE_ID');
853: FND_MSG_PUB.ADD;
854: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
855: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE ,
856: p_count => X_MSG_COUNT,
857: p_data => X_MSG_DATA);
851: FND_MSG_PUB.initialize;
852: FND_MESSAGE.set_name('CS', 'CS_KB_C_INVALID_ELE_TYPE_ID');
853: FND_MSG_PUB.ADD;
854: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
855: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE ,
856: p_count => X_MSG_COUNT,
857: p_data => X_MSG_DATA);
858: ELSE
859: -- SEDATE
869: Fetch validate_old_type_used_csr Into l_dummy;
870: Close validate_old_type_used_csr;
871: IF l_dummy Is Null Then
872: X_RETURN := -3;
873: FND_MSG_PUB.initialize;
874: FND_MESSAGE.set_name('CS', 'CS_KB_END_DATED_TYPE');
875: FND_MSG_PUB.ADD;
876: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
877: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE ,
871: IF l_dummy Is Null Then
872: X_RETURN := -3;
873: FND_MSG_PUB.initialize;
874: FND_MESSAGE.set_name('CS', 'CS_KB_END_DATED_TYPE');
875: FND_MSG_PUB.ADD;
876: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
877: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE ,
878: p_count => X_MSG_COUNT,
879: p_data => X_MSG_DATA);
873: FND_MSG_PUB.initialize;
874: FND_MESSAGE.set_name('CS', 'CS_KB_END_DATED_TYPE');
875: FND_MSG_PUB.ADD;
876: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
877: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE ,
878: p_count => X_MSG_COUNT,
879: p_data => X_MSG_DATA);
880:
881: END IF;
943: WHEN OTHERS THEN
944: X_RETURN := -7;--ERROR_STATUS;
945: FND_MESSAGE.set_name('CS', 'CS_KB_C_UPDATE_ERR');
946: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
947: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE ,
948: p_count => X_MSG_COUNT,
949: p_data => X_MSG_DATA);
950: END Update_Statement;
951:
1380: END IF;
1381:
1382: X_RETURN_ELEMENT := NULL;
1383: FND_MESSAGE.set_name('CS', 'CS_KB_C_UPDATE_ERR');
1384: FND_MSG_PUB.ADD;
1385: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR ;
1386: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE ,
1387: p_count => X_MSG_COUNT,
1388: p_data => X_MSG_DATA);
1382: X_RETURN_ELEMENT := NULL;
1383: FND_MESSAGE.set_name('CS', 'CS_KB_C_UPDATE_ERR');
1384: FND_MSG_PUB.ADD;
1385: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR ;
1386: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE ,
1387: p_count => X_MSG_COUNT,
1388: p_data => X_MSG_DATA);
1389: END Update_Statement_Admin;
1390: