6:
7:
8: PROCEDURE Get_Pay_Group_Dtls
9: (p_api_version IN NUMBER,
10: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
11: p_commit IN VARCHAR2 := FND_API.G_FALSE,
12: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
13: p_start_record IN NUMBER := -1,
14: p_fetch_size IN NUMBER := -1,
7:
8: PROCEDURE Get_Pay_Group_Dtls
9: (p_api_version IN NUMBER,
10: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
11: p_commit IN VARCHAR2 := FND_API.G_FALSE,
12: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
13: p_start_record IN NUMBER := -1,
14: p_fetch_size IN NUMBER := -1,
15: p_pay_group_id IN NUMBER,
8: PROCEDURE Get_Pay_Group_Dtls
9: (p_api_version IN NUMBER,
10: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
11: p_commit IN VARCHAR2 := FND_API.G_FALSE,
12: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
13: p_start_record IN NUMBER := -1,
14: p_fetch_size IN NUMBER := -1,
15: p_pay_group_id IN NUMBER,
16: x_pay_group_dtls OUT NOCOPY pay_group_dtls_tbl_type,
38: BEGIN
39: -- Standard Start of API savepoint
40: SAVEPOINT Get_Pay_Group_Dtls;
41: -- Standard call to check for call compatibility.
42: IF NOT FND_API.Compatible_API_Call
43: (l_api_version ,
44: p_api_version ,
45: l_api_name ,
46: G_PKG_NAME )
44: p_api_version ,
45: l_api_name ,
46: G_PKG_NAME )
47: THEN
48: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
49: END IF;
50: -- Initialize message list if p_init_msg_list is set to TRUE.
51: IF FND_API.to_Boolean( p_init_msg_list ) THEN
52: FND_MSG_PUB.initialize;
47: THEN
48: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
49: END IF;
50: -- Initialize message list if p_init_msg_list is set to TRUE.
51: IF FND_API.to_Boolean( p_init_msg_list ) THEN
52: FND_MSG_PUB.initialize;
53: END IF;
54: -- Initialize API return status to success
55: x_return_status := FND_API.G_RET_STS_SUCCESS;
51: IF FND_API.to_Boolean( p_init_msg_list ) THEN
52: FND_MSG_PUB.initialize;
53: END IF;
54: -- Initialize API return status to success
55: x_return_status := FND_API.G_RET_STS_SUCCESS;
56: -- API body
57:
58: -- x_pay_group_dtls := G_MISS_PAY_GROUP_DTLS_REC_TB ;
59:
98: END LOOP;
99:
100: -- End of API body.
101: -- Standard check of p_commit.
102: IF FND_API.To_Boolean( p_commit ) THEN
103: COMMIT WORK;
104: END IF;
105: -- Standard call to get message count and if count is 1, get message info.
106: FND_MSG_PUB.Count_And_Get
105: -- Standard call to get message count and if count is 1, get message info.
106: FND_MSG_PUB.Count_And_Get
107: (p_count => x_msg_count ,
108: p_data => x_msg_data ,
109: p_encoded => FND_API.G_FALSE );
110: EXCEPTION
111: WHEN FND_API.G_EXC_ERROR THEN
112: ROLLBACK TO Get_Pay_Group_Dtls;
113: x_return_status := FND_API.G_RET_STS_ERROR ;
107: (p_count => x_msg_count ,
108: p_data => x_msg_data ,
109: p_encoded => FND_API.G_FALSE );
110: EXCEPTION
111: WHEN FND_API.G_EXC_ERROR THEN
112: ROLLBACK TO Get_Pay_Group_Dtls;
113: x_return_status := FND_API.G_RET_STS_ERROR ;
114: FND_MSG_PUB.Count_And_Get
115: (p_count => x_msg_count ,
109: p_encoded => FND_API.G_FALSE );
110: EXCEPTION
111: WHEN FND_API.G_EXC_ERROR THEN
112: ROLLBACK TO Get_Pay_Group_Dtls;
113: x_return_status := FND_API.G_RET_STS_ERROR ;
114: FND_MSG_PUB.Count_And_Get
115: (p_count => x_msg_count ,
116: p_data => x_msg_data ,
117: p_encoded => FND_API.G_FALSE );
113: x_return_status := FND_API.G_RET_STS_ERROR ;
114: FND_MSG_PUB.Count_And_Get
115: (p_count => x_msg_count ,
116: p_data => x_msg_data ,
117: p_encoded => FND_API.G_FALSE );
118: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
119: ROLLBACK TO Get_Pay_Group_Dtls;
120: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
121: FND_MSG_PUB.Count_And_Get
114: FND_MSG_PUB.Count_And_Get
115: (p_count => x_msg_count ,
116: p_data => x_msg_data ,
117: p_encoded => FND_API.G_FALSE );
118: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
119: ROLLBACK TO Get_Pay_Group_Dtls;
120: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
121: FND_MSG_PUB.Count_And_Get
122: (p_count => x_msg_count ,
116: p_data => x_msg_data ,
117: p_encoded => FND_API.G_FALSE );
118: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
119: ROLLBACK TO Get_Pay_Group_Dtls;
120: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
121: FND_MSG_PUB.Count_And_Get
122: (p_count => x_msg_count ,
123: p_data => x_msg_data ,
124: p_encoded => FND_API.G_FALSE );
120: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
121: FND_MSG_PUB.Count_And_Get
122: (p_count => x_msg_count ,
123: p_data => x_msg_data ,
124: p_encoded => FND_API.G_FALSE );
125: WHEN OTHERS THEN
126: ROLLBACK TO Get_Pay_Group_Dtls;
127: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
128: IF FND_MSG_PUB.Check_Msg_Level
123: p_data => x_msg_data ,
124: p_encoded => FND_API.G_FALSE );
125: WHEN OTHERS THEN
126: ROLLBACK TO Get_Pay_Group_Dtls;
127: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
128: IF FND_MSG_PUB.Check_Msg_Level
129: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
130: THEN
131: FND_MSG_PUB.Add_Exc_Msg
134: END IF;
135: FND_MSG_PUB.Count_And_Get
136: (p_count => x_msg_count ,
137: p_data => x_msg_data ,
138: p_encoded => FND_API.G_FALSE );
139: END Get_Pay_Group_Dtls;
140:
141:
142: PROCEDURE Get_Pay_Group_Sales
140:
141:
142: PROCEDURE Get_Pay_Group_Sales
143: (p_api_version IN NUMBER,
144: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
145: p_commit IN VARCHAR2 := FND_API.G_FALSE,
146: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
147: p_start_record IN NUMBER := -1,
148: p_fetch_size IN NUMBER := -1,
141:
142: PROCEDURE Get_Pay_Group_Sales
143: (p_api_version IN NUMBER,
144: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
145: p_commit IN VARCHAR2 := FND_API.G_FALSE,
146: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
147: p_start_record IN NUMBER := -1,
148: p_fetch_size IN NUMBER := -1,
149: p_pay_group_id IN NUMBER,
142: PROCEDURE Get_Pay_Group_Sales
143: (p_api_version IN NUMBER,
144: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
145: p_commit IN VARCHAR2 := FND_API.G_FALSE,
146: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
147: p_start_record IN NUMBER := -1,
148: p_fetch_size IN NUMBER := -1,
149: p_pay_group_id IN NUMBER,
150: x_pay_group_sales OUT NOCOPY pay_group_sales_tbl_type,
180: BEGIN
181: -- Standard Start of API savepoint
182: SAVEPOINT Get_Pay_Group_Sales;
183: -- Standard call to check for call compatibility.
184: IF NOT FND_API.Compatible_API_Call
185: (l_api_version ,
186: p_api_version ,
187: l_api_name ,
188: G_PKG_NAME )
186: p_api_version ,
187: l_api_name ,
188: G_PKG_NAME )
189: THEN
190: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
191: END IF;
192: -- Initialize message list if p_init_msg_list is set to TRUE.
193: IF FND_API.to_Boolean( p_init_msg_list ) THEN
194: FND_MSG_PUB.initialize;
189: THEN
190: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
191: END IF;
192: -- Initialize message list if p_init_msg_list is set to TRUE.
193: IF FND_API.to_Boolean( p_init_msg_list ) THEN
194: FND_MSG_PUB.initialize;
195: END IF;
196: -- Initialize API return status to success
197: x_return_status := FND_API.G_RET_STS_SUCCESS;
193: IF FND_API.to_Boolean( p_init_msg_list ) THEN
194: FND_MSG_PUB.initialize;
195: END IF;
196: -- Initialize API return status to success
197: x_return_status := FND_API.G_RET_STS_SUCCESS;
198: -- API body
199:
200: -- x_pay_group_sales := G_MISS_PAY_GROUP_DTLS_REC_TB ;
201:
237: END LOOP;
238:
239: -- End of API body.
240: -- Standard check of p_commit.
241: IF FND_API.To_Boolean( p_commit ) THEN
242: COMMIT WORK;
243: END IF;
244: -- Standard call to get message count and if count is 1, get message info.
245: FND_MSG_PUB.Count_And_Get
244: -- Standard call to get message count and if count is 1, get message info.
245: FND_MSG_PUB.Count_And_Get
246: (p_count => x_msg_count ,
247: p_data => x_msg_data ,
248: p_encoded => FND_API.G_FALSE );
249: EXCEPTION
250: WHEN FND_API.G_EXC_ERROR THEN
251: ROLLBACK TO Get_Pay_Group_Sales;
252: x_return_status := FND_API.G_RET_STS_ERROR ;
246: (p_count => x_msg_count ,
247: p_data => x_msg_data ,
248: p_encoded => FND_API.G_FALSE );
249: EXCEPTION
250: WHEN FND_API.G_EXC_ERROR THEN
251: ROLLBACK TO Get_Pay_Group_Sales;
252: x_return_status := FND_API.G_RET_STS_ERROR ;
253: FND_MSG_PUB.Count_And_Get
254: (p_count => x_msg_count ,
248: p_encoded => FND_API.G_FALSE );
249: EXCEPTION
250: WHEN FND_API.G_EXC_ERROR THEN
251: ROLLBACK TO Get_Pay_Group_Sales;
252: x_return_status := FND_API.G_RET_STS_ERROR ;
253: FND_MSG_PUB.Count_And_Get
254: (p_count => x_msg_count ,
255: p_data => x_msg_data ,
256: p_encoded => FND_API.G_FALSE );
252: x_return_status := FND_API.G_RET_STS_ERROR ;
253: FND_MSG_PUB.Count_And_Get
254: (p_count => x_msg_count ,
255: p_data => x_msg_data ,
256: p_encoded => FND_API.G_FALSE );
257: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
258: ROLLBACK TO Get_Pay_Group_Sales;
259: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
260: FND_MSG_PUB.Count_And_Get
253: FND_MSG_PUB.Count_And_Get
254: (p_count => x_msg_count ,
255: p_data => x_msg_data ,
256: p_encoded => FND_API.G_FALSE );
257: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
258: ROLLBACK TO Get_Pay_Group_Sales;
259: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
260: FND_MSG_PUB.Count_And_Get
261: (p_count => x_msg_count ,
255: p_data => x_msg_data ,
256: p_encoded => FND_API.G_FALSE );
257: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
258: ROLLBACK TO Get_Pay_Group_Sales;
259: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
260: FND_MSG_PUB.Count_And_Get
261: (p_count => x_msg_count ,
262: p_data => x_msg_data ,
263: p_encoded => FND_API.G_FALSE );
259: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
260: FND_MSG_PUB.Count_And_Get
261: (p_count => x_msg_count ,
262: p_data => x_msg_data ,
263: p_encoded => FND_API.G_FALSE );
264: WHEN OTHERS THEN
265: ROLLBACK TO Get_Pay_Group_Sales;
266: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
267: IF FND_MSG_PUB.Check_Msg_Level
262: p_data => x_msg_data ,
263: p_encoded => FND_API.G_FALSE );
264: WHEN OTHERS THEN
265: ROLLBACK TO Get_Pay_Group_Sales;
266: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
267: IF FND_MSG_PUB.Check_Msg_Level
268: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
269: THEN
270: FND_MSG_PUB.Add_Exc_Msg
273: END IF;
274: FND_MSG_PUB.Count_And_Get
275: (p_count => x_msg_count ,
276: p_data => x_msg_data ,
277: p_encoded => FND_API.G_FALSE );
278: END Get_Pay_Group_Sales;
279:
280:
281:
280:
281:
282: PROCEDURE Get_Pay_Group_Roles
283: (p_api_version IN NUMBER,
284: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
285: p_commit IN VARCHAR2 := FND_API.G_FALSE,
286: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
287: p_start_record IN NUMBER := -1,
288: p_fetch_size IN NUMBER := -1,
281:
282: PROCEDURE Get_Pay_Group_Roles
283: (p_api_version IN NUMBER,
284: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
285: p_commit IN VARCHAR2 := FND_API.G_FALSE,
286: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
287: p_start_record IN NUMBER := -1,
288: p_fetch_size IN NUMBER := -1,
289: p_pay_group_id IN NUMBER,
282: PROCEDURE Get_Pay_Group_Roles
283: (p_api_version IN NUMBER,
284: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
285: p_commit IN VARCHAR2 := FND_API.G_FALSE,
286: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
287: p_start_record IN NUMBER := -1,
288: p_fetch_size IN NUMBER := -1,
289: p_pay_group_id IN NUMBER,
290: x_pay_group_roles OUT NOCOPY pay_group_roles_tbl_type,
325: BEGIN
326: -- Standard Start of API savepoint
327: SAVEPOINT Get_Pay_Group_Roles;
328: -- Standard call to check for call compatibility.
329: IF NOT FND_API.Compatible_API_Call
330: (l_api_version ,
331: p_api_version ,
332: l_api_name ,
333: G_PKG_NAME )
331: p_api_version ,
332: l_api_name ,
333: G_PKG_NAME )
334: THEN
335: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
336: END IF;
337: -- Initialize message list if p_init_msg_list is set to TRUE.
338: IF FND_API.to_Boolean( p_init_msg_list ) THEN
339: FND_MSG_PUB.initialize;
334: THEN
335: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
336: END IF;
337: -- Initialize message list if p_init_msg_list is set to TRUE.
338: IF FND_API.to_Boolean( p_init_msg_list ) THEN
339: FND_MSG_PUB.initialize;
340: END IF;
341: -- Initialize API return status to success
342: x_return_status := FND_API.G_RET_STS_SUCCESS;
338: IF FND_API.to_Boolean( p_init_msg_list ) THEN
339: FND_MSG_PUB.initialize;
340: END IF;
341: -- Initialize API return status to success
342: x_return_status := FND_API.G_RET_STS_SUCCESS;
343: -- API body
344:
345: -- x_pay_group_sales := G_MISS_PAY_GROUP_DTLS_REC_TB ;
346:
387: -- END IF;
388:
389: -- End of API body.
390: -- Standard check of p_commit.
391: IF FND_API.To_Boolean( p_commit ) THEN
392: COMMIT WORK;
393: END IF;
394: -- Standard call to get message count and if count is 1, get message info.
395: FND_MSG_PUB.Count_And_Get
394: -- Standard call to get message count and if count is 1, get message info.
395: FND_MSG_PUB.Count_And_Get
396: (p_count => x_msg_count ,
397: p_data => x_msg_data ,
398: p_encoded => FND_API.G_FALSE );
399: EXCEPTION
400: WHEN FND_API.G_EXC_ERROR THEN
401: ROLLBACK TO Get_Pay_Group_Roles;
402: x_return_status := FND_API.G_RET_STS_ERROR ;
396: (p_count => x_msg_count ,
397: p_data => x_msg_data ,
398: p_encoded => FND_API.G_FALSE );
399: EXCEPTION
400: WHEN FND_API.G_EXC_ERROR THEN
401: ROLLBACK TO Get_Pay_Group_Roles;
402: x_return_status := FND_API.G_RET_STS_ERROR ;
403: FND_MSG_PUB.Count_And_Get
404: (p_count => x_msg_count ,
398: p_encoded => FND_API.G_FALSE );
399: EXCEPTION
400: WHEN FND_API.G_EXC_ERROR THEN
401: ROLLBACK TO Get_Pay_Group_Roles;
402: x_return_status := FND_API.G_RET_STS_ERROR ;
403: FND_MSG_PUB.Count_And_Get
404: (p_count => x_msg_count ,
405: p_data => x_msg_data ,
406: p_encoded => FND_API.G_FALSE );
402: x_return_status := FND_API.G_RET_STS_ERROR ;
403: FND_MSG_PUB.Count_And_Get
404: (p_count => x_msg_count ,
405: p_data => x_msg_data ,
406: p_encoded => FND_API.G_FALSE );
407: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
408: ROLLBACK TO Get_Pay_Group_Roles;
409: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
410: FND_MSG_PUB.Count_And_Get
403: FND_MSG_PUB.Count_And_Get
404: (p_count => x_msg_count ,
405: p_data => x_msg_data ,
406: p_encoded => FND_API.G_FALSE );
407: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
408: ROLLBACK TO Get_Pay_Group_Roles;
409: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
410: FND_MSG_PUB.Count_And_Get
411: (p_count => x_msg_count ,
405: p_data => x_msg_data ,
406: p_encoded => FND_API.G_FALSE );
407: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
408: ROLLBACK TO Get_Pay_Group_Roles;
409: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
410: FND_MSG_PUB.Count_And_Get
411: (p_count => x_msg_count ,
412: p_data => x_msg_data ,
413: p_encoded => FND_API.G_FALSE );
409: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
410: FND_MSG_PUB.Count_And_Get
411: (p_count => x_msg_count ,
412: p_data => x_msg_data ,
413: p_encoded => FND_API.G_FALSE );
414: WHEN OTHERS THEN
415: ROLLBACK TO Get_Pay_Group_Roles;
416: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
417: IF FND_MSG_PUB.Check_Msg_Level
412: p_data => x_msg_data ,
413: p_encoded => FND_API.G_FALSE );
414: WHEN OTHERS THEN
415: ROLLBACK TO Get_Pay_Group_Roles;
416: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
417: IF FND_MSG_PUB.Check_Msg_Level
418: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
419: THEN
420: FND_MSG_PUB.Add_Exc_Msg
423: END IF;
424: FND_MSG_PUB.Count_And_Get
425: (p_count => x_msg_count ,
426: p_data => x_msg_data ,
427: p_encoded => FND_API.G_FALSE );
428: END Get_Pay_Group_Roles;
429:
430:
431: