31: -- validate_row for:OKS_INTERACTION_HIST_V --
32: ---------------------------------------------
33: PROCEDURE validate_row(
34: p_api_version IN NUMBER,
35: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
36: x_return_status OUT NOCOPY VARCHAR2,
37: x_msg_count OUT NOCOPY NUMBER,
38: x_msg_data OUT NOCOPY VARCHAR2,
39: p_inhv_rec IN inhv_rec_type) IS
39: p_inhv_rec IN inhv_rec_type) IS
40:
41: l_api_version CONSTANT NUMBER := 1;
42: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
43: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
44: l_inhv_rec inhv_rec_type := p_inhv_rec;
45: l_inh_rec inh_rec_type;
46: BEGIN
47: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
43: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
44: l_inhv_rec inhv_rec_type := p_inhv_rec;
45: l_inh_rec inh_rec_type;
46: BEGIN
47: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
48:
49: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
50: G_PKG_NAME,
51: p_init_msg_list,
45: l_inh_rec inh_rec_type;
46: BEGIN
47: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
48:
49: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
50: G_PKG_NAME,
51: p_init_msg_list,
52: l_api_version,
53: p_api_version,
52: l_api_version,
53: p_api_version,
54: '_PUB',
55: x_return_status);
56: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
57: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
58: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
59: RAISE OKC_API.G_EXCEPTION_ERROR;
60: END IF;
53: p_api_version,
54: '_PUB',
55: x_return_status);
56: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
57: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
58: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
59: RAISE OKC_API.G_EXCEPTION_ERROR;
60: END IF;
61:
54: '_PUB',
55: x_return_status);
56: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
57: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
58: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
59: RAISE OKC_API.G_EXCEPTION_ERROR;
60: END IF;
61:
62: OKC_UTIL.call_user_hook
55: x_return_status);
56: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
57: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
58: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
59: RAISE OKC_API.G_EXCEPTION_ERROR;
60: END IF;
61:
62: OKC_UTIL.call_user_hook
63: (
65: p_package_name => g_pkg_name,
66: p_procedure_name => l_api_name,
67: p_before_after => 'B'
68: );
69: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
70: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
71: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
72: raise OKC_API.G_EXCEPTION_ERROR;
73: End If;
66: p_procedure_name => l_api_name,
67: p_before_after => 'B'
68: );
69: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
70: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
71: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
72: raise OKC_API.G_EXCEPTION_ERROR;
73: End If;
74: OKS_INTERACTION_HIST_PVT.validate_row(p_api_version => l_api_version,
67: p_before_after => 'B'
68: );
69: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
70: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
71: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
72: raise OKC_API.G_EXCEPTION_ERROR;
73: End If;
74: OKS_INTERACTION_HIST_PVT.validate_row(p_api_version => l_api_version,
75: p_init_msg_list => p_init_msg_list,
68: );
69: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
70: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
71: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
72: raise OKC_API.G_EXCEPTION_ERROR;
73: End If;
74: OKS_INTERACTION_HIST_PVT.validate_row(p_api_version => l_api_version,
75: p_init_msg_list => p_init_msg_list,
76: x_return_status => x_return_status,
77: x_msg_count => x_msg_count,
78: x_msg_data => x_msg_data,
79: p_inhv_rec => l_inhv_rec);
80:
81: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
82: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
83: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
84: raise OKC_API.G_EXCEPTION_ERROR;
85: End If;
78: x_msg_data => x_msg_data,
79: p_inhv_rec => l_inhv_rec);
80:
81: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
82: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
83: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
84: raise OKC_API.G_EXCEPTION_ERROR;
85: End If;
86:
79: p_inhv_rec => l_inhv_rec);
80:
81: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
82: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
83: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
84: raise OKC_API.G_EXCEPTION_ERROR;
85: End If;
86:
87: OKC_UTIL.call_user_hook
80:
81: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
82: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
83: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
84: raise OKC_API.G_EXCEPTION_ERROR;
85: End If;
86:
87: OKC_UTIL.call_user_hook
88: (
91: p_procedure_name => l_api_name,
92: p_before_after => 'A'
93: );
94:
95: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
96: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
97: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
98: raise OKC_API.G_EXCEPTION_ERROR;
99: End If;
92: p_before_after => 'A'
93: );
94:
95: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
96: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
97: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
98: raise OKC_API.G_EXCEPTION_ERROR;
99: End If;
100:
93: );
94:
95: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
96: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
97: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
98: raise OKC_API.G_EXCEPTION_ERROR;
99: End If;
100:
101: OKC_API.END_ACTIVITY
94:
95: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
96: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
97: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
98: raise OKC_API.G_EXCEPTION_ERROR;
99: End If;
100:
101: OKC_API.END_ACTIVITY
102: (
97: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
98: raise OKC_API.G_EXCEPTION_ERROR;
99: End If;
100:
101: OKC_API.END_ACTIVITY
102: (
103: x_msg_count => x_msg_count,
104: x_msg_data => x_msg_data
105: );
105: );
106: x_return_status := l_return_status;
107:
108: EXCEPTION
109: WHEN OKC_API.G_EXCEPTION_ERROR THEN
110: x_return_status := OKC_API.HANDLE_EXCEPTIONS
111: (
112: l_api_name,
113: G_PKG_NAME,
106: x_return_status := l_return_status;
107:
108: EXCEPTION
109: WHEN OKC_API.G_EXCEPTION_ERROR THEN
110: x_return_status := OKC_API.HANDLE_EXCEPTIONS
111: (
112: l_api_name,
113: G_PKG_NAME,
114: 'OKC_API.G_RET_STS_ERROR',
110: x_return_status := OKC_API.HANDLE_EXCEPTIONS
111: (
112: l_api_name,
113: G_PKG_NAME,
114: 'OKC_API.G_RET_STS_ERROR',
115: x_msg_count,
116: x_msg_data,
117: '_PUB'
118: );
115: x_msg_count,
116: x_msg_data,
117: '_PUB'
118: );
119: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
120: x_return_status := OKC_API.HANDLE_EXCEPTIONS
121: (
122: l_api_name,
123: G_PKG_NAME,
116: x_msg_data,
117: '_PUB'
118: );
119: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
120: x_return_status := OKC_API.HANDLE_EXCEPTIONS
121: (
122: l_api_name,
123: G_PKG_NAME,
124: 'OKC_API.G_RET_STS_UNEXP_ERROR',
120: x_return_status := OKC_API.HANDLE_EXCEPTIONS
121: (
122: l_api_name,
123: G_PKG_NAME,
124: 'OKC_API.G_RET_STS_UNEXP_ERROR',
125: x_msg_count,
126: x_msg_data,
127: '_PUB'
128: );
126: x_msg_data,
127: '_PUB'
128: );
129: WHEN OTHERS THEN
130: x_return_status := OKC_API.HANDLE_EXCEPTIONS
131: (
132: l_api_name,
133: G_PKG_NAME,
134: 'OTHERS',
141: -- PL/SQL TBL validate_row for:OKS_INTERACTION_HIST_V --
142: --------------------------------------------------------
143: PROCEDURE validate_row(
144: p_api_version IN NUMBER,
145: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
146: x_return_status OUT NOCOPY VARCHAR2,
147: x_msg_count OUT NOCOPY NUMBER,
148: x_msg_data OUT NOCOPY VARCHAR2,
149: p_inhv_tbl IN inhv_tbl_type,
146: x_return_status OUT NOCOPY VARCHAR2,
147: x_msg_count OUT NOCOPY NUMBER,
148: x_msg_data OUT NOCOPY VARCHAR2,
149: p_inhv_tbl IN inhv_tbl_type,
150: px_error_tbl IN OUT NOCOPY OKC_API.ERROR_TBL_TYPE) IS
151:
152: l_api_version CONSTANT NUMBER := 1;
153: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_validate_row';
154: i NUMBER := 0;
151:
152: l_api_version CONSTANT NUMBER := 1;
153: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_validate_row';
154: i NUMBER := 0;
155: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
156: BEGIN
157: OKC_API.init_msg_list(p_init_msg_list);
158: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
159: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
153: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_validate_row';
154: i NUMBER := 0;
155: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
156: BEGIN
157: OKC_API.init_msg_list(p_init_msg_list);
158: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
159: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
160: G_PKG_NAME,
161: p_init_msg_list,
154: i NUMBER := 0;
155: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
156: BEGIN
157: OKC_API.init_msg_list(p_init_msg_list);
158: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
159: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
160: G_PKG_NAME,
161: p_init_msg_list,
162: l_api_version,
155: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
156: BEGIN
157: OKC_API.init_msg_list(p_init_msg_list);
158: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
159: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
160: G_PKG_NAME,
161: p_init_msg_list,
162: l_api_version,
163: p_api_version,
162: l_api_version,
163: p_api_version,
164: '_PUB',
165: x_return_status);
166: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
167: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
168: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
169: RAISE OKC_API.G_EXCEPTION_ERROR;
170: END IF;
163: p_api_version,
164: '_PUB',
165: x_return_status);
166: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
167: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
168: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
169: RAISE OKC_API.G_EXCEPTION_ERROR;
170: END IF;
171:
164: '_PUB',
165: x_return_status);
166: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
167: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
168: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
169: RAISE OKC_API.G_EXCEPTION_ERROR;
170: END IF;
171:
172: OKC_UTIL.call_user_hook
165: x_return_status);
166: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
167: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
168: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
169: RAISE OKC_API.G_EXCEPTION_ERROR;
170: END IF;
171:
172: OKC_UTIL.call_user_hook
173: (
175: p_package_name => g_pkg_name,
176: p_procedure_name => l_api_name,
177: p_before_after => 'B'
178: );
179: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
180: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
181: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
182: raise OKC_API.G_EXCEPTION_ERROR;
183: End If;
176: p_procedure_name => l_api_name,
177: p_before_after => 'B'
178: );
179: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
180: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
181: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
182: raise OKC_API.G_EXCEPTION_ERROR;
183: End If;
184:
177: p_before_after => 'B'
178: );
179: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
180: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
181: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
182: raise OKC_API.G_EXCEPTION_ERROR;
183: End If;
184:
185: OKS_INTERACTION_HIST_PVT.validate_row(
178: );
179: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
180: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
181: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
182: raise OKC_API.G_EXCEPTION_ERROR;
183: End If;
184:
185: OKS_INTERACTION_HIST_PVT.validate_row(
186: p_api_version => l_api_version,
190: x_msg_data => x_msg_data,
191: p_inhv_tbl => p_inhv_tbl,
192: px_error_tbl => px_error_tbl);
193:
194: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
195: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
196: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
197: raise OKC_API.G_EXCEPTION_ERROR;
198: End If;
191: p_inhv_tbl => p_inhv_tbl,
192: px_error_tbl => px_error_tbl);
193:
194: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
195: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
196: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
197: raise OKC_API.G_EXCEPTION_ERROR;
198: End If;
199:
192: px_error_tbl => px_error_tbl);
193:
194: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
195: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
196: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
197: raise OKC_API.G_EXCEPTION_ERROR;
198: End If;
199:
200: OKC_UTIL.call_user_hook
193:
194: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
195: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
196: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
197: raise OKC_API.G_EXCEPTION_ERROR;
198: End If;
199:
200: OKC_UTIL.call_user_hook
201: (
204: p_procedure_name => l_api_name,
205: p_before_after => 'A'
206: );
207:
208: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
209: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
210: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
211: raise OKC_API.G_EXCEPTION_ERROR;
212: End If;
205: p_before_after => 'A'
206: );
207:
208: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
209: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
210: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
211: raise OKC_API.G_EXCEPTION_ERROR;
212: End If;
213: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
206: );
207:
208: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
209: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
210: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
211: raise OKC_API.G_EXCEPTION_ERROR;
212: End If;
213: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
214: x_return_status := l_return_status;
207:
208: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
209: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
210: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
211: raise OKC_API.G_EXCEPTION_ERROR;
212: End If;
213: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
214: x_return_status := l_return_status;
215:
209: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
210: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
211: raise OKC_API.G_EXCEPTION_ERROR;
212: End If;
213: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
214: x_return_status := l_return_status;
215:
216: EXCEPTION
217: WHEN OKC_API.G_EXCEPTION_ERROR THEN
213: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
214: x_return_status := l_return_status;
215:
216: EXCEPTION
217: WHEN OKC_API.G_EXCEPTION_ERROR THEN
218: x_return_status := OKC_API.HANDLE_EXCEPTIONS
219: (
220: l_api_name,
221: G_PKG_NAME,
214: x_return_status := l_return_status;
215:
216: EXCEPTION
217: WHEN OKC_API.G_EXCEPTION_ERROR THEN
218: x_return_status := OKC_API.HANDLE_EXCEPTIONS
219: (
220: l_api_name,
221: G_PKG_NAME,
222: 'OKC_API.G_RET_STS_ERROR',
218: x_return_status := OKC_API.HANDLE_EXCEPTIONS
219: (
220: l_api_name,
221: G_PKG_NAME,
222: 'OKC_API.G_RET_STS_ERROR',
223: x_msg_count,
224: x_msg_data,
225: '_PUB'
226: );
223: x_msg_count,
224: x_msg_data,
225: '_PUB'
226: );
227: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
228: x_return_status := OKC_API.HANDLE_EXCEPTIONS
229: (
230: l_api_name,
231: G_PKG_NAME,
224: x_msg_data,
225: '_PUB'
226: );
227: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
228: x_return_status := OKC_API.HANDLE_EXCEPTIONS
229: (
230: l_api_name,
231: G_PKG_NAME,
232: 'OKC_API.G_RET_STS_UNEXP_ERROR',
228: x_return_status := OKC_API.HANDLE_EXCEPTIONS
229: (
230: l_api_name,
231: G_PKG_NAME,
232: 'OKC_API.G_RET_STS_UNEXP_ERROR',
233: x_msg_count,
234: x_msg_data,
235: '_PUB'
236: );
234: x_msg_data,
235: '_PUB'
236: );
237: WHEN OTHERS THEN
238: x_return_status := OKC_API.HANDLE_EXCEPTIONS
239: (
240: l_api_name,
241: G_PKG_NAME,
242: 'OTHERS',
250: -- PL/SQL TBL validate_row for:OKS_INTERACTION_HIST_V --
251: --------------------------------------------------------
252: PROCEDURE validate_row(
253: p_api_version IN NUMBER,
254: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
255: x_return_status OUT NOCOPY VARCHAR2,
256: x_msg_count OUT NOCOPY NUMBER,
257: x_msg_data OUT NOCOPY VARCHAR2,
258: p_inhv_tbl IN inhv_tbl_type) IS
258: p_inhv_tbl IN inhv_tbl_type) IS
259:
260: l_api_version CONSTANT NUMBER := 1;
261: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
262: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
263: l_error_tbl OKC_API.ERROR_TBL_TYPE;
264: BEGIN
265: OKC_API.init_msg_list(p_init_msg_list);
266: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
259:
260: l_api_version CONSTANT NUMBER := 1;
261: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
262: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
263: l_error_tbl OKC_API.ERROR_TBL_TYPE;
264: BEGIN
265: OKC_API.init_msg_list(p_init_msg_list);
266: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
267: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
261: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
262: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
263: l_error_tbl OKC_API.ERROR_TBL_TYPE;
264: BEGIN
265: OKC_API.init_msg_list(p_init_msg_list);
266: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
267: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
268: G_PKG_NAME,
269: p_init_msg_list,
262: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
263: l_error_tbl OKC_API.ERROR_TBL_TYPE;
264: BEGIN
265: OKC_API.init_msg_list(p_init_msg_list);
266: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
267: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
268: G_PKG_NAME,
269: p_init_msg_list,
270: l_api_version,
263: l_error_tbl OKC_API.ERROR_TBL_TYPE;
264: BEGIN
265: OKC_API.init_msg_list(p_init_msg_list);
266: x_return_status:= OKC_API.G_RET_STS_SUCCESS;
267: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
268: G_PKG_NAME,
269: p_init_msg_list,
270: l_api_version,
271: p_api_version,
270: l_api_version,
271: p_api_version,
272: '_PUB',
273: x_return_status);
274: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
275: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
276: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
277: RAISE OKC_API.G_EXCEPTION_ERROR;
278: END IF;
271: p_api_version,
272: '_PUB',
273: x_return_status);
274: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
275: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
276: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
277: RAISE OKC_API.G_EXCEPTION_ERROR;
278: END IF;
279:
272: '_PUB',
273: x_return_status);
274: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
275: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
276: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
277: RAISE OKC_API.G_EXCEPTION_ERROR;
278: END IF;
279:
280: OKC_UTIL.call_user_hook
273: x_return_status);
274: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
275: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
276: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
277: RAISE OKC_API.G_EXCEPTION_ERROR;
278: END IF;
279:
280: OKC_UTIL.call_user_hook
281: (
283: p_package_name => g_pkg_name,
284: p_procedure_name => l_api_name,
285: p_before_after => 'B'
286: );
287: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
288: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
289: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
290: raise OKC_API.G_EXCEPTION_ERROR;
291: End If;
284: p_procedure_name => l_api_name,
285: p_before_after => 'B'
286: );
287: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
288: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
289: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
290: raise OKC_API.G_EXCEPTION_ERROR;
291: End If;
292:
285: p_before_after => 'B'
286: );
287: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
288: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
289: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
290: raise OKC_API.G_EXCEPTION_ERROR;
291: End If;
292:
293: OKS_INTERACTION_HIST_PVT.validate_row(
286: );
287: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
288: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
289: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
290: raise OKC_API.G_EXCEPTION_ERROR;
291: End If;
292:
293: OKS_INTERACTION_HIST_PVT.validate_row(
294: p_api_version => l_api_version,
297: x_msg_count => x_msg_count,
298: x_msg_data => x_msg_data,
299: p_inhv_tbl => p_inhv_tbl);
300:
301: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
302: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
303: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
304: raise OKC_API.G_EXCEPTION_ERROR;
305: End If;
298: x_msg_data => x_msg_data,
299: p_inhv_tbl => p_inhv_tbl);
300:
301: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
302: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
303: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
304: raise OKC_API.G_EXCEPTION_ERROR;
305: End If;
306:
299: p_inhv_tbl => p_inhv_tbl);
300:
301: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
302: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
303: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
304: raise OKC_API.G_EXCEPTION_ERROR;
305: End If;
306:
307: OKC_UTIL.call_user_hook
300:
301: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
302: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
303: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
304: raise OKC_API.G_EXCEPTION_ERROR;
305: End If;
306:
307: OKC_UTIL.call_user_hook
308: (
311: p_procedure_name => l_api_name,
312: p_before_after => 'A'
313: );
314:
315: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
316: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
317: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
318: raise OKC_API.G_EXCEPTION_ERROR;
319: End If;
312: p_before_after => 'A'
313: );
314:
315: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
316: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
317: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
318: raise OKC_API.G_EXCEPTION_ERROR;
319: End If;
320:
313: );
314:
315: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
316: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
317: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
318: raise OKC_API.G_EXCEPTION_ERROR;
319: End If;
320:
321: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
314:
315: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
316: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
317: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
318: raise OKC_API.G_EXCEPTION_ERROR;
319: End If;
320:
321: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
322: x_return_status := l_return_status;
317: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
318: raise OKC_API.G_EXCEPTION_ERROR;
319: End If;
320:
321: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
322: x_return_status := l_return_status;
323:
324: EXCEPTION
325: WHEN OKC_API.G_EXCEPTION_ERROR THEN
321: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
322: x_return_status := l_return_status;
323:
324: EXCEPTION
325: WHEN OKC_API.G_EXCEPTION_ERROR THEN
326: x_return_status := OKC_API.HANDLE_EXCEPTIONS
327: (
328: l_api_name,
329: G_PKG_NAME,
322: x_return_status := l_return_status;
323:
324: EXCEPTION
325: WHEN OKC_API.G_EXCEPTION_ERROR THEN
326: x_return_status := OKC_API.HANDLE_EXCEPTIONS
327: (
328: l_api_name,
329: G_PKG_NAME,
330: 'OKC_API.G_RET_STS_ERROR',
326: x_return_status := OKC_API.HANDLE_EXCEPTIONS
327: (
328: l_api_name,
329: G_PKG_NAME,
330: 'OKC_API.G_RET_STS_ERROR',
331: x_msg_count,
332: x_msg_data,
333: '_PUB'
334: );
331: x_msg_count,
332: x_msg_data,
333: '_PUB'
334: );
335: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
336: x_return_status := OKC_API.HANDLE_EXCEPTIONS
337: (
338: l_api_name,
339: G_PKG_NAME,
332: x_msg_data,
333: '_PUB'
334: );
335: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
336: x_return_status := OKC_API.HANDLE_EXCEPTIONS
337: (
338: l_api_name,
339: G_PKG_NAME,
340: 'OKC_API.G_RET_STS_UNEXP_ERROR',
336: x_return_status := OKC_API.HANDLE_EXCEPTIONS
337: (
338: l_api_name,
339: G_PKG_NAME,
340: 'OKC_API.G_RET_STS_UNEXP_ERROR',
341: x_msg_count,
342: x_msg_data,
343: '_PUB'
344: );
342: x_msg_data,
343: '_PUB'
344: );
345: WHEN OTHERS THEN
346: x_return_status := OKC_API.HANDLE_EXCEPTIONS
347: (
348: l_api_name,
349: G_PKG_NAME,
350: 'OTHERS',
361: -- insert_row for:OKS_INTERACTION_HISTORY --
362: --------------------------------------------
363: PROCEDURE insert_row(
364: p_api_version IN NUMBER,
365: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
366: x_return_status OUT NOCOPY VARCHAR2,
367: x_msg_count OUT NOCOPY NUMBER,
368: x_msg_data OUT NOCOPY VARCHAR2,
369: p_inhv_rec IN inhv_rec_type,
370: x_inhv_rec OUT NOCOPY inhv_rec_type) IS
371:
372: l_api_version CONSTANT NUMBER := 1;
373: l_api_name CONSTANT VARCHAR2(30) := 'B_insert_row';
374: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
375: ------------------------------------------------
376: -- Set_Attributes for:OKS_INTERACTION_HISTORY --
377: ------------------------------------------------
378: BEGIN
375: ------------------------------------------------
376: -- Set_Attributes for:OKS_INTERACTION_HISTORY --
377: ------------------------------------------------
378: BEGIN
379: x_return_status := OKC_API.G_RET_STS_SUCCESS;
380: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
381: p_init_msg_list,
382: '_PUB',
383: x_return_status);
376: -- Set_Attributes for:OKS_INTERACTION_HISTORY --
377: ------------------------------------------------
378: BEGIN
379: x_return_status := OKC_API.G_RET_STS_SUCCESS;
380: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
381: p_init_msg_list,
382: '_PUB',
383: x_return_status);
384: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
380: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
381: p_init_msg_list,
382: '_PUB',
383: x_return_status);
384: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
385: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
386: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
387: RAISE OKC_API.G_EXCEPTION_ERROR;
388: END IF;
381: p_init_msg_list,
382: '_PUB',
383: x_return_status);
384: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
385: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
386: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
387: RAISE OKC_API.G_EXCEPTION_ERROR;
388: END IF;
389: OKC_UTIL.call_user_hook
382: '_PUB',
383: x_return_status);
384: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
385: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
386: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
387: RAISE OKC_API.G_EXCEPTION_ERROR;
388: END IF;
389: OKC_UTIL.call_user_hook
390: (
383: x_return_status);
384: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
385: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
386: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
387: RAISE OKC_API.G_EXCEPTION_ERROR;
388: END IF;
389: OKC_UTIL.call_user_hook
390: (
391: x_return_status => x_return_status,
392: p_package_name => g_pkg_name,
393: p_procedure_name => l_api_name,
394: p_before_after => 'B'
395: );
396: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
397: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
398: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
399: raise OKC_API.G_EXCEPTION_ERROR;
400: End If;
393: p_procedure_name => l_api_name,
394: p_before_after => 'B'
395: );
396: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
397: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
398: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
399: raise OKC_API.G_EXCEPTION_ERROR;
400: End If;
401:
394: p_before_after => 'B'
395: );
396: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
397: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
398: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
399: raise OKC_API.G_EXCEPTION_ERROR;
400: End If;
401:
402: OKS_INTERACTION_HIST_PVT.insert_row(
395: );
396: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
397: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
398: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
399: raise OKC_API.G_EXCEPTION_ERROR;
400: End If;
401:
402: OKS_INTERACTION_HIST_PVT.insert_row(
403: p_api_version => l_api_version,
407: x_msg_data => x_msg_data,
408: p_inhv_rec => p_inhv_rec,
409: x_inhv_rec => x_inhv_rec);
410:
411: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
412: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
413: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
414: raise OKC_API.G_EXCEPTION_ERROR;
415: End If;
408: p_inhv_rec => p_inhv_rec,
409: x_inhv_rec => x_inhv_rec);
410:
411: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
412: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
413: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
414: raise OKC_API.G_EXCEPTION_ERROR;
415: End If;
416:
409: x_inhv_rec => x_inhv_rec);
410:
411: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
412: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
413: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
414: raise OKC_API.G_EXCEPTION_ERROR;
415: End If;
416:
417: OKC_UTIL.call_user_hook
410:
411: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
412: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
413: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
414: raise OKC_API.G_EXCEPTION_ERROR;
415: End If;
416:
417: OKC_UTIL.call_user_hook
418: (
421: p_procedure_name => l_api_name,
422: p_before_after => 'A'
423: );
424:
425: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
426: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
427: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
428: raise OKC_API.G_EXCEPTION_ERROR;
429: End If;
422: p_before_after => 'A'
423: );
424:
425: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
426: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
427: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
428: raise OKC_API.G_EXCEPTION_ERROR;
429: End If;
430:
423: );
424:
425: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
426: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
427: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
428: raise OKC_API.G_EXCEPTION_ERROR;
429: End If;
430:
431: x_return_status := l_return_status;
424:
425: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
426: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
427: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
428: raise OKC_API.G_EXCEPTION_ERROR;
429: End If;
430:
431: x_return_status := l_return_status;
432: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
428: raise OKC_API.G_EXCEPTION_ERROR;
429: End If;
430:
431: x_return_status := l_return_status;
432: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
433: EXCEPTION
434: WHEN OKC_API.G_EXCEPTION_ERROR THEN
435: x_return_status := OKC_API.HANDLE_EXCEPTIONS
436: (
430:
431: x_return_status := l_return_status;
432: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
433: EXCEPTION
434: WHEN OKC_API.G_EXCEPTION_ERROR THEN
435: x_return_status := OKC_API.HANDLE_EXCEPTIONS
436: (
437: l_api_name,
438: G_PKG_NAME,
431: x_return_status := l_return_status;
432: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
433: EXCEPTION
434: WHEN OKC_API.G_EXCEPTION_ERROR THEN
435: x_return_status := OKC_API.HANDLE_EXCEPTIONS
436: (
437: l_api_name,
438: G_PKG_NAME,
439: 'OKC_API.G_RET_STS_ERROR',
435: x_return_status := OKC_API.HANDLE_EXCEPTIONS
436: (
437: l_api_name,
438: G_PKG_NAME,
439: 'OKC_API.G_RET_STS_ERROR',
440: x_msg_count,
441: x_msg_data,
442: '_PUB'
443: );
440: x_msg_count,
441: x_msg_data,
442: '_PUB'
443: );
444: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
445: x_return_status := OKC_API.HANDLE_EXCEPTIONS
446: (
447: l_api_name,
448: G_PKG_NAME,
441: x_msg_data,
442: '_PUB'
443: );
444: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
445: x_return_status := OKC_API.HANDLE_EXCEPTIONS
446: (
447: l_api_name,
448: G_PKG_NAME,
449: 'OKC_API.G_RET_STS_UNEXP_ERROR',
445: x_return_status := OKC_API.HANDLE_EXCEPTIONS
446: (
447: l_api_name,
448: G_PKG_NAME,
449: 'OKC_API.G_RET_STS_UNEXP_ERROR',
450: x_msg_count,
451: x_msg_data,
452: '_PUB'
453: );
451: x_msg_data,
452: '_PUB'
453: );
454: WHEN OTHERS THEN
455: x_return_status := OKC_API.HANDLE_EXCEPTIONS
456: (
457: l_api_name,
458: G_PKG_NAME,
459: 'OTHERS',
466: -- PL/SQL TBL insert_row for:INHV_TBL --
467: ----------------------------------------
468: PROCEDURE insert_row(
469: p_api_version IN NUMBER,
470: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
471: x_return_status OUT NOCOPY VARCHAR2,
472: x_msg_count OUT NOCOPY NUMBER,
473: x_msg_data OUT NOCOPY VARCHAR2,
474: p_inhv_tbl IN inhv_tbl_type,
472: x_msg_count OUT NOCOPY NUMBER,
473: x_msg_data OUT NOCOPY VARCHAR2,
474: p_inhv_tbl IN inhv_tbl_type,
475: x_inhv_tbl OUT NOCOPY inhv_tbl_type,
476: px_error_tbl IN OUT NOCOPY OKC_API.ERROR_TBL_TYPE) IS
477:
478: l_api_version CONSTANT NUMBER := 1;
479: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_insert_row';
480: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
476: px_error_tbl IN OUT NOCOPY OKC_API.ERROR_TBL_TYPE) IS
477:
478: l_api_version CONSTANT NUMBER := 1;
479: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_insert_row';
480: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
481: BEGIN
482: OKC_API.init_msg_list(p_init_msg_list);
483: x_return_status := OKC_API.G_RET_STS_SUCCESS;
484: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
478: l_api_version CONSTANT NUMBER := 1;
479: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_insert_row';
480: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
481: BEGIN
482: OKC_API.init_msg_list(p_init_msg_list);
483: x_return_status := OKC_API.G_RET_STS_SUCCESS;
484: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
485: G_PKG_NAME,
486: p_init_msg_list,
479: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_insert_row';
480: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
481: BEGIN
482: OKC_API.init_msg_list(p_init_msg_list);
483: x_return_status := OKC_API.G_RET_STS_SUCCESS;
484: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
485: G_PKG_NAME,
486: p_init_msg_list,
487: l_api_version,
480: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
481: BEGIN
482: OKC_API.init_msg_list(p_init_msg_list);
483: x_return_status := OKC_API.G_RET_STS_SUCCESS;
484: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
485: G_PKG_NAME,
486: p_init_msg_list,
487: l_api_version,
488: p_api_version,
488: p_api_version,
489: '_PUB',
490: x_return_status);
491:
492: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
493: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
494: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
495: RAISE OKC_API.G_EXCEPTION_ERROR;
496: END IF;
489: '_PUB',
490: x_return_status);
491:
492: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
493: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
494: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
495: RAISE OKC_API.G_EXCEPTION_ERROR;
496: END IF;
497: OKC_UTIL.call_user_hook
490: x_return_status);
491:
492: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
493: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
494: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
495: RAISE OKC_API.G_EXCEPTION_ERROR;
496: END IF;
497: OKC_UTIL.call_user_hook
498: (
491:
492: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
493: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
494: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
495: RAISE OKC_API.G_EXCEPTION_ERROR;
496: END IF;
497: OKC_UTIL.call_user_hook
498: (
499: x_return_status => x_return_status,
500: p_package_name => g_pkg_name,
501: p_procedure_name => l_api_name,
502: p_before_after => 'B'
503: );
504: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
505: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
506: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
507: raise OKC_API.G_EXCEPTION_ERROR;
508: End If;
501: p_procedure_name => l_api_name,
502: p_before_after => 'B'
503: );
504: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
505: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
506: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
507: raise OKC_API.G_EXCEPTION_ERROR;
508: End If;
509:
502: p_before_after => 'B'
503: );
504: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
505: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
506: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
507: raise OKC_API.G_EXCEPTION_ERROR;
508: End If;
509:
510: OKS_INTERACTION_HIST_PVT.insert_row(
503: );
504: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
505: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
506: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
507: raise OKC_API.G_EXCEPTION_ERROR;
508: End If;
509:
510: OKS_INTERACTION_HIST_PVT.insert_row(
511: p_api_version => l_api_version,
516: p_inhv_tbl => p_inhv_tbl,
517: x_inhv_tbl => x_inhv_tbl,
518: px_error_tbl => px_error_tbl);
519:
520: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
521: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
522: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
523: raise OKC_API.G_EXCEPTION_ERROR;
524: End If;
517: x_inhv_tbl => x_inhv_tbl,
518: px_error_tbl => px_error_tbl);
519:
520: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
521: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
522: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
523: raise OKC_API.G_EXCEPTION_ERROR;
524: End If;
525:
518: px_error_tbl => px_error_tbl);
519:
520: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
521: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
522: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
523: raise OKC_API.G_EXCEPTION_ERROR;
524: End If;
525:
526: OKC_UTIL.call_user_hook
519:
520: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
521: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
522: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
523: raise OKC_API.G_EXCEPTION_ERROR;
524: End If;
525:
526: OKC_UTIL.call_user_hook
527: (
530: p_procedure_name => l_api_name,
531: p_before_after => 'A'
532: );
533:
534: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
535: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
536: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
537: raise OKC_API.G_EXCEPTION_ERROR;
538: End If;
531: p_before_after => 'A'
532: );
533:
534: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
535: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
536: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
537: raise OKC_API.G_EXCEPTION_ERROR;
538: End If;
539: x_return_status := l_return_status;
532: );
533:
534: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
535: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
536: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
537: raise OKC_API.G_EXCEPTION_ERROR;
538: End If;
539: x_return_status := l_return_status;
540: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
533:
534: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
535: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
536: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
537: raise OKC_API.G_EXCEPTION_ERROR;
538: End If;
539: x_return_status := l_return_status;
540: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
541: EXCEPTION
536: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
537: raise OKC_API.G_EXCEPTION_ERROR;
538: End If;
539: x_return_status := l_return_status;
540: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
541: EXCEPTION
542: WHEN OKC_API.G_EXCEPTION_ERROR THEN
543: x_return_status := OKC_API.HANDLE_EXCEPTIONS
544: (
538: End If;
539: x_return_status := l_return_status;
540: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
541: EXCEPTION
542: WHEN OKC_API.G_EXCEPTION_ERROR THEN
543: x_return_status := OKC_API.HANDLE_EXCEPTIONS
544: (
545: l_api_name,
546: G_PKG_NAME,
539: x_return_status := l_return_status;
540: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
541: EXCEPTION
542: WHEN OKC_API.G_EXCEPTION_ERROR THEN
543: x_return_status := OKC_API.HANDLE_EXCEPTIONS
544: (
545: l_api_name,
546: G_PKG_NAME,
547: 'OKC_API.G_RET_STS_ERROR',
543: x_return_status := OKC_API.HANDLE_EXCEPTIONS
544: (
545: l_api_name,
546: G_PKG_NAME,
547: 'OKC_API.G_RET_STS_ERROR',
548: x_msg_count,
549: x_msg_data,
550: '_PUB'
551: );
548: x_msg_count,
549: x_msg_data,
550: '_PUB'
551: );
552: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
553: x_return_status := OKC_API.HANDLE_EXCEPTIONS
554: (
555: l_api_name,
556: G_PKG_NAME,
549: x_msg_data,
550: '_PUB'
551: );
552: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
553: x_return_status := OKC_API.HANDLE_EXCEPTIONS
554: (
555: l_api_name,
556: G_PKG_NAME,
557: 'OKC_API.G_RET_STS_UNEXP_ERROR',
553: x_return_status := OKC_API.HANDLE_EXCEPTIONS
554: (
555: l_api_name,
556: G_PKG_NAME,
557: 'OKC_API.G_RET_STS_UNEXP_ERROR',
558: x_msg_count,
559: x_msg_data,
560: '_PUB'
561: );
559: x_msg_data,
560: '_PUB'
561: );
562: WHEN OTHERS THEN
563: x_return_status := OKC_API.HANDLE_EXCEPTIONS
564: (
565: l_api_name,
566: G_PKG_NAME,
567: 'OTHERS',
575: -- PL/SQL TBL insert_row for:INHV_TBL --
576: ----------------------------------------
577: PROCEDURE insert_row(
578: p_api_version IN NUMBER,
579: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
580: x_return_status OUT NOCOPY VARCHAR2,
581: x_msg_count OUT NOCOPY NUMBER,
582: x_msg_data OUT NOCOPY VARCHAR2,
583: p_inhv_tbl IN inhv_tbl_type,
584: x_inhv_tbl OUT NOCOPY inhv_tbl_type) IS
585:
586: l_api_version CONSTANT NUMBER := 1;
587: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
588: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
589: BEGIN
590: OKC_API.init_msg_list(p_init_msg_list);
591: x_return_status := OKC_API.G_RET_STS_SUCCESS;
592: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
586: l_api_version CONSTANT NUMBER := 1;
587: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
588: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
589: BEGIN
590: OKC_API.init_msg_list(p_init_msg_list);
591: x_return_status := OKC_API.G_RET_STS_SUCCESS;
592: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
593: G_PKG_NAME,
594: p_init_msg_list,
587: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
588: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
589: BEGIN
590: OKC_API.init_msg_list(p_init_msg_list);
591: x_return_status := OKC_API.G_RET_STS_SUCCESS;
592: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
593: G_PKG_NAME,
594: p_init_msg_list,
595: l_api_version,
588: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
589: BEGIN
590: OKC_API.init_msg_list(p_init_msg_list);
591: x_return_status := OKC_API.G_RET_STS_SUCCESS;
592: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
593: G_PKG_NAME,
594: p_init_msg_list,
595: l_api_version,
596: p_api_version,
596: p_api_version,
597: '_PUB',
598: x_return_status);
599:
600: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
601: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
602: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
603: RAISE OKC_API.G_EXCEPTION_ERROR;
604: END IF;
597: '_PUB',
598: x_return_status);
599:
600: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
601: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
602: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
603: RAISE OKC_API.G_EXCEPTION_ERROR;
604: END IF;
605: OKC_UTIL.call_user_hook
598: x_return_status);
599:
600: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
601: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
602: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
603: RAISE OKC_API.G_EXCEPTION_ERROR;
604: END IF;
605: OKC_UTIL.call_user_hook
606: (
599:
600: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
601: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
602: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
603: RAISE OKC_API.G_EXCEPTION_ERROR;
604: END IF;
605: OKC_UTIL.call_user_hook
606: (
607: x_return_status => x_return_status,
608: p_package_name => g_pkg_name,
609: p_procedure_name => l_api_name,
610: p_before_after => 'B'
611: );
612: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
613: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
614: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
615: raise OKC_API.G_EXCEPTION_ERROR;
616: End If;
609: p_procedure_name => l_api_name,
610: p_before_after => 'B'
611: );
612: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
613: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
614: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
615: raise OKC_API.G_EXCEPTION_ERROR;
616: End If;
617:
610: p_before_after => 'B'
611: );
612: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
613: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
614: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
615: raise OKC_API.G_EXCEPTION_ERROR;
616: End If;
617:
618: OKS_INTERACTION_HIST_PVT.insert_row(
611: );
612: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
613: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
614: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
615: raise OKC_API.G_EXCEPTION_ERROR;
616: End If;
617:
618: OKS_INTERACTION_HIST_PVT.insert_row(
619: p_api_version => l_api_version,
623: x_msg_data => x_msg_data,
624: p_inhv_tbl => p_inhv_tbl,
625: x_inhv_tbl => x_inhv_tbl);
626:
627: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
628: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
629: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
630: raise OKC_API.G_EXCEPTION_ERROR;
631: End If;
624: p_inhv_tbl => p_inhv_tbl,
625: x_inhv_tbl => x_inhv_tbl);
626:
627: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
628: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
629: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
630: raise OKC_API.G_EXCEPTION_ERROR;
631: End If;
632:
625: x_inhv_tbl => x_inhv_tbl);
626:
627: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
628: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
629: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
630: raise OKC_API.G_EXCEPTION_ERROR;
631: End If;
632:
633: OKC_UTIL.call_user_hook
626:
627: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
628: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
629: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
630: raise OKC_API.G_EXCEPTION_ERROR;
631: End If;
632:
633: OKC_UTIL.call_user_hook
634: (
637: p_procedure_name => l_api_name,
638: p_before_after => 'A'
639: );
640:
641: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
642: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
643: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
644: raise OKC_API.G_EXCEPTION_ERROR;
645: End If;
638: p_before_after => 'A'
639: );
640:
641: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
642: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
643: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
644: raise OKC_API.G_EXCEPTION_ERROR;
645: End If;
646: x_return_status := l_return_status;
639: );
640:
641: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
642: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
643: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
644: raise OKC_API.G_EXCEPTION_ERROR;
645: End If;
646: x_return_status := l_return_status;
647: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
640:
641: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
642: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
643: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
644: raise OKC_API.G_EXCEPTION_ERROR;
645: End If;
646: x_return_status := l_return_status;
647: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
648: EXCEPTION
643: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
644: raise OKC_API.G_EXCEPTION_ERROR;
645: End If;
646: x_return_status := l_return_status;
647: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
648: EXCEPTION
649: WHEN OKC_API.G_EXCEPTION_ERROR THEN
650: x_return_status := OKC_API.HANDLE_EXCEPTIONS
651: (
645: End If;
646: x_return_status := l_return_status;
647: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
648: EXCEPTION
649: WHEN OKC_API.G_EXCEPTION_ERROR THEN
650: x_return_status := OKC_API.HANDLE_EXCEPTIONS
651: (
652: l_api_name,
653: G_PKG_NAME,
646: x_return_status := l_return_status;
647: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
648: EXCEPTION
649: WHEN OKC_API.G_EXCEPTION_ERROR THEN
650: x_return_status := OKC_API.HANDLE_EXCEPTIONS
651: (
652: l_api_name,
653: G_PKG_NAME,
654: 'OKC_API.G_RET_STS_ERROR',
650: x_return_status := OKC_API.HANDLE_EXCEPTIONS
651: (
652: l_api_name,
653: G_PKG_NAME,
654: 'OKC_API.G_RET_STS_ERROR',
655: x_msg_count,
656: x_msg_data,
657: '_PUB'
658: );
655: x_msg_count,
656: x_msg_data,
657: '_PUB'
658: );
659: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
660: x_return_status := OKC_API.HANDLE_EXCEPTIONS
661: (
662: l_api_name,
663: G_PKG_NAME,
656: x_msg_data,
657: '_PUB'
658: );
659: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
660: x_return_status := OKC_API.HANDLE_EXCEPTIONS
661: (
662: l_api_name,
663: G_PKG_NAME,
664: 'OKC_API.G_RET_STS_UNEXP_ERROR',
660: x_return_status := OKC_API.HANDLE_EXCEPTIONS
661: (
662: l_api_name,
663: G_PKG_NAME,
664: 'OKC_API.G_RET_STS_UNEXP_ERROR',
665: x_msg_count,
666: x_msg_data,
667: '_PUB'
668: );
666: x_msg_data,
667: '_PUB'
668: );
669: WHEN OTHERS THEN
670: x_return_status := OKC_API.HANDLE_EXCEPTIONS
671: (
672: l_api_name,
673: G_PKG_NAME,
674: 'OTHERS',
685: -- lock_row for: OKS_INTERACTION_HIST_V --
686: ------------------------------------------
687: PROCEDURE lock_row(
688: p_api_version IN NUMBER,
689: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
690: x_return_status OUT NOCOPY VARCHAR2,
691: x_msg_count OUT NOCOPY NUMBER,
692: x_msg_data OUT NOCOPY VARCHAR2,
693: p_inhv_rec IN inhv_rec_type) IS
693: p_inhv_rec IN inhv_rec_type) IS
694:
695: l_api_version CONSTANT NUMBER := 1;
696: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
697: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
698: l_inh_rec inh_rec_type;
699: BEGIN
700: x_return_status := OKC_API.G_RET_STS_SUCCESS;
701: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
696: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
697: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
698: l_inh_rec inh_rec_type;
699: BEGIN
700: x_return_status := OKC_API.G_RET_STS_SUCCESS;
701: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
702: G_PKG_NAME,
703: p_init_msg_list,
704: l_api_version,
697: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
698: l_inh_rec inh_rec_type;
699: BEGIN
700: x_return_status := OKC_API.G_RET_STS_SUCCESS;
701: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
702: G_PKG_NAME,
703: p_init_msg_list,
704: l_api_version,
705: p_api_version,
704: l_api_version,
705: p_api_version,
706: '_PUB',
707: x_return_status);
708: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
709: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
710: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
711: RAISE OKC_API.G_EXCEPTION_ERROR;
712: END IF;
705: p_api_version,
706: '_PUB',
707: x_return_status);
708: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
709: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
710: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
711: RAISE OKC_API.G_EXCEPTION_ERROR;
712: END IF;
713:
706: '_PUB',
707: x_return_status);
708: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
709: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
710: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
711: RAISE OKC_API.G_EXCEPTION_ERROR;
712: END IF;
713:
714: OKC_UTIL.call_user_hook
707: x_return_status);
708: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
709: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
710: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
711: RAISE OKC_API.G_EXCEPTION_ERROR;
712: END IF;
713:
714: OKC_UTIL.call_user_hook
715: (
717: p_package_name => g_pkg_name,
718: p_procedure_name => l_api_name,
719: p_before_after => 'B'
720: );
721: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
722: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
723: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
724: raise OKC_API.G_EXCEPTION_ERROR;
725: End If;
718: p_procedure_name => l_api_name,
719: p_before_after => 'B'
720: );
721: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
722: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
723: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
724: raise OKC_API.G_EXCEPTION_ERROR;
725: End If;
726:
719: p_before_after => 'B'
720: );
721: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
722: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
723: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
724: raise OKC_API.G_EXCEPTION_ERROR;
725: End If;
726:
727: OKS_INTERACTION_HIST_PVT.lock_row(
720: );
721: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
722: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
723: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
724: raise OKC_API.G_EXCEPTION_ERROR;
725: End If;
726:
727: OKS_INTERACTION_HIST_PVT.lock_row(
728: p_api_version => l_api_version,
731: x_msg_count => x_msg_count,
732: x_msg_data => x_msg_data,
733: p_inhv_rec => p_inhv_rec);
734:
735: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
736: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
737: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
738: raise OKC_API.G_EXCEPTION_ERROR;
739: End If;
732: x_msg_data => x_msg_data,
733: p_inhv_rec => p_inhv_rec);
734:
735: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
736: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
737: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
738: raise OKC_API.G_EXCEPTION_ERROR;
739: End If;
740:
733: p_inhv_rec => p_inhv_rec);
734:
735: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
736: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
737: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
738: raise OKC_API.G_EXCEPTION_ERROR;
739: End If;
740:
741: OKC_UTIL.call_user_hook
734:
735: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
736: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
737: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
738: raise OKC_API.G_EXCEPTION_ERROR;
739: End If;
740:
741: OKC_UTIL.call_user_hook
742: (
745: p_procedure_name => l_api_name,
746: p_before_after => 'A'
747: );
748:
749: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
750: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
751: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
752: raise OKC_API.G_EXCEPTION_ERROR;
753: End If;
746: p_before_after => 'A'
747: );
748:
749: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
750: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
751: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
752: raise OKC_API.G_EXCEPTION_ERROR;
753: End If;
754: x_return_status := l_return_status;
747: );
748:
749: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
750: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
751: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
752: raise OKC_API.G_EXCEPTION_ERROR;
753: End If;
754: x_return_status := l_return_status;
755:
748:
749: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
750: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
751: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
752: raise OKC_API.G_EXCEPTION_ERROR;
753: End If;
754: x_return_status := l_return_status;
755:
756: x_return_status := l_return_status;
753: End If;
754: x_return_status := l_return_status;
755:
756: x_return_status := l_return_status;
757: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
758: EXCEPTION
759: WHEN OKC_API.G_EXCEPTION_ERROR THEN
760: x_return_status := OKC_API.HANDLE_EXCEPTIONS
761: (
755:
756: x_return_status := l_return_status;
757: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
758: EXCEPTION
759: WHEN OKC_API.G_EXCEPTION_ERROR THEN
760: x_return_status := OKC_API.HANDLE_EXCEPTIONS
761: (
762: l_api_name,
763: G_PKG_NAME,
756: x_return_status := l_return_status;
757: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
758: EXCEPTION
759: WHEN OKC_API.G_EXCEPTION_ERROR THEN
760: x_return_status := OKC_API.HANDLE_EXCEPTIONS
761: (
762: l_api_name,
763: G_PKG_NAME,
764: 'OKC_API.G_RET_STS_ERROR',
760: x_return_status := OKC_API.HANDLE_EXCEPTIONS
761: (
762: l_api_name,
763: G_PKG_NAME,
764: 'OKC_API.G_RET_STS_ERROR',
765: x_msg_count,
766: x_msg_data,
767: '_PUB'
768: );
765: x_msg_count,
766: x_msg_data,
767: '_PUB'
768: );
769: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
770: x_return_status := OKC_API.HANDLE_EXCEPTIONS
771: (
772: l_api_name,
773: G_PKG_NAME,
766: x_msg_data,
767: '_PUB'
768: );
769: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
770: x_return_status := OKC_API.HANDLE_EXCEPTIONS
771: (
772: l_api_name,
773: G_PKG_NAME,
774: 'OKC_API.G_RET_STS_UNEXP_ERROR',
770: x_return_status := OKC_API.HANDLE_EXCEPTIONS
771: (
772: l_api_name,
773: G_PKG_NAME,
774: 'OKC_API.G_RET_STS_UNEXP_ERROR',
775: x_msg_count,
776: x_msg_data,
777: '_PUB'
778: );
776: x_msg_data,
777: '_PUB'
778: );
779: WHEN OTHERS THEN
780: x_return_status := OKC_API.HANDLE_EXCEPTIONS
781: (
782: l_api_name,
783: G_PKG_NAME,
784: 'OTHERS',
791: -- PL/SQL TBL lock_row for:INHV_TBL --
792: --------------------------------------
793: PROCEDURE lock_row(
794: p_api_version IN NUMBER,
795: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
796: x_return_status OUT NOCOPY VARCHAR2,
797: x_msg_count OUT NOCOPY NUMBER,
798: x_msg_data OUT NOCOPY VARCHAR2,
799: p_inhv_tbl IN inhv_tbl_type,
796: x_return_status OUT NOCOPY VARCHAR2,
797: x_msg_count OUT NOCOPY NUMBER,
798: x_msg_data OUT NOCOPY VARCHAR2,
799: p_inhv_tbl IN inhv_tbl_type,
800: px_error_tbl IN OUT NOCOPY OKC_API.ERROR_TBL_TYPE) IS
801:
802: l_api_version CONSTANT NUMBER := 1;
803: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_lock_row';
804: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
800: px_error_tbl IN OUT NOCOPY OKC_API.ERROR_TBL_TYPE) IS
801:
802: l_api_version CONSTANT NUMBER := 1;
803: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_lock_row';
804: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
805: BEGIN
806: OKC_API.init_msg_list(p_init_msg_list);
807: x_return_status := OKC_API.G_RET_STS_SUCCESS;
808: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
802: l_api_version CONSTANT NUMBER := 1;
803: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_lock_row';
804: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
805: BEGIN
806: OKC_API.init_msg_list(p_init_msg_list);
807: x_return_status := OKC_API.G_RET_STS_SUCCESS;
808: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
809: G_PKG_NAME,
810: p_init_msg_list,
803: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_lock_row';
804: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
805: BEGIN
806: OKC_API.init_msg_list(p_init_msg_list);
807: x_return_status := OKC_API.G_RET_STS_SUCCESS;
808: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
809: G_PKG_NAME,
810: p_init_msg_list,
811: l_api_version,
804: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
805: BEGIN
806: OKC_API.init_msg_list(p_init_msg_list);
807: x_return_status := OKC_API.G_RET_STS_SUCCESS;
808: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
809: G_PKG_NAME,
810: p_init_msg_list,
811: l_api_version,
812: p_api_version,
811: l_api_version,
812: p_api_version,
813: '_PUB',
814: x_return_status);
815: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
816: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
817: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
818: RAISE OKC_API.G_EXCEPTION_ERROR;
819: END IF;
812: p_api_version,
813: '_PUB',
814: x_return_status);
815: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
816: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
817: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
818: RAISE OKC_API.G_EXCEPTION_ERROR;
819: END IF;
820:
813: '_PUB',
814: x_return_status);
815: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
816: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
817: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
818: RAISE OKC_API.G_EXCEPTION_ERROR;
819: END IF;
820:
821: OKC_UTIL.call_user_hook
814: x_return_status);
815: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
816: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
817: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
818: RAISE OKC_API.G_EXCEPTION_ERROR;
819: END IF;
820:
821: OKC_UTIL.call_user_hook
822: (
824: p_package_name => g_pkg_name,
825: p_procedure_name => l_api_name,
826: p_before_after => 'B'
827: );
828: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
829: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
830: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
831: raise OKC_API.G_EXCEPTION_ERROR;
832: End If;
825: p_procedure_name => l_api_name,
826: p_before_after => 'B'
827: );
828: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
829: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
830: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
831: raise OKC_API.G_EXCEPTION_ERROR;
832: End If;
833:
826: p_before_after => 'B'
827: );
828: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
829: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
830: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
831: raise OKC_API.G_EXCEPTION_ERROR;
832: End If;
833:
834: OKS_INTERACTION_HIST_PVT.lock_row(
827: );
828: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
829: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
830: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
831: raise OKC_API.G_EXCEPTION_ERROR;
832: End If;
833:
834: OKS_INTERACTION_HIST_PVT.lock_row(
835: p_api_version => l_api_version,
839: x_msg_data => x_msg_data,
840: p_inhv_tbl => p_inhv_tbl,
841: px_error_tbl => px_error_tbl);
842:
843: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
844: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
845: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
846: raise OKC_API.G_EXCEPTION_ERROR;
847: End If;
840: p_inhv_tbl => p_inhv_tbl,
841: px_error_tbl => px_error_tbl);
842:
843: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
844: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
845: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
846: raise OKC_API.G_EXCEPTION_ERROR;
847: End If;
848:
841: px_error_tbl => px_error_tbl);
842:
843: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
844: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
845: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
846: raise OKC_API.G_EXCEPTION_ERROR;
847: End If;
848:
849: OKC_UTIL.call_user_hook
842:
843: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
844: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
845: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
846: raise OKC_API.G_EXCEPTION_ERROR;
847: End If;
848:
849: OKC_UTIL.call_user_hook
850: (
853: p_procedure_name => l_api_name,
854: p_before_after => 'A'
855: );
856:
857: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
858: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
859: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
860: raise OKC_API.G_EXCEPTION_ERROR;
861: End If;
854: p_before_after => 'A'
855: );
856:
857: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
858: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
859: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
860: raise OKC_API.G_EXCEPTION_ERROR;
861: End If;
862:
855: );
856:
857: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
858: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
859: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
860: raise OKC_API.G_EXCEPTION_ERROR;
861: End If;
862:
863: x_return_status := l_return_status;
856:
857: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
858: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
859: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
860: raise OKC_API.G_EXCEPTION_ERROR;
861: End If;
862:
863: x_return_status := l_return_status;
864: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
860: raise OKC_API.G_EXCEPTION_ERROR;
861: End If;
862:
863: x_return_status := l_return_status;
864: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
865: EXCEPTION
866: WHEN OKC_API.G_EXCEPTION_ERROR THEN
867: x_return_status := OKC_API.HANDLE_EXCEPTIONS
868: (
862:
863: x_return_status := l_return_status;
864: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
865: EXCEPTION
866: WHEN OKC_API.G_EXCEPTION_ERROR THEN
867: x_return_status := OKC_API.HANDLE_EXCEPTIONS
868: (
869: l_api_name,
870: G_PKG_NAME,
863: x_return_status := l_return_status;
864: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
865: EXCEPTION
866: WHEN OKC_API.G_EXCEPTION_ERROR THEN
867: x_return_status := OKC_API.HANDLE_EXCEPTIONS
868: (
869: l_api_name,
870: G_PKG_NAME,
871: 'OKC_API.G_RET_STS_ERROR',
867: x_return_status := OKC_API.HANDLE_EXCEPTIONS
868: (
869: l_api_name,
870: G_PKG_NAME,
871: 'OKC_API.G_RET_STS_ERROR',
872: x_msg_count,
873: x_msg_data,
874: '_PUB'
875: );
872: x_msg_count,
873: x_msg_data,
874: '_PUB'
875: );
876: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
877: x_return_status := OKC_API.HANDLE_EXCEPTIONS
878: (
879: l_api_name,
880: G_PKG_NAME,
873: x_msg_data,
874: '_PUB'
875: );
876: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
877: x_return_status := OKC_API.HANDLE_EXCEPTIONS
878: (
879: l_api_name,
880: G_PKG_NAME,
881: 'OKC_API.G_RET_STS_UNEXP_ERROR',
877: x_return_status := OKC_API.HANDLE_EXCEPTIONS
878: (
879: l_api_name,
880: G_PKG_NAME,
881: 'OKC_API.G_RET_STS_UNEXP_ERROR',
882: x_msg_count,
883: x_msg_data,
884: '_PUB'
885: );
883: x_msg_data,
884: '_PUB'
885: );
886: WHEN OTHERS THEN
887: x_return_status := OKC_API.HANDLE_EXCEPTIONS
888: (
889: l_api_name,
890: G_PKG_NAME,
891: 'OTHERS',
898: -- PL/SQL TBL lock_row for:INHV_TBL --
899: --------------------------------------
900: PROCEDURE lock_row(
901: p_api_version IN NUMBER,
902: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
903: x_return_status OUT NOCOPY VARCHAR2,
904: x_msg_count OUT NOCOPY NUMBER,
905: x_msg_data OUT NOCOPY VARCHAR2,
906: p_inhv_tbl IN inhv_tbl_type) IS
906: p_inhv_tbl IN inhv_tbl_type) IS
907:
908: l_api_version CONSTANT NUMBER := 1;
909: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
910: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
911: BEGIN
912: OKC_API.init_msg_list(p_init_msg_list);
913: x_return_status := OKC_API.G_RET_STS_SUCCESS;
914: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
908: l_api_version CONSTANT NUMBER := 1;
909: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
910: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
911: BEGIN
912: OKC_API.init_msg_list(p_init_msg_list);
913: x_return_status := OKC_API.G_RET_STS_SUCCESS;
914: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
915: G_PKG_NAME,
916: p_init_msg_list,
909: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
910: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
911: BEGIN
912: OKC_API.init_msg_list(p_init_msg_list);
913: x_return_status := OKC_API.G_RET_STS_SUCCESS;
914: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
915: G_PKG_NAME,
916: p_init_msg_list,
917: l_api_version,
910: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
911: BEGIN
912: OKC_API.init_msg_list(p_init_msg_list);
913: x_return_status := OKC_API.G_RET_STS_SUCCESS;
914: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
915: G_PKG_NAME,
916: p_init_msg_list,
917: l_api_version,
918: p_api_version,
917: l_api_version,
918: p_api_version,
919: '_PUB',
920: x_return_status);
921: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
922: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
923: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
924: RAISE OKC_API.G_EXCEPTION_ERROR;
925: END IF;
918: p_api_version,
919: '_PUB',
920: x_return_status);
921: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
922: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
923: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
924: RAISE OKC_API.G_EXCEPTION_ERROR;
925: END IF;
926:
919: '_PUB',
920: x_return_status);
921: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
922: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
923: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
924: RAISE OKC_API.G_EXCEPTION_ERROR;
925: END IF;
926:
927: OKC_UTIL.call_user_hook
920: x_return_status);
921: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
922: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
923: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
924: RAISE OKC_API.G_EXCEPTION_ERROR;
925: END IF;
926:
927: OKC_UTIL.call_user_hook
928: (
930: p_package_name => g_pkg_name,
931: p_procedure_name => l_api_name,
932: p_before_after => 'B'
933: );
934: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
935: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
936: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
937: raise OKC_API.G_EXCEPTION_ERROR;
938: End If;
931: p_procedure_name => l_api_name,
932: p_before_after => 'B'
933: );
934: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
935: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
936: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
937: raise OKC_API.G_EXCEPTION_ERROR;
938: End If;
939:
932: p_before_after => 'B'
933: );
934: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
935: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
936: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
937: raise OKC_API.G_EXCEPTION_ERROR;
938: End If;
939:
940: OKS_INTERACTION_HIST_PVT.lock_row(
933: );
934: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
935: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
936: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
937: raise OKC_API.G_EXCEPTION_ERROR;
938: End If;
939:
940: OKS_INTERACTION_HIST_PVT.lock_row(
941: p_api_version => l_api_version,
944: x_msg_count => x_msg_count,
945: x_msg_data => x_msg_data,
946: p_inhv_tbl => p_inhv_tbl);
947:
948: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
949: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
950: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
951: raise OKC_API.G_EXCEPTION_ERROR;
952: End If;
945: x_msg_data => x_msg_data,
946: p_inhv_tbl => p_inhv_tbl);
947:
948: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
949: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
950: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
951: raise OKC_API.G_EXCEPTION_ERROR;
952: End If;
953:
946: p_inhv_tbl => p_inhv_tbl);
947:
948: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
949: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
950: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
951: raise OKC_API.G_EXCEPTION_ERROR;
952: End If;
953:
954: OKC_UTIL.call_user_hook
947:
948: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
949: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
950: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
951: raise OKC_API.G_EXCEPTION_ERROR;
952: End If;
953:
954: OKC_UTIL.call_user_hook
955: (
958: p_procedure_name => l_api_name,
959: p_before_after => 'A'
960: );
961:
962: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
963: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
964: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
965: raise OKC_API.G_EXCEPTION_ERROR;
966: End If;
959: p_before_after => 'A'
960: );
961:
962: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
963: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
964: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
965: raise OKC_API.G_EXCEPTION_ERROR;
966: End If;
967:
960: );
961:
962: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
963: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
964: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
965: raise OKC_API.G_EXCEPTION_ERROR;
966: End If;
967:
968: x_return_status := l_return_status;
961:
962: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
963: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
964: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
965: raise OKC_API.G_EXCEPTION_ERROR;
966: End If;
967:
968: x_return_status := l_return_status;
969: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
965: raise OKC_API.G_EXCEPTION_ERROR;
966: End If;
967:
968: x_return_status := l_return_status;
969: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
970: EXCEPTION
971: WHEN OKC_API.G_EXCEPTION_ERROR THEN
972: x_return_status := OKC_API.HANDLE_EXCEPTIONS
973: (
967:
968: x_return_status := l_return_status;
969: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
970: EXCEPTION
971: WHEN OKC_API.G_EXCEPTION_ERROR THEN
972: x_return_status := OKC_API.HANDLE_EXCEPTIONS
973: (
974: l_api_name,
975: G_PKG_NAME,
968: x_return_status := l_return_status;
969: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
970: EXCEPTION
971: WHEN OKC_API.G_EXCEPTION_ERROR THEN
972: x_return_status := OKC_API.HANDLE_EXCEPTIONS
973: (
974: l_api_name,
975: G_PKG_NAME,
976: 'OKC_API.G_RET_STS_ERROR',
972: x_return_status := OKC_API.HANDLE_EXCEPTIONS
973: (
974: l_api_name,
975: G_PKG_NAME,
976: 'OKC_API.G_RET_STS_ERROR',
977: x_msg_count,
978: x_msg_data,
979: '_PUB'
980: );
977: x_msg_count,
978: x_msg_data,
979: '_PUB'
980: );
981: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
982: x_return_status := OKC_API.HANDLE_EXCEPTIONS
983: (
984: l_api_name,
985: G_PKG_NAME,
978: x_msg_data,
979: '_PUB'
980: );
981: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
982: x_return_status := OKC_API.HANDLE_EXCEPTIONS
983: (
984: l_api_name,
985: G_PKG_NAME,
986: 'OKC_API.G_RET_STS_UNEXP_ERROR',
982: x_return_status := OKC_API.HANDLE_EXCEPTIONS
983: (
984: l_api_name,
985: G_PKG_NAME,
986: 'OKC_API.G_RET_STS_UNEXP_ERROR',
987: x_msg_count,
988: x_msg_data,
989: '_PUB'
990: );
988: x_msg_data,
989: '_PUB'
990: );
991: WHEN OTHERS THEN
992: x_return_status := OKC_API.HANDLE_EXCEPTIONS
993: (
994: l_api_name,
995: G_PKG_NAME,
996: 'OTHERS',
1006: -- update_row for:OKS_INTERACTION_HIST_V --
1007: -------------------------------------------
1008: PROCEDURE update_row(
1009: p_api_version IN NUMBER,
1010: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1011: x_return_status OUT NOCOPY VARCHAR2,
1012: x_msg_count OUT NOCOPY NUMBER,
1013: x_msg_data OUT NOCOPY VARCHAR2,
1014: p_inhv_rec IN inhv_rec_type,
1015: x_inhv_rec OUT NOCOPY inhv_rec_type) IS
1016:
1017: l_api_version CONSTANT NUMBER := 1;
1018: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
1019: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1020: BEGIN
1021: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1022: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1023: G_PKG_NAME,
1017: l_api_version CONSTANT NUMBER := 1;
1018: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
1019: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1020: BEGIN
1021: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1022: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1023: G_PKG_NAME,
1024: p_init_msg_list,
1025: l_api_version,
1018: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
1019: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1020: BEGIN
1021: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1022: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1023: G_PKG_NAME,
1024: p_init_msg_list,
1025: l_api_version,
1026: p_api_version,
1025: l_api_version,
1026: p_api_version,
1027: '_PUB',
1028: x_return_status);
1029: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1030: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1031: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1032: RAISE OKC_API.G_EXCEPTION_ERROR;
1033: END IF;
1026: p_api_version,
1027: '_PUB',
1028: x_return_status);
1029: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1030: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1031: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1032: RAISE OKC_API.G_EXCEPTION_ERROR;
1033: END IF;
1034: OKC_UTIL.call_user_hook
1027: '_PUB',
1028: x_return_status);
1029: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1030: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1031: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1032: RAISE OKC_API.G_EXCEPTION_ERROR;
1033: END IF;
1034: OKC_UTIL.call_user_hook
1035: (
1028: x_return_status);
1029: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1030: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1031: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1032: RAISE OKC_API.G_EXCEPTION_ERROR;
1033: END IF;
1034: OKC_UTIL.call_user_hook
1035: (
1036: x_return_status => x_return_status,
1037: p_package_name => g_pkg_name,
1038: p_procedure_name => l_api_name,
1039: p_before_after => 'B'
1040: );
1041: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
1042: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1043: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
1044: raise OKC_API.G_EXCEPTION_ERROR;
1045: End If;
1038: p_procedure_name => l_api_name,
1039: p_before_after => 'B'
1040: );
1041: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
1042: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1043: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
1044: raise OKC_API.G_EXCEPTION_ERROR;
1045: End If;
1046:
1039: p_before_after => 'B'
1040: );
1041: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
1042: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1043: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
1044: raise OKC_API.G_EXCEPTION_ERROR;
1045: End If;
1046:
1047: OKS_INTERACTION_HIST_PVT.update_row(
1040: );
1041: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
1042: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1043: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
1044: raise OKC_API.G_EXCEPTION_ERROR;
1045: End If;
1046:
1047: OKS_INTERACTION_HIST_PVT.update_row(
1048: p_api_version => l_api_version,
1052: x_msg_data => x_msg_data,
1053: p_inhv_rec => p_inhv_rec,
1054: x_inhv_rec => x_inhv_rec);
1055:
1056: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1057: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1058: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1059: raise OKC_API.G_EXCEPTION_ERROR;
1060: End If;
1053: p_inhv_rec => p_inhv_rec,
1054: x_inhv_rec => x_inhv_rec);
1055:
1056: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1057: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1058: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1059: raise OKC_API.G_EXCEPTION_ERROR;
1060: End If;
1061:
1054: x_inhv_rec => x_inhv_rec);
1055:
1056: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1057: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1058: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1059: raise OKC_API.G_EXCEPTION_ERROR;
1060: End If;
1061:
1062: OKC_UTIL.call_user_hook
1055:
1056: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1057: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1058: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1059: raise OKC_API.G_EXCEPTION_ERROR;
1060: End If;
1061:
1062: OKC_UTIL.call_user_hook
1063: (
1066: p_procedure_name => l_api_name,
1067: p_before_after => 'A'
1068: );
1069:
1070: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1071: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1072: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1073: raise OKC_API.G_EXCEPTION_ERROR;
1074: End If;
1067: p_before_after => 'A'
1068: );
1069:
1070: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1071: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1072: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1073: raise OKC_API.G_EXCEPTION_ERROR;
1074: End If;
1075: x_return_status := l_return_status;
1068: );
1069:
1070: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1071: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1072: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1073: raise OKC_API.G_EXCEPTION_ERROR;
1074: End If;
1075: x_return_status := l_return_status;
1076: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1069:
1070: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1071: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1072: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1073: raise OKC_API.G_EXCEPTION_ERROR;
1074: End If;
1075: x_return_status := l_return_status;
1076: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1077: EXCEPTION
1072: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1073: raise OKC_API.G_EXCEPTION_ERROR;
1074: End If;
1075: x_return_status := l_return_status;
1076: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1077: EXCEPTION
1078: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1079: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1080: (
1074: End If;
1075: x_return_status := l_return_status;
1076: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1077: EXCEPTION
1078: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1079: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1080: (
1081: l_api_name,
1082: G_PKG_NAME,
1075: x_return_status := l_return_status;
1076: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1077: EXCEPTION
1078: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1079: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1080: (
1081: l_api_name,
1082: G_PKG_NAME,
1083: 'OKC_API.G_RET_STS_ERROR',
1079: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1080: (
1081: l_api_name,
1082: G_PKG_NAME,
1083: 'OKC_API.G_RET_STS_ERROR',
1084: x_msg_count,
1085: x_msg_data,
1086: '_PUB'
1087: );
1084: x_msg_count,
1085: x_msg_data,
1086: '_PUB'
1087: );
1088: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1089: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1090: (
1091: l_api_name,
1092: G_PKG_NAME,
1085: x_msg_data,
1086: '_PUB'
1087: );
1088: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1089: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1090: (
1091: l_api_name,
1092: G_PKG_NAME,
1093: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1089: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1090: (
1091: l_api_name,
1092: G_PKG_NAME,
1093: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1094: x_msg_count,
1095: x_msg_data,
1096: '_PUB'
1097: );
1095: x_msg_data,
1096: '_PUB'
1097: );
1098: WHEN OTHERS THEN
1099: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1100: (
1101: l_api_name,
1102: G_PKG_NAME,
1103: 'OTHERS',
1110: -- PL/SQL TBL update_row for:inhv_tbl --
1111: ----------------------------------------
1112: PROCEDURE update_row(
1113: p_api_version IN NUMBER,
1114: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1115: x_return_status OUT NOCOPY VARCHAR2,
1116: x_msg_count OUT NOCOPY NUMBER,
1117: x_msg_data OUT NOCOPY VARCHAR2,
1118: p_inhv_tbl IN inhv_tbl_type,
1116: x_msg_count OUT NOCOPY NUMBER,
1117: x_msg_data OUT NOCOPY VARCHAR2,
1118: p_inhv_tbl IN inhv_tbl_type,
1119: x_inhv_tbl OUT NOCOPY inhv_tbl_type,
1120: px_error_tbl IN OUT NOCOPY OKC_API.ERROR_TBL_TYPE) IS
1121:
1122: l_api_version CONSTANT NUMBER := 1;
1123: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_update_row';
1124: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1120: px_error_tbl IN OUT NOCOPY OKC_API.ERROR_TBL_TYPE) IS
1121:
1122: l_api_version CONSTANT NUMBER := 1;
1123: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_update_row';
1124: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1125: BEGIN
1126: OKC_API.init_msg_list(p_init_msg_list);
1127: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1128: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1122: l_api_version CONSTANT NUMBER := 1;
1123: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_update_row';
1124: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1125: BEGIN
1126: OKC_API.init_msg_list(p_init_msg_list);
1127: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1128: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1129: G_PKG_NAME,
1130: p_init_msg_list,
1123: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_update_row';
1124: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1125: BEGIN
1126: OKC_API.init_msg_list(p_init_msg_list);
1127: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1128: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1129: G_PKG_NAME,
1130: p_init_msg_list,
1131: l_api_version,
1124: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1125: BEGIN
1126: OKC_API.init_msg_list(p_init_msg_list);
1127: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1128: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1129: G_PKG_NAME,
1130: p_init_msg_list,
1131: l_api_version,
1132: p_api_version,
1131: l_api_version,
1132: p_api_version,
1133: '_PUB',
1134: x_return_status);
1135: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1136: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1137: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1138: RAISE OKC_API.G_EXCEPTION_ERROR;
1139: END IF;
1132: p_api_version,
1133: '_PUB',
1134: x_return_status);
1135: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1136: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1137: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1138: RAISE OKC_API.G_EXCEPTION_ERROR;
1139: END IF;
1140: OKC_UTIL.call_user_hook
1133: '_PUB',
1134: x_return_status);
1135: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1136: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1137: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1138: RAISE OKC_API.G_EXCEPTION_ERROR;
1139: END IF;
1140: OKC_UTIL.call_user_hook
1141: (
1134: x_return_status);
1135: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1136: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1137: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1138: RAISE OKC_API.G_EXCEPTION_ERROR;
1139: END IF;
1140: OKC_UTIL.call_user_hook
1141: (
1142: x_return_status => x_return_status,
1143: p_package_name => g_pkg_name,
1144: p_procedure_name => l_api_name,
1145: p_before_after => 'B'
1146: );
1147: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
1148: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1149: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
1150: raise OKC_API.G_EXCEPTION_ERROR;
1151: End If;
1144: p_procedure_name => l_api_name,
1145: p_before_after => 'B'
1146: );
1147: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
1148: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1149: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
1150: raise OKC_API.G_EXCEPTION_ERROR;
1151: End If;
1152:
1145: p_before_after => 'B'
1146: );
1147: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
1148: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1149: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
1150: raise OKC_API.G_EXCEPTION_ERROR;
1151: End If;
1152:
1153: OKS_INTERACTION_HIST_PVT.update_row(
1146: );
1147: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
1148: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1149: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
1150: raise OKC_API.G_EXCEPTION_ERROR;
1151: End If;
1152:
1153: OKS_INTERACTION_HIST_PVT.update_row(
1154: p_api_version => l_api_version,
1159: p_inhv_tbl => p_inhv_tbl,
1160: x_inhv_tbl => x_inhv_tbl,
1161: px_error_tbl => px_error_tbl);
1162:
1163: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1164: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1165: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1166: raise OKC_API.G_EXCEPTION_ERROR;
1167: End If;
1160: x_inhv_tbl => x_inhv_tbl,
1161: px_error_tbl => px_error_tbl);
1162:
1163: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1164: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1165: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1166: raise OKC_API.G_EXCEPTION_ERROR;
1167: End If;
1168:
1161: px_error_tbl => px_error_tbl);
1162:
1163: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1164: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1165: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1166: raise OKC_API.G_EXCEPTION_ERROR;
1167: End If;
1168:
1169: OKC_UTIL.call_user_hook
1162:
1163: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1164: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1165: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1166: raise OKC_API.G_EXCEPTION_ERROR;
1167: End If;
1168:
1169: OKC_UTIL.call_user_hook
1170: (
1173: p_procedure_name => l_api_name,
1174: p_before_after => 'A'
1175: );
1176:
1177: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1178: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1179: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1180: raise OKC_API.G_EXCEPTION_ERROR;
1181: End If;
1174: p_before_after => 'A'
1175: );
1176:
1177: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1178: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1179: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1180: raise OKC_API.G_EXCEPTION_ERROR;
1181: End If;
1182:
1175: );
1176:
1177: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1178: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1179: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1180: raise OKC_API.G_EXCEPTION_ERROR;
1181: End If;
1182:
1183: x_return_status := l_return_status;
1176:
1177: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1178: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1179: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1180: raise OKC_API.G_EXCEPTION_ERROR;
1181: End If;
1182:
1183: x_return_status := l_return_status;
1184: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1180: raise OKC_API.G_EXCEPTION_ERROR;
1181: End If;
1182:
1183: x_return_status := l_return_status;
1184: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1185: EXCEPTION
1186: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1187: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1188: (
1182:
1183: x_return_status := l_return_status;
1184: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1185: EXCEPTION
1186: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1187: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1188: (
1189: l_api_name,
1190: G_PKG_NAME,
1183: x_return_status := l_return_status;
1184: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1185: EXCEPTION
1186: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1187: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1188: (
1189: l_api_name,
1190: G_PKG_NAME,
1191: 'OKC_API.G_RET_STS_ERROR',
1187: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1188: (
1189: l_api_name,
1190: G_PKG_NAME,
1191: 'OKC_API.G_RET_STS_ERROR',
1192: x_msg_count,
1193: x_msg_data,
1194: '_PUB'
1195: );
1192: x_msg_count,
1193: x_msg_data,
1194: '_PUB'
1195: );
1196: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1197: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1198: (
1199: l_api_name,
1200: G_PKG_NAME,
1193: x_msg_data,
1194: '_PUB'
1195: );
1196: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1197: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1198: (
1199: l_api_name,
1200: G_PKG_NAME,
1201: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1197: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1198: (
1199: l_api_name,
1200: G_PKG_NAME,
1201: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1202: x_msg_count,
1203: x_msg_data,
1204: '_PUB'
1205: );
1203: x_msg_data,
1204: '_PUB'
1205: );
1206: WHEN OTHERS THEN
1207: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1208: (
1209: l_api_name,
1210: G_PKG_NAME,
1211: 'OTHERS',
1219: -- PL/SQL TBL update_row for:INHV_TBL --
1220: ----------------------------------------
1221: PROCEDURE update_row(
1222: p_api_version IN NUMBER,
1223: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1224: x_return_status OUT NOCOPY VARCHAR2,
1225: x_msg_count OUT NOCOPY NUMBER,
1226: x_msg_data OUT NOCOPY VARCHAR2,
1227: p_inhv_tbl IN inhv_tbl_type,
1228: x_inhv_tbl OUT NOCOPY inhv_tbl_type) IS
1229:
1230: l_api_version CONSTANT NUMBER := 1;
1231: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
1232: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1233: BEGIN
1234: OKC_API.init_msg_list(p_init_msg_list);
1235: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1236: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1230: l_api_version CONSTANT NUMBER := 1;
1231: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
1232: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1233: BEGIN
1234: OKC_API.init_msg_list(p_init_msg_list);
1235: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1236: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1237: G_PKG_NAME,
1238: p_init_msg_list,
1231: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
1232: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1233: BEGIN
1234: OKC_API.init_msg_list(p_init_msg_list);
1235: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1236: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1237: G_PKG_NAME,
1238: p_init_msg_list,
1239: l_api_version,
1232: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1233: BEGIN
1234: OKC_API.init_msg_list(p_init_msg_list);
1235: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1236: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1237: G_PKG_NAME,
1238: p_init_msg_list,
1239: l_api_version,
1240: p_api_version,
1239: l_api_version,
1240: p_api_version,
1241: '_PUB',
1242: x_return_status);
1243: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1244: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1245: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1246: RAISE OKC_API.G_EXCEPTION_ERROR;
1247: END IF;
1240: p_api_version,
1241: '_PUB',
1242: x_return_status);
1243: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1244: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1245: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1246: RAISE OKC_API.G_EXCEPTION_ERROR;
1247: END IF;
1248: OKC_UTIL.call_user_hook
1241: '_PUB',
1242: x_return_status);
1243: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1244: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1245: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1246: RAISE OKC_API.G_EXCEPTION_ERROR;
1247: END IF;
1248: OKC_UTIL.call_user_hook
1249: (
1242: x_return_status);
1243: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1244: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1245: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1246: RAISE OKC_API.G_EXCEPTION_ERROR;
1247: END IF;
1248: OKC_UTIL.call_user_hook
1249: (
1250: x_return_status => x_return_status,
1251: p_package_name => g_pkg_name,
1252: p_procedure_name => l_api_name,
1253: p_before_after => 'B'
1254: );
1255: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
1256: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1257: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
1258: raise OKC_API.G_EXCEPTION_ERROR;
1259: End If;
1252: p_procedure_name => l_api_name,
1253: p_before_after => 'B'
1254: );
1255: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
1256: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1257: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
1258: raise OKC_API.G_EXCEPTION_ERROR;
1259: End If;
1260:
1253: p_before_after => 'B'
1254: );
1255: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
1256: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1257: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
1258: raise OKC_API.G_EXCEPTION_ERROR;
1259: End If;
1260:
1261: OKS_INTERACTION_HIST_PVT.update_row(
1254: );
1255: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
1256: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1257: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
1258: raise OKC_API.G_EXCEPTION_ERROR;
1259: End If;
1260:
1261: OKS_INTERACTION_HIST_PVT.update_row(
1262: p_api_version => l_api_version,
1266: x_msg_data => x_msg_data,
1267: p_inhv_tbl => p_inhv_tbl,
1268: x_inhv_tbl => x_inhv_tbl);
1269:
1270: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1271: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1272: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1273: raise OKC_API.G_EXCEPTION_ERROR;
1274: End If;
1267: p_inhv_tbl => p_inhv_tbl,
1268: x_inhv_tbl => x_inhv_tbl);
1269:
1270: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1271: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1272: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1273: raise OKC_API.G_EXCEPTION_ERROR;
1274: End If;
1275:
1268: x_inhv_tbl => x_inhv_tbl);
1269:
1270: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1271: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1272: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1273: raise OKC_API.G_EXCEPTION_ERROR;
1274: End If;
1275:
1276: OKC_UTIL.call_user_hook
1269:
1270: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1271: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1272: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1273: raise OKC_API.G_EXCEPTION_ERROR;
1274: End If;
1275:
1276: OKC_UTIL.call_user_hook
1277: (
1280: p_procedure_name => l_api_name,
1281: p_before_after => 'A'
1282: );
1283:
1284: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1285: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1286: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1287: raise OKC_API.G_EXCEPTION_ERROR;
1288: End If;
1281: p_before_after => 'A'
1282: );
1283:
1284: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1285: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1286: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1287: raise OKC_API.G_EXCEPTION_ERROR;
1288: End If;
1289:
1282: );
1283:
1284: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1285: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1286: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1287: raise OKC_API.G_EXCEPTION_ERROR;
1288: End If;
1289:
1290: x_return_status := l_return_status;
1283:
1284: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1285: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1286: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1287: raise OKC_API.G_EXCEPTION_ERROR;
1288: End If;
1289:
1290: x_return_status := l_return_status;
1291: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1287: raise OKC_API.G_EXCEPTION_ERROR;
1288: End If;
1289:
1290: x_return_status := l_return_status;
1291: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1292: EXCEPTION
1293: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1294: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1295: (
1289:
1290: x_return_status := l_return_status;
1291: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1292: EXCEPTION
1293: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1294: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1295: (
1296: l_api_name,
1297: G_PKG_NAME,
1290: x_return_status := l_return_status;
1291: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1292: EXCEPTION
1293: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1294: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1295: (
1296: l_api_name,
1297: G_PKG_NAME,
1298: 'OKC_API.G_RET_STS_ERROR',
1294: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1295: (
1296: l_api_name,
1297: G_PKG_NAME,
1298: 'OKC_API.G_RET_STS_ERROR',
1299: x_msg_count,
1300: x_msg_data,
1301: '_PUB'
1302: );
1299: x_msg_count,
1300: x_msg_data,
1301: '_PUB'
1302: );
1303: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1304: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1305: (
1306: l_api_name,
1307: G_PKG_NAME,
1300: x_msg_data,
1301: '_PUB'
1302: );
1303: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1304: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1305: (
1306: l_api_name,
1307: G_PKG_NAME,
1308: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1304: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1305: (
1306: l_api_name,
1307: G_PKG_NAME,
1308: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1309: x_msg_count,
1310: x_msg_data,
1311: '_PUB'
1312: );
1310: x_msg_data,
1311: '_PUB'
1312: );
1313: WHEN OTHERS THEN
1314: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1315: (
1316: l_api_name,
1317: G_PKG_NAME,
1318: 'OTHERS',
1329: -- delete_row for:OKS_INTERACTION_HIST_V --
1330: -------------------------------------------
1331: PROCEDURE delete_row(
1332: p_api_version IN NUMBER,
1333: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1334: x_return_status OUT NOCOPY VARCHAR2,
1335: x_msg_count OUT NOCOPY NUMBER,
1336: x_msg_data OUT NOCOPY VARCHAR2,
1337: p_inhv_rec IN inhv_rec_type) IS
1337: p_inhv_rec IN inhv_rec_type) IS
1338:
1339: l_api_version CONSTANT NUMBER := 1;
1340: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
1341: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1342: BEGIN
1343: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1344: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1345: G_PKG_NAME,
1339: l_api_version CONSTANT NUMBER := 1;
1340: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
1341: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1342: BEGIN
1343: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1344: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1345: G_PKG_NAME,
1346: p_init_msg_list,
1347: l_api_version,
1340: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
1341: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1342: BEGIN
1343: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1344: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1345: G_PKG_NAME,
1346: p_init_msg_list,
1347: l_api_version,
1348: p_api_version,
1347: l_api_version,
1348: p_api_version,
1349: '_PUB',
1350: x_return_status);
1351: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1352: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1353: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1354: RAISE OKC_API.G_EXCEPTION_ERROR;
1355: END IF;
1348: p_api_version,
1349: '_PUB',
1350: x_return_status);
1351: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1352: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1353: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1354: RAISE OKC_API.G_EXCEPTION_ERROR;
1355: END IF;
1356:
1349: '_PUB',
1350: x_return_status);
1351: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1352: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1353: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1354: RAISE OKC_API.G_EXCEPTION_ERROR;
1355: END IF;
1356:
1357: OKC_UTIL.call_user_hook
1350: x_return_status);
1351: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1352: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1353: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1354: RAISE OKC_API.G_EXCEPTION_ERROR;
1355: END IF;
1356:
1357: OKC_UTIL.call_user_hook
1358: (
1360: p_package_name => g_pkg_name,
1361: p_procedure_name => l_api_name,
1362: p_before_after => 'B'
1363: );
1364: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
1365: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1366: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
1367: raise OKC_API.G_EXCEPTION_ERROR;
1368: End If;
1361: p_procedure_name => l_api_name,
1362: p_before_after => 'B'
1363: );
1364: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
1365: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1366: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
1367: raise OKC_API.G_EXCEPTION_ERROR;
1368: End If;
1369:
1362: p_before_after => 'B'
1363: );
1364: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
1365: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1366: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
1367: raise OKC_API.G_EXCEPTION_ERROR;
1368: End If;
1369:
1370: OKS_INTERACTION_HIST_PVT.delete_row(
1363: );
1364: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
1365: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1366: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
1367: raise OKC_API.G_EXCEPTION_ERROR;
1368: End If;
1369:
1370: OKS_INTERACTION_HIST_PVT.delete_row(
1371: p_api_version => l_api_version,
1374: x_msg_count => x_msg_count,
1375: x_msg_data => x_msg_data,
1376: p_inhv_rec => p_inhv_rec);
1377:
1378: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1379: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1380: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1381: raise OKC_API.G_EXCEPTION_ERROR;
1382: End If;
1375: x_msg_data => x_msg_data,
1376: p_inhv_rec => p_inhv_rec);
1377:
1378: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1379: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1380: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1381: raise OKC_API.G_EXCEPTION_ERROR;
1382: End If;
1383:
1376: p_inhv_rec => p_inhv_rec);
1377:
1378: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1379: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1380: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1381: raise OKC_API.G_EXCEPTION_ERROR;
1382: End If;
1383:
1384: OKC_UTIL.call_user_hook
1377:
1378: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1379: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1380: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1381: raise OKC_API.G_EXCEPTION_ERROR;
1382: End If;
1383:
1384: OKC_UTIL.call_user_hook
1385: (
1388: p_procedure_name => l_api_name,
1389: p_before_after => 'A'
1390: );
1391:
1392: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1393: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1394: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1395: raise OKC_API.G_EXCEPTION_ERROR;
1396: End If;
1389: p_before_after => 'A'
1390: );
1391:
1392: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1393: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1394: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1395: raise OKC_API.G_EXCEPTION_ERROR;
1396: End If;
1397:
1390: );
1391:
1392: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1393: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1394: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1395: raise OKC_API.G_EXCEPTION_ERROR;
1396: End If;
1397:
1398: x_return_status := l_return_status;
1391:
1392: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1393: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1394: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1395: raise OKC_API.G_EXCEPTION_ERROR;
1396: End If;
1397:
1398: x_return_status := l_return_status;
1399: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1395: raise OKC_API.G_EXCEPTION_ERROR;
1396: End If;
1397:
1398: x_return_status := l_return_status;
1399: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1400: EXCEPTION
1401: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1402: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1403: (
1397:
1398: x_return_status := l_return_status;
1399: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1400: EXCEPTION
1401: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1402: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1403: (
1404: l_api_name,
1405: G_PKG_NAME,
1398: x_return_status := l_return_status;
1399: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1400: EXCEPTION
1401: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1402: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1403: (
1404: l_api_name,
1405: G_PKG_NAME,
1406: 'OKC_API.G_RET_STS_ERROR',
1402: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1403: (
1404: l_api_name,
1405: G_PKG_NAME,
1406: 'OKC_API.G_RET_STS_ERROR',
1407: x_msg_count,
1408: x_msg_data,
1409: '_PUB'
1410: );
1407: x_msg_count,
1408: x_msg_data,
1409: '_PUB'
1410: );
1411: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1412: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1413: (
1414: l_api_name,
1415: G_PKG_NAME,
1408: x_msg_data,
1409: '_PUB'
1410: );
1411: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1412: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1413: (
1414: l_api_name,
1415: G_PKG_NAME,
1416: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1412: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1413: (
1414: l_api_name,
1415: G_PKG_NAME,
1416: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1417: x_msg_count,
1418: x_msg_data,
1419: '_PUB'
1420: );
1418: x_msg_data,
1419: '_PUB'
1420: );
1421: WHEN OTHERS THEN
1422: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1423: (
1424: l_api_name,
1425: G_PKG_NAME,
1426: 'OTHERS',
1433: -- PL/SQL TBL delete_row for:OKS_INTERACTION_HIST_V --
1434: ------------------------------------------------------
1435: PROCEDURE delete_row(
1436: p_api_version IN NUMBER,
1437: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1438: x_return_status OUT NOCOPY VARCHAR2,
1439: x_msg_count OUT NOCOPY NUMBER,
1440: x_msg_data OUT NOCOPY VARCHAR2,
1441: p_inhv_tbl IN inhv_tbl_type,
1438: x_return_status OUT NOCOPY VARCHAR2,
1439: x_msg_count OUT NOCOPY NUMBER,
1440: x_msg_data OUT NOCOPY VARCHAR2,
1441: p_inhv_tbl IN inhv_tbl_type,
1442: px_error_tbl IN OUT NOCOPY OKC_API.ERROR_TBL_TYPE) IS
1443:
1444: l_api_version CONSTANT NUMBER := 1;
1445: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_delete_row';
1446: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1442: px_error_tbl IN OUT NOCOPY OKC_API.ERROR_TBL_TYPE) IS
1443:
1444: l_api_version CONSTANT NUMBER := 1;
1445: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_delete_row';
1446: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1447: BEGIN
1448: OKC_API.init_msg_list(p_init_msg_list);
1449: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1450: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1444: l_api_version CONSTANT NUMBER := 1;
1445: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_delete_row';
1446: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1447: BEGIN
1448: OKC_API.init_msg_list(p_init_msg_list);
1449: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1450: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1451: G_PKG_NAME,
1452: p_init_msg_list,
1445: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_delete_row';
1446: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1447: BEGIN
1448: OKC_API.init_msg_list(p_init_msg_list);
1449: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1450: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1451: G_PKG_NAME,
1452: p_init_msg_list,
1453: l_api_version,
1446: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1447: BEGIN
1448: OKC_API.init_msg_list(p_init_msg_list);
1449: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1450: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1451: G_PKG_NAME,
1452: p_init_msg_list,
1453: l_api_version,
1454: p_api_version,
1453: l_api_version,
1454: p_api_version,
1455: '_PUB',
1456: x_return_status);
1457: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1458: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1459: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1460: RAISE OKC_API.G_EXCEPTION_ERROR;
1461: END IF;
1454: p_api_version,
1455: '_PUB',
1456: x_return_status);
1457: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1458: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1459: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1460: RAISE OKC_API.G_EXCEPTION_ERROR;
1461: END IF;
1462:
1455: '_PUB',
1456: x_return_status);
1457: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1458: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1459: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1460: RAISE OKC_API.G_EXCEPTION_ERROR;
1461: END IF;
1462:
1463: OKC_UTIL.call_user_hook
1456: x_return_status);
1457: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1458: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1459: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1460: RAISE OKC_API.G_EXCEPTION_ERROR;
1461: END IF;
1462:
1463: OKC_UTIL.call_user_hook
1464: (
1466: p_package_name => g_pkg_name,
1467: p_procedure_name => l_api_name,
1468: p_before_after => 'B'
1469: );
1470: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
1471: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1472: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
1473: raise OKC_API.G_EXCEPTION_ERROR;
1474: End If;
1467: p_procedure_name => l_api_name,
1468: p_before_after => 'B'
1469: );
1470: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
1471: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1472: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
1473: raise OKC_API.G_EXCEPTION_ERROR;
1474: End If;
1475:
1468: p_before_after => 'B'
1469: );
1470: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
1471: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1472: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
1473: raise OKC_API.G_EXCEPTION_ERROR;
1474: End If;
1475:
1476: OKS_INTERACTION_HIST_PVT.delete_row(
1469: );
1470: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
1471: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1472: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
1473: raise OKC_API.G_EXCEPTION_ERROR;
1474: End If;
1475:
1476: OKS_INTERACTION_HIST_PVT.delete_row(
1477: p_api_version => l_api_version,
1481: x_msg_data => x_msg_data,
1482: p_inhv_tbl => p_inhv_tbl,
1483: px_error_tbl => px_error_tbl);
1484:
1485: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1486: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1487: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1488: raise OKC_API.G_EXCEPTION_ERROR;
1489: End If;
1482: p_inhv_tbl => p_inhv_tbl,
1483: px_error_tbl => px_error_tbl);
1484:
1485: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1486: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1487: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1488: raise OKC_API.G_EXCEPTION_ERROR;
1489: End If;
1490:
1483: px_error_tbl => px_error_tbl);
1484:
1485: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1486: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1487: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1488: raise OKC_API.G_EXCEPTION_ERROR;
1489: End If;
1490:
1491: OKC_UTIL.call_user_hook
1484:
1485: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1486: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1487: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1488: raise OKC_API.G_EXCEPTION_ERROR;
1489: End If;
1490:
1491: OKC_UTIL.call_user_hook
1492: (
1495: p_procedure_name => l_api_name,
1496: p_before_after => 'A'
1497: );
1498:
1499: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1500: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1501: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1502: raise OKC_API.G_EXCEPTION_ERROR;
1503: End If;
1496: p_before_after => 'A'
1497: );
1498:
1499: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1500: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1501: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1502: raise OKC_API.G_EXCEPTION_ERROR;
1503: End If;
1504:
1497: );
1498:
1499: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1500: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1501: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1502: raise OKC_API.G_EXCEPTION_ERROR;
1503: End If;
1504:
1505: x_return_status := l_return_status;
1498:
1499: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1500: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1501: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1502: raise OKC_API.G_EXCEPTION_ERROR;
1503: End If;
1504:
1505: x_return_status := l_return_status;
1506: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1502: raise OKC_API.G_EXCEPTION_ERROR;
1503: End If;
1504:
1505: x_return_status := l_return_status;
1506: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1507: EXCEPTION
1508: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1509: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1510: (
1504:
1505: x_return_status := l_return_status;
1506: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1507: EXCEPTION
1508: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1509: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1510: (
1511: l_api_name,
1512: G_PKG_NAME,
1505: x_return_status := l_return_status;
1506: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1507: EXCEPTION
1508: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1509: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1510: (
1511: l_api_name,
1512: G_PKG_NAME,
1513: 'OKC_API.G_RET_STS_ERROR',
1509: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1510: (
1511: l_api_name,
1512: G_PKG_NAME,
1513: 'OKC_API.G_RET_STS_ERROR',
1514: x_msg_count,
1515: x_msg_data,
1516: '_PUB'
1517: );
1514: x_msg_count,
1515: x_msg_data,
1516: '_PUB'
1517: );
1518: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1519: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1520: (
1521: l_api_name,
1522: G_PKG_NAME,
1515: x_msg_data,
1516: '_PUB'
1517: );
1518: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1519: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1520: (
1521: l_api_name,
1522: G_PKG_NAME,
1523: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1519: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1520: (
1521: l_api_name,
1522: G_PKG_NAME,
1523: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1524: x_msg_count,
1525: x_msg_data,
1526: '_PUB'
1527: );
1525: x_msg_data,
1526: '_PUB'
1527: );
1528: WHEN OTHERS THEN
1529: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1530: (
1531: l_api_name,
1532: G_PKG_NAME,
1533: 'OTHERS',
1541: -- PL/SQL TBL delete_row for:OKS_INTERACTION_HIST_V --
1542: ------------------------------------------------------
1543: PROCEDURE delete_row(
1544: p_api_version IN NUMBER,
1545: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1546: x_return_status OUT NOCOPY VARCHAR2,
1547: x_msg_count OUT NOCOPY NUMBER,
1548: x_msg_data OUT NOCOPY VARCHAR2,
1549: p_inhv_tbl IN inhv_tbl_type) IS
1549: p_inhv_tbl IN inhv_tbl_type) IS
1550:
1551: l_api_version CONSTANT NUMBER := 1;
1552: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
1553: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1554: BEGIN
1555: OKC_API.init_msg_list(p_init_msg_list);
1556: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1557: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1551: l_api_version CONSTANT NUMBER := 1;
1552: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
1553: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1554: BEGIN
1555: OKC_API.init_msg_list(p_init_msg_list);
1556: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1557: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1558: G_PKG_NAME,
1559: p_init_msg_list,
1552: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
1553: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1554: BEGIN
1555: OKC_API.init_msg_list(p_init_msg_list);
1556: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1557: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1558: G_PKG_NAME,
1559: p_init_msg_list,
1560: l_api_version,
1553: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1554: BEGIN
1555: OKC_API.init_msg_list(p_init_msg_list);
1556: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1557: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1558: G_PKG_NAME,
1559: p_init_msg_list,
1560: l_api_version,
1561: p_api_version,
1560: l_api_version,
1561: p_api_version,
1562: '_PUB',
1563: x_return_status);
1564: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1565: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1566: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1567: RAISE OKC_API.G_EXCEPTION_ERROR;
1568: END IF;
1561: p_api_version,
1562: '_PUB',
1563: x_return_status);
1564: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1565: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1566: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1567: RAISE OKC_API.G_EXCEPTION_ERROR;
1568: END IF;
1569:
1562: '_PUB',
1563: x_return_status);
1564: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1565: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1566: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1567: RAISE OKC_API.G_EXCEPTION_ERROR;
1568: END IF;
1569:
1570: OKC_UTIL.call_user_hook
1563: x_return_status);
1564: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1565: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1566: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1567: RAISE OKC_API.G_EXCEPTION_ERROR;
1568: END IF;
1569:
1570: OKC_UTIL.call_user_hook
1571: (
1573: p_package_name => g_pkg_name,
1574: p_procedure_name => l_api_name,
1575: p_before_after => 'B'
1576: );
1577: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
1578: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1579: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
1580: raise OKC_API.G_EXCEPTION_ERROR;
1581: End If;
1574: p_procedure_name => l_api_name,
1575: p_before_after => 'B'
1576: );
1577: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
1578: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1579: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
1580: raise OKC_API.G_EXCEPTION_ERROR;
1581: End If;
1582:
1575: p_before_after => 'B'
1576: );
1577: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
1578: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1579: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
1580: raise OKC_API.G_EXCEPTION_ERROR;
1581: End If;
1582:
1583: OKS_INTERACTION_HIST_PVT.delete_row(
1576: );
1577: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) Then
1578: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1579: ElsIf (x_return_status = OKC_API.G_RET_STS_ERROR) Then
1580: raise OKC_API.G_EXCEPTION_ERROR;
1581: End If;
1582:
1583: OKS_INTERACTION_HIST_PVT.delete_row(
1584: p_api_version => l_api_version,
1587: x_msg_count => x_msg_count,
1588: x_msg_data => x_msg_data,
1589: p_inhv_tbl => p_inhv_tbl);
1590:
1591: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1592: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1593: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1594: raise OKC_API.G_EXCEPTION_ERROR;
1595: End If;
1588: x_msg_data => x_msg_data,
1589: p_inhv_tbl => p_inhv_tbl);
1590:
1591: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1592: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1593: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1594: raise OKC_API.G_EXCEPTION_ERROR;
1595: End If;
1596:
1589: p_inhv_tbl => p_inhv_tbl);
1590:
1591: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1592: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1593: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1594: raise OKC_API.G_EXCEPTION_ERROR;
1595: End If;
1596:
1597: OKC_UTIL.call_user_hook
1590:
1591: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1592: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1593: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1594: raise OKC_API.G_EXCEPTION_ERROR;
1595: End If;
1596:
1597: OKC_UTIL.call_user_hook
1598: (
1601: p_procedure_name => l_api_name,
1602: p_before_after => 'A'
1603: );
1604:
1605: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1606: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1607: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1608: raise OKC_API.G_EXCEPTION_ERROR;
1609: End If;
1602: p_before_after => 'A'
1603: );
1604:
1605: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1606: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1607: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1608: raise OKC_API.G_EXCEPTION_ERROR;
1609: End If;
1610:
1603: );
1604:
1605: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1606: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1607: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1608: raise OKC_API.G_EXCEPTION_ERROR;
1609: End If;
1610:
1611: x_return_status := l_return_status;
1604:
1605: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1606: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1607: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1608: raise OKC_API.G_EXCEPTION_ERROR;
1609: End If;
1610:
1611: x_return_status := l_return_status;
1612: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1608: raise OKC_API.G_EXCEPTION_ERROR;
1609: End If;
1610:
1611: x_return_status := l_return_status;
1612: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1613: EXCEPTION
1614: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1615: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1616: (
1610:
1611: x_return_status := l_return_status;
1612: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1613: EXCEPTION
1614: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1615: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1616: (
1617: l_api_name,
1618: G_PKG_NAME,
1611: x_return_status := l_return_status;
1612: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1613: EXCEPTION
1614: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1615: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1616: (
1617: l_api_name,
1618: G_PKG_NAME,
1619: 'OKC_API.G_RET_STS_ERROR',
1615: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1616: (
1617: l_api_name,
1618: G_PKG_NAME,
1619: 'OKC_API.G_RET_STS_ERROR',
1620: x_msg_count,
1621: x_msg_data,
1622: '_PUB'
1623: );
1620: x_msg_count,
1621: x_msg_data,
1622: '_PUB'
1623: );
1624: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1625: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1626: (
1627: l_api_name,
1628: G_PKG_NAME,
1621: x_msg_data,
1622: '_PUB'
1623: );
1624: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1625: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1626: (
1627: l_api_name,
1628: G_PKG_NAME,
1629: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1625: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1626: (
1627: l_api_name,
1628: G_PKG_NAME,
1629: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1630: x_msg_count,
1631: x_msg_data,
1632: '_PUB'
1633: );
1631: x_msg_data,
1632: '_PUB'
1633: );
1634: WHEN OTHERS THEN
1635: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1636: (
1637: l_api_name,
1638: G_PKG_NAME,
1639: 'OTHERS',