[Home] [Help]
19: BEGIN
20:
21: IF (p_start_date IS NULL) THEN
22:
23: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
24: p_msg_name => 'OKL_START_DATE_NULL');
25: RAISE OKL_API.G_EXCEPTION_ERROR;
26:
27: END IF;
21: IF (p_start_date IS NULL) THEN
22:
23: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
24: p_msg_name => 'OKL_START_DATE_NULL');
25: RAISE OKL_API.G_EXCEPTION_ERROR;
26:
27: END IF;
28:
29: IF (p_end_date IS NOT NULL) THEN
29: IF (p_end_date IS NOT NULL) THEN
30:
31: IF (p_end_date < p_start_date) THEN
32:
33: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
34: p_msg_name => 'OKL_START_DT_LESS_END_DT');
35: RAISE OKL_API.G_EXCEPTION_ERROR;
36:
37: END IF;
31: IF (p_end_date < p_start_date) THEN
32:
33: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
34: p_msg_name => 'OKL_START_DT_LESS_END_DT');
35: RAISE OKL_API.G_EXCEPTION_ERROR;
36:
37: END IF;
38:
39: END IF;
39: END IF;
40:
41: EXCEPTION
42:
43: WHEN OKL_API.G_EXCEPTION_ERROR THEN
44: x_valid_flag := 'E';
45:
46: END validate_dates;
47:
71: CLOSE aes_csr;
72:
73: IF (p_avlv_rec.start_date < l_aes_start_date) THEN
74:
75: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
76: p_msg_name => 'OKL_TMPLDT_MISMATCH_TMPTSET');
77: RAISE OKL_API.G_EXCEPTION_ERROR;
78:
79: END IF;
73: IF (p_avlv_rec.start_date < l_aes_start_date) THEN
74:
75: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
76: p_msg_name => 'OKL_TMPLDT_MISMATCH_TMPTSET');
77: RAISE OKL_API.G_EXCEPTION_ERROR;
78:
79: END IF;
80:
81:
82: IF (p_avlv_rec.end_date IS NULL) THEN
83:
84: IF (l_aes_end_date IS NOT NULL) THEN
85:
86: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
87: p_msg_name => 'OKL_TMPLDT_MISMATCH_TMPTSET');
88: RAISE OKL_API.G_EXCEPTION_ERROR;
89:
90: END IF;
84: IF (l_aes_end_date IS NOT NULL) THEN
85:
86: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
87: p_msg_name => 'OKL_TMPLDT_MISMATCH_TMPTSET');
88: RAISE OKL_API.G_EXCEPTION_ERROR;
89:
90: END IF;
91:
92: END IF;
94: IF (p_avlv_rec.end_date IS NOT NULL) THEN
95:
96: IF (l_aes_end_date IS NOT NULL) AND (l_aes_end_date < p_avlv_rec.end_date) THEN
97:
98: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
99: p_msg_name => 'OKL_TMPLDT_MISMATCH_TMPTSET');
100: RAISE OKL_API.G_EXCEPTION_ERROR;
101:
102: END IF;
96: IF (l_aes_end_date IS NOT NULL) AND (l_aes_end_date < p_avlv_rec.end_date) THEN
97:
98: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
99: p_msg_name => 'OKL_TMPLDT_MISMATCH_TMPTSET');
100: RAISE OKL_API.G_EXCEPTION_ERROR;
101:
102: END IF;
103:
104: END IF;
104: END IF;
105:
106: EXCEPTION
107:
108: WHEN OKL_API.G_EXCEPTION_ERROR THEN
109: x_valid_flag := OKL_API.G_RET_STS_ERROR;
110:
111: END validate_set_dates;
112:
105:
106: EXCEPTION
107:
108: WHEN OKL_API.G_EXCEPTION_ERROR THEN
109: x_valid_flag := OKL_API.G_RET_STS_ERROR;
110:
111: END validate_set_dates;
112:
113:
135: IF (exist_rec.END_DATE IS NULL) THEN -- If existing record in unbounded
136:
137: IF (p_avlv_rec.END_DATE IS NULL) THEN -- If new record is also unbounded then error
138:
139: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
140: p_msg_name => 'OKL_TMPL_DATE_OVERLAPS');
141: RAISE OKL_API.G_EXCEPTION_ERROR;
142:
143: ELSE -- New record is bounded
137: IF (p_avlv_rec.END_DATE IS NULL) THEN -- If new record is also unbounded then error
138:
139: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
140: p_msg_name => 'OKL_TMPL_DATE_OVERLAPS');
141: RAISE OKL_API.G_EXCEPTION_ERROR;
142:
143: ELSE -- New record is bounded
144:
145: IF (p_avlv_rec.END_DATE >= exist_rec.START_DATE) THEN -- new record should be on left
142:
143: ELSE -- New record is bounded
144:
145: IF (p_avlv_rec.END_DATE >= exist_rec.START_DATE) THEN -- new record should be on left
146: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
147: p_msg_name => 'OKL_TMPL_DATE_OVERLAPS');
148: RAISE OKL_API.G_EXCEPTION_ERROR;
149: END IF;
150:
144:
145: IF (p_avlv_rec.END_DATE >= exist_rec.START_DATE) THEN -- new record should be on left
146: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
147: p_msg_name => 'OKL_TMPL_DATE_OVERLAPS');
148: RAISE OKL_API.G_EXCEPTION_ERROR;
149: END IF;
150:
151: END IF;
152:
156:
157: IF (p_avlv_rec.END_DATE IS NULL) THEN -- if new record in unbounded, it should be on right
158: IF (p_avlv_rec.START_DATE <= exist_rec.END_DATE) THEN
159:
160: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
161: p_msg_name => 'OKL_TMPL_DATE_OVERLAPS');
162: RAISE OKL_API.G_EXCEPTION_ERROR;
163:
164: END IF;
158: IF (p_avlv_rec.START_DATE <= exist_rec.END_DATE) THEN
159:
160: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
161: p_msg_name => 'OKL_TMPL_DATE_OVERLAPS');
162: RAISE OKL_API.G_EXCEPTION_ERROR;
163:
164: END IF;
165: ELSE
166: IF (p_avlv_rec.START_DATE BETWEEN exist_rec.START_DATE AND exist_rec.END_DATE) OR
165: ELSE
166: IF (p_avlv_rec.START_DATE BETWEEN exist_rec.START_DATE AND exist_rec.END_DATE) OR
167: (p_avlv_rec.END_DATE BETWEEN exist_rec.START_DATE AND exist_rec.END_DATE) THEN
168:
169: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
170: p_msg_name => 'OKL_TMPL_DATE_OVERLAPS');
171: RAISE OKL_API.G_EXCEPTION_ERROR;
172:
173: END IF;
167: (p_avlv_rec.END_DATE BETWEEN exist_rec.START_DATE AND exist_rec.END_DATE) THEN
168:
169: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
170: p_msg_name => 'OKL_TMPL_DATE_OVERLAPS');
171: RAISE OKL_API.G_EXCEPTION_ERROR;
172:
173: END IF;
174:
175: END IF;
179: END LOOP;
180:
181: EXCEPTION
182:
183: WHEN OKL_API.G_EXCEPTION_ERROR THEN
184:
185: x_valid_flag := OKL_API.G_RET_STS_ERROR;
186:
187:
181: EXCEPTION
182:
183: WHEN OKL_API.G_EXCEPTION_ERROR THEN
184:
185: x_valid_flag := OKL_API.G_RET_STS_ERROR;
186:
187:
188: END validate_existing_tmpl;
189:
197: CURSOR avl_csr IS
198: SELECT start_date,
199: end_date
200: FROM OKL_AE_TEMPLATES
201: WHERE nvl(sty_id,OKL_API.G_MISS_NUM)
202: = nvl(p_avlv_rec.sty_id,OKL_API.G_MISS_NUM) AND
203: nvl(try_id,OKL_API.G_MISS_NUM)
204: = nvl(p_avlv_rec.try_id,OKL_API.G_MISS_NUM) AND
205: nvl(aes_id,OKL_API.G_MISS_NUM)
198: SELECT start_date,
199: end_date
200: FROM OKL_AE_TEMPLATES
201: WHERE nvl(sty_id,OKL_API.G_MISS_NUM)
202: = nvl(p_avlv_rec.sty_id,OKL_API.G_MISS_NUM) AND
203: nvl(try_id,OKL_API.G_MISS_NUM)
204: = nvl(p_avlv_rec.try_id,OKL_API.G_MISS_NUM) AND
205: nvl(aes_id,OKL_API.G_MISS_NUM)
206: = nvl(p_avlv_rec.aes_id,OKL_API.G_MISS_NUM) AND
199: end_date
200: FROM OKL_AE_TEMPLATES
201: WHERE nvl(sty_id,OKL_API.G_MISS_NUM)
202: = nvl(p_avlv_rec.sty_id,OKL_API.G_MISS_NUM) AND
203: nvl(try_id,OKL_API.G_MISS_NUM)
204: = nvl(p_avlv_rec.try_id,OKL_API.G_MISS_NUM) AND
205: nvl(aes_id,OKL_API.G_MISS_NUM)
206: = nvl(p_avlv_rec.aes_id,OKL_API.G_MISS_NUM) AND
207: nvl(syt_code,OKL_API.G_MISS_CHAR)
200: FROM OKL_AE_TEMPLATES
201: WHERE nvl(sty_id,OKL_API.G_MISS_NUM)
202: = nvl(p_avlv_rec.sty_id,OKL_API.G_MISS_NUM) AND
203: nvl(try_id,OKL_API.G_MISS_NUM)
204: = nvl(p_avlv_rec.try_id,OKL_API.G_MISS_NUM) AND
205: nvl(aes_id,OKL_API.G_MISS_NUM)
206: = nvl(p_avlv_rec.aes_id,OKL_API.G_MISS_NUM) AND
207: nvl(syt_code,OKL_API.G_MISS_CHAR)
208: = nvl(p_avlv_rec.syt_code,OKL_API.G_MISS_CHAR) AND
201: WHERE nvl(sty_id,OKL_API.G_MISS_NUM)
202: = nvl(p_avlv_rec.sty_id,OKL_API.G_MISS_NUM) AND
203: nvl(try_id,OKL_API.G_MISS_NUM)
204: = nvl(p_avlv_rec.try_id,OKL_API.G_MISS_NUM) AND
205: nvl(aes_id,OKL_API.G_MISS_NUM)
206: = nvl(p_avlv_rec.aes_id,OKL_API.G_MISS_NUM) AND
207: nvl(syt_code,OKL_API.G_MISS_CHAR)
208: = nvl(p_avlv_rec.syt_code,OKL_API.G_MISS_CHAR) AND
209: -- Code Added by HKPATEL for Bug # 2943310
202: = nvl(p_avlv_rec.sty_id,OKL_API.G_MISS_NUM) AND
203: nvl(try_id,OKL_API.G_MISS_NUM)
204: = nvl(p_avlv_rec.try_id,OKL_API.G_MISS_NUM) AND
205: nvl(aes_id,OKL_API.G_MISS_NUM)
206: = nvl(p_avlv_rec.aes_id,OKL_API.G_MISS_NUM) AND
207: nvl(syt_code,OKL_API.G_MISS_CHAR)
208: = nvl(p_avlv_rec.syt_code,OKL_API.G_MISS_CHAR) AND
209: -- Code Added by HKPATEL for Bug # 2943310
210: nvl(inv_code,OKL_API.G_MISS_CHAR)
203: nvl(try_id,OKL_API.G_MISS_NUM)
204: = nvl(p_avlv_rec.try_id,OKL_API.G_MISS_NUM) AND
205: nvl(aes_id,OKL_API.G_MISS_NUM)
206: = nvl(p_avlv_rec.aes_id,OKL_API.G_MISS_NUM) AND
207: nvl(syt_code,OKL_API.G_MISS_CHAR)
208: = nvl(p_avlv_rec.syt_code,OKL_API.G_MISS_CHAR) AND
209: -- Code Added by HKPATEL for Bug # 2943310
210: nvl(inv_code,OKL_API.G_MISS_CHAR)
211: = nvl(p_avlv_rec.inv_code,OKL_API.G_MISS_CHAR) AND
204: = nvl(p_avlv_rec.try_id,OKL_API.G_MISS_NUM) AND
205: nvl(aes_id,OKL_API.G_MISS_NUM)
206: = nvl(p_avlv_rec.aes_id,OKL_API.G_MISS_NUM) AND
207: nvl(syt_code,OKL_API.G_MISS_CHAR)
208: = nvl(p_avlv_rec.syt_code,OKL_API.G_MISS_CHAR) AND
209: -- Code Added by HKPATEL for Bug # 2943310
210: nvl(inv_code,OKL_API.G_MISS_CHAR)
211: = nvl(p_avlv_rec.inv_code,OKL_API.G_MISS_CHAR) AND
212: -- Added code ends here
206: = nvl(p_avlv_rec.aes_id,OKL_API.G_MISS_NUM) AND
207: nvl(syt_code,OKL_API.G_MISS_CHAR)
208: = nvl(p_avlv_rec.syt_code,OKL_API.G_MISS_CHAR) AND
209: -- Code Added by HKPATEL for Bug # 2943310
210: nvl(inv_code,OKL_API.G_MISS_CHAR)
211: = nvl(p_avlv_rec.inv_code,OKL_API.G_MISS_CHAR) AND
212: -- Added code ends here
213: nvl(fac_code,OKL_API.G_MISS_CHAR)
214: = nvl(p_avlv_rec.fac_code,OKL_API.G_MISS_CHAR) AND
207: nvl(syt_code,OKL_API.G_MISS_CHAR)
208: = nvl(p_avlv_rec.syt_code,OKL_API.G_MISS_CHAR) AND
209: -- Code Added by HKPATEL for Bug # 2943310
210: nvl(inv_code,OKL_API.G_MISS_CHAR)
211: = nvl(p_avlv_rec.inv_code,OKL_API.G_MISS_CHAR) AND
212: -- Added code ends here
213: nvl(fac_code,OKL_API.G_MISS_CHAR)
214: = nvl(p_avlv_rec.fac_code,OKL_API.G_MISS_CHAR) AND
215: nvl(memo_yn,OKL_API.G_MISS_CHAR)
209: -- Code Added by HKPATEL for Bug # 2943310
210: nvl(inv_code,OKL_API.G_MISS_CHAR)
211: = nvl(p_avlv_rec.inv_code,OKL_API.G_MISS_CHAR) AND
212: -- Added code ends here
213: nvl(fac_code,OKL_API.G_MISS_CHAR)
214: = nvl(p_avlv_rec.fac_code,OKL_API.G_MISS_CHAR) AND
215: nvl(memo_yn,OKL_API.G_MISS_CHAR)
216: = nvl(p_avlv_rec.memo_yn,OKL_API.G_MISS_CHAR) AND
217: nvl(factoring_synd_flag,OKL_API.G_MISS_CHAR)
210: nvl(inv_code,OKL_API.G_MISS_CHAR)
211: = nvl(p_avlv_rec.inv_code,OKL_API.G_MISS_CHAR) AND
212: -- Added code ends here
213: nvl(fac_code,OKL_API.G_MISS_CHAR)
214: = nvl(p_avlv_rec.fac_code,OKL_API.G_MISS_CHAR) AND
215: nvl(memo_yn,OKL_API.G_MISS_CHAR)
216: = nvl(p_avlv_rec.memo_yn,OKL_API.G_MISS_CHAR) AND
217: nvl(factoring_synd_flag,OKL_API.G_MISS_CHAR)
218: = nvl(p_avlv_rec.factoring_synd_flag,OKL_API.G_MISS_CHAR) ;
211: = nvl(p_avlv_rec.inv_code,OKL_API.G_MISS_CHAR) AND
212: -- Added code ends here
213: nvl(fac_code,OKL_API.G_MISS_CHAR)
214: = nvl(p_avlv_rec.fac_code,OKL_API.G_MISS_CHAR) AND
215: nvl(memo_yn,OKL_API.G_MISS_CHAR)
216: = nvl(p_avlv_rec.memo_yn,OKL_API.G_MISS_CHAR) AND
217: nvl(factoring_synd_flag,OKL_API.G_MISS_CHAR)
218: = nvl(p_avlv_rec.factoring_synd_flag,OKL_API.G_MISS_CHAR) ;
219:
212: -- Added code ends here
213: nvl(fac_code,OKL_API.G_MISS_CHAR)
214: = nvl(p_avlv_rec.fac_code,OKL_API.G_MISS_CHAR) AND
215: nvl(memo_yn,OKL_API.G_MISS_CHAR)
216: = nvl(p_avlv_rec.memo_yn,OKL_API.G_MISS_CHAR) AND
217: nvl(factoring_synd_flag,OKL_API.G_MISS_CHAR)
218: = nvl(p_avlv_rec.factoring_synd_flag,OKL_API.G_MISS_CHAR) ;
219:
220:
213: nvl(fac_code,OKL_API.G_MISS_CHAR)
214: = nvl(p_avlv_rec.fac_code,OKL_API.G_MISS_CHAR) AND
215: nvl(memo_yn,OKL_API.G_MISS_CHAR)
216: = nvl(p_avlv_rec.memo_yn,OKL_API.G_MISS_CHAR) AND
217: nvl(factoring_synd_flag,OKL_API.G_MISS_CHAR)
218: = nvl(p_avlv_rec.factoring_synd_flag,OKL_API.G_MISS_CHAR) ;
219:
220:
221: exist_rec avl_csr%ROWTYPE;
214: = nvl(p_avlv_rec.fac_code,OKL_API.G_MISS_CHAR) AND
215: nvl(memo_yn,OKL_API.G_MISS_CHAR)
216: = nvl(p_avlv_rec.memo_yn,OKL_API.G_MISS_CHAR) AND
217: nvl(factoring_synd_flag,OKL_API.G_MISS_CHAR)
218: = nvl(p_avlv_rec.factoring_synd_flag,OKL_API.G_MISS_CHAR) ;
219:
220:
221: exist_rec avl_csr%ROWTYPE;
222:
229: IF (exist_rec.END_DATE IS NULL) THEN -- If existing record in unbounded
230:
231: IF (p_avlv_rec.END_DATE IS NULL) THEN -- If new record is also unbounded then error
232:
233: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
234: p_msg_name => 'OKL_TMPL_NOT_UNIQUE');
235: RAISE OKL_API.G_EXCEPTION_ERROR;
236:
237: ELSE -- New record is bounded
231: IF (p_avlv_rec.END_DATE IS NULL) THEN -- If new record is also unbounded then error
232:
233: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
234: p_msg_name => 'OKL_TMPL_NOT_UNIQUE');
235: RAISE OKL_API.G_EXCEPTION_ERROR;
236:
237: ELSE -- New record is bounded
238:
239: IF (p_avlv_rec.END_DATE >= exist_rec.START_DATE) THEN -- new record should be on left
236:
237: ELSE -- New record is bounded
238:
239: IF (p_avlv_rec.END_DATE >= exist_rec.START_DATE) THEN -- new record should be on left
240: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
241: p_msg_name => 'OKL_TMPL_NOT_UNIQUE');
242: RAISE OKL_API.G_EXCEPTION_ERROR;
243: END IF;
244:
238:
239: IF (p_avlv_rec.END_DATE >= exist_rec.START_DATE) THEN -- new record should be on left
240: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
241: p_msg_name => 'OKL_TMPL_NOT_UNIQUE');
242: RAISE OKL_API.G_EXCEPTION_ERROR;
243: END IF;
244:
245: END IF;
246:
250:
251: IF (p_avlv_rec.END_DATE IS NULL) THEN -- if new record in unbounded, it should be on right
252: IF (p_avlv_rec.START_DATE <= exist_rec.END_DATE) THEN
253:
254: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
255: p_msg_name => 'OKL_TMPL_NOT_UNIQUE');
256: RAISE OKL_API.G_EXCEPTION_ERROR;
257:
258: END IF;
252: IF (p_avlv_rec.START_DATE <= exist_rec.END_DATE) THEN
253:
254: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
255: p_msg_name => 'OKL_TMPL_NOT_UNIQUE');
256: RAISE OKL_API.G_EXCEPTION_ERROR;
257:
258: END IF;
259: ELSE
260: IF (p_avlv_rec.START_DATE BETWEEN exist_rec.START_DATE AND exist_rec.END_DATE) OR
259: ELSE
260: IF (p_avlv_rec.START_DATE BETWEEN exist_rec.START_DATE AND exist_rec.END_DATE) OR
261: (p_avlv_rec.END_DATE BETWEEN exist_rec.START_DATE AND exist_rec.END_DATE) THEN
262:
263: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
264: p_msg_name => 'OKL_TMPL_NOT_UNIQUE');
265: RAISE OKL_API.G_EXCEPTION_ERROR;
266:
267: END IF;
261: (p_avlv_rec.END_DATE BETWEEN exist_rec.START_DATE AND exist_rec.END_DATE) THEN
262:
263: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
264: p_msg_name => 'OKL_TMPL_NOT_UNIQUE');
265: RAISE OKL_API.G_EXCEPTION_ERROR;
266:
267: END IF;
268:
269: END IF;
273: END LOOP;
274:
275: EXCEPTION
276:
277: WHEN OKL_API.G_EXCEPTION_ERROR THEN
278:
279: x_valid_flag := OKL_API.G_RET_STS_ERROR;
280:
281:
275: EXCEPTION
276:
277: WHEN OKL_API.G_EXCEPTION_ERROR THEN
278:
279: x_valid_flag := OKL_API.G_RET_STS_ERROR;
280:
281:
282: END UNIQUE_VALIDATION_CREATE;
283:
290: CURSOR avl_csr IS
291: SELECT start_date,
292: end_date
293: FROM OKL_AE_TEMPLATES
294: WHERE nvl(sty_id,OKL_API.G_MISS_NUM)
295: = nvl(p_avlv_rec.sty_id,OKL_API.G_MISS_NUM) AND
296: nvl(try_id,OKL_API.G_MISS_NUM)
297: = nvl(p_avlv_rec.try_id,OKL_API.G_MISS_NUM) AND
298: nvl(aes_id,OKL_API.G_MISS_NUM)
291: SELECT start_date,
292: end_date
293: FROM OKL_AE_TEMPLATES
294: WHERE nvl(sty_id,OKL_API.G_MISS_NUM)
295: = nvl(p_avlv_rec.sty_id,OKL_API.G_MISS_NUM) AND
296: nvl(try_id,OKL_API.G_MISS_NUM)
297: = nvl(p_avlv_rec.try_id,OKL_API.G_MISS_NUM) AND
298: nvl(aes_id,OKL_API.G_MISS_NUM)
299: = nvl(p_avlv_rec.aes_id,OKL_API.G_MISS_NUM) AND
292: end_date
293: FROM OKL_AE_TEMPLATES
294: WHERE nvl(sty_id,OKL_API.G_MISS_NUM)
295: = nvl(p_avlv_rec.sty_id,OKL_API.G_MISS_NUM) AND
296: nvl(try_id,OKL_API.G_MISS_NUM)
297: = nvl(p_avlv_rec.try_id,OKL_API.G_MISS_NUM) AND
298: nvl(aes_id,OKL_API.G_MISS_NUM)
299: = nvl(p_avlv_rec.aes_id,OKL_API.G_MISS_NUM) AND
300: nvl(syt_code,OKL_API.G_MISS_CHAR)
293: FROM OKL_AE_TEMPLATES
294: WHERE nvl(sty_id,OKL_API.G_MISS_NUM)
295: = nvl(p_avlv_rec.sty_id,OKL_API.G_MISS_NUM) AND
296: nvl(try_id,OKL_API.G_MISS_NUM)
297: = nvl(p_avlv_rec.try_id,OKL_API.G_MISS_NUM) AND
298: nvl(aes_id,OKL_API.G_MISS_NUM)
299: = nvl(p_avlv_rec.aes_id,OKL_API.G_MISS_NUM) AND
300: nvl(syt_code,OKL_API.G_MISS_CHAR)
301: = nvl(p_avlv_rec.syt_code,OKL_API.G_MISS_CHAR) AND
294: WHERE nvl(sty_id,OKL_API.G_MISS_NUM)
295: = nvl(p_avlv_rec.sty_id,OKL_API.G_MISS_NUM) AND
296: nvl(try_id,OKL_API.G_MISS_NUM)
297: = nvl(p_avlv_rec.try_id,OKL_API.G_MISS_NUM) AND
298: nvl(aes_id,OKL_API.G_MISS_NUM)
299: = nvl(p_avlv_rec.aes_id,OKL_API.G_MISS_NUM) AND
300: nvl(syt_code,OKL_API.G_MISS_CHAR)
301: = nvl(p_avlv_rec.syt_code,OKL_API.G_MISS_CHAR) AND
302: -- Code Added by HKPATEL for Bug # 2943310
295: = nvl(p_avlv_rec.sty_id,OKL_API.G_MISS_NUM) AND
296: nvl(try_id,OKL_API.G_MISS_NUM)
297: = nvl(p_avlv_rec.try_id,OKL_API.G_MISS_NUM) AND
298: nvl(aes_id,OKL_API.G_MISS_NUM)
299: = nvl(p_avlv_rec.aes_id,OKL_API.G_MISS_NUM) AND
300: nvl(syt_code,OKL_API.G_MISS_CHAR)
301: = nvl(p_avlv_rec.syt_code,OKL_API.G_MISS_CHAR) AND
302: -- Code Added by HKPATEL for Bug # 2943310
303: nvl(inv_code,OKL_API.G_MISS_CHAR)
296: nvl(try_id,OKL_API.G_MISS_NUM)
297: = nvl(p_avlv_rec.try_id,OKL_API.G_MISS_NUM) AND
298: nvl(aes_id,OKL_API.G_MISS_NUM)
299: = nvl(p_avlv_rec.aes_id,OKL_API.G_MISS_NUM) AND
300: nvl(syt_code,OKL_API.G_MISS_CHAR)
301: = nvl(p_avlv_rec.syt_code,OKL_API.G_MISS_CHAR) AND
302: -- Code Added by HKPATEL for Bug # 2943310
303: nvl(inv_code,OKL_API.G_MISS_CHAR)
304: = nvl(p_avlv_rec.inv_code,OKL_API.G_MISS_CHAR) AND
297: = nvl(p_avlv_rec.try_id,OKL_API.G_MISS_NUM) AND
298: nvl(aes_id,OKL_API.G_MISS_NUM)
299: = nvl(p_avlv_rec.aes_id,OKL_API.G_MISS_NUM) AND
300: nvl(syt_code,OKL_API.G_MISS_CHAR)
301: = nvl(p_avlv_rec.syt_code,OKL_API.G_MISS_CHAR) AND
302: -- Code Added by HKPATEL for Bug # 2943310
303: nvl(inv_code,OKL_API.G_MISS_CHAR)
304: = nvl(p_avlv_rec.inv_code,OKL_API.G_MISS_CHAR) AND
305: -- Added code ends here
299: = nvl(p_avlv_rec.aes_id,OKL_API.G_MISS_NUM) AND
300: nvl(syt_code,OKL_API.G_MISS_CHAR)
301: = nvl(p_avlv_rec.syt_code,OKL_API.G_MISS_CHAR) AND
302: -- Code Added by HKPATEL for Bug # 2943310
303: nvl(inv_code,OKL_API.G_MISS_CHAR)
304: = nvl(p_avlv_rec.inv_code,OKL_API.G_MISS_CHAR) AND
305: -- Added code ends here
306: nvl(fac_code,OKL_API.G_MISS_CHAR)
307: = nvl(p_avlv_rec.fac_code,OKL_API.G_MISS_CHAR) AND
300: nvl(syt_code,OKL_API.G_MISS_CHAR)
301: = nvl(p_avlv_rec.syt_code,OKL_API.G_MISS_CHAR) AND
302: -- Code Added by HKPATEL for Bug # 2943310
303: nvl(inv_code,OKL_API.G_MISS_CHAR)
304: = nvl(p_avlv_rec.inv_code,OKL_API.G_MISS_CHAR) AND
305: -- Added code ends here
306: nvl(fac_code,OKL_API.G_MISS_CHAR)
307: = nvl(p_avlv_rec.fac_code,OKL_API.G_MISS_CHAR) AND
308: nvl(memo_yn,OKL_API.G_MISS_CHAR)
302: -- Code Added by HKPATEL for Bug # 2943310
303: nvl(inv_code,OKL_API.G_MISS_CHAR)
304: = nvl(p_avlv_rec.inv_code,OKL_API.G_MISS_CHAR) AND
305: -- Added code ends here
306: nvl(fac_code,OKL_API.G_MISS_CHAR)
307: = nvl(p_avlv_rec.fac_code,OKL_API.G_MISS_CHAR) AND
308: nvl(memo_yn,OKL_API.G_MISS_CHAR)
309: = nvl(p_avlv_rec.memo_yn,OKL_API.G_MISS_CHAR) AND
310: nvl(factoring_synd_flag,OKL_API.G_MISS_CHAR)
303: nvl(inv_code,OKL_API.G_MISS_CHAR)
304: = nvl(p_avlv_rec.inv_code,OKL_API.G_MISS_CHAR) AND
305: -- Added code ends here
306: nvl(fac_code,OKL_API.G_MISS_CHAR)
307: = nvl(p_avlv_rec.fac_code,OKL_API.G_MISS_CHAR) AND
308: nvl(memo_yn,OKL_API.G_MISS_CHAR)
309: = nvl(p_avlv_rec.memo_yn,OKL_API.G_MISS_CHAR) AND
310: nvl(factoring_synd_flag,OKL_API.G_MISS_CHAR)
311: = nvl(p_avlv_rec.factoring_synd_flag,OKL_API.G_MISS_CHAR) AND
304: = nvl(p_avlv_rec.inv_code,OKL_API.G_MISS_CHAR) AND
305: -- Added code ends here
306: nvl(fac_code,OKL_API.G_MISS_CHAR)
307: = nvl(p_avlv_rec.fac_code,OKL_API.G_MISS_CHAR) AND
308: nvl(memo_yn,OKL_API.G_MISS_CHAR)
309: = nvl(p_avlv_rec.memo_yn,OKL_API.G_MISS_CHAR) AND
310: nvl(factoring_synd_flag,OKL_API.G_MISS_CHAR)
311: = nvl(p_avlv_rec.factoring_synd_flag,OKL_API.G_MISS_CHAR) AND
312: ID <> p_avlv_rec.ID;
305: -- Added code ends here
306: nvl(fac_code,OKL_API.G_MISS_CHAR)
307: = nvl(p_avlv_rec.fac_code,OKL_API.G_MISS_CHAR) AND
308: nvl(memo_yn,OKL_API.G_MISS_CHAR)
309: = nvl(p_avlv_rec.memo_yn,OKL_API.G_MISS_CHAR) AND
310: nvl(factoring_synd_flag,OKL_API.G_MISS_CHAR)
311: = nvl(p_avlv_rec.factoring_synd_flag,OKL_API.G_MISS_CHAR) AND
312: ID <> p_avlv_rec.ID;
313:
306: nvl(fac_code,OKL_API.G_MISS_CHAR)
307: = nvl(p_avlv_rec.fac_code,OKL_API.G_MISS_CHAR) AND
308: nvl(memo_yn,OKL_API.G_MISS_CHAR)
309: = nvl(p_avlv_rec.memo_yn,OKL_API.G_MISS_CHAR) AND
310: nvl(factoring_synd_flag,OKL_API.G_MISS_CHAR)
311: = nvl(p_avlv_rec.factoring_synd_flag,OKL_API.G_MISS_CHAR) AND
312: ID <> p_avlv_rec.ID;
313:
314:
307: = nvl(p_avlv_rec.fac_code,OKL_API.G_MISS_CHAR) AND
308: nvl(memo_yn,OKL_API.G_MISS_CHAR)
309: = nvl(p_avlv_rec.memo_yn,OKL_API.G_MISS_CHAR) AND
310: nvl(factoring_synd_flag,OKL_API.G_MISS_CHAR)
311: = nvl(p_avlv_rec.factoring_synd_flag,OKL_API.G_MISS_CHAR) AND
312: ID <> p_avlv_rec.ID;
313:
314:
315:
324: IF (exist_rec.END_DATE IS NULL) THEN -- If existing record in unbounded
325:
326: IF (p_avlv_rec.END_DATE IS NULL) THEN -- If new record is also unbounded then error
327:
328: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
329: p_msg_name => 'OKL_TMPL_NOT_UNIQUE');
330: RAISE OKL_API.G_EXCEPTION_ERROR;
331:
332: ELSE -- New record is bounded
326: IF (p_avlv_rec.END_DATE IS NULL) THEN -- If new record is also unbounded then error
327:
328: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
329: p_msg_name => 'OKL_TMPL_NOT_UNIQUE');
330: RAISE OKL_API.G_EXCEPTION_ERROR;
331:
332: ELSE -- New record is bounded
333:
334: IF (p_avlv_rec.END_DATE >= exist_rec.START_DATE) THEN -- new record should be on left
331:
332: ELSE -- New record is bounded
333:
334: IF (p_avlv_rec.END_DATE >= exist_rec.START_DATE) THEN -- new record should be on left
335: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
336: p_msg_name => 'OKL_TMPL_NOT_UNIQUE');
337: RAISE OKL_API.G_EXCEPTION_ERROR;
338: END IF;
339:
333:
334: IF (p_avlv_rec.END_DATE >= exist_rec.START_DATE) THEN -- new record should be on left
335: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
336: p_msg_name => 'OKL_TMPL_NOT_UNIQUE');
337: RAISE OKL_API.G_EXCEPTION_ERROR;
338: END IF;
339:
340: END IF;
341:
345:
346: IF (p_avlv_rec.END_DATE IS NULL) THEN -- if new record in unbounded, it should be on right
347: IF (p_avlv_rec.START_DATE <= exist_rec.END_DATE) THEN
348:
349: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
350: p_msg_name => 'OKL_TMPL_NOT_UNIQUE');
351: RAISE OKL_API.G_EXCEPTION_ERROR;
352:
353: END IF;
347: IF (p_avlv_rec.START_DATE <= exist_rec.END_DATE) THEN
348:
349: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
350: p_msg_name => 'OKL_TMPL_NOT_UNIQUE');
351: RAISE OKL_API.G_EXCEPTION_ERROR;
352:
353: END IF;
354: ELSE
355: IF (p_avlv_rec.START_DATE BETWEEN exist_rec.START_DATE AND exist_rec.END_DATE) OR
354: ELSE
355: IF (p_avlv_rec.START_DATE BETWEEN exist_rec.START_DATE AND exist_rec.END_DATE) OR
356: (p_avlv_rec.END_DATE BETWEEN exist_rec.START_DATE AND exist_rec.END_DATE) THEN
357:
358: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
359: p_msg_name => 'OKL_TMPL_NOT_UNIQUE');
360: RAISE OKL_API.G_EXCEPTION_ERROR;
361:
362: END IF;
356: (p_avlv_rec.END_DATE BETWEEN exist_rec.START_DATE AND exist_rec.END_DATE) THEN
357:
358: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
359: p_msg_name => 'OKL_TMPL_NOT_UNIQUE');
360: RAISE OKL_API.G_EXCEPTION_ERROR;
361:
362: END IF;
363:
364: END IF;
368: END LOOP;
369:
370: EXCEPTION
371:
372: WHEN OKL_API.G_EXCEPTION_ERROR THEN
373:
374: x_valid_flag := OKL_API.G_RET_STS_ERROR;
375:
376:
370: EXCEPTION
371:
372: WHEN OKL_API.G_EXCEPTION_ERROR THEN
373:
374: x_valid_flag := OKL_API.G_RET_STS_ERROR;
375:
376:
377: END UNIQUE_VALIDATION_UPDATE;
378:
923: i NUMBER := 0;
924: l_name OKL_AE_TEMPLATES.NAME%TYPE;
925: l_max_version NUMBER := 0;
926: p_api_version NUMBER := 1.0;
927: p_init_msg_list VARCHAR2(1) := OKL_API.G_FALSE;
928: x_msg_count NUMBER := 0;
929: x_msg_data VARCHAR2(2000);
930: x_avlv_rec AVLV_REC_TYPE;
931: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
927: p_init_msg_list VARCHAR2(1) := OKL_API.G_FALSE;
928: x_msg_count NUMBER := 0;
929: x_msg_data VARCHAR2(2000);
930: x_avlv_rec AVLV_REC_TYPE;
931: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
932:
933:
934: BEGIN
935:
966: END;
967: END IF;
968: -- End of wraper code generated automatically by Debug code generator for OKL_TMPT_SET_PUB.create_template
969:
970: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
971:
972: FOR atl_rec IN atl_csr(l_avlv_rec.ID) --Get the lines for the Old Template
973: LOOP
974: i := i + 1;
1058: i NUMBER := 0;
1059: l_name OKL_AE_TEMPLATES.NAME%TYPE;
1060: l_max_version NUMBER := 0;
1061: p_api_version NUMBER := 1.0;
1062: p_init_msg_list VARCHAR2(1) := OKL_API.G_FALSE;
1063: x_msg_count NUMBER := 0;
1064: x_msg_data VARCHAR2(2000);
1065: x_avlv_rec AVLV_REC_TYPE;
1066: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1062: p_init_msg_list VARCHAR2(1) := OKL_API.G_FALSE;
1063: x_msg_count NUMBER := 0;
1064: x_msg_data VARCHAR2(2000);
1065: x_avlv_rec AVLV_REC_TYPE;
1066: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1067: l_avl_id NUMBER;
1068:
1069:
1070: BEGIN
1110: END IF;
1111: -- End of wraper code generated automatically by Debug code generator for OKL_TMPT_SET_PUB.create_template
1112:
1113:
1114: IF (x_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
1115:
1116: FOR i IN 1..l_atlv_tbl.COUNT
1117: LOOP
1118:
1269: WHEN OTHERS THEN
1270: x_return_status := G_RET_STS_UNEXP_ERROR;
1271:
1272: -- store SQL error message on message stack for caller
1273: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1274: p_msg_name => G_UNEXPECTED_ERROR,
1275: p_token1 => G_SQLCODE_TOKEN,
1276: p_token1_value => sqlcode,
1277: p_token2 => G_SQLERRM_TOKEN,
1291: x_aesv_tbl OUT NOCOPY aesv_tbl_type)
1292:
1293: IS
1294:
1295: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1296: l_overall_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1297:
1298: i NUMBER;
1299:
1292:
1293: IS
1294:
1295: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1296: l_overall_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1297:
1298: i NUMBER;
1299:
1300: BEGIN
1314: p_aesv_rec => p_aesv_tbl(i),
1315: x_aesv_rec => x_aesv_tbl(i),
1316: p_aes_source_id => NULL );
1317:
1318: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1319:
1320: IF (l_overall_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1321:
1322: l_overall_status := l_return_status;
1316: p_aes_source_id => NULL );
1317:
1318: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1319:
1320: IF (l_overall_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1321:
1322: l_overall_status := l_return_status;
1323:
1324: END IF;
1348: IS
1349:
1350: l_api_version NUMBER := 1.0;
1351: l_api_name VARCHAR2(30) := 'CREATE_TMPT_SET';
1352: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1353: l_valid_flag VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1354: l_id NUMBER ;
1355: l_copy_to_id OKL_AE_TMPT_SETS.id%TYPE;
1356:
1349:
1350: l_api_version NUMBER := 1.0;
1351: l_api_name VARCHAR2(30) := 'CREATE_TMPT_SET';
1352: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1353: l_valid_flag VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1354: l_id NUMBER ;
1355: l_copy_to_id OKL_AE_TMPT_SETS.id%TYPE;
1356:
1357: CURSOR aes_csr (v_name VARCHAR2) IS
1360: WHERE name = v_name;
1361:
1362: BEGIN
1363:
1364: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
1365: G_PKG_NAME,
1366: p_init_msg_list,
1367: l_api_version,
1368: p_api_version,
1367: l_api_version,
1368: p_api_version,
1369: '_PVT',
1370: x_return_status);
1371: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1372: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1373: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1374: RAISE OKL_API.G_EXCEPTION_ERROR;
1375: END IF;
1368: p_api_version,
1369: '_PVT',
1370: x_return_status);
1371: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1372: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1373: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1374: RAISE OKL_API.G_EXCEPTION_ERROR;
1375: END IF;
1376:
1369: '_PVT',
1370: x_return_status);
1371: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1372: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1373: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1374: RAISE OKL_API.G_EXCEPTION_ERROR;
1375: END IF;
1376:
1377: validate_dates(p_start_date => p_aesv_rec.start_date,
1370: x_return_status);
1371: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1372: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1373: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1374: RAISE OKL_API.G_EXCEPTION_ERROR;
1375: END IF;
1376:
1377: validate_dates(p_start_date => p_aesv_rec.start_date,
1378: p_end_date => p_aesv_rec.end_date,
1378: p_end_date => p_aesv_rec.end_date,
1379: x_valid_flag => l_valid_flag);
1380:
1381: IF (l_valid_flag = 'E') THEN
1382: RAISE OKL_API.G_EXCEPTION_ERROR;
1383: END IF;
1384:
1385: --kmotepal added for bug 3944429
1386: validate_gts_id(p_gts_id => p_aesv_rec.gts_id,
1385: --kmotepal added for bug 3944429
1386: validate_gts_id(p_gts_id => p_aesv_rec.gts_id,
1387: x_return_status => l_return_status);
1388:
1389: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1390: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1391: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1392: RAISE OKL_API.G_EXCEPTION_ERROR;
1393: END IF;
1386: validate_gts_id(p_gts_id => p_aesv_rec.gts_id,
1387: x_return_status => l_return_status);
1388:
1389: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1390: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1391: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1392: RAISE OKL_API.G_EXCEPTION_ERROR;
1393: END IF;
1394:
1387: x_return_status => l_return_status);
1388:
1389: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1390: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1391: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1392: RAISE OKL_API.G_EXCEPTION_ERROR;
1393: END IF;
1394:
1395:
1388:
1389: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1390: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1391: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1392: RAISE OKL_API.G_EXCEPTION_ERROR;
1393: END IF;
1394:
1395:
1396: OPEN aes_csr(p_aesv_rec.NAME);
1395:
1396: OPEN aes_csr(p_aesv_rec.NAME);
1397: FETCH aes_csr INTO l_id;
1398: IF (aes_csr%FOUND) THEN
1399: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1400: p_msg_name => 'OKL_TMPT_NAME_EXIST');
1401: CLOSE aes_csr;
1402: RAISE OKL_API.G_EXCEPTION_ERROR;
1403: END IF;
1398: IF (aes_csr%FOUND) THEN
1399: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1400: p_msg_name => 'OKL_TMPT_NAME_EXIST');
1401: CLOSE aes_csr;
1402: RAISE OKL_API.G_EXCEPTION_ERROR;
1403: END IF;
1404: CLOSE aes_csr;
1405:
1406:
1429: -- End of wraper code generated automatically by Debug code generator for OKL_TMPT_SET_PUB.create_tmpt_set
1430:
1431: -- Added by Santonyr
1432:
1433: IF x_return_Status = OKL_API.G_RET_STS_ERROR THEN
1434: RAISE OKL_API.G_EXCEPTION_ERROR;
1435: ELSIF x_return_Status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
1436: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1437: END IF;
1430:
1431: -- Added by Santonyr
1432:
1433: IF x_return_Status = OKL_API.G_RET_STS_ERROR THEN
1434: RAISE OKL_API.G_EXCEPTION_ERROR;
1435: ELSIF x_return_Status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
1436: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1437: END IF;
1438:
1431: -- Added by Santonyr
1432:
1433: IF x_return_Status = OKL_API.G_RET_STS_ERROR THEN
1434: RAISE OKL_API.G_EXCEPTION_ERROR;
1435: ELSIF x_return_Status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
1436: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1437: END IF;
1438:
1439: -- Added by Santonyr If the source ID is not null then copy the template sets.
1432:
1433: IF x_return_Status = OKL_API.G_RET_STS_ERROR THEN
1434: RAISE OKL_API.G_EXCEPTION_ERROR;
1435: ELSIF x_return_Status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
1436: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1437: END IF;
1438:
1439: -- Added by Santonyr If the source ID is not null then copy the template sets.
1440:
1451: p_aes_id_from => p_aes_source_id,
1452: p_aes_id_to => l_copy_to_id);
1453: END IF;
1454:
1455: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1456:
1457: EXCEPTION
1458:
1459: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1455: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1456:
1457: EXCEPTION
1458:
1459: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1460: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1461: (
1462: l_api_name,
1463: G_PKG_NAME,
1456:
1457: EXCEPTION
1458:
1459: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1460: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1461: (
1462: l_api_name,
1463: G_PKG_NAME,
1464: 'OKL_API.G_RET_STS_ERROR',
1460: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1461: (
1462: l_api_name,
1463: G_PKG_NAME,
1464: 'OKL_API.G_RET_STS_ERROR',
1465: x_msg_count,
1466: x_msg_data,
1467: '_PVT'
1468: );
1465: x_msg_count,
1466: x_msg_data,
1467: '_PVT'
1468: );
1469: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1470: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1471: (
1472: l_api_name,
1473: G_PKG_NAME,
1466: x_msg_data,
1467: '_PVT'
1468: );
1469: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1470: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1471: (
1472: l_api_name,
1473: G_PKG_NAME,
1474: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1470: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1471: (
1472: l_api_name,
1473: G_PKG_NAME,
1474: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1475: x_msg_count,
1476: x_msg_data,
1477: '_PVT'
1478: );
1476: x_msg_data,
1477: '_PVT'
1478: );
1479: WHEN OTHERS THEN
1480: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1481: (
1482: l_api_name,
1483: G_PKG_NAME,
1484: 'OTHERS',
1499: x_aesv_tbl OUT NOCOPY aesv_tbl_type)
1500: IS
1501:
1502: l_api_version NUMBER := 1.0;
1503: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1504: l_overall_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1505: i NUMBER;
1506:
1507:
1500: IS
1501:
1502: l_api_version NUMBER := 1.0;
1503: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1504: l_overall_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1505: i NUMBER;
1506:
1507:
1508: BEGIN
1521: x_msg_data => x_msg_data,
1522: p_aesv_rec => p_aesv_tbl(i),
1523: x_aesv_rec => x_aesv_tbl(i) );
1524:
1525: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1526:
1527: IF (l_overall_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1528:
1529: l_overall_status := l_return_status;
1523: x_aesv_rec => x_aesv_tbl(i) );
1524:
1525: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1526:
1527: IF (l_overall_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1528:
1529: l_overall_status := l_return_status;
1530:
1531: END IF;
1555:
1556: l_api_version NUMBER := 1.0;
1557: l_api_name VARCHAR2(30) := 'UPDATE_TMPT_SET';
1558: l_valid_flag VARCHAR2(1) := 'S';
1559: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1560:
1561: BEGIN
1562:
1563: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
1559: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1560:
1561: BEGIN
1562:
1563: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
1564: G_PKG_NAME,
1565: p_init_msg_list,
1566: l_api_version,
1567: p_api_version,
1566: l_api_version,
1567: p_api_version,
1568: '_PVT',
1569: x_return_status);
1570: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1571: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1572: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1573: RAISE OKL_API.G_EXCEPTION_ERROR;
1574: END IF;
1567: p_api_version,
1568: '_PVT',
1569: x_return_status);
1570: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1571: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1572: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1573: RAISE OKL_API.G_EXCEPTION_ERROR;
1574: END IF;
1575:
1568: '_PVT',
1569: x_return_status);
1570: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1571: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1572: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1573: RAISE OKL_API.G_EXCEPTION_ERROR;
1574: END IF;
1575:
1576: validate_dates(p_start_date => p_aesv_rec.start_date,
1569: x_return_status);
1570: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1571: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1572: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1573: RAISE OKL_API.G_EXCEPTION_ERROR;
1574: END IF;
1575:
1576: validate_dates(p_start_date => p_aesv_rec.start_date,
1577: p_end_date => p_aesv_rec.end_date,
1578: x_valid_flag => l_valid_flag);
1579:
1580: IF (l_valid_flag = 'E') THEN
1581:
1582: RAISE OKL_API.G_EXCEPTION_ERROR;
1583:
1584: END IF;
1585:
1586: --kmotepal added for bug 3944429
1586: --kmotepal added for bug 3944429
1587: validate_gts_id(p_gts_id => p_aesv_rec.gts_id,
1588: x_return_status => l_return_status);
1589:
1590: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1591: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1592: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1593: RAISE OKL_API.G_EXCEPTION_ERROR;
1594: END IF;
1587: validate_gts_id(p_gts_id => p_aesv_rec.gts_id,
1588: x_return_status => l_return_status);
1589:
1590: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1591: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1592: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1593: RAISE OKL_API.G_EXCEPTION_ERROR;
1594: END IF;
1595:
1588: x_return_status => l_return_status);
1589:
1590: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1591: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1592: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1593: RAISE OKL_API.G_EXCEPTION_ERROR;
1594: END IF;
1595:
1596: -- Start of wraper code generated automatically by Debug code generator for OKL_TMPT_SET_PUB.update_tmpt_set
1589:
1590: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1591: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1592: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1593: RAISE OKL_API.G_EXCEPTION_ERROR;
1594: END IF;
1595:
1596: -- Start of wraper code generated automatically by Debug code generator for OKL_TMPT_SET_PUB.update_tmpt_set
1597: IF(L_DEBUG_ENABLED='Y') THEN
1616: END;
1617: END IF;
1618: -- End of wraper code generated automatically by Debug code generator for OKL_TMPT_SET_PUB.update_tmpt_set
1619:
1620: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1621:
1622: EXCEPTION
1623: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1624: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1619:
1620: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1621:
1622: EXCEPTION
1623: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1624: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1625: (
1626: l_api_name,
1627: G_PKG_NAME,
1620: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1621:
1622: EXCEPTION
1623: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1624: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1625: (
1626: l_api_name,
1627: G_PKG_NAME,
1628: 'OKL_API.G_RET_STS_ERROR',
1624: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1625: (
1626: l_api_name,
1627: G_PKG_NAME,
1628: 'OKL_API.G_RET_STS_ERROR',
1629: x_msg_count,
1630: x_msg_data,
1631: '_PVT'
1632: );
1629: x_msg_count,
1630: x_msg_data,
1631: '_PVT'
1632: );
1633: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1634: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1635: (
1636: l_api_name,
1637: G_PKG_NAME,
1630: x_msg_data,
1631: '_PVT'
1632: );
1633: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1634: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1635: (
1636: l_api_name,
1637: G_PKG_NAME,
1638: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1634: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1635: (
1636: l_api_name,
1637: G_PKG_NAME,
1638: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1639: x_msg_count,
1640: x_msg_data,
1641: '_PVT'
1642: );
1640: x_msg_data,
1641: '_PVT'
1642: );
1643: WHEN OTHERS THEN
1644: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1645: (
1646: l_api_name,
1647: G_PKG_NAME,
1648: 'OTHERS',
1745: p_avlv_rec IN avlv_rec_type,
1746: x_avlv_rec OUT NOCOPY avlv_rec_type)
1747: IS
1748:
1749: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1750: l_api_version NUMBER := 1.0;
1751: l_api_name VARCHAR2(30) := 'CREATE_TEMPLATE';
1752: i NUMBER := 0;
1753:
1764:
1765:
1766: BEGIN
1767:
1768: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
1769: G_PKG_NAME,
1770: p_init_msg_list,
1771: l_api_version,
1772: p_api_version,
1771: l_api_version,
1772: p_api_version,
1773: '_PVT',
1774: x_return_status);
1775: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1776: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1777: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1778: RAISE OKL_API.G_EXCEPTION_ERROR;
1779: END IF;
1772: p_api_version,
1773: '_PVT',
1774: x_return_status);
1775: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1776: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1777: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1778: RAISE OKL_API.G_EXCEPTION_ERROR;
1779: END IF;
1780:
1773: '_PVT',
1774: x_return_status);
1775: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1776: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1777: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1778: RAISE OKL_API.G_EXCEPTION_ERROR;
1779: END IF;
1780:
1781: l_avlv_rec := p_avlv_rec;
1774: x_return_status);
1775: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1776: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1777: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1778: RAISE OKL_API.G_EXCEPTION_ERROR;
1779: END IF;
1780:
1781: l_avlv_rec := p_avlv_rec;
1782:
1783: validate_dates(p_start_date => p_avlv_rec.start_date,
1784: p_end_date => p_avlv_rec.end_date,
1785: x_valid_flag => l_valid_flag);
1786:
1787: IF (l_valid_flag = OKL_API.G_RET_STS_ERROR) THEN
1788:
1789: RAISE OKL_API.G_EXCEPTION_ERROR;
1790:
1791: END IF;
1785: x_valid_flag => l_valid_flag);
1786:
1787: IF (l_valid_flag = OKL_API.G_RET_STS_ERROR) THEN
1788:
1789: RAISE OKL_API.G_EXCEPTION_ERROR;
1790:
1791: END IF;
1792:
1793:
1793:
1794: validate_set_dates(p_avlv_rec => p_avlv_rec,
1795: x_valid_flag => l_valid_flag);
1796:
1797: IF (l_valid_flag = OKL_API.G_RET_STS_ERROR) THEN
1798:
1799: RAISE OKL_API.G_EXCEPTION_ERROR;
1800:
1801: END IF;
1795: x_valid_flag => l_valid_flag);
1796:
1797: IF (l_valid_flag = OKL_API.G_RET_STS_ERROR) THEN
1798:
1799: RAISE OKL_API.G_EXCEPTION_ERROR;
1800:
1801: END IF;
1802:
1803: OPEN avl_csr(p_avlv_rec.NAME, p_avlv_rec.AES_ID);
1808:
1809: validate_existing_tmpl(p_avlv_rec => p_avlv_rec,
1810: x_valid_flag => l_valid_flag);
1811:
1812: IF (l_valid_flag = OKL_API.G_RET_STS_ERROR) THEN
1813:
1814: RAISE OKL_API.G_EXCEPTION_ERROR;
1815:
1816: END IF;
1810: x_valid_flag => l_valid_flag);
1811:
1812: IF (l_valid_flag = OKL_API.G_RET_STS_ERROR) THEN
1813:
1814: RAISE OKL_API.G_EXCEPTION_ERROR;
1815:
1816: END IF;
1817:
1818: l_avlv_rec.version := l_max_version + 1;
1821:
1822: UNIQUE_VALIDATION_CREATE(p_avlv_rec => p_avlv_rec,
1823: x_valid_flag => l_valid_flag);
1824:
1825: IF (l_valid_flag = OKL_API.G_RET_STS_ERROR) THEN
1826:
1827: RAISE OKL_API.G_EXCEPTION_ERROR;
1828:
1829: END IF;
1823: x_valid_flag => l_valid_flag);
1824:
1825: IF (l_valid_flag = OKL_API.G_RET_STS_ERROR) THEN
1826:
1827: RAISE OKL_API.G_EXCEPTION_ERROR;
1828:
1829: END IF;
1830:
1831: -- Start of wraper code generated automatically by Debug code generator for OKL_TMPT_SET_PUB.create_template
1851: END;
1852: END IF;
1853: -- End of wraper code generated automatically by Debug code generator for OKL_TMPT_SET_PUB.create_template
1854:
1855: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1856:
1857: EXCEPTION
1858: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1859: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1854:
1855: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1856:
1857: EXCEPTION
1858: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1859: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1860: (
1861: l_api_name,
1862: G_PKG_NAME,
1855: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1856:
1857: EXCEPTION
1858: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1859: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1860: (
1861: l_api_name,
1862: G_PKG_NAME,
1863: 'OKL_API.G_RET_STS_ERROR',
1859: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1860: (
1861: l_api_name,
1862: G_PKG_NAME,
1863: 'OKL_API.G_RET_STS_ERROR',
1864: x_msg_count,
1865: x_msg_data,
1866: '_PVT'
1867: );
1864: x_msg_count,
1865: x_msg_data,
1866: '_PVT'
1867: );
1868: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1869: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1870: (
1871: l_api_name,
1872: G_PKG_NAME,
1865: x_msg_data,
1866: '_PVT'
1867: );
1868: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1869: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1870: (
1871: l_api_name,
1872: G_PKG_NAME,
1873: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1869: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1870: (
1871: l_api_name,
1872: G_PKG_NAME,
1873: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1874: x_msg_count,
1875: x_msg_data,
1876: '_PVT'
1877: );
1875: x_msg_data,
1876: '_PVT'
1877: );
1878: WHEN OTHERS THEN
1879: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1880: (
1881: l_api_name,
1882: G_PKG_NAME,
1883: 'OTHERS',
1916: x_msg_data => x_msg_data,
1917: p_avlv_rec => p_avlv_tbl(i),
1918: x_avlv_rec => x_avlv_tbl(i));
1919:
1920: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1921:
1922: IF (l_overall_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1923: l_overall_status := l_return_status;
1924: END IF;
1918: x_avlv_rec => x_avlv_tbl(i));
1919:
1920: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1921:
1922: IF (l_overall_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1923: l_overall_status := l_return_status;
1924: END IF;
1925: END IF;
1926:
1998:
1999: l_template_status VARCHAR2(1);
2000: l_avlv_rec_old AVLV_REC_TYPE;
2001: l_avlv_rec_new AVLV_REC_TYPE;
2002: l_valid_flag VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2003:
2004:
2005: BEGIN
2006:
2003:
2004:
2005: BEGIN
2006:
2007: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
2008: G_PKG_NAME,
2009: p_init_msg_list,
2010: l_api_version,
2011: p_api_version,
2010: l_api_version,
2011: p_api_version,
2012: '_PVT',
2013: x_return_status);
2014: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2015: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2016: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2017: RAISE OKL_API.G_EXCEPTION_ERROR;
2018: END IF;
2011: p_api_version,
2012: '_PVT',
2013: x_return_status);
2014: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2015: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2016: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2017: RAISE OKL_API.G_EXCEPTION_ERROR;
2018: END IF;
2019:
2012: '_PVT',
2013: x_return_status);
2014: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2015: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2016: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2017: RAISE OKL_API.G_EXCEPTION_ERROR;
2018: END IF;
2019:
2020: l_avlv_rec_new := p_avlv_rec;
2013: x_return_status);
2014: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2015: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2016: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2017: RAISE OKL_API.G_EXCEPTION_ERROR;
2018: END IF;
2019:
2020: l_avlv_rec_new := p_avlv_rec;
2021:
2021:
2022: UNIQUE_VALIDATION_UPDATE(p_avlv_rec => p_avlv_rec,
2023: x_valid_flag => l_valid_flag);
2024:
2025: IF (l_valid_flag = OKL_API.G_RET_STS_ERROR) THEN
2026: RAISE OKL_API.G_EXCEPTION_ERROR;
2027: END IF;
2028:
2029: OPEN avl_csr(l_avlv_rec_new.ID);
2022: UNIQUE_VALIDATION_UPDATE(p_avlv_rec => p_avlv_rec,
2023: x_valid_flag => l_valid_flag);
2024:
2025: IF (l_valid_flag = OKL_API.G_RET_STS_ERROR) THEN
2026: RAISE OKL_API.G_EXCEPTION_ERROR;
2027: END IF;
2028:
2029: OPEN avl_csr(l_avlv_rec_new.ID);
2030: FETCH avl_csr INTO
2078: END IF;
2079:
2080: IF (l_template_status = 'P') THEN -- Past Record, nothing can be modified
2081:
2082: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
2083: p_msg_name => 'OKL_PAST_REC_NOT_MODIFIED');
2084: RAISE OKL_API.G_EXCEPTION_ERROR;
2085:
2086: END IF;
2080: IF (l_template_status = 'P') THEN -- Past Record, nothing can be modified
2081:
2082: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
2083: p_msg_name => 'OKL_PAST_REC_NOT_MODIFIED');
2084: RAISE OKL_API.G_EXCEPTION_ERROR;
2085:
2086: END IF;
2087:
2088: IF (l_template_status = 'F') OR (l_template_status = 'C') THEN
2090: validate_dates(p_start_date => p_avlv_rec.start_date,
2091: p_end_date => p_avlv_rec.end_date,
2092: x_valid_flag => l_valid_flag);
2093:
2094: IF (l_valid_flag = OKL_API.G_RET_STS_ERROR) THEN
2095:
2096: RAISE OKL_API.G_EXCEPTION_ERROR;
2097:
2098: END IF;
2092: x_valid_flag => l_valid_flag);
2093:
2094: IF (l_valid_flag = OKL_API.G_RET_STS_ERROR) THEN
2095:
2096: RAISE OKL_API.G_EXCEPTION_ERROR;
2097:
2098: END IF;
2099:
2100:
2100:
2101: validate_set_dates(p_avlv_rec => p_avlv_rec,
2102: x_valid_flag => l_valid_flag);
2103:
2104: IF (l_valid_flag = OKL_API.G_RET_STS_ERROR) THEN
2105:
2106: RAISE OKL_API.G_EXCEPTION_ERROR;
2107:
2108: END IF;
2102: x_valid_flag => l_valid_flag);
2103:
2104: IF (l_valid_flag = OKL_API.G_RET_STS_ERROR) THEN
2105:
2106: RAISE OKL_API.G_EXCEPTION_ERROR;
2107:
2108: END IF;
2109:
2110: -- Start of wraper code generated automatically by Debug code generator for OKL_TMPT_SET_PUB.update_template
2132: -- End of wraper code generated automatically by Debug code generator for OKL_TMPT_SET_PUB.update_template
2133:
2134: END IF;
2135:
2136: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2137:
2138: EXCEPTION
2139: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2140: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2135:
2136: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2137:
2138: EXCEPTION
2139: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2140: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2141: (l_api_name,
2142: G_PKG_NAME,
2143: 'OKL_API.G_RET_STS_ERROR',
2136: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2137:
2138: EXCEPTION
2139: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2140: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2141: (l_api_name,
2142: G_PKG_NAME,
2143: 'OKL_API.G_RET_STS_ERROR',
2144: x_msg_count,
2139: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2140: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2141: (l_api_name,
2142: G_PKG_NAME,
2143: 'OKL_API.G_RET_STS_ERROR',
2144: x_msg_count,
2145: x_msg_data,
2146: '_PVT'
2147: );
2144: x_msg_count,
2145: x_msg_data,
2146: '_PVT'
2147: );
2148: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2149: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2150: ( l_api_name,
2151: G_PKG_NAME,
2152: 'OKL_API.G_RET_STS_UNEXP_ERROR',
2145: x_msg_data,
2146: '_PVT'
2147: );
2148: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2149: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2150: ( l_api_name,
2151: G_PKG_NAME,
2152: 'OKL_API.G_RET_STS_UNEXP_ERROR',
2153: x_msg_count,
2148: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2149: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2150: ( l_api_name,
2151: G_PKG_NAME,
2152: 'OKL_API.G_RET_STS_UNEXP_ERROR',
2153: x_msg_count,
2154: x_msg_data,
2155: '_PVT'
2156: );
2154: x_msg_data,
2155: '_PVT'
2156: );
2157: WHEN OTHERS THEN
2158: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2159: ( l_api_name,
2160: G_PKG_NAME,
2161: 'OTHERS',
2162: x_msg_count,
2299:
2300: IS
2301:
2302: l_api_version NUMBER := 1.0;
2303: l_overall_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2304:
2305: BEGIN
2306:
2307: FOR i IN 1..p_atlv_tbl.COUNT
2315: x_msg_data => x_msg_data,
2316: p_atlv_rec => p_atlv_tbl(i),
2317: x_atlv_rec => x_atlv_tbl(i));
2318:
2319: IF (x_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2320: IF (l_overall_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2321: l_overall_Status := x_return_status;
2322: END IF;
2323:
2316: p_atlv_rec => p_atlv_tbl(i),
2317: x_atlv_rec => x_atlv_tbl(i));
2318:
2319: IF (x_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
2320: IF (l_overall_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2321: l_overall_Status := x_return_status;
2322: END IF;
2323:
2324: END IF;
2342: IS
2343:
2344: l_api_version NUMBER := 1.0;
2345: l_api_name VARCHAR2(30) := 'CREATE_TMPT_LINES';
2346: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2347: l_dummy VARCHAR2(1);
2348: l_atlv_rec atlv_rec_type;
2349:
2350: BEGIN
2348: l_atlv_rec atlv_rec_type;
2349:
2350: BEGIN
2351:
2352: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
2353: G_PKG_NAME,
2354: p_init_msg_list,
2355: l_api_version,
2356: p_api_version,
2355: l_api_version,
2356: p_api_version,
2357: '_PVT',
2358: x_return_status);
2359: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2360: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2361: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2362: RAISE OKL_API.G_EXCEPTION_ERROR;
2363: END IF;
2356: p_api_version,
2357: '_PVT',
2358: x_return_status);
2359: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2360: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2361: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2362: RAISE OKL_API.G_EXCEPTION_ERROR;
2363: END IF;
2364:
2357: '_PVT',
2358: x_return_status);
2359: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2360: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2361: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2362: RAISE OKL_API.G_EXCEPTION_ERROR;
2363: END IF;
2364:
2365: -- If CCID is NULL and Account_Builder_YN is N then raise Error
2358: x_return_status);
2359: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2360: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2361: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2362: RAISE OKL_API.G_EXCEPTION_ERROR;
2363: END IF;
2364:
2365: -- If CCID is NULL and Account_Builder_YN is N then raise Error
2366:
2368: (p_atlv_rec.CODE_COMBINATION_ID = OKC_API.G_MISS_NUM))
2369: AND
2370: (p_atlv_rec.ACCOUNT_BUILDER_YN = 'N')
2371: THEN
2372: OKL_API.SET_MESSAGE(p_app_name => OKL_API.G_APP_NAME,
2373: p_msg_name => 'OKL_CCID_OR_BUILDER_REQD');
2374: x_return_status := OKC_API.G_RET_STS_ERROR;
2375: RAISE OKL_API.G_EXCEPTION_ERROR;
2376:
2371: THEN
2372: OKL_API.SET_MESSAGE(p_app_name => OKL_API.G_APP_NAME,
2373: p_msg_name => 'OKL_CCID_OR_BUILDER_REQD');
2374: x_return_status := OKC_API.G_RET_STS_ERROR;
2375: RAISE OKL_API.G_EXCEPTION_ERROR;
2376:
2377: END IF;
2378:
2379: -- Removed the validation by santonyr on 22-Sep-2004
2386: (p_atlv_rec.CODE_COMBINATION_ID <> OKC_API.G_MISS_NUM))
2387: AND
2388: (p_atlv_rec.ACCOUNT_BUILDER_YN = 'Y' )
2389: THEN
2390: OKL_API.SET_MESSAGE(p_app_name => OKL_API.G_APP_NAME,
2391: p_msg_name => 'OKL_GIVE_CCID_OR_BUILDER');
2392: x_return_status := OKC_API.G_RET_STS_ERROR;
2393: RAISE OKL_API.G_EXCEPTION_ERROR;
2394:
2389: THEN
2390: OKL_API.SET_MESSAGE(p_app_name => OKL_API.G_APP_NAME,
2391: p_msg_name => 'OKL_GIVE_CCID_OR_BUILDER');
2392: x_return_status := OKC_API.G_RET_STS_ERROR;
2393: RAISE OKL_API.G_EXCEPTION_ERROR;
2394:
2395: END IF;
2396: */
2397:
2398:
2399: IF (p_atlv_rec.account_builder_yn = 'Y') THEN
2400:
2401: IF (p_atlv_rec.ae_line_type IS NULL) OR
2402: (p_atlv_rec.ae_line_type = OKL_API.G_MISS_CHAR) OR
2403: (p_atlv_rec.ae_line_type = 'NONE') THEN
2404:
2405: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
2406: p_msg_name => 'OKL_GEN_RULE_REQUIRED');
2401: IF (p_atlv_rec.ae_line_type IS NULL) OR
2402: (p_atlv_rec.ae_line_type = OKL_API.G_MISS_CHAR) OR
2403: (p_atlv_rec.ae_line_type = 'NONE') THEN
2404:
2405: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
2406: p_msg_name => 'OKL_GEN_RULE_REQUIRED');
2407: RAISE OKL_API.G_EXCEPTION_ERROR;
2408: END IF;
2409:
2403: (p_atlv_rec.ae_line_type = 'NONE') THEN
2404:
2405: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
2406: p_msg_name => 'OKL_GEN_RULE_REQUIRED');
2407: RAISE OKL_API.G_EXCEPTION_ERROR;
2408: END IF;
2409:
2410: ELSE
2411:
2409:
2410: ELSE
2411:
2412: IF (p_atlv_rec.ae_line_type IS NOT NULL) AND
2413: (p_atlv_rec.ae_line_type <> OKL_API.G_MISS_CHAR) AND
2414: (p_atlv_rec.ae_line_type <> 'NONE') THEN
2415:
2416: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
2417: p_msg_name => 'OKL_GEN_RULE_NOT_ALLOWED');
2412: IF (p_atlv_rec.ae_line_type IS NOT NULL) AND
2413: (p_atlv_rec.ae_line_type <> OKL_API.G_MISS_CHAR) AND
2414: (p_atlv_rec.ae_line_type <> 'NONE') THEN
2415:
2416: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
2417: p_msg_name => 'OKL_GEN_RULE_NOT_ALLOWED');
2418: RAISE OKL_API.G_EXCEPTION_ERROR;
2419:
2420: END IF;
2414: (p_atlv_rec.ae_line_type <> 'NONE') THEN
2415:
2416: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
2417: p_msg_name => 'OKL_GEN_RULE_NOT_ALLOWED');
2418: RAISE OKL_API.G_EXCEPTION_ERROR;
2419:
2420: END IF;
2421:
2422: END IF;
2450: END;
2451: END IF;
2452: -- End of wraper code generated automatically by Debug code generator for OKL_TMPT_SET_PUB.create_tmpt_lines
2453:
2454: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2455:
2456: EXCEPTION
2457:
2458: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2454: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2455:
2456: EXCEPTION
2457:
2458: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2459: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2460: (
2461: l_api_name,
2462: G_PKG_NAME,
2455:
2456: EXCEPTION
2457:
2458: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2459: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2460: (
2461: l_api_name,
2462: G_PKG_NAME,
2463: 'OKL_API.G_RET_STS_ERROR',
2459: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2460: (
2461: l_api_name,
2462: G_PKG_NAME,
2463: 'OKL_API.G_RET_STS_ERROR',
2464: x_msg_count,
2465: x_msg_data,
2466: '_PVT'
2467: );
2464: x_msg_count,
2465: x_msg_data,
2466: '_PVT'
2467: );
2468: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2469: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2470: (
2471: l_api_name,
2472: G_PKG_NAME,
2465: x_msg_data,
2466: '_PVT'
2467: );
2468: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2469: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2470: (
2471: l_api_name,
2472: G_PKG_NAME,
2473: 'OKL_API.G_RET_STS_UNEXP_ERROR',
2469: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2470: (
2471: l_api_name,
2472: G_PKG_NAME,
2473: 'OKL_API.G_RET_STS_UNEXP_ERROR',
2474: x_msg_count,
2475: x_msg_data,
2476: '_PVT'
2477: );
2475: x_msg_data,
2476: '_PVT'
2477: );
2478: WHEN OTHERS THEN
2479: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2480: (
2481: l_api_name,
2482: G_PKG_NAME,
2483: 'OTHERS',
2582:
2583:
2584: IF (l_template_status = 'P') THEN -- Past Record, nothing can be modified
2585:
2586: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
2587: p_msg_name => 'OKL_PAST_REC_NOT_MODIFIED');
2588: RAISE OKL_API.G_EXCEPTION_ERROR;
2589:
2590: END IF;
2584: IF (l_template_status = 'P') THEN -- Past Record, nothing can be modified
2585:
2586: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
2587: p_msg_name => 'OKL_PAST_REC_NOT_MODIFIED');
2588: RAISE OKL_API.G_EXCEPTION_ERROR;
2589:
2590: END IF;
2591:
2592:
2651: CREATE_LINE_NEW_VERSION(p_atlv_tbl => p_atlv_tbl,
2652: x_return_status => l_return_status);
2653:
2654:
2655: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
2656:
2657: -- Update the Current Template making its END_DATE to today's Date
2658:
2659: l_avlv_rec.END_DATE := SYSDATE;
2707: l_atlv_rec ATLV_REC_TYPE;
2708:
2709: BEGIN
2710:
2711: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
2712: G_PKG_NAME,
2713: p_init_msg_list,
2714: l_api_version,
2715: p_api_version,
2714: l_api_version,
2715: p_api_version,
2716: '_PVT',
2717: x_return_status);
2718: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2719: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2720: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2721: RAISE OKL_API.G_EXCEPTION_ERROR;
2722: END IF;
2715: p_api_version,
2716: '_PVT',
2717: x_return_status);
2718: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2719: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2720: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2721: RAISE OKL_API.G_EXCEPTION_ERROR;
2722: END IF;
2723:
2716: '_PVT',
2717: x_return_status);
2718: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2719: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2720: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2721: RAISE OKL_API.G_EXCEPTION_ERROR;
2722: END IF;
2723:
2724: -- If CCID is NULL and Account_Builder_YN is N then raise Error
2717: x_return_status);
2718: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2719: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2720: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2721: RAISE OKL_API.G_EXCEPTION_ERROR;
2722: END IF;
2723:
2724: -- If CCID is NULL and Account_Builder_YN is N then raise Error
2725:
2727: (p_atlv_rec.CODE_COMBINATION_ID = OKC_API.G_MISS_NUM))
2728: AND
2729: (p_atlv_rec.ACCOUNT_BUILDER_YN = 'N')
2730: THEN
2731: OKL_API.SET_MESSAGE(p_app_name => OKL_API.G_APP_NAME,
2732: p_msg_name => 'OKL_CCID_OR_BUILDER_REQD');
2733: x_return_status := OKC_API.G_RET_STS_ERROR;
2734: RAISE OKL_API.G_EXCEPTION_ERROR;
2735:
2730: THEN
2731: OKL_API.SET_MESSAGE(p_app_name => OKL_API.G_APP_NAME,
2732: p_msg_name => 'OKL_CCID_OR_BUILDER_REQD');
2733: x_return_status := OKC_API.G_RET_STS_ERROR;
2734: RAISE OKL_API.G_EXCEPTION_ERROR;
2735:
2736: END IF;
2737:
2738:
2747: (p_atlv_rec.CODE_COMBINATION_ID <> OKC_API.G_MISS_NUM))
2748: AND
2749: (p_atlv_rec.ACCOUNT_BUILDER_YN = 'Y' )
2750: THEN
2751: OKL_API.SET_MESSAGE(p_app_name => OKL_API.G_APP_NAME,
2752: p_msg_name => 'OKL_GIVE_CCID_OR_BUILDER');
2753: x_return_status := OKC_API.G_RET_STS_ERROR;
2754: RAISE OKL_API.G_EXCEPTION_ERROR;
2755:
2750: THEN
2751: OKL_API.SET_MESSAGE(p_app_name => OKL_API.G_APP_NAME,
2752: p_msg_name => 'OKL_GIVE_CCID_OR_BUILDER');
2753: x_return_status := OKC_API.G_RET_STS_ERROR;
2754: RAISE OKL_API.G_EXCEPTION_ERROR;
2755:
2756: END IF;
2757:
2758: */
2760:
2761: IF (p_atlv_rec.account_builder_yn = 'Y') THEN
2762:
2763: IF (p_atlv_rec.ae_line_type IS NULL) OR
2764: (p_atlv_rec.ae_line_type = OKL_API.G_MISS_CHAR) OR
2765: (p_atlv_rec.ae_line_type = 'NONE') THEN
2766:
2767: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
2768: p_msg_name => 'OKL_GEN_RULE_REQUIRED');
2763: IF (p_atlv_rec.ae_line_type IS NULL) OR
2764: (p_atlv_rec.ae_line_type = OKL_API.G_MISS_CHAR) OR
2765: (p_atlv_rec.ae_line_type = 'NONE') THEN
2766:
2767: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
2768: p_msg_name => 'OKL_GEN_RULE_REQUIRED');
2769: RAISE OKL_API.G_EXCEPTION_ERROR;
2770: END IF;
2771:
2765: (p_atlv_rec.ae_line_type = 'NONE') THEN
2766:
2767: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
2768: p_msg_name => 'OKL_GEN_RULE_REQUIRED');
2769: RAISE OKL_API.G_EXCEPTION_ERROR;
2770: END IF;
2771:
2772: ELSE
2773:
2771:
2772: ELSE
2773:
2774: IF (p_atlv_rec.ae_line_type IS NOT NULL) AND
2775: (p_atlv_rec.ae_line_type <> OKL_API.G_MISS_CHAR) AND
2776: (p_atlv_rec.ae_line_type <> 'NONE') THEN
2777:
2778: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
2779: p_msg_name => 'OKL_GEN_RULE_NOT_ALLOWED');
2774: IF (p_atlv_rec.ae_line_type IS NOT NULL) AND
2775: (p_atlv_rec.ae_line_type <> OKL_API.G_MISS_CHAR) AND
2776: (p_atlv_rec.ae_line_type <> 'NONE') THEN
2777:
2778: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
2779: p_msg_name => 'OKL_GEN_RULE_NOT_ALLOWED');
2780: RAISE OKL_API.G_EXCEPTION_ERROR;
2781: END IF;
2782:
2776: (p_atlv_rec.ae_line_type <> 'NONE') THEN
2777:
2778: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
2779: p_msg_name => 'OKL_GEN_RULE_NOT_ALLOWED');
2780: RAISE OKL_API.G_EXCEPTION_ERROR;
2781: END IF;
2782:
2783: END IF;
2784:
2812: END IF;
2813: -- End of wraper code generated automatically by Debug code generator for OKL_TMPT_SET_PUB.update_tmpt_lines
2814:
2815:
2816: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2817:
2818: EXCEPTION
2819:
2820: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2816: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2817:
2818: EXCEPTION
2819:
2820: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2821: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2822: (
2823: l_api_name,
2824: G_PKG_NAME,
2817:
2818: EXCEPTION
2819:
2820: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2821: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2822: (
2823: l_api_name,
2824: G_PKG_NAME,
2825: 'OKL_API.G_RET_STS_ERROR',
2821: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2822: (
2823: l_api_name,
2824: G_PKG_NAME,
2825: 'OKL_API.G_RET_STS_ERROR',
2826: x_msg_count,
2827: x_msg_data,
2828: '_PVT'
2829: );
2826: x_msg_count,
2827: x_msg_data,
2828: '_PVT'
2829: );
2830: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2831: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2832: (
2833: l_api_name,
2834: G_PKG_NAME,
2827: x_msg_data,
2828: '_PVT'
2829: );
2830: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2831: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2832: (
2833: l_api_name,
2834: G_PKG_NAME,
2835: 'OKL_API.G_RET_STS_UNEXP_ERROR',
2831: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2832: (
2833: l_api_name,
2834: G_PKG_NAME,
2835: 'OKL_API.G_RET_STS_UNEXP_ERROR',
2836: x_msg_count,
2837: x_msg_data,
2838: '_PVT'
2839: );
2837: x_msg_data,
2838: '_PVT'
2839: );
2840: WHEN OTHERS THEN
2841: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2842: (
2843: l_api_name,
2844: G_PKG_NAME,
2845: 'OTHERS',
2961: l_api_version NUMBER := 1.0;
2962:
2963: i NUMBER := 0;
2964:
2965: l_overall_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2966: l_ATS okl_sys_acct_opts.ACCOUNT_DERIVATION%TYPE ;
2967:
2968: l_avlv_rec_in AVLV_REC_TYPE;
2969: l_avlv_rec_out AVLV_REC_TYPE;
3048:
3049:
3050: BEGIN
3051:
3052: x_return_status := OKL_API.G_RET_STS_SUCCESS;
3053:
3054:
3055: FOR amb_rec IN amb_csr
3056: LOOP
3126: END IF;
3127: -- End of wraper code generated automatically by Debug code generator for OKL_TMPT_SET_PUB.create_template
3128:
3129:
3130: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) and (l_ATS='ATS') THEN
3131:
3132: -- Initialize the Variables
3133:
3134: i := 0;
3194:
3195: END IF;
3196:
3197:
3198: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3199:
3200: IF (l_overall_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3201:
3202: l_overall_status := l_return_status;
3196:
3197:
3198: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
3199:
3200: IF (l_overall_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3201:
3202: l_overall_status := l_return_status;
3203:
3204: END IF;
3213:
3214: EXCEPTION
3215:
3216: WHEN G_EXCEPTION_ERROR THEN
3217: x_return_status := OKL_API.G_RET_STS_ERROR;
3218: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
3219: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3220: WHEN OTHERS THEN
3221: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3215:
3216: WHEN G_EXCEPTION_ERROR THEN
3217: x_return_status := OKL_API.G_RET_STS_ERROR;
3218: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
3219: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3220: WHEN OTHERS THEN
3221: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3222:
3223:
3217: x_return_status := OKL_API.G_RET_STS_ERROR;
3218: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
3219: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3220: WHEN OTHERS THEN
3221: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3222:
3223:
3224: END COPY_TMPL_SET;
3225:
3273:
3274:
3275: i NUMBER := 0;
3276: l_api_version NUMBER := 1.0;
3277: l_init_msg_list VARCHAR2(1) := OKL_API.G_FALSE;
3278: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
3279: l_msg_count NUMBER := 0;
3280: l_msg_data VARCHAR2(2000);
3281:
3274:
3275: i NUMBER := 0;
3276: l_api_version NUMBER := 1.0;
3277: l_init_msg_list VARCHAR2(1) := OKL_API.G_FALSE;
3278: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
3279: l_msg_count NUMBER := 0;
3280: l_msg_data VARCHAR2(2000);
3281:
3282:
3300:
3301:
3302: -- IF template creation is successful then create template lines
3303:
3304: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
3305:
3306: i := 0;
3307:
3308: FOR atl_rec IN atl_csr
3369: x_return_status := l_return_status;
3370:
3371: EXCEPTION
3372: WHEN OTHERS THEN
3373: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3374:
3375:
3376: END COPY_TEMPLATE;
3377: -- end,mvasudev -- 02/13/2002
3379: --kmotepal added as a part of user defined streams bug 3944429
3380: PROCEDURE validate_gts_id (p_gts_id IN NUMBER
3381: ,x_return_status OUT NOCOPY VARCHAR2)
3382: IS
3383: l_dummy VARCHAR2(1) := Okl_Api.G_FALSE;
3384: l_token_2 VARCHAR2(1999);
3385:
3386: CURSOR gts_csr(l_gts_id NUMBER) IS
3387: SELECT '1'
3389: WHERE OKL_ST_GEN_TMPT_SETS.ID = l_gts_id;
3390:
3391: BEGIN
3392:
3393: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
3394:
3395: l_token_2 := Okl_Accounting_Util.get_message_token(p_region_code => 'OKL_LP_TEMPLATE_SETS',
3396: p_attribute_code =>'OKL_STREAM_TEMPLATE');
3397:
3394:
3395: l_token_2 := Okl_Accounting_Util.get_message_token(p_region_code => 'OKL_LP_TEMPLATE_SETS',
3396: p_attribute_code =>'OKL_STREAM_TEMPLATE');
3397:
3398: IF (p_gts_id IS NULL) OR (p_gts_id = Okl_Api.G_MISS_NUM) THEN
3399: Okl_Api.SET_MESSAGE(p_app_name => g_app_name
3400: ,p_msg_name => g_required_value
3401: ,p_token1 => g_col_name_token
3402: ,p_token1_value => l_token_2);
3395: l_token_2 := Okl_Accounting_Util.get_message_token(p_region_code => 'OKL_LP_TEMPLATE_SETS',
3396: p_attribute_code =>'OKL_STREAM_TEMPLATE');
3397:
3398: IF (p_gts_id IS NULL) OR (p_gts_id = Okl_Api.G_MISS_NUM) THEN
3399: Okl_Api.SET_MESSAGE(p_app_name => g_app_name
3400: ,p_msg_name => g_required_value
3401: ,p_token1 => g_col_name_token
3402: ,p_token1_value => l_token_2);
3403: x_return_status := Okl_Api.G_RET_STS_ERROR;
3399: Okl_Api.SET_MESSAGE(p_app_name => g_app_name
3400: ,p_msg_name => g_required_value
3401: ,p_token1 => g_col_name_token
3402: ,p_token1_value => l_token_2);
3403: x_return_status := Okl_Api.G_RET_STS_ERROR;
3404: RAISE OKL_API.G_EXCEPTION_ERROR;
3405: END IF;
3406:
3407: IF (p_gts_id IS NOT NULL) AND (p_gts_id <> Okl_Api.G_MISS_NUM) THEN
3400: ,p_msg_name => g_required_value
3401: ,p_token1 => g_col_name_token
3402: ,p_token1_value => l_token_2);
3403: x_return_status := Okl_Api.G_RET_STS_ERROR;
3404: RAISE OKL_API.G_EXCEPTION_ERROR;
3405: END IF;
3406:
3407: IF (p_gts_id IS NOT NULL) AND (p_gts_id <> Okl_Api.G_MISS_NUM) THEN
3408:
3403: x_return_status := Okl_Api.G_RET_STS_ERROR;
3404: RAISE OKL_API.G_EXCEPTION_ERROR;
3405: END IF;
3406:
3407: IF (p_gts_id IS NOT NULL) AND (p_gts_id <> Okl_Api.G_MISS_NUM) THEN
3408:
3409: OPEN gts_csr(p_gts_id);
3410: FETCH gts_csr INTO l_dummy;
3411: IF (gts_csr%NOTFOUND) THEN
3408:
3409: OPEN gts_csr(p_gts_id);
3410: FETCH gts_csr INTO l_dummy;
3411: IF (gts_csr%NOTFOUND) THEN
3412: Okl_Api.SET_MESSAGE(p_app_name => g_app_name
3413: ,p_msg_name => g_invalid_value
3414: ,p_token1 => g_col_name_token
3415: ,p_token1_value => l_token_2);
3416: x_return_status := Okl_Api.G_RET_STS_ERROR;
3412: Okl_Api.SET_MESSAGE(p_app_name => g_app_name
3413: ,p_msg_name => g_invalid_value
3414: ,p_token1 => g_col_name_token
3415: ,p_token1_value => l_token_2);
3416: x_return_status := Okl_Api.G_RET_STS_ERROR;
3417: RAISE OKL_API.G_EXCEPTION_ERROR;
3418: CLOSE gts_csr;
3419: END IF;
3420: CLOSE gts_csr;
3413: ,p_msg_name => g_invalid_value
3414: ,p_token1 => g_col_name_token
3415: ,p_token1_value => l_token_2);
3416: x_return_status := Okl_Api.G_RET_STS_ERROR;
3417: RAISE OKL_API.G_EXCEPTION_ERROR;
3418: CLOSE gts_csr;
3419: END IF;
3420: CLOSE gts_csr;
3421: END IF;
3420: CLOSE gts_csr;
3421: END IF;
3422:
3423: EXCEPTION
3424: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3425: x_return_status := Okl_Api.G_RET_STS_ERROR;
3426:
3427: WHEN OTHERS THEN
3428: -- store SQL error message on message stack for caller
3421: END IF;
3422:
3423: EXCEPTION
3424: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3425: x_return_status := Okl_Api.G_RET_STS_ERROR;
3426:
3427: WHEN OTHERS THEN
3428: -- store SQL error message on message stack for caller
3429: Okl_Api.SET_MESSAGE(p_app_name => g_app_name,
3425: x_return_status := Okl_Api.G_RET_STS_ERROR;
3426:
3427: WHEN OTHERS THEN
3428: -- store SQL error message on message stack for caller
3429: Okl_Api.SET_MESSAGE(p_app_name => g_app_name,
3430: p_msg_name => g_unexpected_error,
3431: p_token1 => g_sqlcode_token,
3432: p_token1_value => SQLCODE,
3433: p_token2 => g_sqlerrm_token,
3433: p_token2 => g_sqlerrm_token,
3434: p_token2_value => SQLERRM);
3435:
3436: -- notify caller of an UNEXPECTED error
3437: x_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
3438:
3439: END validate_gts_id;
3440:
3441: