119: ELSE
120: x_return_status := 'E';
121: X_msg := 'Resources';
122: RAISE RESOURCE_REQUIRED;
123: FND_MESSAGE.SET_TOKEN('ERROR', sqlerrm);
124: FND_MSG_PUB.ADD;
125: END IF; /* p_resources.resources IS NOT NULL */
126:
127: fnd_msg_pub.count_and_get (
146: x_return_status := FND_API.G_RET_STS_ERROR;
147:
148: WHEN RESOURCE_REQUIRED THEN
149: x_return_status := FND_API.G_RET_STS_ERROR;
150: FND_MESSAGE.SET_NAME('GMP','GMP_VALUE_REQUIRED');
151: FND_MESSAGE.SET_TOKEN('VALUE_REQUIRED',X_msg);
152: FND_MSG_PUB.ADD;
153: FND_MSG_PUB.Count_And_Get(p_count=>x_message_count, p_data=>x_message_list);
154:
147:
148: WHEN RESOURCE_REQUIRED THEN
149: x_return_status := FND_API.G_RET_STS_ERROR;
150: FND_MESSAGE.SET_NAME('GMP','GMP_VALUE_REQUIRED');
151: FND_MESSAGE.SET_TOKEN('VALUE_REQUIRED',X_msg);
152: FND_MSG_PUB.ADD;
153: FND_MSG_PUB.Count_And_Get(p_count=>x_message_count, p_data=>x_message_list);
154:
155: WHEN OTHERS THEN
153: FND_MSG_PUB.Count_And_Get(p_count=>x_message_count, p_data=>x_message_list);
154:
155: WHEN OTHERS THEN
156: ROLLBACK TO SAVEPOINT create_resources;
157: FND_MESSAGE.SET_NAME('GMD', 'GMD_UNEXPECTED_ERROR');
158: FND_MESSAGE.SET_TOKEN('ERROR', sqlerrm);
159: FND_MSG_PUB.ADD;
160: fnd_msg_pub.count_and_get (
161: p_count => x_message_count
154:
155: WHEN OTHERS THEN
156: ROLLBACK TO SAVEPOINT create_resources;
157: FND_MESSAGE.SET_NAME('GMD', 'GMD_UNEXPECTED_ERROR');
158: FND_MESSAGE.SET_TOKEN('ERROR', sqlerrm);
159: FND_MSG_PUB.ADD;
160: fnd_msg_pub.count_and_get (
161: p_count => x_message_count
162: ,p_encoded => FND_API.g_false
331: --
332: EXCEPTION
333: WHEN INVALID_MIN_MAX THEN
334: x_return_status := FND_API.G_RET_STS_ERROR;
335: FND_MESSAGE.SET_NAME('GMP','GMP_MIN_MAX_CAPACITY');
336: FND_MSG_PUB.ADD;
337: FND_MSG_PUB.Count_And_Get(p_count=>x_message_count, p_data=>x_message_list);
338: --
339: WHEN MIN_MAX_CAPACITY_REQUIRED THEN
337: FND_MSG_PUB.Count_And_Get(p_count=>x_message_count, p_data=>x_message_list);
338: --
339: WHEN MIN_MAX_CAPACITY_REQUIRED THEN
340: x_return_status := FND_API.G_RET_STS_ERROR;
341: FND_MESSAGE.SET_NAME('GMP','GMP_VALUE_REQUIRED');
342: FND_MESSAGE.SET_TOKEN('VALUE_REQUIRED',X_msg);
343: FND_MSG_PUB.ADD;
344: FND_MSG_PUB.Count_And_Get(p_count=>x_message_count, p_data=>x_message_list);
345: --
338: --
339: WHEN MIN_MAX_CAPACITY_REQUIRED THEN
340: x_return_status := FND_API.G_RET_STS_ERROR;
341: FND_MESSAGE.SET_NAME('GMP','GMP_VALUE_REQUIRED');
342: FND_MESSAGE.SET_TOKEN('VALUE_REQUIRED',X_msg);
343: FND_MSG_PUB.ADD;
344: FND_MSG_PUB.Count_And_Get(p_count=>x_message_count, p_data=>x_message_list);
345: --
346: WHEN PS_DUP_REC THEN
344: FND_MSG_PUB.Count_And_Get(p_count=>x_message_count, p_data=>x_message_list);
345: --
346: WHEN PS_DUP_REC THEN
347: x_return_status := FND_API.G_RET_STS_ERROR;
348: FND_MESSAGE.SET_NAME('GMP','PS_DUP_REC');
349: FND_MSG_PUB.ADD;
350: FND_MSG_PUB.Count_And_Get(p_count=>x_message_count, p_data=>x_message_list);
351: --
352: WHEN INVALID_VALUE THEN
350: FND_MSG_PUB.Count_And_Get(p_count=>x_message_count, p_data=>x_message_list);
351: --
352: WHEN INVALID_VALUE THEN
353: x_return_status := FND_API.G_RET_STS_ERROR;
354: FND_MESSAGE.SET_NAME('GMP','GMP_INVALID_VALUE');
355: FND_MESSAGE.SET_TOKEN('FIELD',X_field);
356: FND_MESSAGE.SET_TOKEN('VALUE',X_value);
357: FND_MSG_PUB.ADD;
358: FND_MSG_PUB.Count_And_Get(p_count=>x_message_count, p_data=>x_message_list);
351: --
352: WHEN INVALID_VALUE THEN
353: x_return_status := FND_API.G_RET_STS_ERROR;
354: FND_MESSAGE.SET_NAME('GMP','GMP_INVALID_VALUE');
355: FND_MESSAGE.SET_TOKEN('FIELD',X_field);
356: FND_MESSAGE.SET_TOKEN('VALUE',X_value);
357: FND_MSG_PUB.ADD;
358: FND_MSG_PUB.Count_And_Get(p_count=>x_message_count, p_data=>x_message_list);
359: --
352: WHEN INVALID_VALUE THEN
353: x_return_status := FND_API.G_RET_STS_ERROR;
354: FND_MESSAGE.SET_NAME('GMP','GMP_INVALID_VALUE');
355: FND_MESSAGE.SET_TOKEN('FIELD',X_field);
356: FND_MESSAGE.SET_TOKEN('VALUE',X_value);
357: FND_MSG_PUB.ADD;
358: FND_MSG_PUB.Count_And_Get(p_count=>x_message_count, p_data=>x_message_list);
359: --
360: WHEN RESOURCE_DESC_REQUIRED THEN
358: FND_MSG_PUB.Count_And_Get(p_count=>x_message_count, p_data=>x_message_list);
359: --
360: WHEN RESOURCE_DESC_REQUIRED THEN
361: x_return_status := FND_API.G_RET_STS_ERROR;
362: FND_MESSAGE.SET_NAME('GMP','GMP_VALUE_REQUIRED');
363: FND_MESSAGE.SET_TOKEN('VALUE_REQUIRED',X_msg);
364: FND_MSG_PUB.ADD;
365: FND_MSG_PUB.Count_And_Get(p_count=>x_message_count, p_data=>x_message_list);
366: --
359: --
360: WHEN RESOURCE_DESC_REQUIRED THEN
361: x_return_status := FND_API.G_RET_STS_ERROR;
362: FND_MESSAGE.SET_NAME('GMP','GMP_VALUE_REQUIRED');
363: FND_MESSAGE.SET_TOKEN('VALUE_REQUIRED',X_msg);
364: FND_MSG_PUB.ADD;
365: FND_MSG_PUB.Count_And_Get(p_count=>x_message_count, p_data=>x_message_list);
366: --
367: WHEN INVALID_USAGE_UM THEN
365: FND_MSG_PUB.Count_And_Get(p_count=>x_message_count, p_data=>x_message_list);
366: --
367: WHEN INVALID_USAGE_UM THEN
368: x_return_status := FND_API.G_RET_STS_ERROR;
369: FND_MESSAGE.SET_NAME('GMA','SY_INVALID_UM_CODE');
370: FND_MSG_PUB.ADD;
371: FND_MSG_PUB.Count_And_Get(p_count=>x_message_count, p_data=>x_message_list);
372: --
373: WHEN INVALID_RSRC_CLASS THEN
371: FND_MSG_PUB.Count_And_Get(p_count=>x_message_count, p_data=>x_message_list);
372: --
373: WHEN INVALID_RSRC_CLASS THEN
374: x_return_status := FND_API.G_RET_STS_ERROR;
375: FND_MESSAGE.SET_NAME('GMP','CR_INVALID_RSRC_CLASS');
376: FND_MSG_PUB.ADD;
377: FND_MSG_PUB.Count_And_Get(p_count=>x_message_count, p_data=>x_message_list);
378:
379: END check_data; /* End of Procedure check_resources */
448: x_message_list,
449: l_return_status);
450:
451: IF l_return_status = 'E' THEN
452: FND_MESSAGE.SET_NAME('GMA', 'SY_INVALID_DUPLICATION');
453: FND_MSG_PUB.ADD;
454: RAISE resource_update_failure;
455: ELSE
456: /* Update the Resource Data now */
504: x_return_status := FND_API.G_RET_STS_ERROR;
505: WHEN OTHERS THEN
506: ROLLBACK TO SAVEPOINT update_resources;
507: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'When others exception:'||SQLERRM);
508: FND_MESSAGE.SET_NAME('GMD', 'GMD_UNEXPECTED_ERROR');
509: FND_MESSAGE.SET_TOKEN('ERROR', sqlerrm);
510: FND_MSG_PUB.ADD;
511: fnd_msg_pub.count_and_get (
512: p_count => x_message_count
505: WHEN OTHERS THEN
506: ROLLBACK TO SAVEPOINT update_resources;
507: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'When others exception:'||SQLERRM);
508: FND_MESSAGE.SET_NAME('GMD', 'GMD_UNEXPECTED_ERROR');
509: FND_MESSAGE.SET_TOKEN('ERROR', sqlerrm);
510: FND_MSG_PUB.ADD;
511: fnd_msg_pub.count_and_get (
512: p_count => x_message_count
513: ,p_encoded => FND_API.g_false
611: x_return_status := FND_API.G_RET_STS_ERROR;
612: WHEN OTHERS THEN
613: ROLLBACK TO SAVEPOINT delete_resources;
614: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'When others exception:'||SQLERRM);
615: FND_MESSAGE.SET_NAME('GMD', 'GMD_UNEXPECTED_ERROR');
616: FND_MESSAGE.SET_TOKEN('ERROR', sqlerrm);
617: FND_MSG_PUB.ADD;
618: fnd_msg_pub.count_and_get (
619: p_count => x_message_count
612: WHEN OTHERS THEN
613: ROLLBACK TO SAVEPOINT delete_resources;
614: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'When others exception:'||SQLERRM);
615: FND_MESSAGE.SET_NAME('GMD', 'GMD_UNEXPECTED_ERROR');
616: FND_MESSAGE.SET_TOKEN('ERROR', sqlerrm);
617: FND_MSG_PUB.ADD;
618: fnd_msg_pub.count_and_get (
619: p_count => x_message_count
620: ,p_encoded => FND_API.g_false