DBA Data[Home] [Help]

APPS.AHL_VWP_TASKS_PUB dependencies on FND_API

Line 39: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

35: -- End of Comments
36: -------------------------------------------------------------------------------------------
37: PROCEDURE Create_Planned_Tasks (
38: p_api_version IN NUMBER,
39: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
40: p_commit IN VARCHAR2 := FND_API.G_FALSE,
41: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
42: p_visit_id IN NUMBER := null, -- Not needed if p_visit_number is given
43: p_visit_number IN NUMBER := null, -- Ignored if p_visit_id is given

Line 40: p_commit IN VARCHAR2 := FND_API.G_FALSE,

36: -------------------------------------------------------------------------------------------
37: PROCEDURE Create_Planned_Tasks (
38: p_api_version IN NUMBER,
39: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
40: p_commit IN VARCHAR2 := FND_API.G_FALSE,
41: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
42: p_visit_id IN NUMBER := null, -- Not needed if p_visit_number is given
43: p_visit_number IN NUMBER := null, -- Ignored if p_visit_id is given
44: p_department_id IN NUMBER := null, -- Not needed if p_department_code is given

Line 41: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

37: PROCEDURE Create_Planned_Tasks (
38: p_api_version IN NUMBER,
39: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
40: p_commit IN VARCHAR2 := FND_API.G_FALSE,
41: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
42: p_visit_id IN NUMBER := null, -- Not needed if p_visit_number is given
43: p_visit_number IN NUMBER := null, -- Ignored if p_visit_id is given
44: p_department_id IN NUMBER := null, -- Not needed if p_department_code is given
45: p_department_code IN VARCHAR2 := null, -- Ignored if p_department_id is given

Line 73: x_return_status := FND_API.G_RET_STS_SUCCESS;

69: -- Standard start of API savepoint
70: SAVEPOINT Create_Planned_Tasks_Pub;
71:
72: -- Initialize Procedure return status to success
73: x_return_status := FND_API.G_RET_STS_SUCCESS;
74:
75: -- Standard call to check for call compatibility
76: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
77: l_api_name, G_PKG_NAME) THEN

Line 76: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,

72: -- Initialize Procedure return status to success
73: x_return_status := FND_API.G_RET_STS_SUCCESS;
74:
75: -- Standard call to check for call compatibility
76: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
77: l_api_name, G_PKG_NAME) THEN
78: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
79: END IF;
80:

Line 78: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

74:
75: -- Standard call to check for call compatibility
76: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
77: l_api_name, G_PKG_NAME) THEN
78: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
79: END IF;
80:
81: -- Initialize message list if p_init_msg_list is set to TRUE
82: IF FND_API.To_Boolean(p_init_msg_list) THEN

Line 82: IF FND_API.To_Boolean(p_init_msg_list) THEN

78: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
79: END IF;
80:
81: -- Initialize message list if p_init_msg_list is set to TRUE
82: IF FND_API.To_Boolean(p_init_msg_list) THEN
83: FND_MSG_PUB.Initialize;
84: END IF;
85:
86: -- Validate the input and prepare for subsequent calls

Line 99: p_init_msg_list => Fnd_Api.g_false,

95: FND_LOG.string(FND_LOG.level_statement, l_full_name, 'About to call AHL_VWP_TASKS_PVT.Create_PUP_Tasks.');
96: END IF;
97:
98: AHL_VWP_TASKS_PVT.Create_PUP_Tasks(p_api_version => 1.0,
99: p_init_msg_list => Fnd_Api.g_false,
100: p_commit => Fnd_Api.g_false,
101: p_validation_level => Fnd_Api.g_valid_level_full,
102: p_module_type => 'API',
103: p_x_task_tbl => p_x_tasks_tbl,

Line 100: p_commit => Fnd_Api.g_false,

96: END IF;
97:
98: AHL_VWP_TASKS_PVT.Create_PUP_Tasks(p_api_version => 1.0,
99: p_init_msg_list => Fnd_Api.g_false,
100: p_commit => Fnd_Api.g_false,
101: p_validation_level => Fnd_Api.g_valid_level_full,
102: p_module_type => 'API',
103: p_x_task_tbl => p_x_tasks_tbl,
104: x_return_status => x_return_status,

Line 101: p_validation_level => Fnd_Api.g_valid_level_full,

97:
98: AHL_VWP_TASKS_PVT.Create_PUP_Tasks(p_api_version => 1.0,
99: p_init_msg_list => Fnd_Api.g_false,
100: p_commit => Fnd_Api.g_false,
101: p_validation_level => Fnd_Api.g_valid_level_full,
102: p_module_type => 'API',
103: p_x_task_tbl => p_x_tasks_tbl,
104: x_return_status => x_return_status,
105: x_msg_count => x_msg_count,

Line 112: IF(x_return_status = FND_API.G_RET_STS_ERROR) THEN

108: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
109: FND_LOG.string(FND_LOG.level_statement, l_full_name, 'Returned from AHL_VWP_TASKS_PVT.Create_PUP_Tasks. x_return_status = ' || x_return_status);
110: END IF;
111:
112: IF(x_return_status = FND_API.G_RET_STS_ERROR) THEN
113: RAISE FND_API.G_EXC_ERROR;
114: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
115: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
116: END IF;

Line 113: RAISE FND_API.G_EXC_ERROR;

109: FND_LOG.string(FND_LOG.level_statement, l_full_name, 'Returned from AHL_VWP_TASKS_PVT.Create_PUP_Tasks. x_return_status = ' || x_return_status);
110: END IF;
111:
112: IF(x_return_status = FND_API.G_RET_STS_ERROR) THEN
113: RAISE FND_API.G_EXC_ERROR;
114: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
115: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
116: END IF;
117:

Line 114: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

110: END IF;
111:
112: IF(x_return_status = FND_API.G_RET_STS_ERROR) THEN
113: RAISE FND_API.G_EXC_ERROR;
114: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
115: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
116: END IF;
117:
118: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN

Line 115: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

111:
112: IF(x_return_status = FND_API.G_RET_STS_ERROR) THEN
113: RAISE FND_API.G_EXC_ERROR;
114: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
115: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
116: END IF;
117:
118: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
119: FND_LOG.string(FND_LOG.level_statement, l_full_name, 'For index ' || p_x_tasks_tbl.FIRST ||

Line 125: IF FND_API.TO_BOOLEAN(p_commit) THEN

121: ', Visit Task Id = ' || p_x_tasks_tbl(p_x_tasks_tbl.FIRST).VISIT_TASK_ID);
122: END IF;
123:
124: -- Standard check of p_commit
125: IF FND_API.TO_BOOLEAN(p_commit) THEN
126: COMMIT WORK;
127: END IF;
128:
129: -- Standard call to get message count and if count is 1, get message info

Line 133: p_encoded => FND_API.G_FALSE

129: -- Standard call to get message count and if count is 1, get message info
130: FND_MSG_PUB.Count_And_Get
131: ( p_count => x_msg_count,
132: p_data => x_msg_data,
133: p_encoded => FND_API.G_FALSE
134: );
135:
136: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
137: FND_LOG.string(FND_LOG.level_procedure, l_full_name || '.end', 'End of the API');

Line 141: WHEN FND_API.G_EXC_ERROR THEN

137: FND_LOG.string(FND_LOG.level_procedure, l_full_name || '.end', 'End of the API');
138: END IF;
139:
140: EXCEPTION
141: WHEN FND_API.G_EXC_ERROR THEN
142: Rollback to Create_Planned_Tasks_Pub;
143: x_return_status := FND_API.G_RET_STS_ERROR;
144: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
145: p_data => x_msg_data,

Line 143: x_return_status := FND_API.G_RET_STS_ERROR;

139:
140: EXCEPTION
141: WHEN FND_API.G_EXC_ERROR THEN
142: Rollback to Create_Planned_Tasks_Pub;
143: x_return_status := FND_API.G_RET_STS_ERROR;
144: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
145: p_data => x_msg_data,
146: p_encoded => fnd_api.g_false);
147:

Line 146: p_encoded => fnd_api.g_false);

142: Rollback to Create_Planned_Tasks_Pub;
143: x_return_status := FND_API.G_RET_STS_ERROR;
144: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
145: p_data => x_msg_data,
146: p_encoded => fnd_api.g_false);
147:
148: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
149: Rollback to Create_Planned_Tasks_Pub;
150: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 148: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

144: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
145: p_data => x_msg_data,
146: p_encoded => fnd_api.g_false);
147:
148: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
149: Rollback to Create_Planned_Tasks_Pub;
150: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
151: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
152: p_data => x_msg_data,

Line 150: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

146: p_encoded => fnd_api.g_false);
147:
148: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
149: Rollback to Create_Planned_Tasks_Pub;
150: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
151: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
152: p_data => x_msg_data,
153: p_encoded => fnd_api.g_false);
154:

Line 153: p_encoded => fnd_api.g_false);

149: Rollback to Create_Planned_Tasks_Pub;
150: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
151: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
152: p_data => x_msg_data,
153: p_encoded => fnd_api.g_false);
154:
155: WHEN OTHERS THEN
156: Rollback to Create_Planned_Tasks_Pub;
157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

153: p_encoded => fnd_api.g_false);
154:
155: WHEN OTHERS THEN
156: Rollback to Create_Planned_Tasks_Pub;
157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
158: FND_MSG_PUB.Add_Exc_Msg( p_pkg_name => G_PKG_NAME,
159: p_procedure_name => l_api_name,
160: p_error_text => SQLERRM);
161: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

Line 163: p_encoded => FND_API.G_FALSE);

159: p_procedure_name => l_api_name,
160: p_error_text => SQLERRM);
161: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
162: p_data => x_msg_data,
163: p_encoded => FND_API.G_FALSE);
164:
165: END Create_Planned_Tasks;
166:
167: -- This API validates the input params and raises an exception in case any are invalid

Line 249: RAISE FND_API.G_EXC_ERROR;

245: CLOSE validate_visit_number_csr;
246: END IF;
247: END IF;
248: IF(NOT l_valid_flag) THEN
249: RAISE FND_API.G_EXC_ERROR;
250: END IF;
251:
252: IF (p_department_id IS NOT NULL) THEN
253: IF (l_org_id IS NULL) THEN

Line 282: RAISE FND_API.G_EXC_ERROR;

278: END IF;
279: CLOSE validate_dept_code_csr;
280: END IF;
281: IF(NOT l_valid_flag) THEN
282: RAISE FND_API.G_EXC_ERROR;
283: END IF;
284:
285: -- Validate and pre-process the tasks table
286: IF (p_x_tasks_tbl.COUNT < 1) THEN

Line 290: RAISE FND_API.G_EXC_ERROR;

286: IF (p_x_tasks_tbl.COUNT < 1) THEN
287: -- input is NULL
288: FND_MESSAGE.Set_Name('AHL', 'AHL_TASKS_TBL_EMPTY'); --@@@@@
289: FND_MSG_PUB.ADD;
290: RAISE FND_API.G_EXC_ERROR;
291: END IF;
292:
293: l_index := p_x_tasks_tbl.FIRST;
294: WHILE (l_index <= p_x_tasks_tbl.LAST) LOOP

Line 305: RAISE FND_API.G_EXC_ERROR;

301: -- Validate and copy only relevant fields to l_dest_rec
302: IF (p_x_tasks_tbl(l_index).UNIT_EFFECTIVITY_ID IS NULL) THEN
303: Fnd_Message.SET_NAME('AHL', 'AHL_VWP_NO_UNIT_EFFECTIVITY');
304: Fnd_Msg_Pub.ADD;
305: RAISE FND_API.G_EXC_ERROR;
306: ELSE
307: OPEN check_group_mr_csr(p_x_tasks_tbl(l_index).UNIT_EFFECTIVITY_ID);
308: FETCH check_group_mr_csr INTO l_temp_num;
309: IF(check_group_mr_csr%FOUND) THEN

Line 313: RAISE FND_API.G_EXC_ERROR;

309: IF(check_group_mr_csr%FOUND) THEN
310: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_NO_CHILD_ASSOC_VISIT');
311: FND_MSG_PUB.ADD;
312: CLOSE check_group_mr_csr;
313: RAISE FND_API.G_EXC_ERROR;
314: END IF;
315: CLOSE check_group_mr_csr;
316:
317: -- Remaining validations of this UE happen at AHL_VWP_PLAN_TASKS_PVT.Create_Planned_Task