DBA Data[Home] [Help]

APPS.OKC_TIME_RES_PVT dependencies on OKC_API

Line 29: l_token_value varchar2(10) := OKC_API.G_MISS_CHAR;

25:
26: l_row_not_found BOOLEAN := TRUE;
27: l_chr_rec chr_csr%ROWTYPE;
28: l_cle_rec cle_csr%ROWTYPE;
29: l_token_value varchar2(10) := OKC_API.G_MISS_CHAR;
30: BEGIN
31:
32: /* Get the effectivity of the contract header or lines */
33:

Line 36: x_return_status := OKC_API.G_RET_STS_SUCCESS;

32: /* Get the effectivity of the contract header or lines */
33:
34: x_start_date := NULL;
35: x_end_date := NULL;
36: x_return_status := OKC_API.G_RET_STS_SUCCESS;
37: IF p_cle_id is NOT NULL and
38: p_cle_id <> OKC_API.G_MISS_NUM Then
39: l_token_value := 'CLE_ID';
40: OPEN cle_csr(p_cle_id);

Line 38: p_cle_id <> OKC_API.G_MISS_NUM Then

34: x_start_date := NULL;
35: x_end_date := NULL;
36: x_return_status := OKC_API.G_RET_STS_SUCCESS;
37: IF p_cle_id is NOT NULL and
38: p_cle_id <> OKC_API.G_MISS_NUM Then
39: l_token_value := 'CLE_ID';
40: OPEN cle_csr(p_cle_id);
41: FETCH cle_csr into l_cle_rec;
42: l_row_not_found := cle_csr%NOTFOUND;

Line 45: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'CLE_ID');

41: FETCH cle_csr into l_cle_rec;
42: l_row_not_found := cle_csr%NOTFOUND;
43: CLOSE cle_csr;
44: IF (l_row_not_found) THEN
45: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'CLE_ID');
46: x_return_status := OKC_API.G_RET_STS_ERROR;
47: return;
48: ELSE
49: x_start_date := l_cle_rec.start_date;

Line 46: x_return_status := OKC_API.G_RET_STS_ERROR;

42: l_row_not_found := cle_csr%NOTFOUND;
43: CLOSE cle_csr;
44: IF (l_row_not_found) THEN
45: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'CLE_ID');
46: x_return_status := OKC_API.G_RET_STS_ERROR;
47: return;
48: ELSE
49: x_start_date := l_cle_rec.start_date;
50: x_end_date := l_cle_rec.end_date;

Line 53: p_chr_id <> OKC_API.G_MISS_NUM THEN

49: x_start_date := l_cle_rec.start_date;
50: x_end_date := l_cle_rec.end_date;
51: END IF;
52: ELSIF p_chr_id is NOT NULL and
53: p_chr_id <> OKC_API.G_MISS_NUM THEN
54: l_token_value := 'CHR_ID';
55: OPEN chr_csr(p_chr_id);
56: FETCH chr_csr into l_chr_rec;
57: l_row_not_found := chr_csr%NOTFOUND;

Line 60: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'CHR_ID');

56: FETCH chr_csr into l_chr_rec;
57: l_row_not_found := chr_csr%NOTFOUND;
58: CLOSE chr_csr;
59: IF (l_row_not_found) THEN
60: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'CHR_ID');
61: x_return_status := OKC_API.G_RET_STS_ERROR;
62: return;
63: ELSE
64: x_start_date := l_chr_rec.start_date;

Line 61: x_return_status := OKC_API.G_RET_STS_ERROR;

57: l_row_not_found := chr_csr%NOTFOUND;
58: CLOSE chr_csr;
59: IF (l_row_not_found) THEN
60: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'CHR_ID');
61: x_return_status := OKC_API.G_RET_STS_ERROR;
62: return;
63: ELSE
64: x_start_date := l_chr_rec.start_date;
65: x_end_date := l_chr_rec.end_date;

Line 78: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

74: end if;
75:
76: EXCEPTION
77: WHEN OTHERS THEN
78: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
79: p_msg_name => g_unexpected_error,
80: p_token1 => g_sqlcode_token,
81: p_token1_value => sqlcode,
82: p_token2 => g_col_name_token,

Line 87: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

83: p_token2_value => l_token_value,
84: p_token3 => g_sqlerrm_token,
85: p_token3_value => sqlerrm);
86: -- notify caller of an UNEXPECTED error
87: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
88: END Get_K_Effectivity;
89:
90: PROCEDURE Get_Timezone(
91: p_tze_id IN NUMBER,

Line 105: x_return_status := OKC_API.G_RET_STS_SUCCESS;

101: BEGIN
102:
103: -- Get the timezone name from the timezone id which is also required for the JTF_TASKS API
104:
105: x_return_status := OKC_API.G_RET_STS_SUCCESS;
106: OPEN okc_timezone_csr;
107: FETCH okc_timezone_csr INTO l_okc_timezone_rec;
108: l_row_notfound := okc_timezone_csr%NOTFOUND;
109: CLOSE okc_timezone_csr;

Line 111: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TZE_ID');

107: FETCH okc_timezone_csr INTO l_okc_timezone_rec;
108: l_row_notfound := okc_timezone_csr%NOTFOUND;
109: CLOSE okc_timezone_csr;
110: IF (l_row_notfound) THEN
111: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TZE_ID');
112: RAISE item_not_found_error;
113: END IF;
114: x_tze_name := l_okc_timezone_rec.global_timezone_name;
115: EXCEPTION

Line 117: x_return_status := OKC_API.G_RET_STS_ERROR;

113: END IF;
114: x_tze_name := l_okc_timezone_rec.global_timezone_name;
115: EXCEPTION
116: WHEN item_not_found_error THEN
117: x_return_status := OKC_API.G_RET_STS_ERROR;
118: WHEN OTHERS THEN
119: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
120: p_msg_name => g_unexpected_error,
121: p_token1 => g_sqlcode_token,

Line 119: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

115: EXCEPTION
116: WHEN item_not_found_error THEN
117: x_return_status := OKC_API.G_RET_STS_ERROR;
118: WHEN OTHERS THEN
119: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
120: p_msg_name => g_unexpected_error,
121: p_token1 => g_sqlcode_token,
122: p_token1_value => sqlcode,
123: p_token2 => g_col_name_token,

Line 128: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

124: p_token2_value => 'TZE_ID',
125: p_token3 => g_sqlerrm_token,
126: p_token3_value => sqlerrm);
127: -- notify caller of an UNEXPECTED error
128: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
129: End Get_Timezone;
130:
131: PROCEDURE Create_RTV_N_Tasks(
132: x_return_status OUT NOCOPY VARCHAR2,

Line 151: x_return_status := OKC_API.START_ACTIVITY(l_api_name,

147: x_msg_data VARCHAR2(2000);
148: l_rtvv_rec OKC_TIME_PUB.rtvv_rec_type;
149: x_rtvv_rec OKC_TIME_PUB.rtvv_rec_type;
150: BEGIN
151: x_return_status := OKC_API.START_ACTIVITY(l_api_name,
152: p_init_msg_list,
153: '_COMPLEX',
154: x_return_status);
155: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 155: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

151: x_return_status := OKC_API.START_ACTIVITY(l_api_name,
152: p_init_msg_list,
153: '_COMPLEX',
154: x_return_status);
155: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
156: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
157: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
158: raise OKC_API.G_EXCEPTION_ERROR;
159: END IF;

Line 156: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

152: p_init_msg_list,
153: '_COMPLEX',
154: x_return_status);
155: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
156: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
157: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
158: raise OKC_API.G_EXCEPTION_ERROR;
159: END IF;
160:

Line 157: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

153: '_COMPLEX',
154: x_return_status);
155: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
156: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
157: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
158: raise OKC_API.G_EXCEPTION_ERROR;
159: END IF;
160:
161: -- Cutoff Date is the date which will actually be the start date for the time resolving window

Line 158: raise OKC_API.G_EXCEPTION_ERROR;

154: x_return_status);
155: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
156: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
157: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
158: raise OKC_API.G_EXCEPTION_ERROR;
159: END IF;
160:
161: -- Cutoff Date is the date which will actually be the start date for the time resolving window
162:

Line 163: x_return_status := OKC_API.G_RET_STS_SUCCESS;

159: END IF;
160:
161: -- Cutoff Date is the date which will actually be the start date for the time resolving window
162:
163: x_return_status := OKC_API.G_RET_STS_SUCCESS;
164: if p_cutoff_date is NOT NULL Then
165: if p_date < p_cutoff_date then
166: return;
167: end if;

Line 182: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

178: x_msg_data,
179: l_rtvv_rec,
180: x_rtvv_rec );
181:
182: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
183: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
184: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
185: raise OKC_API.G_EXCEPTION_ERROR;
186: END IF;

Line 183: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

179: l_rtvv_rec,
180: x_rtvv_rec );
181:
182: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
183: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
184: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
185: raise OKC_API.G_EXCEPTION_ERROR;
186: END IF;
187:

Line 184: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN

180: x_rtvv_rec );
181:
182: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
183: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
184: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
185: raise OKC_API.G_EXCEPTION_ERROR;
186: END IF;
187:
188: /* if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

Line 185: raise OKC_API.G_EXCEPTION_ERROR;

181:
182: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
183: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
184: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
185: raise OKC_API.G_EXCEPTION_ERROR;
186: END IF;
187:
188: /* if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
189: return;

Line 188: /* if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

184: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
185: raise OKC_API.G_EXCEPTION_ERROR;
186: END IF;
187:
188: /* if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
189: return;
190: end if;*/
191:
192: -- Creating Tasks

Line 207: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

203: x_msg_count,
204: x_msg_data,
205: x_task_id);
206:
207: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
208: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
209: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
210: raise OKC_API.G_EXCEPTION_ERROR;
211: END IF;

Line 208: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

204: x_msg_data,
205: x_task_id);
206:
207: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
208: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
209: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
210: raise OKC_API.G_EXCEPTION_ERROR;
211: END IF;
212:

Line 209: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN

205: x_task_id);
206:
207: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
208: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
209: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
210: raise OKC_API.G_EXCEPTION_ERROR;
211: END IF;
212:
213: OKC_API.END_ACTIVITY(l_msg_count, l_msg_data);

Line 210: raise OKC_API.G_EXCEPTION_ERROR;

206:
207: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
208: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
209: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
210: raise OKC_API.G_EXCEPTION_ERROR;
211: END IF;
212:
213: OKC_API.END_ACTIVITY(l_msg_count, l_msg_data);
214:

Line 213: OKC_API.END_ACTIVITY(l_msg_count, l_msg_data);

209: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
210: raise OKC_API.G_EXCEPTION_ERROR;
211: END IF;
212:
213: OKC_API.END_ACTIVITY(l_msg_count, l_msg_data);
214:
215: EXCEPTION
216: WHEN OKC_API.G_EXCEPTION_ERROR THEN
217: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 216: WHEN OKC_API.G_EXCEPTION_ERROR THEN

212:
213: OKC_API.END_ACTIVITY(l_msg_count, l_msg_data);
214:
215: EXCEPTION
216: WHEN OKC_API.G_EXCEPTION_ERROR THEN
217: x_return_status := OKC_API.HANDLE_EXCEPTIONS
218: (l_api_name,
219: G_PKG_NAME,
220: 'OKC_API.G_RET_STS_ERROR',

Line 217: x_return_status := OKC_API.HANDLE_EXCEPTIONS

213: OKC_API.END_ACTIVITY(l_msg_count, l_msg_data);
214:
215: EXCEPTION
216: WHEN OKC_API.G_EXCEPTION_ERROR THEN
217: x_return_status := OKC_API.HANDLE_EXCEPTIONS
218: (l_api_name,
219: G_PKG_NAME,
220: 'OKC_API.G_RET_STS_ERROR',
221: x_msg_count,

Line 220: 'OKC_API.G_RET_STS_ERROR',

216: WHEN OKC_API.G_EXCEPTION_ERROR THEN
217: x_return_status := OKC_API.HANDLE_EXCEPTIONS
218: (l_api_name,
219: G_PKG_NAME,
220: 'OKC_API.G_RET_STS_ERROR',
221: x_msg_count,
222: x_msg_data,
223: '_COMPLEX');
224: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 224: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

220: 'OKC_API.G_RET_STS_ERROR',
221: x_msg_count,
222: x_msg_data,
223: '_COMPLEX');
224: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
225: x_return_status := OKC_API.HANDLE_EXCEPTIONS
226: (l_api_name,
227: G_PKG_NAME,
228: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 225: x_return_status := OKC_API.HANDLE_EXCEPTIONS

221: x_msg_count,
222: x_msg_data,
223: '_COMPLEX');
224: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
225: x_return_status := OKC_API.HANDLE_EXCEPTIONS
226: (l_api_name,
227: G_PKG_NAME,
228: 'OKC_API.G_RET_STS_UNEXP_ERROR',
229: x_msg_count,

Line 228: 'OKC_API.G_RET_STS_UNEXP_ERROR',

224: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
225: x_return_status := OKC_API.HANDLE_EXCEPTIONS
226: (l_api_name,
227: G_PKG_NAME,
228: 'OKC_API.G_RET_STS_UNEXP_ERROR',
229: x_msg_count,
230: x_msg_data,
231: '_COMPLEX');
232: WHEN OTHERS THEN

Line 233: x_return_status := OKC_API.HANDLE_EXCEPTIONS

229: x_msg_count,
230: x_msg_data,
231: '_COMPLEX');
232: WHEN OTHERS THEN
233: x_return_status := OKC_API.HANDLE_EXCEPTIONS
234: (l_api_name,
235: G_PKG_NAME,
236: 'OTHERS',
237: x_msg_count,

Line 258: l_daynum_of_week number := OKC_API.G_MISS_NUM;

254: p_daynum_of_week IN NUMBER,
255: p_hour IN NUMBER,
256: p_minute IN NUMBER,
257: p_second IN NUMBER) IS
258: l_daynum_of_week number := OKC_API.G_MISS_NUM;
259: l_daynum_offset number := OKC_API.G_MISS_NUM;
260: l_date date := OKC_API.G_MISS_DATE;
261: l_start_day_of_month date := OKC_API.G_MISS_DATE;
262: l_nth NUMBER := p_nth;

Line 259: l_daynum_offset number := OKC_API.G_MISS_NUM;

255: p_hour IN NUMBER,
256: p_minute IN NUMBER,
257: p_second IN NUMBER) IS
258: l_daynum_of_week number := OKC_API.G_MISS_NUM;
259: l_daynum_offset number := OKC_API.G_MISS_NUM;
260: l_date date := OKC_API.G_MISS_DATE;
261: l_start_day_of_month date := OKC_API.G_MISS_DATE;
262: l_nth NUMBER := p_nth;
263: x_msg_count NUMBER;

Line 260: l_date date := OKC_API.G_MISS_DATE;

256: p_minute IN NUMBER,
257: p_second IN NUMBER) IS
258: l_daynum_of_week number := OKC_API.G_MISS_NUM;
259: l_daynum_offset number := OKC_API.G_MISS_NUM;
260: l_date date := OKC_API.G_MISS_DATE;
261: l_start_day_of_month date := OKC_API.G_MISS_DATE;
262: l_nth NUMBER := p_nth;
263: x_msg_count NUMBER;
264: x_task_id NUMBER;

Line 261: l_start_day_of_month date := OKC_API.G_MISS_DATE;

257: p_second IN NUMBER) IS
258: l_daynum_of_week number := OKC_API.G_MISS_NUM;
259: l_daynum_offset number := OKC_API.G_MISS_NUM;
260: l_date date := OKC_API.G_MISS_DATE;
261: l_start_day_of_month date := OKC_API.G_MISS_DATE;
262: l_nth NUMBER := p_nth;
263: x_msg_count NUMBER;
264: x_task_id NUMBER;
265: x_msg_data VARCHAR2(2000);

Line 272: x_return_status := OKC_API.G_RET_STS_SUCCESS;

268: /* resolving day of the week to an actual date
269: e.g. 5th Monday between 1st Jan 2000 and 30th june 2000 will be 31st Jan 2000 and 29 th May 2000
270: */
271:
272: x_return_status := OKC_API.G_RET_STS_SUCCESS;
273: if l_nth = 0 or l_nth is NULL then
274: l_daynum_of_week := to_char(p_start_date,'D');
275: l_daynum_offset := p_daynum_of_week - l_daynum_of_week ;
276: if l_daynum_offset < 0 then

Line 284: x_return_status := OKC_API.G_RET_STS_SUCCESS;

280: lpad(p_hour,2,'0') ||
281: lpad(p_minute,2,'0') ||
282: lpad(p_second,2,'0'), 'mmddyyyyhh24miss');
283: if l_date > p_end_date then
284: x_return_status := OKC_API.G_RET_STS_SUCCESS;
285: return;
286: end if;
287: while (l_date <= p_end_date) loop
288: Create_RTV_N_Tasks(

Line 298: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

294: p_cutoff_date,
295: NULL,
296: p_tze_id,
297: p_tze_name);
298: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
299: exit;
300: end if;
301: l_date := l_date + 7;
302: end loop;

Line 336: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

332: p_cutoff_date,
333: NULL,
334: p_tze_id,
335: p_tze_name);
336: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
337: exit;
338: end if;
339: end if;
340: l_start_day_of_month := add_months(l_start_day_of_month,1);

Line 386: x_return_status := OKC_API.G_RET_STS_SUCCESS;

382: Resolve timevalues related to an event e.g 10 days after Contract Signing. Will be triggered only when the
383: event occurs
384: */
385:
386: x_return_status := OKC_API.G_RET_STS_SUCCESS;
387: l_date := NULL;
388: OPEN okc_tgn_csr(p_cnh_id);
389: LOOP
390: FETCH okc_tgn_csr INTO l_okc_tgn_rec;

Line 406: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'END_DATE');

402: l_date,
403: l_okc_tal_rec.uom_code,
404: l_okc_tal_rec.duration);
405: if l_end_date is NULL Then
406: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'END_DATE');
407: x_return_status := OKC_API.G_RET_STS_ERROR;
408: exit;
409: end if;
410: if ((l_end_date - l_date) >= 1) then

Line 407: x_return_status := OKC_API.G_RET_STS_ERROR;

403: l_okc_tal_rec.uom_code,
404: l_okc_tal_rec.duration);
405: if l_end_date is NULL Then
406: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'END_DATE');
407: x_return_status := OKC_API.G_RET_STS_ERROR;
408: exit;
409: end if;
410: if ((l_end_date - l_date) >= 1) then
411: l_date := l_end_date + 1;

Line 418: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS Then

414: end if;
415: l_tve_id := l_okc_tal_rec.id;
416: l_tze_id := l_okc_tal_rec.tze_id;
417: END LOOP;
418: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
419: exit;
420: END IF;
421: IF l_end_date is NULL THEN
422: if l_found THEN

Line 431: l_tze_id <> OKC_API.G_MISS_NUM then

427: l_tze_id := l_okc_tgn_rec.tze_id;
428: END IF;
429: END IF;
430: if l_tze_id is NOT NULL and
431: l_tze_id <> OKC_API.G_MISS_NUM then
432: Get_Timezone(l_tze_id, l_tze_name, x_return_status);
433: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
434: exit;
435: end if;

Line 433: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

429: END IF;
430: if l_tze_id is NOT NULL and
431: l_tze_id <> OKC_API.G_MISS_NUM then
432: Get_Timezone(l_tze_id, l_tze_name, x_return_status);
433: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
434: exit;
435: end if;
436: else
437: l_tze_name := NULL;

Line 449: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

445: l_cutoff_date,
446: p_coe_id,
447: l_tze_id,
448: l_tze_name);
449: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
450: exit;
451: end if;
452: << next_record>>
453: null; -- bug#2337567 -- see initialization in head of the loop

Line 457: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

453: null; -- bug#2337567 -- see initialization in head of the loop
454: END LOOP;
455: EXCEPTION
456: WHEN OTHERS THEN
457: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
458: p_msg_name => g_unexpected_error,
459: p_token1 => g_sqlcode_token,
460: p_token1_value => sqlcode,
461: p_token2 => g_col_name_token,

Line 466: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

462: p_token2_value => 'TVE_ID',
463: p_token3 => g_sqlerrm_token,
464: p_token3_value => sqlerrm);
465: -- notify caller of an UNEXPECTED error
466: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
467: END Res_Time_Events ;
468:
469: PROCEDURE Res_TPG_Delimited (
470: x_return_status OUT NOCOPY VARCHAR2,

Line 486: l_month NUMBER := OKC_API.G_MISS_NUM;

482: p_second IN NUMBER,
483: p_start_date IN date,
484: p_end_date IN date,
485: p_cutoff_date IN date) IS
486: l_month NUMBER := OKC_API.G_MISS_NUM;
487: l_start_date1 date := OKC_API.G_MISS_DATE;
488: l_end_date1 date := OKC_API.G_MISS_DATE;
489: l_start_date date := OKC_API.G_MISS_DATE;
490: l_end_date date := OKC_API.G_MISS_DATE;

Line 487: l_start_date1 date := OKC_API.G_MISS_DATE;

483: p_start_date IN date,
484: p_end_date IN date,
485: p_cutoff_date IN date) IS
486: l_month NUMBER := OKC_API.G_MISS_NUM;
487: l_start_date1 date := OKC_API.G_MISS_DATE;
488: l_end_date1 date := OKC_API.G_MISS_DATE;
489: l_start_date date := OKC_API.G_MISS_DATE;
490: l_end_date date := OKC_API.G_MISS_DATE;
491: l_date date := OKC_API.G_MISS_DATE;

Line 488: l_end_date1 date := OKC_API.G_MISS_DATE;

484: p_end_date IN date,
485: p_cutoff_date IN date) IS
486: l_month NUMBER := OKC_API.G_MISS_NUM;
487: l_start_date1 date := OKC_API.G_MISS_DATE;
488: l_end_date1 date := OKC_API.G_MISS_DATE;
489: l_start_date date := OKC_API.G_MISS_DATE;
490: l_end_date date := OKC_API.G_MISS_DATE;
491: l_date date := OKC_API.G_MISS_DATE;
492: l_daynum_of_week NUMBER;

Line 489: l_start_date date := OKC_API.G_MISS_DATE;

485: p_cutoff_date IN date) IS
486: l_month NUMBER := OKC_API.G_MISS_NUM;
487: l_start_date1 date := OKC_API.G_MISS_DATE;
488: l_end_date1 date := OKC_API.G_MISS_DATE;
489: l_start_date date := OKC_API.G_MISS_DATE;
490: l_end_date date := OKC_API.G_MISS_DATE;
491: l_date date := OKC_API.G_MISS_DATE;
492: l_daynum_of_week NUMBER;
493: x_msg_count NUMBER;

Line 490: l_end_date date := OKC_API.G_MISS_DATE;

486: l_month NUMBER := OKC_API.G_MISS_NUM;
487: l_start_date1 date := OKC_API.G_MISS_DATE;
488: l_end_date1 date := OKC_API.G_MISS_DATE;
489: l_start_date date := OKC_API.G_MISS_DATE;
490: l_end_date date := OKC_API.G_MISS_DATE;
491: l_date date := OKC_API.G_MISS_DATE;
492: l_daynum_of_week NUMBER;
493: x_msg_count NUMBER;
494: x_msg_data VARCHAR2(2000);

Line 491: l_date date := OKC_API.G_MISS_DATE;

487: l_start_date1 date := OKC_API.G_MISS_DATE;
488: l_end_date1 date := OKC_API.G_MISS_DATE;
489: l_start_date date := OKC_API.G_MISS_DATE;
490: l_end_date date := OKC_API.G_MISS_DATE;
491: l_date date := OKC_API.G_MISS_DATE;
492: l_daynum_of_week NUMBER;
493: x_msg_count NUMBER;
494: x_msg_data VARCHAR2(2000);
495: x_task_id NUMBER;

Line 504: x_return_status := OKC_API.G_RET_STS_SUCCESS;

500: Nth is the frequency i.e. 99 means last e.g. nth=99, day_of_week=1 will mean Last Sunday.
501: Also p_day=99 means the last day of the month
502: */
503:
504: x_return_status := OKC_API.G_RET_STS_SUCCESS;
505: /* Find the start and end dates if not passed and store them in l_start_date1 and l_end_date1 */
506: if (p_start_date is null or p_start_date = OKC_API.G_MISS_DATE) then
507: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');
508: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 506: if (p_start_date is null or p_start_date = OKC_API.G_MISS_DATE) then

502: */
503:
504: x_return_status := OKC_API.G_RET_STS_SUCCESS;
505: /* Find the start and end dates if not passed and store them in l_start_date1 and l_end_date1 */
506: if (p_start_date is null or p_start_date = OKC_API.G_MISS_DATE) then
507: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');
508: x_return_status := OKC_API.G_RET_STS_ERROR;
509: return;
510: elsif (p_end_date is null or p_end_date = OKC_API.G_MISS_DATE) then

Line 507: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');

503:
504: x_return_status := OKC_API.G_RET_STS_SUCCESS;
505: /* Find the start and end dates if not passed and store them in l_start_date1 and l_end_date1 */
506: if (p_start_date is null or p_start_date = OKC_API.G_MISS_DATE) then
507: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');
508: x_return_status := OKC_API.G_RET_STS_ERROR;
509: return;
510: elsif (p_end_date is null or p_end_date = OKC_API.G_MISS_DATE) then
511: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'END_DATE');

Line 508: x_return_status := OKC_API.G_RET_STS_ERROR;

504: x_return_status := OKC_API.G_RET_STS_SUCCESS;
505: /* Find the start and end dates if not passed and store them in l_start_date1 and l_end_date1 */
506: if (p_start_date is null or p_start_date = OKC_API.G_MISS_DATE) then
507: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');
508: x_return_status := OKC_API.G_RET_STS_ERROR;
509: return;
510: elsif (p_end_date is null or p_end_date = OKC_API.G_MISS_DATE) then
511: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'END_DATE');
512: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 510: elsif (p_end_date is null or p_end_date = OKC_API.G_MISS_DATE) then

506: if (p_start_date is null or p_start_date = OKC_API.G_MISS_DATE) then
507: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');
508: x_return_status := OKC_API.G_RET_STS_ERROR;
509: return;
510: elsif (p_end_date is null or p_end_date = OKC_API.G_MISS_DATE) then
511: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'END_DATE');
512: x_return_status := OKC_API.G_RET_STS_ERROR;
513: return;
514: else

Line 511: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'END_DATE');

507: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');
508: x_return_status := OKC_API.G_RET_STS_ERROR;
509: return;
510: elsif (p_end_date is null or p_end_date = OKC_API.G_MISS_DATE) then
511: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'END_DATE');
512: x_return_status := OKC_API.G_RET_STS_ERROR;
513: return;
514: else
515: if p_start_date > p_end_date then

Line 512: x_return_status := OKC_API.G_RET_STS_ERROR;

508: x_return_status := OKC_API.G_RET_STS_ERROR;
509: return;
510: elsif (p_end_date is null or p_end_date = OKC_API.G_MISS_DATE) then
511: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'END_DATE');
512: x_return_status := OKC_API.G_RET_STS_ERROR;
513: return;
514: else
515: if p_start_date > p_end_date then
516: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 516: x_return_status := OKC_API.G_RET_STS_ERROR;

512: x_return_status := OKC_API.G_RET_STS_ERROR;
513: return;
514: else
515: if p_start_date > p_end_date then
516: x_return_status := OKC_API.G_RET_STS_ERROR;
517: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');
518: return;
519: end if;
520: l_start_date1 := p_start_date;

Line 517: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');

513: return;
514: else
515: if p_start_date > p_end_date then
516: x_return_status := OKC_API.G_RET_STS_ERROR;
517: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');
518: return;
519: end if;
520: l_start_date1 := p_start_date;
521: l_end_date1 := p_end_date;

Line 523: if (p_day_of_week is NOT NULL and p_day_of_week <> OKC_API.G_MISS_CHAR) then

519: end if;
520: l_start_date1 := p_start_date;
521: l_end_date1 := p_end_date;
522: end if;
523: if (p_day_of_week is NOT NULL and p_day_of_week <> OKC_API.G_MISS_CHAR) then
524: if p_day_of_week = 'SUN' then
525: l_daynum_of_week := 1;
526: elsif p_day_of_week = 'MON' then
527: l_daynum_of_week := 2;

Line 591: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

587: p_cutoff_date,
588: NULL,
589: p_tze_id,
590: p_tze_name);
591: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
592: exit;
593: end if;
594: end if;
595: elsif p_day = 99 then

Line 610: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

606: p_cutoff_date,
607: NULL,
608: p_tze_id,
609: p_tze_name);
610: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
611: exit;
612: end if;
613: end if;
614: l_start_date := to_date('01'||lpad(p_month,2,0)||to_char(to_number(to_char(l_start_date,'yyyy'))+1),'ddmmyyyy');

Line 658: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

654: p_cutoff_date,
655: NULL,
656: p_tze_id,
657: p_tze_name);
658: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
659: exit;
660: end if;
661: end if;
662: l_date := add_months(l_date,1);

Line 682: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

678: p_cutoff_date,
679: NULL,
680: p_tze_id,
681: p_tze_name);
682: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
683: exit;
684: end if;
685: l_date := add_months(l_date,1);
686: end loop;

Line 706: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

702: p_cutoff_date,
703: NULL,
704: p_tze_id,
705: p_tze_name);
706: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
707: exit;
708: end if;
709: l_date := l_date + 1;
710: end loop;

Line 714: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

710: end loop;
711: end if;
712: EXCEPTION
713: WHEN OTHERS THEN
714: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
715: p_msg_name => g_unexpected_error,
716: p_token1 => g_sqlcode_token,
717: p_token1_value => sqlcode,
718: p_token2 => g_col_name_token,

Line 723: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

719: p_token2_value => 'TVE_ID',
720: p_token3 => g_sqlerrm_token,
721: p_token3_value => sqlerrm);
722: -- notify caller of an UNEXPECTED error
723: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
724: END Res_TPG_Delimited ;
725:
726: PROCEDURE Res_TPG_Delimited (
727: x_return_status OUT NOCOPY VARCHAR2,

Line 736: l_month NUMBER := OKC_API.G_MISS_NUM;

732: p_end_date IN date,
733: p_cutoff_date IN date) IS
734: item_not_found_error EXCEPTION;
735: l_row_notfound BOOLEAN := TRUE;
736: l_month NUMBER := OKC_API.G_MISS_NUM;
737: l_start_date1 date := OKC_API.G_MISS_DATE;
738: l_end_date1 date := OKC_API.G_MISS_DATE;
739: l_start_date date := OKC_API.G_MISS_DATE;
740: l_end_date date := OKC_API.G_MISS_DATE;

Line 737: l_start_date1 date := OKC_API.G_MISS_DATE;

733: p_cutoff_date IN date) IS
734: item_not_found_error EXCEPTION;
735: l_row_notfound BOOLEAN := TRUE;
736: l_month NUMBER := OKC_API.G_MISS_NUM;
737: l_start_date1 date := OKC_API.G_MISS_DATE;
738: l_end_date1 date := OKC_API.G_MISS_DATE;
739: l_start_date date := OKC_API.G_MISS_DATE;
740: l_end_date date := OKC_API.G_MISS_DATE;
741: l_date date := OKC_API.G_MISS_DATE;

Line 738: l_end_date1 date := OKC_API.G_MISS_DATE;

734: item_not_found_error EXCEPTION;
735: l_row_notfound BOOLEAN := TRUE;
736: l_month NUMBER := OKC_API.G_MISS_NUM;
737: l_start_date1 date := OKC_API.G_MISS_DATE;
738: l_end_date1 date := OKC_API.G_MISS_DATE;
739: l_start_date date := OKC_API.G_MISS_DATE;
740: l_end_date date := OKC_API.G_MISS_DATE;
741: l_date date := OKC_API.G_MISS_DATE;
742: x_task_id NUMBER;

Line 739: l_start_date date := OKC_API.G_MISS_DATE;

735: l_row_notfound BOOLEAN := TRUE;
736: l_month NUMBER := OKC_API.G_MISS_NUM;
737: l_start_date1 date := OKC_API.G_MISS_DATE;
738: l_end_date1 date := OKC_API.G_MISS_DATE;
739: l_start_date date := OKC_API.G_MISS_DATE;
740: l_end_date date := OKC_API.G_MISS_DATE;
741: l_date date := OKC_API.G_MISS_DATE;
742: x_task_id NUMBER;
743: l_tze_name OKX_TIMEZONES_V.global_timezone_name%TYPE;

Line 740: l_end_date date := OKC_API.G_MISS_DATE;

736: l_month NUMBER := OKC_API.G_MISS_NUM;
737: l_start_date1 date := OKC_API.G_MISS_DATE;
738: l_end_date1 date := OKC_API.G_MISS_DATE;
739: l_start_date date := OKC_API.G_MISS_DATE;
740: l_end_date date := OKC_API.G_MISS_DATE;
741: l_date date := OKC_API.G_MISS_DATE;
742: x_task_id NUMBER;
743: l_tze_name OKX_TIMEZONES_V.global_timezone_name%TYPE;
744: CURSOR okc_tgd_csr (p_tve_id IN NUMBER)

Line 741: l_date date := OKC_API.G_MISS_DATE;

737: l_start_date1 date := OKC_API.G_MISS_DATE;
738: l_end_date1 date := OKC_API.G_MISS_DATE;
739: l_start_date date := OKC_API.G_MISS_DATE;
740: l_end_date date := OKC_API.G_MISS_DATE;
741: l_date date := OKC_API.G_MISS_DATE;
742: x_task_id NUMBER;
743: l_tze_name OKX_TIMEZONES_V.global_timezone_name%TYPE;
744: CURSOR okc_tgd_csr (p_tve_id IN NUMBER)
745: IS

Line 757: x_return_status := OKC_API.G_RET_STS_SUCCESS;

753: /*
754: Resolve all generic dates e.g. Last day of every month or, 15th of every month etc.
755: */
756:
757: x_return_status := OKC_API.G_RET_STS_SUCCESS;
758: /* Find the start and end dates if not passed and store them in l_start_date1 and l_end_date1 */
759: if (p_start_date is null or p_start_date = OKC_API.G_MISS_DATE) then
760: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');
761: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 759: if (p_start_date is null or p_start_date = OKC_API.G_MISS_DATE) then

755: */
756:
757: x_return_status := OKC_API.G_RET_STS_SUCCESS;
758: /* Find the start and end dates if not passed and store them in l_start_date1 and l_end_date1 */
759: if (p_start_date is null or p_start_date = OKC_API.G_MISS_DATE) then
760: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');
761: x_return_status := OKC_API.G_RET_STS_ERROR;
762: return;
763: elsif (p_end_date is null or p_end_date = OKC_API.G_MISS_DATE) then

Line 760: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');

756:
757: x_return_status := OKC_API.G_RET_STS_SUCCESS;
758: /* Find the start and end dates if not passed and store them in l_start_date1 and l_end_date1 */
759: if (p_start_date is null or p_start_date = OKC_API.G_MISS_DATE) then
760: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');
761: x_return_status := OKC_API.G_RET_STS_ERROR;
762: return;
763: elsif (p_end_date is null or p_end_date = OKC_API.G_MISS_DATE) then
764: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'END_DATE');

Line 761: x_return_status := OKC_API.G_RET_STS_ERROR;

757: x_return_status := OKC_API.G_RET_STS_SUCCESS;
758: /* Find the start and end dates if not passed and store them in l_start_date1 and l_end_date1 */
759: if (p_start_date is null or p_start_date = OKC_API.G_MISS_DATE) then
760: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');
761: x_return_status := OKC_API.G_RET_STS_ERROR;
762: return;
763: elsif (p_end_date is null or p_end_date = OKC_API.G_MISS_DATE) then
764: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'END_DATE');
765: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 763: elsif (p_end_date is null or p_end_date = OKC_API.G_MISS_DATE) then

759: if (p_start_date is null or p_start_date = OKC_API.G_MISS_DATE) then
760: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');
761: x_return_status := OKC_API.G_RET_STS_ERROR;
762: return;
763: elsif (p_end_date is null or p_end_date = OKC_API.G_MISS_DATE) then
764: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'END_DATE');
765: x_return_status := OKC_API.G_RET_STS_ERROR;
766: return;
767: else

Line 764: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'END_DATE');

760: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');
761: x_return_status := OKC_API.G_RET_STS_ERROR;
762: return;
763: elsif (p_end_date is null or p_end_date = OKC_API.G_MISS_DATE) then
764: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'END_DATE');
765: x_return_status := OKC_API.G_RET_STS_ERROR;
766: return;
767: else
768: if p_start_date > p_end_date then

Line 765: x_return_status := OKC_API.G_RET_STS_ERROR;

761: x_return_status := OKC_API.G_RET_STS_ERROR;
762: return;
763: elsif (p_end_date is null or p_end_date = OKC_API.G_MISS_DATE) then
764: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'END_DATE');
765: x_return_status := OKC_API.G_RET_STS_ERROR;
766: return;
767: else
768: if p_start_date > p_end_date then
769: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 769: x_return_status := OKC_API.G_RET_STS_ERROR;

765: x_return_status := OKC_API.G_RET_STS_ERROR;
766: return;
767: else
768: if p_start_date > p_end_date then
769: x_return_status := OKC_API.G_RET_STS_ERROR;
770: OKC_API.set_message(G_APP_NAME, 'OKC_INVALID_END_DATE');
771: return;
772: end if;
773: l_start_date1 := p_start_date;

Line 770: OKC_API.set_message(G_APP_NAME, 'OKC_INVALID_END_DATE');

766: return;
767: else
768: if p_start_date > p_end_date then
769: x_return_status := OKC_API.G_RET_STS_ERROR;
770: OKC_API.set_message(G_APP_NAME, 'OKC_INVALID_END_DATE');
771: return;
772: end if;
773: l_start_date1 := p_start_date;
774: l_end_date1 := p_end_date;

Line 781: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TVE_ID');

777: FETCH okc_tgd_csr INTO l_okc_tgd_rec;
778: l_row_notfound := okc_tgd_csr%NOTFOUND;
779: CLOSE okc_tgd_csr;
780: IF (l_row_notfound) THEN
781: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TVE_ID');
782: RAISE item_not_found_error;
783: END IF;
784: if l_okc_tgd_rec.tze_id is NOT NULL and
785: l_okc_tgd_rec.tze_id <> OKC_API.G_MISS_NUM then

Line 785: l_okc_tgd_rec.tze_id <> OKC_API.G_MISS_NUM then

781: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TVE_ID');
782: RAISE item_not_found_error;
783: END IF;
784: if l_okc_tgd_rec.tze_id is NOT NULL and
785: l_okc_tgd_rec.tze_id <> OKC_API.G_MISS_NUM then
786: Get_Timezone(l_okc_tgd_rec.tze_id, l_tze_name, x_return_status);
787: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
788: return;
789: end if;

Line 787: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

783: END IF;
784: if l_okc_tgd_rec.tze_id is NOT NULL and
785: l_okc_tgd_rec.tze_id <> OKC_API.G_MISS_NUM then
786: Get_Timezone(l_okc_tgd_rec.tze_id, l_tze_name, x_return_status);
787: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
788: return;
789: end if;
790: else
791: l_tze_name := NULL;

Line 812: x_return_status := OKC_API.G_RET_STS_ERROR;

808: p_end_date,
809: p_cutoff_date) ;
810: EXCEPTION
811: WHEN item_not_found_error THEN
812: x_return_status := OKC_API.G_RET_STS_ERROR;
813: WHEN OTHERS THEN
814: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
815: p_msg_name => g_unexpected_error,
816: p_token1 => g_sqlcode_token,

Line 814: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

810: EXCEPTION
811: WHEN item_not_found_error THEN
812: x_return_status := OKC_API.G_RET_STS_ERROR;
813: WHEN OTHERS THEN
814: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
815: p_msg_name => g_unexpected_error,
816: p_token1 => g_sqlcode_token,
817: p_token1_value => sqlcode,
818: p_token2 => g_col_name_token,

Line 823: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

819: p_token2_value => 'TVE_ID',
820: p_token3 => g_sqlerrm_token,
821: p_token3_value => sqlerrm);
822: -- notify caller of an UNEXPECTED error
823: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
824: END Res_TPG_Delimited ;
825:
826: PROCEDURE Res_Cycle (
827: x_return_status OUT NOCOPY VARCHAR2,

Line 841: start with ((spn_id is NULL) or (spn_id = OKC_API.G_MISS_NUM)) and

837: IS
838: SELECT id, active_yn, duration, uom_code
839: FROM Okc_Span
840: connect by prior id = spn_id
841: start with ((spn_id is NULL) or (spn_id = OKC_API.G_MISS_NUM)) and
842: tve_id = p_id;
843: type l_okc_spn_tbl_type is table of okc_spn_csr%ROWTYPE index by binary_integer;
844: item_not_found_error EXCEPTION;
845: l_row_notfound BOOLEAN := TRUE;

Line 859: x_return_status := OKC_API.G_RET_STS_SUCCESS;

855: /*
856: Resolve all recurring dates e.g. Every 6 months
857: */
858:
859: x_return_status := OKC_API.G_RET_STS_SUCCESS;
860: /* Find the start and end dates if not passed and store them in l_start_date1 and l_end_date1 */
861: if (p_start_date is null or p_start_date = OKC_API.G_MISS_DATE) then
862: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');
863: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 861: if (p_start_date is null or p_start_date = OKC_API.G_MISS_DATE) then

857: */
858:
859: x_return_status := OKC_API.G_RET_STS_SUCCESS;
860: /* Find the start and end dates if not passed and store them in l_start_date1 and l_end_date1 */
861: if (p_start_date is null or p_start_date = OKC_API.G_MISS_DATE) then
862: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');
863: x_return_status := OKC_API.G_RET_STS_ERROR;
864: return;
865: elsif (p_end_date is null or p_end_date = OKC_API.G_MISS_DATE) then

Line 862: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');

858:
859: x_return_status := OKC_API.G_RET_STS_SUCCESS;
860: /* Find the start and end dates if not passed and store them in l_start_date1 and l_end_date1 */
861: if (p_start_date is null or p_start_date = OKC_API.G_MISS_DATE) then
862: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');
863: x_return_status := OKC_API.G_RET_STS_ERROR;
864: return;
865: elsif (p_end_date is null or p_end_date = OKC_API.G_MISS_DATE) then
866: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'END_DATE');

Line 863: x_return_status := OKC_API.G_RET_STS_ERROR;

859: x_return_status := OKC_API.G_RET_STS_SUCCESS;
860: /* Find the start and end dates if not passed and store them in l_start_date1 and l_end_date1 */
861: if (p_start_date is null or p_start_date = OKC_API.G_MISS_DATE) then
862: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');
863: x_return_status := OKC_API.G_RET_STS_ERROR;
864: return;
865: elsif (p_end_date is null or p_end_date = OKC_API.G_MISS_DATE) then
866: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'END_DATE');
867: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 865: elsif (p_end_date is null or p_end_date = OKC_API.G_MISS_DATE) then

861: if (p_start_date is null or p_start_date = OKC_API.G_MISS_DATE) then
862: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');
863: x_return_status := OKC_API.G_RET_STS_ERROR;
864: return;
865: elsif (p_end_date is null or p_end_date = OKC_API.G_MISS_DATE) then
866: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'END_DATE');
867: x_return_status := OKC_API.G_RET_STS_ERROR;
868: return;
869: else

Line 866: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'END_DATE');

862: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');
863: x_return_status := OKC_API.G_RET_STS_ERROR;
864: return;
865: elsif (p_end_date is null or p_end_date = OKC_API.G_MISS_DATE) then
866: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'END_DATE');
867: x_return_status := OKC_API.G_RET_STS_ERROR;
868: return;
869: else
870: if p_start_date > p_end_date then

Line 867: x_return_status := OKC_API.G_RET_STS_ERROR;

863: x_return_status := OKC_API.G_RET_STS_ERROR;
864: return;
865: elsif (p_end_date is null or p_end_date = OKC_API.G_MISS_DATE) then
866: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'END_DATE');
867: x_return_status := OKC_API.G_RET_STS_ERROR;
868: return;
869: else
870: if p_start_date > p_end_date then
871: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 871: x_return_status := OKC_API.G_RET_STS_ERROR;

867: x_return_status := OKC_API.G_RET_STS_ERROR;
868: return;
869: else
870: if p_start_date > p_end_date then
871: x_return_status := OKC_API.G_RET_STS_ERROR;
872: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');
873: return;
874: end if;
875: end if;

Line 872: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');

868: return;
869: else
870: if p_start_date > p_end_date then
871: x_return_status := OKC_API.G_RET_STS_ERROR;
872: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'START_DATE');
873: return;
874: end if;
875: end if;
876: l_start_date := p_start_date;

Line 909: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

905: p_cutoff_date,
906: NULL,
907: p_tze_id,
908: p_tze_name);
909: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
910: exit;
911: end if;
912: end if;
913: if ((l_end_date - l_start_date) >= 1) then

Line 921: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS Then

917: end if;
918: EXIT WHEN (i = l_okc_spn_tbl.LAST);
919: i := l_okc_spn_tbl.NEXT(i);
920: END LOOP;
921: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
922: exit;
923: END IF;
924: if (l_end_date > p_end_date) THEN
925: exit;

Line 929: x_return_status := OKC_API.G_RET_STS_ERROR;

925: exit;
926: end if;
927: END LOOP;
928: ELSE
929: x_return_status := OKC_API.G_RET_STS_ERROR;
930: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'SPN_ID');
931: return;
932: END IF;
933: EXCEPTION

Line 930: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'SPN_ID');

926: end if;
927: END LOOP;
928: ELSE
929: x_return_status := OKC_API.G_RET_STS_ERROR;
930: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'SPN_ID');
931: return;
932: END IF;
933: EXCEPTION
934: WHEN item_not_found_error THEN

Line 935: x_return_status := OKC_API.G_RET_STS_ERROR;

931: return;
932: END IF;
933: EXCEPTION
934: WHEN item_not_found_error THEN
935: x_return_status := OKC_API.G_RET_STS_ERROR;
936: WHEN OTHERS THEN
937: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
938: p_msg_name => g_unexpected_error,
939: p_token1 => g_sqlcode_token,

Line 937: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

933: EXCEPTION
934: WHEN item_not_found_error THEN
935: x_return_status := OKC_API.G_RET_STS_ERROR;
936: WHEN OTHERS THEN
937: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
938: p_msg_name => g_unexpected_error,
939: p_token1 => g_sqlcode_token,
940: p_token1_value => sqlcode,
941: p_token2 => g_col_name_token,

Line 946: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

942: p_token2_value => 'TVE_ID',
943: p_token3 => g_sqlerrm_token,
944: p_token3_value => sqlerrm);
945: -- notify caller of an UNEXPECTED error
946: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
947: END Res_Cycle ;
948:
949: -- The parameters p_resolved_until_date is the date till which the timevalues will be resolved
950: -- p_cutoff_date is the threshold date below which dates resolved will be ignored.

Line 1032: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1028:
1029: l_list_of_rules := OKC_TIME_UTIL_PUB.get_rule_defs_using_vs(l_app_id,l_rule_df_name,'OKC_TIMEVALUES');
1030: l_list_of_rules1 := OKC_TIME_UTIL_PUB.get_rule_defs_using_vs(l_app_id,l_rule_df_name,'OKC_TASK_RS');
1031:
1032: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1033:
1034: /* For these rules, get their ids using the contract header (line) id. */
1035:
1036: l_sql_string := 'select r.id, rg.chr_id, rg.cle_id, r.rule_information_category ' ||

Line 1070: l_tze_id <> OKC_API.G_MISS_NUM then

1066: /* Absolute Time Value will have only one date */
1067:
1068: IF l_tve_type = 'TAV' then
1069: if l_tze_id is NOT NULL and
1070: l_tze_id <> OKC_API.G_MISS_NUM then
1071: Get_Timezone(l_tze_id, l_tze_name, x_return_status);
1072: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1073: exit;
1074: end if;

Line 1072: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

1068: IF l_tve_type = 'TAV' then
1069: if l_tze_id is NOT NULL and
1070: l_tze_id <> OKC_API.G_MISS_NUM then
1071: Get_Timezone(l_tze_id, l_tze_name, x_return_status);
1072: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1073: exit;
1074: end if;
1075: else
1076: l_tze_name := NULL;

Line 1088: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

1084: p_cutoff_date,
1085: NULL,
1086: l_tze_id,
1087: l_tze_name);
1088: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1089: exit;
1090: end if;
1091: goto next_row;
1092: end if;

Line 1097: l_tve_id_limited = OKC_API.G_MISS_NUM then

1093:
1094: /* If timevalue is not limited use the Contract headers and lines effectivity */
1095:
1096: IF l_tve_id_limited is NULL or
1097: l_tve_id_limited = OKC_API.G_MISS_NUM then
1098: Get_K_Effectivity(
1099: l_chr_id,
1100: l_cle_id,
1101: l_start_date,

Line 1104: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

1100: l_cle_id,
1101: l_start_date,
1102: l_end_date,
1103: x_return_status);
1104: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1105: exit;
1106: end if;
1107: IF l_cle_id is NOT NULL and
1108: l_cle_id <> OKC_API.G_MISS_NUM Then

Line 1108: l_cle_id <> OKC_API.G_MISS_NUM Then

1104: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1105: exit;
1106: end if;
1107: IF l_cle_id is NOT NULL and
1108: l_cle_id <> OKC_API.G_MISS_NUM Then
1109: null;
1110: ELSIF l_chr_id is NOT NULL and
1111: l_chr_id <> OKC_API.G_MISS_NUM Then
1112:

Line 1111: l_chr_id <> OKC_API.G_MISS_NUM Then

1107: IF l_cle_id is NOT NULL and
1108: l_cle_id <> OKC_API.G_MISS_NUM Then
1109: null;
1110: ELSIF l_chr_id is NOT NULL and
1111: l_chr_id <> OKC_API.G_MISS_NUM Then
1112:
1113: /* If the contract is perpetual or for a very large duration, resolve this only until the derived
1114: resolved until date to avoid too many resolved timevalues being created. this check has to be
1115: done for each rule tied to a contract header.

Line 1136: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

1132: Res_TPG_Delimited ( x_return_status,p_api_version,p_init_msg_list,l_tve_id, l_start_date, l_end_date, p_cutoff_date);
1133: elsif l_tve_type = 'CYL' then
1134: Res_Cycle ( x_return_status,p_api_version,p_init_msg_list,l_tve_id, l_tze_id, l_tze_name, l_start_date, l_end_date, p_cutoff_date);
1135: end if;
1136: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1137: exit;
1138: end if;
1139: end if;
1140: ELSE

Line 1149: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TVE_ID');

1145: FETCH limited_by_csr into l_limited_by_rec;
1146: l_row_not_found := limited_by_csr%NOTFOUND;
1147: CLOSE limited_by_csr;
1148: IF (l_row_not_found) THEN
1149: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TVE_ID');
1150: x_return_status := OKC_API.G_RET_STS_ERROR;
1151: ELSE
1152: l_start_date := l_limited_by_rec.start_date;
1153: l_end_date := l_limited_by_rec.end_date;

Line 1150: x_return_status := OKC_API.G_RET_STS_ERROR;

1146: l_row_not_found := limited_by_csr%NOTFOUND;
1147: CLOSE limited_by_csr;
1148: IF (l_row_not_found) THEN
1149: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TVE_ID');
1150: x_return_status := OKC_API.G_RET_STS_ERROR;
1151: ELSE
1152: l_start_date := l_limited_by_rec.start_date;
1153: l_end_date := l_limited_by_rec.end_date;
1154:

Line 1178: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

1174: l_cle_id,
1175: l_k_start_date,
1176: l_k_end_date,
1177: x_return_status);
1178: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1179: exit;
1180: end if;
1181: if l_start_date = to_date('01010001','ddmmyyyy') Then
1182: l_start_date := l_k_start_date;

Line 1204: if (x_return_status <> OKC_API.G_RET_STS_SUCCESS) then

1200: x_msg_count,
1201: x_msg_data,
1202: p_isev_ext_rec,
1203: x_isev_ext_rec);
1204: if (x_return_status <> OKC_API.G_RET_STS_SUCCESS) then
1205: exit;
1206: end if;
1207: end if;
1208:

Line 1215: l_cle_id <> OKC_API.G_MISS_NUM Then

1211: Otherwise reset the resolved until date of the contract header to NULL
1212: */
1213:
1214: IF l_cle_id is NOT NULL and
1215: l_cle_id <> OKC_API.G_MISS_NUM Then
1216: null;
1217: ELSIF l_chr_id is NOT NULL and
1218: l_chr_id <> OKC_API.G_MISS_NUM Then
1219: if l_end_date > p_resolved_until_date Then

Line 1218: l_chr_id <> OKC_API.G_MISS_NUM Then

1214: IF l_cle_id is NOT NULL and
1215: l_cle_id <> OKC_API.G_MISS_NUM Then
1216: null;
1217: ELSIF l_chr_id is NOT NULL and
1218: l_chr_id <> OKC_API.G_MISS_NUM Then
1219: if l_end_date > p_resolved_until_date Then
1220: l_pending_further_resolving := '1';
1221: elsif l_end_date < p_resolved_until_date Then
1222: l_over_further_resolving := '1';

Line 1237: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

1233: Res_TPG_Delimited ( x_return_status,p_api_version,p_init_msg_list,l_tve_id, l_start_date, l_end_date, p_cutoff_date);
1234: elsif l_tve_type = 'CYL' then
1235: Res_Cycle ( x_return_status,p_api_version,p_init_msg_list,l_tve_id, l_tze_id, l_tze_name, l_start_date, l_end_date, p_cutoff_date);
1236: end if;
1237: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1238: exit;
1239: end if;
1240: end if;
1241: END IF;

Line 1247: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS Then

1243: <>
1244: null;
1245: end loop;
1246: close tve_id_csr;
1247: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1248: exit;
1249: END IF;
1250: <>
1251: null;

Line 1267: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

1263: l_pending_further_resolving := 'X';
1264: l_over_further_resolving := 'X';
1265: EXCEPTION
1266: WHEN OTHERS THEN
1267: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
1268: p_msg_name => g_unexpected_error,
1269: p_token1 => g_sqlcode_token,
1270: p_token1_value => sqlcode,
1271: p_token2 => g_col_name_token,

Line 1276: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1272: p_token2_value => 'CHR_ID',
1273: p_token3 => g_sqlerrm_token,
1274: p_token3_value => sqlerrm);
1275: -- notify caller of an UNEXPECTED error
1276: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1277: END Res_Time_K;
1278:
1279: PROCEDURE Res_Time_New_K(
1280: p_chr_id IN NUMBER,

Line 1362: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1358: */
1359:
1360: l_end_date := nvl(p_end_date, to_date('12314000','mmddyyyy'));
1361: l_cutoff_date := p_start_date;
1362: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1363:
1364: /* Get the application_id and get the rule definition names */
1365:
1366: l_app_id := OKC_TIME_UTIL_PUB.get_app_id;

Line 1395: p_cle_id <> OKC_API.G_MISS_NUM Then

1391:
1392: /* for extending lines, ensure that the resolved until date (if present) of the headers is met */
1393:
1394: if p_cle_id is NOT NULL AND
1395: p_cle_id <> OKC_API.G_MISS_NUM Then
1396: OPEN resolved_until_csr(p_cle_id);
1397: FETCH resolved_until_csr INTO l_resolved_until_date;
1398: CLOSE resolved_until_csr;
1399: IF l_resolved_until_date is NOT NULL then

Line 1405: p_chr_id <> OKC_API.G_MISS_NUM Then

1401: l_end_date := l_resolved_until_date;
1402: end if;
1403: end if;
1404: elsif p_chr_id is NOT NULL AND
1405: p_chr_id <> OKC_API.G_MISS_NUM Then
1406: l_resolved_until_date := add_months(sysdate,OKC_TIME_RES_PVT.RESOLVE_UNTIL_MONTHS);
1407: if l_end_date <= l_resolved_until_date then
1408: l_over_further_resolving := '1';
1409: else

Line 1441: l_tze_id <> OKC_API.G_MISS_NUM then

1437: /* Absolute Time Value will have only one date */
1438:
1439: IF l_tve_type = 'TAV' then
1440: if l_tze_id is NOT NULL and
1441: l_tze_id <> OKC_API.G_MISS_NUM then
1442: Get_Timezone(l_tze_id, l_tze_name, x_return_status);
1443: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1444: exit;
1445: end if;

Line 1443: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

1439: IF l_tve_type = 'TAV' then
1440: if l_tze_id is NOT NULL and
1441: l_tze_id <> OKC_API.G_MISS_NUM then
1442: Get_Timezone(l_tze_id, l_tze_name, x_return_status);
1443: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1444: exit;
1445: end if;
1446: else
1447: l_tze_name := NULL;

Line 1459: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

1455: l_cutoff_date,
1456: NULL,
1457: l_tze_id,
1458: l_tze_name);
1459: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1460: exit;
1461: end if;
1462:
1463: /* For generic and recurring call the respective procedures to create resolved timevalues */

Line 1472: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TVE_ID');

1468: FETCH limited_by_csr into l_limited_by_rec;
1469: l_row_not_found := limited_by_csr%NOTFOUND;
1470: CLOSE limited_by_csr;
1471: IF (l_row_not_found) THEN
1472: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TVE_ID');
1473: x_return_status := OKC_API.G_RET_STS_ERROR;
1474: exit;
1475: END IF;
1476: if l_limited_by_rec.start_date > p_start_date Then

Line 1473: x_return_status := OKC_API.G_RET_STS_ERROR;

1469: l_row_not_found := limited_by_csr%NOTFOUND;
1470: CLOSE limited_by_csr;
1471: IF (l_row_not_found) THEN
1472: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TVE_ID');
1473: x_return_status := OKC_API.G_RET_STS_ERROR;
1474: exit;
1475: END IF;
1476: if l_limited_by_rec.start_date > p_start_date Then
1477: l_start_date := l_limited_by_rec.start_date;

Line 1493: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

1489: ELSE
1490: Res_Cycle ( x_return_status,p_api_version,p_init_msg_list,l_tve_id, l_tze_id, l_tze_name, l_start_date, l_end_date, l_cutoff_date);
1491: end if;
1492: end if;
1493: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1494: exit;
1495: end if;
1496: end loop;
1497: close tve_id_csr;

Line 1498: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS Then

1494: exit;
1495: end if;
1496: end loop;
1497: close tve_id_csr;
1498: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1499: exit;
1500: END IF;
1501: <>
1502: null;

Line 1518: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

1514: l_over_further_resolving := 'X';
1515: CLOSE rgp_csr;
1516: EXCEPTION
1517: WHEN OTHERS THEN
1518: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
1519: p_msg_name => g_unexpected_error,
1520: p_token1 => g_sqlcode_token,
1521: p_token1_value => sqlcode,
1522: p_token2 => g_col_name_token,

Line 1527: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1523: p_token2_value => 'CHR_ID',
1524: p_token3 => g_sqlerrm_token,
1525: p_token3_value => sqlerrm);
1526: -- notify caller of an UNEXPECTED error
1527: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1528: END Res_Time_Extnd_K;
1529:
1530: PROCEDURE Res_Time_Termnt_K(
1531: p_chr_id IN NUMBER,

Line 1575: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1571: NOTE: terminating header will not automatically delete resolved timevalues for lines.
1572: Has to be called for terminating lines as well. p_chr_id and p_cle_id are mutually exclusive.
1573: */
1574:
1575: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1576:
1577: /* Get the application_id and get the rule definition names */
1578:
1579: l_app_id := OKC_TIME_UTIL_PUB.get_app_id;

Line 1640: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

1636: l_rtv_id,
1637: x_return_status,
1638: x_msg_count,
1639: x_msg_data);
1640: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1641: exit;
1642: end if;
1643: OKC_TIME_PUB.DELETE_RESOLVED_TIMEVALUES(
1644: p_api_version,

Line 1650: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

1646: x_return_status,
1647: x_msg_count,
1648: x_msg_data,
1649: l_rtvv_rec);
1650: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1651: exit;
1652: end if;
1653: end loop;
1654: close tve_id_csr;

Line 1655: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS Then

1651: exit;
1652: end if;
1653: end loop;
1654: close tve_id_csr;
1655: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1656: exit;
1657: END IF;
1658: <>
1659: null;

Line 1668: p_chr_id <> OKC_API.G_MISS_NUM Then

1664: termination date (p_end_date). If yes, then reset the resolved until date as there is no need for any further
1665: resolving of timevalues */
1666:
1667: if p_chr_id is NOT NULL AND
1668: p_chr_id <> OKC_API.G_MISS_NUM Then
1669: OPEN resolved_until_csr(p_chr_id);
1670: FETCH resolved_until_csr INTO l_resolved_until_date;
1671: CLOSE resolved_until_csr;
1672: IF l_resolved_until_date is NOT NULL then

Line 1682: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

1678: end if;
1679: end if;
1680: EXCEPTION
1681: WHEN OTHERS THEN
1682: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
1683: p_msg_name => g_unexpected_error,
1684: p_token1 => g_sqlcode_token,
1685: p_token1_value => sqlcode,
1686: p_token2 => g_col_name_token,

Line 1691: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1687: p_token2_value => 'CHR_ID',
1688: p_token3 => g_sqlerrm_token,
1689: p_token3_value => sqlerrm);
1690: -- notify caller of an UNEXPECTED error
1691: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1692: END Res_Time_Termnt_K;
1693:
1694: FUNCTION Check_Res_Time_N_tasks(
1695: p_tve_id IN NUMBER,

Line 1743: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1739: l_rtvv_rec OKC_TIME_PUB.rtvv_rec_type;
1740: x_msg_count NUMBER;
1741: x_msg_data VARCHAR2(2000);
1742: BEGIN
1743: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1744: open rtv_csr (p_tve_id, p_date);
1745: loop
1746: fetch rtv_csr into l_rtv_rec;
1747: exit when rtv_csr%NOTFOUND;

Line 1758: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

1754: l_rtv_rec.rtv_id,
1755: x_return_status,
1756: x_msg_count,
1757: x_msg_data);
1758: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1759: exit;
1760: end if;
1761: OKC_TIME_PUB.DELETE_RESOLVED_TIMEVALUES(
1762: p_api_version,

Line 1768: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

1764: x_return_status,
1765: x_msg_count,
1766: x_msg_data,
1767: l_rtvv_rec);
1768: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1769: exit;
1770: end if;
1771: end loop;
1772: close rtv_csr;

Line 1775: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

1771: end loop;
1772: close rtv_csr;
1773: EXCEPTION
1774: WHEN OTHERS THEN
1775: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
1776: p_msg_name => g_unexpected_error,
1777: p_token1 => g_sqlcode_token,
1778: p_token1_value => sqlcode,
1779: p_token2 => g_col_name_token,

Line 1784: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1780: p_token2_value => 'RTV_ID',
1781: p_token3 => g_sqlerrm_token,
1782: p_token3_value => sqlerrm);
1783: -- notify caller of an UNEXPECTED error
1784: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1785: END Delete_Res_Time_N_Tasks;
1786:
1787: PROCEDURE Create_Res_Time_N_Tasks(
1788: p_tve_id IN NUMBER,

Line 1809: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1805: l_tze_name OKX_TIMEZONES_V.global_timezone_name%TYPE;
1806: l_row_not_found BOOLEAN := TRUE;
1807: l_cutoff_date DATE := NULL;
1808: BEGIN
1809: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1810: open tve_id_csr(p_tve_id);
1811: fetch tve_id_csr into l_tve_rec;
1812: l_row_not_found := tve_id_csr%NOTFOUND;
1813: close tve_id_csr;

Line 1815: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TVE_ID');

1811: fetch tve_id_csr into l_tve_rec;
1812: l_row_not_found := tve_id_csr%NOTFOUND;
1813: close tve_id_csr;
1814: if l_row_not_found then
1815: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TVE_ID');
1816: x_return_status := OKC_API.G_RET_STS_ERROR;
1817: return;
1818: end if;
1819: IF l_tve_rec.tve_type = 'TAV' then

Line 1816: x_return_status := OKC_API.G_RET_STS_ERROR;

1812: l_row_not_found := tve_id_csr%NOTFOUND;
1813: close tve_id_csr;
1814: if l_row_not_found then
1815: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'TVE_ID');
1816: x_return_status := OKC_API.G_RET_STS_ERROR;
1817: return;
1818: end if;
1819: IF l_tve_rec.tve_type = 'TAV' then
1820: if l_tve_rec.tze_id is NOT NULL and

Line 1821: l_tve_rec.tze_id <> OKC_API.G_MISS_NUM then

1817: return;
1818: end if;
1819: IF l_tve_rec.tve_type = 'TAV' then
1820: if l_tve_rec.tze_id is NOT NULL and
1821: l_tve_rec.tze_id <> OKC_API.G_MISS_NUM then
1822: Get_Timezone(l_tve_rec.tze_id, l_tze_name, x_return_status);
1823: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1824: return;
1825: end if;

Line 1823: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

1819: IF l_tve_rec.tve_type = 'TAV' then
1820: if l_tve_rec.tze_id is NOT NULL and
1821: l_tve_rec.tze_id <> OKC_API.G_MISS_NUM then
1822: Get_Timezone(l_tve_rec.tze_id, l_tze_name, x_return_status);
1823: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1824: return;
1825: end if;
1826: else
1827: l_tze_name := NULL;

Line 1839: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

1835: l_cutoff_date,
1836: NULL,
1837: l_tve_rec.tze_id,
1838: l_tze_name);
1839: if x_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1840: return;
1841: end if;
1842: ELSIF l_tve_rec.tve_type = 'TGD' then
1843: Res_TPG_Delimited ( x_return_status,p_api_version,p_init_msg_list,l_tve_rec.id, p_start_date, p_end_date, l_cutoff_date);

Line 1849: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

1845: Res_Cycle ( x_return_status,p_api_version,p_init_msg_list,l_tve_rec.id, l_tve_rec.tze_id, l_tze_name, p_start_date, p_end_date, l_cutoff_date);
1846: end if;
1847: EXCEPTION
1848: WHEN OTHERS THEN
1849: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
1850: p_msg_name => g_unexpected_error,
1851: p_token1 => g_sqlcode_token,
1852: p_token1_value => sqlcode,
1853: p_token2 => g_col_name_token,

Line 1858: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1854: p_token2_value => 'TVE_ID',
1855: p_token3 => g_sqlerrm_token,
1856: p_token3_value => sqlerrm);
1857: -- notify caller of an UNEXPECTED error
1858: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1859: END Create_Res_Time_N_Tasks;
1860:
1861: PROCEDURE Batch_Resolve_Time_N_Tasks IS
1862: CURSOR c_chr IS

Line 1897: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1893: retcode OUT NOCOPY VARCHAR2) IS
1894:
1895: l_api_name CONSTANT VARCHAR2(30) := 'time_resolver';
1896: l_api_version CONSTANT VARCHAR2(30) := 1.0;
1897: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1898: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1899: l_msg_count NUMBER;
1900: l_msg_data VARCHAR2(1000);
1901: l_init_msg_list VARCHAR2(3) := 'F';

Line 1898: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1894:
1895: l_api_name CONSTANT VARCHAR2(30) := 'time_resolver';
1896: l_api_version CONSTANT VARCHAR2(30) := 1.0;
1897: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1898: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1899: l_msg_count NUMBER;
1900: l_msg_data VARCHAR2(1000);
1901: l_init_msg_list VARCHAR2(3) := 'F';
1902: E_Resource_Busy EXCEPTION;

Line 1908: l_return_status := OKC_API.START_ACTIVITY(l_api_name

1904:
1905: BEGIN
1906: -- call start_activity to create savepoint, check comptability
1907: -- and initialize message list
1908: l_return_status := OKC_API.START_ACTIVITY(l_api_name
1909: ,l_init_msg_list
1910: ,'_PROCESS'
1911: ,x_return_status
1912: );

Line 1918: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

1914: retcode := 0;
1915:
1916: OKC_TIME_RES_PVT.Batch_Resolve_Time_N_Tasks;
1917:
1918: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1919: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1920: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1921: RAISE OKC_API.G_EXCEPTION_ERROR;
1922: -- ELSIF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN

Line 1919: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1915:
1916: OKC_TIME_RES_PVT.Batch_Resolve_Time_N_Tasks;
1917:
1918: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1919: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1920: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1921: RAISE OKC_API.G_EXCEPTION_ERROR;
1922: -- ELSIF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
1923: -- commit;

Line 1920: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

1916: OKC_TIME_RES_PVT.Batch_Resolve_Time_N_Tasks;
1917:
1918: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1919: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1920: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1921: RAISE OKC_API.G_EXCEPTION_ERROR;
1922: -- ELSIF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
1923: -- commit;
1924: END IF;

Line 1921: RAISE OKC_API.G_EXCEPTION_ERROR;

1917:
1918: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1919: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1920: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1921: RAISE OKC_API.G_EXCEPTION_ERROR;
1922: -- ELSIF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
1923: -- commit;
1924: END IF;
1925:

Line 1922: -- ELSIF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN

1918: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1919: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1920: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1921: RAISE OKC_API.G_EXCEPTION_ERROR;
1922: -- ELSIF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
1923: -- commit;
1924: END IF;
1925:
1926: OKC_API.END_ACTIVITY(l_msg_count, l_msg_data);

Line 1926: OKC_API.END_ACTIVITY(l_msg_count, l_msg_data);

1922: -- ELSIF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
1923: -- commit;
1924: END IF;
1925:
1926: OKC_API.END_ACTIVITY(l_msg_count, l_msg_data);
1927:
1928: EXCEPTION
1929: WHEN E_Resource_Busy THEN
1930: l_return_status := okc_api.g_ret_sts_error;

Line 1930: l_return_status := okc_api.g_ret_sts_error;

1926: OKC_API.END_ACTIVITY(l_msg_count, l_msg_data);
1927:
1928: EXCEPTION
1929: WHEN E_Resource_Busy THEN
1930: l_return_status := okc_api.g_ret_sts_error;
1931: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
1932: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1933: retcode := 2;
1934: errbuf := substr(sqlerrm,1,200);

Line 1932: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1928: EXCEPTION
1929: WHEN E_Resource_Busy THEN
1930: l_return_status := okc_api.g_ret_sts_error;
1931: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
1932: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1933: retcode := 2;
1934: errbuf := substr(sqlerrm,1,200);
1935: l_return_status := OKC_API.HANDLE_EXCEPTIONS
1936: (l_api_name,

Line 1935: l_return_status := OKC_API.HANDLE_EXCEPTIONS

1931: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
1932: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1933: retcode := 2;
1934: errbuf := substr(sqlerrm,1,200);
1935: l_return_status := OKC_API.HANDLE_EXCEPTIONS
1936: (l_api_name,
1937: G_PKG_NAME,
1938: 'OKC_API.G_RET_STS_ERROR',
1939: l_msg_count,

Line 1938: 'OKC_API.G_RET_STS_ERROR',

1934: errbuf := substr(sqlerrm,1,200);
1935: l_return_status := OKC_API.HANDLE_EXCEPTIONS
1936: (l_api_name,
1937: G_PKG_NAME,
1938: 'OKC_API.G_RET_STS_ERROR',
1939: l_msg_count,
1940: l_msg_data,
1941: '_COMPLEX');
1942: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1942: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1938: 'OKC_API.G_RET_STS_ERROR',
1939: l_msg_count,
1940: l_msg_data,
1941: '_COMPLEX');
1942: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1943: retcode := 2;
1944: errbuf := substr(sqlerrm,1,200);
1945: l_return_status := OKC_API.HANDLE_EXCEPTIONS
1946: (l_api_name,

Line 1945: l_return_status := OKC_API.HANDLE_EXCEPTIONS

1941: '_COMPLEX');
1942: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1943: retcode := 2;
1944: errbuf := substr(sqlerrm,1,200);
1945: l_return_status := OKC_API.HANDLE_EXCEPTIONS
1946: (l_api_name,
1947: G_PKG_NAME,
1948: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1949: l_msg_count,

Line 1948: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1944: errbuf := substr(sqlerrm,1,200);
1945: l_return_status := OKC_API.HANDLE_EXCEPTIONS
1946: (l_api_name,
1947: G_PKG_NAME,
1948: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1949: l_msg_count,
1950: l_msg_data,
1951: '_COMPLEX');
1952: WHEN OTHERS THEN

Line 1955: l_return_status := OKC_API.HANDLE_EXCEPTIONS

1951: '_COMPLEX');
1952: WHEN OTHERS THEN
1953: retcode := 2;
1954: errbuf := substr(sqlerrm,1,200);
1955: l_return_status := OKC_API.HANDLE_EXCEPTIONS
1956: (l_api_name,
1957: G_PKG_NAME,
1958: 'OTHERS',
1959: l_msg_count,