eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.AHL_LTP_SPACE_ASSIGN_PVT dependencies on FND_MSG_PUB

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

329: x_space_assign_rec := p_space_assign_rec;
330: OPEN c_space_assign_rec;
331: FETCH c_space_assign_rec INTO l_space_assign_rec;
332: IF c_space_assign_rec%NOTFOUND THEN
333: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
334: FND_MESSAGE.set_name('AHL', 'AHL_LTP_RECORD_NOT_FOUND');
335: FND_MSG_PUB.add;
336: CLOSE c_space_assign_rec;
337: RAISE Fnd_Api.G_EXC_ERROR;

Line 335: FND_MSG_PUB.add;

331: FETCH c_space_assign_rec INTO l_space_assign_rec;
332: IF c_space_assign_rec%NOTFOUND THEN
333: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
334: FND_MESSAGE.set_name('AHL', 'AHL_LTP_RECORD_NOT_FOUND');
335: FND_MSG_PUB.add;
336: CLOSE c_space_assign_rec;
337: RAISE Fnd_Api.G_EXC_ERROR;
338: END IF;
339: END IF;

Line 345: Fnd_Msg_Pub.ADD;

341: --Check for object version number
342: IF (l_space_assign_rec.object_version_number <> p_space_assign_rec.object_version_number)
343: THEN
344: Fnd_Message.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');
345: Fnd_Msg_Pub.ADD;
346: RAISE Fnd_Api.G_EXC_ERROR;
347: END IF;
348:
349: -- SPACE ID

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

541: )
542: --
543: THEN
544: -- missing required fields
545: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
546: THEN
547: Fnd_Message.set_name('AHL', 'AHL_LTP_SPACE_ID_NOT_EXIST');
548: Fnd_Msg_Pub.ADD;
549: RAISE Fnd_Api.G_EXC_ERROR;

Line 548: Fnd_Msg_Pub.ADD;

544: -- missing required fields
545: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
546: THEN
547: Fnd_Message.set_name('AHL', 'AHL_LTP_SPACE_ID_NOT_EXIST');
548: Fnd_Msg_Pub.ADD;
549: RAISE Fnd_Api.G_EXC_ERROR;
550: END IF;
551: x_return_status := Fnd_Api.G_RET_STS_ERROR;
552: END IF;

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

554: IF (p_space_assign_rec.VISIT_ID = Fnd_Api.G_MISS_NUM OR
555: p_space_assign_rec.VISIT_ID IS NULL)
556: THEN
557: -- missing required fields
558: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
559: THEN
560: Fnd_Message.set_name('AHL', 'AHL_LTP_VISIT_ID_NOT_EXIST');
561: Fnd_Msg_Pub.ADD;
562: END IF;

Line 561: Fnd_Msg_Pub.ADD;

557: -- missing required fields
558: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
559: THEN
560: Fnd_Message.set_name('AHL', 'AHL_LTP_VISIT_ID_NOT_EXIST');
561: Fnd_Msg_Pub.ADD;
562: END IF;
563: x_return_status := Fnd_Api.G_RET_STS_ERROR;
564: END IF;
565:

Line 574: Fnd_Msg_Pub.ADD;

570: CLOSE check_unique;
571: --
572: IF l_dummy IS NOT NULL THEN
573: Fnd_Message.set_name('AHL', 'AHL_LTP_SP_ASSIGN_DUP_RECORD');
574: Fnd_Msg_Pub.ADD;
575: END IF;
576: --- Validation for visit type and inventory item
577: OPEN visit_item_cur(p_space_assign_rec.visit_id);
578: FETCH visit_item_cur INTO l_visit_type_code,

Line 594: Fnd_Msg_Pub.ADD;

590: EXIT WHEN space_unavailable_cur%NOTFOUND;
591: IF space_unavailable_cur%FOUND THEN
592: Fnd_Message.set_name('AHL', 'AHL_LTP_SP_UNAVAL_PERIOD');
593: Fnd_message.set_token( 'PERIOD', l_start_date ||' '||'to'||' '||l_end_date );
594: Fnd_Msg_Pub.ADD;
595: END IF;
596: END LOOP;
597: CLOSE space_unavailable_cur;
598:

Line 610: Fnd_Msg_Pub.ADD;

606: IF (l_start_date_time >= l_start_date AND
607: l_start_date_time <= l_end_date) THEN
608: Fnd_Message.set_name('AHL', 'AHL_LTP_SP_UNAVAL_PERIOD');
609: Fnd_message.set_token( 'PERIOD', l_start_date ||' '||'to'||' '||l_end_date );
610: Fnd_Msg_Pub.ADD;
611: END IF;
612: END LOOP;
613: CLOSE space_available_cur;
614: --

Line 623: Fnd_Msg_Pub.ADD;

619: l_inventory_item_id);
620: FETCH space_capable_cur INTO l_space_capability_id;
621: IF l_space_capability_id IS NULL THEN
622: Fnd_Message.set_name('AHL', 'AHL_LTP_VISIT_ITEM_NOT_EXIST');
623: Fnd_Msg_Pub.ADD;
624: END IF;
625: CLOSE space_capable_cur;
626:
627: --

Line 668: Fnd_Msg_Pub.initialize;

664: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
665: END IF;
666: -- Initialize message list if p_init_msg_list is set to TRUE.
667: IF Fnd_Api.to_Boolean( p_init_msg_list ) THEN
668: Fnd_Msg_Pub.initialize;
669: END IF;
670: -- Initialize API return status to success
671: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
672: --

Line 695: Fnd_Msg_Pub.count_and_get(

691: --
692: -- END of API body.
693: --
694: -------------------- finish --------------------------
695: Fnd_Msg_Pub.count_and_get(
696: p_encoded => Fnd_Api.g_false,
697: p_count => x_msg_count,
698: p_data => x_msg_data);
699: EXCEPTION

Line 702: Fnd_Msg_Pub.Count_AND_Get

698: p_data => x_msg_data);
699: EXCEPTION
700: WHEN Fnd_Api.G_EXC_ERROR THEN
701: x_return_status := Fnd_Api.G_RET_STS_ERROR ;
702: Fnd_Msg_Pub.Count_AND_Get
703: ( p_count => x_msg_count,
704: p_data => x_msg_data,
705: p_encoded => Fnd_Api.G_FALSE
706: );

Line 709: Fnd_Msg_Pub.Count_AND_Get

705: p_encoded => Fnd_Api.G_FALSE
706: );
707: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
708: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
709: Fnd_Msg_Pub.Count_AND_Get
710: ( p_count => x_msg_count,
711: p_data => x_msg_data,
712: p_encoded => Fnd_Api.G_FALSE
713: );

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

712: p_encoded => Fnd_Api.G_FALSE
713: );
714: WHEN OTHERS THEN
715: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
716: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
717: THEN
718: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
719: END IF;
720: Fnd_Msg_Pub.Count_AND_Get

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

714: WHEN OTHERS THEN
715: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
716: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
717: THEN
718: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
719: END IF;
720: Fnd_Msg_Pub.Count_AND_Get
721: ( p_count => x_msg_count,
722: p_data => x_msg_data,

Line 720: Fnd_Msg_Pub.Count_AND_Get

716: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
717: THEN
718: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
719: END IF;
720: Fnd_Msg_Pub.Count_AND_Get
721: ( p_count => x_msg_count,
722: p_data => x_msg_data,
723: p_encoded => Fnd_Api.G_FALSE
724: );

Line 790: FND_MSG_PUB.initialize;

786: END IF;
787: -- Standard call to check for call compatibility.
788: IF FND_API.to_boolean(p_init_msg_list)
789: THEN
790: FND_MSG_PUB.initialize;
791: END IF;
792: -- Initialize API return status to success
793: x_return_status := FND_API.G_RET_STS_SUCCESS;
794: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 842: Fnd_Msg_Pub.ADD;

838: IF NVL(l_return_status,'x') <> 'S'
839: THEN
840: Fnd_Message.SET_NAME('AHL','AHL_LTP_SPACE_NOT_EXISTS');
841: Fnd_Message.SET_TOKEN('SPACEID',p_x_space_assign_rec.space_name);
842: Fnd_Msg_Pub.ADD;
843: END IF;
844: END IF;
845: --Assign the returned value
846: p_x_space_assign_rec.space_id := l_space_id;

Line 864: Fnd_Msg_Pub.ADD;

860:
861: IF NVL(l_return_status,'x') <> 'S'
862: THEN
863: Fnd_Message.SET_NAME('AHL','AHL_LTP_VISIT_ID_NOT_EXIST');
864: Fnd_Msg_Pub.ADD;
865: RAISE Fnd_Api.G_EXC_ERROR;
866: END IF;
867: END IF;
868: --Assign the returned value

Line 872: l_msg_count := Fnd_Msg_Pub.count_msg;

868: --Assign the returned value
869: p_x_space_assign_rec.visit_id := l_visit_id;
870:
871: --Standard check to count messages
872: l_msg_count := Fnd_Msg_Pub.count_msg;
873:
874: IF l_msg_count > 0 THEN
875: X_msg_count := l_msg_count;
876: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 898: l_msg_count := Fnd_Msg_Pub.count_msg;

894: x_msg_data => l_msg_data );
895:
896:
897: --Standard check to count messages
898: l_msg_count := Fnd_Msg_Pub.count_msg;
899:
900: IF l_msg_count > 0 THEN
901: X_msg_count := l_msg_count;
902: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 927: Fnd_Msg_Pub.ADD;

923: -- l_dummy would be populated with '1', otherwise,
924: -- it receives NULL.
925: IF l_dummy IS NOT NULL THEN
926: Fnd_Message.SET_NAME('AHL','AHL_LTP_SEQUENCE_NOT_EXISTS');
927: Fnd_Msg_Pub.ADD;
928: END IF;
929: -- For optional fields
930: --
931: IF p_x_space_assign_rec.attribute_category = FND_API.G_MISS_CHAR

Line 1044: l_msg_count := Fnd_Msg_Pub.count_msg;

1040: l_space_assign_rec.attribute15 := p_x_space_assign_rec.attribute15;
1041: END IF;
1042: END IF;
1043: --Standard check to count messages
1044: l_msg_count := Fnd_Msg_Pub.count_msg;
1045:
1046: IF l_msg_count > 0 THEN
1047: X_msg_count := l_msg_count;
1048: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 1116: l_msg_count := Fnd_Msg_Pub.count_msg;

1112:
1113: p_x_space_assign_rec.space_assignment_id := l_space_assignment_id;
1114: ---------------------------End of Body---------------------------------------
1115: --Standard check to count messages
1116: l_msg_count := Fnd_Msg_Pub.count_msg;
1117:
1118: IF l_msg_count > 0 THEN
1119: X_msg_count := l_msg_count;
1120: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

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

1134: EXCEPTION
1135: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1136: ROLLBACK TO create_space_assignment;
1137: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1138: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1139: p_count => x_msg_count,
1140: p_data => x_msg_data);
1141: IF G_DEBUG='Y' THEN
1142:

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

1148: END IF;
1149: WHEN FND_API.G_EXC_ERROR THEN
1150: ROLLBACK TO create_space_assignment;
1151: X_return_status := FND_API.G_RET_STS_ERROR;
1152: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1153: p_count => x_msg_count,
1154: p_data => X_msg_data);
1155: IF G_DEBUG='Y' THEN
1156: -- Debug info.

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

1162: END IF;
1163: WHEN OTHERS THEN
1164: ROLLBACK TO create_space_assignment;
1165: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1166: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1167: THEN
1168: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_LTP_SPACE_ASSIGN_PVT',
1169: p_procedure_name => 'CREATE_SPACE_ASSIGNMENT',
1170: p_error_text => SUBSTR(SQLERRM,1,240));

Line 1168: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_LTP_SPACE_ASSIGN_PVT',

1164: ROLLBACK TO create_space_assignment;
1165: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1166: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1167: THEN
1168: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_LTP_SPACE_ASSIGN_PVT',
1169: p_procedure_name => 'CREATE_SPACE_ASSIGNMENT',
1170: p_error_text => SUBSTR(SQLERRM,1,240));
1171: END IF;
1172: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

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

1168: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_LTP_SPACE_ASSIGN_PVT',
1169: p_procedure_name => 'CREATE_SPACE_ASSIGNMENT',
1170: p_error_text => SUBSTR(SQLERRM,1,240));
1171: END IF;
1172: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1173: p_count => x_msg_count,
1174: p_data => X_msg_data);
1175: IF G_DEBUG='Y' THEN
1176: -- Debug info.

Line 1235: FND_MSG_PUB.initialize;

1231: END IF;
1232: -- Standard call to check for call compatibility.
1233: IF FND_API.to_boolean(p_init_msg_list)
1234: THEN
1235: FND_MSG_PUB.initialize;
1236: END IF;
1237: -- Initialize API return status to success
1238: x_return_status := FND_API.G_RET_STS_SUCCESS;
1239: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 1270: Fnd_Msg_Pub.ADD;

1266: IF NVL(l_return_status,'x') <> 'S'
1267: THEN
1268: Fnd_Message.SET_NAME('AHL','AHL_LTP_SPACE_NOT_EXISTS');
1269: Fnd_Message.SET_TOKEN('SPACEID',p_space_assign_rec.space_name);
1270: Fnd_Msg_Pub.ADD;
1271: END IF;
1272: END IF;
1273: --Assign the returned value
1274: l_space_assign_rec.space_id := l_space_id;

Line 1293: Fnd_Msg_Pub.ADD;

1289: IF NVL(l_return_status,'x') <> 'S'
1290: THEN
1291: Fnd_Message.SET_NAME('AHL','AHL_LTP_VISIT_NOT_EXISTS');
1292: Fnd_Message.SET_TOKEN('VISITID',p_space_assign_rec.visit_number);
1293: Fnd_Msg_Pub.ADD;
1294: END IF;
1295: END IF;
1296: --Assign the returned value
1297: l_space_assign_rec.visit_id := l_visit_id;

Line 1345: l_msg_count := Fnd_Msg_Pub.count_msg;

1341:
1342:
1343: ---------------------------End of Body---------------------------------------
1344: --Standard check to count messages
1345: l_msg_count := Fnd_Msg_Pub.count_msg;
1346:
1347: IF l_msg_count > 0 THEN
1348: X_msg_count := l_msg_count;
1349: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

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

1366: EXCEPTION
1367: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1368: ROLLBACK TO update_space_assignment;
1369: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1370: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1371: p_count => x_msg_count,
1372: p_data => x_msg_data);
1373: IF G_DEBUG='Y' THEN
1374:

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

1380: END IF;
1381: WHEN FND_API.G_EXC_ERROR THEN
1382: ROLLBACK TO update_space_assignment;
1383: X_return_status := FND_API.G_RET_STS_ERROR;
1384: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1385: p_count => x_msg_count,
1386: p_data => X_msg_data);
1387: IF G_DEBUG='Y' THEN
1388: -- Debug info.

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

1394: END IF;
1395: WHEN OTHERS THEN
1396: ROLLBACK TO update_space_assignment;
1397: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1398: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1399: THEN
1400: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_LTP_SPACE_ASSIGN_PVT',
1401: p_procedure_name => 'UPDATE_SPACE_ASSIGNMENT',
1402: p_error_text => SUBSTR(SQLERRM,1,240));

Line 1400: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_LTP_SPACE_ASSIGN_PVT',

1396: ROLLBACK TO update_space_assignment;
1397: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1398: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1399: THEN
1400: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_LTP_SPACE_ASSIGN_PVT',
1401: p_procedure_name => 'UPDATE_SPACE_ASSIGNMENT',
1402: p_error_text => SUBSTR(SQLERRM,1,240));
1403: END IF;
1404: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

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

1400: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_LTP_SPACE_ASSIGN_PVT',
1401: p_procedure_name => 'UPDATE_SPACE_ASSIGNMENT',
1402: p_error_text => SUBSTR(SQLERRM,1,240));
1403: END IF;
1404: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1405: p_count => x_msg_count,
1406: p_data => X_msg_data);
1407:
1408: IF G_DEBUG='Y' THEN

Line 1508: FND_MSG_PUB.initialize;

1504: END IF;
1505: -- Standard call to check for call compatibility.
1506: IF FND_API.to_boolean(p_init_msg_list)
1507: THEN
1508: FND_MSG_PUB.initialize;
1509: END IF;
1510: -- Initialize API return status to success
1511: x_return_status := FND_API.G_RET_STS_SUCCESS;
1512: -- Initialize message list if p_init_msg_list is set to TRUE.

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

1571: OPEN c_space_assign_cur(p_space_assign_rec.space_assignment_id);
1572: FETCH c_space_assign_cur INTO l_space_assignment_id,
1573: l_object_version_number;
1574: IF c_space_assign_cur%NOTFOUND THEN
1575: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1576: FND_MESSAGE.set_name('AHL', 'AHL_LTP_RECORD_NOT_FOUND');
1577: FND_MSG_PUB.add;
1578: END IF;
1579: CLOSE c_space_assign_cur;

Line 1577: FND_MSG_PUB.add;

1573: l_object_version_number;
1574: IF c_space_assign_cur%NOTFOUND THEN
1575: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1576: FND_MESSAGE.set_name('AHL', 'AHL_LTP_RECORD_NOT_FOUND');
1577: FND_MSG_PUB.add;
1578: END IF;
1579: CLOSE c_space_assign_cur;
1580: RAISE FND_API.g_exc_error;
1581: END IF;

Line 1592: FND_MSG_PUB.add;

1588: --Check for object version number
1589: IF l_object_version_number <> p_space_assign_rec.object_version_number
1590: THEN
1591: FND_MESSAGE.set_name('AHL', 'AHL_COM_RECORD_CHANGED');
1592: FND_MSG_PUB.add;
1593: RAISE FND_API.g_exc_error;
1594: END IF;
1595: -------------------Call Table handler generated procedure------------
1596: DELETE FROM AHL_SPACE_ASSIGNMENTS

Line 1601: l_msg_count := Fnd_Msg_Pub.count_msg;

1597: WHERE SPACE_ASSIGNMENT_ID = p_space_assign_rec.space_assignment_id;
1598: END IF;
1599: ---------------------------End of Body---------------------------------------
1600: --Standard check to count messages
1601: l_msg_count := Fnd_Msg_Pub.count_msg;
1602:
1603: IF l_msg_count > 0 THEN
1604: X_msg_count := l_msg_count;
1605: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

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

1622: EXCEPTION
1623: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1624: ROLLBACK TO delete_space_assignment;
1625: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1626: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1627: p_count => x_msg_count,
1628: p_data => x_msg_data);
1629: IF G_DEBUG='Y' THEN
1630:

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

1636: END IF;
1637: WHEN FND_API.G_EXC_ERROR THEN
1638: ROLLBACK TO delete_space_assignment;
1639: X_return_status := FND_API.G_RET_STS_ERROR;
1640: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1641: p_count => x_msg_count,
1642: p_data => X_msg_data);
1643: IF G_DEBUG='Y' THEN
1644:

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

1651: END IF;
1652: WHEN OTHERS THEN
1653: ROLLBACK TO delete_space_assignment;
1654: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1655: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1656: THEN
1657: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_LTP_SPACE_ASSIGN_PVT',
1658: p_procedure_name => 'DELETE_SPACE_ASSIGNMENT',
1659: p_error_text => SUBSTR(SQLERRM,1,240));

Line 1657: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_LTP_SPACE_ASSIGN_PVT',

1653: ROLLBACK TO delete_space_assignment;
1654: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1655: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1656: THEN
1657: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_LTP_SPACE_ASSIGN_PVT',
1658: p_procedure_name => 'DELETE_SPACE_ASSIGNMENT',
1659: p_error_text => SUBSTR(SQLERRM,1,240));
1660: END IF;
1661: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

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

1657: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_LTP_SPACE_ASSIGN_PVT',
1658: p_procedure_name => 'DELETE_SPACE_ASSIGNMENT',
1659: p_error_text => SUBSTR(SQLERRM,1,240));
1660: END IF;
1661: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1662: p_count => x_msg_count,
1663: p_data => X_msg_data);
1664: IF G_DEBUG='Y' THEN
1665:

Line 1802: FND_MSG_PUB.initialize;

1798: END IF;
1799: -- Standard call to check for call compatibility.
1800: IF FND_API.to_boolean(p_init_msg_list)
1801: THEN
1802: FND_MSG_PUB.initialize;
1803: END IF;
1804: -- Initialize API return status to success
1805: x_return_status := FND_API.G_RET_STS_SUCCESS;
1806: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 1847: Fnd_Msg_Pub.ADD;

1843: IF NVL(l_return_status,'x') <> 'S'
1844: THEN
1845: Fnd_Message.SET_NAME('AHL','AHL_LTP_VISIT_NOT_EXISTS');
1846: Fnd_Message.SET_TOKEN('VISITID',p_x_schedule_visit_rec.visit_number);
1847: Fnd_Msg_Pub.ADD;
1848: END IF;
1849: END IF;
1850:
1851: --Get the existing Record

Line 1867: Fnd_Msg_Pub.ADD;

1863: p_x_schedule_visit_rec.org_name = FND_API.G_MISS_CHAR) THEN
1864: -- anraj: if visit is in planning Organization is not mandatory
1865: IF (l_schedule_visit_rec.status_code <> 'PLANNING') THEN
1866: Fnd_Message.SET_NAME('AHL','AHL_LTP_ORG_REQUIRED');
1867: Fnd_Msg_Pub.ADD;
1868: END IF;
1869: END IF;
1870:
1871: IF G_DEBUG='Y' THEN

Line 1880: Fnd_Msg_Pub.ADD;

1876: p_x_schedule_visit_rec.dept_name = FND_API.G_MISS_CHAR) THEN
1877: -- anraj: if visit is in planning Department is not mandatory
1878: IF (l_schedule_visit_rec.status_code <> 'PLANNING') THEN
1879: Fnd_Message.SET_NAME('AHL','AHL_LTP_DEPT_REQUIRED');
1880: Fnd_Msg_Pub.ADD;
1881: END IF;
1882: END IF;
1883: --
1884:

Line 1890: Fnd_Msg_Pub.ADD;

1886: IF ( p_x_schedule_visit_rec.start_date IS NULL AND
1887: p_x_schedule_visit_rec.start_date = FND_API.G_MISS_DATE)
1888: THEN
1889: Fnd_Message.SET_NAME('AHL','AHL_LTP_START_DATE_INVALID');
1890: Fnd_Msg_Pub.ADD;
1891: RAISE Fnd_Api.G_EXC_ERROR;
1892: END IF;
1893: --
1894:

Line 1915: Fnd_Msg_Pub.ADD;

1911:
1912: IF NVL(l_return_status, 'X') <> 'S'
1913: THEN
1914: Fnd_Message.SET_NAME('AHL','AHL_LTP_SP_CATEGORY_NOT_EXIST');
1915: Fnd_Msg_Pub.ADD;
1916: RAISE Fnd_Api.G_EXC_ERROR;
1917: END IF;
1918: ELSE
1919: -- Id presents

Line 1948: Fnd_Msg_Pub.ADD;

1944: IF NVL(l_return_status, 'X') <> 'S'
1945: THEN
1946: Fnd_Message.SET_NAME('AHL','AHL_LTP_VISIT_TYPE_NOT_EXISTS');
1947: Fnd_Message.SET_TOKEN('VISIT',p_x_schedule_visit_rec.visit_type_mean);
1948: Fnd_Msg_Pub.ADD;
1949: END IF;
1950: ELSE
1951: -- Id presents
1952: IF p_x_schedule_visit_rec.visit_type_code IS NOT NULL AND

Line 1962: Fnd_Msg_Pub.ADD;

1958: /*
1959: ELSIF (l_schedule_visit_rec.status_code <> 'PLANNING' )
1960: THEN
1961: Fnd_Message.SET_NAME('AHL','AHL_LTP_VISIT_TYPE_REQUIRED');
1962: Fnd_Msg_Pub.ADD;
1963: RAISE Fnd_Api.G_EXC_ERROR;
1964: */
1965: END IF;
1966:

Line 1972: Fnd_Msg_Pub.ADD;

1968: --
1969: IF p_x_schedule_visit_rec.object_version_number <> l_schedule_visit_rec.object_version_number
1970: THEN
1971: Fnd_Message.SET_NAME('AHL','AHL_LTP_INVALID_RECORD');
1972: Fnd_Msg_Pub.ADD;
1973: END IF;
1974:
1975: -- Check for visit status
1976: -- anraj : Commented the following block as Impelmented/Partially Implemented visits can also be updated.

Line 1979: Fnd_Msg_Pub.ADD;

1975: -- Check for visit status
1976: -- anraj : Commented the following block as Impelmented/Partially Implemented visits can also be updated.
1977: /* IF (l_schedule_visit_rec.status_code <> 'PLANNING' )THEN
1978: Fnd_Message.SET_NAME('AHL','AHL_VISIT_NOT_PLANNED');
1979: Fnd_Msg_Pub.ADD;
1980: RAISE Fnd_Api.G_EXC_ERROR;
1981: END IF;
1982: */
1983:

Line 2034: l_msg_count := Fnd_Msg_Pub.count_msg;

2030: END IF; --org condition
2031: END IF; --Schedule flag
2032: */
2033: --Standard check to count messages
2034: l_msg_count := Fnd_Msg_Pub.count_msg;
2035:
2036: IF l_msg_count > 0 THEN
2037: X_msg_count := l_msg_count;
2038: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 2095: l_msg_count := Fnd_Msg_Pub.count_msg;

2091: CLOSE c_visit_sched_cur;
2092: */
2093:
2094: --Standard check to count messages
2095: l_msg_count := Fnd_Msg_Pub.count_msg;
2096:
2097: IF l_msg_count > 0 THEN
2098: X_msg_count := l_msg_count;
2099: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 2169: l_msg_count := FND_MSG_PUB.count_msg;

2165: END IF;
2166:
2167: -- Check Error Message stack.
2168: IF (l_return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
2169: l_msg_count := FND_MSG_PUB.count_msg;
2170: IF l_msg_count > 0 THEN
2171: RAISE FND_API.G_EXC_ERROR;
2172: END IF;
2173: END IF;

Line 2216: l_msg_count := Fnd_Msg_Pub.count_msg;

2212:
2213: END IF;
2214: */
2215: --Standard check to count messages
2216: l_msg_count := Fnd_Msg_Pub.count_msg;
2217:
2218: IF l_msg_count > 0 THEN
2219: X_msg_count := l_msg_count;
2220: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

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

2238: EXCEPTION
2239: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2240: ROLLBACK TO schedule_visit;
2241: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2242: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2243: p_count => x_msg_count,
2244: p_data => x_msg_data);
2245: IF G_DEBUG='Y' THEN
2246:

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

2252: END IF;
2253: WHEN FND_API.G_EXC_ERROR THEN
2254: ROLLBACK TO schedule_visit;
2255: X_return_status := FND_API.G_RET_STS_ERROR;
2256: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2257: p_count => x_msg_count,
2258: p_data => X_msg_data);
2259: IF G_DEBUG='Y' THEN
2260:

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

2267: END IF;
2268: WHEN OTHERS THEN
2269: ROLLBACK TO schedule_visit;
2270: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2271: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2272: THEN
2273: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_LTP_SPACE_ASSIGN_PVT',
2274: p_procedure_name => 'SCHEDULE_VISIT',
2275: p_error_text => SUBSTR(SQLERRM,1,240));

Line 2273: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_LTP_SPACE_ASSIGN_PVT',

2269: ROLLBACK TO schedule_visit;
2270: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2271: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2272: THEN
2273: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_LTP_SPACE_ASSIGN_PVT',
2274: p_procedure_name => 'SCHEDULE_VISIT',
2275: p_error_text => SUBSTR(SQLERRM,1,240));
2276: END IF;
2277: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

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

2273: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_LTP_SPACE_ASSIGN_PVT',
2274: p_procedure_name => 'SCHEDULE_VISIT',
2275: p_error_text => SUBSTR(SQLERRM,1,240));
2276: END IF;
2277: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2278: p_count => x_msg_count,
2279: p_data => X_msg_data);
2280: IF G_DEBUG='Y' THEN
2281:

Line 2390: FND_MSG_PUB.initialize;

2386: END IF;
2387: -- Standard call to check for call compatibility.
2388: IF FND_API.to_boolean(p_init_msg_list)
2389: THEN
2390: FND_MSG_PUB.initialize;
2391: END IF;
2392: -- Initialize API return status to success
2393: x_return_status := FND_API.G_RET_STS_SUCCESS;
2394: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 2419: Fnd_Msg_Pub.ADD;

2415: IF NVL(l_return_status,'x') <> 'S'
2416: THEN
2417: Fnd_Message.SET_NAME('AHL','AHL_LTP_VISIT_NOT_EXISTS');
2418: Fnd_Message.SET_TOKEN('VISITID',p_x_schedule_visit_rec.visit_number);
2419: Fnd_Msg_Pub.ADD;
2420: END IF;
2421: END IF;
2422: --Assign the returned value
2423: p_x_schedule_visit_rec.visit_id := l_visit_id;

Line 2433: Fnd_Msg_Pub.ADD;

2429: --
2430: IF p_x_schedule_visit_rec.object_version_number <> l_object_version_number
2431: THEN
2432: Fnd_Message.SET_NAME('AHL','AHL_LTP_INAVLID_RECORD');
2433: Fnd_Msg_Pub.ADD;
2434: RAISE Fnd_Api.G_EXC_ERROR;
2435: END IF;
2436: -- Check for visit status
2437: IF (l_visit_status_code <> 'PLANNING' )THEN

Line 2439: Fnd_Msg_Pub.ADD;

2435: END IF;
2436: -- Check for visit status
2437: IF (l_visit_status_code <> 'PLANNING' )THEN
2438: Fnd_Message.SET_NAME('AHL','AHL_VISIT_NOT_PLANNED');
2439: Fnd_Msg_Pub.ADD;
2440: RAISE Fnd_Api.G_EXC_ERROR;
2441: END IF;
2442: --
2443: --Check for material scheduling

Line 2459: Fnd_Msg_Pub.ADD;

2455: OPEN c_visit_task_matrl_cur(l_schedule_material_id);
2456: FETCH c_visit_task_matrl_cur INTO l_scheduled_date,l_scheduled_quantity;
2457: IF l_scheduled_date IS NOT NULL THEN
2458: Fnd_Message.SET_NAME('AHL','AHL_LTP_MRP_SCHEDUl_ITEM');
2459: Fnd_Msg_Pub.ADD;
2460: CLOSE c_visit_task_matrl_cur;
2461: RAISE Fnd_Api.G_EXC_ERROR;
2462: ELSE
2463: UPDATE ahl_schedule_materials

Line 2569: l_msg_count := FND_MSG_PUB.count_msg;

2565: END IF;
2566:
2567: -- Check Error Message stack.
2568: IF (l_return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
2569: l_msg_count := FND_MSG_PUB.count_msg;
2570: IF l_msg_count > 0 THEN
2571: RAISE FND_API.G_EXC_ERROR;
2572: END IF;
2573: END IF;

Line 2579: l_msg_count := Fnd_Msg_Pub.count_msg;

2575: -- Changes by mpothuku End
2576:
2577: ---------------------------End of Body---------------------------------------
2578: --Standard check to count messages
2579: l_msg_count := Fnd_Msg_Pub.count_msg;
2580:
2581: IF l_msg_count > 0 THEN
2582: X_msg_count := l_msg_count;
2583: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

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

2597: EXCEPTION
2598: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2599: ROLLBACK TO unschedule_visit;
2600: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2601: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2602: p_count => x_msg_count,
2603: p_data => x_msg_data);
2604: IF G_DEBUG='Y' THEN
2605:

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

2611: END IF;
2612: WHEN FND_API.G_EXC_ERROR THEN
2613: ROLLBACK TO unschedule_visit;
2614: X_return_status := FND_API.G_RET_STS_ERROR;
2615: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2616: p_count => x_msg_count,
2617: p_data => X_msg_data);
2618: IF G_DEBUG='Y' THEN
2619:

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

2626: END IF;
2627: WHEN OTHERS THEN
2628: ROLLBACK TO unschedule_visit;
2629: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2630: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2631: THEN
2632: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_LTP_SPACE_ASSIGN_PVT',
2633: p_procedure_name => 'UNSCHEDULE_VISIT',
2634: p_error_text => SUBSTR(SQLERRM,1,240));

Line 2632: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_LTP_SPACE_ASSIGN_PVT',

2628: ROLLBACK TO unschedule_visit;
2629: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2630: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2631: THEN
2632: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_LTP_SPACE_ASSIGN_PVT',
2633: p_procedure_name => 'UNSCHEDULE_VISIT',
2634: p_error_text => SUBSTR(SQLERRM,1,240));
2635: END IF;
2636: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

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

2632: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_LTP_SPACE_ASSIGN_PVT',
2633: p_procedure_name => 'UNSCHEDULE_VISIT',
2634: p_error_text => SUBSTR(SQLERRM,1,240));
2635: END IF;
2636: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2637: p_count => x_msg_count,
2638: p_data => X_msg_data);
2639: IF G_DEBUG='Y' THEN
2640: