DBA Data[Home] [Help]

APPS.AHL_FMP_MR_ACTION_PVT dependencies on FND_MSG_PUB

Line 268: FND_MSG_PUB.ADD;

264:
265: IF p_x_mr_action_rec.mr_action is null OR p_x_mr_action_rec.mr_action=FND_API.G_MISS_CHAR
266: THEN
267: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_ACTION_CODE_NULL');
268: FND_MSG_PUB.ADD;
269: ELSE
270: OPEN get_lookup_meaning_to_code('AHL_FMP_MR_ACTION',p_x_mr_action_rec.MR_ACTION);
271: FETCH get_lookup_meaning_to_code INTO p_x_mr_action_rec.MR_ACTION_CODE;
272:

Line 278: FND_MSG_PUB.ADD;

274: THEN
275: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_ACTION_CODE_INVALID');
276: FND_MESSAGE.SET_TOKEN('FIELD',p_x_mr_action_rec.MR_ACTION,false);
277: FND_MESSAGE.SET_TOKEN('RECORD',nvl(p_x_mr_action_rec.MR_ACTION,'')||'-'||NVL(p_x_mr_action_rec.description,'')||'-'||NVL(p_x_mr_action_rec.plan,''),false);
278: FND_MSG_PUB.ADD;
279: END IF;
280: CLOSE get_lookup_meaning_to_code;
281: END IF;
282:

Line 295: FND_MSG_PUB.ADD;

291: THEN
292: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PLAN_ID_INVALID');
293: FND_MESSAGE.SET_TOKEN('FIELD',p_x_mr_action_rec.MR_ACTION,false);
294: FND_MESSAGE.SET_TOKEN('RECORD',NVL(p_x_mr_action_rec.MR_ACTION,'')||'-'||NVL(p_x_mr_action_rec.description,'')||'-'||NVL(p_x_mr_action_rec.plan,''),false);
295: FND_MSG_PUB.ADD;
296: END IF;
297: CLOSE get_planid_frm_name;
298:
299: END IF;

Line 349: FND_MSG_PUB.ADD;

345: IF (p_mr_action_rec.MR_ACTION_ID IS NULL OR p_mr_action_rec.MR_ACTION_ID=FND_API.G_MISS_NUM)
346: THEN
347: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_ACTION_ID_NULL');
348: FND_MESSAGE.SET_TOKEN('RECORD',NVL(p_mr_action_rec.MR_ACTION,'')||'-'||NVL(p_mr_action_rec.description,'')||'-'||NVL(p_mr_action_rec.plan,''),false);
349: FND_MSG_PUB.ADD;
350: END IF;
351: END IF;
352:
353: IF (p_mr_action_rec.MR_ACTION_ID IS NOT NULL OR p_mr_action_rec.MR_ACTION_ID<>FND_API.G_MISS_NUM) AND p_mr_action_rec.dml_operation<>'C'

Line 362: FND_MSG_PUB.ADD;

358: IF GET_ACTION_ID%NOTFOUND
359: THEN
360: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_RECORD_CHANGED');
361: FND_MESSAGE.SET_TOKEN('RECORD',NVL(p_mr_action_rec.MR_ACTION,'')||'-'||NVL(p_mr_action_rec.description,'')||'-'||NVL(p_mr_action_rec.plan,''),false);
362: FND_MSG_PUB.ADD;
363: END IF;
364: CLOSE get_ACTION_id;
365: END IF;
366:

Line 371: FND_MSG_PUB.ADD;

367: IF (p_mr_action_rec.OBJECT_VERSION_NUMBER IS NULL OR p_mr_action_rec.OBJECT_vERSION_NUMBER=FND_API.G_MISS_num)
368: THEN
369: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MRA_OBJ_VERSION_NULL');
370: FND_MESSAGE.SET_TOKEN('RECORD',NVL(p_mr_action_rec.MR_ACTION,'')||'-'||NVL(p_mr_action_rec.description,'')||'-'||NVL(p_mr_action_rec.plan,''),false);
371: FND_MSG_PUB.ADD;
372: END IF;
373:
374: IF p_mr_action_rec.dml_operation<>'D'
375: THEN

Line 380: FND_MSG_PUB.ADD;

376:
377: IF p_mr_action_rec.MR_HEADER_ID IS NULL OR p_mr_action_rec.MR_HEADER_ID=FND_API.G_MISS_NUM
378: THEN
379: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_HEADER_ID_NULL');
380: FND_MSG_PUB.ADD;
381: ELSE
382: OPEN GetMrDet(p_mr_action_rec.MR_HEADER_ID);
383:
384: FETCH GetMrDet into l_mr_rec;

Line 389: FND_MSG_PUB.ADD;

385:
386: IF GetMrDet%NOTFOUND
387: THEN
388: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_EDIT_STATUS_INVALID');
389: FND_MSG_PUB.ADD;
390: ELSE
391: IF G_PM_INSTALL='Y'
392: THEN
393: IF l_mr_rec.TYPE_CODE='PROGRAM'

Line 396: FND_MSG_PUB.ADD;

392: THEN
393: IF l_mr_rec.TYPE_CODE='PROGRAM'
394: THEN
395: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_TYPE_CODE_PROGRAM');
396: FND_MSG_PUB.ADD;
397: END IF;
398: END IF;
399: END IF;
400: CLOSE GetMrDet;

Line 412: FND_MSG_PUB.ADD;

408: IF p_mr_action_rec.dml_operation='C'
409: THEN
410: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_ACTION_CODE_DUP');
411: FND_MESSAGE.SET_TOKEN('RECORD',NVL(p_mr_action_rec.MR_ACTION,'')||'-'||NVL(p_mr_action_rec.description,'')||'-'||NVL(p_mr_action_rec.plan,''),false);
412: FND_MSG_PUB.ADD;
413: ELSIF p_mr_action_rec.dml_operation='U'
414: and l_act_Rec.mr_action_id<>p_mr_action_rec.MR_ACTION_ID
415: THEN
416: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_ACTION_CODE_DUP');

Line 418: FND_MSG_PUB.ADD;

414: and l_act_Rec.mr_action_id<>p_mr_action_rec.MR_ACTION_ID
415: THEN
416: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_ACTION_CODE_DUP');
417: FND_MESSAGE.SET_TOKEN('ACTION',p_mr_action_rec.MR_ACTION,false);
418: FND_MSG_PUB.ADD;
419: END IF;
420: END IF;
421: CLOSE CHECK_DUP_ACTION_CODE;
422: END IF;

Line 464: FND_MSG_PUB.initialize;

460:
461: -- Initialize message list if p_init_msg_list is set to TRUE.
462:
463: IF FND_API.to_boolean(l_init_msg_list) THEN
464: FND_MSG_PUB.initialize;
465: END IF;
466:
467: -- Initialize API return status to success
468:

Line 511: l_msg_count := FND_MSG_PUB.count_msg;

507:
508:
509: END LOOP;
510:
511: l_msg_count := FND_MSG_PUB.count_msg;
512: IF l_msg_count > 0 THEN
513: X_msg_count := l_msg_count;
514: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
515: RAISE FND_API.G_EXC_ERROR;

Line 550: l_msg_count := FND_MSG_PUB.count_msg;

546: END IF;
547:
548: END IF;
549:
550: l_msg_count := FND_MSG_PUB.count_msg;
551: IF l_msg_count > 0 THEN
552: X_msg_count := l_msg_count;
553: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
554: END IF;

Line 564: FND_MSG_PUB.ADD;

560:
561: if (sql%ROWCOUNT=0)
562: then
563: FND_MESSAGE.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');
564: FND_MSG_PUB.ADD;
565: else
566: delete from AHL_MR_ACTIONS_B
567: where MR_ACTION_ID = p_x_mr_ACTION_TBL(i).MR_ACTION_ID
568: AND OBJECT_VERSION_NUMBER=p_x_mr_ACTION_TBL(i).OBJECT_VERSION_NUMBER;

Line 572: FND_MSG_PUB.ADD;

568: AND OBJECT_VERSION_NUMBER=p_x_mr_ACTION_TBL(i).OBJECT_VERSION_NUMBER;
569:
570: if (sql%ROWCOUNT=0) then
571: FND_MESSAGE.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');
572: FND_MSG_PUB.ADD;
573: end if;
574: end if;
575: ELSIF p_x_mr_ACTION_TBL(i).DML_operation='U' then
576:

Line 646: l_msg_count := FND_MSG_PUB.count_msg;

642: END IF;
643: END IF;
644: END LOOP;
645:
646: l_msg_count := FND_MSG_PUB.count_msg;
647: IF l_msg_count > 0 THEN
648: X_msg_count := l_msg_count;
649: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
650: RAISE FND_API.G_EXC_ERROR;

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

668: EXCEPTION
669: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
670: ROLLBACK TO PROCESS_MR_ACTION;
671: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
672: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
673: p_count => x_msg_count,
674: p_data => x_msg_data);
675:
676: WHEN FND_API.G_EXC_ERROR THEN

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

675:
676: WHEN FND_API.G_EXC_ERROR THEN
677: ROLLBACK TO PROCESS_MR_ACTION;
678: X_return_status := FND_API.G_RET_STS_ERROR;
679: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
680: p_count => x_msg_count,
681: p_data => X_msg_data);
682: WHEN OTHERS THEN
683: ROLLBACK TO PROCESS_MR_ACTION;

Line 685: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

681: p_data => X_msg_data);
682: WHEN OTHERS THEN
683: ROLLBACK TO PROCESS_MR_ACTION;
684: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
685: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
686: THEN
687: fnd_msg_pub.add_exc_msg(p_pkg_name =>G_PKG_NAME,
688: p_procedure_name =>l_api_name,
689: p_error_text =>SUBSTR(SQLERRM,1,240)

Line 687: fnd_msg_pub.add_exc_msg(p_pkg_name =>G_PKG_NAME,

683: ROLLBACK TO PROCESS_MR_ACTION;
684: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
685: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
686: THEN
687: fnd_msg_pub.add_exc_msg(p_pkg_name =>G_PKG_NAME,
688: p_procedure_name =>l_api_name,
689: p_error_text =>SUBSTR(SQLERRM,1,240)
690: );
691: END IF;

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

688: p_procedure_name =>l_api_name,
689: p_error_text =>SUBSTR(SQLERRM,1,240)
690: );
691: END IF;
692: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
693: p_count => x_msg_count,
694: p_data => X_msg_data);
695: END;
696: END AHL_FMP_MR_ACTION_PVT;