DBA Data[Home] [Help]

APPS.OZF_PARTNER_CLAIM_GRP dependencies on FND_MSG_PUB

Line 13: OZF_DEBUG_HIGH_ON CONSTANT BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);

9:
10: G_PKG_NAME CONSTANT VARCHAR2(30) := 'OZF_PARTNER_CLAIM_GRP';
11: G_FILE_NAME CONSTANT VARCHAR2(12) := 'ozfgpclb.pls';
12:
13: OZF_DEBUG_HIGH_ON CONSTANT BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
14: OZF_DEBUG_LOW_ON CONSTANT BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low);
15:
16: ---------------------------------------------------------------------
17: -- PROCEDURE: Create_Claim

Line 14: OZF_DEBUG_LOW_ON CONSTANT BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low);

10: G_PKG_NAME CONSTANT VARCHAR2(30) := 'OZF_PARTNER_CLAIM_GRP';
11: G_FILE_NAME CONSTANT VARCHAR2(12) := 'ozfgpclb.pls';
12:
13: OZF_DEBUG_HIGH_ON CONSTANT BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
14: OZF_DEBUG_LOW_ON CONSTANT BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low);
15:
16: ---------------------------------------------------------------------
17: -- PROCEDURE: Create_Claim
18: --

Line 114: FND_MSG_PUB.initialize;

110: END IF;
111:
112: -- Initialize message list if p_init_msg_list is set to TRUE.
113: IF FND_API.to_Boolean( p_init_msg_list ) THEN
114: FND_MSG_PUB.initialize;
115: END IF;
116:
117: -- Initialize API return status to SUCCESS
118: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 132: FND_MSG_PUB.initialize;

128: END IF;
129:
130: -- Initialize message list if p_init_msg_list is set to TRUE.
131: IF FND_API.to_Boolean( p_init_msg_list ) THEN
132: FND_MSG_PUB.initialize;
133: END IF;
134:
135: -- Debug Message
136: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

Line 136: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

132: FND_MSG_PUB.initialize;
133: END IF;
134:
135: -- Debug Message
136: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
137: FND_MESSAGE.Set_Name('AMS','AMS_API_DEBUG_MESSAGE');
138: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
139: FND_MSG_PUB.Add;
140: END IF;

Line 139: FND_MSG_PUB.Add;

135: -- Debug Message
136: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
137: FND_MESSAGE.Set_Name('AMS','AMS_API_DEBUG_MESSAGE');
138: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
139: FND_MSG_PUB.Add;
140: END IF;
141:
142: -- Initialize API return status to SUCCESS
143: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 192: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

188: l_claim_pub_rec.source_object_class IS NULL OR
189: l_claim_pub_rec.source_object_number IS NULL OR
190: l_claim_pub_rec.currency_code IS NULL OR
191: l_claim_pub_rec.cust_account_id IS NULL THEN
192: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
193: FND_MESSAGE.Set_Name('OZF','OZF_REQUIRED_FIELDS_MISSING');
194: FND_MSG_PUB.Add;
195: END IF;
196: RAISE FND_API.G_EXC_ERROR;

Line 194: FND_MSG_PUB.Add;

190: l_claim_pub_rec.currency_code IS NULL OR
191: l_claim_pub_rec.cust_account_id IS NULL THEN
192: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
193: FND_MESSAGE.Set_Name('OZF','OZF_REQUIRED_FIELDS_MISSING');
194: FND_MSG_PUB.Add;
195: END IF;
196: RAISE FND_API.G_EXC_ERROR;
197: END IF;
198:

Line 324: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

320: COMMIT WORK;
321: END IF;
322:
323: -- Debug Message
324: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
325: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
326: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
327: FND_MSG_PUB.Add;
328: END IF;

Line 327: FND_MSG_PUB.Add;

323: -- Debug Message
324: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
325: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
326: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
327: FND_MSG_PUB.Add;
328: END IF;
329:
330: -- Standard call to get message count and if count is 1, get message info.
331: FND_MSG_PUB.Count_And_Get(

Line 331: FND_MSG_PUB.Count_And_Get(

327: FND_MSG_PUB.Add;
328: END IF;
329:
330: -- Standard call to get message count and if count is 1, get message info.
331: FND_MSG_PUB.Count_And_Get(
332: p_count => x_msg_count,
333: p_data => x_msg_data
334: );
335:

Line 344: FND_MSG_PUB.Count_And_Get (

340: EXCEPTION
341: WHEN FND_API.G_EXC_ERROR THEN
342: ROLLBACK TO Create_Partner_Claim;
343: x_return_status := FND_API.G_RET_STS_ERROR;
344: FND_MSG_PUB.Count_And_Get (
345: p_encoded => FND_API.G_FALSE,
346: p_count => x_msg_count,
347: p_data => x_msg_data
348: );

Line 353: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

349:
350: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
351: ROLLBACK TO Create_Partner_Claim;
352: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
353: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
354: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_CRE_DEDU_ERR');
355: FND_MSG_PUB.add;
356: END IF;
357: FND_MSG_PUB.Count_And_Get (

Line 355: FND_MSG_PUB.add;

351: ROLLBACK TO Create_Partner_Claim;
352: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
353: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
354: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_CRE_DEDU_ERR');
355: FND_MSG_PUB.add;
356: END IF;
357: FND_MSG_PUB.Count_And_Get (
358: p_encoded => FND_API.G_FALSE,
359: p_count => x_msg_count,

Line 357: FND_MSG_PUB.Count_And_Get (

353: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
354: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_CRE_DEDU_ERR');
355: FND_MSG_PUB.add;
356: END IF;
357: FND_MSG_PUB.Count_And_Get (
358: p_encoded => FND_API.G_FALSE,
359: p_count => x_msg_count,
360: p_data => x_msg_data
361: );

Line 366: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

362:
363: WHEN OTHERS THEN
364: ROLLBACK TO Create_Partner_Claim;
365: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
366: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
367: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_CRE_DEDU_ERR');
368: FND_MSG_PUB.add;
369: END IF;
370: FND_MSG_PUB.Count_And_Get (

Line 368: FND_MSG_PUB.add;

364: ROLLBACK TO Create_Partner_Claim;
365: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
366: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
367: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_CRE_DEDU_ERR');
368: FND_MSG_PUB.add;
369: END IF;
370: FND_MSG_PUB.Count_And_Get (
371: p_encoded => FND_API.G_FALSE,
372: p_count => x_msg_count,

Line 370: FND_MSG_PUB.Count_And_Get (

366: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
367: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_CRE_DEDU_ERR');
368: FND_MSG_PUB.add;
369: END IF;
370: FND_MSG_PUB.Count_And_Get (
371: p_encoded => FND_API.G_FALSE,
372: p_count => x_msg_count,
373: p_data => x_msg_data
374: );

Line 466: FND_MSG_PUB.initialize;

462: END IF;
463:
464: -- Initialize message list if p_init_msg_list is set to TRUE.
465: IF FND_API.to_Boolean( p_init_msg_list ) THEN
466: FND_MSG_PUB.initialize;
467: END IF;
468:
469: -- Initialize API return status to SUCCESS
470: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 477: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

473: -- 1. Minimum required fields checking --
474: -----------------------------------------
475: IF p_claim_id IS NULL OR
476: p_status_code IS NULL THEN
477: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
478: FND_MESSAGE.Set_Name('OZF','OZF_REQUIRED_FIELDS_MISSING');
479: FND_MSG_PUB.Add;
480: END IF;
481: RAISE FND_API.G_EXC_ERROR;

Line 479: FND_MSG_PUB.Add;

475: IF p_claim_id IS NULL OR
476: p_status_code IS NULL THEN
477: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
478: FND_MESSAGE.Set_Name('OZF','OZF_REQUIRED_FIELDS_MISSING');
479: FND_MSG_PUB.Add;
480: END IF;
481: RAISE FND_API.G_EXC_ERROR;
482: ELSE
483: OPEN csr_claim_status(p_status_code);

Line 487: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

483: OPEN csr_claim_status(p_status_code);
484: FETCH csr_claim_status INTO l_status_code;
485: CLOSE csr_claim_status;
486: IF l_status_code IS NULL THEN
487: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
488: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_INVALID_STATUS');
489: FND_MSG_PUB.Add;
490: END IF;
491: RAISE FND_API.G_EXC_ERROR;

Line 489: FND_MSG_PUB.Add;

485: CLOSE csr_claim_status;
486: IF l_status_code IS NULL THEN
487: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
488: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_INVALID_STATUS');
489: FND_MSG_PUB.Add;
490: END IF;
491: RAISE FND_API.G_EXC_ERROR;
492: END IF;
493: END IF;

Line 528: FND_MSG_PUB.Add;

524: WHEN OTHERS THEN
525: IF OZF_DEBUG_LOW_ON THEN
526: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
527: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
528: FND_MSG_PUB.Add;
529: END IF;
530: RAISE FND_API.g_exc_unexpected_error;
531: END;
532: l_claim_pvt_rec.status_code := 'CLOSED';

Line 604: FND_MSG_PUB.Count_And_Get(

600: COMMIT WORK;
601: END IF;
602:
603: -- Standard call to get message count and if count is 1, get message info.
604: FND_MSG_PUB.Count_And_Get(
605: p_count => x_msg_count,
606: p_data => x_msg_data
607: );
608:

Line 617: FND_MSG_PUB.Count_And_Get (

613: EXCEPTION
614: WHEN FND_API.G_EXC_ERROR THEN
615: ROLLBACK TO Update_Partner_Claim;
616: x_return_status := FND_API.G_RET_STS_ERROR;
617: FND_MSG_PUB.Count_And_Get (
618: p_encoded => FND_API.G_FALSE,
619: p_count => x_msg_count,
620: p_data => x_msg_data
621: );

Line 626: FND_MSG_PUB.Count_And_Get (

622:
623: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
624: ROLLBACK TO Update_Partner_Claim;
625: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
626: FND_MSG_PUB.Count_And_Get (
627: p_encoded => FND_API.G_FALSE,
628: p_count => x_msg_count,
629: p_data => x_msg_data
630: );

Line 635: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

631:
632: WHEN OTHERS THEN
633: ROLLBACK TO Update_Partner_Claim;
634: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
635: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
636: FND_MESSAGE.set_name('AMS', 'AMS_CLAIM_UPD_DEDU_ERR');
637: FND_MSG_PUB.add;
638: END IF;
639: FND_MSG_PUB.Count_And_Get (

Line 637: FND_MSG_PUB.add;

633: ROLLBACK TO Update_Partner_Claim;
634: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
635: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
636: FND_MESSAGE.set_name('AMS', 'AMS_CLAIM_UPD_DEDU_ERR');
637: FND_MSG_PUB.add;
638: END IF;
639: FND_MSG_PUB.Count_And_Get (
640: p_encoded => FND_API.G_FALSE,
641: p_count => x_msg_count,

Line 639: FND_MSG_PUB.Count_And_Get (

635: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
636: FND_MESSAGE.set_name('AMS', 'AMS_CLAIM_UPD_DEDU_ERR');
637: FND_MSG_PUB.add;
638: END IF;
639: FND_MSG_PUB.Count_And_Get (
640: p_encoded => FND_API.G_FALSE,
641: p_count => x_msg_count,
642: p_data => x_msg_data
643: );