DBA Data[Home] [Help]

APPS.AHL_FMP_MR_VISIT_TYPES_PVT dependencies on FND_MSG_PUB

Line 109: FND_MSG_PUB.ADD;

105: and object_version_number=P_MR_VISIT_TYPE_REC.object_version_number;
106: if (sql%ROWCOUNT=0)
107: then
108: FND_MESSAGE.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');
109: FND_MSG_PUB.ADD;
110: end if;
111:
112: END;
113:

Line 127: FND_MSG_PUB.ADD;

123:
124: if (sql%ROWCOUNT=0)
125: then
126: FND_MESSAGE.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');
127: FND_MSG_PUB.ADD;
128: end if;
129: END;
130:
131:

Line 410: FND_MSG_PUB.ADD;

406: IF p_x_mr_visit_type_rec.mr_visit_type is null
407: OR p_x_mr_visit_type_rec.mr_visit_type=FND_API.G_MISS_CHAR
408: THEN
409: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MRVSTTYPE_CODE_NULL');
410: FND_MSG_PUB.ADD;
411: ELSE
412: OPEN get_lookup_meaning_to_code('AHL_PLANNING_VISIT_TYPE',p_x_mr_visit_type_rec.mr_visit_type);
413: FETCH get_lookup_meaning_to_code INTO p_x_mr_visit_type_rec.mr_visit_type_CODE;
414:

Line 419: FND_MSG_PUB.ADD;

415: IF get_lookup_meaning_to_code%NOTFOUND
416: THEN
417: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MRVSTYPE_CODE_INVALID');
418: FND_MESSAGE.SET_TOKEN('FIELD',p_x_mr_visit_type_rec.mr_visit_type,false);
419: FND_MSG_PUB.ADD;
420: END IF;
421: CLOSE get_lookup_meaning_to_code;
422: END IF;
423: END;

Line 511: FND_MSG_PUB.ADD;

507: -- Check Profile value
508: IF (G_APPLN_USAGE IS NULL)
509: THEN
510: FND_MESSAGE.SET_NAME('AHL','AHL_COM_APP_PRFL_UNDEF');
511: FND_MSG_PUB.ADD;
512: RETURN;
513: ELSIF (G_APPLN_USAGE = 'PM')
514: THEN
515: FND_MESSAGE.set_name( 'AHL', 'AHL_FMP_PM_MRV_PM_INSTALL' );

Line 516: FND_MSG_PUB.add;

512: RETURN;
513: ELSIF (G_APPLN_USAGE = 'PM')
514: THEN
515: FND_MESSAGE.set_name( 'AHL', 'AHL_FMP_PM_MRV_PM_INSTALL' );
516: FND_MSG_PUB.add;
517: x_return_status := FND_API.G_RET_STS_ERROR;
518: RETURN;
519: END IF;
520:

Line 525: FND_MSG_PUB.ADD;

521: IF (p_mr_visit_type_rec.mr_visit_type_ID IS NULL OR p_mr_visit_type_rec.mr_visit_type_ID=FND_API.G_MISS_NUM)
522: AND p_mr_visit_type_rec.dml_operation<>'C'
523: THEN
524: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_VSTYPE_ID_NULL');
525: FND_MSG_PUB.ADD;
526: END IF;
527:
528: IF (p_mr_visit_type_rec.mr_visit_type_ID IS NOT NULL and p_mr_visit_type_rec.mr_visit_type_ID<>FND_API.G_MISS_NUM)
529: AND p_mr_visit_type_rec.dml_operation<>'C'

Line 537: FND_MSG_PUB.ADD;

533:
534: IF GET_VISIT_ID%NOTFOUND
535: THEN
536: FND_MESSAGE.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');
537: FND_MSG_PUB.ADD;
538: END IF;
539: CLOSE get_visit_id;
540: END IF;
541:

Line 546: FND_MSG_PUB.ADD;

542: IF (p_mr_visit_type_rec.OBJECT_VERSION_NUMBER IS NULL OR p_mr_visit_type_rec.OBJECT_vERSION_NUMBER=FND_API.G_MISS_num)
543: and p_mr_visit_type_rec.dml_operation<>'C'
544: THEN
545: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MRA_OBJ_VERSION_NULL');
546: FND_MSG_PUB.ADD;
547: END IF;
548:
549: IF p_mr_visit_type_rec.MR_HEADER_ID IS NULL OR p_mr_visit_type_rec.MR_HEADER_ID=FND_API.G_MISS_NUM
550: THEN

Line 552: FND_MSG_PUB.ADD;

548:
549: IF p_mr_visit_type_rec.MR_HEADER_ID IS NULL OR p_mr_visit_type_rec.MR_HEADER_ID=FND_API.G_MISS_NUM
550: THEN
551: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_HEADER_ID_NULL');
552: FND_MSG_PUB.ADD;
553: ELSE
554: OPEN GetMrDet(p_mr_visit_type_rec.MR_HEADER_ID);
555:
556: FETCH GetMrDet into l_mr_rec;

Line 561: FND_MSG_PUB.ADD;

557:
558: IF GetMrDet%NOTFOUND
559: THEN
560: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_EDIT_STATUS_INVALID');
561: FND_MSG_PUB.ADD;
562: -- pdoki Commented for Auto Visit Forecasting Enhancement, Start.
563: /* ELSE
564: IF l_mr_rec.IMPLEMENT_STATUS_CODE<>'OPTIONAL_DO_NOT_IMPLEMENT'
565: AND p_mr_visit_type_rec.dml_operation<>'D'

Line 568: FND_MSG_PUB.ADD;

564: IF l_mr_rec.IMPLEMENT_STATUS_CODE<>'OPTIONAL_DO_NOT_IMPLEMENT'
565: AND p_mr_visit_type_rec.dml_operation<>'D'
566: THEN
567: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_NOTOPT_DONOT_IMPL');
568: FND_MSG_PUB.ADD;
569: END IF;
570: NULL; */
571: -- pdoki Commented for Auto Visit Forecasting Enhancement, End.
572: END IF;

Line 588: FND_MSG_PUB.ADD;

584: IF p_mr_visit_type_rec.dml_operation='C'
585: THEN
586: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MRVSTYOE_CODE_DUP');
587: FND_MESSAGE.SET_TOKEN('RECORD',NVL(p_mr_visit_type_rec.mr_visit_type,'')||'-''-',false);
588: FND_MSG_PUB.ADD;
589: ELSIF p_mr_visit_type_rec.dml_operation='U'
590: and l_act_Rec.mr_visit_type_id<>p_mr_visit_type_rec.mr_visit_type_ID
591: THEN
592: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MRVSTYPE_CODE_DUP');

Line 594: FND_MSG_PUB.ADD;

590: and l_act_Rec.mr_visit_type_id<>p_mr_visit_type_rec.mr_visit_type_ID
591: THEN
592: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MRVSTYPE_CODE_DUP');
593: FND_MESSAGE.SET_TOKEN('RECORD',p_mr_visit_type_rec.mr_visit_type,false);
594: FND_MSG_PUB.ADD;
595: END IF;
596: END IF;
597: CLOSE CHECK_DUP_VISIT_CODE;
598:

Line 606: FND_MSG_PUB.ADD;

602: IF (check_mo_proc%FOUND)
603: THEN
604: FND_MESSAGE.SET_NAME('AHL', 'AHL_FMP_MRV_MO_PROC');
605: -- Cannot associate visit types to a Maintenance Requirement of (M) and (0) procedure program type.
606: FND_MSG_PUB.ADD;
607: END IF;
608: -- Tamal [MEL/CDL] -- End changes
609:
610: -- pdoki added for Auto Visit Forecasting Enhancement, Start.

Line 618: FND_MSG_PUB.ADD;

614: IF (Check_Visit_Type%FOUND)
615: THEN
616: FND_MESSAGE.SET_NAME('AHL', 'AHL_FMP_CANNOT_ASSIGN_VST_TYPE');
617: -- Cannot associate more than one visit type to a Planned Maintenance Requirement.
618: FND_MSG_PUB.ADD;
619: END IF;
620: CLOSE Check_Visit_Type;
621: END IF;
622: -- pdoki added for Auto Visit Forecasting Enhancement, End.

Line 631: FND_MSG_PUB.ADD;

627: OPEN Check_MR_Org(l_mr_title);
628: FETCH Check_MR_Org INTO l_dummy_char;
629: IF (Check_MR_Org%NOTFOUND) THEN
630: FND_MESSAGE.SET_NAME('AHL', 'AHL_FMP_NO_MAINT_ORG');
631: FND_MSG_PUB.ADD;
632: END IF;
633: CLOSE Check_MR_Org;
634: END IF;
635: CLOSE Get_Plan_MR_title;

Line 678: FND_MSG_PUB.initialize;

674:
675: -- Initialize message list if p_init_msg_list is set to TRUE.
676:
677: IF FND_API.to_boolean(p_init_msg_list) THEN
678: FND_MSG_PUB.initialize;
679: END IF;
680:
681: -- Initialize API return status to success
682:

Line 781: x_msg_count := FND_MSG_PUB.count_msg;

777: END IF;
778:
779: END LOOP;
780:
781: x_msg_count := FND_MSG_PUB.count_msg;
782: IF x_msg_count > 0 THEN
783:
784: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
785: THEN

Line 810: x_msg_count := FND_MSG_PUB.count_msg;

806: );
807:
808: --END IF;
809:
810: x_msg_count := FND_MSG_PUB.count_msg;
811:
812: IF p_x_mr_visit_type_tbl(i).DML_OPERATION='D' AND x_msg_count <1
813: THEN
814:

Line 825: x_msg_count := FND_MSG_PUB.count_msg;

821: INSERT_ROW (p_x_mr_visit_type_tbl(i) );
822: END IF;
823: END LOOP;
824:
825: x_msg_count := FND_MSG_PUB.count_msg;
826: IF x_msg_count > 0 THEN
827: RAISE FND_API.G_EXC_ERROR;
828: END IF;
829:

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

836: EXCEPTION
837: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
838: ROLLBACK TO process_mr_visit_types_pvt;
839: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
840: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
841: p_count => x_msg_count,
842: p_data => x_msg_data);
843:
844: WHEN FND_API.G_EXC_ERROR THEN

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

843:
844: WHEN FND_API.G_EXC_ERROR THEN
845: ROLLBACK TO process_mr_visit_types_pvt;
846: X_return_status := FND_API.G_RET_STS_ERROR;
847: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
848: p_count => x_msg_count,
849: p_data => X_msg_data);
850: WHEN OTHERS THEN
851: ROLLBACK TO process_mr_visit_types_pvt;

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

849: p_data => X_msg_data);
850: WHEN OTHERS THEN
851: ROLLBACK TO process_mr_visit_types_pvt;
852: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
853: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
854: THEN
855: fnd_msg_pub.add_exc_msg(p_pkg_name =>G_PKG_NAME,
856: p_procedure_name =>l_api_name,
857: p_error_text =>SUBSTR(SQLERRM,1,240)

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

851: ROLLBACK TO process_mr_visit_types_pvt;
852: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
853: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
854: THEN
855: fnd_msg_pub.add_exc_msg(p_pkg_name =>G_PKG_NAME,
856: p_procedure_name =>l_api_name,
857: p_error_text =>SUBSTR(SQLERRM,1,240)
858: );
859: END IF;

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

856: p_procedure_name =>l_api_name,
857: p_error_text =>SUBSTR(SQLERRM,1,240)
858: );
859: END IF;
860: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
861: p_count => x_msg_count,
862: p_data => X_msg_data);
863: END;
864: END AHL_FMP_MR_VISIT_TYPES_PVT;