DBA Data[Home] [Help]

APPS.AHL_WBS_RULES_PVT dependencies on FND_API

Line 166: x_return_status := FND_API.G_RET_STS_ERROR;

162: IF(L_PRE_ROUTE = L_POST_ROUTE) THEN
163: FND_MESSAGE.set_name( 'AHL', 'AHL_WBS_SAME_ROUTE' );
164: FND_MESSAGE.set_token( 'RULE_NO', p_x_wbs_rules_rec.RULE_NUMBER );
165: FND_MSG_PUB.add;
166: x_return_status := FND_API.G_RET_STS_ERROR;
167:
168: IF (l_log_statement >= l_log_current_level) THEN
169: FND_LOG.string(l_log_statement, L_DEBUG, 'rule_id-' || p_x_wbs_rules_rec.rule_id || ': Same Route on both Sides');
170: END IF;

Line 181: x_return_status := FND_API.G_RET_STS_ERROR;

177: IF (L_RULE_PRE_PART = '' OR L_RULE_POST_PART = '') THEN
178: FND_MESSAGE.set_name( 'AHL', 'AHL_WBS_INCOMPLETE_RULE' );
179: FND_MESSAGE.set_token( 'RULE_NO', p_x_wbs_rules_rec.RULE_NUMBER );
180: FND_MSG_PUB.add;
181: x_return_status := FND_API.G_RET_STS_ERROR;
182: IF (l_log_statement >= l_log_current_level) THEN
183: FND_LOG.string(l_log_statement, L_DEBUG, 'rule_id-' || p_x_wbs_rules_rec.rule_id || ': Incomplete Rule');
184: END IF;
185: END IF;

Line 192: x_return_status := FND_API.G_RET_STS_ERROR;

188: IF(L_RULE_PRE_PART = L_RULE_POST_PART) THEN
189: FND_MESSAGE.set_name( 'AHL', 'AHL_WBS_PRE_POST_SAME' );
190: FND_MESSAGE.set_token( 'RULE_NO', p_x_wbs_rules_rec.RULE_NUMBER );
191: FND_MSG_PUB.add;
192: x_return_status := FND_API.G_RET_STS_ERROR;
193: IF (l_log_statement >= l_log_current_level) THEN
194: FND_LOG.string(l_log_statement, L_DEBUG, 'rule_id-' || p_x_wbs_rules_rec.rule_id || ': Both part are same');
195: END IF;
196: END IF;

Line 204: x_return_status := FND_API.G_RET_STS_ERROR;

200: OR (L_PRE_ROUTE IS NOT NULL AND L_POST_ROUTE IS NULL)) THEN
201: FND_MESSAGE.set_name( 'AHL', 'AHL_WBS_DIFF_ATTR' );
202: FND_MESSAGE.set_token( 'RULE_NO', p_x_wbs_rules_rec.RULE_NUMBER );
203: FND_MSG_PUB.add;
204: x_return_status := FND_API.G_RET_STS_ERROR;
205: IF (l_log_statement >= l_log_current_level) THEN
206: FND_LOG.string(l_log_statement, L_DEBUG, 'rule_id-' || p_x_wbs_rules_rec.rule_id || ': Not Same Attributes');
207: END IF;
208:

Line 214: x_return_status := FND_API.G_RET_STS_ERROR;

210: OR (L_PRE_ROUTE_TYPE_CODE IS NOT NULL AND L_POST_ROUTE_TYPE_CODE IS NULL)) THEN
211: FND_MESSAGE.set_name( 'AHL', 'AHL_WBS_DIFF_ATTR' );
212: FND_MESSAGE.set_token( 'RULE_NO', p_x_wbs_rules_rec.RULE_NUMBER );
213: FND_MSG_PUB.add;
214: x_return_status := FND_API.G_RET_STS_ERROR;
215: IF (l_log_statement >= l_log_current_level) THEN
216: FND_LOG.string(l_log_statement, L_DEBUG, 'rule_id-' || p_x_wbs_rules_rec.rule_id || ': Not Same Attributes');
217: END IF;
218:

Line 224: x_return_status := FND_API.G_RET_STS_ERROR;

220: OR (L_PRE_SYSTEM_CODE IS NOT NULL AND L_POST_SYSTEM_CODE IS NULL)) THEN
221: FND_MESSAGE.set_name( 'AHL', 'AHL_WBS_DIFF_ATTR' );
222: FND_MESSAGE.set_token( 'RULE_NO', p_x_wbs_rules_rec.RULE_NUMBER );
223: FND_MSG_PUB.add;
224: x_return_status := FND_API.G_RET_STS_ERROR;
225: IF (l_log_statement >= l_log_current_level) THEN
226: FND_LOG.string(l_log_statement, L_DEBUG, 'rule_id-' || p_x_wbs_rules_rec.rule_id || ': Not Same Attributes');
227: END IF;
228:

Line 234: x_return_status := FND_API.G_RET_STS_ERROR;

230: OR (L_PRE_PROCESS_CODE IS NOT NULL AND L_POST_PROCESS_CODE IS NULL)) THEN
231: FND_MESSAGE.set_name( 'AHL', 'AHL_WBS_DIFF_ATTR' );
232: FND_MESSAGE.set_token( 'RULE_NO', p_x_wbs_rules_rec.RULE_NUMBER );
233: FND_MSG_PUB.add;
234: x_return_status := FND_API.G_RET_STS_ERROR;
235: IF (l_log_statement >= l_log_current_level) THEN
236: FND_LOG.string(l_log_statement, L_DEBUG, 'rule_id-' || p_x_wbs_rules_rec.rule_id || ': Not Same Attributes');
237: END IF;
238: END IF;

Line 251: x_return_status := FND_API.G_RET_STS_ERROR;

247: IF(L_DUMMY_COUNT < 1) THEN
248: FND_MESSAGE.set_name( 'AHL', 'AHL_WBS_INV_ROUTE' );
249: FND_MESSAGE.set_token( 'RULE_NO', p_x_wbs_rules_rec.RULE_NUMBER );
250: FND_MSG_PUB.add;
251: x_return_status := FND_API.G_RET_STS_ERROR;
252: IF (l_log_statement >= l_log_current_level) THEN
253: FND_LOG.string(l_log_statement, L_DEBUG, 'rule_id-' || p_x_wbs_rules_rec.rule_id || ': Invalid PreRoute');
254: END IF;
255: END IF;

Line 267: x_return_status := FND_API.G_RET_STS_ERROR;

263: IF(L_DUMMY_COUNT < 1) THEN
264: FND_MESSAGE.set_name( 'AHL', 'AHL_WBS_INV_ROUTE_TYPE' );
265: FND_MESSAGE.set_token( 'RULE_NO', p_x_wbs_rules_rec.RULE_NUMBER );
266: FND_MSG_PUB.add;
267: x_return_status := FND_API.G_RET_STS_ERROR;
268: IF (l_log_statement >= l_log_current_level) THEN
269: FND_LOG.string(l_log_statement, L_DEBUG, 'rule_id-' || p_x_wbs_rules_rec.rule_id || ': Invalid PreRouteType');
270: END IF;
271: END IF;

Line 283: x_return_status := FND_API.G_RET_STS_ERROR;

279: IF(L_DUMMY_COUNT < 1) THEN
280: FND_MESSAGE.set_name( 'AHL', 'AHL_WBS_INV_SYSTEM' );
281: FND_MESSAGE.set_token( 'RULE_NO', p_x_wbs_rules_rec.RULE_NUMBER );
282: FND_MSG_PUB.add;
283: x_return_status := FND_API.G_RET_STS_ERROR;
284: IF (l_log_statement >= l_log_current_level) THEN
285: FND_LOG.string(l_log_statement, L_DEBUG, 'rule_id-' || p_x_wbs_rules_rec.rule_id || ': Invalid PreSystem');
286: END IF;
287: END IF;

Line 299: x_return_status := FND_API.G_RET_STS_ERROR;

295: IF(L_DUMMY_COUNT < 1) THEN
296: FND_MESSAGE.set_name( 'AHL', 'AHL_WBS_INV_PROCESS' );
297: FND_MESSAGE.set_token( 'RULE_NO', p_x_wbs_rules_rec.RULE_NUMBER );
298: FND_MSG_PUB.add;
299: x_return_status := FND_API.G_RET_STS_ERROR;
300: IF (l_log_statement >= l_log_current_level) THEN
301: FND_LOG.string(l_log_statement, L_DEBUG, 'rule_id-' || p_x_wbs_rules_rec.rule_id || ': Invalid PreProcess');
302: END IF;
303: END IF;

Line 315: x_return_status := FND_API.G_RET_STS_ERROR;

311: IF(L_DUMMY_COUNT < 1) THEN
312: FND_MESSAGE.set_name( 'AHL', 'AHL_WBS_INV_ROUTE' );
313: FND_MESSAGE.set_token( 'RULE_NO', p_x_wbs_rules_rec.RULE_NUMBER );
314: FND_MSG_PUB.add;
315: x_return_status := FND_API.G_RET_STS_ERROR;
316: IF (l_log_statement >= l_log_current_level) THEN
317: FND_LOG.string(l_log_statement, L_DEBUG, 'rule_id-' || p_x_wbs_rules_rec.rule_id || ': Invalid PostRoute');
318: END IF;
319: END IF;

Line 331: x_return_status := FND_API.G_RET_STS_ERROR;

327: IF(L_DUMMY_COUNT < 1) THEN
328: FND_MESSAGE.set_name( 'AHL', 'AHL_WBS_INV_ROUTE_TYPE' );
329: FND_MESSAGE.set_token( 'RULE_NO', p_x_wbs_rules_rec.RULE_NUMBER );
330: FND_MSG_PUB.add;
331: x_return_status := FND_API.G_RET_STS_ERROR;
332: IF (l_log_statement >= l_log_current_level) THEN
333: FND_LOG.string(l_log_statement, L_DEBUG, 'rule_id-' || p_x_wbs_rules_rec.rule_id || ': Invalid PostRouteType');
334: END IF;
335: END IF;

Line 347: x_return_status := FND_API.G_RET_STS_ERROR;

343: IF(L_DUMMY_COUNT < 1) THEN
344: FND_MESSAGE.set_name( 'AHL', 'AHL_WBS_INV_SYSTEM' );
345: FND_MESSAGE.set_token( 'RULE_NO', p_x_wbs_rules_rec.RULE_NUMBER );
346: FND_MSG_PUB.add;
347: x_return_status := FND_API.G_RET_STS_ERROR;
348: IF (l_log_statement >= l_log_current_level) THEN
349: FND_LOG.string(l_log_statement, L_DEBUG, 'rule_id-' || p_x_wbs_rules_rec.rule_id || ': Invalid PostSystem');
350: END IF;
351: END IF;

Line 363: x_return_status := FND_API.G_RET_STS_ERROR;

359: IF(L_DUMMY_COUNT < 1) THEN
360: FND_MESSAGE.set_name( 'AHL', 'AHL_WBS_INV_PROCESS' );
361: FND_MESSAGE.set_token( 'RULE_NO', p_x_wbs_rules_rec.RULE_NUMBER );
362: FND_MSG_PUB.add;
363: x_return_status := FND_API.G_RET_STS_ERROR;
364: IF (l_log_statement >= l_log_current_level) THEN
365: FND_LOG.string(l_log_statement, L_DEBUG, 'rule_id-' || p_x_wbs_rules_rec.rule_id || ': Invalid PostProcess');
366: END IF;
367: END IF;

Line 379: x_return_status := FND_API.G_RET_STS_ERROR;

375: IF(L_DUMMY_COUNT > 0) THEN
376: FND_MESSAGE.set_name( 'AHL', 'AHL_WBS_DUP_RULE' );
377: FND_MESSAGE.set_token( 'RULE_NO', p_x_wbs_rules_rec.RULE_NUMBER );
378: FND_MSG_PUB.add;
379: x_return_status := FND_API.G_RET_STS_ERROR;
380: IF (l_log_statement >= l_log_current_level) THEN
381: FND_LOG.string(l_log_statement, L_DEBUG, 'rule_id-' || p_x_wbs_rules_rec.rule_id || ': Duplicate Rule');
382: END IF;
383: END IF;

Line 393: x_return_status := FND_API.G_RET_STS_ERROR;

389: IF(L_DUMMY_COUNT > 0) THEN
390: FND_MESSAGE.set_name( 'AHL', 'AHL_WBS_INVERSE_RULE' );
391: FND_MESSAGE.set_token( 'RULE_NO', p_x_wbs_rules_rec.RULE_NUMBER );
392: FND_MSG_PUB.add;
393: x_return_status := FND_API.G_RET_STS_ERROR;
394: IF (l_log_statement >= l_log_current_level) THEN
395: FND_LOG.string(l_log_statement, L_DEBUG, 'rule_id-' || p_x_wbs_rules_rec.rule_id || 'Inverse of Existing Rule');
396: END IF;
397: END IF;

Line 400: IF(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN

396: END IF;
397: END IF;
398:
399: --If validations are over, write rule text into the Record type, so that insertion/updation is easier
400: IF(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
401: p_x_wbs_rules_rec.RULE_TEXT := G_SCH_WO || L_RULE_PRE_PART || G_BEF_WO || L_RULE_POST_PART;
402: END IF;
403:
404: IF (l_log_procedure >= l_log_current_level) THEN

Line 435: x_return_status := FND_API.G_RET_STS_ERROR;

431: CONNECT BY PRIOR PRE_ROUTE_NUMBER = POST_ROUTE_NUMBER;
432:
433: EXCEPTION
434: WHEN l_cyclic_loop THEN
435: x_return_status := FND_API.G_RET_STS_ERROR;
436: FND_MESSAGE.set_name( 'AHL', 'AHL_WBS_CYC_ROUTE' );
437: FND_MESSAGE.set_token( 'RULE_NO', p_x_wbs_rules_rec.RULE_NUMBER );
438: FND_MSG_PUB.add;
439: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

Line 439: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

435: x_return_status := FND_API.G_RET_STS_ERROR;
436: FND_MESSAGE.set_name( 'AHL', 'AHL_WBS_CYC_ROUTE' );
437: FND_MESSAGE.set_token( 'RULE_NO', p_x_wbs_rules_rec.RULE_NUMBER );
438: FND_MSG_PUB.add;
439: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
440: p_count => x_msg_count,
441: p_data => x_msg_data);
442: IF (l_log_statement >= l_log_current_level) THEN
443: FND_LOG.string(l_log_statement, L_DEBUG, 'validate_cyclic_routes: rule_id-' || p_x_wbs_rules_rec.rule_id || 'In l_cyclic_loop block' || ' x_msg_count ' || x_msg_count );

Line 447: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

443: FND_LOG.string(l_log_statement, L_DEBUG, 'validate_cyclic_routes: rule_id-' || p_x_wbs_rules_rec.rule_id || 'In l_cyclic_loop block' || ' x_msg_count ' || x_msg_count );
444: END IF;
445: WHEN OTHERS THEN
446: ROLLBACK TO update_rule_sp;
447: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
448: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
449: FND_MSG_PUB.add_exc_msg (G_PKG_NAME, L_API_NAME);
450: END IF;
451: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,

Line 451: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,

447: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
448: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
449: FND_MSG_PUB.add_exc_msg (G_PKG_NAME, L_API_NAME);
450: END IF;
451: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,
452: p_count => x_msg_count,
453: p_data => x_msg_data);
454: IF (l_log_statement >= l_log_current_level) THEN
455: FND_LOG.string(l_log_statement, L_DEBUG, 'validate_cyclic_routes: rule_id-' || p_x_wbs_rules_rec.rule_id || 'In OTHERS block' || ' x_msg_count ' || x_msg_count );

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

462: -- Called by the EO of the UI
463: PROCEDURE create_rule
464: (
465: p_api_version IN NUMBER := 1.0,
466: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
467: p_commit IN VARCHAR2 := FND_API.G_FALSE,
468: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
469: p_module_type IN VARCHAR2 := NULL,
470: x_return_status OUT NOCOPY VARCHAR2,

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

463: PROCEDURE create_rule
464: (
465: p_api_version IN NUMBER := 1.0,
466: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
467: p_commit IN VARCHAR2 := FND_API.G_FALSE,
468: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
469: p_module_type IN VARCHAR2 := NULL,
470: x_return_status OUT NOCOPY VARCHAR2,
471: x_msg_count OUT NOCOPY NUMBER,

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

464: (
465: p_api_version IN NUMBER := 1.0,
466: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
467: p_commit IN VARCHAR2 := FND_API.G_FALSE,
468: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
469: p_module_type IN VARCHAR2 := NULL,
470: x_return_status OUT NOCOPY VARCHAR2,
471: x_msg_count OUT NOCOPY NUMBER,
472: x_msg_data OUT NOCOPY VARCHAR2,

Line 492: IF FND_API.to_boolean( p_init_msg_list ) THEN

488: FND_LOG.string(l_log_procedure,L_DEBUG||'.begin','At the start of PLSQL procedure');
489: END IF;
490:
491: -- Initialize message list if p_init_msg_list is set to TRUE.
492: IF FND_API.to_boolean( p_init_msg_list ) THEN
493: FND_MSG_PUB.initialize;
494: END IF;
495:
496: -- Initialize API return status to success

Line 497: x_return_status := FND_API.G_RET_STS_SUCCESS;

493: FND_MSG_PUB.initialize;
494: END IF;
495:
496: -- Initialize API return status to success
497: x_return_status := FND_API.G_RET_STS_SUCCESS;
498:
499: -- Standard call to check for call compatibility.
500: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
501: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

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

496: -- Initialize API return status to success
497: x_return_status := FND_API.G_RET_STS_SUCCESS;
498:
499: -- Standard call to check for call compatibility.
500: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
501: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
502: END IF;
503:
504: ------------------------Start of API Body------------------------------------

Line 501: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

497: x_return_status := FND_API.G_RET_STS_SUCCESS;
498:
499: -- Standard call to check for call compatibility.
500: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
501: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
502: END IF;
503:
504: ------------------------Start of API Body------------------------------------
505:

Line 514: IF(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN

510: FND_LOG.string(l_log_statement, L_DEBUG, 'rule_id-' || p_x_wbs_rules_rec.rule_id || ': x_return_status after call to validate_rule' || x_return_status);
511: END IF;
512:
513: --If Return Status is successful, then Insert the Rule
514: IF(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
515: IF (l_log_statement >= l_log_current_level) THEN
516: FND_LOG.string(l_log_statement, L_DEBUG, 'rule_id-' || p_x_wbs_rules_rec.rule_id || ': About to insert rule');
517: END IF;
518:

Line 566: x_return_status := FND_API.G_RET_STS_ERROR;

562: IF ( SQL%ROWCOUNT = 0 ) THEN
563: FND_MESSAGE.set_name('AHL','AHL_WBS_RECORD_CHANGED');
564: FND_MESSAGE.set_token( 'RULE_NO', p_x_wbs_rules_rec.RULE_NUMBER );
565: FND_MSG_PUB.add;
566: x_return_status := FND_API.G_RET_STS_ERROR;
567: ELSE
568: -- Check whether Routes form a cycle among the rules. Cannot perform this check before inserting
569: validate_cyclic_routes(p_x_wbs_rules_rec, x_return_status, x_msg_count, x_msg_data);
570: END IF;

Line 577: IF (FND_API.TO_BOOLEAN(p_commit) AND x_return_status = FND_API.G_RET_STS_SUCCESS) THEN

573:
574: ------------------------End of API Body--------------------------------------
575:
576: --Standard check for commit
577: IF (FND_API.TO_BOOLEAN(p_commit) AND x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
578: COMMIT;
579: END IF;
580:
581: -- Count and Get messages

Line 582: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,

578: COMMIT;
579: END IF;
580:
581: -- Count and Get messages
582: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,
583: p_count => x_msg_count,
584: p_data => x_msg_data);
585:
586: IF (l_log_procedure >= l_log_current_level) THEN

Line 591: WHEN FND_API.G_EXC_ERROR THEN

587: FND_LOG.string(l_log_procedure,L_DEBUG||'.end','At the end of PLSQL procedure');
588: END IF;
589:
590: EXCEPTION
591: WHEN FND_API.G_EXC_ERROR THEN
592: ROLLBACK TO create_rule_sp;
593: x_return_status := FND_API.G_RET_STS_ERROR;
594: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,
595: p_count => x_msg_count,

Line 593: x_return_status := FND_API.G_RET_STS_ERROR;

589:
590: EXCEPTION
591: WHEN FND_API.G_EXC_ERROR THEN
592: ROLLBACK TO create_rule_sp;
593: x_return_status := FND_API.G_RET_STS_ERROR;
594: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,
595: p_count => x_msg_count,
596: p_data => x_msg_data);
597: IF (l_log_statement >= l_log_current_level) THEN

Line 594: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,

590: EXCEPTION
591: WHEN FND_API.G_EXC_ERROR THEN
592: ROLLBACK TO create_rule_sp;
593: x_return_status := FND_API.G_RET_STS_ERROR;
594: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,
595: p_count => x_msg_count,
596: p_data => x_msg_data);
597: IF (l_log_statement >= l_log_current_level) THEN
598: FND_LOG.string(l_log_statement, L_DEBUG, 'rule_id-' || p_x_wbs_rules_rec.rule_id || 'In G_EXC_ERROR block' || ' x_msg_count ' || x_msg_count );

Line 601: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

597: IF (l_log_statement >= l_log_current_level) THEN
598: FND_LOG.string(l_log_statement, L_DEBUG, 'rule_id-' || p_x_wbs_rules_rec.rule_id || 'In G_EXC_ERROR block' || ' x_msg_count ' || x_msg_count );
599: END IF;
600:
601: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
602: ROLLBACK TO create_rule_sp;
603: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
604: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,
605: p_count => x_msg_count,

Line 603: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

599: END IF;
600:
601: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
602: ROLLBACK TO create_rule_sp;
603: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
604: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,
605: p_count => x_msg_count,
606: p_data => x_msg_data);
607: IF (l_log_statement >= l_log_current_level) THEN

Line 604: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,

600:
601: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
602: ROLLBACK TO create_rule_sp;
603: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
604: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,
605: p_count => x_msg_count,
606: p_data => x_msg_data);
607: IF (l_log_statement >= l_log_current_level) THEN
608: FND_LOG.string(l_log_statement, L_DEBUG, 'rule_id-' || p_x_wbs_rules_rec.rule_id || 'In G_EXC_UNEXPECTED_ERROR block' || ' x_msg_count ' || x_msg_count );

Line 613: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

609: END IF;
610:
611: WHEN OTHERS THEN
612: ROLLBACK TO create_rule_sp;
613: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
614: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
615: FND_MSG_PUB.add_exc_msg (G_PKG_NAME, L_API_NAME);
616: END IF;
617: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,

Line 617: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,

613: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
614: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
615: FND_MSG_PUB.add_exc_msg (G_PKG_NAME, L_API_NAME);
616: END IF;
617: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,
618: p_count => x_msg_count,
619: p_data => x_msg_data);
620: IF (l_log_statement >= l_log_current_level) THEN
621: FND_LOG.string(l_log_statement, L_DEBUG, 'rule_id-' || p_x_wbs_rules_rec.rule_id || 'In OTHERS block' || ' x_msg_count ' || x_msg_count );

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

627: -- Called by the EO of the UI
628: PROCEDURE update_rule
629: (
630: p_api_version IN NUMBER := 1.0,
631: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
632: p_commit IN VARCHAR2 := FND_API.G_FALSE,
633: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
634: p_module_type IN VARCHAR2 := NULL,
635: x_return_status OUT NOCOPY VARCHAR2,

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

628: PROCEDURE update_rule
629: (
630: p_api_version IN NUMBER := 1.0,
631: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
632: p_commit IN VARCHAR2 := FND_API.G_FALSE,
633: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
634: p_module_type IN VARCHAR2 := NULL,
635: x_return_status OUT NOCOPY VARCHAR2,
636: x_msg_count OUT NOCOPY NUMBER,

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

629: (
630: p_api_version IN NUMBER := 1.0,
631: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
632: p_commit IN VARCHAR2 := FND_API.G_FALSE,
633: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
634: p_module_type IN VARCHAR2 := NULL,
635: x_return_status OUT NOCOPY VARCHAR2,
636: x_msg_count OUT NOCOPY NUMBER,
637: x_msg_data OUT NOCOPY VARCHAR2,

Line 658: IF FND_API.to_boolean( p_init_msg_list ) THEN

654: FND_LOG.string(l_log_procedure,L_DEBUG||'.begin','At the start of PLSQL procedure');
655: END IF;
656:
657: -- Initialize message list if p_init_msg_list is set to TRUE.
658: IF FND_API.to_boolean( p_init_msg_list ) THEN
659: FND_MSG_PUB.initialize;
660: END IF;
661:
662: -- Initialize API return status to success

Line 663: x_return_status := FND_API.G_RET_STS_SUCCESS;

659: FND_MSG_PUB.initialize;
660: END IF;
661:
662: -- Initialize API return status to success
663: x_return_status := FND_API.G_RET_STS_SUCCESS;
664:
665: -- Standard call to check for call compatibility.
666: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
667: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

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

662: -- Initialize API return status to success
663: x_return_status := FND_API.G_RET_STS_SUCCESS;
664:
665: -- Standard call to check for call compatibility.
666: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
667: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
668: END IF;
669:
670: ------------------------Start of API Body------------------------------------

Line 667: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

663: x_return_status := FND_API.G_RET_STS_SUCCESS;
664:
665: -- Standard call to check for call compatibility.
666: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
667: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
668: END IF;
669:
670: ------------------------Start of API Body------------------------------------
671:

Line 680: IF(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN

676: FND_LOG.string(l_log_statement, L_DEBUG, 'rule_id-' || p_x_wbs_rules_rec.rule_id || ': x_return_status after call to validate_rule' || x_return_status);
677: END IF;
678:
679: --If Return Status is successful, then Update the Rule
680: IF(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
681: IF (l_log_statement >= l_log_current_level) THEN
682: FND_LOG.string(l_log_statement, L_DEBUG, 'rule_id-' || p_x_wbs_rules_rec.rule_id || ': About to update rule');
683: END IF;
684:

Line 706: x_return_status := FND_API.G_RET_STS_ERROR;

702: IF ( SQL%ROWCOUNT = 0 ) THEN
703: FND_MESSAGE.set_name('AHL','AHL_WBS_RECORD_CHANGED');
704: FND_MESSAGE.set_token( 'RULE_NO', p_x_wbs_rules_rec.RULE_NUMBER );
705: FND_MSG_PUB.add;
706: x_return_status := FND_API.G_RET_STS_ERROR;
707: ELSE
708: -- Check whether Routes form a cycle among the rules. Cannot perform this check before updating
709: validate_cyclic_routes(p_x_wbs_rules_rec, x_return_status, x_msg_count, x_msg_data);
710: END IF;

Line 717: IF (FND_API.TO_BOOLEAN(p_commit) AND x_return_status = FND_API.G_RET_STS_SUCCESS) THEN

713:
714: ------------------------End of API Body--------------------------------------
715:
716: --Standard check for commit
717: IF (FND_API.TO_BOOLEAN(p_commit) AND x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
718: COMMIT;
719: END IF;
720:
721: -- Count and Get messages

Line 722: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,

718: COMMIT;
719: END IF;
720:
721: -- Count and Get messages
722: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,
723: p_count => x_msg_count,
724: p_data => x_msg_data);
725:
726: IF (l_log_procedure >= l_log_current_level) THEN

Line 731: WHEN FND_API.G_EXC_ERROR THEN

727: FND_LOG.string(l_log_procedure,L_DEBUG||'.end','At the end of PLSQL procedure');
728: END IF;
729:
730: EXCEPTION
731: WHEN FND_API.G_EXC_ERROR THEN
732: ROLLBACK TO update_rule_sp;
733: x_return_status := FND_API.G_RET_STS_ERROR;
734: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,
735: p_count => x_msg_count,

Line 733: x_return_status := FND_API.G_RET_STS_ERROR;

729:
730: EXCEPTION
731: WHEN FND_API.G_EXC_ERROR THEN
732: ROLLBACK TO update_rule_sp;
733: x_return_status := FND_API.G_RET_STS_ERROR;
734: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,
735: p_count => x_msg_count,
736: p_data => x_msg_data);
737: IF (l_log_statement >= l_log_current_level) THEN

Line 734: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,

730: EXCEPTION
731: WHEN FND_API.G_EXC_ERROR THEN
732: ROLLBACK TO update_rule_sp;
733: x_return_status := FND_API.G_RET_STS_ERROR;
734: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,
735: p_count => x_msg_count,
736: p_data => x_msg_data);
737: IF (l_log_statement >= l_log_current_level) THEN
738: FND_LOG.string(l_log_statement, L_DEBUG, 'Update Rule: rule_id-' || p_x_wbs_rules_rec.rule_id || 'In G_EXC_ERROR block' || ' x_msg_count ' || x_msg_count );

Line 741: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

737: IF (l_log_statement >= l_log_current_level) THEN
738: FND_LOG.string(l_log_statement, L_DEBUG, 'Update Rule: rule_id-' || p_x_wbs_rules_rec.rule_id || 'In G_EXC_ERROR block' || ' x_msg_count ' || x_msg_count );
739: END IF;
740:
741: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
742: ROLLBACK TO update_rule_sp;
743: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
744: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,
745: p_count => x_msg_count,

Line 743: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

739: END IF;
740:
741: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
742: ROLLBACK TO update_rule_sp;
743: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
744: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,
745: p_count => x_msg_count,
746: p_data => x_msg_data);
747: IF (l_log_statement >= l_log_current_level) THEN

Line 744: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,

740:
741: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
742: ROLLBACK TO update_rule_sp;
743: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
744: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,
745: p_count => x_msg_count,
746: p_data => x_msg_data);
747: IF (l_log_statement >= l_log_current_level) THEN
748: FND_LOG.string(l_log_statement, L_DEBUG, 'Update Rule: rule_id-' || p_x_wbs_rules_rec.rule_id || 'In G_EXC_UNEXPECTED_ERROR block' || ' x_msg_count ' || x_msg_count );

Line 753: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

749: END IF;
750:
751: WHEN OTHERS THEN
752: ROLLBACK TO update_rule_sp;
753: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
754: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
755: FND_MSG_PUB.add_exc_msg (G_PKG_NAME, L_API_NAME);
756: END IF;
757: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,

Line 757: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,

753: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
754: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
755: FND_MSG_PUB.add_exc_msg (G_PKG_NAME, L_API_NAME);
756: END IF;
757: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,
758: p_count => x_msg_count,
759: p_data => x_msg_data);
760: IF (l_log_statement >= l_log_current_level) THEN
761: FND_LOG.string(l_log_statement, L_DEBUG, 'Update Rule: rule_id-' || p_x_wbs_rules_rec.rule_id || 'In OTHERS block' || ' x_msg_count ' || x_msg_count );