eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

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 817: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');

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

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

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

Line 866: FND_LOG.STRING(G_LEVEL_STATEMENT,

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

Line 888: FND_LOG.STRING(G_LEVEL_STATEMENT,

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

Line 904: FND_LOG.STRING(G_LEVEL_STATEMENT,

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

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

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

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

1008: L_DEBUG_KEY CONSTANT VARCHAR2(150) := G_LOG_PREFIX || '.Update_Reading_Ins';
1009:
1010: BEGIN
1011: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1012: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');
1013: END IF;
1014: l_utilization_rec := p_utilization_rec;
1015: --First get the current counter reading value for the start instance
1016: --This procedure assumes that counter exists for the instance

Line 1031: FND_LOG.STRING(G_LEVEL_STATEMENT,

1027: ELSE
1028: CLOSE get_current_value_name;
1029: END IF;
1030: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1031: FND_LOG.STRING(G_LEVEL_STATEMENT,
1032: L_DEBUG_KEY,
1033: 'l_get_current_value_name.counter_id = ' || l_get_current_value_name.counter_id ||
1034: ', l_get_current_value_name.counter_reading = ' || l_get_current_value_name.counter_reading ||
1035: ', l_get_current_value_name.uom_code = ' || l_get_current_value_name.uom_code ||

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

1048: l_change_type_flag := 'N';
1049: END IF;
1050: CLOSE is_counter_change_type_csr;
1051: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1052: FND_LOG.STRING(G_LEVEL_STATEMENT, L_DEBUG_KEY, 'Counter is change type: ' || l_change_type_flag);
1053: END IF;
1054: -- End changes by jaramana on Feb 20, 2008 for Bug 6782765
1055:
1056: l_start_current_value := l_get_current_value_name.counter_reading;

Line 1060: FND_LOG.STRING(G_LEVEL_STATEMENT,

1056: l_start_current_value := l_get_current_value_name.counter_reading;
1057: l_uom_code := l_get_current_value_name.uom_code;
1058: update_reading_id(l_utilization_rec);
1059: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1060: FND_LOG.STRING(G_LEVEL_STATEMENT,
1061: L_DEBUG_KEY, 'Returned from call to update_reading_id');
1062: END IF;
1063:
1064: IF (l_utilization_rec.cascade_flag = 'Y') THEN

Line 1066: FND_LOG.STRING(G_LEVEL_STATEMENT,

1062: END IF;
1063:
1064: IF (l_utilization_rec.cascade_flag = 'Y') THEN
1065: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1066: FND_LOG.STRING(G_LEVEL_STATEMENT,
1067: L_DEBUG_KEY, 'l_utilization_rec.cascade_flag = Y');
1068: END IF;
1069: -- Process for config items.
1070: FOR child_rec IN csi_relationships_csr(p_utilization_rec.csi_item_instance_id) LOOP

Line 1072: FND_LOG.STRING(G_LEVEL_STATEMENT,

1068: END IF;
1069: -- Process for config items.
1070: FOR child_rec IN csi_relationships_csr(p_utilization_rec.csi_item_instance_id) LOOP
1071: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1072: FND_LOG.STRING(G_LEVEL_STATEMENT,
1073: L_DEBUG_KEY, 'Processing child instance ' || child_rec.csi_item_instance_id);
1074: END IF;
1075: -- Get counter ratio.
1076: IF ahl_util_uc_pkg.extra_node(child_rec.csi_item_instance_id, l_utilization_rec.csi_item_instance_id) THEN

Line 1079: FND_LOG.STRING(G_LEVEL_STATEMENT,

1075: -- Get counter ratio.
1076: IF ahl_util_uc_pkg.extra_node(child_rec.csi_item_instance_id, l_utilization_rec.csi_item_instance_id) THEN
1077: l_ratio := 1;
1078: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1079: FND_LOG.STRING(G_LEVEL_STATEMENT,
1080: L_DEBUG_KEY, 'Instance is an extra node. Setting l_ratio to 1');
1081: END IF;
1082: ELSE
1083: l_ratio := get_counter_ratio(l_utilization_rec.csi_item_instance_id,

Line 1088: FND_LOG.STRING(G_LEVEL_STATEMENT,

1084: child_rec.csi_item_instance_id,
1085: l_uom_code,
1086: l_utilization_rec.rule_code);
1087: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1088: FND_LOG.STRING(G_LEVEL_STATEMENT,
1089: L_DEBUG_KEY, 'Instance is not an extra node. Setting l_ratio to ' || l_ratio);
1090: END IF;
1091: END IF;
1092:

Line 1098: FND_LOG.STRING(G_LEVEL_STATEMENT,

1094: OPEN get_current_value_name(child_rec.csi_item_instance_id, l_utilization_rec.counter_name);
1095: FETCH get_current_value_name INTO l_get_current_value_name;
1096: IF get_current_value_name%FOUND THEN
1097: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1098: FND_LOG.STRING(G_LEVEL_STATEMENT,
1099: L_DEBUG_KEY, 'get_current_value_name%FOUND is TRUE. ' ||
1100: 'l_get_current_value_name.counter_reading = ' || l_get_current_value_name.counter_reading);
1101: END IF;
1102: --Else the given counter name doesn't apply to this instance

Line 1128: FND_LOG.STRING(G_LEVEL_STATEMENT,

1124: -- For other counters, always pass the total value
1125: l_reading_value := l_get_current_value_name.counter_reading+l_ratio*l_utilization_rec.reading_value;
1126: END IF;
1127: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1128: FND_LOG.STRING(G_LEVEL_STATEMENT,
1129: L_DEBUG_KEY, 'l_utilization_rec.delta_flag is Y. Setting l_reading_value to ' || l_reading_value);
1130: END IF;
1131: ELSE
1132: -- Not Delta

Line 1144: FND_LOG.STRING(G_LEVEL_STATEMENT,

1140: -- End changes by jaramana on Feb 20, 2008 for Bug 6782765
1141: l_reading_value := l_get_current_value_name.counter_reading+
1142: l_ratio*(l_utilization_rec.reading_value-l_start_current_value);
1143: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1144: FND_LOG.STRING(G_LEVEL_STATEMENT,
1145: L_DEBUG_KEY, 'l_utilization_rec.delta_flag is not Y. Setting l_reading_value to ' || l_reading_value);
1146: END IF;
1147: END IF;
1148: -- Update reading for the counter.

Line 1161: FND_LOG.STRING(G_LEVEL_STATEMENT,

1157: -- Changed from 'Y' to 'N' by jaramana on July 10, 2007 for bug 6127957
1158: l_ctr_rdg_tbl(1).override_valid_flag := 'N';
1159: --Call CS Counter Update API to update the counter_reading of the start instance
1160: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1161: FND_LOG.STRING(G_LEVEL_STATEMENT,
1162: L_DEBUG_KEY, 'About to call CS_CTR_CAPTURE_READING_PUB.capture_counter_reading with ' ||
1163: 'l_ctr_rdg_tbl(1).counter_reading = ' || l_ctr_rdg_tbl(1).counter_reading ||
1164: ', l_ctr_rdg_tbl(1).counter_id = ' || l_ctr_rdg_tbl(1).counter_id ||
1165: ', l_ctr_rdg_tbl(1).value_timestamp = ' || l_ctr_rdg_tbl(1).value_timestamp);

Line 1179: FND_LOG.STRING(G_LEVEL_STATEMENT,

1175: x_return_status => l_return_status,
1176: x_msg_count => l_msg_count,
1177: x_msg_data => l_msg_data);
1178: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1179: FND_LOG.STRING(G_LEVEL_STATEMENT,
1180: L_DEBUG_KEY, 'Returned from call to CS_CTR_CAPTURE_READING_PUB.capture_counter_reading. l_return_status = ' || l_return_status);
1181: END IF;
1182: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1183: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1191: FND_LOG.STRING(G_LEVEL_STATEMENT,

1187: ELSE
1188: CLOSE get_current_value_name;
1189: -- Added by jaramana on October 29, 2007 for bug 6513576
1190: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1191: FND_LOG.STRING(G_LEVEL_STATEMENT,
1192: L_DEBUG_KEY, 'get_current_value_name%FOUND is FALSE.');
1193: END IF;
1194: END IF;
1195: END LOOP;

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

1194: END IF;
1195: END LOOP;
1196: END IF;
1197: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1198: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure.');
1199: END IF;
1200: END update_reading_ins;
1201:
1202: ---------------------------------------------------------------------------------

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

1311: L_DEBUG_KEY CONSTANT VARCHAR2(150) := G_LOG_PREFIX || '.Update_Reading_Cn';
1312:
1313: BEGIN
1314: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1315: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');
1316: END IF;
1317: l_utilization_rec := p_utilization_rec;
1318: OPEN cs_counters_name_csr(l_utilization_rec.csi_item_instance_id,
1319: l_utilization_rec.counter_name);

Line 1324: FND_LOG.STRING(G_LEVEL_STATEMENT,

1320: FETCH cs_counters_name_csr INTO l_cs_counters_name_csr;
1321: IF cs_counters_name_csr%FOUND THEN
1322: --p_utilization_rec.uom_code := l_cs_counters_name_csr.uom_code;
1323: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1324: FND_LOG.STRING(G_LEVEL_STATEMENT,
1325: L_DEBUG_KEY,
1326: 'cs_counters_name_csr%FOUND. Calling update_reading_ins');
1327: END IF;
1328: update_reading_ins(l_utilization_rec);

Line 1345: FND_LOG.STRING(G_LEVEL_STATEMENT,

1341: --The start instance doesn't have the given counter associated, reading value is delta
1342: --reading and cascade_flag = 'Y', then get all of its highest level components which
1343: --have the given counter associated but their ancestors don't.
1344: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1345: FND_LOG.STRING(G_LEVEL_STATEMENT,
1346: L_DEBUG_KEY,
1347: 'cs_counters_name_csr%FOUND is false. l_utilization_rec.delta_flag is Y and l_utilization_rec.cascade_flag is Y');
1348: END IF;
1349: l_inst_idx :=1;

Line 1366: FND_LOG.STRING(G_LEVEL_STATEMENT,

1362: END LOOP;
1363: **/
1364: -- End changes made by jaramana on 03-DEC-2008 for bug 7426643 (FP of 7263702)
1365: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1366: FND_LOG.STRING(G_LEVEL_STATEMENT,
1367: L_DEBUG_KEY,
1368: 'l_instance_tbl.count = ' || l_instance_tbl.count);
1369: END IF;
1370: IF l_instance_tbl.count > 0 THEN

Line 1403: FND_LOG.STRING(G_LEVEL_STATEMENT,

1399: END IF;
1400: END LOOP;
1401: END IF;
1402: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1403: FND_LOG.STRING(G_LEVEL_STATEMENT,
1404: L_DEBUG_KEY,
1405: 'After processing, l_instance_tbl.count = ' || l_instance_tbl.count);
1406: END IF;
1407: FOR i IN l_instance_tbl.FIRST..l_instance_tbl.LAST LOOP

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

1420: END IF;
1421: END IF;
1422: END IF;
1423: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1424: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure.');
1425: END IF;
1426: END update_reading_cn;
1427:
1428: ---------------------------------------------------------------------------------

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

1494: /** End changes by jaramana on October 29, 2007 for bug 6513576 **/
1495:
1496: BEGIN
1497: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1498: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');
1499: END IF;
1500: l_utilization_rec := p_utilization_rec;
1501: IF (p_based_on = ':COUNTERID') THEN
1502: -- No cascade issue no matter whether cascade flag is set to 'Y' or 'N', just update the

Line 1505: FND_LOG.STRING(G_LEVEL_STATEMENT,

1501: IF (p_based_on = ':COUNTERID') THEN
1502: -- No cascade issue no matter whether cascade flag is set to 'Y' or 'N', just update the
1503: -- specific counter_id
1504: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1505: FND_LOG.STRING(G_LEVEL_STATEMENT,
1506: L_DEBUG_KEY,
1507: 'p_based_on is COUNTERID. Calling update_reading_id');
1508: END IF;
1509: update_reading_id(l_utilization_rec);

Line 1522: FND_LOG.STRING(G_LEVEL_STATEMENT,

1518: --have the counter_name associated but all of their ancestors don't and make each of these components
1519: --as start point(assuming reading_value (only delta reading) refers to their counters) and calculate the
1520: --counter ratio of their own components.
1521: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1522: FND_LOG.STRING(G_LEVEL_STATEMENT,
1523: L_DEBUG_KEY,
1524: 'p_based_on is COUNTER. Calling update_reading_cn');
1525: END IF;
1526: update_reading_cn(l_utilization_rec);

Line 1535: FND_LOG.STRING(G_LEVEL_STATEMENT,

1531: --then we just get all the counters associated with the start instance with the same UOM. For all of these
1532: --distinct counters loop just like p_based_on = ':COUNTER'.
1533: i := 0;
1534: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1535: FND_LOG.STRING(G_LEVEL_STATEMENT,
1536: L_DEBUG_KEY,
1537: 'p_based_on is UOM, l_utilization_rec.delta_flag = ' || l_utilization_rec.delta_flag);
1538: END IF;
1539: IF NVL(l_utilization_rec.delta_flag, 'N') = 'N' THEN

Line 1544: FND_LOG.STRING(G_LEVEL_STATEMENT,

1540: FOR l_get_inst_counters IN get_inst_counters(l_utilization_rec.csi_item_instance_id,
1541: l_utilization_rec.uom_code) LOOP
1542: l_utilization_rec.counter_name := l_get_inst_counters.counter_name;
1543: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1544: FND_LOG.STRING(G_LEVEL_STATEMENT,
1545: L_DEBUG_KEY,
1546: 'l_get_inst_counters.counter_name = ' || l_get_inst_counters.counter_name ||
1547: ', i = ' || i || ', Calling update_reading_cn');
1548: END IF;

Line 1557: FND_LOG.STRING(G_LEVEL_STATEMENT,

1553: FOR l_get_all_counters IN get_all_counters(l_utilization_rec.csi_item_instance_id,
1554: l_utilization_rec.uom_code) LOOP
1555: l_utilization_rec.counter_name := l_get_all_counters.counter_name;
1556: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1557: FND_LOG.STRING(G_LEVEL_STATEMENT,
1558: L_DEBUG_KEY,
1559: ' l_get_all_counters.counter_name = ' || l_get_all_counters.counter_name ||
1560: ', i = ' || i || ', Calling update_reading_cn');
1561: END IF;

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

1569: RAISE FND_API.G_EXC_ERROR;
1570: END IF;
1571: END IF;
1572: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1573: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure.');
1574: END IF;
1575: END update_reading_all;
1576:
1577: ---------------------------------------------------------------------------------

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

1617: L_DEBUG_KEY CONSTANT VARCHAR2(150) := G_LOG_PREFIX || '.Get_Counter_Ratio';
1618:
1619: BEGIN
1620: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1621: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Function' ||
1622: ', p_rule_code = ' || p_rule_code);
1623: END IF;
1624: IF (p_rule_code IS NULL OR p_rule_code = FND_API.G_MISS_CHAR) THEN
1625: l_rule_code := 'STANDARD';

Line 1636: FND_LOG.STRING(G_LEVEL_STATEMENT,

1632: FETCH ahl_ctr_rule_csr INTO l_ratio;
1633: IF ahl_ctr_rule_csr%FOUND THEN
1634: l_total_ratio := l_total_ratio * l_ratio;
1635: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1636: FND_LOG.STRING(G_LEVEL_STATEMENT,
1637: L_DEBUG_KEY,
1638: 'l_ratio = ' || l_ratio || ', Setting l_total_ratio to ' || l_total_ratio);
1639: END IF;
1640: END IF;

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

1641: CLOSE ahl_ctr_rule_csr;
1642: END LOOP;
1643:
1644: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1645: FND_LOG.STRING(G_LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Function' ||
1646: '. Returning l_total_ratio as ' || l_total_ratio);
1647: END IF;
1648:
1649: RETURN l_total_ratio;