[Home] [Help]
23: FROM cs_csi_counter_groups
24: WHERE name = p_name
25: AND template_flag = p_template_flag;
26:
27: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_GRP_DUPLICATE');
28: EXCEPTION
29: WHEN NO_DATA_FOUND THEN
30: NULL;
31: WHEN OTHERS THEN
28: EXCEPTION
29: WHEN NO_DATA_FOUND THEN
30: NULL;
31: WHEN OTHERS THEN
32: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_CTR_GRP_DUPLICATE');
33: END;
34: END IF;
35: END validate_counter_group;
36:
39: p_start_date DATE
40: ) IS
41: BEGIN
42: IF p_start_date IS NULL THEN
43: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_STDATE_INVALID');
44: END IF;
45: END validate_start_date;
46:
47: PROCEDURE validate_inventory_item
61: AND organization_id = l_inv_valdn_org_id;
62: -- AND organization_id = cs_std.get_item_valdn_orgzn_id;
63: EXCEPTION
64: WHEN NO_DATA_FOUND THEN
65: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_INVALID','INVENTORY_ITEM',p_inventory_item_id,'ORG_ID',l_inv_valdn_org_id);
66: END;
67: ELSE
68: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ISNULL');
69: END IF;
64: WHEN NO_DATA_FOUND THEN
65: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_INVALID','INVENTORY_ITEM',p_inventory_item_id,'ORG_ID',l_inv_valdn_org_id);
66: END;
67: ELSE
68: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ISNULL');
69: END IF;
70: END validate_inventory_item;
71:
72: PROCEDURE validate_lookups
86: OR meaning= p_lookup_code; --Added for bug #6904836
87:
88: EXCEPTION
89: WHEN NO_DATA_FOUND THEN
90: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_LOOKUP_INVALID','LOOKUP_TYPE',p_lookup_type,'LOOKUP_CODE',p_lookup_code);
91: END;
92: END validate_lookups;
93:
94: PROCEDURE Validate_Data_Type
130: l_date := l_default_value;
131: l_date := l_minimum_value;
132: l_date := l_maximum_value;
133: ELSE
134: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_PROP_DATA_TYPE');
135: END IF;
136: EXCEPTION
137: WHEN OTHERS THEN
138: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_VAL_DATATYPE','DATA_TYPE',p_property_data_type);
134: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_PROP_DATA_TYPE');
135: END IF;
136: EXCEPTION
137: WHEN OTHERS THEN
138: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_VAL_DATATYPE','DATA_TYPE',p_property_data_type);
139: END Validate_Data_Type;
140:
141: PROCEDURE validate_uom
142: (
150: FROM mtl_units_of_measure
151: WHERE uom_code = p_uom_code;
152: EXCEPTION
153: WHEN no_data_found THEN
154: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_INVALID_UOM_CODE','UNIT_OF_MEASURE',p_uom_code);
155: END validate_uom;
156:
157: PROCEDURE validate_ctr_relationship
158: (
171: WHERE counter_id = p_counter_id;
172:
173: EXCEPTION
174: WHEN no_data_found THEN
175: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_INVALID_COUNTER');
176: END validate_ctr_relationship;
177:
178: PROCEDURE Validate_Counter
179: (
212: l_ctr_type_valid varchar2(1);
213: l_inv_valdn_org_id NUMBER := fnd_profile.value('CS_INV_VALIDATION_ORG');
214: BEGIN
215: -- Read the debug profiles values in to global variable 7197402
216: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
217:
218: -- validate counter name is not null
219: if p_name is null then
220: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_CTR_NAME');
216: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
217:
218: -- validate counter name is not null
219: if p_name is null then
220: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_CTR_NAME');
221: else
222: --Changed for Bug 7462345, validating the name while update
223: BEGIN
224: SELECT 'x'
226: FROM csi_counter_template_vl
227: WHERE upper(name) = upper(p_name)
228: AND Nvl(group_id, FND_API.G_MISS_NUM) = Nvl(p_group_id, FND_API.G_MISS_NUM)-- Added for bug 9088368
229: AND COUNTER_ID <> Nvl(p_counter_id, FND_API.G_MISS_NUM);
230: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_CTR_DUP_NAME','CTR_NAME',p_name);
231: EXCEPTION
232: WHEN NO_DATA_FOUND THEN
233: NULL;
234: WHEN TOO_MANY_ROWS THEN
231: EXCEPTION
232: WHEN NO_DATA_FOUND THEN
233: NULL;
234: WHEN TOO_MANY_ROWS THEN
235: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_CTR_DUP_NAME','CTR_NAME',p_name);
236: END;
237:
238: END IF;
239:
251: -- and organization_id = cs_std.get_item_valdn_orgzn_id
252: and usage_item_flag = 'Y';
253: exception
254: when no_data_found then
255: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_USAGE_ITEM');
256: end;
257:
258: if p_group_id is null then
259: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_GRP_NAME');
255: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_USAGE_ITEM');
256: end;
257:
258: if p_group_id is null then
259: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_GRP_NAME');
260: end if;
261: end if;
262:
263: -- validate counter group id
268: from cs_csi_counter_groups
269: where counter_group_id = p_group_id;
270: exception
271: when no_data_found then
272: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_GRP_INVALID');
273: end;
274: end if;
275:
276: --validate estimation id exists only if direction is not null
274: end if;
275:
276: --validate estimation id exists only if direction is not null
277: if p_estimation_id is not null and p_direction is null then
278: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_EST_NO_DIRECTION');
279: end if;
280:
281: -- Validate that automatic rollover should not exist if direction is Bi-Direction
282: if nvl(p_automatic_rollover,'N') = 'Y' and p_direction not in ('A','D') then
279: end if;
280:
281: -- Validate that automatic rollover should not exist if direction is Bi-Direction
282: if nvl(p_automatic_rollover,'N') = 'Y' and p_direction not in ('A','D') then
283: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_CTR_ARO_NO_DIRECTION');
284: end if;
285:
286: --validate tolerance plus and tolerance minus for negative values
287: if p_tolerance_plus < 0 or p_tolerance_minus <0 then
284: end if;
285:
286: --validate tolerance plus and tolerance minus for negative values
287: if p_tolerance_plus < 0 or p_tolerance_minus <0 then
288: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_TOLERANCE');
289: end if;
290:
291: --validate counter type
292: IF p_counter_type IS NULL THEN
289: end if;
290:
291: --validate counter type
292: IF p_counter_type IS NULL THEN
293: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INVALID_CTR_TYPE');
294: ELSE
295: BEGIN
296: select 'x'
297: into l_ctr_type_valid
299: where lookup_type = 'CSI_COUNTER_TYPE'
300: and lookup_code = p_counter_type;
301: EXCEPTION
302: WHEN NO_DATA_FOUND THEN
303: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INVALID_CTR_TYPE');
304: END;
305: end if;
306:
307: --validate counter type parameters
318: end;
319:
320: if l_time_uom = 'N' then
321: if p_reading_type not in (1,2) then
322: csi_ctr_gen_utility_pvt.put_line(' Regular ');
323: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_CTR_TYPE','PARAM','p_reading_type','CTR_TYPE',p_counter_type);
324: end if;
325:
326: if p_derive_function is not null or
319:
320: if l_time_uom = 'N' then
321: if p_reading_type not in (1,2) then
322: csi_ctr_gen_utility_pvt.put_line(' Regular ');
323: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_CTR_TYPE','PARAM','p_reading_type','CTR_TYPE',p_counter_type);
324: end if;
325:
326: if p_derive_function is not null or
327: p_formula_text is not null or
329: p_filter_type is not null or
330: p_filter_reading_count is not null or
331: p_filter_time_uom is not null then
332:
333: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_PARM_CTR_TYPE','CTR_TYPE',p_counter_type);
334: end if;
335:
336: --validate required parameter values exist for automatic rollover
337: if nvl(p_automatic_rollover,'N') = 'Y' then
335:
336: --validate required parameter values exist for automatic rollover
337: if nvl(p_automatic_rollover,'N') = 'Y' then
338: if p_rollover_last_reading is null then
339: csi_ctr_gen_utility_pvt.ExitWithErrMsg
340: ( p_msg_name => 'CSI_API_CTR_REQ_PARM',
341: p_token1_name => 'PARAM',
342: p_token1_val => 'for rollover attribute'
343: );
341: p_token1_name => 'PARAM',
342: p_token1_val => 'for rollover attribute'
343: );
344: elsif p_rollover_first_reading is null then
345: csi_ctr_gen_utility_pvt.ExitWithErrMsg
346: ( p_msg_name => 'CSI_API_CTR_REQ_PARM',
347: p_token1_name => 'PARAM',
348: p_token1_val => 'for rollover attribute'
349: -- p_token1_val => 'p_rollover_first_reading'
350: );
351: end if;
352: --Rollover from must be greater than Rollover to for direction Ascending
353: if p_direction = 'A' and p_rollover_last_reading <= p_rollover_first_reading then
354: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_CTR_INV_RO_DATA');
355: end if;
356: --Rollover from must be less than Rollover to for direction Descending
357: if p_direction = 'D' and p_rollover_last_reading >= p_rollover_first_reading then
358: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_CTR_INV_RO_DATA');
354: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_CTR_INV_RO_DATA');
355: end if;
356: --Rollover from must be less than Rollover to for direction Descending
357: if p_direction = 'D' and p_rollover_last_reading >= p_rollover_first_reading then
358: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_CTR_INV_RO_DATA');
359: end if;
360: end if;
361: -- Rollover from and Rollover to field should not have values if automatic rollover is not checked.
362: if nvl(p_automatic_rollover,'N') = 'N' and (p_rollover_last_reading is NOT NULL or p_rollover_first_reading IS NOT NULL) then
359: end if;
360: end if;
361: -- Rollover from and Rollover to field should not have values if automatic rollover is not checked.
362: if nvl(p_automatic_rollover,'N') = 'N' and (p_rollover_last_reading is NOT NULL or p_rollover_first_reading IS NOT NULL) then
363: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_CTR_INV_RO_ARO');
364: end if;
365:
366: --validate if required parameter values exist for used in scheduling
367: if nvl(p_used_in_scheduling,'N') = 'Y' then
365:
366: --validate if required parameter values exist for used in scheduling
367: if nvl(p_used_in_scheduling,'N') = 'Y' then
368: if p_initial_reading is null then
369: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_USE_SCHD');
370: elsif p_default_usage_rate is null then
371: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_USE_SCHD');
372: elsif p_use_past_reading is null then
373: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_USE_SCHD');
367: if nvl(p_used_in_scheduling,'N') = 'Y' then
368: if p_initial_reading is null then
369: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_USE_SCHD');
370: elsif p_default_usage_rate is null then
371: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_USE_SCHD');
372: elsif p_use_past_reading is null then
373: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_USE_SCHD');
374: end if;
375: end if;
369: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_USE_SCHD');
370: elsif p_default_usage_rate is null then
371: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_USE_SCHD');
372: elsif p_use_past_reading is null then
373: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_USE_SCHD');
374: end if;
375: end if;
376: else -- if type is a time counter
377: if p_derive_function is not null or
386: p_tolerance_plus is not null or
387: p_tolerance_minus is not null or
388: p_estimation_id is not null
389: then
390: csi_ctr_gen_utility_pvt.put_line(' Time ');
391: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_PARM_CTR_TYPE','CTR_TYPE',p_counter_type);
392: end if;
393:
394: if nvl(p_used_in_scheduling,'N') = 'Y' then
387: p_tolerance_minus is not null or
388: p_estimation_id is not null
389: then
390: csi_ctr_gen_utility_pvt.put_line(' Time ');
391: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_PARM_CTR_TYPE','CTR_TYPE',p_counter_type);
392: end if;
393:
394: if nvl(p_used_in_scheduling,'N') = 'Y' then
395: if p_initial_reading is null then
392: end if;
393:
394: if nvl(p_used_in_scheduling,'N') = 'Y' then
395: if p_initial_reading is null then
396: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_USE_SCHD');
397: elsif p_default_usage_rate is null then
398: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_USE_SCHD');
399: elsif p_use_past_reading is null then
400: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_USE_SCHD');
394: if nvl(p_used_in_scheduling,'N') = 'Y' then
395: if p_initial_reading is null then
396: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_USE_SCHD');
397: elsif p_default_usage_rate is null then
398: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_USE_SCHD');
399: elsif p_use_past_reading is null then
400: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_USE_SCHD');
401: end if;
402: end if;
396: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_USE_SCHD');
397: elsif p_default_usage_rate is null then
398: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_USE_SCHD');
399: elsif p_use_past_reading is null then
400: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_USE_SCHD');
401: end if;
402: end if;
403:
404: end if; --l_time_uom
404: end if; --l_time_uom
405: elsif p_counter_type = 'FORMULA' then
406: if p_derive_function is null then
407: if p_formula_text is null then
408: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_FORMULA');
409: end if;
410:
411: if p_derive_counter_id is not null or
412: p_filter_type is not null or
418: p_initial_reading is not null
419: -- p_tolerance_plus is not null or
420: -- p_tolerance_minus is not null
421: then
422: csi_ctr_gen_utility_pvt.put_line(' Formula');
423: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_PARM_CTR_TYPE','CTR_TYPE',p_counter_type);
424: end if;
425: elsif p_derive_function='AVERAGE' and p_filter_type='COUNT' then
426: if p_filter_reading_count < 0 then
419: -- p_tolerance_plus is not null or
420: -- p_tolerance_minus is not null
421: then
422: csi_ctr_gen_utility_pvt.put_line(' Formula');
423: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_PARM_CTR_TYPE','CTR_TYPE',p_counter_type);
424: end if;
425: elsif p_derive_function='AVERAGE' and p_filter_type='COUNT' then
426: if p_filter_reading_count < 0 then
427: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_FORMULA');
423: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_PARM_CTR_TYPE','CTR_TYPE',p_counter_type);
424: end if;
425: elsif p_derive_function='AVERAGE' and p_filter_type='COUNT' then
426: if p_filter_reading_count < 0 then
427: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_FORMULA');
428: end if;
429:
430: if p_formula_text is not null or
431: p_filter_time_uom is not null or
439: p_estimation_id is not null
440: -- p_tolerance_plus is not null or
441: -- p_tolerance_minus is not null
442: then
443: csi_ctr_gen_utility_pvt.put_line(' Failed Average and Count');
444: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_PARM_CTR_TYPE','CTR_TYPE',p_counter_type);
445: end if;
446: elsif p_derive_function='AVERAGE' and p_filter_type='TIME' then
447: if p_filter_time_uom is null then
440: -- p_tolerance_plus is not null or
441: -- p_tolerance_minus is not null
442: then
443: csi_ctr_gen_utility_pvt.put_line(' Failed Average and Count');
444: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_PARM_CTR_TYPE','CTR_TYPE',p_counter_type);
445: end if;
446: elsif p_derive_function='AVERAGE' and p_filter_type='TIME' then
447: if p_filter_time_uom is null then
448: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_FORMULA');
444: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_PARM_CTR_TYPE','CTR_TYPE',p_counter_type);
445: end if;
446: elsif p_derive_function='AVERAGE' and p_filter_type='TIME' then
447: if p_filter_time_uom is null then
448: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_FORMULA');
449: end if;
450:
451: if p_formula_text is not null or
452: p_filter_reading_count is not null or
460: p_estimation_id is not null
461: -- p_tolerance_plus is not null or
462: -- p_tolerance_minus is not null
463: then
464: csi_ctr_gen_utility_pvt.put_line(' Failed Average and Time');
465: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_PARM_CTR_TYPE','CTR_TYPE',p_counter_type);
466: end if;
467: elsif p_derive_function in ('SUM','COUNT') then
468: /* if p_derive_counter_id is null then
461: -- p_tolerance_plus is not null or
462: -- p_tolerance_minus is not null
463: then
464: csi_ctr_gen_utility_pvt.put_line(' Failed Average and Time');
465: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_PARM_CTR_TYPE','CTR_TYPE',p_counter_type);
466: end if;
467: elsif p_derive_function in ('SUM','COUNT') then
468: /* if p_derive_counter_id is null then
469: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_FORMULA');
465: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_PARM_CTR_TYPE','CTR_TYPE',p_counter_type);
466: end if;
467: elsif p_derive_function in ('SUM','COUNT') then
468: /* if p_derive_counter_id is null then
469: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_FORMULA');
470: end if;
471: */
472:
473: if p_formula_text is not null or
483: p_estimation_id is not null
484: -- p_tolerance_plus is not null or
485: -- p_tolerance_minus is not null
486: then
487: csi_ctr_gen_utility_pvt.put_line(' Failed Sum and Count');
488: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_PARM_CTR_TYPE','CTR_TYPE',p_counter_type);
489: end if;
490: end if;
491: end if; -- p_counter_type
484: -- p_tolerance_plus is not null or
485: -- p_tolerance_minus is not null
486: then
487: csi_ctr_gen_utility_pvt.put_line(' Failed Sum and Count');
488: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_PARM_CTR_TYPE','CTR_TYPE',p_counter_type);
489: end if;
490: end if;
491: end if; -- p_counter_type
492:
568: -- Initialize API return status to success
569: x_return_status := FND_API.G_RET_STS_SUCCESS;
570:
571: -- Read the debug profiles values in to global variable 7197402
572: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
573:
574: --
575: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
576: csi_ctr_gen_utility_pvt.put_line
571: -- Read the debug profiles values in to global variable 7197402
572: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
573:
574: --
575: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
576: csi_ctr_gen_utility_pvt.put_line
577: ('create_counter_group_pvt' ||'-'||
578: p_api_version ||'-'||
579: nvl(p_commit,FND_API.G_FALSE) ||'-'||
572: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
573:
574: --
575: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
576: csi_ctr_gen_utility_pvt.put_line
577: ('create_counter_group_pvt' ||'-'||
578: p_api_version ||'-'||
579: nvl(p_commit,FND_API.G_FALSE) ||'-'||
580: nvl(p_init_msg_list,FND_API.G_FALSE) ||'-'||
626: end if;
627:
628: if l_end_date_active IS NOT NULL then
629: if l_end_date_active < l_start_date_active then
630: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_ALL_END_DATE');
631: end if;
632: end if;
633:
634: if p_counter_groups_rec.attribute1 = FND_API.G_MISS_CHAR then
923: FND_MSG_PUB.initialize;
924: END IF;
925:
926: -- Read the debug profiles values in to global variable 7197402
927: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
928:
929: -- Initialize API return status to success
930: x_return_status := FND_API.G_RET_STS_SUCCESS;
931:
929: -- Initialize API return status to success
930: x_return_status := FND_API.G_RET_STS_SUCCESS;
931:
932: --
933: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
934: csi_ctr_gen_utility_pvt.put_line
935: ( 'create_item_association_pvt' ||'-'||
936: p_api_version ||'-'||
937: nvl(p_commit,FND_API.G_FALSE) ||'-'||
930: x_return_status := FND_API.G_RET_STS_SUCCESS;
931:
932: --
933: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
934: csi_ctr_gen_utility_pvt.put_line
935: ( 'create_item_association_pvt' ||'-'||
936: p_api_version ||'-'||
937: nvl(p_commit,FND_API.G_FALSE) ||'-'||
938: nvl(p_init_msg_list,FND_API.G_FALSE) ||'-'||
989:
990: validate_start_date(l_start_date_active);
991:
992: IF l_start_date_active > sysdate THEN
993: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_GRP_FUT_DATE');
994: END IF;
995:
996: IF l_associated_to_group = 'Y' THEN
997: OPEN c1_group(l_group_id);
997: OPEN c1_group(l_group_id);
998: FETCH c1_group INTO l_valid_start_date;
999:
1000: IF l_start_date_active < l_valid_start_date THEN
1001: csi_ctr_gen_utility_pvt.ExitWithErrMsg
1002: ( p_msg_name => 'CSI_API_CTR_VAL_ST_DATE',
1003: p_token1_name => 'PARAM',
1004: p_token1_val => 'The item association start date cannot be less than the active start date of the counter group.');
1005: END IF;
1008: OPEN c2_counter(l_counter_id);
1009: FETCH c2_counter INTO l_valid_start_date;
1010:
1011: IF l_start_date_active < l_valid_start_date THEN
1012: csi_ctr_gen_utility_pvt.ExitWithErrMsg
1013: ( p_msg_name => 'CSI_API_CTR_VAL_ST_DATE',
1014: p_token1_name => 'PARAM',
1015: p_token1_val => 'The item association start date cannot be less than the active start date of the counter.');
1016: END IF;
1024: end if;
1025:
1026: if l_end_date_active IS NOT NULL then
1027: if l_end_date_active < l_start_date_active then
1028: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_ALL_END_DATE');
1029: end if;
1030: end if;
1031:
1032: if p_ctr_item_associations_rec.attribute1 = FND_API.G_MISS_CHAR then
1169: FROM csi_ctr_item_associations
1170: WHERE inventory_item_id = l_inventory_item_id
1171: AND nvl(associated_to_group,'N') = 'Y';
1172:
1173: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
1174: EXCEPTION
1175: WHEN NO_DATA_FOUND THEN NULL;
1176: WHEN TOO_MANY_ROWS THEN
1177: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
1173: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
1174: EXCEPTION
1175: WHEN NO_DATA_FOUND THEN NULL;
1176: WHEN TOO_MANY_ROWS THEN
1177: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
1178: END;
1179: END IF;
1180: END IF;
1181:
1189: AND associated_to_group = l_associated_to_group
1190: -- AND group_id = l_group_id
1191: AND counter_id = l_counter_id;
1192:
1193: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
1194: EXCEPTION
1195: WHEN NO_DATA_FOUND THEN NULL;
1196: WHEN TOO_MANY_ROWS THEN
1197: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
1193: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
1194: EXCEPTION
1195: WHEN NO_DATA_FOUND THEN NULL;
1196: WHEN TOO_MANY_ROWS THEN
1197: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
1198: END;
1199: ELSE
1200: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_GRP_NAME');
1201: END IF;
1196: WHEN TOO_MANY_ROWS THEN
1197: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
1198: END;
1199: ELSE
1200: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_GRP_NAME');
1201: END IF;
1202: ELSE
1203: IF l_group_id IS NULL THEN
1204: IF l_counter_id IS NULL THEN
1201: END IF;
1202: ELSE
1203: IF l_group_id IS NULL THEN
1204: IF l_counter_id IS NULL THEN
1205: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_CTR_ID');
1206: END IF;
1207:
1208: BEGIN
1209: SELECT 'Y'
1219: l_item_found := 'Y';
1220: END;
1221:
1222: IF l_item_found = 'Y' THEN
1223: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
1224: ELSE
1225: BEGIN
1226: SELECT 'x'
1227: INTO l_item_invalid
1230: AND associated_to_group = l_associated_to_group
1231: AND group_id IS NULL
1232: AND counter_id = l_counter_id;
1233:
1234: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
1235: EXCEPTION
1236: WHEN NO_DATA_FOUND THEN NULL;
1237: WHEN OTHERS THEN
1238: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
1234: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
1235: EXCEPTION
1236: WHEN NO_DATA_FOUND THEN NULL;
1237: WHEN OTHERS THEN
1238: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
1239: END;
1240: END IF;
1241: ELSE
1242: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_GRP_NULL');
1238: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
1239: END;
1240: END IF;
1241: ELSE
1242: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_GRP_NULL');
1243: END IF;
1244: END IF;
1245:
1246: /* Call the table Handler */
1450: FND_MSG_PUB.initialize;
1451: END IF;
1452:
1453: -- Read the debug profiles values in to global variable 7197402
1454: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
1455:
1456: -- Initialize API return status to success
1457: x_return_status := FND_API.G_RET_STS_SUCCESS;
1458:
1456: -- Initialize API return status to success
1457: x_return_status := FND_API.G_RET_STS_SUCCESS;
1458:
1459: --
1460: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
1461: csi_ctr_gen_utility_pvt.put_line
1462: ( 'create_counter_template_pvt' ||'-'||
1463: p_api_version ||'-'||
1464: nvl(p_commit,FND_API.G_FALSE) ||'-'||
1457: x_return_status := FND_API.G_RET_STS_SUCCESS;
1458:
1459: --
1460: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
1461: csi_ctr_gen_utility_pvt.put_line
1462: ( 'create_counter_template_pvt' ||'-'||
1463: p_api_version ||'-'||
1464: nvl(p_commit,FND_API.G_FALSE) ||'-'||
1465: nvl(p_init_msg_list,FND_API.G_FALSE) ||'-'||
1640: OPEN c1_group(l_group_id);
1641: FETCH c1_group INTO l_valid_start_date;
1642:
1643: IF l_start_date_active < l_valid_start_date THEN
1644: csi_ctr_gen_utility_pvt.ExitWithErrMsg
1645: ( p_msg_name => 'CSI_API_CTR_VAL_ST_DATE',
1646: p_token1_name => 'PARAM',
1647: p_token1_val => 'The counter template start date cannot be less than the active start date of the counter group.');
1648: END IF;
1657: end if;
1658:
1659: if l_end_date_active IS NOT NULL then
1660: if l_end_date_active < l_start_date_active then
1661: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_ALL_END_DATE');
1662: end if;
1663: end if;
1664:
1665: if p_counter_template_rec.attribute1 = FND_API.G_MISS_CHAR then
1905: WHILE l_msg_count > 0 LOOP
1906: x_msg_data := FND_MSG_PUB.GET
1907: (l_msg_index,
1908: FND_API.G_FALSE );
1909: csi_ctr_gen_utility_pvt.put_line('Error from CSI_COUNTER_PVT.CREATE_COUNTER_GROUP');
1910: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1911: l_msg_index := l_msg_index + 1;
1912: l_msg_count := l_msg_count - 1;
1913: END LOOP;
1906: x_msg_data := FND_MSG_PUB.GET
1907: (l_msg_index,
1908: FND_API.G_FALSE );
1909: csi_ctr_gen_utility_pvt.put_line('Error from CSI_COUNTER_PVT.CREATE_COUNTER_GROUP');
1910: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1911: l_msg_index := l_msg_index + 1;
1912: l_msg_count := l_msg_count - 1;
1913: END LOOP;
1914: RAISE FND_API.G_EXC_ERROR;
2139: FND_MSG_PUB.initialize;
2140: END IF;
2141:
2142: -- Read the debug profiles values in to global variable 7197402
2143: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
2144:
2145: -- Initialize API return status to success
2146: x_return_status := FND_API.G_RET_STS_SUCCESS;
2147:
2145: -- Initialize API return status to success
2146: x_return_status := FND_API.G_RET_STS_SUCCESS;
2147:
2148: --
2149: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
2150: csi_ctr_gen_utility_pvt.put_line( 'create_ctr_property_tmpl_pvt' ||'-'||
2151: p_api_version ||'-'||
2152: nvl(p_commit,FND_API.G_FALSE) ||'-'||
2153: nvl(p_init_msg_list,FND_API.G_FALSE) ||'-'||
2146: x_return_status := FND_API.G_RET_STS_SUCCESS;
2147:
2148: --
2149: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
2150: csi_ctr_gen_utility_pvt.put_line( 'create_ctr_property_tmpl_pvt' ||'-'||
2151: p_api_version ||'-'||
2152: nvl(p_commit,FND_API.G_FALSE) ||'-'||
2153: nvl(p_init_msg_list,FND_API.G_FALSE) ||'-'||
2154: nvl(p_validation_level,FND_API.G_VALID_LEVEL_FULL) );
2533: FND_MSG_PUB.initialize;
2534: END IF;
2535:
2536: -- Read the debug profiles values in to global variable 7197402
2537: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
2538:
2539: -- Initialize API return status to success
2540: x_return_status := FND_API.G_RET_STS_SUCCESS;
2541:
2539: -- Initialize API return status to success
2540: x_return_status := FND_API.G_RET_STS_SUCCESS;
2541:
2542: --
2543: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
2544: csi_ctr_gen_utility_pvt.put_line
2545: ( 'create_ctr_relationship_pvt' ||'-'||
2546: p_api_version ||'-'||
2547: nvl(p_commit,FND_API.G_FALSE) ||'-'||
2540: x_return_status := FND_API.G_RET_STS_SUCCESS;
2541:
2542: --
2543: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
2544: csi_ctr_gen_utility_pvt.put_line
2545: ( 'create_ctr_relationship_pvt' ||'-'||
2546: p_api_version ||'-'||
2547: nvl(p_commit,FND_API.G_FALSE) ||'-'||
2548: nvl(p_init_msg_list,FND_API.G_FALSE) ||'-'||
2710: else
2711: l_factor := p_counter_relationships_rec.factor;
2712: end if;
2713:
2714: csi_ctr_gen_utility_pvt.put_line('Relationship type code = '||l_relationship_type_code);
2715:
2716: validate_start_date(l_active_start_date);
2717: validate_lookups('CSI_CTR_RELATIONSHIP_TYPE_CODE', l_relationship_type_code);
2718:
2722: validate_ctr_relationship(l_object_counter_id, l_object_direction
2723: ,l_obj_ctr_start_date, l_obj_ctr_end_date);
2724: /* Validate direction */
2725: IF l_source_direction = 'B' and l_object_direction <> 'B' THEN
2726: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_REL_DIR');
2727: END IF;
2728:
2729: IF l_object_direction = 'B' and l_source_direction <> 'B' THEN
2730: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_REL_DIR');
2726: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_REL_DIR');
2727: END IF;
2728:
2729: IF l_object_direction = 'B' and l_source_direction <> 'B' THEN
2730: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_REL_DIR');
2731: END IF;
2732:
2733: IF l_active_start_date < l_src_ctr_start_date THEN
2734: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_SOURCE_ST_DATE');
2730: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_REL_DIR');
2731: END IF;
2732:
2733: IF l_active_start_date < l_src_ctr_start_date THEN
2734: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_SOURCE_ST_DATE');
2735: ELSIF l_active_start_date < l_obj_ctr_start_date THEN
2736: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_SOURCE_ST_DATE');
2737: END IF;
2738:
2732:
2733: IF l_active_start_date < l_src_ctr_start_date THEN
2734: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_SOURCE_ST_DATE');
2735: ELSIF l_active_start_date < l_obj_ctr_start_date THEN
2736: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_SOURCE_ST_DATE');
2737: END IF;
2738:
2739: IF l_src_ctr_end_date IS NOT NULL THEN
2740: IF l_active_start_date > l_src_ctr_end_date THEN
2737: END IF;
2738:
2739: IF l_src_ctr_end_date IS NOT NULL THEN
2740: IF l_active_start_date > l_src_ctr_end_date THEN
2741: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_SOURCE_ST_DATE');
2742: END IF;
2743: END IF;
2744:
2745: IF l_obj_ctr_end_date IS NOT NULL THEN
2743: END IF;
2744:
2745: IF l_obj_ctr_end_date IS NOT NULL THEN
2746: IF l_active_start_date > l_obj_ctr_end_date THEN
2747: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_SOURCE_ST_DATE');
2748: END IF;
2749: END IF;
2750:
2751: OPEN c1(l_source_counter_id);
2751: OPEN c1(l_source_counter_id);
2752: FETCH c1 into l_reading_date;
2753: IF l_reading_date IS NOT NULL THEN
2754: IF l_active_start_date < l_reading_date THEN
2755: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_SOURCE_ST_DATE');
2756: END IF;
2757: END IF;
2758: CLOSE c1;
2759:
2760: OPEN c1(l_object_counter_id);
2761: FETCH c1 into l_reading_date;
2762: IF l_reading_date IS NOT NULL THEN
2763: IF l_active_start_date < l_reading_date THEN
2764: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_SOURCE_ST_DATE');
2765: END IF;
2766: END IF;
2767: CLOSE c1;
2768:
2774: WHERE relationship_type_code = 'CONFIGURATION'
2775: AND source_counter_id = l_object_counter_id
2776: AND NVL(active_end_date, SYSDATE+1) > SYSDATE; --bug9160706
2777:
2778: csi_ctr_gen_utility_pvt.put_line('Source relationship exists');--bug9160706
2779:
2780: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_TARGET_CTR_EXIST');
2781:
2782: EXCEPTION
2776: AND NVL(active_end_date, SYSDATE+1) > SYSDATE; --bug9160706
2777:
2778: csi_ctr_gen_utility_pvt.put_line('Source relationship exists');--bug9160706
2779:
2780: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_TARGET_CTR_EXIST');
2781:
2782: EXCEPTION
2783: WHEN NO_DATA_FOUND THEN
2784: csi_ctr_gen_utility_pvt.put_line('No source relationship exists');--bug9160706
2780: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_TARGET_CTR_EXIST');
2781:
2782: EXCEPTION
2783: WHEN NO_DATA_FOUND THEN
2784: csi_ctr_gen_utility_pvt.put_line('No source relationship exists');--bug9160706
2785: NULL;
2786: WHEN TOO_MANY_ROWS THEN
2787: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_TARGET_CTR_EXIST');
2788:
2783: WHEN NO_DATA_FOUND THEN
2784: csi_ctr_gen_utility_pvt.put_line('No source relationship exists');--bug9160706
2785: NULL;
2786: WHEN TOO_MANY_ROWS THEN
2787: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_TARGET_CTR_EXIST');
2788:
2789: END;
2790: ELSIF l_relationship_type_code = 'FORMULA' THEN
2791: IF l_source_counter_id IS NULL THEN
2788:
2789: END;
2790: ELSIF l_relationship_type_code = 'FORMULA' THEN
2791: IF l_source_counter_id IS NULL THEN
2792: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_FORMULA_REF');
2793: END IF;
2794: END IF;
2795:
2796: /* Call the table Handler */
2916: SAVEPOINT create_derived_filters;
2917:
2918: -- Check for freeze_flag in csi_install_parameters is set to 'Y'
2919:
2920: -- csi_ctr_gen_utility_pvt.check_ib_active;
2921:
2922: -- Standard call to check for call compatibility.
2923: IF NOT FND_API.Compatible_API_Call (l_api_version,
2924: p_api_version,
2935: -- Initialize API return status to success
2936: x_return_status := FND_API.G_RET_STS_SUCCESS;
2937:
2938: -- Read the debug profiles values in to global variable 7197402
2939: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
2940:
2941: -- Check the profile option debug_level for debug message reporting
2942: -- l_debug_level:=fnd_profile.value('CSI_COUNTER_DEBUG_LEVEL');
2943:
2941: -- Check the profile option debug_level for debug message reporting
2942: -- l_debug_level:=fnd_profile.value('CSI_COUNTER_DEBUG_LEVEL');
2943:
2944: -- If debug_level = 1 then dump the procedure name
2945: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
2946: csi_ctr_gen_utility_pvt.put_line( 'create_derived_filters');
2947: END IF;
2948:
2949: -- If the debug level = 2 then dump all the parameters values.
2942: -- l_debug_level:=fnd_profile.value('CSI_COUNTER_DEBUG_LEVEL');
2943:
2944: -- If debug_level = 1 then dump the procedure name
2945: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
2946: csi_ctr_gen_utility_pvt.put_line( 'create_derived_filters');
2947: END IF;
2948:
2949: -- If the debug level = 2 then dump all the parameters values.
2950: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 1) THEN
2946: csi_ctr_gen_utility_pvt.put_line( 'create_derived_filters');
2947: END IF;
2948:
2949: -- If the debug level = 2 then dump all the parameters values.
2950: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 1) THEN
2951: csi_ctr_gen_utility_pvt.put_line( 'create_derived_filters' ||
2952: p_api_version ||'-'||
2953: p_commit ||'-'||
2954: p_init_msg_list ||'-'||
2947: END IF;
2948:
2949: -- If the debug level = 2 then dump all the parameters values.
2950: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 1) THEN
2951: csi_ctr_gen_utility_pvt.put_line( 'create_derived_filters' ||
2952: p_api_version ||'-'||
2953: p_commit ||'-'||
2954: p_init_msg_list ||'-'||
2955: p_validation_level );
2952: p_api_version ||'-'||
2953: p_commit ||'-'||
2954: p_init_msg_list ||'-'||
2955: p_validation_level );
2956: csi_ctr_gen_utility_pvt.dump_ctr_derived_filters_tbl(p_ctr_derived_filters_tbl);
2957: END IF;
2958:
2959: IF (p_ctr_derived_filters_tbl.count > 0) THEN
2960: FOR tab_row IN p_ctr_derived_filters_tbl.FIRST .. p_ctr_derived_filters_tbl.LAST
2969: WHERE counter_id = l_ctr_derived_filters_rec.counter_id;
2970:
2971: EXCEPTION
2972: WHEN NO_DATA_FOUND THEN
2973: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_CTR_INVALID');
2974:
2975: -- validate all counter types are GROUP type
2976: IF l_type <> 'FORMULA' THEN
2977: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_CTR_INV_GROUP_CTR','CTR_NAME',l_name);
2973: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_CTR_INVALID');
2974:
2975: -- validate all counter types are GROUP type
2976: IF l_type <> 'FORMULA' THEN
2977: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_CTR_INV_GROUP_CTR','CTR_NAME',l_name);
2978: END IF;
2979: END;
2980:
2981: BEGIN
2985: FROM csi_ctr_properties_bc_v
2986: WHERE counter_property_id = l_ctr_derived_filters_rec.counter_property_id;
2987:
2988: EXCEPTION WHEN NO_DATA_FOUND THEN
2989: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_CTR_PROP_INVALID');
2990: END;
2991:
2992: -- validate LEFT_PARENT
2993: IF l_ctr_derived_filters_rec.LEFT_PARENT NOT IN ('(', '((', '(((', '((((', '(((((') THEN
2990: END;
2991:
2992: -- validate LEFT_PARENT
2993: IF l_ctr_derived_filters_rec.LEFT_PARENT NOT IN ('(', '((', '(((', '((((', '(((((') THEN
2994: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_INV_DER_LEFT_PARENT',
2995: 'PARM',l_ctr_derived_filters_rec.LEFT_PARENT);
2996: END IF;
2997:
2998: -- validate RIGHT_PARENT
2996: END IF;
2997:
2998: -- validate RIGHT_PARENT
2999: IF l_ctr_derived_filters_rec.RIGHT_PARENT NOT IN (')', '))', ')))', '))))', ')))))') THEN
3000: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_INV_DER_RIGHT_PARENT',
3001: 'PARM',l_ctr_derived_filters_rec.RIGHT_PARENT);
3002: END IF;
3003:
3004: -- validate RELATIONAL_OPERATOR
3002: END IF;
3003:
3004: -- validate RELATIONAL_OPERATOR
3005: IF l_ctr_derived_filters_rec.RELATIONAL_OPERATOR NOT IN ('=', '<', '<=', '>', '>=', '!=', '<>') THEN
3006: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_INV_DER_REL_OPERATOR',
3007: 'PARM',l_ctr_derived_filters_rec.RELATIONAL_OPERATOR);
3008: END IF;
3009:
3010: -- validate LOGICAL_OPERATOR
3017: END IF;
3018:
3019: IF l_log_op IS NOT NULL THEN
3020: IF l_log_op NOT IN ('AND', 'OR') THEN
3021: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_INV_DER_LOG_OPERATOR',
3022: 'PARM',l_ctr_derived_filters_rec.LOGICAL_OPERATOR);
3023: END IF;
3024: END IF;
3025:
3023: END IF;
3024: END IF;
3025:
3026: -- initialize descritive flexfield
3027: --csi_ctr_gen_utility_pvt.Initialize_Desc_Flex(l_desc_flex);
3028:
3029: -- validate Descritive Flexfields
3030: /*
3031: csi_ctr_gen_utility_pvt.Is_DescFlex_Valid
3027: --csi_ctr_gen_utility_pvt.Initialize_Desc_Flex(l_desc_flex);
3028:
3029: -- validate Descritive Flexfields
3030: /*
3031: csi_ctr_gen_utility_pvt.Is_DescFlex_Valid
3032: (
3033: p_api_name => l_api_name,
3034: p_appl_short_name => 'CSI',
3035: p_desc_flex_name => 'CSI_COUNTER_DERIVED_FILTERS',
3058:
3059: -- this means that for this counter, there is one another
3060: -- derived filter record with the same sequence number.
3061: -- Raise error.
3062: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_CTR_DUP_DERFILTER_SEQNO',
3063: 'SEQNO',to_char(l_ctr_derived_filters_rec.SEQ_NO),
3064: 'CTR_NAME',l_name);
3065:
3066: EXCEPTION WHEN NO_DATA_FOUND THEN
3111: END LOOP;
3112: END IF;
3113: --Check if the counter can be marked "valid" with the
3114: --addition of this filter.
3115: csi_ctr_gen_utility_pvt.Validate_GrpOp_ctr
3116: (
3117: p_api_version => 1.0,
3118: p_commit => FND_API.G_FALSE,
3119: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
3267: -- Initialize API return status to success
3268: x_return_status := FND_API.G_RET_STS_SUCCESS;
3269:
3270: -- Read the debug profiles values in to global variable 7197402
3271: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
3272:
3273: --
3274: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
3275: csi_ctr_gen_utility_pvt.put_line
3270: -- Read the debug profiles values in to global variable 7197402
3271: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
3272:
3273: --
3274: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
3275: csi_ctr_gen_utility_pvt.put_line
3276: ( 'update_counter_group_pvt' ||'-'||
3277: p_api_version ||'-'||
3278: nvl(p_commit,FND_API.G_FALSE) ||'-'||
3271: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
3272:
3273: --
3274: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
3275: csi_ctr_gen_utility_pvt.put_line
3276: ( 'update_counter_group_pvt' ||'-'||
3277: p_api_version ||'-'||
3278: nvl(p_commit,FND_API.G_FALSE) ||'-'||
3279: nvl(p_init_msg_list,FND_API.G_FALSE) ||'-'||
3291:
3292: CLOSE cur_group_rec;
3293:
3294: -- IF SQL%NOTFOUND THEN
3295: -- CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_GRP_NOTEXISTS');
3296: -- END IF;
3297:
3298: l_counter_groups_rec := p_counter_groups_rec;
3299:
3322: END IF;
3323:
3324: if l_counter_groups_rec.end_date_active IS NOT NULL then
3325: if l_counter_groups_rec.end_date_active < l_counter_groups_rec.start_date_active then
3326: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_ALL_END_DATE');
3327: end if;
3328: end if;
3329:
3330: IF p_counter_groups_rec.attribute1 IS NULL THEN
3455:
3456: -- Counter group name is not updateable
3457:
3458: IF l_counter_groups_rec.name <> l_old_counter_groups_rec.name THEN
3459: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_GRP_NOT_UPDATABLE');
3460: END IF;
3461:
3462:
3463: -- Call the table handler
3640: -- Initialize API return status to success
3641: x_return_status := FND_API.G_RET_STS_SUCCESS;
3642:
3643: -- Read the debug profiles values in to global variable 7197402
3644: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
3645:
3646: --
3647: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
3648: csi_ctr_gen_utility_pvt.put_line( 'update_item_association_pvt' ||'-'||
3643: -- Read the debug profiles values in to global variable 7197402
3644: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
3645:
3646: --
3647: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
3648: csi_ctr_gen_utility_pvt.put_line( 'update_item_association_pvt' ||'-'||
3649: p_api_version ||'-'||
3650: nvl(p_commit,FND_API.G_FALSE) ||'-'||
3651: nvl(p_init_msg_list,FND_API.G_FALSE) ||'-'||
3644: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
3645:
3646: --
3647: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
3648: csi_ctr_gen_utility_pvt.put_line( 'update_item_association_pvt' ||'-'||
3649: p_api_version ||'-'||
3650: nvl(p_commit,FND_API.G_FALSE) ||'-'||
3651: nvl(p_init_msg_list,FND_API.G_FALSE) ||'-'||
3652: nvl(p_validation_level,FND_API.G_VALID_LEVEL_FULL) );
3663:
3664: CLOSE cur_item_assoc_rec;
3665:
3666: -- IF SQL%NOTFOUND THEN
3667: -- CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_ITEM_ASSOC_NOTEXISTS');
3668: -- END IF;
3669:
3670: l_item_associations_rec := p_ctr_item_associations_rec;
3671:
3694: END IF;
3695:
3696: if l_item_associations_rec.end_date_active IS NOT NULL then
3697: if l_item_associations_rec.end_date_active < l_item_associations_rec.start_date_active then
3698: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_ALL_END_DATE');
3699: end if;
3700: end if;
3701:
3702: IF p_ctr_item_associations_rec.attribute1 IS NULL THEN
3852: INTO l_item_invalid
3853: FROM csi_ctr_item_associations
3854: WHERE inventory_item_id = l_item_associations_rec.inventory_item_id;
3855:
3856: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
3857: EXCEPTION
3858: WHEN NO_DATA_FOUND THEN NULL;
3859: WHEN TOO_MANY_ROWS THEN
3860: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
3856: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
3857: EXCEPTION
3858: WHEN NO_DATA_FOUND THEN NULL;
3859: WHEN TOO_MANY_ROWS THEN
3860: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
3861: END;
3862: END IF;
3863: END IF;
3864: END IF;
3873: AND associated_to_group = l_item_associations_rec.associated_to_group
3874: -- AND group_id = l_group_id
3875: AND counter_id = l_item_associations_rec.counter_id;
3876:
3877: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
3878: EXCEPTION
3879: WHEN NO_DATA_FOUND THEN NULL;
3880: WHEN TOO_MANY_ROWS THEN
3881: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
3877: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
3878: EXCEPTION
3879: WHEN NO_DATA_FOUND THEN NULL;
3880: WHEN TOO_MANY_ROWS THEN
3881: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
3882: END;
3883: ELSE
3884: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_GRP_NAME');
3885: END IF;
3880: WHEN TOO_MANY_ROWS THEN
3881: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
3882: END;
3883: ELSE
3884: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_PARM_GRP_NAME');
3885: END IF;
3886: ELSE
3887: IF l_item_associations_rec.group_id IS NULL THEN
3888: IF l_item_associations_rec.counter_id IS NULL THEN
3885: END IF;
3886: ELSE
3887: IF l_item_associations_rec.group_id IS NULL THEN
3888: IF l_item_associations_rec.counter_id IS NULL THEN
3889: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_CTR_ID');
3890: END IF;
3891:
3892: BEGIN
3893: SELECT 'Y'
3903: l_item_found := 'Y';
3904: END;
3905:
3906: IF l_item_found = 'Y' THEN
3907: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
3908: ELSE
3909: BEGIN
3910: SELECT 'x'
3911: INTO l_item_invalid
3914: AND associated_to_group = l_item_associations_rec.associated_to_group
3915: AND group_id IS NULL
3916: AND counter_id = l_item_associations_rec.counter_id;
3917:
3918: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
3919: EXCEPTION
3920: WHEN NO_DATA_FOUND THEN NULL;
3921: WHEN OTHERS THEN
3922: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
3918: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
3919: EXCEPTION
3920: WHEN NO_DATA_FOUND THEN NULL;
3921: WHEN OTHERS THEN
3922: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
3923: END;
3924: END IF;
3925: ELSE
3926: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_GRP_NULL');
3922: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_ITEM_ASSOC');
3923: END;
3924: END IF;
3925: ELSE
3926: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_GRP_NULL');
3927: END IF;
3928: END IF;
3929:
3930: */
4165: -- Initialize API return status to success
4166: x_return_status := FND_API.G_RET_STS_SUCCESS;
4167:
4168: -- Read the debug profiles values in to global variable 7197402
4169: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
4170:
4171: --
4172: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
4173: csi_ctr_gen_utility_pvt.put_line( 'update_counter_template_pvt' ||'-'||
4168: -- Read the debug profiles values in to global variable 7197402
4169: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
4170:
4171: --
4172: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
4173: csi_ctr_gen_utility_pvt.put_line( 'update_counter_template_pvt' ||'-'||
4174: p_api_version ||'-'||
4175: nvl(p_commit,FND_API.G_FALSE) ||'-'||
4176: nvl(p_init_msg_list,FND_API.G_FALSE) ||'-'||
4169: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
4170:
4171: --
4172: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
4173: csi_ctr_gen_utility_pvt.put_line( 'update_counter_template_pvt' ||'-'||
4174: p_api_version ||'-'||
4175: nvl(p_commit,FND_API.G_FALSE) ||'-'||
4176: nvl(p_init_msg_list,FND_API.G_FALSE) ||'-'||
4177: nvl(p_validation_level,FND_API.G_VALID_LEVEL_FULL) );
4188:
4189: CLOSE cur_ctr_template_rec;
4190:
4191: -- IF SQL%NOTFOUND THEN
4192: -- CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INVALID');
4193: -- END IF;
4194:
4195: -- Bug 8686933
4196: -- Assigning group id to defaulted group id column
4316: END IF;
4317:
4318: if l_counter_template_rec.end_date_active IS NOT NULL then
4319: if l_counter_template_rec.end_date_active < l_counter_template_rec.start_date_active then
4320: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_ALL_END_DATE');
4321: end if;
4322: end if;
4323:
4324:
4595: X_msg_data => l_msg_data
4596: );
4597:
4598: IF NOT (l_return_status = FND_API.G_RET_STS_SUCCESS ) THEN
4599: csi_ctr_gen_utility_pvt.put_line('used in scheduling cannot be updated');
4600: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_USEDINSCHED_NOT_UPDT');
4601: END IF;
4602: END IF;
4603:
4596: );
4597:
4598: IF NOT (l_return_status = FND_API.G_RET_STS_SUCCESS ) THEN
4599: csi_ctr_gen_utility_pvt.put_line('used in scheduling cannot be updated');
4600: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_USEDINSCHED_NOT_UPDT');
4601: END IF;
4602: END IF;
4603:
4604: csi_ctr_gen_utility_pvt.put_line('p_counter_template_rec.defaulted_group_id - ' || p_counter_template_rec.defaulted_group_id);
4600: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_USEDINSCHED_NOT_UPDT');
4601: END IF;
4602: END IF;
4603:
4604: csi_ctr_gen_utility_pvt.put_line('p_counter_template_rec.defaulted_group_id - ' || p_counter_template_rec.defaulted_group_id);
4605: IF p_counter_template_rec.defaulted_group_id IS NULL THEN
4606: l_counter_template_rec.defaulted_group_id := l_old_counter_template_rec.defaulted_group_id;
4607: ELSIF p_counter_template_rec.defaulted_group_id = FND_API.G_MISS_NUM THEN
4608: l_counter_template_rec.defaulted_group_id := NULL;
4621: END IF;
4622:
4623: -- Counter group is not updateable
4624: IF l_counter_template_rec.counter_id <> l_old_counter_template_rec.counter_id THEN
4625: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_GRP_NOT_UPDATABLE');
4626: END IF;
4627:
4628: IF l_counter_template_rec.counter_type <> l_old_counter_template_rec.counter_type THEN
4629: IF l_old_counter_template_rec.counter_type = 'FORMULA' AND
4634: CLOSE formula_ref_cur;
4635: IF l_formula_ref_count is not null then
4636: -- Formula references exist for this counter. You cannot
4637: -- change the type to something different.
4638: csi_ctr_gen_utility_pvt.put_line('Formula References exist for this counter. Cannot change counter type...');
4639: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CS_API_CTR_FMLA_REF_EXIST','CTR_NAME',l_counter_template_rec.name);
4640: END IF;
4641: ELSIF l_old_counter_template_rec.counter_type = 'FORMULA'
4642: and l_old_counter_template_rec.derive_function in ('SUM','COUNT') THEN
4635: IF l_formula_ref_count is not null then
4636: -- Formula references exist for this counter. You cannot
4637: -- change the type to something different.
4638: csi_ctr_gen_utility_pvt.put_line('Formula References exist for this counter. Cannot change counter type...');
4639: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CS_API_CTR_FMLA_REF_EXIST','CTR_NAME',l_counter_template_rec.name);
4640: END IF;
4641: ELSIF l_old_counter_template_rec.counter_type = 'FORMULA'
4642: and l_old_counter_template_rec.derive_function in ('SUM','COUNT') THEN
4643: OPEN derived_filters_cur(p_counter_template_rec.counter_id);
4645: CLOSE derived_filters_cur;
4646: IF l_der_filter_count is not null then
4647: -- Derived filters exist for this counter. You cannot
4648: -- change the type to something different.
4649: csi_ctr_gen_utility_pvt.put_line('Derived Filters exist for this counter. Cannot change counter type...');
4650: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_DER_FILTER_EXIST','CTR_NAME',l_counter_template_rec.name);
4651: END IF;
4652: ELSIF l_old_counter_template_rec.counter_type = 'REGULAR' THEN
4653: OPEN target_counter_cur(p_counter_template_rec.counter_id);
4646: IF l_der_filter_count is not null then
4647: -- Derived filters exist for this counter. You cannot
4648: -- change the type to something different.
4649: csi_ctr_gen_utility_pvt.put_line('Derived Filters exist for this counter. Cannot change counter type...');
4650: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_DER_FILTER_EXIST','CTR_NAME',l_counter_template_rec.name);
4651: END IF;
4652: ELSIF l_old_counter_template_rec.counter_type = 'REGULAR' THEN
4653: OPEN target_counter_cur(p_counter_template_rec.counter_id);
4654: FETCH target_counter_cur INTO l_target_ctr_exist;
4655: CLOSE target_counter_cur;
4656: IF l_target_ctr_exist is not null then
4657: -- Target counters exist for this counter. You cannot
4658: -- change the type to something different.
4659: csi_ctr_gen_utility_pvt.put_line('Target Counters exist for this counter. Cannot change counter type...');
4660: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_CONFIG_CTR_EXIST','CTR_NAME',l_counter_template_rec.name);
4661: END IF;
4662: END IF;
4663: END IF;
4656: IF l_target_ctr_exist is not null then
4657: -- Target counters exist for this counter. You cannot
4658: -- change the type to something different.
4659: csi_ctr_gen_utility_pvt.put_line('Target Counters exist for this counter. Cannot change counter type...');
4660: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_CONFIG_CTR_EXIST','CTR_NAME',l_counter_template_rec.name);
4661: END IF;
4662: END IF;
4663: END IF;
4664:
4669: CLOSE counter_readings_cur;
4670: IF l_rdg_exists is not null then
4671: -- Counter readings exist for this counter. You cannot
4672: -- change the reading type to something different.counter.
4673: csi_ctr_gen_utility_pvt.put_line('Counter readings exist for this counter. Cannot change reading type...');
4674: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_RDGS_EXIST','CTR_NAME',l_counter_template_rec.name);
4675: END IF;
4676: END IF;
4677:
4670: IF l_rdg_exists is not null then
4671: -- Counter readings exist for this counter. You cannot
4672: -- change the reading type to something different.counter.
4673: csi_ctr_gen_utility_pvt.put_line('Counter readings exist for this counter. Cannot change reading type...');
4674: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_RDGS_EXIST','CTR_NAME',l_counter_template_rec.name);
4675: END IF;
4676: END IF;
4677:
4678: -- Start add code for bug 6418952
4923: -- Initialize API return status to success
4924: x_return_status := FND_API.G_RET_STS_SUCCESS;
4925:
4926: -- Read the debug profiles values in to global variable 7197402
4927: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
4928:
4929: --
4930: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
4931: csi_ctr_gen_utility_pvt.put_line( 'update_ctr_property_tmpl_pvt' ||'-'||
4926: -- Read the debug profiles values in to global variable 7197402
4927: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
4928:
4929: --
4930: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
4931: csi_ctr_gen_utility_pvt.put_line( 'update_ctr_property_tmpl_pvt' ||'-'||
4932: p_api_version ||'-'||
4933: nvl(p_commit,FND_API.G_FALSE) ||'-'||
4934: nvl(p_init_msg_list,FND_API.G_FALSE) ||'-'||
4927: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
4928:
4929: --
4930: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
4931: csi_ctr_gen_utility_pvt.put_line( 'update_ctr_property_tmpl_pvt' ||'-'||
4932: p_api_version ||'-'||
4933: nvl(p_commit,FND_API.G_FALSE) ||'-'||
4934: nvl(p_init_msg_list,FND_API.G_FALSE) ||'-'||
4935: nvl(p_validation_level,FND_API.G_VALID_LEVEL_FULL) );
4946:
4947: CLOSE cur_ctr_prop_rec;
4948:
4949: -- IF SQL%NOTFOUND THEN
4950: -- CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_GRP_NOTEXISTS');
4951: -- END IF;
4952:
4953: l_ctr_property_tmpl_rec := p_ctr_property_template_rec;
4954:
5134:
5135: -- Counter property name is not updateable
5136:
5137: IF l_ctr_property_tmpl_rec.name <> l_old_ctr_property_tmpl_rec.name THEN
5138: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_PROP_NOT_UPDATABLE');
5139: END IF;
5140:
5141: -- Call the table handler
5142: validate_start_date(l_ctr_property_tmpl_rec.start_date_active);
5145: IF l_ctr_property_tmpl_rec.property_lov_type IS NOT NULL THEN
5146: validate_lookups('CSI_CTR_PROPERTY_LOV_TYPE',l_ctr_property_tmpl_rec.property_lov_type);
5147: END IF;
5148:
5149: csi_ctr_gen_utility_pvt.put_line(' Default Value = '||l_ctr_property_tmpl_rec.default_value);
5150: IF l_ctr_property_tmpl_rec.property_lov_type IS NOT NULL and l_ctr_property_tmpl_rec.default_value IS NOT NULL THEN
5151: validate_lookups(l_ctr_property_tmpl_rec.property_lov_type,l_ctr_property_tmpl_rec.default_value);
5152: END IF;
5153:
5342: -- Initialize API return status to success
5343: x_return_status := FND_API.G_RET_STS_SUCCESS;
5344:
5345: -- Read the debug profiles values in to global variable 7197402
5346: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
5347:
5348: --
5349: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
5350: csi_ctr_gen_utility_pvt.put_line( 'update_ctr_relationship_pvt' ||'-'||
5345: -- Read the debug profiles values in to global variable 7197402
5346: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
5347:
5348: --
5349: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
5350: csi_ctr_gen_utility_pvt.put_line( 'update_ctr_relationship_pvt' ||'-'||
5351: p_api_version ||'-'||
5352: nvl(p_commit,FND_API.G_FALSE) ||'-'||
5353: nvl(p_init_msg_list,FND_API.G_FALSE) ||'-'||
5346: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
5347:
5348: --
5349: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
5350: csi_ctr_gen_utility_pvt.put_line( 'update_ctr_relationship_pvt' ||'-'||
5351: p_api_version ||'-'||
5352: nvl(p_commit,FND_API.G_FALSE) ||'-'||
5353: nvl(p_init_msg_list,FND_API.G_FALSE) ||'-'||
5354: nvl(p_validation_level,FND_API.G_VALID_LEVEL_FULL) );
5372:
5373: CLOSE cur_rel_rec;
5374:
5375: -- IF SQL%NOTFOUND THEN
5376: -- CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_GRP_NOTEXISTS');
5377: -- END IF;
5378:
5379: l_ctr_relationships_rec := p_counter_relationships_rec;
5380:
5537:
5538: validate_start_date(l_ctr_relationships_rec.active_start_date);
5539: validate_lookups('CSI_CTR_RELATIONSHIP_TYPE_CODE', l_ctr_relationships_rec.relationship_type_code);
5540:
5541: csi_ctr_gen_utility_pvt.put_line(' type code = '||l_ctr_relationships_rec.relationship_type_code);
5542: IF l_ctr_relationships_rec.relationship_type_code = 'CONFIGURATION' THEN
5543: validate_ctr_relationship(l_ctr_relationships_rec.source_counter_id, l_source_direction,
5544: l_src_ctr_start_date, l_src_ctr_end_date);
5545: validate_ctr_relationship(l_ctr_relationships_rec.object_counter_id, l_object_direction,
5545: validate_ctr_relationship(l_ctr_relationships_rec.object_counter_id, l_object_direction,
5546: l_obj_ctr_start_date, l_obj_ctr_end_date);
5547: /* Validate direction */
5548: IF l_source_direction = 'B' and l_object_direction <> 'B' THEN
5549: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_REL_DIR');
5550: END IF;
5551:
5552: IF l_object_direction = 'B' and l_source_direction <> 'B' THEN
5553: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_REL_DIR');
5549: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_REL_DIR');
5550: END IF;
5551:
5552: IF l_object_direction = 'B' and l_source_direction <> 'B' THEN
5553: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_REL_DIR');
5554: END IF;
5555:
5556: IF p_counter_relationships_rec.active_start_date < l_src_ctr_start_date THEN
5557: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_SOURCE_ST_DATE');
5553: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_REL_DIR');
5554: END IF;
5555:
5556: IF p_counter_relationships_rec.active_start_date < l_src_ctr_start_date THEN
5557: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_SOURCE_ST_DATE');
5558: ELSIF p_counter_relationships_rec.active_start_date < l_obj_ctr_start_date THEN
5559: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_SOURCE_ST_DATE');
5560: END IF;
5561:
5555:
5556: IF p_counter_relationships_rec.active_start_date < l_src_ctr_start_date THEN
5557: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_SOURCE_ST_DATE');
5558: ELSIF p_counter_relationships_rec.active_start_date < l_obj_ctr_start_date THEN
5559: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_SOURCE_ST_DATE');
5560: END IF;
5561:
5562: IF l_src_ctr_end_date IS NOT NULL THEN
5563: IF p_counter_relationships_rec.active_start_date > l_src_ctr_end_date THEN
5560: END IF;
5561:
5562: IF l_src_ctr_end_date IS NOT NULL THEN
5563: IF p_counter_relationships_rec.active_start_date > l_src_ctr_end_date THEN
5564: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_SOURCE_ST_DATE');
5565: END IF;
5566: END IF;
5567:
5568: IF l_obj_ctr_end_date IS NOT NULL THEN
5566: END IF;
5567:
5568: IF l_obj_ctr_end_date IS NOT NULL THEN
5569: IF p_counter_relationships_rec.active_start_date > l_obj_ctr_end_date THEN
5570: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_SOURCE_ST_DATE');
5571: END IF;
5572: END IF;
5573:
5574: OPEN c1(l_ctr_relationships_rec.source_counter_id);
5574: OPEN c1(l_ctr_relationships_rec.source_counter_id);
5575: FETCH c1 into l_reading_date;
5576: IF l_reading_date IS NOT NULL THEN
5577: IF p_counter_relationships_rec.active_start_date < l_reading_date THEN
5578: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_SOURCE_ST_DATE');
5579: END IF;
5580: END IF;
5581: CLOSE c1;
5582:
5583: OPEN c1(l_ctr_relationships_rec.object_counter_id);
5584: FETCH c1 into l_reading_date;
5585: IF l_reading_date IS NOT NULL THEN
5586: IF p_counter_relationships_rec.active_start_date < l_reading_date THEN
5587: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_INV_SOURCE_ST_DATE');
5588: END IF;
5589: END IF;
5590: CLOSE c1;
5591:
5596: FROM csi_counter_relationships
5597: WHERE relationship_type_code = 'CONFIGURATION'
5598: AND source_counter_id = l_ctr_relationships_rec.object_counter_id;
5599:
5600: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_TARGET_CTR_EXIST');
5601:
5602: EXCEPTION
5603: WHEN NO_DATA_FOUND THEN NULL;
5604: WHEN TOO_MANY_ROWS THEN
5601:
5602: EXCEPTION
5603: WHEN NO_DATA_FOUND THEN NULL;
5604: WHEN TOO_MANY_ROWS THEN
5605: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_TARGET_CTR_EXIST');
5606:
5607: END;
5608: ELSIF l_ctr_relationships_rec.relationship_type_code = 'FORMULA' THEN
5609: IF p_counter_relationships_rec.source_counter_id IS NULL THEN
5606:
5607: END;
5608: ELSIF l_ctr_relationships_rec.relationship_type_code = 'FORMULA' THEN
5609: IF p_counter_relationships_rec.source_counter_id IS NULL THEN
5610: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_REQ_FORMULA_REF');
5611: END IF;
5612:
5613: END IF;
5614:
5742: SAVEPOINT update_derived_filters;
5743:
5744: -- Check for freeze_flag in csi_install_parameters is set to 'Y'
5745:
5746: -- csi_ctr_gen_utility_pvt.check_ib_active;
5747:
5748: -- Standard call to check for call compatibility.
5749: IF NOT FND_API.Compatible_API_Call (l_api_version,
5750: p_api_version,
5762: -- Initialize API return status to success
5763: x_return_status := FND_API.G_RET_STS_SUCCESS;
5764:
5765: -- Read the debug profiles values in to global variable 7197402
5766: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
5767:
5768: -- Check the profile option debug_level for debug message reporting
5769: -- l_debug_level:=fnd_profile.value('CSI_COUNTER_DEBUG_LEVEL');
5770:
5768: -- Check the profile option debug_level for debug message reporting
5769: -- l_debug_level:=fnd_profile.value('CSI_COUNTER_DEBUG_LEVEL');
5770:
5771: -- If debug_level = 1 then dump the procedure name
5772: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
5773: csi_ctr_gen_utility_pvt.put_line( 'update_derived_filters');
5774: END IF;
5775:
5776: -- If the debug level = 2 then dump all the parameters values.
5769: -- l_debug_level:=fnd_profile.value('CSI_COUNTER_DEBUG_LEVEL');
5770:
5771: -- If debug_level = 1 then dump the procedure name
5772: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
5773: csi_ctr_gen_utility_pvt.put_line( 'update_derived_filters');
5774: END IF;
5775:
5776: -- If the debug level = 2 then dump all the parameters values.
5777: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 1) THEN
5773: csi_ctr_gen_utility_pvt.put_line( 'update_derived_filters');
5774: END IF;
5775:
5776: -- If the debug level = 2 then dump all the parameters values.
5777: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 1) THEN
5778: csi_ctr_gen_utility_pvt.put_line( 'update_derived_filters' ||
5779: p_api_version ||'-'||
5780: p_commit ||'-'||
5781: p_init_msg_list ||'-'||
5774: END IF;
5775:
5776: -- If the debug level = 2 then dump all the parameters values.
5777: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 1) THEN
5778: csi_ctr_gen_utility_pvt.put_line( 'update_derived_filters' ||
5779: p_api_version ||'-'||
5780: p_commit ||'-'||
5781: p_init_msg_list ||'-'||
5782: p_validation_level );
5779: p_api_version ||'-'||
5780: p_commit ||'-'||
5781: p_init_msg_list ||'-'||
5782: p_validation_level );
5783: csi_ctr_gen_utility_pvt.dump_ctr_derived_filters_tbl(p_ctr_derived_filters_tbl);
5784: END IF;
5785:
5786: IF (p_ctr_derived_filters_tbl.count > 0) THEN
5787: FOR tab_row IN p_ctr_derived_filters_tbl.FIRST .. p_ctr_derived_filters_tbl.LAST
5808: WHILE l_msg_count > 0 LOOP
5809: x_msg_data := FND_MSG_PUB.GET
5810: (l_msg_index,
5811: FND_API.G_FALSE);
5812: csi_ctr_gen_utility_pvt.put_line('Error from CSI_COUNTER_TEMPLATE_PVT.CREATE_DERIVED_FILTERS');
5813: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
5814: l_msg_index := l_msg_index + 1;
5815: l_msg_count := l_msg_count - 1;
5816: END LOOP;
5809: x_msg_data := FND_MSG_PUB.GET
5810: (l_msg_index,
5811: FND_API.G_FALSE);
5812: csi_ctr_gen_utility_pvt.put_line('Error from CSI_COUNTER_TEMPLATE_PVT.CREATE_DERIVED_FILTERS');
5813: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
5814: l_msg_index := l_msg_index + 1;
5815: l_msg_count := l_msg_count - 1;
5816: END LOOP;
5817: RAISE FND_API.G_EXC_ERROR;
5858: -- WHERE COUNTER_DERIVED_FILTER_ID = l_ctr_derived_filters_rec.COUNTER_DERIVED_FILTER_ID;
5859: WHERE COUNTER_DERIVED_FILTER_ID = p_ctr_derived_filters_tbl(tab_row).counter_derived_filter_id;
5860:
5861: IF SQL%NOTFOUND THEN
5862: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_CTR_DERIVED_FILTER_INVALID');
5863: END IF;
5864:
5865: IF NVL(l_old_ctr_derived_filters_rec.counter_id, -1) = FND_API.G_MISS_NUM THEN
5866: l_counter_id := NULL;
5875: INTO l_type, l_name
5876: FROM csi_counters_bc_v
5877: WHERE counter_id = p_ctr_derived_filters_tbl(tab_row).counter_id;
5878: EXCEPTION WHEN NO_DATA_FOUND THEN
5879: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_CTR_INVALID');
5880: END;
5881:
5882: -- validate all counter types are GROUP type
5883: IF l_type <> 'FORMULA' THEN
5880: END;
5881:
5882: -- validate all counter types are GROUP type
5883: IF l_type <> 'FORMULA' THEN
5884: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_CTR_INV_GROUP_CTR','CTR_NAME',l_name);
5885: END IF;
5886: END IF;
5887:
5888: -- validate all counter properties
5893: INTO l_dummy
5894: FROM csi_ctr_properties_bc_v
5895: WHERE counter_property_id = l_ctr_derived_filters_rec.counter_property_id;
5896: EXCEPTION WHEN NO_DATA_FOUND THEN
5897: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_CTR_PROP_INVALID');
5898: END;
5899: END IF;
5900:
5901: -- validate LEFT_PARENT
5899: END IF;
5900:
5901: -- validate LEFT_PARENT
5902: IF p_ctr_derived_filters_tbl(tab_row).LEFT_PARENT NOT IN (FND_API.G_MISS_CHAR,'(', '((', '(((', '((((', '(((((') THEN
5903: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_INV_DER_LEFT_PARENT',
5904: 'PARM',l_ctr_derived_filters_rec.LEFT_PARENT);
5905: END IF;
5906:
5907: -- validate RIGHT_PARENT
5905: END IF;
5906:
5907: -- validate RIGHT_PARENT
5908: IF p_ctr_derived_filters_tbl(tab_row).RIGHT_PARENT NOT IN (FND_API.G_MISS_CHAR,')', '))', ')))', '))))', ')))))') THEN
5909: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_INV_DER_RIGHT_PARENT',
5910: 'PARM',l_ctr_derived_filters_rec.RIGHT_PARENT);
5911: END IF;
5912:
5913: -- validate RELATIONAL_OPERATOR
5911: END IF;
5912:
5913: -- validate RELATIONAL_OPERATOR
5914: IF p_ctr_derived_filters_tbl(tab_row).RELATIONAL_OPERATOR NOT IN (FND_API.G_MISS_CHAR,'=', '<', '<=', '>', '>=', '!=', '<>') THEN
5915: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_INV_DER_REL_OPERATOR',
5916: 'PARM',l_ctr_derived_filters_rec.RELATIONAL_OPERATOR);
5917: END IF;
5918:
5919: -- validate LOGICAL_OPERATOR
5925: END IF;
5926:
5927: IF l_log_op IS NOT NULL THEN
5928: IF l_log_op NOT IN (FND_API.G_MISS_CHAR, 'AND', 'OR') THEN
5929: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_INV_DER_LOG_OPERATOR', 'PARM',l_ctr_derived_filters_rec.LOGICAL_OPERATOR);
5930: END IF;
5931: END IF;
5932:
5933: -- initialize descritive flexfield
5930: END IF;
5931: END IF;
5932:
5933: -- initialize descritive flexfield
5934: -- csi_ctr_gen_utility_pvt.Initialize_Desc_Flex_For_Upd(p_ctr_derived_filters_rec,l_old_ctr_derived_filters_rec);
5935:
5936: -- validate SEQ_NO
5937: IF p_ctr_derived_filters_tbl(tab_row).seq_no = FND_API.G_MISS_NUM then
5938: p_ctr_derived_filters_tbl(tab_row).seq_no := null;
5938: p_ctr_derived_filters_tbl(tab_row).seq_no := null;
5939: END IF;
5940:
5941: IF p_ctr_derived_filters_tbl(tab_row).SEQ_NO IS NULL THEN
5942: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_CTR_DER_FILTER_NULL_SEQ');
5943: ELSE
5944: IF p_ctr_derived_filters_tbl(tab_row).SEQ_NO <> FND_API.G_MISS_NUM THEN
5945: BEGIN
5946: SELECT 'x'
5952:
5953: -- this means that for this counter, there is one another
5954: -- derived filter record with the same sequence number.
5955: -- Raise error.
5956: csi_ctr_gen_utility_pvt.ExitWithErrMsg('CSI_API_CTR_DUP_DERFILTER_SEQNO',
5957: 'SEQNO',to_char(p_ctr_derived_filters_tbl(tab_row).seq_no),
5958: 'CTR_NAME',l_name);
5959:
5960: EXCEPTION WHEN NO_DATA_FOUND THEN
6003: ,p_ctr_derived_filters_tbl(tab_row).SECURITY_GROUP_ID
6004: ,p_ctr_derived_filters_tbl(tab_row).MIGRATED_FLAG
6005: );
6006:
6007: csi_ctr_gen_utility_pvt.Validate_GrpOp_ctr
6008: (
6009: p_api_version => 1.0,
6010: p_commit => FND_API.G_FALSE,
6011: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
6020: RAISE FND_API.G_EXC_ERROR;
6021: END IF;
6022:
6023: -- l_ctr_derived_filters_rec.OBJECT_VERSION_NUMBER := l_ctr_derived_filters_rec.OBJECT_VERSION_NUMBER+1;
6024: csi_ctr_gen_utility_pvt.put_line('before updating csi_counters_vl');
6025: BEGIN
6026: SELECT 'x'
6027: INTO l_found
6028: FROM csi_counter_template_vl
6030:
6031: UPDATE csi_counter_template_b
6032: SET valid_flag = decode(l_valid_flag, 'Y', 'Y', 'N')
6033: WHERE counter_id = p_ctr_derived_filters_tbl(tab_row).COUNTER_ID;
6034: csi_ctr_gen_utility_pvt.put_line('after updating csi_counters_vl');
6035: EXCEPTION
6036: WHEN NO_DATA_FOUND THEN
6037: UPDATE csi_counters_b
6038: SET valid_flag = decode(l_valid_flag, 'Y', 'Y', 'N')
6036: WHEN NO_DATA_FOUND THEN
6037: UPDATE csi_counters_b
6038: SET valid_flag = decode(l_valid_flag, 'Y', 'Y', 'N')
6039: WHERE counter_id = p_ctr_derived_filters_tbl(tab_row).COUNTER_ID;
6040: csi_ctr_gen_utility_pvt.put_line('after updating csi_counters_vl');
6041: END;
6042: END IF;
6043: END IF;
6044: END LOOP;
6163: -- Initialize API return status to success
6164: x_return_status := FND_API.G_RET_STS_SUCCESS;
6165:
6166: -- Read the debug profiles values in to global variable 7197402
6167: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
6168:
6169: --
6170: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
6171: csi_ctr_gen_utility_pvt.put_line( 'create_estimation_method_pvt' ||'-'||
6166: -- Read the debug profiles values in to global variable 7197402
6167: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
6168:
6169: --
6170: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
6171: csi_ctr_gen_utility_pvt.put_line( 'create_estimation_method_pvt' ||'-'||
6172: p_api_version ||'-'||
6173: nvl(p_commit,FND_API.G_FALSE) ||'-'||
6174: nvl(p_init_msg_list,FND_API.G_FALSE) ||'-'||
6167: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
6168:
6169: --
6170: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
6171: csi_ctr_gen_utility_pvt.put_line( 'create_estimation_method_pvt' ||'-'||
6172: p_api_version ||'-'||
6173: nvl(p_commit,FND_API.G_FALSE) ||'-'||
6174: nvl(p_init_msg_list,FND_API.G_FALSE) ||'-'||
6175: nvl(p_validation_level,FND_API.G_VALID_LEVEL_FULL) );
6345: INTO l_dummy
6346: FROM csi_ctr_estimate_methods_vl
6347: WHERE name = l_name;
6348:
6349: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_EST_DUP_NAME','CTR_EST_NAME',l_name);
6350: EXCEPTION
6351: WHEN NO_DATA_FOUND THEN
6352: NULL;
6353: END;
6354:
6355: validate_lookups('CSI_COUNTER_ESTIMATION_TYPE',l_estimation_type);
6356:
6357: IF l_estimation_avg_type not in ('DLY','MTH') THEN
6358: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_EST_AVG_TYPE_INV','CTR_EST_AVG_TYPE',l_estimation_avg_type);
6359: END IF;
6360:
6361: IF l_estimation_type = 'FIXED' then
6362: IF l_fixed_value IS NULL THEN
6359: END IF;
6360:
6361: IF l_estimation_type = 'FIXED' then
6362: IF l_fixed_value IS NULL THEN
6363: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_EST_INV_FIXED');
6364: END IF;
6365: -- ELSIF l_estimation_type = 'USAGE' then
6366: -- IF l_default_value IS NULL OR l_usage_markup IS NULL THEN
6367: -- CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_EST_INV_USAGE');
6363: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_EST_INV_FIXED');
6364: END IF;
6365: -- ELSIF l_estimation_type = 'USAGE' then
6366: -- IF l_default_value IS NULL OR l_usage_markup IS NULL THEN
6367: -- CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_EST_INV_USAGE');
6368: -- END IF;
6369: END IF;
6370:
6371: /* Table Handler call */
6529: -- Initialize API return status to success
6530: x_return_status := FND_API.G_RET_STS_SUCCESS;
6531:
6532: -- Read the debug profiles values in to global variable 7197402
6533: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
6534:
6535: --
6536: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
6537: csi_ctr_gen_utility_pvt.put_line( 'update_estimation_method_pvt' ||'-'||
6532: -- Read the debug profiles values in to global variable 7197402
6533: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
6534:
6535: --
6536: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
6537: csi_ctr_gen_utility_pvt.put_line( 'update_estimation_method_pvt' ||'-'||
6538: p_api_version ||'-'||
6539: nvl(p_commit,FND_API.G_FALSE) ||'-'||
6540: nvl(p_init_msg_list,FND_API.G_FALSE) ||'-'||
6533: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
6534:
6535: --
6536: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
6537: csi_ctr_gen_utility_pvt.put_line( 'update_estimation_method_pvt' ||'-'||
6538: p_api_version ||'-'||
6539: nvl(p_commit,FND_API.G_FALSE) ||'-'||
6540: nvl(p_init_msg_list,FND_API.G_FALSE) ||'-'||
6541: nvl(p_validation_level,FND_API.G_VALID_LEVEL_FULL) );
6552:
6553: CLOSE cur_estimation_rec;
6554:
6555: -- IF SQL%NOTFOUND THEN
6556: -- CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_ESTIM_NOTEXISTS');
6557: -- END IF;
6558:
6559: l_ctr_estimation_rec := p_ctr_estimation_rec;
6560:
6718: -- validate_start_date(l_ctr_estimation_rec.start_date_active);
6719: validate_lookups('CSI_COUNTER_ESTIMATION_TYPE',l_ctr_estimation_rec.estimation_type);
6720:
6721: /* IF l_ctr_estimation_rec.estimation_avg_type not in ('DLY','MTH') THEN
6722: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_EST_AVG_TYPE_INV','CTR_EST_AVG_TYPE',l_ctr_estimation_rec.estimation_avg_type);
6723: END IF; */
6724:
6725: IF l_ctr_estimation_rec.estimation_type = 'FIXED' then
6726: IF l_ctr_estimation_rec.fixed_value IS NULL THEN
6723: END IF; */
6724:
6725: IF l_ctr_estimation_rec.estimation_type = 'FIXED' then
6726: IF l_ctr_estimation_rec.fixed_value IS NULL THEN
6727: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_EST_INV_FIXED');
6728: END IF;
6729: END IF;
6730:
6731: /* Table Handler call */
7140: -- Initialize API return status to success
7141: x_return_status := FND_API.G_RET_STS_SUCCESS;
7142:
7143: -- Read the debug profiles values in to global variable 7197402
7144: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
7145:
7146: --
7147: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
7148: csi_ctr_gen_utility_pvt.put_line(
7143: -- Read the debug profiles values in to global variable 7197402
7144: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
7145:
7146: --
7147: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
7148: csi_ctr_gen_utility_pvt.put_line(
7149: 'instantiate_ctr_pvt'||'-'||
7150: p_api_version ||'-'||
7151: nvl(p_commit,FND_API.G_FALSE) ||'-'||
7144: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
7145:
7146: --
7147: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
7148: csi_ctr_gen_utility_pvt.put_line(
7149: 'instantiate_ctr_pvt'||'-'||
7150: p_api_version ||'-'||
7151: nvl(p_commit,FND_API.G_FALSE) ||'-'||
7152: nvl(p_init_msg_list,FND_API.G_FALSE)||'-'||
7156: l_source_object_cd := p_source_object_code_instance;
7157: l_source_object_id_instance := p_source_object_id_instance;
7158:
7159: l_counter_id := p_counter_id_template;
7160: csi_ctr_gen_utility_pvt.put_line('Template counter id = '||to_char(l_counter_id));
7161:
7162: FOR ctr_cur_rec IN ctr_cur(l_counter_id) LOOP
7163: IF ctr_cur_rec.group_id IS NOT NULL THEN
7164: l_counter_instance_rec.group_id := ctr_cur_rec.defaulted_group_id;
7191: WHERE ROWNUM = 1;
7192:
7193: EXCEPTION
7194: WHEN NO_DATA_FOUND THEN
7195: csi_ctr_gen_utility_pvt.put_line( ' New counter id not found for deriver counte id '||to_char(ctr_cur_rec.derive_counter_id));
7196: NULL;
7197: END;
7198:
7199: l_counter_instance_rec.derive_counter_id := l_new_derive_counter_id;
7264: l_counter_instance_rec.comments := ctr_cur_rec.comments;
7265: l_counter_instance_rec.time_based_manual_entry := ctr_cur_rec.tm_based_manual_entry;
7266: l_counter_instance_rec.eam_required_flag := ctr_cur_rec.eam_required_flag;
7267:
7268: csi_ctr_gen_utility_pvt.put_line('Calling csi_counter_pvt.create_counter....');
7269:
7270: CSI_COUNTER_PVT.CREATE_COUNTER
7271: (
7272: p_api_version => p_api_version,
7286: WHILE l_msg_count > 0 LOOP
7287: x_msg_data := FND_MSG_PUB.GET
7288: (l_msg_index,
7289: FND_API.G_FALSE );
7290: csi_ctr_gen_utility_pvt.put_line( ' Error from CSI_COUNTER_PVT.CREATE_COUNTER');
7291: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
7292: l_msg_index := l_msg_index + 1;
7293: l_msg_count := l_msg_count - 1;
7294: END LOOP;
7287: x_msg_data := FND_MSG_PUB.GET
7288: (l_msg_index,
7289: FND_API.G_FALSE );
7290: csi_ctr_gen_utility_pvt.put_line( ' Error from CSI_COUNTER_PVT.CREATE_COUNTER');
7291: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
7292: l_msg_index := l_msg_index + 1;
7293: l_msg_count := l_msg_count - 1;
7294: END LOOP;
7295: RAISE FND_API.G_EXC_ERROR;
7303: l_counter_associations_rec.start_date_active := sysdate;
7304: l_counter_associations_rec.maint_organization_id := p_maint_org_id;
7305: l_counter_associations_rec.primary_failure_flag := p_primary_failure_flag;
7306:
7307: csi_ctr_gen_utility_pvt.put_line( ' Maint organization id = '||to_char(p_maint_org_id));
7308: csi_ctr_gen_utility_pvt.put_line('Calling csi_counter_pvt.create_ctr_associations....');
7309: CSI_COUNTER_PVT.CREATE_CTR_ASSOCIATIONS
7310: (
7311: p_api_version => p_api_version
7304: l_counter_associations_rec.maint_organization_id := p_maint_org_id;
7305: l_counter_associations_rec.primary_failure_flag := p_primary_failure_flag;
7306:
7307: csi_ctr_gen_utility_pvt.put_line( ' Maint organization id = '||to_char(p_maint_org_id));
7308: csi_ctr_gen_utility_pvt.put_line('Calling csi_counter_pvt.create_ctr_associations....');
7309: CSI_COUNTER_PVT.CREATE_CTR_ASSOCIATIONS
7310: (
7311: p_api_version => p_api_version
7312: ,p_commit => p_commit
7326: WHILE l_msg_count > 0 LOOP
7327: x_msg_data := FND_MSG_PUB.GET
7328: (l_msg_index,
7329: FND_API.G_FALSE );
7330: csi_ctr_gen_utility_pvt.put_line( ' Error from CSI_COUNTER_PVT.CREATE_CTR_ASSOCIATIONS');
7331: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
7332: l_msg_index := l_msg_index + 1;
7333: l_msg_count := l_msg_count - 1;
7334: END LOOP;
7327: x_msg_data := FND_MSG_PUB.GET
7328: (l_msg_index,
7329: FND_API.G_FALSE );
7330: csi_ctr_gen_utility_pvt.put_line( ' Error from CSI_COUNTER_PVT.CREATE_CTR_ASSOCIATIONS');
7331: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
7332: l_msg_index := l_msg_index + 1;
7333: l_msg_count := l_msg_count - 1;
7334: END LOOP;
7335: RAISE FND_API.G_EXC_ERROR;
7341: ctr_cur_rec.initial_reading <> FND_API.G_MISS_NUM) AND
7342: nvl(l_counter_relationships_rec.RELATIONSHIP_TYPE_CODE,'X') <>
7343: l_rel_type THEN
7344:
7345: csi_ctr_gen_utility_pvt.put_line('Inside the call reading api...');
7346:
7347: --create transaction record
7348: l_transaction_tbl(l_c_ind_txn) := NULL;
7349: l_transaction_tbl(l_c_ind_txn).TRANSACTION_ID := NULL;
7396: l_ctr_property_readings_tbl(l_c_ind_prop).PARENT_TBL_INDEX := l_c_ind_rdg;
7397: l_c_ind_prop := l_c_ind_prop + 1;
7398: END LOOP;
7399:
7400: csi_ctr_gen_utility_pvt.put_line('Calling the capture counter reading...');
7401: csi_counter_readings_pub.capture_counter_reading(
7402: p_api_version => 1.0,
7403: p_commit => p_commit,
7404: p_init_msg_list => p_init_msg_list,
7418: WHILE l_msg_count > 0 LOOP
7419: x_msg_data := FND_MSG_PUB.GET
7420: (l_msg_index,
7421: FND_API.G_FALSE );
7422: csi_ctr_gen_utility_pvt.put_line( ' Error from Instantiate-Capture Readings');
7423: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
7424: l_msg_index := l_msg_index + 1;
7425: l_msg_count := l_msg_count - 1;
7426: END LOOP;
7419: x_msg_data := FND_MSG_PUB.GET
7420: (l_msg_index,
7421: FND_API.G_FALSE );
7422: csi_ctr_gen_utility_pvt.put_line( ' Error from Instantiate-Capture Readings');
7423: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
7424: l_msg_index := l_msg_index + 1;
7425: l_msg_count := l_msg_count - 1;
7426: END LOOP;
7427: RAISE FND_API.G_EXC_ERROR;
7489: WHILE l_msg_count > 0 LOOP
7490: x_msg_data := FND_MSG_PUB.GET
7491: (l_msg_index,
7492: FND_API.G_FALSE );
7493: csi_ctr_gen_utility_pvt.put_line( ' Error from CSI_Counter_PVT.Create_Ctr_Property');
7494: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
7495: l_msg_index := l_msg_index + 1;
7496: l_msg_count := l_msg_count - 1;
7497: END LOOP;
7490: x_msg_data := FND_MSG_PUB.GET
7491: (l_msg_index,
7492: FND_API.G_FALSE );
7493: csi_ctr_gen_utility_pvt.put_line( ' Error from CSI_Counter_PVT.Create_Ctr_Property');
7494: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
7495: l_msg_index := l_msg_index + 1;
7496: l_msg_count := l_msg_count - 1;
7497: END LOOP;
7498: RAISE FND_API.G_EXC_ERROR;
7503: -- All the counter properties belonging to this counter have been
7504: -- instantiated.
7505:
7506: END LOOP;
7507: csi_ctr_gen_utility_pvt.put_line('After the end loop ');
7508: csi_ctr_gen_utility_pvt.put_line('New counter id = '||to_char(l_new_ctr_id));
7509:
7510: FOR fmla_ctr_cur_rec IN fmla_ctr_cur(l_new_ctr_id) LOOP
7511: csi_ctr_gen_utility_pvt.put_line('Formula Counter Id = '||to_char(fmla_ctr_cur_rec.counter_id));
7504: -- instantiated.
7505:
7506: END LOOP;
7507: csi_ctr_gen_utility_pvt.put_line('After the end loop ');
7508: csi_ctr_gen_utility_pvt.put_line('New counter id = '||to_char(l_new_ctr_id));
7509:
7510: FOR fmla_ctr_cur_rec IN fmla_ctr_cur(l_new_ctr_id) LOOP
7511: csi_ctr_gen_utility_pvt.put_line('Formula Counter Id = '||to_char(fmla_ctr_cur_rec.counter_id));
7512: FOR ctr_der_filter_cur_rec IN ctr_der_filter_cur(fmla_ctr_cur_rec.counter_id)
7507: csi_ctr_gen_utility_pvt.put_line('After the end loop ');
7508: csi_ctr_gen_utility_pvt.put_line('New counter id = '||to_char(l_new_ctr_id));
7509:
7510: FOR fmla_ctr_cur_rec IN fmla_ctr_cur(l_new_ctr_id) LOOP
7511: csi_ctr_gen_utility_pvt.put_line('Formula Counter Id = '||to_char(fmla_ctr_cur_rec.counter_id));
7512: FOR ctr_der_filter_cur_rec IN ctr_der_filter_cur(fmla_ctr_cur_rec.counter_id)
7513: LOOP
7514: csi_ctr_gen_utility_pvt.put_line('Inside the ctr_der_filter_cur_rec ');
7515:
7510: FOR fmla_ctr_cur_rec IN fmla_ctr_cur(l_new_ctr_id) LOOP
7511: csi_ctr_gen_utility_pvt.put_line('Formula Counter Id = '||to_char(fmla_ctr_cur_rec.counter_id));
7512: FOR ctr_der_filter_cur_rec IN ctr_der_filter_cur(fmla_ctr_cur_rec.counter_id)
7513: LOOP
7514: csi_ctr_gen_utility_pvt.put_line('Inside the ctr_der_filter_cur_rec ');
7515:
7516: SELECT counter_property_id
7517: INTO l_new_der_ctr_prop_id
7518: FROM csi_counter_template_vl ctr,
7572: WHILE l_msg_count > 0 LOOP
7573: x_msg_data := FND_MSG_PUB.GET
7574: (l_msg_index,
7575: FND_API.G_FALSE );
7576: csi_ctr_gen_utility_pvt.put_line( ' Error from CSI_COUNTER_TEMPLATE_PVT.CREATE_DERIVED_FILTERS');
7577: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
7578: l_msg_index := l_msg_index + 1;
7579: l_msg_count := l_msg_count - 1;
7580: END LOOP;
7573: x_msg_data := FND_MSG_PUB.GET
7574: (l_msg_index,
7575: FND_API.G_FALSE );
7576: csi_ctr_gen_utility_pvt.put_line( ' Error from CSI_COUNTER_TEMPLATE_PVT.CREATE_DERIVED_FILTERS');
7577: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
7578: l_msg_index := l_msg_index + 1;
7579: l_msg_count := l_msg_count - 1;
7580: END LOOP;
7581: RAISE FND_API.G_EXC_ERROR;
7583:
7584: END LOOP;
7585:
7586: -- FOR ctr_formula_bvars_cur_rec IN ctr_formula_bvars_cur(l_new_ctr_id)
7587: csi_ctr_gen_utility_pvt.put_line( 'Passed counter_id = '||to_char(l_counter_id));
7588: csi_ctr_gen_utility_pvt.put_line( 'Passed new grp id = '||to_char(l_new_ctr_grp_id));
7589: FOR ctr_formula_bvars_cur_rec IN ctr_formula_bvars_cur(l_counter_id)
7590: LOOP
7591: -- Bug 9068223 Fixing in both R12 and 12.1 code
7584: END LOOP;
7585:
7586: -- FOR ctr_formula_bvars_cur_rec IN ctr_formula_bvars_cur(l_new_ctr_id)
7587: csi_ctr_gen_utility_pvt.put_line( 'Passed counter_id = '||to_char(l_counter_id));
7588: csi_ctr_gen_utility_pvt.put_line( 'Passed new grp id = '||to_char(l_new_ctr_grp_id));
7589: FOR ctr_formula_bvars_cur_rec IN ctr_formula_bvars_cur(l_counter_id)
7590: LOOP
7591: -- Bug 9068223 Fixing in both R12 and 12.1 code
7592: /*SELECT max(counter_id)
8074: -- Initialize API return status to success
8075: x_return_status := FND_API.G_RET_STS_SUCCESS;
8076:
8077: -- Read the debug profiles values in to global variable 7197402
8078: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
8079:
8080: --
8081: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
8082: csi_ctr_gen_utility_pvt.put_line(
8077: -- Read the debug profiles values in to global variable 7197402
8078: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
8079:
8080: --
8081: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
8082: csi_ctr_gen_utility_pvt.put_line(
8083: 'instantiate_grp_counters'||'-'||
8084: p_api_version ||'-'||
8085: nvl(p_commit,FND_API.G_FALSE) ||'-'||
8078: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
8079:
8080: --
8081: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
8082: csi_ctr_gen_utility_pvt.put_line(
8083: 'instantiate_grp_counters'||'-'||
8084: p_api_version ||'-'||
8085: nvl(p_commit,FND_API.G_FALSE) ||'-'||
8086: nvl(p_init_msg_list,FND_API.G_FALSE)||'-'||
8138: l_ctr_grp_rec.template_flag
8139: FROM cs_csi_counter_groups
8140: WHERE counter_group_id = l_counter_group_id;
8141:
8142: csi_ctr_gen_utility_pvt.put_line('Counter group Id = '||to_char(l_counter_group_id));
8143: csi_ctr_gen_utility_pvt.put_line('Template Flag = '||l_ctr_grp_rec.template_flag);
8144: -- Added Bug 8510631
8145: l_ctr_grp_rec.source_object_code := l_source_object_cd;
8146: l_ctr_grp_rec.source_object_id := l_source_object_id_instance;
8139: FROM cs_csi_counter_groups
8140: WHERE counter_group_id = l_counter_group_id;
8141:
8142: csi_ctr_gen_utility_pvt.put_line('Counter group Id = '||to_char(l_counter_group_id));
8143: csi_ctr_gen_utility_pvt.put_line('Template Flag = '||l_ctr_grp_rec.template_flag);
8144: -- Added Bug 8510631
8145: l_ctr_grp_rec.source_object_code := l_source_object_cd;
8146: l_ctr_grp_rec.source_object_id := l_source_object_id_instance;
8147: l_ctr_grp_rec.source_counter_group_id := l_counter_group_id;
8166: WHILE l_msg_count > 0 LOOP
8167: x_msg_data := FND_MSG_PUB.GET
8168: (l_msg_index,
8169: FND_API.G_FALSE );
8170: csi_ctr_gen_utility_pvt.put_line('Error from CSI_COUNTER_TEMPLATE_PVT.CREATE_COUNTER_GROUP');
8171: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
8172: l_msg_index := l_msg_index + 1;
8173: l_msg_count := l_msg_count - 1;
8174: END LOOP;
8167: x_msg_data := FND_MSG_PUB.GET
8168: (l_msg_index,
8169: FND_API.G_FALSE );
8170: csi_ctr_gen_utility_pvt.put_line('Error from CSI_COUNTER_TEMPLATE_PVT.CREATE_COUNTER_GROUP');
8171: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
8172: l_msg_index := l_msg_index + 1;
8173: l_msg_count := l_msg_count - 1;
8174: END LOOP;
8175: RAISE FND_API.G_EXC_ERROR;
8178: l_ctr_grp_id_instance := l_ctr_grp_rec.counter_group_id;
8179: x_ctr_grp_id_instance := l_ctr_grp_rec.counter_group_id;
8180: EXCEPTION
8181: WHEN OTHERS THEN
8182: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_GRP_INVALID');
8183: END;
8184:
8185: FOR ctr_cur_rec IN ctr_cur(l_counter_group_id) LOOP
8186: l_counter_instance_rec.group_id := l_ctr_grp_id_instance;
8211: WHERE ROWNUM = 1;
8212:
8213: EXCEPTION
8214: WHEN NO_DATA_FOUND THEN
8215: csi_ctr_gen_utility_pvt.put_line( ' New counter id not found for deriver counte id '||to_char(ctr_cur_rec.derive_counter_id));
8216: NULL;
8217: END;
8218:
8219: l_counter_instance_rec.derive_counter_id := l_new_derive_counter_id;
8304: WHILE l_msg_count > 0 LOOP
8305: x_msg_data := FND_MSG_PUB.GET
8306: (l_msg_index,
8307: FND_API.G_FALSE );
8308: csi_ctr_gen_utility_pvt.put_line( ' Error from CSI_COUNTER_PVT.CREATE_COUNTER');
8309: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
8310: l_msg_index := l_msg_index + 1;
8311: l_msg_count := l_msg_count - 1;
8312: END LOOP;
8305: x_msg_data := FND_MSG_PUB.GET
8306: (l_msg_index,
8307: FND_API.G_FALSE );
8308: csi_ctr_gen_utility_pvt.put_line( ' Error from CSI_COUNTER_PVT.CREATE_COUNTER');
8309: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
8310: l_msg_index := l_msg_index + 1;
8311: l_msg_count := l_msg_count - 1;
8312: END LOOP;
8313: RAISE FND_API.G_EXC_ERROR;
8342: WHILE l_msg_count > 0 LOOP
8343: x_msg_data := FND_MSG_PUB.GET
8344: (l_msg_index,
8345: FND_API.G_FALSE );
8346: csi_ctr_gen_utility_pvt.put_line( ' Error from CSI_COUNTER_PVT.CREATE_CTR_ASSOCIATIONS');
8347: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
8348: l_msg_index := l_msg_index + 1;
8349: l_msg_count := l_msg_count - 1;
8350: END LOOP;
8343: x_msg_data := FND_MSG_PUB.GET
8344: (l_msg_index,
8345: FND_API.G_FALSE );
8346: csi_ctr_gen_utility_pvt.put_line( ' Error from CSI_COUNTER_PVT.CREATE_CTR_ASSOCIATIONS');
8347: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
8348: l_msg_index := l_msg_index + 1;
8349: l_msg_count := l_msg_count - 1;
8350: END LOOP;
8351: RAISE FND_API.G_EXC_ERROR;
8412: WHILE l_msg_count > 0 LOOP
8413: x_msg_data := FND_MSG_PUB.GET
8414: (l_msg_index,
8415: FND_API.G_FALSE );
8416: csi_ctr_gen_utility_pvt.put_line( ' Error from CSI_Counter_PVT.Create_Ctr_Property');
8417: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
8418: l_msg_index := l_msg_index + 1;
8419: l_msg_count := l_msg_count - 1;
8420: END LOOP;
8413: x_msg_data := FND_MSG_PUB.GET
8414: (l_msg_index,
8415: FND_API.G_FALSE );
8416: csi_ctr_gen_utility_pvt.put_line( ' Error from CSI_Counter_PVT.Create_Ctr_Property');
8417: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
8418: l_msg_index := l_msg_index + 1;
8419: l_msg_count := l_msg_count - 1;
8420: END LOOP;
8421: RAISE FND_API.G_EXC_ERROR;
8426: -- All the counter properties belonging to this counter have been
8427: -- instantiated.
8428:
8429: END LOOP;
8430: csi_ctr_gen_utility_pvt.put_line('After the end loop ');
8431: csi_ctr_gen_utility_pvt.put_line('Passed counter group id = '||to_char(l_ctr_grp_rec.counter_group_id));
8432:
8433: FOR fmla_ctr_cur_rec IN fmla_ctr_cur(l_ctr_grp_rec.counter_group_id) LOOP
8434: csi_ctr_gen_utility_pvt.put_line('Formula Counter Id = '||to_char(fmla_ctr_cur_rec.counter_id));
8427: -- instantiated.
8428:
8429: END LOOP;
8430: csi_ctr_gen_utility_pvt.put_line('After the end loop ');
8431: csi_ctr_gen_utility_pvt.put_line('Passed counter group id = '||to_char(l_ctr_grp_rec.counter_group_id));
8432:
8433: FOR fmla_ctr_cur_rec IN fmla_ctr_cur(l_ctr_grp_rec.counter_group_id) LOOP
8434: csi_ctr_gen_utility_pvt.put_line('Formula Counter Id = '||to_char(fmla_ctr_cur_rec.counter_id));
8435: FOR ctr_der_filter_cur_rec IN ctr_der_filter_cur(fmla_ctr_cur_rec.counter_id)
8430: csi_ctr_gen_utility_pvt.put_line('After the end loop ');
8431: csi_ctr_gen_utility_pvt.put_line('Passed counter group id = '||to_char(l_ctr_grp_rec.counter_group_id));
8432:
8433: FOR fmla_ctr_cur_rec IN fmla_ctr_cur(l_ctr_grp_rec.counter_group_id) LOOP
8434: csi_ctr_gen_utility_pvt.put_line('Formula Counter Id = '||to_char(fmla_ctr_cur_rec.counter_id));
8435: FOR ctr_der_filter_cur_rec IN ctr_der_filter_cur(fmla_ctr_cur_rec.counter_id)
8436: LOOP
8437: csi_ctr_gen_utility_pvt.put_line('Inside the ctr_der_filter_cur_rec ');
8438:
8433: FOR fmla_ctr_cur_rec IN fmla_ctr_cur(l_ctr_grp_rec.counter_group_id) LOOP
8434: csi_ctr_gen_utility_pvt.put_line('Formula Counter Id = '||to_char(fmla_ctr_cur_rec.counter_id));
8435: FOR ctr_der_filter_cur_rec IN ctr_der_filter_cur(fmla_ctr_cur_rec.counter_id)
8436: LOOP
8437: csi_ctr_gen_utility_pvt.put_line('Inside the ctr_der_filter_cur_rec ');
8438:
8439: SELECT counter_property_id
8440: INTO l_new_der_ctr_prop_id
8441: FROM csi_counter_template_vl ctr,
8462: WHILE l_msg_count > 0 LOOP
8463: x_msg_data := FND_MSG_PUB.GET
8464: (l_msg_index,
8465: FND_API.G_FALSE );
8466: csi_ctr_gen_utility_pvt.put_line( ' Error from CSI_COUNTER_TEMPLATE_PVT.CREATE_DERIVED_FILTERS');
8467: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
8468: l_msg_index := l_msg_index + 1;
8469: l_msg_count := l_msg_count - 1;
8470: END LOOP;
8463: x_msg_data := FND_MSG_PUB.GET
8464: (l_msg_index,
8465: FND_API.G_FALSE );
8466: csi_ctr_gen_utility_pvt.put_line( ' Error from CSI_COUNTER_TEMPLATE_PVT.CREATE_DERIVED_FILTERS');
8467: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
8468: l_msg_index := l_msg_index + 1;
8469: l_msg_count := l_msg_count - 1;
8470: END LOOP;
8471: RAISE FND_API.G_EXC_ERROR;
8472: END IF;
8473:
8474: END LOOP;
8475:
8476: csi_ctr_gen_utility_pvt.put_line('Created from ctr id = '||to_char(fmla_ctr_cur_rec.counter_id));
8477: BEGIN
8478: SELECT created_from_counter_tmpl_id
8479: INTO l_created_map_id
8480: FROM csi_counters_b
8728: -- Initialize API return status to success
8729: x_return_status := FND_API.G_RET_STS_SUCCESS;
8730:
8731: -- Read the debug profiles values in to global variable 7197402
8732: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
8733:
8734: --
8735: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
8736: csi_ctr_gen_utility_pvt.put_line
8731: -- Read the debug profiles values in to global variable 7197402
8732: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
8733:
8734: --
8735: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
8736: csi_ctr_gen_utility_pvt.put_line
8737: ( 'delete_item_association_pvt' ||'-'||
8738: p_api_version ||'-'||
8739: nvl(p_commit,FND_API.G_FALSE) ||'-'||
8732: CSI_CTR_GEN_UTILITY_PVT.read_debug_profiles;
8733:
8734: --
8735: IF (CSI_CTR_GEN_UTILITY_PVT.g_debug_level > 0) THEN
8736: csi_ctr_gen_utility_pvt.put_line
8737: ( 'delete_item_association_pvt' ||'-'||
8738: p_api_version ||'-'||
8739: nvl(p_commit,FND_API.G_FALSE) ||'-'||
8740: nvl(p_init_msg_list,FND_API.G_FALSE) ||'-'||
8746: else
8747: l_ctr_associations_id := p_ctr_associations_id;
8748: end if;
8749:
8750: csi_ctr_gen_utility_pvt.put_line('Inside delete Item association = '||to_char(l_ctr_associations_id));
8751: /* Start of validation */
8752: BEGIN
8753: SELECT associated_to_group, group_id, counter_id, inventory_item_id
8754: INTO l_associated_to_group, l_group_id, l_counter_id, l_inventory_item_id
8766: WHERE cca.counter_id = get_ctr_rec.instantiated_counter_id
8767: AND cca.SOURCE_OBJECT_ID=cii.instance_id
8768: AND cii.inventory_item_id=l_inventory_item_id;
8769:
8770: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_ITEM_DEL_NOTALLOW');
8771: EXCEPTION
8772: WHEN NO_DATA_FOUND THEN
8773: NULL;
8774: WHEN OTHERS THEN
8771: EXCEPTION
8772: WHEN NO_DATA_FOUND THEN
8773: NULL;
8774: WHEN OTHERS THEN
8775: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_ITEM_DEL_NOTALLOW');
8776: END;
8777: END LOOP;
8778: END LOOP;
8779:
8807: FROM csi_counter_associations cca,csi_item_instances cii
8808: WHERE cca.counter_id = get_ctr_rec.instantiated_counter_id
8809: AND cca.SOURCE_OBJECT_ID=cii.instance_id
8810: AND cii.inventory_item_id=l_inventory_item_id;
8811: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_ITEM_DEL_NOTALLOW');
8812: EXCEPTION
8813: WHEN NO_DATA_FOUND THEN
8814: NULL;
8815: WHEN OTHERS THEN
8812: EXCEPTION
8813: WHEN NO_DATA_FOUND THEN
8814: NULL;
8815: WHEN OTHERS THEN
8816: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_ITEM_DEL_NOTALLOW');
8817: END;
8818: END LOOP;
8819: /* Now Delete the data that was verified */
8820: /* Call the table Handler */
8828: END IF;
8829:
8830: EXCEPTION
8831: WHEN OTHERS THEN
8832: CSI_CTR_GEN_UTILITY_PVT.ExitWithErrMsg('CSI_API_CTR_ITEM_DEL_NOTALLOW');
8833: END;
8834:
8835: IF FND_API.to_Boolean(nvl(p_commit,FND_API.G_FALSE)) THEN
8836: COMMIT WORK;