DBA Data[Home] [Help]

APPS.AHL_VWP_TASKS_PUB dependencies on FND_MSG_PUB

Line 83: FND_MSG_PUB.Initialize;

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
87: -- If there are errors, an exception is raised.

Line 130: FND_MSG_PUB.Count_And_Get

126: COMMIT WORK;
127: END IF;
128:
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: );

Line 144: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

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:
148: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 151: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

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:
155: WHEN OTHERS THEN

Line 158: FND_MSG_PUB.Add_Exc_Msg( p_pkg_name => G_PKG_NAME,

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,
162: p_data => x_msg_data,

Line 161: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,

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,
162: p_data => x_msg_data,
163: p_encoded => FND_API.G_FALSE);
164:
165: END Create_Planned_Tasks;

Line 220: FND_MSG_PUB.ADD;

216: FND_LOG.string(FND_LOG.level_procedure, l_full_name || '.begin', 'At the start of the API');
217: END IF;
218: IF (p_visit_id IS NULL and p_visit_number IS NULL) THEN
219: FND_MESSAGE.Set_Name('AHL', 'AHL_LTP_INVALID_VISIT_NUMBER');
220: FND_MSG_PUB.ADD;
221: l_valid_flag := false;
222: ELSE
223: IF (p_visit_id IS NOT NULL) THEN
224: -- Validate the visit_id and set l_visit_id

Line 230: FND_MSG_PUB.ADD;

226: FETCH validate_visit_id_csr INTO l_org_id;
227: IF(validate_visit_id_csr%NOTFOUND) THEN
228: FND_MESSAGE.Set_Name('AHL', 'AHL_VISIT_ID_INVALID'); --@@@@@
229: FND_MESSAGE.Set_Token('VISIT_ID', p_visit_id);
230: FND_MSG_PUB.ADD;
231: l_valid_flag := false;
232: ELSE
233: l_visit_id := p_visit_id;
234: END IF;

Line 242: FND_MSG_PUB.ADD;

238: OPEN validate_visit_number_csr(p_visit_number);
239: FETCH validate_visit_number_csr INTO l_visit_id, l_org_id;
240: IF(validate_visit_number_csr%NOTFOUND) THEN
241: FND_MESSAGE.Set_Name('AHL', 'AHL_LTP_INVALID_VISIT_NUMBER');
242: FND_MSG_PUB.ADD;
243: l_valid_flag := false;
244: END IF;
245: CLOSE validate_visit_number_csr;
246: END IF;

Line 256: FND_MSG_PUB.ADD;

252: IF (p_department_id IS NOT NULL) THEN
253: IF (l_org_id IS NULL) THEN
254: -- Cannot add task since the visit does not have an org
255: FND_MESSAGE.Set_Name('AHL', 'AHL_VWP_VISIT_ORG_NOT_SET'); -- @@@@@
256: FND_MSG_PUB.ADD;
257: l_valid_flag := false;
258: ELSE
259: -- Validate the department_id and set l_dept_id
260: OPEN validate_dept_id_csr(p_department_id, l_org_id);

Line 264: FND_MSG_PUB.ADD;

260: OPEN validate_dept_id_csr(p_department_id, l_org_id);
261: FETCH validate_dept_id_csr INTO l_dept_id;
262: IF(validate_dept_id_csr%NOTFOUND) THEN
263: FND_MESSAGE.Set_Name('AHL', 'AHL_LTP_DEPT_ID_NOT_EXIST');
264: FND_MSG_PUB.ADD;
265: l_valid_flag := false;
266: END IF;
267: CLOSE validate_dept_id_csr;
268: END IF;

Line 276: FND_MSG_PUB.ADD;

272: FETCH validate_dept_code_csr INTO l_dept_id;
273: IF(validate_dept_code_csr%NOTFOUND) THEN
274: FND_MESSAGE.Set_Name('AHL', 'AHL_VWP_DEPT_CODE_INVALID'); --@@@@@
275: FND_MESSAGE.Set_Token('DEPT_CODE', p_department_code);
276: FND_MSG_PUB.ADD;
277: l_valid_flag := false;
278: END IF;
279: CLOSE validate_dept_code_csr;
280: END IF;

Line 289: FND_MSG_PUB.ADD;

285: -- Validate and pre-process the tasks table
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;

Line 304: Fnd_Msg_Pub.ADD;

300: END IF;
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;

Line 311: FND_MSG_PUB.ADD;

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
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;