17: IS
18: BEGIN
19: FND_MESSAGE.SET_NAME ('EAM', ERROR);
20: FND_MSG_PUB.ADD;
21: RAISE FND_API.G_EXC_ERROR;
22: END;
23:
24:
25: PROCEDURE check_wip_entity_id (p_wip_entity_id number , p_meter_id number)
79: --Invalid work order
80: fnd_message.set_name('EAM', 'EAM_INVALID_PARAMETER');
81: fnd_message.set_token('NAME', 'WIP_ENTITY_ID :' || p_wip_entity_id);
82: fnd_msg_pub.add;
83: RAISE fnd_api.g_exc_error;
84: END;
85:
86:
87: PROCEDURE create_meter_reading
86:
87: PROCEDURE create_meter_reading
88: (
89: p_api_version IN number,
90: p_init_msg_list IN varchar2:=FND_API.G_FALSE,
91: p_commit IN varchar2:=FND_API.G_FALSE,
92: x_msg_count OUT NOCOPY number,
93: x_msg_data OUT NOCOPY varchar2,
94: x_return_status OUT NOCOPY varchar2,
87: PROCEDURE create_meter_reading
88: (
89: p_api_version IN number,
90: p_init_msg_list IN varchar2:=FND_API.G_FALSE,
91: p_commit IN varchar2:=FND_API.G_FALSE,
92: x_msg_count OUT NOCOPY number,
93: x_msg_data OUT NOCOPY varchar2,
94: x_return_status OUT NOCOPY varchar2,
95: p_meter_reading_rec IN Eam_MeterReading_PUB.Meter_Reading_Rec_Type,
131: END IF;
132: -- Standard call to check for call compatibility.
133:
134:
135: IF NOT FND_API.Compatible_API_Call (l_api_version,
136: p_api_version,
137: l_api_name,
138: G_PKG_NAME )
139: THEN
136: p_api_version,
137: l_api_name,
138: G_PKG_NAME )
139: THEN
140: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
141: END IF;
142:
143:
144: -- Initialize message list if p_init_msg_list is set to TRUE.
141: END IF;
142:
143:
144: -- Initialize message list if p_init_msg_list is set to TRUE.
145: IF FND_API.to_Boolean( p_init_msg_list ) THEN
146: FND_MSG_PUB.initialize;
147: END IF;
148:
149: -- Initialize API return status to success
146: FND_MSG_PUB.initialize;
147: END IF;
148:
149: -- Initialize API return status to success
150: x_return_status := FND_API.G_RET_STS_SUCCESS;
151:
152: -- API body
153: l_ctr_property_readings_tbl.DELETE;
154: l_ctr_rdg_tbl.DELETE;
299: END IF;
300: Csi_Counter_Readings_PUB.Capture_Counter_reading(p_api_version => p_api_version,
301: p_commit => p_commit,
302: p_init_msg_list => p_init_msg_list,
303: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
304: p_txn_tbl => l_csi_txn_tbl,
305: p_ctr_rdg_tbl => l_ctr_rdg_tbl,
306: p_ctr_prop_rdg_tbl => l_ctr_property_readings_tbl,
307: x_return_status => x_return_status,
319:
320:
321: -- End of API body.
322: -- Standard check of p_commit.
323: IF FND_API.To_Boolean( p_commit ) THEN
324: COMMIT WORK;
325: IF (l_plog) THEN
326: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'Committed Work');
327: END IF;
332: END IF;
333:
334:
335: EXCEPTION
336: WHEN FND_API.G_EXC_ERROR THEN
337: ROLLBACK TO create_meter_reading_Pub;
338: x_return_status := FND_API.G_RET_STS_ERROR ;
339: IF (l_plog) THEN
340: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'ROLLBACK TO create_meter_reading_Pub');
334:
335: EXCEPTION
336: WHEN FND_API.G_EXC_ERROR THEN
337: ROLLBACK TO create_meter_reading_Pub;
338: x_return_status := FND_API.G_RET_STS_ERROR ;
339: IF (l_plog) THEN
340: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'ROLLBACK TO create_meter_reading_Pub');
341: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
342: '===================EAM_MeterReading_PUB.create_meter_readingr: EXPECTED ERROR======='||
349: IF (l_plog) THEN
350: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
351: '==================== Returned from FND_MSG_PUB.Count_And_Get ====================');
352: END IF;
353: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
354: ROLLBACK TO create_meter_reading_Pub;
355: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
356: IF (l_plog) THEN
357: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'ROLLBACK TO create_meter_reading_Pub');
351: '==================== Returned from FND_MSG_PUB.Count_And_Get ====================');
352: END IF;
353: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
354: ROLLBACK TO create_meter_reading_Pub;
355: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
356: IF (l_plog) THEN
357: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'ROLLBACK TO create_meter_reading_Pub');
358: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
359: '===================EAM_MeterReading_PUB.create_meter_readingr: UNEXPECTED ERROR======='||
368: '==================== Returned from FND_MSG_PUB.Count_And_Get ====================');
369: END IF;
370: WHEN OTHERS THEN
371: ROLLBACK TO create_meter_reading_Pub;
372: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
373: IF (l_plog) THEN
374: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'ROLLBACK TO create_meter_reading_Pub');
375: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
376: '=================== EAM_MeterReading_PUB.create_meter_reading: OTHERS ERROR=======');
407:
408: procedure create_meter_reading
409: (
410: p_api_version IN number,
411: p_init_msg_list IN varchar2 := FND_API.G_FALSE,
412: p_commit IN varchar2 := FND_API.G_FALSE,
413: x_msg_count OUT NOCOPY number,
414: x_msg_data OUT NOCOPY varchar2,
415: x_return_status OUT NOCOPY varchar2,
408: procedure create_meter_reading
409: (
410: p_api_version IN number,
411: p_init_msg_list IN varchar2 := FND_API.G_FALSE,
412: p_commit IN varchar2 := FND_API.G_FALSE,
413: x_msg_count OUT NOCOPY number,
414: x_msg_data OUT NOCOPY varchar2,
415: x_return_status OUT NOCOPY varchar2,
416: p_meter_reading_rec IN EAM_MeterReading_PUB.Meter_Reading_Rec_Type,
448: END IF;
449: -- Standard call to check for call compatibility.
450:
451:
452: IF NOT FND_API.Compatible_API_Call (l_api_version,
453: p_api_version,
454: l_api_name,
455: G_PKG_NAME )
456: THEN
453: p_api_version,
454: l_api_name,
455: G_PKG_NAME )
456: THEN
457: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
458: END IF;
459:
460:
461: -- Initialize message list if p_init_msg_list is set to TRUE.
458: END IF;
459:
460:
461: -- Initialize message list if p_init_msg_list is set to TRUE.
462: IF FND_API.to_Boolean( p_init_msg_list ) THEN
463: FND_MSG_PUB.initialize;
464: END IF;
465:
466: -- Initialize API return status to success
463: FND_MSG_PUB.initialize;
464: END IF;
465:
466: -- Initialize API return status to success
467: x_return_status := FND_API.G_RET_STS_SUCCESS;
468:
469: -- API body
470: l_ctr_property_readings_tbl.DELETE;
471: IF (l_plog) THEN
502: /* end */
503:
504: -- End of API body.
505: -- Standard check of p_commit.
506: IF FND_API.To_Boolean( p_commit ) THEN
507:
508: COMMIT WORK;
509: IF (l_plog) THEN
510: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'Commiting Work');
516: END IF;
517:
518:
519: EXCEPTION
520: WHEN FND_API.G_EXC_ERROR THEN
521: ROLLBACK TO create_meter_reading_Pub;
522: x_return_status := FND_API.G_RET_STS_ERROR ;
523: IF (l_plog) THEN
524: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'ROLLBACK TO create_meter_reading_Pub');
518:
519: EXCEPTION
520: WHEN FND_API.G_EXC_ERROR THEN
521: ROLLBACK TO create_meter_reading_Pub;
522: x_return_status := FND_API.G_RET_STS_ERROR ;
523: IF (l_plog) THEN
524: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'ROLLBACK TO create_meter_reading_Pub');
525: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
526: '===================EAM_MeterReading_PUB.create_meter_reading: EXPECTED ERROR======='||
533: IF (l_plog) THEN
534: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
535: '==================== Returned from FND_MSG_PUB.Count_And_Get ====================');
536: END IF;
537: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
538: ROLLBACK TO create_meter_reading_Pub;
539: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
540: IF (l_plog) THEN
541: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'ROLLBACK TO create_meter_reading_Pub');
535: '==================== Returned from FND_MSG_PUB.Count_And_Get ====================');
536: END IF;
537: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
538: ROLLBACK TO create_meter_reading_Pub;
539: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
540: IF (l_plog) THEN
541: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'ROLLBACK TO create_meter_reading_Pub');
542: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
543: '===================EAM_MeterReading_PUB.create_meter_reading: UNEXPECTED ERROR======='||
552: '==================== Returned from FND_MSG_PUB.Count_And_Get ====================');
553: END IF;
554: WHEN OTHERS THEN
555: ROLLBACK TO create_meter_reading_Pub;
556: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
557: IF (l_plog) THEN
558: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'ROLLBACK TO create_meter_reading_Pub');
559: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
560: '===================EAM_MeterReading_PUB.create_meter_reading: OTHERS ERROR=======');
591:
592: PROCEDURE disable_meter_reading
593: (
594: p_api_version IN NUMBER,
595: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
596: p_commit IN VARCHAR2:=FND_API.G_FALSE,
597: x_msg_count OUT NOCOPY NUMBER,
598: x_msg_data OUT NOCOPY VARCHAR2,
599: x_return_status OUT NOCOPY VARCHAR2,
592: PROCEDURE disable_meter_reading
593: (
594: p_api_version IN NUMBER,
595: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
596: p_commit IN VARCHAR2:=FND_API.G_FALSE,
597: x_msg_count OUT NOCOPY NUMBER,
598: x_msg_data OUT NOCOPY VARCHAR2,
599: x_return_status OUT NOCOPY VARCHAR2,
600: p_meter_reading_id IN NUMBER:=null,
625: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
626: '==================== Entered EAM_MeterReading_PUB.disable_meter_reading_pub ====================');
627: END IF;
628: -- Standard call to check for call compatibility.
629: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
630: p_api_version ,
631: l_api_name ,
632: G_PKG_NAME )
633: THEN
630: p_api_version ,
631: l_api_name ,
632: G_PKG_NAME )
633: THEN
634: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
635: END IF;
636:
637: -- Initialize message list if p_init_msg_list is set to TRUE.
638: IF FND_API.to_Boolean( p_init_msg_list ) THEN
634: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
635: END IF;
636:
637: -- Initialize message list if p_init_msg_list is set to TRUE.
638: IF FND_API.to_Boolean( p_init_msg_list ) THEN
639: FND_MSG_PUB.initialize;
640: END IF;
641:
642: -- Initialize API return status to success
639: FND_MSG_PUB.initialize;
640: END IF;
641:
642: -- Initialize API return status to success
643: x_return_status := FND_API.G_RET_STS_SUCCESS;
644:
645: -- API body
646:
647: l_ctr_rdg_tbl.DELETE;
672: END IF;
673: Csi_Counter_Readings_PUB.Update_Counter_Reading (p_api_version => p_api_version,
674: p_commit => p_commit,
675: p_init_msg_list => p_init_msg_list,
676: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
677: p_ctr_rdg_tbl => l_ctr_rdg_tbl,
678: x_return_status => x_return_status,
679: x_msg_count => x_msg_count,
680: x_msg_data => x_msg_data);
687: END IF;
688:
689: -- End of API body.
690: -- Standard check of p_commit.
691: IF FND_API.To_Boolean( p_commit ) THEN
692: COMMIT WORK;
693: IF (l_plog) THEN
694: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'Committed Work');
695: END IF;
698: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
699: '==================== Exiting EAM_MeterReading_PUB.disable_meter_reading_pub ====================');
700: END IF;
701: EXCEPTION
702: WHEN FND_API.G_EXC_ERROR THEN
703:
704: ROLLBACK TO disable_meter_reading_pub;
705: x_return_status := FND_API.G_RET_STS_ERROR ;
706: IF (l_plog) THEN
701: EXCEPTION
702: WHEN FND_API.G_EXC_ERROR THEN
703:
704: ROLLBACK TO disable_meter_reading_pub;
705: x_return_status := FND_API.G_RET_STS_ERROR ;
706: IF (l_plog) THEN
707: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'ROLLBACK TO disable_meter_reading_pub');
708: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
709: '===================EAM_MeterReading_PUB.disable_meter_reading_pub: EXPECTED ERROR======='||
716: IF (l_plog) THEN
717: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
718: '==================== Returned from FND_MSG_PUB.Count_And_Get ====================');
719: END IF;
720: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
721:
722: ROLLBACK TO disable_meter_reading_pub;
723: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
724: IF (l_plog) THEN
719: END IF;
720: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
721:
722: ROLLBACK TO disable_meter_reading_pub;
723: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
724: IF (l_plog) THEN
725: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'ROLLBACK TO disable_meter_reading_pub');
726: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
727: '===================EAM_MeterReading_PUB.disable_meter_reading_pub: UNEXPECTED ERROR======='||
737: END IF;
738: WHEN OTHERS THEN
739:
740: ROLLBACK TO disable_meter_reading_pub;
741: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
742: IF (l_plog) THEN
743: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'ROLLBACK TO disable_meter_reading_pub');
744: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
745: '===================EAM_MeterReading_PUB.disable_meter_reading_pub: OTHERS ERROR=======');