98: END IF;
99:
100: -- Return FALSE if
101: -- (1) return status is error and vendor site is not exempt from CCR;
102: IF (l_return_status = FND_API.G_RET_STS_ERROR AND l_error_code <> G_SITE_NOT_CCR_SITE)
103: OR
104: -- (2) return status is success but registration status is not ACTIVE;
105: (l_return_status = FND_API.G_RET_STS_SUCCESS AND l_ccr_status <> G_SITE_REG_ACTIVE)
106: OR
101: -- (1) return status is error and vendor site is not exempt from CCR;
102: IF (l_return_status = FND_API.G_RET_STS_ERROR AND l_error_code <> G_SITE_NOT_CCR_SITE)
103: OR
104: -- (2) return status is success but registration status is not ACTIVE;
105: (l_return_status = FND_API.G_RET_STS_SUCCESS AND l_ccr_status <> G_SITE_REG_ACTIVE)
106: OR
107: -- (3) return status is unexpected error
108: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
109:
104: -- (2) return status is success but registration status is not ACTIVE;
105: (l_return_status = FND_API.G_RET_STS_SUCCESS AND l_ccr_status <> G_SITE_REG_ACTIVE)
106: OR
107: -- (3) return status is unexpected error
108: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
109:
110: l_progress := '030';
111: IF g_debug_stmt THEN
112: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN