853: ,p_level => C_LEVEL_PROCEDURE
854: ,p_module => l_log_module);
855: END IF;
856:
857: IF (NOT fnd_api.compatible_api_call
858: (p_current_version_number => p_api_version
859: ,p_caller_version_number => l_api_version
860: ,p_api_name => l_api_name
861: ,p_pkg_name => C_DEFAULT_MODULE)) THEN
858: (p_current_version_number => p_api_version
859: ,p_caller_version_number => l_api_version
860: ,p_api_name => l_api_name
861: ,p_pkg_name => C_DEFAULT_MODULE)) THEN
862: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
863: ELSE
864:
865: /******************************/
866: /*** Added for bug 9286886 ****/
891: ,p_ledger_id => p_ledger_id
892: ,p_period_name => p_period_name);
893:
894: IF l_return_status = 'TRUE' THEN
895: x_return_status := FND_API.G_RET_STS_SUCCESS;
896: ELSIF l_return_status = 'FALSE' THEN
897: x_return_status := FND_API.G_RET_STS_ERROR;
898: ELSIF l_return_status = 'ERROR' THEN
899: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
893:
894: IF l_return_status = 'TRUE' THEN
895: x_return_status := FND_API.G_RET_STS_SUCCESS;
896: ELSIF l_return_status = 'FALSE' THEN
897: x_return_status := FND_API.G_RET_STS_ERROR;
898: ELSIF l_return_status = 'ERROR' THEN
899: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
900: END IF;
901:
895: x_return_status := FND_API.G_RET_STS_SUCCESS;
896: ELSIF l_return_status = 'FALSE' THEN
897: x_return_status := FND_API.G_RET_STS_ERROR;
898: ELSIF l_return_status = 'ERROR' THEN
899: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
900: END IF;
901:
902: ELSE /* Else if of l_adjustment_flag */
903: x_return_status := FND_API.G_RET_STS_SUCCESS;
899: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
900: END IF;
901:
902: ELSE /* Else if of l_adjustment_flag */
903: x_return_status := FND_API.G_RET_STS_SUCCESS;
904:
905: END IF; /* End if of l_adjustment_flag */
906:
907:
914: ,p_module => l_log_module);
915: END IF;
916:
917: EXCEPTION
918: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
919: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
920: WHEN OTHERS THEN
921: IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
922: trace
915: END IF;
916:
917: EXCEPTION
918: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
919: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
920: WHEN OTHERS THEN
921: IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
922: trace
923: ( p_msg => 'End of Period Close function for Subledger
924: check with error'
925: ,p_level => C_LEVEL_PROCEDURE
926: ,p_module => l_log_module);
927: END IF;
928: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
929: END period_close;
930:
931: FUNCTION period_close(p_subscription_guid IN raw
932: ,p_event IN OUT NOCOPY WF_EVENT_T)