10: -- Version : 1.0
11: -- End of comments
12: PROCEDURE create_contract_option(
13: p_api_version IN NUMBER,
14: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
15: x_return_status OUT NOCOPY VARCHAR2,
16: x_msg_count OUT NOCOPY NUMBER,
17: x_msg_data OUT NOCOPY VARCHAR2,
18: p_cspv_rec IN cspv_rec_type,
17: x_msg_data OUT NOCOPY VARCHAR2,
18: p_cspv_rec IN cspv_rec_type,
19: x_cspv_rec OUT NOCOPY cspv_rec_type) IS
20: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_CONTRACT_OPTION';
21: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
22: BEGIN
23: -- Call start_activity to create savepoint, check compatibility
24: -- and initialize message list
25: l_return_status := OKC_API.START_ACTIVITY (l_api_name
21: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
22: BEGIN
23: -- Call start_activity to create savepoint, check compatibility
24: -- and initialize message list
25: l_return_status := OKC_API.START_ACTIVITY (l_api_name
26: ,p_init_msg_list
27: ,'_PVT'
28: ,x_return_status);
29: -- Check if activity started successfully
26: ,p_init_msg_list
27: ,'_PVT'
28: ,x_return_status);
29: -- Check if activity started successfully
30: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
31: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
32: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
33: RAISE OKC_API.G_EXCEPTION_ERROR;
34: END IF;
27: ,'_PVT'
28: ,x_return_status);
29: -- Check if activity started successfully
30: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
31: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
32: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
33: RAISE OKC_API.G_EXCEPTION_ERROR;
34: END IF;
35: -- evaluate conditions, build outcomes for true conditions and
28: ,x_return_status);
29: -- Check if activity started successfully
30: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
31: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
32: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
33: RAISE OKC_API.G_EXCEPTION_ERROR;
34: END IF;
35: -- evaluate conditions, build outcomes for true conditions and
36: -- put them on outcome queue
29: -- Check if activity started successfully
30: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
31: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
32: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
33: RAISE OKC_API.G_EXCEPTION_ERROR;
34: END IF;
35: -- evaluate conditions, build outcomes for true conditions and
36: -- put them on outcome queue
37: okl_csp_pvt.insert_row(
41: x_msg_count,
42: x_msg_data,
43: p_cspv_rec,
44: x_cspv_rec);
45: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
46: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
47: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
48: RAISE OKC_API.G_EXCEPTION_ERROR;
49: END IF;
42: x_msg_data,
43: p_cspv_rec,
44: x_cspv_rec);
45: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
46: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
47: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
48: RAISE OKC_API.G_EXCEPTION_ERROR;
49: END IF;
50: OKC_API.END_ACTIVITY (x_msg_count
43: p_cspv_rec,
44: x_cspv_rec);
45: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
46: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
47: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
48: RAISE OKC_API.G_EXCEPTION_ERROR;
49: END IF;
50: OKC_API.END_ACTIVITY (x_msg_count
51: ,x_msg_data );
44: x_cspv_rec);
45: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
46: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
47: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
48: RAISE OKC_API.G_EXCEPTION_ERROR;
49: END IF;
50: OKC_API.END_ACTIVITY (x_msg_count
51: ,x_msg_data );
52: EXCEPTION
46: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
47: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
48: RAISE OKC_API.G_EXCEPTION_ERROR;
49: END IF;
50: OKC_API.END_ACTIVITY (x_msg_count
51: ,x_msg_data );
52: EXCEPTION
53: WHEN OKC_API.G_EXCEPTION_ERROR THEN
54: x_return_status := OKC_API.HANDLE_EXCEPTIONS
49: END IF;
50: OKC_API.END_ACTIVITY (x_msg_count
51: ,x_msg_data );
52: EXCEPTION
53: WHEN OKC_API.G_EXCEPTION_ERROR THEN
54: x_return_status := OKC_API.HANDLE_EXCEPTIONS
55: (l_api_name,
56: G_PKG_NAME,
57: 'OKC_API.G_RET_STS_ERROR',
50: OKC_API.END_ACTIVITY (x_msg_count
51: ,x_msg_data );
52: EXCEPTION
53: WHEN OKC_API.G_EXCEPTION_ERROR THEN
54: x_return_status := OKC_API.HANDLE_EXCEPTIONS
55: (l_api_name,
56: G_PKG_NAME,
57: 'OKC_API.G_RET_STS_ERROR',
58: x_msg_count,
53: WHEN OKC_API.G_EXCEPTION_ERROR THEN
54: x_return_status := OKC_API.HANDLE_EXCEPTIONS
55: (l_api_name,
56: G_PKG_NAME,
57: 'OKC_API.G_RET_STS_ERROR',
58: x_msg_count,
59: x_msg_data,
60: '_PVT');
61: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
57: 'OKC_API.G_RET_STS_ERROR',
58: x_msg_count,
59: x_msg_data,
60: '_PVT');
61: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
62: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
63: (l_api_name,
64: G_PKG_NAME,
65: 'OKC_API.G_RET_STS_UNEXP_ERROR',
58: x_msg_count,
59: x_msg_data,
60: '_PVT');
61: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
62: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
63: (l_api_name,
64: G_PKG_NAME,
65: 'OKC_API.G_RET_STS_UNEXP_ERROR',
66: x_msg_count,
61: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
62: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
63: (l_api_name,
64: G_PKG_NAME,
65: 'OKC_API.G_RET_STS_UNEXP_ERROR',
66: x_msg_count,
67: x_msg_data,
68: '_PVT');
69: WHEN OTHERS THEN
66: x_msg_count,
67: x_msg_data,
68: '_PVT');
69: WHEN OTHERS THEN
70: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
71: (l_api_name,
72: G_PKG_NAME,
73: 'OTHERS',
74: x_msg_count,
85: -- Version : 1.0
86: -- End of comments
87: PROCEDURE create_contract_option(
88: p_api_version IN NUMBER,
89: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
90: x_return_status OUT NOCOPY VARCHAR2,
91: x_msg_count OUT NOCOPY NUMBER,
92: x_msg_data OUT NOCOPY VARCHAR2,
93: p_cspv_tbl IN cspv_tbl_type,
92: x_msg_data OUT NOCOPY VARCHAR2,
93: p_cspv_tbl IN cspv_tbl_type,
94: x_cspv_tbl OUT NOCOPY cspv_tbl_type) IS
95: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_CONTRACT_OPTION';
96: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
97: BEGIN
98: -- Call start_activity to create savepoint, check compatibility
99: -- and initialize message list
100: l_return_status := OKC_API.START_ACTIVITY (l_api_name
96: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
97: BEGIN
98: -- Call start_activity to create savepoint, check compatibility
99: -- and initialize message list
100: l_return_status := OKC_API.START_ACTIVITY (l_api_name
101: ,p_init_msg_list
102: ,'_PVT'
103: , x_return_status);
104: -- Check if activity started successfully
101: ,p_init_msg_list
102: ,'_PVT'
103: , x_return_status);
104: -- Check if activity started successfully
105: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
106: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
107: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
108: RAISE OKC_API.G_EXCEPTION_ERROR;
109: END IF;
102: ,'_PVT'
103: , x_return_status);
104: -- Check if activity started successfully
105: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
106: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
107: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
108: RAISE OKC_API.G_EXCEPTION_ERROR;
109: END IF;
110: -- evaluate conditions, build outcomes for true conditions and
103: , x_return_status);
104: -- Check if activity started successfully
105: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
106: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
107: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
108: RAISE OKC_API.G_EXCEPTION_ERROR;
109: END IF;
110: -- evaluate conditions, build outcomes for true conditions and
111: -- put them on outcome queue
104: -- Check if activity started successfully
105: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
106: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
107: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
108: RAISE OKC_API.G_EXCEPTION_ERROR;
109: END IF;
110: -- evaluate conditions, build outcomes for true conditions and
111: -- put them on outcome queue
112: okl_csp_pvt.insert_row(
116: x_msg_count,
117: x_msg_data,
118: p_cspv_tbl,
119: x_cspv_tbl);
120: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
121: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
122: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
123: RAISE OKC_API.G_EXCEPTION_ERROR;
124: END IF;
117: x_msg_data,
118: p_cspv_tbl,
119: x_cspv_tbl);
120: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
121: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
122: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
123: RAISE OKC_API.G_EXCEPTION_ERROR;
124: END IF;
125: OKC_API.END_ACTIVITY (x_msg_count
118: p_cspv_tbl,
119: x_cspv_tbl);
120: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
121: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
122: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
123: RAISE OKC_API.G_EXCEPTION_ERROR;
124: END IF;
125: OKC_API.END_ACTIVITY (x_msg_count
126: ,x_msg_data );
119: x_cspv_tbl);
120: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
121: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
122: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
123: RAISE OKC_API.G_EXCEPTION_ERROR;
124: END IF;
125: OKC_API.END_ACTIVITY (x_msg_count
126: ,x_msg_data );
127: EXCEPTION
121: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
122: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
123: RAISE OKC_API.G_EXCEPTION_ERROR;
124: END IF;
125: OKC_API.END_ACTIVITY (x_msg_count
126: ,x_msg_data );
127: EXCEPTION
128: WHEN OKC_API.G_EXCEPTION_ERROR THEN
129: x_return_status := OKC_API.HANDLE_EXCEPTIONS
124: END IF;
125: OKC_API.END_ACTIVITY (x_msg_count
126: ,x_msg_data );
127: EXCEPTION
128: WHEN OKC_API.G_EXCEPTION_ERROR THEN
129: x_return_status := OKC_API.HANDLE_EXCEPTIONS
130: (l_api_name,
131: G_PKG_NAME,
132: 'OKC_API.G_RET_STS_ERROR',
125: OKC_API.END_ACTIVITY (x_msg_count
126: ,x_msg_data );
127: EXCEPTION
128: WHEN OKC_API.G_EXCEPTION_ERROR THEN
129: x_return_status := OKC_API.HANDLE_EXCEPTIONS
130: (l_api_name,
131: G_PKG_NAME,
132: 'OKC_API.G_RET_STS_ERROR',
133: x_msg_count,
128: WHEN OKC_API.G_EXCEPTION_ERROR THEN
129: x_return_status := OKC_API.HANDLE_EXCEPTIONS
130: (l_api_name,
131: G_PKG_NAME,
132: 'OKC_API.G_RET_STS_ERROR',
133: x_msg_count,
134: x_msg_data,
135: '_PVT');
136: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
132: 'OKC_API.G_RET_STS_ERROR',
133: x_msg_count,
134: x_msg_data,
135: '_PVT');
136: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
137: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
138: (l_api_name,
139: G_PKG_NAME,
140: 'OKC_API.G_RET_STS_UNEXP_ERROR',
133: x_msg_count,
134: x_msg_data,
135: '_PVT');
136: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
137: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
138: (l_api_name,
139: G_PKG_NAME,
140: 'OKC_API.G_RET_STS_UNEXP_ERROR',
141: x_msg_count,
136: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
137: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
138: (l_api_name,
139: G_PKG_NAME,
140: 'OKC_API.G_RET_STS_UNEXP_ERROR',
141: x_msg_count,
142: x_msg_data,
143: '_PVT');
144: WHEN OTHERS THEN
141: x_msg_count,
142: x_msg_data,
143: '_PVT');
144: WHEN OTHERS THEN
145: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
146: (l_api_name,
147: G_PKG_NAME,
148: 'OTHERS',
149: x_msg_count,
160: -- Version : 1.0
161: -- End of comments
162: PROCEDURE update_contract_option(
163: p_api_version IN NUMBER,
164: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
165: x_return_status OUT NOCOPY VARCHAR2,
166: x_msg_count OUT NOCOPY NUMBER,
167: x_msg_data OUT NOCOPY VARCHAR2,
168: p_cspv_rec IN cspv_rec_type,
167: x_msg_data OUT NOCOPY VARCHAR2,
168: p_cspv_rec IN cspv_rec_type,
169: x_cspv_rec OUT NOCOPY cspv_rec_type) IS
170: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_CONTRACT_OPTION';
171: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
172: BEGIN
173: -- Call start_activity to create savepoint, check compatibility
174: -- and initialize message list
175: l_return_status := OKC_API.START_ACTIVITY (l_api_name
171: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
172: BEGIN
173: -- Call start_activity to create savepoint, check compatibility
174: -- and initialize message list
175: l_return_status := OKC_API.START_ACTIVITY (l_api_name
176: ,p_init_msg_list
177: ,'_PVT'
178: ,x_return_status);
179: -- Check if activity started successfully
176: ,p_init_msg_list
177: ,'_PVT'
178: ,x_return_status);
179: -- Check if activity started successfully
180: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
181: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
182: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
183: RAISE OKC_API.G_EXCEPTION_ERROR;
184: END IF;
177: ,'_PVT'
178: ,x_return_status);
179: -- Check if activity started successfully
180: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
181: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
182: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
183: RAISE OKC_API.G_EXCEPTION_ERROR;
184: END IF;
185: -- evaluate conditions, build outcomes for true conditions and
178: ,x_return_status);
179: -- Check if activity started successfully
180: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
181: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
182: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
183: RAISE OKC_API.G_EXCEPTION_ERROR;
184: END IF;
185: -- evaluate conditions, build outcomes for true conditions and
186: -- put them on outcome queue
179: -- Check if activity started successfully
180: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
181: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
182: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
183: RAISE OKC_API.G_EXCEPTION_ERROR;
184: END IF;
185: -- evaluate conditions, build outcomes for true conditions and
186: -- put them on outcome queue
187: okl_csp_pvt.update_row(
191: x_msg_count,
192: x_msg_data,
193: p_cspv_rec,
194: x_cspv_rec);
195: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
196: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
197: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
198: RAISE OKC_API.G_EXCEPTION_ERROR;
199: END IF;
192: x_msg_data,
193: p_cspv_rec,
194: x_cspv_rec);
195: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
196: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
197: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
198: RAISE OKC_API.G_EXCEPTION_ERROR;
199: END IF;
200: OKC_API.END_ACTIVITY (x_msg_count
193: p_cspv_rec,
194: x_cspv_rec);
195: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
196: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
197: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
198: RAISE OKC_API.G_EXCEPTION_ERROR;
199: END IF;
200: OKC_API.END_ACTIVITY (x_msg_count
201: ,x_msg_data );
194: x_cspv_rec);
195: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
196: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
197: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
198: RAISE OKC_API.G_EXCEPTION_ERROR;
199: END IF;
200: OKC_API.END_ACTIVITY (x_msg_count
201: ,x_msg_data );
202: EXCEPTION
196: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
197: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
198: RAISE OKC_API.G_EXCEPTION_ERROR;
199: END IF;
200: OKC_API.END_ACTIVITY (x_msg_count
201: ,x_msg_data );
202: EXCEPTION
203: WHEN OKC_API.G_EXCEPTION_ERROR THEN
204: x_return_status := OKC_API.HANDLE_EXCEPTIONS
199: END IF;
200: OKC_API.END_ACTIVITY (x_msg_count
201: ,x_msg_data );
202: EXCEPTION
203: WHEN OKC_API.G_EXCEPTION_ERROR THEN
204: x_return_status := OKC_API.HANDLE_EXCEPTIONS
205: (l_api_name,
206: G_PKG_NAME,
207: 'OKC_API.G_RET_STS_ERROR',
200: OKC_API.END_ACTIVITY (x_msg_count
201: ,x_msg_data );
202: EXCEPTION
203: WHEN OKC_API.G_EXCEPTION_ERROR THEN
204: x_return_status := OKC_API.HANDLE_EXCEPTIONS
205: (l_api_name,
206: G_PKG_NAME,
207: 'OKC_API.G_RET_STS_ERROR',
208: x_msg_count,
203: WHEN OKC_API.G_EXCEPTION_ERROR THEN
204: x_return_status := OKC_API.HANDLE_EXCEPTIONS
205: (l_api_name,
206: G_PKG_NAME,
207: 'OKC_API.G_RET_STS_ERROR',
208: x_msg_count,
209: x_msg_data,
210: '_PVT');
211: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
207: 'OKC_API.G_RET_STS_ERROR',
208: x_msg_count,
209: x_msg_data,
210: '_PVT');
211: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
212: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
213: (l_api_name,
214: G_PKG_NAME,
215: 'OKC_API.G_RET_STS_UNEXP_ERROR',
208: x_msg_count,
209: x_msg_data,
210: '_PVT');
211: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
212: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
213: (l_api_name,
214: G_PKG_NAME,
215: 'OKC_API.G_RET_STS_UNEXP_ERROR',
216: x_msg_count,
211: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
212: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
213: (l_api_name,
214: G_PKG_NAME,
215: 'OKC_API.G_RET_STS_UNEXP_ERROR',
216: x_msg_count,
217: x_msg_data,
218: '_PVT');
219: WHEN OTHERS THEN
216: x_msg_count,
217: x_msg_data,
218: '_PVT');
219: WHEN OTHERS THEN
220: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
221: (l_api_name,
222: G_PKG_NAME,
223: 'OTHERS',
224: x_msg_count,
235: -- Version : 1.0
236: -- End of comments
237: PROCEDURE update_contract_option(
238: p_api_version IN NUMBER,
239: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
240: x_return_status OUT NOCOPY VARCHAR2,
241: x_msg_count OUT NOCOPY NUMBER,
242: x_msg_data OUT NOCOPY VARCHAR2,
243: p_cspv_tbl IN cspv_tbl_type,
242: x_msg_data OUT NOCOPY VARCHAR2,
243: p_cspv_tbl IN cspv_tbl_type,
244: x_cspv_tbl OUT NOCOPY cspv_tbl_type) IS
245: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_CONTRACT_OPTION';
246: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
247: BEGIN
248: -- Call start_activity to create savepoint, check compatibility
249: -- and initialize message list
250: l_return_status := OKC_API.START_ACTIVITY (l_api_name
246: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
247: BEGIN
248: -- Call start_activity to create savepoint, check compatibility
249: -- and initialize message list
250: l_return_status := OKC_API.START_ACTIVITY (l_api_name
251: ,p_init_msg_list
252: ,'_PVT'
253: , x_return_status);
254: -- Check if activity started successfully
251: ,p_init_msg_list
252: ,'_PVT'
253: , x_return_status);
254: -- Check if activity started successfully
255: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
256: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
257: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
258: RAISE OKC_API.G_EXCEPTION_ERROR;
259: END IF;
252: ,'_PVT'
253: , x_return_status);
254: -- Check if activity started successfully
255: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
256: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
257: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
258: RAISE OKC_API.G_EXCEPTION_ERROR;
259: END IF;
260: -- evaluate conditions, build outcomes for true conditions and
253: , x_return_status);
254: -- Check if activity started successfully
255: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
256: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
257: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
258: RAISE OKC_API.G_EXCEPTION_ERROR;
259: END IF;
260: -- evaluate conditions, build outcomes for true conditions and
261: -- put them on outcome queue
254: -- Check if activity started successfully
255: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
256: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
257: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
258: RAISE OKC_API.G_EXCEPTION_ERROR;
259: END IF;
260: -- evaluate conditions, build outcomes for true conditions and
261: -- put them on outcome queue
262: okl_csp_pvt.update_row(
266: x_msg_count,
267: x_msg_data,
268: p_cspv_tbl,
269: x_cspv_tbl);
270: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
271: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
272: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
273: RAISE OKC_API.G_EXCEPTION_ERROR;
274: END IF;
267: x_msg_data,
268: p_cspv_tbl,
269: x_cspv_tbl);
270: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
271: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
272: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
273: RAISE OKC_API.G_EXCEPTION_ERROR;
274: END IF;
275: OKC_API.END_ACTIVITY (x_msg_count
268: p_cspv_tbl,
269: x_cspv_tbl);
270: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
271: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
272: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
273: RAISE OKC_API.G_EXCEPTION_ERROR;
274: END IF;
275: OKC_API.END_ACTIVITY (x_msg_count
276: ,x_msg_data );
269: x_cspv_tbl);
270: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
271: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
272: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
273: RAISE OKC_API.G_EXCEPTION_ERROR;
274: END IF;
275: OKC_API.END_ACTIVITY (x_msg_count
276: ,x_msg_data );
277: EXCEPTION
271: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
272: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
273: RAISE OKC_API.G_EXCEPTION_ERROR;
274: END IF;
275: OKC_API.END_ACTIVITY (x_msg_count
276: ,x_msg_data );
277: EXCEPTION
278: WHEN OKC_API.G_EXCEPTION_ERROR THEN
279: x_return_status := OKC_API.HANDLE_EXCEPTIONS
274: END IF;
275: OKC_API.END_ACTIVITY (x_msg_count
276: ,x_msg_data );
277: EXCEPTION
278: WHEN OKC_API.G_EXCEPTION_ERROR THEN
279: x_return_status := OKC_API.HANDLE_EXCEPTIONS
280: (l_api_name,
281: G_PKG_NAME,
282: 'OKC_API.G_RET_STS_ERROR',
275: OKC_API.END_ACTIVITY (x_msg_count
276: ,x_msg_data );
277: EXCEPTION
278: WHEN OKC_API.G_EXCEPTION_ERROR THEN
279: x_return_status := OKC_API.HANDLE_EXCEPTIONS
280: (l_api_name,
281: G_PKG_NAME,
282: 'OKC_API.G_RET_STS_ERROR',
283: x_msg_count,
278: WHEN OKC_API.G_EXCEPTION_ERROR THEN
279: x_return_status := OKC_API.HANDLE_EXCEPTIONS
280: (l_api_name,
281: G_PKG_NAME,
282: 'OKC_API.G_RET_STS_ERROR',
283: x_msg_count,
284: x_msg_data,
285: '_PVT');
286: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
282: 'OKC_API.G_RET_STS_ERROR',
283: x_msg_count,
284: x_msg_data,
285: '_PVT');
286: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
287: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
288: (l_api_name,
289: G_PKG_NAME,
290: 'OKC_API.G_RET_STS_UNEXP_ERROR',
283: x_msg_count,
284: x_msg_data,
285: '_PVT');
286: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
287: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
288: (l_api_name,
289: G_PKG_NAME,
290: 'OKC_API.G_RET_STS_UNEXP_ERROR',
291: x_msg_count,
286: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
287: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
288: (l_api_name,
289: G_PKG_NAME,
290: 'OKC_API.G_RET_STS_UNEXP_ERROR',
291: x_msg_count,
292: x_msg_data,
293: '_PVT');
294: WHEN OTHERS THEN
291: x_msg_count,
292: x_msg_data,
293: '_PVT');
294: WHEN OTHERS THEN
295: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
296: (l_api_name,
297: G_PKG_NAME,
298: 'OTHERS',
299: x_msg_count,
310: -- Version : 1.0
311: -- End of comments
312: PROCEDURE delete_contract_option(
313: p_api_version IN NUMBER,
314: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
315: x_return_status OUT NOCOPY VARCHAR2,
316: x_msg_count OUT NOCOPY NUMBER,
317: x_msg_data OUT NOCOPY VARCHAR2,
318: p_cspv_rec IN cspv_rec_type) IS
316: x_msg_count OUT NOCOPY NUMBER,
317: x_msg_data OUT NOCOPY VARCHAR2,
318: p_cspv_rec IN cspv_rec_type) IS
319: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_CONTRACT_OPTION';
320: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
321: BEGIN
322: -- Call start_activity to create savepoint, check compatibility
323: -- and initialize message list
324: l_return_status := OKC_API.START_ACTIVITY (l_api_name
320: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
321: BEGIN
322: -- Call start_activity to create savepoint, check compatibility
323: -- and initialize message list
324: l_return_status := OKC_API.START_ACTIVITY (l_api_name
325: ,p_init_msg_list
326: ,'_PVT'
327: , x_return_status);
328: -- Check if activity started successfully
325: ,p_init_msg_list
326: ,'_PVT'
327: , x_return_status);
328: -- Check if activity started successfully
329: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
330: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
331: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
332: RAISE OKC_API.G_EXCEPTION_ERROR;
333: END IF;
326: ,'_PVT'
327: , x_return_status);
328: -- Check if activity started successfully
329: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
330: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
331: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
332: RAISE OKC_API.G_EXCEPTION_ERROR;
333: END IF;
334: -- evaluate conditions, build outcomes for true conditions and
327: , x_return_status);
328: -- Check if activity started successfully
329: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
330: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
331: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
332: RAISE OKC_API.G_EXCEPTION_ERROR;
333: END IF;
334: -- evaluate conditions, build outcomes for true conditions and
335: -- put them on outcome queue
328: -- Check if activity started successfully
329: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
330: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
331: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
332: RAISE OKC_API.G_EXCEPTION_ERROR;
333: END IF;
334: -- evaluate conditions, build outcomes for true conditions and
335: -- put them on outcome queue
336: okl_csp_pvt.delete_row(
339: x_return_status,
340: x_msg_count,
341: x_msg_data,
342: p_cspv_rec);
343: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
344: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
345: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
346: RAISE OKC_API.G_EXCEPTION_ERROR;
347: END IF;
340: x_msg_count,
341: x_msg_data,
342: p_cspv_rec);
343: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
344: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
345: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
346: RAISE OKC_API.G_EXCEPTION_ERROR;
347: END IF;
348: OKC_API.END_ACTIVITY (x_msg_count
341: x_msg_data,
342: p_cspv_rec);
343: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
344: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
345: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
346: RAISE OKC_API.G_EXCEPTION_ERROR;
347: END IF;
348: OKC_API.END_ACTIVITY (x_msg_count
349: ,x_msg_data );
342: p_cspv_rec);
343: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
344: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
345: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
346: RAISE OKC_API.G_EXCEPTION_ERROR;
347: END IF;
348: OKC_API.END_ACTIVITY (x_msg_count
349: ,x_msg_data );
350: EXCEPTION
344: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
345: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
346: RAISE OKC_API.G_EXCEPTION_ERROR;
347: END IF;
348: OKC_API.END_ACTIVITY (x_msg_count
349: ,x_msg_data );
350: EXCEPTION
351: WHEN OKC_API.G_EXCEPTION_ERROR THEN
352: x_return_status := OKC_API.HANDLE_EXCEPTIONS
347: END IF;
348: OKC_API.END_ACTIVITY (x_msg_count
349: ,x_msg_data );
350: EXCEPTION
351: WHEN OKC_API.G_EXCEPTION_ERROR THEN
352: x_return_status := OKC_API.HANDLE_EXCEPTIONS
353: (l_api_name,
354: G_PKG_NAME,
355: 'OKC_API.G_RET_STS_ERROR',
348: OKC_API.END_ACTIVITY (x_msg_count
349: ,x_msg_data );
350: EXCEPTION
351: WHEN OKC_API.G_EXCEPTION_ERROR THEN
352: x_return_status := OKC_API.HANDLE_EXCEPTIONS
353: (l_api_name,
354: G_PKG_NAME,
355: 'OKC_API.G_RET_STS_ERROR',
356: x_msg_count,
351: WHEN OKC_API.G_EXCEPTION_ERROR THEN
352: x_return_status := OKC_API.HANDLE_EXCEPTIONS
353: (l_api_name,
354: G_PKG_NAME,
355: 'OKC_API.G_RET_STS_ERROR',
356: x_msg_count,
357: x_msg_data,
358: '_PVT');
359: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
355: 'OKC_API.G_RET_STS_ERROR',
356: x_msg_count,
357: x_msg_data,
358: '_PVT');
359: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
360: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
361: (l_api_name,
362: G_PKG_NAME,
363: 'OKC_API.G_RET_STS_UNEXP_ERROR',
356: x_msg_count,
357: x_msg_data,
358: '_PVT');
359: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
360: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
361: (l_api_name,
362: G_PKG_NAME,
363: 'OKC_API.G_RET_STS_UNEXP_ERROR',
364: x_msg_count,
359: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
360: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
361: (l_api_name,
362: G_PKG_NAME,
363: 'OKC_API.G_RET_STS_UNEXP_ERROR',
364: x_msg_count,
365: x_msg_data,
366: '_PVT');
367: WHEN OTHERS THEN
364: x_msg_count,
365: x_msg_data,
366: '_PVT');
367: WHEN OTHERS THEN
368: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
369: (l_api_name,
370: G_PKG_NAME,
371: 'OTHERS',
372: x_msg_count,
383: -- Version : 1.0
384: -- End of comments
385: PROCEDURE delete_contract_option(
386: p_api_version IN NUMBER,
387: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
388: x_return_status OUT NOCOPY VARCHAR2,
389: x_msg_count OUT NOCOPY NUMBER,
390: x_msg_data OUT NOCOPY VARCHAR2,
391: p_cspv_tbl IN cspv_tbl_type) IS
389: x_msg_count OUT NOCOPY NUMBER,
390: x_msg_data OUT NOCOPY VARCHAR2,
391: p_cspv_tbl IN cspv_tbl_type) IS
392: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_CONTRACT_OPTION';
393: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
394: BEGIN
395: -- Call start_activity to create savepoint, check compatibility
396: -- and initialize message list
397: l_return_status := OKC_API.START_ACTIVITY (l_api_name
393: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
394: BEGIN
395: -- Call start_activity to create savepoint, check compatibility
396: -- and initialize message list
397: l_return_status := OKC_API.START_ACTIVITY (l_api_name
398: ,p_init_msg_list
399: ,'_PVT'
400: , x_return_status);
401: -- Check if activity started successfully
398: ,p_init_msg_list
399: ,'_PVT'
400: , x_return_status);
401: -- Check if activity started successfully
402: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
403: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
404: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
405: RAISE OKC_API.G_EXCEPTION_ERROR;
406: END IF;
399: ,'_PVT'
400: , x_return_status);
401: -- Check if activity started successfully
402: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
403: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
404: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
405: RAISE OKC_API.G_EXCEPTION_ERROR;
406: END IF;
407: -- evaluate conditions, build outcomes for true conditions and
400: , x_return_status);
401: -- Check if activity started successfully
402: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
403: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
404: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
405: RAISE OKC_API.G_EXCEPTION_ERROR;
406: END IF;
407: -- evaluate conditions, build outcomes for true conditions and
408: -- put them on outcome queue
401: -- Check if activity started successfully
402: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
403: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
404: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
405: RAISE OKC_API.G_EXCEPTION_ERROR;
406: END IF;
407: -- evaluate conditions, build outcomes for true conditions and
408: -- put them on outcome queue
409: okl_csp_pvt.delete_row(
412: x_return_status,
413: x_msg_count,
414: x_msg_data,
415: p_cspv_tbl);
416: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
417: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
418: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
419: RAISE OKC_API.G_EXCEPTION_ERROR;
420: END IF;
413: x_msg_count,
414: x_msg_data,
415: p_cspv_tbl);
416: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
417: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
418: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
419: RAISE OKC_API.G_EXCEPTION_ERROR;
420: END IF;
421: OKC_API.END_ACTIVITY (x_msg_count
414: x_msg_data,
415: p_cspv_tbl);
416: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
417: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
418: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
419: RAISE OKC_API.G_EXCEPTION_ERROR;
420: END IF;
421: OKC_API.END_ACTIVITY (x_msg_count
422: ,x_msg_data );
415: p_cspv_tbl);
416: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
417: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
418: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
419: RAISE OKC_API.G_EXCEPTION_ERROR;
420: END IF;
421: OKC_API.END_ACTIVITY (x_msg_count
422: ,x_msg_data );
423: EXCEPTION
417: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
418: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
419: RAISE OKC_API.G_EXCEPTION_ERROR;
420: END IF;
421: OKC_API.END_ACTIVITY (x_msg_count
422: ,x_msg_data );
423: EXCEPTION
424: WHEN OKC_API.G_EXCEPTION_ERROR THEN
425: x_return_status := OKC_API.HANDLE_EXCEPTIONS
420: END IF;
421: OKC_API.END_ACTIVITY (x_msg_count
422: ,x_msg_data );
423: EXCEPTION
424: WHEN OKC_API.G_EXCEPTION_ERROR THEN
425: x_return_status := OKC_API.HANDLE_EXCEPTIONS
426: (l_api_name,
427: G_PKG_NAME,
428: 'OKC_API.G_RET_STS_ERROR',
421: OKC_API.END_ACTIVITY (x_msg_count
422: ,x_msg_data );
423: EXCEPTION
424: WHEN OKC_API.G_EXCEPTION_ERROR THEN
425: x_return_status := OKC_API.HANDLE_EXCEPTIONS
426: (l_api_name,
427: G_PKG_NAME,
428: 'OKC_API.G_RET_STS_ERROR',
429: x_msg_count,
424: WHEN OKC_API.G_EXCEPTION_ERROR THEN
425: x_return_status := OKC_API.HANDLE_EXCEPTIONS
426: (l_api_name,
427: G_PKG_NAME,
428: 'OKC_API.G_RET_STS_ERROR',
429: x_msg_count,
430: x_msg_data,
431: '_PVT');
432: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
428: 'OKC_API.G_RET_STS_ERROR',
429: x_msg_count,
430: x_msg_data,
431: '_PVT');
432: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
433: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
434: (l_api_name,
435: G_PKG_NAME,
436: 'OKC_API.G_RET_STS_UNEXP_ERROR',
429: x_msg_count,
430: x_msg_data,
431: '_PVT');
432: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
433: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
434: (l_api_name,
435: G_PKG_NAME,
436: 'OKC_API.G_RET_STS_UNEXP_ERROR',
437: x_msg_count,
432: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
433: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
434: (l_api_name,
435: G_PKG_NAME,
436: 'OKC_API.G_RET_STS_UNEXP_ERROR',
437: x_msg_count,
438: x_msg_data,
439: '_PVT');
440: WHEN OTHERS THEN
437: x_msg_count,
438: x_msg_data,
439: '_PVT');
440: WHEN OTHERS THEN
441: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
442: (l_api_name,
443: G_PKG_NAME,
444: 'OTHERS',
445: x_msg_count,
456: -- Version : 1.0
457: -- End of comments
458: procedure lock_contract_option(
459: p_api_version IN NUMBER,
460: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
461: x_return_status OUT NOCOPY VARCHAR2,
462: x_msg_count OUT NOCOPY NUMBER,
463: x_msg_data OUT NOCOPY VARCHAR2,
464: p_cspv_rec IN cspv_rec_type) IS
462: x_msg_count OUT NOCOPY NUMBER,
463: x_msg_data OUT NOCOPY VARCHAR2,
464: p_cspv_rec IN cspv_rec_type) IS
465: l_api_name CONSTANT VARCHAR2(30) := 'LOCK_CONTRACT_OPTION';
466: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
467: BEGIN
468: -- Call start_activity to create savepoint, check compatibility
469: -- and initialize message list
470: l_return_status := OKC_API.START_ACTIVITY (l_api_name
466: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
467: BEGIN
468: -- Call start_activity to create savepoint, check compatibility
469: -- and initialize message list
470: l_return_status := OKC_API.START_ACTIVITY (l_api_name
471: ,p_init_msg_list
472: ,'_PVT'
473: , x_return_status);
474: -- Check if activity started successfully
471: ,p_init_msg_list
472: ,'_PVT'
473: , x_return_status);
474: -- Check if activity started successfully
475: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
476: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
477: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
478: RAISE OKC_API.G_EXCEPTION_ERROR;
479: END IF;
472: ,'_PVT'
473: , x_return_status);
474: -- Check if activity started successfully
475: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
476: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
477: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
478: RAISE OKC_API.G_EXCEPTION_ERROR;
479: END IF;
480: -- evaluate conditions, build outcomes for true conditions and
473: , x_return_status);
474: -- Check if activity started successfully
475: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
476: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
477: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
478: RAISE OKC_API.G_EXCEPTION_ERROR;
479: END IF;
480: -- evaluate conditions, build outcomes for true conditions and
481: -- put them on outcome queue
474: -- Check if activity started successfully
475: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
476: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
477: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
478: RAISE OKC_API.G_EXCEPTION_ERROR;
479: END IF;
480: -- evaluate conditions, build outcomes for true conditions and
481: -- put them on outcome queue
482: okl_csp_pvt.lock_row(p_api_version => p_api_version,
484: x_msg_count => x_msg_count,
485: x_msg_data => x_msg_data,
486: x_return_status => x_return_status,
487: p_cspv_rec => p_cspv_rec);
488: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
489: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
490: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
491: RAISE OKC_API.G_EXCEPTION_ERROR;
492: END IF;
485: x_msg_data => x_msg_data,
486: x_return_status => x_return_status,
487: p_cspv_rec => p_cspv_rec);
488: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
489: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
490: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
491: RAISE OKC_API.G_EXCEPTION_ERROR;
492: END IF;
493: OKC_API.END_ACTIVITY (x_msg_count
486: x_return_status => x_return_status,
487: p_cspv_rec => p_cspv_rec);
488: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
489: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
490: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
491: RAISE OKC_API.G_EXCEPTION_ERROR;
492: END IF;
493: OKC_API.END_ACTIVITY (x_msg_count
494: ,x_msg_data );
487: p_cspv_rec => p_cspv_rec);
488: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
489: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
490: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
491: RAISE OKC_API.G_EXCEPTION_ERROR;
492: END IF;
493: OKC_API.END_ACTIVITY (x_msg_count
494: ,x_msg_data );
495: EXCEPTION
489: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
490: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
491: RAISE OKC_API.G_EXCEPTION_ERROR;
492: END IF;
493: OKC_API.END_ACTIVITY (x_msg_count
494: ,x_msg_data );
495: EXCEPTION
496: WHEN OKC_API.G_EXCEPTION_ERROR THEN
497: x_return_status := OKC_API.HANDLE_EXCEPTIONS
492: END IF;
493: OKC_API.END_ACTIVITY (x_msg_count
494: ,x_msg_data );
495: EXCEPTION
496: WHEN OKC_API.G_EXCEPTION_ERROR THEN
497: x_return_status := OKC_API.HANDLE_EXCEPTIONS
498: (l_api_name,
499: G_PKG_NAME,
500: 'OKC_API.G_RET_STS_ERROR',
493: OKC_API.END_ACTIVITY (x_msg_count
494: ,x_msg_data );
495: EXCEPTION
496: WHEN OKC_API.G_EXCEPTION_ERROR THEN
497: x_return_status := OKC_API.HANDLE_EXCEPTIONS
498: (l_api_name,
499: G_PKG_NAME,
500: 'OKC_API.G_RET_STS_ERROR',
501: x_msg_count,
496: WHEN OKC_API.G_EXCEPTION_ERROR THEN
497: x_return_status := OKC_API.HANDLE_EXCEPTIONS
498: (l_api_name,
499: G_PKG_NAME,
500: 'OKC_API.G_RET_STS_ERROR',
501: x_msg_count,
502: x_msg_data,
503: '_PVT');
504: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
500: 'OKC_API.G_RET_STS_ERROR',
501: x_msg_count,
502: x_msg_data,
503: '_PVT');
504: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
505: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
506: (l_api_name,
507: G_PKG_NAME,
508: 'OKC_API.G_RET_STS_UNEXP_ERROR',
501: x_msg_count,
502: x_msg_data,
503: '_PVT');
504: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
505: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
506: (l_api_name,
507: G_PKG_NAME,
508: 'OKC_API.G_RET_STS_UNEXP_ERROR',
509: x_msg_count,
504: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
505: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
506: (l_api_name,
507: G_PKG_NAME,
508: 'OKC_API.G_RET_STS_UNEXP_ERROR',
509: x_msg_count,
510: x_msg_data,
511: '_PVT');
512: WHEN OTHERS THEN
509: x_msg_count,
510: x_msg_data,
511: '_PVT');
512: WHEN OTHERS THEN
513: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
514: (l_api_name,
515: G_PKG_NAME,
516: 'OTHERS',
517: x_msg_count,
528: -- Version : 1.0
529: -- End of comments
530: procedure lock_contract_option(
531: p_api_version IN NUMBER,
532: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
533: x_return_status OUT NOCOPY VARCHAR2,
534: x_msg_count OUT NOCOPY NUMBER,
535: x_msg_data OUT NOCOPY VARCHAR2,
536: p_cspv_tbl IN cspv_tbl_type) IS
534: x_msg_count OUT NOCOPY NUMBER,
535: x_msg_data OUT NOCOPY VARCHAR2,
536: p_cspv_tbl IN cspv_tbl_type) IS
537: l_api_name CONSTANT VARCHAR2(30) := 'LOCK_CONTRACT_OPTION';
538: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
539: BEGIN
540: -- Call start_activity to create savepoint, check compatibility
541: -- and initialize message list
542: l_return_status := OKC_API.START_ACTIVITY (l_api_name
538: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
539: BEGIN
540: -- Call start_activity to create savepoint, check compatibility
541: -- and initialize message list
542: l_return_status := OKC_API.START_ACTIVITY (l_api_name
543: ,p_init_msg_list
544: ,'_PVT'
545: , x_return_status);
546: -- Check if activity started successfully
543: ,p_init_msg_list
544: ,'_PVT'
545: , x_return_status);
546: -- Check if activity started successfully
547: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
548: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
549: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
550: RAISE OKC_API.G_EXCEPTION_ERROR;
551: END IF;
544: ,'_PVT'
545: , x_return_status);
546: -- Check if activity started successfully
547: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
548: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
549: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
550: RAISE OKC_API.G_EXCEPTION_ERROR;
551: END IF;
552: -- evaluate conditions, build outcomes for true conditions and
545: , x_return_status);
546: -- Check if activity started successfully
547: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
548: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
549: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
550: RAISE OKC_API.G_EXCEPTION_ERROR;
551: END IF;
552: -- evaluate conditions, build outcomes for true conditions and
553: -- put them on outcome queue
546: -- Check if activity started successfully
547: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
548: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
549: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
550: RAISE OKC_API.G_EXCEPTION_ERROR;
551: END IF;
552: -- evaluate conditions, build outcomes for true conditions and
553: -- put them on outcome queue
554: okl_csp_pvt.lock_row(p_api_version => p_api_version,
556: x_msg_count => x_msg_count,
557: x_msg_data => x_msg_data,
558: x_return_status => x_return_status,
559: p_cspv_tbl => p_cspv_tbl);
560: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
561: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
562: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
563: RAISE OKC_API.G_EXCEPTION_ERROR;
564: END IF;
557: x_msg_data => x_msg_data,
558: x_return_status => x_return_status,
559: p_cspv_tbl => p_cspv_tbl);
560: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
561: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
562: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
563: RAISE OKC_API.G_EXCEPTION_ERROR;
564: END IF;
565: OKC_API.END_ACTIVITY (x_msg_count
558: x_return_status => x_return_status,
559: p_cspv_tbl => p_cspv_tbl);
560: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
561: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
562: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
563: RAISE OKC_API.G_EXCEPTION_ERROR;
564: END IF;
565: OKC_API.END_ACTIVITY (x_msg_count
566: ,x_msg_data );
559: p_cspv_tbl => p_cspv_tbl);
560: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
561: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
562: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
563: RAISE OKC_API.G_EXCEPTION_ERROR;
564: END IF;
565: OKC_API.END_ACTIVITY (x_msg_count
566: ,x_msg_data );
567: EXCEPTION
561: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
562: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
563: RAISE OKC_API.G_EXCEPTION_ERROR;
564: END IF;
565: OKC_API.END_ACTIVITY (x_msg_count
566: ,x_msg_data );
567: EXCEPTION
568: WHEN OKC_API.G_EXCEPTION_ERROR THEN
569: x_return_status := OKC_API.HANDLE_EXCEPTIONS
564: END IF;
565: OKC_API.END_ACTIVITY (x_msg_count
566: ,x_msg_data );
567: EXCEPTION
568: WHEN OKC_API.G_EXCEPTION_ERROR THEN
569: x_return_status := OKC_API.HANDLE_EXCEPTIONS
570: (l_api_name,
571: G_PKG_NAME,
572: 'OKC_API.G_RET_STS_ERROR',
565: OKC_API.END_ACTIVITY (x_msg_count
566: ,x_msg_data );
567: EXCEPTION
568: WHEN OKC_API.G_EXCEPTION_ERROR THEN
569: x_return_status := OKC_API.HANDLE_EXCEPTIONS
570: (l_api_name,
571: G_PKG_NAME,
572: 'OKC_API.G_RET_STS_ERROR',
573: x_msg_count,
568: WHEN OKC_API.G_EXCEPTION_ERROR THEN
569: x_return_status := OKC_API.HANDLE_EXCEPTIONS
570: (l_api_name,
571: G_PKG_NAME,
572: 'OKC_API.G_RET_STS_ERROR',
573: x_msg_count,
574: x_msg_data,
575: '_PVT');
576: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
572: 'OKC_API.G_RET_STS_ERROR',
573: x_msg_count,
574: x_msg_data,
575: '_PVT');
576: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
577: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
578: (l_api_name,
579: G_PKG_NAME,
580: 'OKC_API.G_RET_STS_UNEXP_ERROR',
573: x_msg_count,
574: x_msg_data,
575: '_PVT');
576: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
577: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
578: (l_api_name,
579: G_PKG_NAME,
580: 'OKC_API.G_RET_STS_UNEXP_ERROR',
581: x_msg_count,
576: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
577: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
578: (l_api_name,
579: G_PKG_NAME,
580: 'OKC_API.G_RET_STS_UNEXP_ERROR',
581: x_msg_count,
582: x_msg_data,
583: '_PVT');
584: WHEN OTHERS THEN
581: x_msg_count,
582: x_msg_data,
583: '_PVT');
584: WHEN OTHERS THEN
585: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
586: (l_api_name,
587: G_PKG_NAME,
588: 'OTHERS',
589: x_msg_count,
600: -- Version : 1.0
601: -- End of comments
602: procedure validate_contract_option(
603: p_api_version IN NUMBER,
604: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
605: x_return_status OUT NOCOPY VARCHAR2,
606: x_msg_count OUT NOCOPY NUMBER,
607: x_msg_data OUT NOCOPY VARCHAR2,
608: p_cspv_rec IN cspv_rec_type) IS
606: x_msg_count OUT NOCOPY NUMBER,
607: x_msg_data OUT NOCOPY VARCHAR2,
608: p_cspv_rec IN cspv_rec_type) IS
609: l_api_name CONSTANT VARCHAR2(30) := 'VALIDATE_CONTRACT_OPTION';
610: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
611: BEGIN
612: -- Call start_activity to create savepoint, check compatibility
613: -- and initialize message list
614: l_return_status := OKC_API.START_ACTIVITY (l_api_name
610: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
611: BEGIN
612: -- Call start_activity to create savepoint, check compatibility
613: -- and initialize message list
614: l_return_status := OKC_API.START_ACTIVITY (l_api_name
615: ,p_init_msg_list
616: ,'_PVT'
617: , x_return_status);
618: -- Check if activity started successfully
615: ,p_init_msg_list
616: ,'_PVT'
617: , x_return_status);
618: -- Check if activity started successfully
619: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
620: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
621: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
622: RAISE OKC_API.G_EXCEPTION_ERROR;
623: END IF;
616: ,'_PVT'
617: , x_return_status);
618: -- Check if activity started successfully
619: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
620: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
621: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
622: RAISE OKC_API.G_EXCEPTION_ERROR;
623: END IF;
624: -- evaluate conditions, build outcomes for true conditions and
617: , x_return_status);
618: -- Check if activity started successfully
619: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
620: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
621: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
622: RAISE OKC_API.G_EXCEPTION_ERROR;
623: END IF;
624: -- evaluate conditions, build outcomes for true conditions and
625: -- put them on outcome queue
618: -- Check if activity started successfully
619: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
620: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
621: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
622: RAISE OKC_API.G_EXCEPTION_ERROR;
623: END IF;
624: -- evaluate conditions, build outcomes for true conditions and
625: -- put them on outcome queue
626: okl_csp_pvt.validate_row(p_api_version => p_api_version,
628: x_msg_count => x_msg_count,
629: x_msg_data => x_msg_data,
630: x_return_status => x_return_status,
631: p_cspv_rec => p_cspv_rec);
632: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
633: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
634: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
635: RAISE OKC_API.G_EXCEPTION_ERROR;
636: END IF;
629: x_msg_data => x_msg_data,
630: x_return_status => x_return_status,
631: p_cspv_rec => p_cspv_rec);
632: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
633: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
634: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
635: RAISE OKC_API.G_EXCEPTION_ERROR;
636: END IF;
637: OKC_API.END_ACTIVITY (x_msg_count
630: x_return_status => x_return_status,
631: p_cspv_rec => p_cspv_rec);
632: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
633: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
634: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
635: RAISE OKC_API.G_EXCEPTION_ERROR;
636: END IF;
637: OKC_API.END_ACTIVITY (x_msg_count
638: ,x_msg_data );
631: p_cspv_rec => p_cspv_rec);
632: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
633: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
634: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
635: RAISE OKC_API.G_EXCEPTION_ERROR;
636: END IF;
637: OKC_API.END_ACTIVITY (x_msg_count
638: ,x_msg_data );
639: EXCEPTION
633: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
634: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
635: RAISE OKC_API.G_EXCEPTION_ERROR;
636: END IF;
637: OKC_API.END_ACTIVITY (x_msg_count
638: ,x_msg_data );
639: EXCEPTION
640: WHEN OKC_API.G_EXCEPTION_ERROR THEN
641: x_return_status := OKC_API.HANDLE_EXCEPTIONS
636: END IF;
637: OKC_API.END_ACTIVITY (x_msg_count
638: ,x_msg_data );
639: EXCEPTION
640: WHEN OKC_API.G_EXCEPTION_ERROR THEN
641: x_return_status := OKC_API.HANDLE_EXCEPTIONS
642: (l_api_name,
643: G_PKG_NAME,
644: 'OKC_API.G_RET_STS_ERROR',
637: OKC_API.END_ACTIVITY (x_msg_count
638: ,x_msg_data );
639: EXCEPTION
640: WHEN OKC_API.G_EXCEPTION_ERROR THEN
641: x_return_status := OKC_API.HANDLE_EXCEPTIONS
642: (l_api_name,
643: G_PKG_NAME,
644: 'OKC_API.G_RET_STS_ERROR',
645: x_msg_count,
640: WHEN OKC_API.G_EXCEPTION_ERROR THEN
641: x_return_status := OKC_API.HANDLE_EXCEPTIONS
642: (l_api_name,
643: G_PKG_NAME,
644: 'OKC_API.G_RET_STS_ERROR',
645: x_msg_count,
646: x_msg_data,
647: '_PVT');
648: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
644: 'OKC_API.G_RET_STS_ERROR',
645: x_msg_count,
646: x_msg_data,
647: '_PVT');
648: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
649: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
650: (l_api_name,
651: G_PKG_NAME,
652: 'OKC_API.G_RET_STS_UNEXP_ERROR',
645: x_msg_count,
646: x_msg_data,
647: '_PVT');
648: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
649: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
650: (l_api_name,
651: G_PKG_NAME,
652: 'OKC_API.G_RET_STS_UNEXP_ERROR',
653: x_msg_count,
648: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
649: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
650: (l_api_name,
651: G_PKG_NAME,
652: 'OKC_API.G_RET_STS_UNEXP_ERROR',
653: x_msg_count,
654: x_msg_data,
655: '_PVT');
656: WHEN OTHERS THEN
653: x_msg_count,
654: x_msg_data,
655: '_PVT');
656: WHEN OTHERS THEN
657: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
658: (l_api_name,
659: G_PKG_NAME,
660: 'OTHERS',
661: x_msg_count,
672: -- Version : 1.0
673: -- End of comments
674: procedure validate_contract_option(
675: p_api_version IN NUMBER,
676: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
677: x_return_status OUT NOCOPY VARCHAR2,
678: x_msg_count OUT NOCOPY NUMBER,
679: x_msg_data OUT NOCOPY VARCHAR2,
680: p_cspv_tbl IN cspv_tbl_type) IS
678: x_msg_count OUT NOCOPY NUMBER,
679: x_msg_data OUT NOCOPY VARCHAR2,
680: p_cspv_tbl IN cspv_tbl_type) IS
681: l_api_name CONSTANT VARCHAR2(30) := 'VALIDATE_CONTRACT_OPTION';
682: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
683: BEGIN
684: -- Call start_activity to create savepoint, check compatibility
685: -- and initialize message list
686: l_return_status := OKC_API.START_ACTIVITY (l_api_name
682: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
683: BEGIN
684: -- Call start_activity to create savepoint, check compatibility
685: -- and initialize message list
686: l_return_status := OKC_API.START_ACTIVITY (l_api_name
687: ,p_init_msg_list
688: ,'_PVT'
689: , x_return_status);
690: -- Check if activity started successfully
687: ,p_init_msg_list
688: ,'_PVT'
689: , x_return_status);
690: -- Check if activity started successfully
691: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
692: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
693: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
694: RAISE OKC_API.G_EXCEPTION_ERROR;
695: END IF;
688: ,'_PVT'
689: , x_return_status);
690: -- Check if activity started successfully
691: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
692: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
693: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
694: RAISE OKC_API.G_EXCEPTION_ERROR;
695: END IF;
696: -- evaluate conditions, build outcomes for true conditions and
689: , x_return_status);
690: -- Check if activity started successfully
691: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
692: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
693: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
694: RAISE OKC_API.G_EXCEPTION_ERROR;
695: END IF;
696: -- evaluate conditions, build outcomes for true conditions and
697: -- put them on outcome queue
690: -- Check if activity started successfully
691: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
692: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
693: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
694: RAISE OKC_API.G_EXCEPTION_ERROR;
695: END IF;
696: -- evaluate conditions, build outcomes for true conditions and
697: -- put them on outcome queue
698: okl_csp_pvt.validate_row(p_api_version => p_api_version,
700: x_msg_count => x_msg_count,
701: x_msg_data => x_msg_data,
702: x_return_status => x_return_status,
703: p_cspv_tbl => p_cspv_tbl);
704: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
705: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
706: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
707: RAISE OKC_API.G_EXCEPTION_ERROR;
708: END IF;
701: x_msg_data => x_msg_data,
702: x_return_status => x_return_status,
703: p_cspv_tbl => p_cspv_tbl);
704: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
705: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
706: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
707: RAISE OKC_API.G_EXCEPTION_ERROR;
708: END IF;
709: OKC_API.END_ACTIVITY (x_msg_count
702: x_return_status => x_return_status,
703: p_cspv_tbl => p_cspv_tbl);
704: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
705: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
706: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
707: RAISE OKC_API.G_EXCEPTION_ERROR;
708: END IF;
709: OKC_API.END_ACTIVITY (x_msg_count
710: ,x_msg_data );
703: p_cspv_tbl => p_cspv_tbl);
704: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
705: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
706: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
707: RAISE OKC_API.G_EXCEPTION_ERROR;
708: END IF;
709: OKC_API.END_ACTIVITY (x_msg_count
710: ,x_msg_data );
711: EXCEPTION
705: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
706: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
707: RAISE OKC_API.G_EXCEPTION_ERROR;
708: END IF;
709: OKC_API.END_ACTIVITY (x_msg_count
710: ,x_msg_data );
711: EXCEPTION
712: WHEN OKC_API.G_EXCEPTION_ERROR THEN
713: x_return_status := OKC_API.HANDLE_EXCEPTIONS
708: END IF;
709: OKC_API.END_ACTIVITY (x_msg_count
710: ,x_msg_data );
711: EXCEPTION
712: WHEN OKC_API.G_EXCEPTION_ERROR THEN
713: x_return_status := OKC_API.HANDLE_EXCEPTIONS
714: (l_api_name,
715: G_PKG_NAME,
716: 'OKC_API.G_RET_STS_ERROR',
709: OKC_API.END_ACTIVITY (x_msg_count
710: ,x_msg_data );
711: EXCEPTION
712: WHEN OKC_API.G_EXCEPTION_ERROR THEN
713: x_return_status := OKC_API.HANDLE_EXCEPTIONS
714: (l_api_name,
715: G_PKG_NAME,
716: 'OKC_API.G_RET_STS_ERROR',
717: x_msg_count,
712: WHEN OKC_API.G_EXCEPTION_ERROR THEN
713: x_return_status := OKC_API.HANDLE_EXCEPTIONS
714: (l_api_name,
715: G_PKG_NAME,
716: 'OKC_API.G_RET_STS_ERROR',
717: x_msg_count,
718: x_msg_data,
719: '_PVT');
720: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
716: 'OKC_API.G_RET_STS_ERROR',
717: x_msg_count,
718: x_msg_data,
719: '_PVT');
720: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
721: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
722: (l_api_name,
723: G_PKG_NAME,
724: 'OKC_API.G_RET_STS_UNEXP_ERROR',
717: x_msg_count,
718: x_msg_data,
719: '_PVT');
720: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
721: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
722: (l_api_name,
723: G_PKG_NAME,
724: 'OKC_API.G_RET_STS_UNEXP_ERROR',
725: x_msg_count,
720: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
721: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
722: (l_api_name,
723: G_PKG_NAME,
724: 'OKC_API.G_RET_STS_UNEXP_ERROR',
725: x_msg_count,
726: x_msg_data,
727: '_PVT');
728: WHEN OTHERS THEN
725: x_msg_count,
726: x_msg_data,
727: '_PVT');
728: WHEN OTHERS THEN
729: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
730: (l_api_name,
731: G_PKG_NAME,
732: 'OTHERS',
733: x_msg_count,