DBA Data[Home] [Help]

APPS.AHL_AVF_PRIM_VSTS_PVT dependencies on FND_MSG_PUB

Line 237: Fnd_Msg_Pub.initialize;

233: ' , p_snapshot_id => ' || p_snapshot_id);
234: END IF;
235:
236: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
237: Fnd_Msg_Pub.initialize;
238: END IF;
239:
240: IF NOT Fnd_Api.compatible_api_call (
241: l_api_version,

Line 370: Fnd_Msg_Pub.ADD;

366: IF (l_log_statement >= l_log_current_level) THEN
367: fnd_log.string(l_log_statement,L_DEBUG_KEY, ' Invalid Visit Id : ' || p_visit_id);
368: END IF;
369: Fnd_Message.SET_NAME('AHL','AHL_VISIT_ID_INVALID');
370: Fnd_Msg_Pub.ADD;
371: RAISE Fnd_Api.G_EXC_ERROR;
372: END IF;
373: ELSIF((p_snapshot_id IS NOT NULL OR p_snapshot_id <> FND_API.G_MISS_NUM) AND (p_visit_id IS NULL or p_visit_id = FND_API.G_MISS_NUM)) THEN
374: -- Snapshot_id is passed

Line 499: Fnd_Msg_Pub.ADD;

495: IF (l_log_statement >= l_log_current_level) THEN
496: fnd_log.string(l_log_statement,L_DEBUG_KEY, ' Invalid Snapshot Id : ' || p_snapshot_id);
497: END IF;
498: Fnd_Message.SET_NAME('AHL','AHL_AVF_INVALID_SNAPSHOT');
499: Fnd_Msg_Pub.ADD;
500: RAISE Fnd_Api.G_EXC_ERROR;
501: END IF;
502: ELSE
503: -- The input flag is not valid. Need to raise exception

Line 508: Fnd_Msg_Pub.ADD;

504: IF (l_log_statement >= l_log_current_level) THEN
505: fnd_log.string(l_log_statement,L_DEBUG_KEY, ' Invalid Paramters ');
506: END IF;
507: Fnd_Message.SET_NAME('AHL','AHL_PAGE_PARAMETERS_INVALID');
508: Fnd_Msg_Pub.ADD;
509: RAISE Fnd_Api.G_EXC_ERROR;
510: END IF; -- Valid Input parameters check ends
511:
512: -------------------- finish --------------------------

Line 518: Fnd_Msg_Pub.count_and_get (

514: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Return Add_Planned_MRs :: p_encoded--@>'||Fnd_Api.g_false);
515: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Return Add_Planned_MRs :: p_count--@>'||x_msg_count);
516: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Return Add_Planned_MRs :: p_data--@>'||x_msg_data);
517: END IF;
518: Fnd_Msg_Pub.count_and_get (
519: p_encoded => Fnd_Api.g_false,
520: p_count => x_msg_count,
521: p_data => x_msg_data
522: );

Line 541: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,

537: EXCEPTION
538: WHEN Fnd_Api.G_EXC_ERROR THEN
539: x_return_status := Fnd_Api.G_RET_STS_ERROR;
540: ROLLBACK TO Save_Add_MRs;
541: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
542: p_data => x_msg_data,
543: p_encoded => Fnd_Api.g_false);
544:
545: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

Line 548: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,

544:
545: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
546: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
547: ROLLBACK TO Save_Add_MRs;
548: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
549: p_data => x_msg_data,
550: p_encoded => Fnd_Api.g_false);
551:
552: WHEN OTHERS THEN

Line 555: Fnd_Msg_Pub.add_exc_msg( p_pkg_name => G_PKG_NAME,

551:
552: WHEN OTHERS THEN
553: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
554: ROLLBACK TO Save_Add_MRs;
555: Fnd_Msg_Pub.add_exc_msg( p_pkg_name => G_PKG_NAME,
556: p_procedure_name => 'Add_Planned_MRs',
557: p_error_text => SQLERRM);
558: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
559: p_data => x_msg_data,

Line 558: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,

554: ROLLBACK TO Save_Add_MRs;
555: Fnd_Msg_Pub.add_exc_msg( p_pkg_name => G_PKG_NAME,
556: p_procedure_name => 'Add_Planned_MRs',
557: p_error_text => SQLERRM);
558: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
559: p_data => x_msg_data,
560: p_encoded => Fnd_Api.g_false);
561:
562: END Add_Planned_MRs; -- End of begin/procedure.

Line 648: Fnd_Msg_Pub.initialize;

644: ' , p_snapshot_id => ' || p_snapshot_id);
645: END IF;
646:
647: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
648: Fnd_Msg_Pub.initialize;
649: END IF;
650:
651: IF NOT Fnd_Api.compatible_api_call (
652: l_api_version,

Line 740: Fnd_Msg_Pub.ADD;

736: IF (l_log_statement >= l_log_current_level) THEN
737: fnd_log.string(l_log_statement,L_DEBUG_KEY, ' Invalid Snapshot Id : ' || p_snapshot_id);
738: END IF;
739: Fnd_Message.SET_NAME('AHL','AHL_AVF_INVALID_SNAPSHOT');
740: Fnd_Msg_Pub.ADD;
741: RAISE Fnd_Api.G_EXC_ERROR;
742: END IF;
743:
744: ELSE

Line 749: Fnd_Msg_Pub.ADD;

745: IF (l_log_statement >= l_log_current_level) THEN
746: fnd_log.string(l_log_statement,L_DEBUG_KEY, ' Null Paramter ');
747: END IF;
748: Fnd_Message.SET_NAME('AHL','AHL_PAGE_PARAMETERS_INVALID');
749: Fnd_Msg_Pub.ADD;
750: RAISE Fnd_Api.G_EXC_ERROR;
751: END IF;
752: -------------------- finish --------------------------
753: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

Line 758: Fnd_Msg_Pub.count_and_get (

754: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Return Cancel_Visits :: p_encoded--@>'||Fnd_Api.g_false);
755: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Return Cancel_Visits :: p_count--@>'||x_msg_count);
756: fnd_log.string(fnd_log.level_statement,L_DEBUG_KEY,'Return Cancel_Visits :: p_data--@>'||x_msg_data);
757: END IF;
758: Fnd_Msg_Pub.count_and_get (
759: p_encoded => Fnd_Api.g_false,
760: p_count => x_msg_count,
761: p_data => x_msg_data
762: );

Line 780: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,

776: EXCEPTION
777: WHEN Fnd_Api.G_EXC_ERROR THEN
778: x_return_status := Fnd_Api.G_RET_STS_ERROR;
779: ROLLBACK TO Save_Cancel_visits;
780: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
781: p_data => x_msg_data,
782: p_encoded => Fnd_Api.g_false);
783:
784: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

Line 787: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,

783:
784: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
785: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
786: ROLLBACK TO Save_Cancel_visits;
787: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
788: p_data => x_msg_data,
789: p_encoded => Fnd_Api.g_false);
790:
791: WHEN OTHERS THEN

Line 794: Fnd_Msg_Pub.add_exc_msg( p_pkg_name => G_PKG_NAME,

790:
791: WHEN OTHERS THEN
792: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
793: ROLLBACK TO Save_Cancel_visits;
794: Fnd_Msg_Pub.add_exc_msg( p_pkg_name => G_PKG_NAME,
795: p_procedure_name => 'Cancel_Visits',
796: p_error_text => SQLERRM);
797: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
798: p_data => x_msg_data,

Line 797: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,

793: ROLLBACK TO Save_Cancel_visits;
794: Fnd_Msg_Pub.add_exc_msg( p_pkg_name => G_PKG_NAME,
795: p_procedure_name => 'Cancel_Visits',
796: p_error_text => SQLERRM);
797: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
798: p_data => x_msg_data,
799: p_encoded => Fnd_Api.g_false);
800:
801: END Cancel_Visits; -- End of begin/procedure.

Line 888: Fnd_Msg_Pub.initialize;

884: fnd_log.string(fnd_log.level_procedure,L_DEBUG||'.begin','At the start of PLSQL procedure');
885: END IF;
886:
887: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
888: Fnd_Msg_Pub.initialize;
889: END IF;
890:
891: IF NOT Fnd_Api.compatible_api_call (
892: l_api_version,

Line 915: Fnd_Msg_Pub.ADD;

911: l_mr_header_id := l_mr_header_dets.mr_header_id;
912: IF l_mr_header_id IS NULL THEN
913:
914: Fnd_Message.SET_NAME('AHL','AHL_FMP_INVALID_MR');
915: Fnd_Msg_Pub.ADD;
916: RAISE Fnd_Api.G_EXC_ERROR;
917:
918: END IF;
919:

Line 950: Fnd_Msg_Pub.ADD;

946: END IF;
947:
948: IF NVL(l_return_status,'x') <> 'S' THEN
949: Fnd_Message.SET_NAME('AHL','AHL_VWP_ORG_NOT_EXISTS');
950: Fnd_Msg_Pub.ADD;
951: RAISE Fnd_Api.G_EXC_ERROR;
952: END IF;
953:
954: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

Line 980: Fnd_Msg_Pub.ADD;

976: --If maintenance organization or department not found, then set status as failure and raise error
977: IF x_maintenance_org_id is NULL or x_maintenance_dept_id is NULL THEN
978:
979: Fnd_Message.SET_NAME('AHL','AHL_OPER_NO_MAINTENANCE_DETS');
980: Fnd_Msg_Pub.ADD;
981: x_return_status := Fnd_Api.g_ret_sts_error;
982:
983: END IF;
984: */

Line 987: Fnd_Msg_Pub.count_and_get (

983: END IF;
984: */
985:
986: -------------------- finish --------------------------
987: Fnd_Msg_Pub.count_and_get (
988: p_encoded => Fnd_Api.g_false,
989: p_count => x_msg_count,
990: p_data => x_msg_data
991: );

Line 1000: Fnd_Msg_Pub.count_and_get (

996:
997: EXCEPTION
998: WHEN Fnd_Api.g_exc_error THEN
999: x_return_status := Fnd_Api.g_ret_sts_error;
1000: Fnd_Msg_Pub.count_and_get (
1001: p_encoded => Fnd_Api.g_false,
1002: p_count => x_msg_count,
1003: p_data => x_msg_data
1004: );

Line 1007: Fnd_Msg_Pub.count_and_get (

1003: p_data => x_msg_data
1004: );
1005: WHEN Fnd_Api.g_exc_unexpected_error THEN
1006: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1007: Fnd_Msg_Pub.count_and_get (
1008: p_encoded => Fnd_Api.g_false,
1009: p_count => x_msg_count,
1010: p_data => x_msg_data
1011: );

Line 1014: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error) THEN

1010: p_data => x_msg_data
1011: );
1012: WHEN OTHERS THEN
1013: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
1014: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error) THEN
1015: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1016: END IF;
1017: Fnd_Msg_Pub.count_and_get (
1018: p_encoded => Fnd_Api.g_false,

Line 1015: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);

1011: );
1012: WHEN OTHERS THEN
1013: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
1014: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error) THEN
1015: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1016: END IF;
1017: Fnd_Msg_Pub.count_and_get (
1018: p_encoded => Fnd_Api.g_false,
1019: p_count => x_msg_count,

Line 1017: Fnd_Msg_Pub.count_and_get (

1013: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
1014: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error) THEN
1015: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1016: END IF;
1017: Fnd_Msg_Pub.count_and_get (
1018: p_encoded => Fnd_Api.g_false,
1019: p_count => x_msg_count,
1020: p_data => x_msg_data
1021: );

Line 1191: FND_MSG_PUB.Initialize;

1187:
1188: -- Initialize message list if p_init_msg_list is set to TRUE
1189:
1190: IF FND_API.To_Boolean( p_init_msg_list) THEN
1191: FND_MSG_PUB.Initialize;
1192: END IF;
1193:
1194: -- Initialize API return status to success
1195: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1208: FND_MSG_PUB.ADD;

1204:
1205: -- make sure that snapshot id is present in the input and is valid
1206: IF(p_snapshot_id IS NULL OR p_snapshot_id = FND_API.G_MISS_NUM) THEN
1207: FND_MESSAGE.Set_Name('AHL','AHL_AVF_SNPSHT_INPUT_MISS');
1208: FND_MSG_PUB.ADD;
1209:
1210: IF (fnd_log.level_exception >= l_log_current_level)THEN
1211: fnd_log.string
1212: (

Line 1226: FND_MSG_PUB.ADD;

1222: FETCH get_dates INTO dates_rec;
1223: IF get_dates%NOTFOUND THEN
1224: CLOSE get_dates;
1225: FND_MESSAGE.Set_Name('AHL','AHL_AVF_SNPSHT_INPUT_INVLD');
1226: FND_MSG_PUB.ADD;
1227:
1228: IF (fnd_log.level_exception >= l_log_current_level)THEN
1229: fnd_log.string
1230: (

Line 1305: x_msg_count := FND_MSG_PUB.count_msg;

1301: 'After calling Validate_MR_Operating_Org l_return_status= '||l_return_status);
1302: END IF;
1303:
1304: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1305: x_msg_count := FND_MSG_PUB.count_msg;
1306: IF (l_log_statement >= l_log_current_level) THEN
1307: fnd_log.string(l_log_statement,
1308: L_DEBUG_KEY,
1309: 'Errors from Validate_MR_Operating_Org. Message count: ' || x_msg_count);

Line 1417: x_msg_count := FND_MSG_PUB.count_msg;

1413: ||', visit id: '||l_visit_rec.visit_id);
1414: END IF;
1415:
1416: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1417: x_msg_count := FND_MSG_PUB.count_msg;
1418: IF (l_log_statement >= l_log_current_level) THEN
1419: fnd_log.string(l_log_statement,
1420: L_DEBUG_KEY,
1421: 'Errors from Create_Visit. Message count: ' || x_msg_count);

Line 1467: x_msg_count := FND_MSG_PUB.count_msg;

1463: 'After calling AHL_VWP_TASKS_PVT.Create_PUP_Tasks l_return_status= '||l_return_status);
1464: END IF;
1465:
1466: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1467: x_msg_count := FND_MSG_PUB.count_msg;
1468: IF (l_log_statement >= l_log_current_level) THEN
1469: fnd_log.string(l_log_statement,
1470: L_DEBUG_KEY,
1471: 'Errors from Create_PUP_Tasks. Message count: ' || x_msg_count);

Line 1500: x_msg_count := FND_MSG_PUB.count_msg;

1496: 'After calling Add_Planned_MRs l_return_status= '||l_return_status);
1497: END IF;
1498: -- l_return_status = 'V' then number of UEs for the visit is 0.
1499: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS AND l_return_status <> 'V') THEN
1500: x_msg_count := FND_MSG_PUB.count_msg;
1501: IF (l_log_statement >= l_log_current_level) THEN
1502: fnd_log.string(l_log_statement,
1503: L_DEBUG_KEY,
1504: 'Errors from Add_Planned_MRs. Message count: ' || x_msg_count);

Line 1578: x_msg_count := FND_MSG_PUB.count_msg;

1574: 'After calling Validate_MR_Operating_Org l_return_status= '||l_return_status);
1575: END IF;
1576:
1577: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1578: x_msg_count := FND_MSG_PUB.count_msg;
1579: IF (l_log_statement >= l_log_current_level) THEN
1580: fnd_log.string(l_log_statement,
1581: L_DEBUG_KEY,
1582: 'Errors from Validate_MR_Operating_Org. Message count: ' || x_msg_count);

Line 1688: x_msg_count := FND_MSG_PUB.count_msg;

1684: ||', visit id: '||l_visit_rec.visit_id);
1685: END IF;
1686:
1687: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1688: x_msg_count := FND_MSG_PUB.count_msg;
1689: IF (l_log_statement >= l_log_current_level) THEN
1690: fnd_log.string(l_log_statement,
1691: L_DEBUG_KEY,
1692: 'Errors from Create_Visit. Message count: ' || x_msg_count);

Line 1737: x_msg_count := FND_MSG_PUB.count_msg;

1733: 'After calling AHL_VWP_TASKS_PVT.Create_PUP_Tasks l_return_status= '||l_return_status);
1734: END IF;
1735:
1736: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1737: x_msg_count := FND_MSG_PUB.count_msg;
1738: IF (l_log_statement >= l_log_current_level) THEN
1739: fnd_log.string(l_log_statement,
1740: L_DEBUG_KEY,
1741: 'Errors from Create_PUP_Tasks. Message count: ' || x_msg_count);

Line 1770: x_msg_count := FND_MSG_PUB.count_msg;

1766: 'After calling Add_Planned_MRs l_return_status= '||l_return_status);
1767: END IF;
1768: -- l_return_status = 'V' then number of UEs for the visit is 0.
1769: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS AND l_return_status <> 'V') THEN
1770: x_msg_count := FND_MSG_PUB.count_msg;
1771: IF (l_log_statement >= l_log_current_level) THEN
1772: fnd_log.string(l_log_statement,
1773: L_DEBUG_KEY,
1774: 'Errors from Add_Planned_MRs. Message count: ' || x_msg_count);

Line 1808: Fnd_Msg_Pub.count_and_get(

1804: IF Fnd_Api.To_Boolean (p_commit) THEN
1805: COMMIT WORK;
1806: END IF;
1807:
1808: Fnd_Msg_Pub.count_and_get(
1809: p_encoded => Fnd_Api.g_false,
1810: p_count => x_msg_count,
1811: p_data => x_msg_data
1812: );

Line 1829: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

1825: WHEN FND_API.G_EXC_ERROR THEN
1826:
1827: x_return_status := FND_API.G_RET_STS_ERROR;
1828: ROLLBACK TO Create_Primary_Visits_pvt;
1829: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1830: p_data => x_msg_data,
1831: p_encoded => fnd_api.g_false);
1832:
1833: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1836: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

1832:
1833: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1834: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1835: ROLLBACK TO Create_Primary_Visits_pvt;
1836: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1837: p_data => x_msg_data,
1838: p_encoded => fnd_api.g_false);
1839:
1840: WHEN OTHERS THEN

Line 1844: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

1840: WHEN OTHERS THEN
1841: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1842: ROLLBACK TO Create_Primary_Visits_pvt;
1843:
1844: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1845: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
1846: p_procedure_name => 'Create_Primary_Visits',
1847: p_error_text => SUBSTR(SQLERRM,1,500));
1848: END IF;

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

1841: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1842: ROLLBACK TO Create_Primary_Visits_pvt;
1843:
1844: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1845: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
1846: p_procedure_name => 'Create_Primary_Visits',
1847: p_error_text => SUBSTR(SQLERRM,1,500));
1848: END IF;
1849:

Line 1850: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

1846: p_procedure_name => 'Create_Primary_Visits',
1847: p_error_text => SUBSTR(SQLERRM,1,500));
1848: END IF;
1849:
1850: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1851: p_data => x_msg_data,
1852: p_encoded => fnd_api.g_false);
1853: END Create_Primary_Visits;
1854:

Line 1896: FND_MSG_PUB.Initialize;

1892: -- Standard start of API savepoint
1893: SAVEPOINT Process_Primary_visits;
1894:
1895: -- 1. Initialize error message stack by default
1896: FND_MSG_PUB.Initialize;
1897:
1898: -- Standard call to check for call compatibility
1899: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1900: retcode := 2;

Line 1901: errbuf := FND_MSG_PUB.Get;

1897:
1898: -- Standard call to check for call compatibility
1899: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1900: retcode := 2;
1901: errbuf := FND_MSG_PUB.Get;
1902: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1903: END IF;
1904:
1905: -- 2. Dump all input parameters

Line 1935: l_msg_count := FND_MSG_PUB.Count_Msg;

1931: x_msg_count => l_msg_count,
1932: x_msg_data => l_msg_data
1933: );
1934:
1935: l_msg_count := FND_MSG_PUB.Count_Msg;
1936: IF (l_msg_count > 0) THEN
1937: fnd_file.put_line(fnd_file.log, 'Following error occured during the call to Cancel_Visits..');
1938: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1939: RAISE FND_API.G_EXC_ERROR;

Line 1964: l_msg_count := FND_MSG_PUB.Count_Msg;

1960: x_msg_count => l_msg_count,
1961: x_msg_data => l_msg_data
1962: );
1963:
1964: l_msg_count := FND_MSG_PUB.Count_Msg;
1965: IF (l_msg_count > 0) THEN
1966: fnd_file.put_line(fnd_file.log, 'Following error occured during the call to Create_Primary_Visits..');
1967: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1968: RAISE FND_API.G_EXC_ERROR;

Line 1992: l_msg_count := FND_MSG_PUB.Count_Msg;

1988: x_msg_count => l_msg_count,
1989: x_msg_data => l_msg_data
1990: );
1991:
1992: l_msg_count := FND_MSG_PUB.Count_Msg;
1993: IF (l_msg_count > 0) THEN
1994: fnd_file.put_line(fnd_file.log, 'Following error occured during the call to Add_Planned_MRs..');
1995: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1996: RAISE FND_API.G_EXC_ERROR;

Line 2011: fnd_msg_pub.get( p_msg_index => i,

2007: ROLLBACK TO Process_Primary_visits;
2008: retcode := 2;
2009: FOR i IN 1..l_msg_count
2010: LOOP
2011: fnd_msg_pub.get( p_msg_index => i,
2012: p_encoded => FND_API.G_FALSE,
2013: p_data => l_err_msg,
2014: p_msg_index_out => l_msg_index_out);
2015:

Line 2023: l_msg_count := Fnd_Msg_Pub.count_msg;

2019:
2020: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2021: ROLLBACK TO Process_Primary_visits;
2022: retcode := 2;
2023: l_msg_count := Fnd_Msg_Pub.count_msg;
2024: FOR i IN 1..l_msg_count
2025: LOOP
2026: fnd_msg_pub.get( p_msg_index => i,
2027: p_encoded => FND_API.G_FALSE,

Line 2026: fnd_msg_pub.get( p_msg_index => i,

2022: retcode := 2;
2023: l_msg_count := Fnd_Msg_Pub.count_msg;
2024: FOR i IN 1..l_msg_count
2025: LOOP
2026: fnd_msg_pub.get( p_msg_index => i,
2027: p_encoded => FND_API.G_FALSE,
2028: p_data => l_err_msg,
2029: p_msg_index_out => l_msg_index_out);
2030:

Line 2038: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

2034:
2035: WHEN OTHERS THEN
2036: ROLLBACK TO Process_Primary_visits;
2037: retcode := 2;
2038: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2039: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2040: p_procedure_name => 'Process_Primary_visits',
2041: p_error_text => SUBSTR(SQLERRM,1,500));
2042: END IF;

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

2035: WHEN OTHERS THEN
2036: ROLLBACK TO Process_Primary_visits;
2037: retcode := 2;
2038: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2039: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2040: p_procedure_name => 'Process_Primary_visits',
2041: p_error_text => SUBSTR(SQLERRM,1,500));
2042: END IF;
2043: l_msg_count := Fnd_Msg_Pub.count_msg;

Line 2043: l_msg_count := Fnd_Msg_Pub.count_msg;

2039: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2040: p_procedure_name => 'Process_Primary_visits',
2041: p_error_text => SUBSTR(SQLERRM,1,500));
2042: END IF;
2043: l_msg_count := Fnd_Msg_Pub.count_msg;
2044: FOR i IN 1..l_msg_count
2045: LOOP
2046: fnd_msg_pub.get( p_msg_index => i,
2047: p_encoded => FND_API.G_FALSE,

Line 2046: fnd_msg_pub.get( p_msg_index => i,

2042: END IF;
2043: l_msg_count := Fnd_Msg_Pub.count_msg;
2044: FOR i IN 1..l_msg_count
2045: LOOP
2046: fnd_msg_pub.get( p_msg_index => i,
2047: p_encoded => FND_API.G_FALSE,
2048: p_data => l_err_msg,
2049: p_msg_index_out => l_msg_index_out);
2050: