DBA Data[Home] [Help]

APPS.AHL_APPR_SPACE_UNAVL_PVT dependencies on FND_MSG_PUB

Line 267: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

263: x_space_restriction_rec := p_space_restriction_rec;
264: OPEN c_space_restriction_rec;
265: FETCH c_space_restriction_rec INTO l_space_restriction_rec;
266: IF c_space_restriction_rec%NOTFOUND THEN
267: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
268: FND_MESSAGE.set_name('AHL', 'AHL_APPR_RECORD_NOT_FOUND');
269: FND_MSG_PUB.add;
270: RAISE Fnd_Api.G_EXC_ERROR;
271: END IF;

Line 269: FND_MSG_PUB.add;

265: FETCH c_space_restriction_rec INTO l_space_restriction_rec;
266: IF c_space_restriction_rec%NOTFOUND THEN
267: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
268: FND_MESSAGE.set_name('AHL', 'AHL_APPR_RECORD_NOT_FOUND');
269: FND_MSG_PUB.add;
270: RAISE Fnd_Api.G_EXC_ERROR;
271: END IF;
272: END IF;
273: CLOSE c_space_restriction_rec;

Line 278: Fnd_Msg_Pub.ADD;

274: --Check for object version number
275: IF (l_space_restriction_rec.object_version_number <> p_space_restriction_rec.object_version_number)
276: THEN
277: Fnd_Message.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');
278: Fnd_Msg_Pub.ADD;
279: RAISE Fnd_Api.G_EXC_ERROR;
280: END IF;
281: -- SPACE ID
282: IF p_space_restriction_rec.space_id <> FND_API.g_miss_num THEN

Line 394: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)

390: p_space_restriction_rec.ORGANIZATION_ID = FND_API.G_MISS_NUM)
391: --
392: THEN
393: -- missing required fields
394: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
395: THEN
396: Fnd_Message.set_name('AHL', 'AHL_APPR_ORG_REQUIRED');
397: Fnd_Msg_Pub.ADD;
398: END IF;

Line 397: Fnd_Msg_Pub.ADD;

393: -- missing required fields
394: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
395: THEN
396: Fnd_Message.set_name('AHL', 'AHL_APPR_ORG_REQUIRED');
397: Fnd_Msg_Pub.ADD;
398: END IF;
399: x_return_status := Fnd_Api.G_RET_STS_ERROR;
400: END IF;
401: --

Line 408: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)

404: p_space_restriction_rec.DEPARTMENT_ID = FND_API.G_MISS_NUM)
405: --
406: THEN
407: -- missing required fields
408: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
409: THEN
410: Fnd_Message.set_name('AHL', 'AHL_APPR_DEPT_REQUIRED');
411: Fnd_Msg_Pub.ADD;
412: END IF;

Line 411: Fnd_Msg_Pub.ADD;

407: -- missing required fields
408: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
409: THEN
410: Fnd_Message.set_name('AHL', 'AHL_APPR_DEPT_REQUIRED');
411: Fnd_Msg_Pub.ADD;
412: END IF;
413: x_return_status := Fnd_Api.G_RET_STS_ERROR;
414: END IF;
415: --

Line 422: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)

418: p_space_restriction_rec.SPACE_ID = FND_API.G_MISS_NUM)
419: --
420: THEN
421: -- missing required fields
422: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
423: THEN
424: Fnd_Message.set_name('AHL', 'AHL_APPR_SPACE_ID_NOT_EXIST');
425: Fnd_Msg_Pub.ADD;
426: END IF;

Line 425: Fnd_Msg_Pub.ADD;

421: -- missing required fields
422: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
423: THEN
424: Fnd_Message.set_name('AHL', 'AHL_APPR_SPACE_ID_NOT_EXIST');
425: Fnd_Msg_Pub.ADD;
426: END IF;
427: x_return_status := Fnd_Api.G_RET_STS_ERROR;
428: END IF;
429: -- START_DATE

Line 434: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)

430: IF (p_space_restriction_rec.START_DATE = Fnd_Api.G_MISS_DATE OR
431: p_space_restriction_rec.START_DATE IS NULL)
432: THEN
433: -- missing required fields
434: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
435: THEN
436: Fnd_Message.set_name('AHL', 'AHL_APPR_START_DATE_NOT_EXIST');
437: Fnd_Msg_Pub.ADD;
438: END IF;

Line 437: Fnd_Msg_Pub.ADD;

433: -- missing required fields
434: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
435: THEN
436: Fnd_Message.set_name('AHL', 'AHL_APPR_START_DATE_NOT_EXIST');
437: Fnd_Msg_Pub.ADD;
438: END IF;
439: x_return_status := Fnd_Api.G_RET_STS_ERROR;
440: END IF;
441: --END DATE

Line 446: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)

442: IF (p_space_restriction_rec.END_DATE = Fnd_Api.G_MISS_DATE OR
443: p_space_restriction_rec.END_DATE IS NULL)
444: THEN
445: -- missing required fields
446: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
447: THEN
448: Fnd_Message.set_name('AHL', 'AHL_APPR_END_DATE_NOT_EXIST');
449: Fnd_Msg_Pub.ADD;
450: END IF;

Line 449: Fnd_Msg_Pub.ADD;

445: -- missing required fields
446: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
447: THEN
448: Fnd_Message.set_name('AHL', 'AHL_APPR_END_DATE_NOT_EXIST');
449: Fnd_Msg_Pub.ADD;
450: END IF;
451: x_return_status := Fnd_Api.G_RET_STS_ERROR;
452: END IF;
453:

Line 466: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)

462: p_pk_name => l_pk_name,
463: p_pk_value => l_pk_value
464: ) = Fnd_Api.G_FALSE
465: THEN
466: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
467: THEN
468: Fnd_Message.set_name('AHL', 'AHL_APPR_INVALID_SPACE_ID');
469: Fnd_Msg_Pub.ADD;
470: END IF;

Line 469: Fnd_Msg_Pub.ADD;

465: THEN
466: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
467: THEN
468: Fnd_Message.set_name('AHL', 'AHL_APPR_INVALID_SPACE_ID');
469: Fnd_Msg_Pub.ADD;
470: END IF;
471: x_return_status := Fnd_Api.G_RET_STS_ERROR;
472: END IF; -- check_fk_exists
473: END IF;

Line 527: Fnd_Msg_Pub.ADD;

523: THEN
524: IF p_space_restriction_rec.START_DATE < TRUNC(SYSDATE)
525: THEN
526: Fnd_Message.set_name('AHL', 'AHL_APPR_INVALID_START_DATE');
527: Fnd_Msg_Pub.ADD;
528: x_return_status := Fnd_Api.G_RET_STS_ERROR;
529: END IF;
530: END IF;
531:

Line 539: Fnd_Msg_Pub.ADD;

535: THEN
536: IF( p_space_restriction_rec.END_DATE < p_space_restriction_rec.START_DATE )
537: THEN
538: Fnd_Message.set_name('AHL', 'AHL_APPR_INV_START_END_DATE');
539: Fnd_Msg_Pub.ADD;
540: x_return_status := Fnd_Api.G_RET_STS_ERROR;
541: END IF;
542: END IF;
543:

Line 548: Fnd_Msg_Pub.ADD;

544: --
545: IF (p_space_restriction_rec.START_DATE IS NULL AND
546: p_space_restriction_rec.END_DATE IS NOT NULL) THEN
547: Fnd_Message.set_name('AHL', 'AHL_APPR_INVALID_START_DATE');
548: Fnd_Msg_Pub.ADD;
549: END IF;
550: --
551: ELSE
552: OPEN space_restirct_date_cur(p_space_restriction_rec.space_unavailability_id);

Line 561: Fnd_Msg_Pub.ADD;

557: THEN
558: IF p_space_restriction_rec.START_DATE < TRUNC(SYSDATE)
559: THEN
560: Fnd_Message.set_name('AHL', 'AHL_APPR_INVALID_START_DATE');
561: Fnd_Msg_Pub.ADD;
562: END IF;
563: END IF;
564: --
565: IF ((p_space_restriction_rec.END_DATE IS NOT NULL AND

Line 573: Fnd_Msg_Pub.ADD;

569: THEN
570: IF( p_space_restriction_rec.END_DATE < p_space_restriction_rec.START_DATE )
571: THEN
572: Fnd_Message.set_name('AHL', 'AHL_APPR_INV_START_END_DATE');
573: Fnd_Msg_Pub.ADD;
574: x_return_status := Fnd_Api.G_RET_STS_ERROR;
575: END IF;
576: END IF;
577: --

Line 586: Fnd_Msg_Pub.ADD;

582: THEN
583: IF( p_space_restriction_rec.END_DATE < p_space_restriction_rec.START_DATE )
584: THEN
585: Fnd_Message.set_name('AHL', 'AHL_APPR_INV_START_END_DATE');
586: Fnd_Msg_Pub.ADD;
587: x_return_status := Fnd_Api.G_RET_STS_ERROR;
588: END IF;
589: END IF;
590: --

Line 599: Fnd_Msg_Pub.ADD;

595: THEN
596: IF( p_space_restriction_rec.END_DATE < p_space_restriction_rec.START_DATE )
597: THEN
598: Fnd_Message.set_name('AHL', 'AHL_APPR_INV_START_END_DATE');
599: Fnd_Msg_Pub.ADD;
600: x_return_status := Fnd_Api.G_RET_STS_ERROR;
601: END IF;
602: END IF;
603: --

Line 613: Fnd_Msg_Pub.ADD;

609: THEN
610: IF( p_space_restriction_rec.END_DATE < p_space_restriction_rec.START_DATE )
611: THEN
612: Fnd_Message.set_name('AHL', 'AHL_APPR_INV_START_END_DATE');
613: Fnd_Msg_Pub.ADD;
614: x_return_status := Fnd_Api.G_RET_STS_ERROR;
615: END IF;
616: END IF;
617:

Line 628: Fnd_Msg_Pub.ADD;

624: p_space_restriction_rec.END_DATE <> l_end_date ))
625: THEN
626: IF p_space_restriction_rec.END_DATE < trunc(sysdate) THEN
627: Fnd_Message.set_name('AHL', 'AHL_APPR_INVALID_END_DATE');
628: Fnd_Msg_Pub.ADD;
629: x_return_status := Fnd_Api.G_RET_STS_ERROR;
630: END IF;
631: END IF; */
632: --

Line 638: Fnd_Msg_Pub.ADD;

634: p_space_restriction_rec.END_DATE <> l_end_date )
635: THEN
636: IF p_space_restriction_rec.END_DATE < trunc(sysdate) THEN
637: Fnd_Message.set_name('AHL', 'AHL_APPR_INVALID_END_DATE');
638: Fnd_Msg_Pub.ADD;
639: x_return_status := Fnd_Api.G_RET_STS_ERROR;
640: END IF;
641: END IF;
642:

Line 657: Fnd_Msg_Pub.ADD;

653: IF (l_start_date_time >= p_space_restriction_rec.START_DATE
654: AND l_start_date_time <= p_space_restriction_rec.END_DATE)
655: THEN
656: Fnd_Message.set_name('AHL', 'AHL_APPR_SPACE_VISITS_EXIST');
657: Fnd_Msg_Pub.ADD;
658: END IF;
659: END IF;
660: END LOOP;
661: CLOSE space_visit_cur;

Line 704: Fnd_Msg_Pub.initialize;

700: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
701: END IF;
702: -- Initialize message list if p_init_msg_list is set to TRUE.
703: IF Fnd_Api.to_Boolean( p_init_msg_list ) THEN
704: Fnd_Msg_Pub.initialize;
705: END IF;
706: -- Initialize API return status to success
707: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
708: --

Line 748: Fnd_Msg_Pub.count_and_get(

744: -- END of API body.
745: --
746: -------------------- finish --------------------------
747:
748: Fnd_Msg_Pub.count_and_get(
749: p_encoded => Fnd_Api.g_false,
750: p_count => x_msg_count,
751: p_data => x_msg_data);
752: EXCEPTION

Line 755: Fnd_Msg_Pub.Count_AND_Get

751: p_data => x_msg_data);
752: EXCEPTION
753: WHEN Fnd_Api.G_EXC_ERROR THEN
754: x_return_status := Fnd_Api.G_RET_STS_ERROR ;
755: Fnd_Msg_Pub.Count_AND_Get
756: ( p_count => x_msg_count,
757: p_data => x_msg_data,
758: p_encoded => Fnd_Api.G_FALSE
759: );

Line 762: Fnd_Msg_Pub.Count_AND_Get

758: p_encoded => Fnd_Api.G_FALSE
759: );
760: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
761: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
762: Fnd_Msg_Pub.Count_AND_Get
763: ( p_count => x_msg_count,
764: p_data => x_msg_data,
765: p_encoded => Fnd_Api.G_FALSE
766: );

Line 769: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )

765: p_encoded => Fnd_Api.G_FALSE
766: );
767: WHEN OTHERS THEN
768: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
769: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
770: THEN
771: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
772: END IF;
773: Fnd_Msg_Pub.Count_AND_Get

Line 771: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);

767: WHEN OTHERS THEN
768: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
769: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
770: THEN
771: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
772: END IF;
773: Fnd_Msg_Pub.Count_AND_Get
774: ( p_count => x_msg_count,
775: p_data => x_msg_data,

Line 773: Fnd_Msg_Pub.Count_AND_Get

769: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
770: THEN
771: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
772: END IF;
773: Fnd_Msg_Pub.Count_AND_Get
774: ( p_count => x_msg_count,
775: p_data => x_msg_data,
776: p_encoded => Fnd_Api.G_FALSE
777: );

Line 860: FND_MSG_PUB.initialize;

856: END IF;
857: -- Standard call to check for call compatibility.
858: IF FND_API.to_boolean(p_init_msg_list)
859: THEN
860: FND_MSG_PUB.initialize;
861: END IF;
862: -- Initialize API return status to success
863: x_return_status := FND_API.G_RET_STS_SUCCESS;
864: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 897: Fnd_Msg_Pub.ADD;

893: IF NVL(l_return_status,'x') <> 'S'
894: THEN
895: Fnd_Message.SET_NAME('AHL','AHL_APPR_ORG_NT_EXISTS');
896: Fnd_Message.SET_TOKEN('ORGID',p_x_space_restriction_rec.org_name);
897: Fnd_Msg_Pub.ADD;
898: END IF;
899: END IF;
900: --Assign the returned value
901: p_x_space_restriction_rec.organization_id := l_organization_id;

Line 926: Fnd_Msg_Pub.ADD;

922: IF NVL(l_return_status,'x') <> 'S'
923: THEN
924: Fnd_Message.SET_NAME('AHL','AHL_APPR_DPT_NOT_EXISTS');
925: Fnd_Message.SET_TOKEN('DEPTID',p_x_space_restriction_rec.dept_description);
926: Fnd_Msg_Pub.ADD;
927: END IF;
928: END IF;
929: --Assign the returned value
930: p_x_space_restriction_rec.department_id := l_department_id;

Line 952: Fnd_Msg_Pub.ADD;

948: IF NVL(l_return_status,'x') <> 'S'
949: THEN
950: Fnd_Message.SET_NAME('AHL','AHL_APPR_SPACE_NOT_EXISTS');
951: Fnd_Message.SET_TOKEN('SPACEID',p_x_space_restriction_rec.space_name);
952: Fnd_Msg_Pub.ADD;
953: END IF;
954: END IF;
955: --Assign the returned value
956: p_x_space_restriction_rec.space_id := l_space_id;

Line 963: l_msg_count := Fnd_Msg_Pub.count_msg;

959: AHL_DEBUG_PUB.debug( 'Space id'||p_x_space_restriction_rec.space_id);
960: END IF;
961:
962: --Standard check to count messages
963: l_msg_count := Fnd_Msg_Pub.count_msg;
964:
965: IF l_msg_count > 0 THEN
966: X_msg_count := l_msg_count;
967: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 1007: Fnd_Msg_Pub.ADD;

1003: -- l_dummy would be populated with '1', otherwise,
1004: -- it receives NULL.
1005: IF l_dummy IS NOT NULL THEN
1006: Fnd_Message.SET_NAME('AHL','AHL_APPR_SEQUENCE_NOT_EXISTS');
1007: Fnd_Msg_Pub.ADD;
1008: END IF;
1009:
1010: -- For optional fields
1011: IF p_x_space_restriction_rec.description = FND_API.G_MISS_CHAR

Line 1140: Fnd_Msg_Pub.ADD;

1136: CLOSE check_duplicate_cur;
1137: IF l_dup_id IS NOT NULL
1138: THEN
1139: Fnd_Message.SET_NAME('AHL','AHL_APPR_RECORD_EXISTS');
1140: Fnd_Msg_Pub.ADD;
1141: END IF;
1142:
1143: --Standard check to count messages
1144: l_msg_count := Fnd_Msg_Pub.count_msg;

Line 1144: l_msg_count := Fnd_Msg_Pub.count_msg;

1140: Fnd_Msg_Pub.ADD;
1141: END IF;
1142:
1143: --Standard check to count messages
1144: l_msg_count := Fnd_Msg_Pub.count_msg;
1145:
1146: IF l_msg_count > 0 THEN
1147: X_msg_count := l_msg_count;
1148: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 1187: l_msg_count := Fnd_Msg_Pub.count_msg;

1183:
1184: p_x_space_restriction_rec.space_unavailability_id := l_space_unavaialability_id;
1185: ---------------------------End of Body---------------------------------------
1186: --Standard check to count messages
1187: l_msg_count := Fnd_Msg_Pub.count_msg;
1188:
1189: IF l_msg_count > 0 THEN
1190: X_msg_count := l_msg_count;
1191: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

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

1206: EXCEPTION
1207: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1208: ROLLBACK TO create_space_restriction;
1209: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1210: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1211: p_count => x_msg_count,
1212: p_data => x_msg_data);
1213: IF G_DEBUG='Y' THEN
1214: AHL_DEBUG_PUB.log_app_messages (

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

1219: END IF;
1220: WHEN FND_API.G_EXC_ERROR THEN
1221: ROLLBACK TO create_space_restriction;
1222: X_return_status := FND_API.G_RET_STS_ERROR;
1223: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1224: p_count => x_msg_count,
1225: p_data => X_msg_data);
1226: IF G_DEBUG='Y' THEN
1227: -- Debug info.

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

1234:
1235: WHEN OTHERS THEN
1236: ROLLBACK TO create_space_restriction;
1237: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1238: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1239: THEN
1240: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_APPR_SPACE_UNAVL_PVT',
1241: p_procedure_name => 'CREATE_SPACE_RESTRICTION',
1242: p_error_text => SUBSTR(SQLERRM,1,240));

Line 1240: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_APPR_SPACE_UNAVL_PVT',

1236: ROLLBACK TO create_space_restriction;
1237: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1238: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1239: THEN
1240: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_APPR_SPACE_UNAVL_PVT',
1241: p_procedure_name => 'CREATE_SPACE_RESTRICTION',
1242: p_error_text => SUBSTR(SQLERRM,1,240));
1243: END IF;
1244: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

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

1240: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_APPR_SPACE_UNAVL_PVT',
1241: p_procedure_name => 'CREATE_SPACE_RESTRICTION',
1242: p_error_text => SUBSTR(SQLERRM,1,240));
1243: END IF;
1244: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1245: p_count => x_msg_count,
1246: p_data => X_msg_data);
1247: IF G_DEBUG='Y' THEN
1248: -- Debug info.

Line 1341: FND_MSG_PUB.initialize;

1337: END IF;
1338: -- Standard call to check for call compatibility.
1339: IF FND_API.to_boolean(p_init_msg_list)
1340: THEN
1341: FND_MSG_PUB.initialize;
1342: END IF;
1343: -- Initialize API return status to success
1344: x_return_status := FND_API.G_RET_STS_SUCCESS;
1345: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 1380: Fnd_Msg_Pub.ADD;

1376: IF NVL(l_return_status,'x') <> 'S'
1377: THEN
1378: Fnd_Message.SET_NAME('AHL','AHL_APPR_SPACE_NOT_EXISTS');
1379: Fnd_Message.SET_TOKEN('ORGID',p_space_restriction_rec.space_name);
1380: Fnd_Msg_Pub.ADD;
1381: END IF;
1382: END IF;
1383: -- Get organization , department id
1384: OPEN get_space_detail_cur (l_space_id);

Line 1427: Fnd_Msg_Pub.ADD;

1423: --
1424: IF (p_space_restriction_rec.start_date <> l_start_date OR
1425: p_space_restriction_rec.end_date <> l_end_date ) THEN
1426: Fnd_Message.SET_NAME('AHL','AHL_APPR_RECORD_EXISTS');
1427: Fnd_Msg_Pub.ADD;
1428: END IF;
1429: END IF;
1430: --Standard check to count messages
1431: l_msg_count := Fnd_Msg_Pub.count_msg;

Line 1431: l_msg_count := Fnd_Msg_Pub.count_msg;

1427: Fnd_Msg_Pub.ADD;
1428: END IF;
1429: END IF;
1430: --Standard check to count messages
1431: l_msg_count := Fnd_Msg_Pub.count_msg;
1432:
1433: IF l_msg_count > 0 THEN
1434: X_msg_count := l_msg_count;
1435: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 1473: l_msg_count := Fnd_Msg_Pub.count_msg;

1469:
1470:
1471: ---------------------------End of Body---------------------------------------
1472: --Standard check to count messages
1473: l_msg_count := Fnd_Msg_Pub.count_msg;
1474:
1475: IF l_msg_count > 0 THEN
1476: X_msg_count := l_msg_count;
1477: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

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

1492: EXCEPTION
1493: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1494: ROLLBACK TO update_space_restriction;
1495: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1496: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1497: p_count => x_msg_count,
1498: p_data => x_msg_data);
1499: IF G_DEBUG='Y' THEN
1500: AHL_DEBUG_PUB.log_app_messages (

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

1506:
1507: WHEN FND_API.G_EXC_ERROR THEN
1508: ROLLBACK TO update_space_restriction;
1509: X_return_status := FND_API.G_RET_STS_ERROR;
1510: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1511: p_count => x_msg_count,
1512: p_data => X_msg_data);
1513: IF G_DEBUG='Y' THEN
1514: -- Debug info.

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

1521:
1522: WHEN OTHERS THEN
1523: ROLLBACK TO update_space_restriction;
1524: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1525: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1526: THEN
1527: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_APPR_SPACE_UNAVL_PVT',
1528: p_procedure_name => 'UPDATE_SPACE_RESTRICTION',
1529: p_error_text => SUBSTR(SQLERRM,1,240));

Line 1527: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_APPR_SPACE_UNAVL_PVT',

1523: ROLLBACK TO update_space_restriction;
1524: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1525: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1526: THEN
1527: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_APPR_SPACE_UNAVL_PVT',
1528: p_procedure_name => 'UPDATE_SPACE_RESTRICTION',
1529: p_error_text => SUBSTR(SQLERRM,1,240));
1530: END IF;
1531: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

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

1527: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_APPR_SPACE_UNAVL_PVT',
1528: p_procedure_name => 'UPDATE_SPACE_RESTRICTION',
1529: p_error_text => SUBSTR(SQLERRM,1,240));
1530: END IF;
1531: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1532: p_count => x_msg_count,
1533: p_data => X_msg_data);
1534: IF G_DEBUG='Y' THEN
1535: -- Debug info.

Line 1602: FND_MSG_PUB.initialize;

1598: END IF;
1599: -- Standard call to check for call compatibility.
1600: IF FND_API.to_boolean(p_init_msg_list)
1601: THEN
1602: FND_MSG_PUB.initialize;
1603: END IF;
1604: -- Initialize API return status to success
1605: x_return_status := FND_API.G_RET_STS_SUCCESS;
1606: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 1619: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

1615: OPEN c_space_restrict_cur(p_space_restriction_rec.space_unavailability_id);
1616: FETCH c_space_restrict_cur INTO l_space_unavailability_id,
1617: l_object_version_number;
1618: IF c_space_restrict_cur%NOTFOUND THEN
1619: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1620: FND_MESSAGE.set_name('AHL', 'AHL_APPR_RECORD_NOT_FOUND');
1621: FND_MSG_PUB.add;
1622: END IF;
1623: CLOSE c_space_restrict_cur;

Line 1621: FND_MSG_PUB.add;

1617: l_object_version_number;
1618: IF c_space_restrict_cur%NOTFOUND THEN
1619: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1620: FND_MESSAGE.set_name('AHL', 'AHL_APPR_RECORD_NOT_FOUND');
1621: FND_MSG_PUB.add;
1622: END IF;
1623: CLOSE c_space_restrict_cur;
1624: RAISE FND_API.g_exc_error;
1625: END IF;

Line 1631: FND_MSG_PUB.add;

1627: --Check for object version number
1628: IF l_object_version_number <> p_space_restriction_rec.object_version_number
1629: THEN
1630: FND_MESSAGE.set_name('AHL', 'AHL_COM_RECORD_CHANGED');
1631: FND_MSG_PUB.add;
1632: RAISE FND_API.g_exc_error;
1633: END IF;
1634: -------------------Call Table handler generated procedure------------
1635: AHL_SPACE_UNAVAILABLE_PKG.DELETE_ROW (

Line 1640: l_msg_count := Fnd_Msg_Pub.count_msg;

1636: X_SPACE_UNAVAILABILITY_ID => l_space_unavailability_id
1637: );
1638: ---------------------------End of Body---------------------------------------
1639: --Standard check to count messages
1640: l_msg_count := Fnd_Msg_Pub.count_msg;
1641:
1642: IF l_msg_count > 0 THEN
1643: X_msg_count := l_msg_count;
1644: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

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

1659: EXCEPTION
1660: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1661: ROLLBACK TO delete_space_restriction;
1662: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1663: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1664: p_count => x_msg_count,
1665: p_data => x_msg_data);
1666: IF G_DEBUG='Y' THEN
1667: AHL_DEBUG_PUB.log_app_messages (

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

1672: END IF;
1673: WHEN FND_API.G_EXC_ERROR THEN
1674: ROLLBACK TO delete_space_restriction;
1675: X_return_status := FND_API.G_RET_STS_ERROR;
1676: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1677: p_count => x_msg_count,
1678: p_data => X_msg_data);
1679: IF G_DEBUG='Y' THEN
1680: -- Debug info.

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

1687:
1688: WHEN OTHERS THEN
1689: ROLLBACK TO delete_space_restriction;
1690: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1691: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1692: THEN
1693: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_APPR_SPACE_UNAVL_PVT',
1694: p_procedure_name => 'DELETE_SPACE_RESTRICTION',
1695: p_error_text => SUBSTR(SQLERRM,1,240));

Line 1693: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_APPR_SPACE_UNAVL_PVT',

1689: ROLLBACK TO delete_space_restriction;
1690: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1691: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1692: THEN
1693: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_APPR_SPACE_UNAVL_PVT',
1694: p_procedure_name => 'DELETE_SPACE_RESTRICTION',
1695: p_error_text => SUBSTR(SQLERRM,1,240));
1696: END IF;
1697: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

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

1693: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_APPR_SPACE_UNAVL_PVT',
1694: p_procedure_name => 'DELETE_SPACE_RESTRICTION',
1695: p_error_text => SUBSTR(SQLERRM,1,240));
1696: END IF;
1697: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1698: p_count => x_msg_count,
1699: p_data => X_msg_data);
1700: IF G_DEBUG='Y' THEN
1701: -- Debug info.