8: x_msg_data OUT NOCOPY VARCHAR2,
9: x_no_data_found OUT NOCOPY BOOLEAN,
10: x_pqyv_rec OUT NOCOPY pqyv_rec_type) IS
11: l_pqyv_rec pqyv_rec_type;
12: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
13: l_no_data_found BOOLEAN;
14: BEGIN
15:
16: l_pqyv_rec := p_pqyv_rec;
13: l_no_data_found BOOLEAN;
14: BEGIN
15:
16: l_pqyv_rec := p_pqyv_rec;
17: x_return_status := FND_API.G_RET_STS_SUCCESS;
18: x_no_data_found := TRUE;
19:
20: okl_setuppqualitys_pvt.get_rec(p_pqyv_rec => l_pqyv_rec,
21: x_return_status => l_return_status,
21: x_return_status => l_return_status,
22: x_no_data_found => l_no_data_found,
23: x_pqyv_rec => x_pqyv_rec);
24:
25: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
26: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
27: END IF;
28:
29: EXCEPTION
22: x_no_data_found => l_no_data_found,
23: x_pqyv_rec => x_pqyv_rec);
24:
25: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
26: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
27: END IF;
28:
29: EXCEPTION
30: WHEN OTHERS THEN
27: END IF;
28:
29: EXCEPTION
30: WHEN OTHERS THEN
31: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
32: x_no_data_found := FALSE;
33: FND_MESSAGE.set_name(application => G_APP_NAME,
34: name => G_UNEXPECTED_ERROR);
35: x_msg_data := FND_MESSAGE.get;
50: l_pqyv_rec pqyv_rec_type;
51: l_data VARCHAR2(100);
52: l_api_name CONSTANT VARCHAR2(30) := 'insert_pqualitys';
53: l_count NUMBER ;
54: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
55: BEGIN
56: x_return_status := FND_API.G_RET_STS_SUCCESS;
57: SAVEPOINT sp_insert_pqualitys;
58: l_pqyv_rec := p_pqyv_rec;
52: l_api_name CONSTANT VARCHAR2(30) := 'insert_pqualitys';
53: l_count NUMBER ;
54: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
55: BEGIN
56: x_return_status := FND_API.G_RET_STS_SUCCESS;
57: SAVEPOINT sp_insert_pqualitys;
58: l_pqyv_rec := p_pqyv_rec;
59:
60:
68: p_pqyv_rec => l_pqyv_rec,
69: x_pqyv_rec => x_pqyv_rec
70: );
71:
72: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
73: RAISE FND_API.G_EXC_ERROR;
74: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
75: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
76: END IF;
69: x_pqyv_rec => x_pqyv_rec
70: );
71:
72: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
73: RAISE FND_API.G_EXC_ERROR;
74: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
75: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
76: END IF;
77:
70: );
71:
72: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
73: RAISE FND_API.G_EXC_ERROR;
74: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
75: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
76: END IF;
77:
78: /* re-assign local record structure using output record from pvt api */
71:
72: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
73: RAISE FND_API.G_EXC_ERROR;
74: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
75: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
76: END IF;
77:
78: /* re-assign local record structure using output record from pvt api */
79: l_pqyv_rec := x_pqyv_rec;
80:
81:
82:
83: EXCEPTION
84: WHEN FND_API.G_EXC_ERROR THEN
85: ROLLBACK TO sp_insert_pqualitys;
86: -- notify caller of an UNEXPECTED error
87: x_return_status := FND_API.G_RET_STS_ERROR;
88:
83: EXCEPTION
84: WHEN FND_API.G_EXC_ERROR THEN
85: ROLLBACK TO sp_insert_pqualitys;
86: -- notify caller of an UNEXPECTED error
87: x_return_status := FND_API.G_RET_STS_ERROR;
88:
89: -- store SQL error message on message stack for caller
90: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE,
91: p_count => x_msg_count,
90: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE,
91: p_count => x_msg_count,
92: p_data => x_msg_data);
93:
94: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
95: ROLLBACK TO sp_insert_pqualitys;
96: -- notify caller of an UNEXPECTED error
97: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
98:
93:
94: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
95: ROLLBACK TO sp_insert_pqualitys;
96: -- notify caller of an UNEXPECTED error
97: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
98:
99: -- store SQL error message on message stack for caller
100: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE,
101: p_count => x_msg_count,
102: p_data => x_msg_data);
103:
104: WHEN OTHERS THEN
105: -- notify caller of an UNEXPECTED error
106: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
107: FND_MSG_PUB.ADD_EXC_MSG('OKL_setuppqualitys_PUB','insert_pqualitys');
108:
109: -- store SQL error message on message stack for caller
110: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE,
126: l_pqyv_rec pqyv_rec_type;
127: l_data VARCHAR2(100);
128: l_count NUMBER ;
129: l_api_name CONSTANT VARCHAR2(30) := 'update_pqualitys';
130: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
131: BEGIN
132: x_return_status := FND_API.G_RET_STS_SUCCESS;
133: SAVEPOINT sp_update_pqualitys;
134: l_pqyv_rec := p_pqyv_rec;
128: l_count NUMBER ;
129: l_api_name CONSTANT VARCHAR2(30) := 'update_pqualitys';
130: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
131: BEGIN
132: x_return_status := FND_API.G_RET_STS_SUCCESS;
133: SAVEPOINT sp_update_pqualitys;
134: l_pqyv_rec := p_pqyv_rec;
135:
136:
143: x_msg_data => x_msg_data,
144: p_pqyv_rec => l_pqyv_rec,
145: x_pqyv_rec => x_pqyv_rec);
146:
147: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
148: RAISE FND_API.G_EXC_ERROR;
149: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
150: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
151: END IF;
144: p_pqyv_rec => l_pqyv_rec,
145: x_pqyv_rec => x_pqyv_rec);
146:
147: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
148: RAISE FND_API.G_EXC_ERROR;
149: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
150: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
151: END IF;
152:
145: x_pqyv_rec => x_pqyv_rec);
146:
147: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
148: RAISE FND_API.G_EXC_ERROR;
149: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
150: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
151: END IF;
152:
153: /* re-assign local record structure using output record from pvt api */
146:
147: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
148: RAISE FND_API.G_EXC_ERROR;
149: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
150: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
151: END IF;
152:
153: /* re-assign local record structure using output record from pvt api */
154: l_pqyv_rec := x_pqyv_rec;
155:
156:
157:
158: EXCEPTION
159: WHEN FND_API.G_EXC_ERROR THEN
160: ROLLBACK TO sp_update_pqualitys;
161: -- notify caller of an UNEXPECTED error
162: x_return_status := FND_API.G_RET_STS_ERROR;
163:
158: EXCEPTION
159: WHEN FND_API.G_EXC_ERROR THEN
160: ROLLBACK TO sp_update_pqualitys;
161: -- notify caller of an UNEXPECTED error
162: x_return_status := FND_API.G_RET_STS_ERROR;
163:
164: -- store SQL error message on message stack for caller
165: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE,
166: p_count => x_msg_count,
165: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE,
166: p_count => x_msg_count,
167: p_data => x_msg_data);
168:
169: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
170: ROLLBACK TO sp_update_pqualitys;
171: -- notify caller of an UNEXPECTED error
172: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
173:
168:
169: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
170: ROLLBACK TO sp_update_pqualitys;
171: -- notify caller of an UNEXPECTED error
172: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
173:
174: -- store SQL error message on message stack for caller
175: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE,
176: p_count => x_msg_count,
177: p_data => x_msg_data);
178:
179: WHEN OTHERS THEN
180: -- notify caller of an UNEXPECTED error
181: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
182: FND_MSG_PUB.ADD_EXC_MSG('OKL_setuppqualitys_PUB','update_pqualitys');
183:
184: -- store SQL error message on message stack for caller
185: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE,