240: csi_ctr_gen_utility_pvt.put_line('ERROR FROM Capture_Counter_Reading_pub API ');
241: l_msg_index := 1;
242: l_msg_count := x_msg_count;
243: WHILE l_msg_count > 0 LOOP
244: x_msg_data := FND_MSG_PUB.GET
245: ( l_msg_index,
246: FND_API.G_FALSE
247: );
248: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
259: THEN
260: COMMIT WORK;
261: END IF;
262: -- Standard call to get message count and if count is 1, get message info.
263: FND_MSG_PUB.Count_And_Get
264: ( p_count => x_msg_count,
265: p_data => x_msg_data
266: );
267: EXCEPTION
267: EXCEPTION
268: WHEN FND_API.G_EXC_ERROR THEN
269: ROLLBACK TO CS_CTR_CAPTURE_READING_PUB;
270: x_return_status := FND_API.G_RET_STS_ERROR ;
271: FND_MSG_PUB.Count_And_Get
272: (p_count => x_msg_count ,
273: p_data => x_msg_data
274: );
275: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
274: );
275: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
276: ROLLBACK TO CS_CTR_CAPTURE_READING_PUB;
277: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
278: FND_MSG_PUB.Count_And_Get
279: (p_count => x_msg_count ,
280: p_data => x_msg_data
281: );
282: WHEN OTHERS THEN
281: );
282: WHEN OTHERS THEN
283: ROLLBACK TO CS_CTR_CAPTURE_READING_PUB;
284: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
285: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
286: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
287: END IF;
288: FND_MSG_PUB.Count_And_Get
289: (p_count => x_msg_count ,
282: WHEN OTHERS THEN
283: ROLLBACK TO CS_CTR_CAPTURE_READING_PUB;
284: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
285: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
286: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
287: END IF;
288: FND_MSG_PUB.Count_And_Get
289: (p_count => x_msg_count ,
290: p_data => x_msg_data
284: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
285: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
286: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
287: END IF;
288: FND_MSG_PUB.Count_And_Get
289: (p_count => x_msg_count ,
290: p_data => x_msg_data
291: );
292: END Capture_Counter_Reading;
390: csi_ctr_gen_utility_pvt.put_line('ERROR FROM Update_Counter_Reading_pub API ');
391: l_msg_index := 1;
392: l_msg_count := x_msg_count;
393: WHILE l_msg_count > 0 LOOP
394: x_msg_data := FND_MSG_PUB.GET
395: ( l_msg_index,
396: FND_API.G_FALSE
397: );
398: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
408: THEN
409: COMMIT WORK;
410: END IF;
411: -- Standard call to get message count and if count is 1, get message info.
412: FND_MSG_PUB.Count_And_Get
413: ( p_count => x_msg_count,
414: p_data => x_msg_data
415: );
416: EXCEPTION
416: EXCEPTION
417: WHEN FND_API.G_EXC_ERROR THEN
418: ROLLBACK TO CS_CTR_CAPTURE_READING_PUB;
419: x_return_status := FND_API.G_RET_STS_ERROR ;
420: FND_MSG_PUB.Count_And_Get
421: (p_count => x_msg_count ,
422: p_data => x_msg_data
423: );
424: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
423: );
424: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
425: ROLLBACK TO CS_CTR_CAPTURE_READING_PUB;
426: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
427: FND_MSG_PUB.Count_And_Get
428: (p_count => x_msg_count ,
429: p_data => x_msg_data
430: );
431: WHEN OTHERS THEN
430: );
431: WHEN OTHERS THEN
432: ROLLBACK TO CS_CTR_CAPTURE_READING_PUB;
433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
434: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
435: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
436: END IF;
437: FND_MSG_PUB.Count_And_Get
438: (p_count => x_msg_count ,
431: WHEN OTHERS THEN
432: ROLLBACK TO CS_CTR_CAPTURE_READING_PUB;
433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
434: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
435: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
436: END IF;
437: FND_MSG_PUB.Count_And_Get
438: (p_count => x_msg_count ,
439: p_data => x_msg_data
433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
434: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
435: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
436: END IF;
437: FND_MSG_PUB.Count_And_Get
438: (p_count => x_msg_count ,
439: p_data => x_msg_data
440: );
441: END Update_Counter_Reading;
572: csi_ctr_gen_utility_pvt.put_line('ERROR FROM Capture_Counter_Reading_pub API ');
573: l_msg_index := 1;
574: l_msg_count := x_msg_count;
575: WHILE l_msg_count > 0 LOOP
576: x_msg_data := FND_MSG_PUB.GET
577: ( l_msg_index,
578: FND_API.G_FALSE
579: );
580: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
591: THEN
592: COMMIT WORK;
593: END IF;
594: -- Standard call to get message count and if count is 1, get message info.
595: FND_MSG_PUB.Count_And_Get
596: ( p_count => x_msg_count,
597: p_data => x_msg_data
598: );
599: EXCEPTION
599: EXCEPTION
600: WHEN FND_API.G_EXC_ERROR THEN
601: ROLLBACK TO CS_CTR_CAPTURE_READING_PUB;
602: x_return_status := FND_API.G_RET_STS_ERROR ;
603: FND_MSG_PUB.Count_And_Get
604: (p_count => x_msg_count ,
605: p_data => x_msg_data
606: );
607: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
606: );
607: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
608: ROLLBACK TO CS_CTR_CAPTURE_READING_PUB;
609: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
610: FND_MSG_PUB.Count_And_Get
611: (p_count => x_msg_count ,
612: p_data => x_msg_data
613: );
614: WHEN OTHERS THEN
613: );
614: WHEN OTHERS THEN
615: ROLLBACK TO CS_CTR_CAPTURE_READING_PUB;
616: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
617: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
618: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
619: END IF;
620: FND_MSG_PUB.Count_And_Get
621: (p_count => x_msg_count ,
614: WHEN OTHERS THEN
615: ROLLBACK TO CS_CTR_CAPTURE_READING_PUB;
616: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
617: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
618: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
619: END IF;
620: FND_MSG_PUB.Count_And_Get
621: (p_count => x_msg_count ,
622: p_data => x_msg_data
616: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
617: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
618: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
619: END IF;
620: FND_MSG_PUB.Count_And_Get
621: (p_count => x_msg_count ,
622: p_data => x_msg_data
623: );
624: END Capture_Counter_Reading;
709: csi_ctr_gen_utility_pvt.put_line('ERROR FROM Update_Counter_Reading_pub API ');
710: l_msg_index := 1;
711: l_msg_count := x_msg_count;
712: WHILE l_msg_count > 0 LOOP
713: x_msg_data := FND_MSG_PUB.GET
714: ( l_msg_index,
715: FND_API.G_FALSE
716: );
717: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
726: THEN
727: COMMIT WORK;
728: END IF;
729: -- Standard call to get message count and if count is 1, get message info.
730: FND_MSG_PUB.Count_And_Get
731: ( p_count => x_msg_count,
732: p_data => x_msg_data
733: );
734: EXCEPTION
734: EXCEPTION
735: WHEN FND_API.G_EXC_ERROR THEN
736: ROLLBACK TO CS_CTR_CAPTURE_READING_PUB;
737: x_return_status := FND_API.G_RET_STS_ERROR ;
738: FND_MSG_PUB.Count_And_Get
739: (p_count => x_msg_count ,
740: p_data => x_msg_data
741: );
742: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
741: );
742: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
743: ROLLBACK TO CS_CTR_CAPTURE_READING_PUB;
744: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
745: FND_MSG_PUB.Count_And_Get
746: (p_count => x_msg_count ,
747: p_data => x_msg_data
748: );
749: WHEN OTHERS THEN
748: );
749: WHEN OTHERS THEN
750: ROLLBACK TO CS_CTR_CAPTURE_READING_PUB;
751: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
752: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
753: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
754: END IF;
755: FND_MSG_PUB.Count_And_Get
756: (p_count => x_msg_count ,
749: WHEN OTHERS THEN
750: ROLLBACK TO CS_CTR_CAPTURE_READING_PUB;
751: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
752: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
753: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
754: END IF;
755: FND_MSG_PUB.Count_And_Get
756: (p_count => x_msg_count ,
757: p_data => x_msg_data
751: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
752: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
753: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
754: END IF;
755: FND_MSG_PUB.Count_And_Get
756: (p_count => x_msg_count ,
757: p_data => x_msg_data
758: );
759: END Update_Counter_Reading;
861: );
862: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
863: csi_ctr_gen_utility_pvt.put_line('Error from Create_Reading_Transaction...');
864: l_msg_index := 1;
865: FND_MSG_PUB.Count_And_Get
866: (p_count => x_msg_count,
867: p_data => x_msg_data
868: );
869: l_msg_count := x_msg_count;
867: p_data => x_msg_data
868: );
869: l_msg_count := x_msg_count;
870: WHILE l_msg_count > 0 LOOP
871: x_msg_data := FND_MSG_PUB.GET
872: ( l_msg_index,
873: FND_API.G_FALSE );
874: csi_ctr_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
875: l_msg_index := l_msg_index + 1;
890: THEN
891: COMMIT WORK;
892: END IF;
893: -- Standard call to get message count and if count is 1, get message info.
894: FND_MSG_PUB.Count_And_Get
895: ( p_count => x_msg_count,
896: p_data => x_msg_data
897: );
898: EXCEPTION
898: EXCEPTION
899: WHEN FND_API.G_EXC_ERROR THEN
900: ROLLBACK TO PRE_CAPTURE_READING_PUB;
901: x_return_status := FND_API.G_RET_STS_ERROR ;
902: FND_MSG_PUB.Count_And_Get
903: (p_count => x_msg_count ,
904: p_data => x_msg_data
905: );
906: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
905: );
906: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
907: ROLLBACK TO PRE_CAPTURE_READING_PUB;
908: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
909: FND_MSG_PUB.Count_And_Get
910: (p_count => x_msg_count ,
911: p_data => x_msg_data
912: );
913: WHEN OTHERS THEN
912: );
913: WHEN OTHERS THEN
914: ROLLBACK TO PRE_CAPTURE_READING_PUB;
915: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
916: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
917: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
918: END IF;
919: FND_MSG_PUB.Count_And_Get
920: (p_count => x_msg_count ,
913: WHEN OTHERS THEN
914: ROLLBACK TO PRE_CAPTURE_READING_PUB;
915: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
916: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
917: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
918: END IF;
919: FND_MSG_PUB.Count_And_Get
920: (p_count => x_msg_count ,
921: p_data => x_msg_data
915: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
916: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
917: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name);
918: END IF;
919: FND_MSG_PUB.Count_And_Get
920: (p_count => x_msg_count ,
921: p_data => x_msg_data
922: );
923: END PRE_CAPTURE_CTR_READING;