4:
5: Procedure calculate_Commission
6: (
7: p_api_version IN NUMBER,
8: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
9: x_inc_plnr_disclaimer OUT NOCOPY cn_repositories.income_planner_disclaimer%TYPE,
10: x_return_status OUT NOCOPY VARCHAR2,
11: x_msg_count OUT NOCOPY NUMBER,
12: x_msg_data OUT NOCOPY VARCHAR2
15: l_api_version CONSTANT NUMBER := 1.0;
16: l_inc_plnr_disclaimer cn_repositories.income_planner_disclaimer%TYPE ;
17: l_return_status VARCHAR2(1);
18: l_msg_count NUMBER := 0;
19: l_msg_data VARCHAR2(2000) := FND_API.G_MISS_CHAR;
20:
21: BEGIN
22: null;
23: End calculate_Commission;
24:
25: Procedure calculate_Commission
26: (
27: p_api_version IN NUMBER,
28: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
29: p_org_id IN NUMBER,
30: x_inc_plnr_disclaimer OUT NOCOPY cn_repositories.income_planner_disclaimer%TYPE,
31: x_return_status OUT NOCOPY VARCHAR2,
32: x_msg_count OUT NOCOPY NUMBER,
36: l_api_version CONSTANT NUMBER := 1.0;
37: l_inc_plnr_disclaimer cn_repositories.income_planner_disclaimer%TYPE ;
38: l_return_status VARCHAR2(1);
39: l_msg_count NUMBER := 0;
40: l_msg_data VARCHAR2(2000) := FND_API.G_MISS_CHAR;
41:
42: BEGIN
43:
44: SAVEPOINT calculate_Commission;
42: BEGIN
43:
44: SAVEPOINT calculate_Commission;
45:
46: IF NOT FND_API.Compatible_API_Call ( l_api_version,
47: p_api_version,
48: l_api_name,
49: G_PKG_NAME) THEN
50: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
46: IF NOT FND_API.Compatible_API_Call ( l_api_version,
47: p_api_version,
48: l_api_name,
49: G_PKG_NAME) THEN
50: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
51: END IF;
52:
53: -- Initialize message list if p_init_msg_list is set to TRUE.
54: IF FND_API.to_Boolean( p_init_msg_list ) THEN
50: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
51: END IF;
52:
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: -- Initialize API return status to SUCCESS
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: -- Initialize API return status to SUCCESS
58: x_return_status := FND_API.G_RET_STS_SUCCESS;
59: l_return_status := FND_API.G_RET_STS_SUCCESS;
60: --
61: -- API body
62: --
55: FND_MSG_PUB.initialize;
56: END IF;
57: -- Initialize API return status to SUCCESS
58: x_return_status := FND_API.G_RET_STS_SUCCESS;
59: l_return_status := FND_API.G_RET_STS_SUCCESS;
60: --
61: -- API body
62: --
63:
70: x_msg_data => l_msg_data
71: );
72:
73:
74: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
75: x_return_status := FND_API.G_RET_STS_ERROR;
76: x_msg_count := l_msg_count;
77: x_msg_data := l_msg_data;
78: RAISE FND_API.G_EXC_ERROR;
71: );
72:
73:
74: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
75: x_return_status := FND_API.G_RET_STS_ERROR;
76: x_msg_count := l_msg_count;
77: x_msg_data := l_msg_data;
78: RAISE FND_API.G_EXC_ERROR;
79: ELSE
74: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
75: x_return_status := FND_API.G_RET_STS_ERROR;
76: x_msg_count := l_msg_count;
77: x_msg_data := l_msg_data;
78: RAISE FND_API.G_EXC_ERROR;
79: ELSE
80: x_inc_plnr_disclaimer := l_inc_plnr_disclaimer;
81: END IF;
82:
88: ( p_count => x_msg_count,
89: p_data => x_msg_data);
90:
91: EXCEPTION
92: WHEN FND_API.G_EXC_ERROR THEN
93: x_return_status := FND_API.G_RET_STS_ERROR;
94: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
95: p_data => x_msg_data,
96: p_encoded => FND_API.G_FALSE );
89: p_data => x_msg_data);
90:
91: EXCEPTION
92: WHEN FND_API.G_EXC_ERROR THEN
93: x_return_status := FND_API.G_RET_STS_ERROR;
94: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
95: p_data => x_msg_data,
96: p_encoded => FND_API.G_FALSE );
97: l_inc_plnr_disclaimer := FND_API.G_MISS_CHAR;
92: WHEN FND_API.G_EXC_ERROR THEN
93: x_return_status := FND_API.G_RET_STS_ERROR;
94: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
95: p_data => x_msg_data,
96: p_encoded => FND_API.G_FALSE );
97: l_inc_plnr_disclaimer := FND_API.G_MISS_CHAR;
98:
99: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
100: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
93: x_return_status := FND_API.G_RET_STS_ERROR;
94: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
95: p_data => x_msg_data,
96: p_encoded => FND_API.G_FALSE );
97: l_inc_plnr_disclaimer := FND_API.G_MISS_CHAR;
98:
99: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
100: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
101: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
95: p_data => x_msg_data,
96: p_encoded => FND_API.G_FALSE );
97: l_inc_plnr_disclaimer := FND_API.G_MISS_CHAR;
98:
99: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
100: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
101: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
102: p_data => x_msg_data,
103: p_encoded => FND_API.G_FALSE );
96: p_encoded => FND_API.G_FALSE );
97: l_inc_plnr_disclaimer := FND_API.G_MISS_CHAR;
98:
99: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
100: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
101: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
102: p_data => x_msg_data,
103: p_encoded => FND_API.G_FALSE );
104: l_inc_plnr_disclaimer := FND_API.G_MISS_CHAR;
99: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
100: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
101: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
102: p_data => x_msg_data,
103: p_encoded => FND_API.G_FALSE );
104: l_inc_plnr_disclaimer := FND_API.G_MISS_CHAR;
105:
106: WHEN OTHERS THEN
107: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
100: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
101: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
102: p_data => x_msg_data,
103: p_encoded => FND_API.G_FALSE );
104: l_inc_plnr_disclaimer := FND_API.G_MISS_CHAR;
105:
106: WHEN OTHERS THEN
107: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
108: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
103: p_encoded => FND_API.G_FALSE );
104: l_inc_plnr_disclaimer := FND_API.G_MISS_CHAR;
105:
106: WHEN OTHERS THEN
107: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
108: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
109: p_data => x_msg_data,
110: p_encoded => FND_API.G_FALSE );
111: l_inc_plnr_disclaimer := FND_API.G_MISS_CHAR;
106: WHEN OTHERS THEN
107: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
108: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
109: p_data => x_msg_data,
110: p_encoded => FND_API.G_FALSE );
111: l_inc_plnr_disclaimer := FND_API.G_MISS_CHAR;
112:
113: End calculate_Commission;
114:
107: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
108: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
109: p_data => x_msg_data,
110: p_encoded => FND_API.G_FALSE );
111: l_inc_plnr_disclaimer := FND_API.G_MISS_CHAR;
112:
113: End calculate_Commission;
114:
115: END CN_COMMISSION_CALC_PUB;