[Home] [Help]
151:
152: l_stage_date_rec c_stage_date%rowtype;
153:
154: BEGIN
155: -- Standard start of API savepoint
156: SAVEPOINT Get_Stages_Details;
157:
158: -- Check if API is called in debug mode. If yes, enable debug.
159: IF G_DEBUG='Y' THEN
173:
174: -- Initialize API return status to success
175: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
176:
177: -- Standard call to check for call compatibility.
178: IF NOT Fnd_Api.compatible_api_call(
179: l_api_version,
180: p_api_version,
181: l_api_name,
253: --------------------------
254: x_stages_tbl := l_stages_tbl;
255:
256: ------------------------End of API Body------------------------------------
257: -- Standard call to get message count and if count is 1, get message info
258: Fnd_Msg_Pub.Count_And_Get
259: ( p_count => x_msg_count,
260: p_data => x_msg_data,
261: p_encoded => Fnd_Api.g_false);
364:
365: -- Initialize API return status to success
366: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
367:
368: -- Standard call to check for call compatibility.
369: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,
370: p_api_version,
371: l_api_name,G_PKG_NAME)
372: THEN
423: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
424: END IF;
425:
426:
427: /* --Standard check to count messages
428: l_msg_count := Fnd_Msg_Pub.count_msg;
429:
430: IF l_msg_count > 0 THEN
431: x_msg_count := l_msg_count;
487: END IF;
488: END LOOP;
489:
490: ---------------------------End of API Body---------------------------------------
491: --Standard check to count messages
492: l_msg_count := Fnd_Msg_Pub.count_msg;
493:
494: IF l_msg_count > 0 THEN
495: X_msg_count := l_msg_count;
496: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
497: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
498: END IF;
499:
500: --Standard check for commit
501: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
502: COMMIT;
503: END IF;
504:
623:
624: -- Initialize API return status to success
625: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
626:
627: -- Standard call to check for call compatibility.
628: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,
629: p_api_version,
630: l_api_name,G_PKG_NAME)
631: THEN
659: end if;
660: close c_check_visit_status;
661:
662: -- Commented by amagrawa as per review commenst.
663: /* --Standard check to count messages
664: l_msg_count := Fnd_Msg_Pub.count_msg;
665:
666: IF l_msg_count > 0 THEN
667: x_msg_count := l_msg_count;
818:
819: END IF;
820:
821:
822: --Standard check to count messages
823: l_msg_count := Fnd_Msg_Pub.count_msg;
824:
825: IF l_msg_count > 0 THEN
826: X_msg_count := l_msg_count;
827: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
828: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
829: END IF;
830:
831: --Standard check for commit
832: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
833: COMMIT;
834: END IF;
835:
923:
924: -- Initialize API return status to success
925: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
926:
927: -- Standard call to check for call compatibility.
928: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,
929: p_api_version,
930: l_api_name,G_PKG_NAME)
931: THEN
945:
946: -- directly delete as we need to delete all stages for the visit
947:
948: ---------------------------End of API Body---------------------------------------
949: --Standard check to count messages
950: l_msg_count := Fnd_Msg_Pub.count_msg;
951:
952: IF l_msg_count > 0 THEN
953: X_msg_count := l_msg_count;
954: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
955: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
956: END IF;
957:
958: --Standard check for commit
959: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
960: COMMIT;
961: END IF;
962: