64:
65: --Validate p_dml_flag is one of 'C', 'U' or 'D', where
66: --'C','U','D' refer to 'CREATE','UPDATE','DELETE(EXPIRE)' respectively
67: IF (p_dml_flag NOT IN ('C', 'U', 'D')) THEN
68: FND_MESSAGE.set_name('AHL','AHL_UC_API_PARAMETER_INVALID');
69: FND_MESSAGE.set_token('NAME', 'dml_flag');
70: FND_MESSAGE.set_token('VALUE', p_dml_flag);
71: FND_MSG_PUB.add;
72: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
65: --Validate p_dml_flag is one of 'C', 'U' or 'D', where
66: --'C','U','D' refer to 'CREATE','UPDATE','DELETE(EXPIRE)' respectively
67: IF (p_dml_flag NOT IN ('C', 'U', 'D')) THEN
68: FND_MESSAGE.set_name('AHL','AHL_UC_API_PARAMETER_INVALID');
69: FND_MESSAGE.set_token('NAME', 'dml_flag');
70: FND_MESSAGE.set_token('VALUE', p_dml_flag);
71: FND_MSG_PUB.add;
72: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
73: END IF;
66: --'C','U','D' refer to 'CREATE','UPDATE','DELETE(EXPIRE)' respectively
67: IF (p_dml_flag NOT IN ('C', 'U', 'D')) THEN
68: FND_MESSAGE.set_name('AHL','AHL_UC_API_PARAMETER_INVALID');
69: FND_MESSAGE.set_token('NAME', 'dml_flag');
70: FND_MESSAGE.set_token('VALUE', p_dml_flag);
71: FND_MSG_PUB.add;
72: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
73: END IF;
74:
115: --Get the object_version_number of the uc_header and csi instance record
116: OPEN get_ovns(p_x_uc_header_rec.uc_header_id);
117: FETCH get_ovns INTO l_uc_header_ovn, l_csi_instance_ovn;
118: IF get_ovns%NOTFOUND THEN
119: FND_MESSAGE.set_name('AHL','AHL_UC_API_PARAMETER_INVALID');
120: FND_MESSAGE.set_token('NAME', 'uc_header_id');
121: FND_MESSAGE.set_token('VALUE', p_x_uc_header_rec.uc_header_id);
122: FND_MSG_PUB.add;
123: CLOSE get_ovns;
116: OPEN get_ovns(p_x_uc_header_rec.uc_header_id);
117: FETCH get_ovns INTO l_uc_header_ovn, l_csi_instance_ovn;
118: IF get_ovns%NOTFOUND THEN
119: FND_MESSAGE.set_name('AHL','AHL_UC_API_PARAMETER_INVALID');
120: FND_MESSAGE.set_token('NAME', 'uc_header_id');
121: FND_MESSAGE.set_token('VALUE', p_x_uc_header_rec.uc_header_id);
122: FND_MSG_PUB.add;
123: CLOSE get_ovns;
124: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
117: FETCH get_ovns INTO l_uc_header_ovn, l_csi_instance_ovn;
118: IF get_ovns%NOTFOUND THEN
119: FND_MESSAGE.set_name('AHL','AHL_UC_API_PARAMETER_INVALID');
120: FND_MESSAGE.set_token('NAME', 'uc_header_id');
121: FND_MESSAGE.set_token('VALUE', p_x_uc_header_rec.uc_header_id);
122: FND_MSG_PUB.add;
123: CLOSE get_ovns;
124: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
125: END IF;