[Home] [Help]
151: BEGIN
152: Begin
153: select '1'
154: into l_exists
155: from dual
156: where exists (select 'x'
157: from CSI_COUNTER_RELATIONSHIPS
158: where object_counter_id = p_counter_id
159: and relationship_type_code = l_rel_type);
174: BEGIN
175: Begin
176: select '1'
177: into l_exists
178: from dual
179: where exists (select 'x'
180: from CSI_COUNTER_RELATIONSHIPS
181: where object_counter_id = p_counter_id
182: and relationship_type_code = l_rel_type
612: -- Generate the Value_id for insert
613: l_process_flag := TRUE;
614: WHILE l_process_flag LOOP
615: select CSI_COUNTER_READINGS_S.nextval
616: into l_ctr_rdg_rec.counter_value_id from dual;
617: IF NOT Counter_Value_Exists(l_ctr_rdg_rec.counter_value_id) THEN
618: l_process_flag := FALSE;
619: END IF;
620:
913: p_txn_rec.transaction_id = FND_API.G_MISS_NUM THEN
914: l_process_flag := TRUE;
915: WHILE l_process_flag LOOP
916: select CSI_TRANSACTIONS_S.nextval
917: into p_txn_rec.transaction_id from dual;
918: IF NOT csi_counter_readings_pvt.Transaction_ID_Exists(p_txn_rec.transaction_id) THEN
919: l_process_flag := FALSE;
920: END IF;
921: END LOOP;
1360: IF p_txn_rec.transaction_type_id in (91,92,94,95) THEN
1361: BEGIN
1362: select 'x'
1363: into l_exists
1364: from dual
1365: where exists (select 'x'
1366: from CSI_COUNTER_READINGS
1367: where counter_id = p_ctr_rdg_rec.counter_id
1368: and value_timestamp = p_ctr_rdg_rec.value_timestamp
1646: FROM CSI_COUNTER_READING_LOCKS
1647: WHERE COUNTER_ID IN (SELECT OBJECT_COUNTER_ID FROM
1648: CSI_COUNTER_RELATIONSHIPS WHERE SOURCE_COUNTER_ID = p_ctr_rdg_rec.counter_id AND
1649: NVL(ACTIVE_END_DATE,(p_ctr_rdg_rec.value_timestamp + 1)) > p_ctr_rdg_rec.value_timestamp
1650: UNION ALL SELECT p_ctr_rdg_rec.counter_id FROM DUAL);
1651: End;
1652: --
1653: IF l_rdg_lock_date IS NOT NULL THEN
1654: IF p_ctr_rdg_rec.value_timestamp <= l_rdg_lock_date THEN
2211: IF p_ctr_rdg_rec.counter_value_id IS NULL OR
2212: p_ctr_rdg_rec.counter_value_id = FND_API.G_MISS_NUM THEN
2213: WHILE l_process_flag LOOP
2214: select CSI_COUNTER_READINGS_S.nextval
2215: into p_ctr_rdg_rec.counter_value_id from dual;
2216: IF NOT Counter_Value_Exists(p_ctr_rdg_rec.counter_value_id) THEN
2217: l_process_flag := FALSE;
2218: END IF;
2219: END LOOP;
2735: -- Generate the Value_id
2736: l_process_flag := TRUE;
2737: WHILE l_process_flag LOOP
2738: select CSI_COUNTER_READINGS_S.nextval
2739: into l_reset_rdg_rec.counter_value_id from dual;
2740: IF NOT Counter_Value_Exists(l_reset_rdg_rec.counter_value_id) THEN
2741: l_process_flag := FALSE;
2742: END IF;
2743: END LOOP;
3092: RAISE Process_Next;
3093: End;
3094: --
3095: l_cursor_handle := dbms_sql.open_cursor;
3096: l_formula_text := 'SELECT '||l_formula_text||' FROM DUAL';
3097: --
3098: Begin
3099: DBMS_SQL.PARSE(l_cursor_handle, l_formula_text, dbms_sql.native);
3100: Exception
3124: sub_cur.source_counter_id <> p_ctr_rdg_rec.counter_id AND
3125: l_other_src_captured <> 'T' THEN
3126: Begin
3127: select '1'
3128: into l_exists from dual
3129: where exists (select 'x'
3130: from CSI_COUNTER_READINGS
3131: where counter_id = sub_cur.source_counter_id
3132: and value_timestamp = p_ctr_rdg_rec.value_timestamp
3212: -- Generate the Value_id for insert
3213: l_process_flag := TRUE;
3214: WHILE l_process_flag LOOP
3215: select CSI_COUNTER_READINGS_S.nextval
3216: into l_ctr_value_id from dual;
3217: IF NOT Counter_Value_Exists(l_ctr_value_id) THEN
3218: l_process_flag := FALSE;
3219: END IF;
3220: END LOOP;
3394: --
3395: FOR later_rec IN LATER_FORMULA_CUR(obj_cur.object_counter_id,p_ctr_rdg_rec.value_timestamp) LOOP
3396: l_cursor_handle := dbms_sql.open_cursor;
3397: -- Formula Text is reused from the above
3398: -- l_formula_text := 'SELECT '||l_formula_text||' FROM DUAL';
3399: --
3400: Begin
3401: DBMS_SQL.PARSE(l_cursor_handle, l_formula_text, dbms_sql.native);
3402: Exception
3888: -- Generate the Value_id for insert
3889: l_process_flag := TRUE;
3890: WHILE l_process_flag LOOP
3891: select CSI_COUNTER_READINGS_S.nextval
3892: into l_ctr_value_id from dual;
3893: IF NOT Counter_Value_Exists(l_ctr_value_id) THEN
3894: l_process_flag := FALSE;
3895: END IF;
3896: END LOOP;
4865: -- Generate the Value_id for insert
4866: l_process_flag := TRUE;
4867: WHILE l_process_flag LOOP
4868: select CSI_COUNTER_READINGS_S.nextval
4869: into l_ctr_rdg_rec.counter_value_id from dual;
4870: IF NOT Counter_Value_Exists(l_ctr_rdg_rec.counter_value_id) THEN
4871: l_process_flag := FALSE;
4872: END IF;
4873: END LOOP;
5375: FROM CSI_COUNTER_READING_LOCKS
5376: WHERE COUNTER_ID IN (SELECT OBJECT_COUNTER_ID FROM
5377: CSI_COUNTER_RELATIONSHIPS WHERE SOURCE_COUNTER_ID = l_curr_ctr_rdg_rec.counter_id AND
5378: NVL(ACTIVE_END_DATE,(l_curr_ctr_rdg_rec.value_timestamp + 1)) > l_curr_ctr_rdg_rec.value_timestamp
5379: UNION ALL SELECT l_curr_ctr_rdg_rec.counter_id FROM DUAL);
5380: End;
5381: --
5382: IF l_rdg_lock_date IS NOT NULL THEN
5383: IF l_curr_ctr_rdg_rec.value_timestamp <= l_rdg_lock_date THEN
6221: IF p_ctr_prop_rdg_rec.counter_prop_value_id IS NULL OR
6222: p_ctr_prop_rdg_rec.counter_prop_value_id = FND_API.G_MISS_NUM THEN
6223: WHILE l_process_flag LOOP
6224: select CSI_CTR_PROPERTY_READINGS_S.nextval
6225: into p_ctr_prop_rdg_rec.counter_prop_value_id from dual;
6226: IF NOT Counter_Prop_Value_Exists(p_ctr_prop_rdg_rec.counter_prop_value_id) THEN
6227: l_process_flag := FALSE;
6228: END IF;
6229: END LOOP;
7568: -- Generate the Value_id for insert
7569: l_process_flag := TRUE;
7570: WHILE l_process_flag LOOP
7571: select CSI_CTR_ESTIMATED_READINGS_S.nextval
7572: into l_estimated_rdg_id from dual;
7573: IF NOT Estimated_Rdg_ID_Exists(l_estimated_rdg_id) THEN
7574: l_process_flag := FALSE;
7575: END IF;
7576: END LOOP;