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
495: END IF;
496:
497: -- End of API body.
498: -- Standard check of p_commit.
499: IF FND_API.To_Boolean( p_commit ) THEN
500:
501: COMMIT WORK;
502: IF (l_plog) THEN
503: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'Commiting Work');
509: END IF;
510:
511:
512: EXCEPTION
513: WHEN FND_API.G_EXC_ERROR THEN
514: ROLLBACK TO create_meter_reading_Pub;
515: x_return_status := FND_API.G_RET_STS_ERROR ;
516: IF (l_plog) THEN
517: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'ROLLBACK TO create_meter_reading_Pub');
511:
512: EXCEPTION
513: WHEN FND_API.G_EXC_ERROR THEN
514: ROLLBACK TO create_meter_reading_Pub;
515: x_return_status := FND_API.G_RET_STS_ERROR ;
516: IF (l_plog) THEN
517: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'ROLLBACK TO create_meter_reading_Pub');
518: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
519: '===================EAM_MeterReading_PUB.create_meter_reading: EXPECTED ERROR======='||
526: IF (l_plog) THEN
527: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
528: '==================== Returned from FND_MSG_PUB.Count_And_Get ====================');
529: END IF;
530: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
531: ROLLBACK TO create_meter_reading_Pub;
532: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
533: IF (l_plog) THEN
534: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'ROLLBACK TO create_meter_reading_Pub');
528: '==================== Returned from FND_MSG_PUB.Count_And_Get ====================');
529: END IF;
530: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
531: ROLLBACK TO create_meter_reading_Pub;
532: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
533: IF (l_plog) THEN
534: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'ROLLBACK TO create_meter_reading_Pub');
535: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
536: '===================EAM_MeterReading_PUB.create_meter_reading: UNEXPECTED ERROR======='||
545: '==================== Returned from FND_MSG_PUB.Count_And_Get ====================');
546: END IF;
547: WHEN OTHERS THEN
548: ROLLBACK TO create_meter_reading_Pub;
549: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
550: IF (l_plog) THEN
551: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'ROLLBACK TO create_meter_reading_Pub');
552: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
553: '===================EAM_MeterReading_PUB.create_meter_reading: OTHERS ERROR=======');
584:
585: PROCEDURE disable_meter_reading
586: (
587: p_api_version IN NUMBER,
588: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
589: p_commit IN VARCHAR2:=FND_API.G_FALSE,
590: x_msg_count OUT NOCOPY NUMBER,
591: x_msg_data OUT NOCOPY VARCHAR2,
592: x_return_status OUT NOCOPY VARCHAR2,
585: PROCEDURE disable_meter_reading
586: (
587: p_api_version IN NUMBER,
588: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
589: p_commit IN VARCHAR2:=FND_API.G_FALSE,
590: x_msg_count OUT NOCOPY NUMBER,
591: x_msg_data OUT NOCOPY VARCHAR2,
592: x_return_status OUT NOCOPY VARCHAR2,
593: p_meter_reading_id IN NUMBER:=null,
618: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
619: '==================== Entered EAM_MeterReading_PUB.disable_meter_reading_pub ====================');
620: END IF;
621: -- Standard call to check for call compatibility.
622: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
623: p_api_version ,
624: l_api_name ,
625: G_PKG_NAME )
626: THEN
623: p_api_version ,
624: l_api_name ,
625: G_PKG_NAME )
626: THEN
627: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
628: END IF;
629:
630: -- Initialize message list if p_init_msg_list is set to TRUE.
631: IF FND_API.to_Boolean( p_init_msg_list ) THEN
627: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
628: END IF;
629:
630: -- Initialize message list if p_init_msg_list is set to TRUE.
631: IF FND_API.to_Boolean( p_init_msg_list ) THEN
632: FND_MSG_PUB.initialize;
633: END IF;
634:
635: -- Initialize API return status to success
632: FND_MSG_PUB.initialize;
633: END IF;
634:
635: -- Initialize API return status to success
636: x_return_status := FND_API.G_RET_STS_SUCCESS;
637:
638: -- API body
639:
640: l_ctr_rdg_tbl.DELETE;
665: END IF;
666: Csi_Counter_Readings_PUB.Update_Counter_Reading (p_api_version => p_api_version,
667: p_commit => p_commit,
668: p_init_msg_list => p_init_msg_list,
669: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
670: p_ctr_rdg_tbl => l_ctr_rdg_tbl,
671: x_return_status => x_return_status,
672: x_msg_count => x_msg_count,
673: x_msg_data => x_msg_data);
680: END IF;
681:
682: -- End of API body.
683: -- Standard check of p_commit.
684: IF FND_API.To_Boolean( p_commit ) THEN
685: COMMIT WORK;
686: IF (l_plog) THEN
687: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'Committed Work');
688: END IF;
691: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
692: '==================== Exiting EAM_MeterReading_PUB.disable_meter_reading_pub ====================');
693: END IF;
694: EXCEPTION
695: WHEN FND_API.G_EXC_ERROR THEN
696:
697: ROLLBACK TO disable_meter_reading_pub;
698: x_return_status := FND_API.G_RET_STS_ERROR ;
699: IF (l_plog) THEN
694: EXCEPTION
695: WHEN FND_API.G_EXC_ERROR THEN
696:
697: ROLLBACK TO disable_meter_reading_pub;
698: x_return_status := FND_API.G_RET_STS_ERROR ;
699: IF (l_plog) THEN
700: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'ROLLBACK TO disable_meter_reading_pub');
701: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
702: '===================EAM_MeterReading_PUB.disable_meter_reading_pub: EXPECTED ERROR======='||
709: IF (l_plog) THEN
710: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
711: '==================== Returned from FND_MSG_PUB.Count_And_Get ====================');
712: END IF;
713: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
714:
715: ROLLBACK TO disable_meter_reading_pub;
716: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
717: IF (l_plog) THEN
712: END IF;
713: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
714:
715: ROLLBACK TO disable_meter_reading_pub;
716: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
717: IF (l_plog) THEN
718: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'ROLLBACK TO disable_meter_reading_pub');
719: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
720: '===================EAM_MeterReading_PUB.disable_meter_reading_pub: UNEXPECTED ERROR======='||
730: END IF;
731: WHEN OTHERS THEN
732:
733: ROLLBACK TO disable_meter_reading_pub;
734: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
735: IF (l_plog) THEN
736: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,'ROLLBACK TO disable_meter_reading_pub');
737: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
738: '===================EAM_MeterReading_PUB.disable_meter_reading_pub: OTHERS ERROR=======');