DBA Data[Home] [Help]

APPS.AHL_UC_UTILIZATION_PVT dependencies on FND_LOG

Line 8: -- Added by jaramana on 03-DEC-2008 to improve performance by localising FND_LOG package variables.

4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'AHL_UC_UTILIZATION_PVT';
5:
6: G_LOG_PREFIX CONSTANT VARCHAR2(100) := 'ahl.plsql.AHL_UC_UTILIZATION_PVT';
7:
8: -- Added by jaramana on 03-DEC-2008 to improve performance by localising FND_LOG package variables.
9: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
12:

Line 9: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

5:
6: G_LOG_PREFIX CONSTANT VARCHAR2(100) := 'ahl.plsql.AHL_UC_UTILIZATION_PVT';
7:
8: -- Added by jaramana on 03-DEC-2008 to improve performance by localising FND_LOG package variables.
9: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
12:
13: ----------------------------------------------

Line 10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;

6: G_LOG_PREFIX CONSTANT VARCHAR2(100) := 'ahl.plsql.AHL_UC_UTILIZATION_PVT';
7:
8: -- Added by jaramana on 03-DEC-2008 to improve performance by localising FND_LOG package variables.
9: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
12:
13: ----------------------------------------------
14: -- Define local Procedures for Utilization --

Line 11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;

7:
8: -- Added by jaramana on 03-DEC-2008 to improve performance by localising FND_LOG package variables.
9: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
12:
13: ----------------------------------------------
14: -- Define local Procedures for Utilization --
15: ----------------------------------------------

Line 119: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin',

115:
116: BEGIN
117:
118: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
119: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin',
120: 'Entering Procedure. p_utilization_tbl.count = ' || p_utilization_tbl.count);
121: END IF;
122:
123: -- Initialize API return status to success

Line 142: FND_LOG.STRING(G_LEVEL_STATEMENT,

138: END IF;
139:
140: FOR i IN l_utilization_tbl.FIRST..l_utilization_tbl.LAST LOOP
141: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
142: FND_LOG.STRING(G_LEVEL_STATEMENT,
143: L_DEBUG_KEY,
144: 'Processing record ' || i);
145: END IF;
146: l_utilization_rec := l_utilization_tbl(i);

Line 161: FND_LOG.STRING(G_LEVEL_STATEMENT,

157: RAISE FND_API.G_EXC_ERROR;
158: END IF;
159:
160: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
161: FND_LOG.STRING(G_LEVEL_STATEMENT,
162: L_DEBUG_KEY,
163: 'After successful completion of Value To Id conversion and Validation of all records in table.');
164: END IF;
165: -- Perform updates.

Line 169: FND_LOG.STRING(G_LEVEL_STATEMENT,

165: -- Perform updates.
166: FOR i IN l_utilization_tbl.FIRST..l_utilization_tbl.LAST LOOP
167: l_utilization_rec := l_utilization_tbl(i);
168: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
169: FND_LOG.STRING(G_LEVEL_STATEMENT,
170: L_DEBUG_KEY,
171: 'About to call update_reading_all for record ' || i ||
172: ', l_based_on = ' || l_based_on);
173: END IF;

Line 178: FND_LOG.STRING(G_LEVEL_STATEMENT,

174: update_reading_all(l_utilization_rec, l_based_on);
175: END LOOP;
176:
177: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
178: FND_LOG.STRING(G_LEVEL_STATEMENT,
179: L_DEBUG_KEY,
180: 'After successful completion of update_reading_all calls for all records in table.');
181: END IF;
182:

Line 201: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');

197: p_data => x_msg_data,
198: p_encoded => fnd_api.g_false);
199:
200: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
201: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
202: END IF;
203:
204: EXCEPTION
205: WHEN FND_API.G_EXC_ERROR THEN

Line 264: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');

260: L_DEBUG_KEY CONSTANT VARCHAR2(150) := G_LOG_PREFIX || '.Convert_Value_Id';
261:
262: BEGIN
263: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
264: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');
265: END IF;
266:
267: -- For Inventory Organization Code.
268: IF ((p_utilization_rec.organization_id IS NULL) OR

Line 286: FND_LOG.STRING(G_LEVEL_STATEMENT,

282: CLOSE mtl_parameters_csr;
283: END IF;
284: END IF;
285: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
286: FND_LOG.STRING(G_LEVEL_STATEMENT,
287: L_DEBUG_KEY,
288: 'p_utilization_rec.organization_id = ' || p_utilization_rec.organization_id);
289: END IF;
290:

Line 311: FND_LOG.STRING(G_LEVEL_STATEMENT,

307: END IF;
308: END IF;
309: END IF;
310: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
311: FND_LOG.STRING(G_LEVEL_STATEMENT,
312: L_DEBUG_KEY,
313: 'p_utilization_rec.rule_code = ' || p_utilization_rec.rule_code);
314: END IF;
315:

Line 336: FND_LOG.STRING(G_LEVEL_STATEMENT,

332: CLOSE mtl_system_items_csr;
333: END IF;
334: END IF;
335: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
336: FND_LOG.STRING(G_LEVEL_STATEMENT,
337: L_DEBUG_KEY,
338: 'p_utilization_rec.inventory_item_id = ' || p_utilization_rec.inventory_item_id);
339: END IF;
340:

Line 360: FND_LOG.STRING(G_LEVEL_STATEMENT,

356: CLOSE csi_item_instance_csr;
357: END IF;
358: END IF;
359: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
360: FND_LOG.STRING(G_LEVEL_STATEMENT,
361: L_DEBUG_KEY,
362: 'p_utilization_rec.csi_item_instance_id = ' || p_utilization_rec.csi_item_instance_id);
363: END IF;
364:

Line 366: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');

362: 'p_utilization_rec.csi_item_instance_id = ' || p_utilization_rec.csi_item_instance_id);
363: END IF;
364:
365: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
366: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
367: END IF;
368:
369: END convert_value_id;
370:

Line 457: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');

453: L_DEBUG_KEY CONSTANT VARCHAR2(150) := G_LOG_PREFIX || '.Validate_Utilization_Rec';
454:
455: BEGIN
456: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
457: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');
458: END IF;
459:
460: -- Check if counter_id is valid.
461: IF (p_utilization_rec.counter_id IS NOT NULL) AND

Line 490: FND_LOG.STRING(G_LEVEL_STATEMENT,

486: END IF;
487: CLOSE cs_counters_csr;
488: END IF;
489: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
490: FND_LOG.STRING(G_LEVEL_STATEMENT,
491: L_DEBUG_KEY,
492: 'Validated Counter Id.');
493: END IF;
494:

Line 523: FND_LOG.STRING(G_LEVEL_STATEMENT,

519: END IF;
520: CLOSE csi_item_serial_csr;
521: END IF;
522: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
523: FND_LOG.STRING(G_LEVEL_STATEMENT,
524: L_DEBUG_KEY,
525: 'Validated inventory_item_id, serial and instance.');
526: END IF;
527:

Line 549: FND_LOG.STRING(G_LEVEL_STATEMENT,

545: END IF; /* csi item_instance */
546: CLOSE csi_item_instances_csr;
547: END IF;
548: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
549: FND_LOG.STRING(G_LEVEL_STATEMENT,
550: L_DEBUG_KEY,
551: 'Validated instance location.');
552: END IF;
553:

Line 556: FND_LOG.STRING(G_LEVEL_STATEMENT,

552: END IF;
553:
554: p_utilization_rec.csi_item_instance_id := l_tmp_instance_id;
555: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
556: FND_LOG.STRING(G_LEVEL_STATEMENT,
557: L_DEBUG_KEY,
558: 'Setting p_utilization_rec.csi_item_instance_id to ' || p_utilization_rec.csi_item_instance_id);
559: END IF;
560:

Line 617: FND_LOG.STRING(G_LEVEL_STATEMENT,

613: --dbms_output.put_line('UC Status invalid');
614: END IF;
615: END IF;
616: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
617: FND_LOG.STRING(G_LEVEL_STATEMENT,
618: L_DEBUG_KEY,
619: 'Validated UC of instance');
620: END IF;
621:

Line 632: FND_LOG.STRING(G_LEVEL_STATEMENT,

628: FND_MSG_PUB.add;
629: --dbms_output.put_line('Cascade flag is invalid.');
630: END IF;
631: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
632: FND_LOG.STRING(G_LEVEL_STATEMENT,
633: L_DEBUG_KEY,
634: 'Validated p_utilization_rec.cascade_flag: ' || p_utilization_rec.cascade_flag);
635: END IF;
636:

Line 647: FND_LOG.STRING(G_LEVEL_STATEMENT,

643: FND_MSG_PUB.add;
644: --dbms_output.put_line('Delta flag is invalid.');
645: END IF;
646: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
647: FND_LOG.STRING(G_LEVEL_STATEMENT,
648: L_DEBUG_KEY,
649: 'Validated p_utilization_rec.delta_flag: ' || p_utilization_rec.delta_flag);
650: END IF;
651:

Line 673: FND_LOG.STRING(G_LEVEL_STATEMENT,

669: END IF;
670: CLOSE mtl_units_of_measure_csr;
671: END IF;
672: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
673: FND_LOG.STRING(G_LEVEL_STATEMENT,
674: L_DEBUG_KEY,
675: 'Validated p_utilization_rec.uom_code: ' || p_utilization_rec.uom_code);
676: END IF;
677:

Line 695: FND_LOG.STRING(G_LEVEL_STATEMENT,

691: END IF;
692: CLOSE cs_counter_name_csr;
693: END IF;
694: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
695: FND_LOG.STRING(G_LEVEL_STATEMENT,
696: L_DEBUG_KEY,
697: 'Validated p_utilization_rec.counter_name: ' || p_utilization_rec.counter_name);
698: END IF;
699:

Line 709: FND_LOG.STRING(G_LEVEL_STATEMENT,

705: FND_MSG_PUB.add;
706: --dbms_output.put_line('Invalid Rule code');
707: END IF;
708: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
709: FND_LOG.STRING(G_LEVEL_STATEMENT,
710: L_DEBUG_KEY,
711: 'Validated p_utilization_rec.rule_code: ' || p_utilization_rec.rule_code);
712: END IF;
713:

Line 720: FND_LOG.STRING(G_LEVEL_STATEMENT,

716: p_utilization_rec.reading_date = FND_API.G_MISS_DATE) THEN
717: p_utilization_rec.reading_date := SYSDATE;
718: END IF;
719: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
720: FND_LOG.STRING(G_LEVEL_STATEMENT,
721: L_DEBUG_KEY,
722: 'Validated p_utilization_rec.reading_date: ' || p_utilization_rec.reading_date);
723: END IF;
724:

Line 735: FND_LOG.STRING(G_LEVEL_STATEMENT,

731: FND_MESSAGE.set_name('AHL','AHL_UC_READING_INVALID');
732: FND_MSG_PUB.add;
733: END IF;
734: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
735: FND_LOG.STRING(G_LEVEL_STATEMENT,
736: L_DEBUG_KEY,
737: 'Validated p_utilization_rec.reading_value: ' || p_utilization_rec.reading_value);
738: END IF;
739:

Line 762: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.end',

758: END IF;
759: x_found := l_found;
760: x_based_on := l_based_on;
761: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
762: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.end',
763: 'Exiting Procedure. x_found = ' || x_found || ', x_based_on = ' || x_based_on);
764: END IF;
765:
766: END validate_utilization_rec;

Line 813: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');

809: L_DEBUG_KEY CONSTANT VARCHAR2(150) := G_LOG_PREFIX || '.Update_Reading_Id';
810:
811: BEGIN
812: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
813: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');
814: END IF;
815:
816: -- Begin changes by jaramana on Feb 20, 2008 for Bug 6782765
817: OPEN is_counter_change_type_csr(p_utilization_rec.counter_id);

Line 826: FND_LOG.STRING(G_LEVEL_STATEMENT, L_DEBUG_KEY, 'Counter is change type: ' || l_change_type_flag);

822: l_change_type_flag := 'N';
823: END IF;
824: CLOSE is_counter_change_type_csr;
825: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
826: FND_LOG.STRING(G_LEVEL_STATEMENT, L_DEBUG_KEY, 'Counter is change type: ' || l_change_type_flag);
827: END IF;
828: -- End changes by jaramana on Feb 20, 2008 for Bug 6782765
829:
830: OPEN get_current_value_id(p_utilization_rec.counter_id);

Line 862: FND_LOG.STRING(G_LEVEL_STATEMENT,

858: -- End changes by jaramana on Feb 20, 2008 for Bug 6782765
859: l_reading_value := p_utilization_rec.reading_value;
860: END IF;
861: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
862: FND_LOG.STRING(G_LEVEL_STATEMENT,
863: L_DEBUG_KEY,
864: 'l_start_current_value = ' || l_start_current_value ||
865: ', p_utilization_rec.delta_flag = ' || p_utilization_rec.delta_flag ||
866: ', p_utilization_rec.reading_value = ' || p_utilization_rec.reading_value ||

Line 884: FND_LOG.STRING(G_LEVEL_STATEMENT,

880: -- Changed from 'Y' to 'N' by jaramana on July 10, 2007 for bug 6127957
881: l_ctr_rdg_tbl(1).override_valid_flag := 'N';
882: --Call CS Counter Update API to update the counter_reading of the start instance
883: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
884: FND_LOG.STRING(G_LEVEL_STATEMENT,
885: L_DEBUG_KEY,
886: 'About to call CS_CTR_CAPTURE_READING_PUB.capture_counter_reading');
887: END IF;
888: CS_CTR_CAPTURE_READING_PUB.capture_counter_reading(

Line 900: FND_LOG.STRING(G_LEVEL_STATEMENT,

896: x_return_status => l_return_status,
897: x_msg_count => l_msg_count,
898: x_msg_data => l_msg_data );
899: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
900: FND_LOG.STRING(G_LEVEL_STATEMENT,
901: L_DEBUG_KEY,
902: 'Returned from call to CS_CTR_CAPTURE_READING_PUB.capture_counter_reading. l_return_status = ' || l_return_status);
903: END IF;
904: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

Line 910: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.end',

906: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
907: RAISE FND_API.G_EXC_ERROR;
908: END IF;
909: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
910: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.end',
911: 'Exiting Procedure.');
912: END IF;
913: END update_reading_id;
914:

Line 1000: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');

996: L_DEBUG_KEY CONSTANT VARCHAR2(150) := G_LOG_PREFIX || '.Update_Reading_Ins';
997:
998: BEGIN
999: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1000: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');
1001: END IF;
1002: l_utilization_rec := p_utilization_rec;
1003: --First get the current counter reading value for the start instance
1004: --This procedure assumes that counter exists for the instance

Line 1019: FND_LOG.STRING(G_LEVEL_STATEMENT,

1015: ELSE
1016: CLOSE get_current_value_name;
1017: END IF;
1018: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1019: FND_LOG.STRING(G_LEVEL_STATEMENT,
1020: L_DEBUG_KEY,
1021: 'l_get_current_value_name.counter_id = ' || l_get_current_value_name.counter_id ||
1022: ', l_get_current_value_name.counter_reading = ' || l_get_current_value_name.counter_reading ||
1023: ', l_get_current_value_name.uom_code = ' || l_get_current_value_name.uom_code ||

Line 1040: FND_LOG.STRING(G_LEVEL_STATEMENT, L_DEBUG_KEY, 'Counter is change type: ' || l_change_type_flag);

1036: l_change_type_flag := 'N';
1037: END IF;
1038: CLOSE is_counter_change_type_csr;
1039: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1040: FND_LOG.STRING(G_LEVEL_STATEMENT, L_DEBUG_KEY, 'Counter is change type: ' || l_change_type_flag);
1041: END IF;
1042: -- End changes by jaramana on Feb 20, 2008 for Bug 6782765
1043:
1044: l_start_current_value := l_get_current_value_name.counter_reading;

Line 1048: FND_LOG.STRING(G_LEVEL_STATEMENT,

1044: l_start_current_value := l_get_current_value_name.counter_reading;
1045: l_uom_code := l_get_current_value_name.uom_code;
1046: update_reading_id(l_utilization_rec);
1047: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1048: FND_LOG.STRING(G_LEVEL_STATEMENT,
1049: L_DEBUG_KEY, 'Returned from call to update_reading_id');
1050: END IF;
1051:
1052: IF (l_utilization_rec.cascade_flag = 'Y') THEN

Line 1054: FND_LOG.STRING(G_LEVEL_STATEMENT,

1050: END IF;
1051:
1052: IF (l_utilization_rec.cascade_flag = 'Y') THEN
1053: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1054: FND_LOG.STRING(G_LEVEL_STATEMENT,
1055: L_DEBUG_KEY, 'l_utilization_rec.cascade_flag = Y');
1056: END IF;
1057: -- Process for config items.
1058: FOR child_rec IN csi_relationships_csr(p_utilization_rec.csi_item_instance_id) LOOP

Line 1060: FND_LOG.STRING(G_LEVEL_STATEMENT,

1056: END IF;
1057: -- Process for config items.
1058: FOR child_rec IN csi_relationships_csr(p_utilization_rec.csi_item_instance_id) LOOP
1059: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1060: FND_LOG.STRING(G_LEVEL_STATEMENT,
1061: L_DEBUG_KEY, 'Processing child instance ' || child_rec.csi_item_instance_id);
1062: END IF;
1063: -- Get counter ratio.
1064: IF ahl_util_uc_pkg.extra_node(child_rec.csi_item_instance_id, l_utilization_rec.csi_item_instance_id) THEN

Line 1067: FND_LOG.STRING(G_LEVEL_STATEMENT,

1063: -- Get counter ratio.
1064: IF ahl_util_uc_pkg.extra_node(child_rec.csi_item_instance_id, l_utilization_rec.csi_item_instance_id) THEN
1065: l_ratio := 1;
1066: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1067: FND_LOG.STRING(G_LEVEL_STATEMENT,
1068: L_DEBUG_KEY, 'Instance is an extra node. Setting l_ratio to 1');
1069: END IF;
1070: ELSE
1071: l_ratio := get_counter_ratio(l_utilization_rec.csi_item_instance_id,

Line 1076: FND_LOG.STRING(G_LEVEL_STATEMENT,

1072: child_rec.csi_item_instance_id,
1073: l_uom_code,
1074: l_utilization_rec.rule_code);
1075: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1076: FND_LOG.STRING(G_LEVEL_STATEMENT,
1077: L_DEBUG_KEY, 'Instance is not an extra node. Setting l_ratio to ' || l_ratio);
1078: END IF;
1079: END IF;
1080:

Line 1086: FND_LOG.STRING(G_LEVEL_STATEMENT,

1082: OPEN get_current_value_name(child_rec.csi_item_instance_id, l_utilization_rec.counter_name);
1083: FETCH get_current_value_name INTO l_get_current_value_name;
1084: IF get_current_value_name%FOUND THEN
1085: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1086: FND_LOG.STRING(G_LEVEL_STATEMENT,
1087: L_DEBUG_KEY, 'get_current_value_name%FOUND is TRUE. ' ||
1088: 'l_get_current_value_name.counter_reading = ' || l_get_current_value_name.counter_reading);
1089: END IF;
1090: --Else the given counter name doesn't apply to this instance

Line 1116: FND_LOG.STRING(G_LEVEL_STATEMENT,

1112: -- For other counters, always pass the total value
1113: l_reading_value := l_get_current_value_name.counter_reading+l_ratio*l_utilization_rec.reading_value;
1114: END IF;
1115: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1116: FND_LOG.STRING(G_LEVEL_STATEMENT,
1117: L_DEBUG_KEY, 'l_utilization_rec.delta_flag is Y. Setting l_reading_value to ' || l_reading_value);
1118: END IF;
1119: ELSE
1120: -- Not Delta

Line 1132: FND_LOG.STRING(G_LEVEL_STATEMENT,

1128: -- End changes by jaramana on Feb 20, 2008 for Bug 6782765
1129: l_reading_value := l_get_current_value_name.counter_reading+
1130: l_ratio*(l_utilization_rec.reading_value-l_start_current_value);
1131: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1132: FND_LOG.STRING(G_LEVEL_STATEMENT,
1133: L_DEBUG_KEY, 'l_utilization_rec.delta_flag is not Y. Setting l_reading_value to ' || l_reading_value);
1134: END IF;
1135: END IF;
1136: -- Update reading for the counter.

Line 1149: FND_LOG.STRING(G_LEVEL_STATEMENT,

1145: -- Changed from 'Y' to 'N' by jaramana on July 10, 2007 for bug 6127957
1146: l_ctr_rdg_tbl(1).override_valid_flag := 'N';
1147: --Call CS Counter Update API to update the counter_reading of the start instance
1148: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1149: FND_LOG.STRING(G_LEVEL_STATEMENT,
1150: L_DEBUG_KEY, 'About to call CS_CTR_CAPTURE_READING_PUB.capture_counter_reading with ' ||
1151: 'l_ctr_rdg_tbl(1).counter_reading = ' || l_ctr_rdg_tbl(1).counter_reading ||
1152: ', l_ctr_rdg_tbl(1).counter_id = ' || l_ctr_rdg_tbl(1).counter_id ||
1153: ', l_ctr_rdg_tbl(1).value_timestamp = ' || l_ctr_rdg_tbl(1).value_timestamp);

Line 1167: FND_LOG.STRING(G_LEVEL_STATEMENT,

1163: x_return_status => l_return_status,
1164: x_msg_count => l_msg_count,
1165: x_msg_data => l_msg_data);
1166: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1167: FND_LOG.STRING(G_LEVEL_STATEMENT,
1168: L_DEBUG_KEY, 'Returned from call to CS_CTR_CAPTURE_READING_PUB.capture_counter_reading. l_return_status = ' || l_return_status);
1169: END IF;
1170: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1171: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1179: FND_LOG.STRING(G_LEVEL_STATEMENT,

1175: ELSE
1176: CLOSE get_current_value_name;
1177: -- Added by jaramana on October 29, 2007 for bug 6513576
1178: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1179: FND_LOG.STRING(G_LEVEL_STATEMENT,
1180: L_DEBUG_KEY, 'get_current_value_name%FOUND is FALSE.');
1181: END IF;
1182: END IF;
1183: END LOOP;

Line 1186: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure.');

1182: END IF;
1183: END LOOP;
1184: END IF;
1185: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1186: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure.');
1187: END IF;
1188: END update_reading_ins;
1189:
1190: ---------------------------------------------------------------------------------

Line 1303: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');

1299: L_DEBUG_KEY CONSTANT VARCHAR2(150) := G_LOG_PREFIX || '.Update_Reading_Cn';
1300:
1301: BEGIN
1302: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1303: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');
1304: END IF;
1305: l_utilization_rec := p_utilization_rec;
1306: OPEN cs_counters_name_csr(l_utilization_rec.csi_item_instance_id,
1307: l_utilization_rec.counter_name);

Line 1312: FND_LOG.STRING(G_LEVEL_STATEMENT,

1308: FETCH cs_counters_name_csr INTO l_cs_counters_name_csr;
1309: IF cs_counters_name_csr%FOUND THEN
1310: --p_utilization_rec.uom_code := l_cs_counters_name_csr.uom_code;
1311: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1312: FND_LOG.STRING(G_LEVEL_STATEMENT,
1313: L_DEBUG_KEY,
1314: 'cs_counters_name_csr%FOUND. Calling update_reading_ins');
1315: END IF;
1316: update_reading_ins(l_utilization_rec);

Line 1333: FND_LOG.STRING(G_LEVEL_STATEMENT,

1329: --The start instance doesn't have the given counter associated, reading value is delta
1330: --reading and cascade_flag = 'Y', then get all of its highest level components which
1331: --have the given counter associated but their ancestors don't.
1332: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1333: FND_LOG.STRING(G_LEVEL_STATEMENT,
1334: L_DEBUG_KEY,
1335: 'cs_counters_name_csr%FOUND is false. l_utilization_rec.delta_flag is Y and l_utilization_rec.cascade_flag is Y');
1336: END IF;
1337: l_inst_idx :=1;

Line 1354: FND_LOG.STRING(G_LEVEL_STATEMENT,

1350: END LOOP;
1351: **/
1352: -- End changes made by jaramana on 03-DEC-2008 for bug 7426643 (FP of 7263702)
1353: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1354: FND_LOG.STRING(G_LEVEL_STATEMENT,
1355: L_DEBUG_KEY,
1356: 'l_instance_tbl.count = ' || l_instance_tbl.count);
1357: END IF;
1358: IF l_instance_tbl.count > 0 THEN

Line 1391: FND_LOG.STRING(G_LEVEL_STATEMENT,

1387: END IF;
1388: END LOOP;
1389: END IF;
1390: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1391: FND_LOG.STRING(G_LEVEL_STATEMENT,
1392: L_DEBUG_KEY,
1393: 'After processing, l_instance_tbl.count = ' || l_instance_tbl.count);
1394: END IF;
1395: FOR i IN l_instance_tbl.FIRST..l_instance_tbl.LAST LOOP

Line 1412: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure.');

1408: END IF;
1409: END IF;
1410: END IF;
1411: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1412: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure.');
1413: END IF;
1414: END update_reading_cn;
1415:
1416: ---------------------------------------------------------------------------------

Line 1467: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');

1463: /** End changes by jaramana on October 29, 2007 for bug 6513576 **/
1464:
1465: BEGIN
1466: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1467: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');
1468: END IF;
1469: l_utilization_rec := p_utilization_rec;
1470: IF (p_based_on = ':COUNTERID') THEN
1471: -- No cascade issue no matter whether cascade flag is set to 'Y' or 'N', just update the

Line 1474: FND_LOG.STRING(G_LEVEL_STATEMENT,

1470: IF (p_based_on = ':COUNTERID') THEN
1471: -- No cascade issue no matter whether cascade flag is set to 'Y' or 'N', just update the
1472: -- specific counter_id
1473: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1474: FND_LOG.STRING(G_LEVEL_STATEMENT,
1475: L_DEBUG_KEY,
1476: 'p_based_on is COUNTERID. Calling update_reading_id');
1477: END IF;
1478: update_reading_id(l_utilization_rec);

Line 1491: FND_LOG.STRING(G_LEVEL_STATEMENT,

1487: --have the counter_name associated but all of their ancestors don't and make each of these components
1488: --as start point(assuming reading_value (only delta reading) refers to their counters) and calculate the
1489: --counter ratio of their own components.
1490: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1491: FND_LOG.STRING(G_LEVEL_STATEMENT,
1492: L_DEBUG_KEY,
1493: 'p_based_on is COUNTER. Calling update_reading_cn');
1494: END IF;
1495: update_reading_cn(l_utilization_rec);

Line 1504: FND_LOG.STRING(G_LEVEL_STATEMENT,

1500: --then we just get all the counters associated with the start instance with the same UOM. For all of these
1501: --distinct counters loop just like p_based_on = ':COUNTER'.
1502: i := 0;
1503: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1504: FND_LOG.STRING(G_LEVEL_STATEMENT,
1505: L_DEBUG_KEY,
1506: 'p_based_on is UOM, l_utilization_rec.delta_flag = ' || l_utilization_rec.delta_flag);
1507: END IF;
1508: IF NVL(l_utilization_rec.delta_flag, 'N') = 'N' THEN

Line 1513: FND_LOG.STRING(G_LEVEL_STATEMENT,

1509: FOR l_get_inst_counters IN get_inst_counters(l_utilization_rec.csi_item_instance_id,
1510: l_utilization_rec.uom_code) LOOP
1511: l_utilization_rec.counter_name := l_get_inst_counters.counter_name;
1512: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1513: FND_LOG.STRING(G_LEVEL_STATEMENT,
1514: L_DEBUG_KEY,
1515: 'l_get_inst_counters.counter_name = ' || l_get_inst_counters.counter_name ||
1516: ', i = ' || i || ', Calling update_reading_cn');
1517: END IF;

Line 1526: FND_LOG.STRING(G_LEVEL_STATEMENT,

1522: FOR l_get_all_counters IN get_all_counters(l_utilization_rec.csi_item_instance_id,
1523: l_utilization_rec.uom_code) LOOP
1524: l_utilization_rec.counter_name := l_get_all_counters.counter_name;
1525: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1526: FND_LOG.STRING(G_LEVEL_STATEMENT,
1527: L_DEBUG_KEY,
1528: ' l_get_all_counters.counter_name = ' || l_get_all_counters.counter_name ||
1529: ', i = ' || i || ', Calling update_reading_cn');
1530: END IF;

Line 1542: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure.');

1538: RAISE FND_API.G_EXC_ERROR;
1539: END IF;
1540: END IF;
1541: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1542: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure.');
1543: END IF;
1544: END update_reading_all;
1545:
1546: ---------------------------------------------------------------------------------

Line 1590: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Function' ||

1586: L_DEBUG_KEY CONSTANT VARCHAR2(150) := G_LOG_PREFIX || '.Get_Counter_Ratio';
1587:
1588: BEGIN
1589: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1590: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Function' ||
1591: ', p_rule_code = ' || p_rule_code);
1592: END IF;
1593: IF (p_rule_code IS NULL OR p_rule_code = FND_API.G_MISS_CHAR) THEN
1594: l_rule_code := 'STANDARD';

Line 1605: FND_LOG.STRING(G_LEVEL_STATEMENT,

1601: FETCH ahl_ctr_rule_csr INTO l_ratio;
1602: IF ahl_ctr_rule_csr%FOUND THEN
1603: l_total_ratio := l_total_ratio * l_ratio;
1604: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1605: FND_LOG.STRING(G_LEVEL_STATEMENT,
1606: L_DEBUG_KEY,
1607: 'l_ratio = ' || l_ratio || ', Setting l_total_ratio to ' || l_total_ratio);
1608: END IF;
1609: END IF;

Line 1614: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Function' ||

1610: CLOSE ahl_ctr_rule_csr;
1611: END LOOP;
1612:
1613: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1614: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Function' ||
1615: '. Returning l_total_ratio as ' || l_total_ratio);
1616: END IF;
1617:
1618: RETURN l_total_ratio;