DBA Data[Home] [Help]

APPS.AHL_FMP_MR_VISIT_TYPES_PVT dependencies on FND_MESSAGE

Line 108: FND_MESSAGE.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');

104: WHERE MR_VISIT_TYPE_ID=P_MR_VISIT_TYPE_REC.mr_visit_type_ID
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;

Line 126: FND_MESSAGE.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');

122: and object_version_number=p_mr_visit_type_rec .object_version_number;
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:

Line 409: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MRVSTTYPE_CODE_NULL');

405:
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;

Line 417: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MRVSTYPE_CODE_INVALID');

413: FETCH get_lookup_meaning_to_code INTO p_x_mr_visit_type_rec.mr_visit_type_CODE;
414:
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;

Line 418: FND_MESSAGE.SET_TOKEN('FIELD',p_x_mr_visit_type_rec.mr_visit_type,false);

414:
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;

Line 478: FND_MESSAGE.SET_NAME('AHL','AHL_COM_APP_PRFL_UNDEF');

474:
475: -- Check Profile value
476: IF (G_APPLN_USAGE IS NULL)
477: THEN
478: FND_MESSAGE.SET_NAME('AHL','AHL_COM_APP_PRFL_UNDEF');
479: FND_MSG_PUB.ADD;
480: RETURN;
481: ELSIF (G_APPLN_USAGE = 'PM')
482: THEN

Line 483: FND_MESSAGE.set_name( 'AHL', 'AHL_FMP_PM_MRV_PM_INSTALL' );

479: FND_MSG_PUB.ADD;
480: RETURN;
481: ELSIF (G_APPLN_USAGE = 'PM')
482: THEN
483: FND_MESSAGE.set_name( 'AHL', 'AHL_FMP_PM_MRV_PM_INSTALL' );
484: FND_MSG_PUB.add;
485: x_return_status := FND_API.G_RET_STS_ERROR;
486: RETURN;
487: END IF;

Line 492: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_VSTYPE_ID_NULL');

488:
489: 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)
490: AND p_mr_visit_type_rec.dml_operation<>'C'
491: THEN
492: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_VSTYPE_ID_NULL');
493: FND_MSG_PUB.ADD;
494: END IF;
495:
496: 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)

Line 504: FND_MESSAGE.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');

500: FETCH get_visit_id INTO l_mr_visit_type_id;
501:
502: IF GET_VISIT_ID%NOTFOUND
503: THEN
504: FND_MESSAGE.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');
505: FND_MSG_PUB.ADD;
506: END IF;
507: CLOSE get_visit_id;
508: END IF;

Line 513: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MRA_OBJ_VERSION_NULL');

509:
510: 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)
511: and p_mr_visit_type_rec.dml_operation<>'C'
512: THEN
513: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MRA_OBJ_VERSION_NULL');
514: FND_MSG_PUB.ADD;
515: END IF;
516:
517: 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

Line 519: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_HEADER_ID_NULL');

515: END IF;
516:
517: 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
518: THEN
519: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_HEADER_ID_NULL');
520: FND_MSG_PUB.ADD;
521: ELSE
522: OPEN GetMrDet(p_mr_visit_type_rec.MR_HEADER_ID);
523:

Line 528: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_EDIT_STATUS_INVALID');

524: FETCH GetMrDet into l_mr_rec;
525:
526: IF GetMrDet%NOTFOUND
527: THEN
528: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_EDIT_STATUS_INVALID');
529: FND_MSG_PUB.ADD;
530: ELSE
531: IF l_mr_rec.IMPLEMENT_STATUS_CODE<>'OPTIONAL_DO_NOT_IMPLEMENT'
532: AND p_mr_visit_type_rec.dml_operation<>'D'

Line 534: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_NOTOPT_DONOT_IMPL');

530: ELSE
531: IF l_mr_rec.IMPLEMENT_STATUS_CODE<>'OPTIONAL_DO_NOT_IMPLEMENT'
532: AND p_mr_visit_type_rec.dml_operation<>'D'
533: THEN
534: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_NOTOPT_DONOT_IMPL');
535: FND_MSG_PUB.ADD;
536: END IF;
537: NULL;
538: END IF;

Line 552: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MRVSTYOE_CODE_DUP');

548: IF CHECK_DUP_VISIT_CODE%FOUND
549: THEN
550: IF p_mr_visit_type_rec.dml_operation='C'
551: THEN
552: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MRVSTYOE_CODE_DUP');
553: FND_MESSAGE.SET_TOKEN('RECORD',NVL(p_mr_visit_type_rec.mr_visit_type,'')||'-''-',false);
554: FND_MSG_PUB.ADD;
555: ELSIF p_mr_visit_type_rec.dml_operation='U'
556: and l_act_Rec.mr_visit_type_id<>p_mr_visit_type_rec.mr_visit_type_ID

Line 553: FND_MESSAGE.SET_TOKEN('RECORD',NVL(p_mr_visit_type_rec.mr_visit_type,'')||'-''-',false);

549: THEN
550: IF p_mr_visit_type_rec.dml_operation='C'
551: THEN
552: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MRVSTYOE_CODE_DUP');
553: FND_MESSAGE.SET_TOKEN('RECORD',NVL(p_mr_visit_type_rec.mr_visit_type,'')||'-''-',false);
554: FND_MSG_PUB.ADD;
555: ELSIF p_mr_visit_type_rec.dml_operation='U'
556: and l_act_Rec.mr_visit_type_id<>p_mr_visit_type_rec.mr_visit_type_ID
557: THEN

Line 558: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MRVSTYPE_CODE_DUP');

554: FND_MSG_PUB.ADD;
555: ELSIF p_mr_visit_type_rec.dml_operation='U'
556: and l_act_Rec.mr_visit_type_id<>p_mr_visit_type_rec.mr_visit_type_ID
557: THEN
558: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MRVSTYPE_CODE_DUP');
559: FND_MESSAGE.SET_TOKEN('RECORD',p_mr_visit_type_rec.mr_visit_type,false);
560: FND_MSG_PUB.ADD;
561: END IF;
562: END IF;

Line 559: FND_MESSAGE.SET_TOKEN('RECORD',p_mr_visit_type_rec.mr_visit_type,false);

555: ELSIF p_mr_visit_type_rec.dml_operation='U'
556: and l_act_Rec.mr_visit_type_id<>p_mr_visit_type_rec.mr_visit_type_ID
557: THEN
558: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MRVSTYPE_CODE_DUP');
559: FND_MESSAGE.SET_TOKEN('RECORD',p_mr_visit_type_rec.mr_visit_type,false);
560: FND_MSG_PUB.ADD;
561: END IF;
562: END IF;
563: CLOSE CHECK_DUP_VISIT_CODE;

Line 570: FND_MESSAGE.SET_NAME('AHL', 'AHL_FMP_MRV_MO_PROC');

566: OPEN check_mo_proc(p_mr_visit_type_rec.MR_HEADER_ID);
567: FETCH check_mo_proc INTO l_dummy_char;
568: IF (check_mo_proc%FOUND)
569: THEN
570: FND_MESSAGE.SET_NAME('AHL', 'AHL_FMP_MRV_MO_PROC');
571: -- Cannot associate visit types to a Maintenance Requirement of (M) and (0) procedure program type.
572: FND_MSG_PUB.ADD;
573: END IF;
574: -- Tamal [MEL/CDL] -- End changes