eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

[Home] [Help]

APPS.AHL_VISIT_TYPE_PVT dependencies on FND_API

Line 22: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,

18: -- Parameters : p_visit_type_id
19: ----------------------------------------------------------------------
20: PROCEDURE Delete_Visit_Type (
21: p_api_version IN NUMBER,
22: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
23: p_commit IN VARCHAR2 := Fnd_Api.g_false,
24: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
25: p_module_type IN VARCHAR2 := NULL,
26: p_visit_type_id IN NUMBER,

Line 23: p_commit IN VARCHAR2 := Fnd_Api.g_false,

19: ----------------------------------------------------------------------
20: PROCEDURE Delete_Visit_Type (
21: p_api_version IN NUMBER,
22: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
23: p_commit IN VARCHAR2 := Fnd_Api.g_false,
24: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
25: p_module_type IN VARCHAR2 := NULL,
26: p_visit_type_id IN NUMBER,
27: x_return_status OUT NOCOPY VARCHAR2,

Line 24: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,

20: PROCEDURE Delete_Visit_Type (
21: p_api_version IN NUMBER,
22: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
23: p_commit IN VARCHAR2 := Fnd_Api.g_false,
24: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
25: p_module_type IN VARCHAR2 := NULL,
26: p_visit_type_id IN NUMBER,
27: x_return_status OUT NOCOPY VARCHAR2,
28: x_msg_count OUT NOCOPY NUMBER,

Line 54: IF FND_API.to_boolean(p_init_msg_list) THEN

50: END IF;
51:
52: -- Initialize API return status to success
53: -- Initialize message list if p_init_msg_list is set to TRUE.
54: IF FND_API.to_boolean(p_init_msg_list) THEN
55: FND_MSG_PUB.initialize;
56: END IF;
57:
58: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 58: x_return_status := FND_API.G_RET_STS_SUCCESS;

54: IF FND_API.to_boolean(p_init_msg_list) THEN
55: FND_MSG_PUB.initialize;
56: END IF;
57:
58: x_return_status := FND_API.G_RET_STS_SUCCESS;
59:
60: -- Standard call to check for call compatibility.
61: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
62: p_api_version,

Line 61: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,

57:
58: x_return_status := FND_API.G_RET_STS_SUCCESS;
59:
60: -- Standard call to check for call compatibility.
61: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
62: p_api_version,
63: l_api_name,G_PKG_NAME) THEN
64: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
65: END IF;

Line 64: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

60: -- Standard call to check for call compatibility.
61: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
62: p_api_version,
63: l_api_name,G_PKG_NAME) THEN
64: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
65: END IF;
66:
67: ------------------------Start of API Body------------------------------------
68:

Line 111: x_return_status := FND_API.G_RET_STS_ERROR;

107:
108: IF ( SQL%ROWCOUNT = 0 ) THEN
109: FND_MESSAGE.set_name('AHL','AHL_VST_TYP_REC_CHNGD');
110: FND_MSG_PUB.add;
111: x_return_status := FND_API.G_RET_STS_ERROR;
112: END IF;
113:
114: ------------------------End of API Body--------------------------------------
115:

Line 117: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

113:
114: ------------------------End of API Body--------------------------------------
115:
116: --Standard check for commit
117: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
118: COMMIT;
119: END IF;
120:
121: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN

Line 127: WHEN Fnd_Api.g_exc_error THEN

123: END IF;
124:
125: EXCEPTION
126:
127: WHEN Fnd_Api.g_exc_error THEN
128: ROLLBACK TO Delete_Visit_Type;
129: x_return_status := Fnd_Api.g_ret_sts_error;
130: Fnd_Msg_Pub.count_and_get (
131: p_encoded => Fnd_Api.g_false,

Line 129: x_return_status := Fnd_Api.g_ret_sts_error;

125: EXCEPTION
126:
127: WHEN Fnd_Api.g_exc_error THEN
128: ROLLBACK TO Delete_Visit_Type;
129: x_return_status := Fnd_Api.g_ret_sts_error;
130: Fnd_Msg_Pub.count_and_get (
131: p_encoded => Fnd_Api.g_false,
132: p_count => x_msg_count,
133: p_data => x_msg_data);

Line 131: p_encoded => Fnd_Api.g_false,

127: WHEN Fnd_Api.g_exc_error THEN
128: ROLLBACK TO Delete_Visit_Type;
129: x_return_status := Fnd_Api.g_ret_sts_error;
130: Fnd_Msg_Pub.count_and_get (
131: p_encoded => Fnd_Api.g_false,
132: p_count => x_msg_count,
133: p_data => x_msg_data);
134: AHL_DEBUG_PUB.debug('Delete_Visit_Type: In g_exc_unexpected_error block ' || ' x_msg_count ' || x_msg_count );
135:

Line 136: WHEN Fnd_Api.g_exc_unexpected_error THEN

132: p_count => x_msg_count,
133: p_data => x_msg_data);
134: AHL_DEBUG_PUB.debug('Delete_Visit_Type: In g_exc_unexpected_error block ' || ' x_msg_count ' || x_msg_count );
135:
136: WHEN Fnd_Api.g_exc_unexpected_error THEN
137: ROLLBACK TO Delete_Visit_Type;
138: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
139: Fnd_Msg_Pub.count_and_get (
140: p_encoded => Fnd_Api.g_false,

Line 138: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

134: AHL_DEBUG_PUB.debug('Delete_Visit_Type: In g_exc_unexpected_error block ' || ' x_msg_count ' || x_msg_count );
135:
136: WHEN Fnd_Api.g_exc_unexpected_error THEN
137: ROLLBACK TO Delete_Visit_Type;
138: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
139: Fnd_Msg_Pub.count_and_get (
140: p_encoded => Fnd_Api.g_false,
141: p_count => x_msg_count,
142: p_data => x_msg_data);

Line 140: p_encoded => Fnd_Api.g_false,

136: WHEN Fnd_Api.g_exc_unexpected_error THEN
137: ROLLBACK TO Delete_Visit_Type;
138: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
139: Fnd_Msg_Pub.count_and_get (
140: p_encoded => Fnd_Api.g_false,
141: p_count => x_msg_count,
142: p_data => x_msg_data);
143: AHL_DEBUG_PUB.debug('Delete_Visit_Type: In g_exc_unexpected_error block ' || ' x_msg_count ' || x_msg_count );
144:

Line 148: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

144:
145:
146: WHEN OTHERS THEN
147: ROLLBACK TO Delete_Visit_Type;
148: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
149: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
150: THEN
151: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
152: END IF;

Line 154: p_encoded => Fnd_Api.g_false,

150: THEN
151: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
152: END IF;
153: Fnd_Msg_Pub.count_and_get (
154: p_encoded => Fnd_Api.g_false,
155: p_count => x_msg_count,
156: p_data => x_msg_data);
157: AHL_DEBUG_PUB.debug('Delete_Visit_Type: In OTHERS block ' || ' x_msg_count ' || x_msg_count );
158:

Line 169: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,

165: -- Parameters : p_obj_version_num
166: ----------------------------------------------------------------------
167: PROCEDURE Complete_Visit_Type (
168: p_api_version IN NUMBER,
169: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
170: p_commit IN VARCHAR2 := Fnd_Api.g_false,
171: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
172: p_module_type IN VARCHAR2 := NULL,
173: p_visit_type_id IN NUMBER,

Line 170: p_commit IN VARCHAR2 := Fnd_Api.g_false,

166: ----------------------------------------------------------------------
167: PROCEDURE Complete_Visit_Type (
168: p_api_version IN NUMBER,
169: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
170: p_commit IN VARCHAR2 := Fnd_Api.g_false,
171: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
172: p_module_type IN VARCHAR2 := NULL,
173: p_visit_type_id IN NUMBER,
174: p_obj_version_num IN NUMBER,

Line 171: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,

167: PROCEDURE Complete_Visit_Type (
168: p_api_version IN NUMBER,
169: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
170: p_commit IN VARCHAR2 := Fnd_Api.g_false,
171: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
172: p_module_type IN VARCHAR2 := NULL,
173: p_visit_type_id IN NUMBER,
174: p_obj_version_num IN NUMBER,
175: x_return_status OUT NOCOPY VARCHAR2,

Line 244: IF FND_API.to_boolean(p_init_msg_list) THEN

240: END IF;
241:
242: -- Initialize API return status to success
243: -- Initialize message list if p_init_msg_list is set to TRUE.
244: IF FND_API.to_boolean(p_init_msg_list) THEN
245: FND_MSG_PUB.initialize;
246: END IF;
247:
248: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 248: x_return_status := FND_API.G_RET_STS_SUCCESS;

244: IF FND_API.to_boolean(p_init_msg_list) THEN
245: FND_MSG_PUB.initialize;
246: END IF;
247:
248: x_return_status := FND_API.G_RET_STS_SUCCESS;
249:
250: -- Standard call to check for call compatibility.
251: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
252: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 251: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

247:
248: x_return_status := FND_API.G_RET_STS_SUCCESS;
249:
250: -- Standard call to check for call compatibility.
251: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
252: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
253: END IF;
254:
255:

Line 252: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

248: x_return_status := FND_API.G_RET_STS_SUCCESS;
249:
250: -- Standard call to check for call compatibility.
251: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
252: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
253: END IF;
254:
255:
256: ------------------------Start of API Body------------------------------------

Line 283: RAISE Fnd_Api.G_EXC_ERROR;

279: Fnd_Message.SET_NAME('AHL','AHL_VWP_VST_TYPE_STG_REQ');
280: Fnd_Message.Set_Token('VISIT_TYPE', l_visit_type);
281: Fnd_Message.Set_Token('MASTER_CONFIG', L_MC_Name);
282: Fnd_Msg_Pub.ADD;
283: RAISE Fnd_Api.G_EXC_ERROR;
284: END IF;
285:
286: -- check if any of the stages have stage type count as 0, If yes
287: -- error is thrown that atleast one stage type has to be there

Line 297: RAISE Fnd_Api.G_EXC_ERROR;

293: Fnd_Message.Set_Token('VISIT_TYPE', l_visit_type);
294: Fnd_Message.Set_Token('MASTER_CONFIG', L_MC_Name);
295: Fnd_Message.Set_Token('STAGE_NUM', stage_rec.STAGE_NUMBER);
296: Fnd_Msg_Pub.ADD;
297: RAISE Fnd_Api.G_EXC_ERROR;
298: END IF;
299:
300: END LOOP;
301:

Line 311: p_commit => FND_API.G_FALSE,

307:
308: Delete_Visit_Type (
309: p_api_version => 1.0,
310: p_init_msg_list => p_init_msg_list,
311: p_commit => FND_API.G_FALSE,
312: p_validation_level => p_validation_level,
313: p_module_type => p_module_type,
314: p_visit_type_id => L_linked_vst_typ_id,
315: x_return_status => l_return_status,

Line 324: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

320: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
321: fnd_log.string(fnd_log.level_statement,L_DEBUG,'Return Status after calling Delete_Visit_Type = '|| l_return_status);
322: END IF;
323:
324: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
325: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
326: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
327: RAISE FND_API.G_EXC_ERROR;
328: END IF;

Line 325: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

321: fnd_log.string(fnd_log.level_statement,L_DEBUG,'Return Status after calling Delete_Visit_Type = '|| l_return_status);
322: END IF;
323:
324: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
325: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
326: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
327: RAISE FND_API.G_EXC_ERROR;
328: END IF;
329:

Line 326: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

322: END IF;
323:
324: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
325: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
326: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
327: RAISE FND_API.G_EXC_ERROR;
328: END IF;
329:
330: END IF;

Line 327: RAISE FND_API.G_EXC_ERROR;

323:
324: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
325: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
326: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
327: RAISE FND_API.G_EXC_ERROR;
328: END IF;
329:
330: END IF;
331:

Line 334: IF(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN

330: END IF;
331:
332:
333: --If Return Status is successful, there has been no error in deleting the record already in complete status
334: IF(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
335:
336: AHL_DEBUG_PUB.debug(L_DEBUG || ': p_visit_type_id-' || p_visit_type_id || ': About to Complete visit type');
337:
338: UPDATE AHL_VISIT_TYPES_B

Line 351: x_return_status := FND_API.G_RET_STS_ERROR;

347:
348: IF(SQL%ROWCOUNT = 0 ) THEN
349: FND_MESSAGE.set_name('AHL','AHL_VWP_VST_TYP_REC_CHNGD');
350: FND_MSG_PUB.add;
351: x_return_status := FND_API.G_RET_STS_ERROR;
352: END IF;
353: END IF;
354:
355:

Line 359: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

355:
356: ------------------------End of API Body------------------------------------
357:
358: --Standard check for commit
359: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
360: COMMIT;
361: END IF;
362:
363: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN

Line 369: WHEN Fnd_Api.g_exc_error THEN

365: END IF;
366:
367: EXCEPTION
368:
369: WHEN Fnd_Api.g_exc_error THEN
370: ROLLBACK TO Complete_Visit_Type;
371: x_return_status := Fnd_Api.g_ret_sts_error;
372: Fnd_Msg_Pub.count_and_get (
373: p_encoded => Fnd_Api.g_false,

Line 371: x_return_status := Fnd_Api.g_ret_sts_error;

367: EXCEPTION
368:
369: WHEN Fnd_Api.g_exc_error THEN
370: ROLLBACK TO Complete_Visit_Type;
371: x_return_status := Fnd_Api.g_ret_sts_error;
372: Fnd_Msg_Pub.count_and_get (
373: p_encoded => Fnd_Api.g_false,
374: p_count => x_msg_count,
375: p_data => x_msg_data);

Line 373: p_encoded => Fnd_Api.g_false,

369: WHEN Fnd_Api.g_exc_error THEN
370: ROLLBACK TO Complete_Visit_Type;
371: x_return_status := Fnd_Api.g_ret_sts_error;
372: Fnd_Msg_Pub.count_and_get (
373: p_encoded => Fnd_Api.g_false,
374: p_count => x_msg_count,
375: p_data => x_msg_data);
376: AHL_DEBUG_PUB.debug('Complete_Visit_Type: In g_exc_error block ' || ' x_msg_count ' || x_msg_count );
377:

Line 378: WHEN Fnd_Api.g_exc_unexpected_error THEN

374: p_count => x_msg_count,
375: p_data => x_msg_data);
376: AHL_DEBUG_PUB.debug('Complete_Visit_Type: In g_exc_error block ' || ' x_msg_count ' || x_msg_count );
377:
378: WHEN Fnd_Api.g_exc_unexpected_error THEN
379: ROLLBACK TO Complete_Visit_Type;
380: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
381: Fnd_Msg_Pub.count_and_get (
382: p_encoded => Fnd_Api.g_false,

Line 380: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

376: AHL_DEBUG_PUB.debug('Complete_Visit_Type: In g_exc_error block ' || ' x_msg_count ' || x_msg_count );
377:
378: WHEN Fnd_Api.g_exc_unexpected_error THEN
379: ROLLBACK TO Complete_Visit_Type;
380: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
381: Fnd_Msg_Pub.count_and_get (
382: p_encoded => Fnd_Api.g_false,
383: p_count => x_msg_count,
384: p_data => x_msg_data);

Line 382: p_encoded => Fnd_Api.g_false,

378: WHEN Fnd_Api.g_exc_unexpected_error THEN
379: ROLLBACK TO Complete_Visit_Type;
380: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
381: Fnd_Msg_Pub.count_and_get (
382: p_encoded => Fnd_Api.g_false,
383: p_count => x_msg_count,
384: p_data => x_msg_data);
385: AHL_DEBUG_PUB.debug('Complete_Visit_Type: In G_EXC_UNEXPECTED_ERROR block ' || ' x_msg_count ' || x_msg_count );
386:

Line 390: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

386:
387:
388: WHEN OTHERS THEN
389: ROLLBACK TO Complete_Visit_Type;
390: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
391: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
392: THEN
393: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
394: END IF;

Line 396: p_encoded => Fnd_Api.g_false,

392: THEN
393: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
394: END IF;
395: Fnd_Msg_Pub.count_and_get (
396: p_encoded => Fnd_Api.g_false,
397: p_count => x_msg_count,
398: p_data => x_msg_data);
399: AHL_DEBUG_PUB.debug('Complete_Visit_Type: In OTHERS block ' || ' x_msg_count ' || x_msg_count );
400:

Line 411: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,

407: -- Parameters : p_visit_type_id
408: ----------------------------------------------------------------------
409: PROCEDURE Create_Rev_Visit_Type (
410: p_api_version IN NUMBER,
411: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
412: p_commit IN VARCHAR2 := Fnd_Api.g_false,
413: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
414: p_module_type IN VARCHAR2 := NULL,
415: p_visit_type_id IN NUMBER,

Line 412: p_commit IN VARCHAR2 := Fnd_Api.g_false,

408: ----------------------------------------------------------------------
409: PROCEDURE Create_Rev_Visit_Type (
410: p_api_version IN NUMBER,
411: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
412: p_commit IN VARCHAR2 := Fnd_Api.g_false,
413: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
414: p_module_type IN VARCHAR2 := NULL,
415: p_visit_type_id IN NUMBER,
416: p_par_visit_type_id IN NUMBER,

Line 413: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,

409: PROCEDURE Create_Rev_Visit_Type (
410: p_api_version IN NUMBER,
411: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
412: p_commit IN VARCHAR2 := Fnd_Api.g_false,
413: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
414: p_module_type IN VARCHAR2 := NULL,
415: p_visit_type_id IN NUMBER,
416: p_par_visit_type_id IN NUMBER,
417: x_return_status OUT NOCOPY VARCHAR2,

Line 477: IF FND_API.to_boolean(p_init_msg_list) THEN

473: fnd_log.string(fnd_log.level_statement,L_DEBUG,'Visit Type id of the record whose revision is created '|| p_par_visit_type_id);
474: END IF;
475:
476: -- Initialize message list if p_init_msg_list is set to TRUE.
477: IF FND_API.to_boolean(p_init_msg_list) THEN
478: FND_MSG_PUB.initialize;
479: END IF;
480:
481: -- Initialize API return status to success

Line 482: x_return_status := FND_API.G_RET_STS_SUCCESS;

478: FND_MSG_PUB.initialize;
479: END IF;
480:
481: -- Initialize API return status to success
482: x_return_status := FND_API.G_RET_STS_SUCCESS;
483:
484: -- Standard call to check for call compatibility.
485: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
486: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 485: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

481: -- Initialize API return status to success
482: x_return_status := FND_API.G_RET_STS_SUCCESS;
483:
484: -- Standard call to check for call compatibility.
485: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
486: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
487: END IF;
488:
489: ------------------------Start of API Body------------------------------------

Line 486: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

482: x_return_status := FND_API.G_RET_STS_SUCCESS;
483:
484: -- Standard call to check for call compatibility.
485: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
486: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
487: END IF;
488:
489: ------------------------Start of API Body------------------------------------
490:

Line 502: RAISE Fnd_Api.G_EXC_ERROR;

498: Fnd_Message.SET_NAME('AHL','AHL_VWP_VST_TYP_DRAFT_EXISTS');
499: Fnd_Message.Set_Token('VISIT_TYPE', L_visit_type);
500: Fnd_Message.Set_Token('MC_NAME', L_mc_name);
501: Fnd_Msg_Pub.ADD;
502: RAISE Fnd_Api.G_EXC_ERROR;
503: END IF;
504:
505:
506: -- To Create a revision a new record has to be created with the same data. For it following records need to be created

Line 863: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

859:
860: ------------------------End of API Body------------------------------------
861:
862: --Standard check for commit
863: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
864: COMMIT;
865: END IF;
866:
867: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN

Line 873: WHEN Fnd_Api.g_exc_error THEN

869: END IF;
870:
871: EXCEPTION
872:
873: WHEN Fnd_Api.g_exc_error THEN
874: ROLLBACK TO Create_Rev_Visit_Type;
875: x_return_status := Fnd_Api.g_ret_sts_error;
876: Fnd_Msg_Pub.count_and_get (
877: p_encoded => Fnd_Api.g_false,

Line 875: x_return_status := Fnd_Api.g_ret_sts_error;

871: EXCEPTION
872:
873: WHEN Fnd_Api.g_exc_error THEN
874: ROLLBACK TO Create_Rev_Visit_Type;
875: x_return_status := Fnd_Api.g_ret_sts_error;
876: Fnd_Msg_Pub.count_and_get (
877: p_encoded => Fnd_Api.g_false,
878: p_count => x_msg_count,
879: p_data => x_msg_data);

Line 877: p_encoded => Fnd_Api.g_false,

873: WHEN Fnd_Api.g_exc_error THEN
874: ROLLBACK TO Create_Rev_Visit_Type;
875: x_return_status := Fnd_Api.g_ret_sts_error;
876: Fnd_Msg_Pub.count_and_get (
877: p_encoded => Fnd_Api.g_false,
878: p_count => x_msg_count,
879: p_data => x_msg_data);
880:
881: WHEN Fnd_Api.g_exc_unexpected_error THEN

Line 881: WHEN Fnd_Api.g_exc_unexpected_error THEN

877: p_encoded => Fnd_Api.g_false,
878: p_count => x_msg_count,
879: p_data => x_msg_data);
880:
881: WHEN Fnd_Api.g_exc_unexpected_error THEN
882: ROLLBACK TO Create_Rev_Visit_Type;
883: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
884: Fnd_Msg_Pub.count_and_get (
885: p_encoded => Fnd_Api.g_false,

Line 883: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

879: p_data => x_msg_data);
880:
881: WHEN Fnd_Api.g_exc_unexpected_error THEN
882: ROLLBACK TO Create_Rev_Visit_Type;
883: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
884: Fnd_Msg_Pub.count_and_get (
885: p_encoded => Fnd_Api.g_false,
886: p_count => x_msg_count,
887: p_data => x_msg_data);

Line 885: p_encoded => Fnd_Api.g_false,

881: WHEN Fnd_Api.g_exc_unexpected_error THEN
882: ROLLBACK TO Create_Rev_Visit_Type;
883: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
884: Fnd_Msg_Pub.count_and_get (
885: p_encoded => Fnd_Api.g_false,
886: p_count => x_msg_count,
887: p_data => x_msg_data);
888:
889: WHEN OTHERS THEN

Line 891: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

887: p_data => x_msg_data);
888:
889: WHEN OTHERS THEN
890: ROLLBACK TO Create_Rev_Visit_Type;
891: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
892: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
893: THEN
894: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
895: END IF;

Line 897: p_encoded => Fnd_Api.g_false,

893: THEN
894: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
895: END IF;
896: Fnd_Msg_Pub.count_and_get (
897: p_encoded => Fnd_Api.g_false,
898: p_count => x_msg_count,
899: p_data => x_msg_data);
900:
901: END Create_Rev_Visit_Type;