DBA Data[Home] [Help]

APPS.EAM_PMDEF_PUB dependencies on FND_API

Line 96: x_return_status:=FND_API.G_RET_STS_SUCCESS;

92:
93:
94: BEGIN
95:
96: x_return_status:=FND_API.G_RET_STS_SUCCESS;
97:
98: -- Check that enough info is supplied to identify which pm schedule to copy from.
99: if (p_pm_schedule_id is null) then
100: FND_MESSAGE.SET_NAME ('EAM', 'EAM_MT_SUPPLY_PARAMS');

Line 102: RAISE FND_API.G_EXC_ERROR;

98: -- Check that enough info is supplied to identify which pm schedule to copy from.
99: if (p_pm_schedule_id is null) then
100: FND_MESSAGE.SET_NAME ('EAM', 'EAM_MT_SUPPLY_PARAMS');
101: FND_MSG_PUB.Add;
102: RAISE FND_API.G_EXC_ERROR;
103: end if;
104:
105: begin
106: select

Line 168: RAISE FND_API.G_EXC_ERROR;

164: exception
165: when no_data_found then
166: FND_MESSAGE.SET_NAME ('EAM', 'EAM_MT_SUPPLY_PARAMS');
167: FND_MSG_PUB.Add;
168: RAISE FND_API.G_EXC_ERROR;
169: end;
170:
171: select eam_pm_schedulings_s.nextval into l_pm_schedule_id from dual;
172:

Line 177: RAISE FND_API.G_EXC_ERROR;

173: -- If the source pm is not a template, raise error
174: if (not (pm_header_row.tmpl_flag = 'Y')) then
175: FND_MESSAGE.SET_NAME('EAM', 'EAM_PM_INST_NOT_TMPL');
176: FND_MSG_PUB.Add;
177: RAISE FND_API.G_EXC_ERROR;
178: else
179: -- When instantiating, tmpl_flag should be 'N'
180: pm_header_row.tmpl_flag:='N';
181: pm_header_row.source_tmpl_id:=pm_header_row.pm_schedule_id;

Line 201: RAISE FND_API.G_EXC_ERROR;

197: exception
198: when no_data_found then
199: FND_MESSAGE.SET_NAME ('EAM', 'EAM_MT_SUPPLY_PARAMS');
200: FND_MSG_PUB.Add;
201: RAISE FND_API.G_EXC_ERROR;
202: end;
203: end if;
204:
205:

Line 390: if x_return_status <> FND_API.G_RET_STS_SUCCESS then

386: p_pm_schedule_id => l_pm_schedule_id
387: );
388:
389:
390: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
391: l_update_failed := 'Y';
392: RAISE FND_API.G_EXC_ERROR;
393: end if;
394:

Line 392: RAISE FND_API.G_EXC_ERROR;

388:
389:
390: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
391: l_update_failed := 'Y';
392: RAISE FND_API.G_EXC_ERROR;
393: end if;
394:
395: -- now start copying over the rules
396: for a_pm_rule in pm_rules_csr loop

Line 515: if x_return_status <> FND_API.G_RET_STS_SUCCESS then

511: x_msg_data => l_msg_data,
512: p_pm_schedule_id => l_pm_schedule_id
513: );
514:
515: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
516: l_update_failed := 'Y';
517: RAISE FND_API.G_EXC_ERROR;
518: end if;
519:

Line 517: RAISE FND_API.G_EXC_ERROR;

513: );
514:
515: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
516: l_update_failed := 'Y';
517: RAISE FND_API.G_EXC_ERROR;
518: end if;
519:
520: end if;
521:

Line 526: WHEN FND_API.G_EXC_ERROR THEN

522: l_prev_pm_schedule_id := p_pm_schedule_id;
523:
524:
525: EXCEPTION
526: WHEN FND_API.G_EXC_ERROR THEN
527: if l_update_failed = 'Y' then
528: x_return_status := fnd_api.g_ret_sts_error;
529: x_msg_count := 1;
530: x_msg_data := l_msg_data;

Line 528: x_return_status := fnd_api.g_ret_sts_error;

524:
525: EXCEPTION
526: WHEN FND_API.G_EXC_ERROR THEN
527: if l_update_failed = 'Y' then
528: x_return_status := fnd_api.g_ret_sts_error;
529: x_msg_count := 1;
530: x_msg_data := l_msg_data;
531: else
532: FND_MSG_PUB.get

Line 541: x_return_status := fnd_api.g_ret_sts_error;

537: end if;
538:
539: when others then
540: l_msg_count := 1;
541: x_return_status := fnd_api.g_ret_sts_error;
542: l_error_message := substrb(sqlerrm,1,512);
543: x_msg_data := l_error_message;
544:
545: -- End of API body.

Line 556: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,

552:
553: PROCEDURE instantiate_PM_Defs
554: (
555: p_api_version IN NUMBER ,
556: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
557: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
558: p_validation_level IN NUMBER :=
559: FND_API.G_VALID_LEVEL_FULL ,
560: x_return_status OUT NOCOPY VARCHAR2 ,

Line 557: p_commit IN VARCHAR2 := FND_API.G_FALSE ,

553: PROCEDURE instantiate_PM_Defs
554: (
555: p_api_version IN NUMBER ,
556: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
557: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
558: p_validation_level IN NUMBER :=
559: FND_API.G_VALID_LEVEL_FULL ,
560: x_return_status OUT NOCOPY VARCHAR2 ,
561: x_msg_count OUT NOCOPY NUMBER ,

Line 559: FND_API.G_VALID_LEVEL_FULL ,

555: p_api_version IN NUMBER ,
556: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
557: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
558: p_validation_level IN NUMBER :=
559: FND_API.G_VALID_LEVEL_FULL ,
560: x_return_status OUT NOCOPY VARCHAR2 ,
561: x_msg_count OUT NOCOPY NUMBER ,
562: x_msg_data OUT NOCOPY VARCHAR2 ,
563: p_activity_assoc_id_tbl IN EAM_ObjectInstantiation_PUB.Association_Id_Tbl_Type

Line 615: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

611: BEGIN
612: -- Standard Start of API savepoint
613: SAVEPOINT instantiate_PM_Defs_pvt;
614: -- Standard call to check for call compatibility.
615: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
616: p_api_version ,
617: l_api_name ,
618: G_PKG_NAME )
619: THEN

Line 620: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

616: p_api_version ,
617: l_api_name ,
618: G_PKG_NAME )
619: THEN
620: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
621: END IF;
622: -- Initialize message list if p_init_msg_list is set to TRUE.
623: IF FND_API.to_Boolean( p_init_msg_list ) THEN
624: FND_MSG_PUB.initialize;

Line 623: IF FND_API.to_Boolean( p_init_msg_list ) THEN

619: THEN
620: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
621: END IF;
622: -- Initialize message list if p_init_msg_list is set to TRUE.
623: IF FND_API.to_Boolean( p_init_msg_list ) THEN
624: FND_MSG_PUB.initialize;
625: END IF;
626: -- Initialize API return status to success
627: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 627: x_return_status := FND_API.G_RET_STS_SUCCESS;

623: IF FND_API.to_Boolean( p_init_msg_list ) THEN
624: FND_MSG_PUB.initialize;
625: END IF;
626: -- Initialize API return status to success
627: x_return_status := FND_API.G_RET_STS_SUCCESS;
628: -- API body
629:
630:
631: if p_activity_assoc_id_tbl.count>0 then

Line 664: if l_return_status <> FND_API.G_RET_STS_SUCCESS then

660: x_msg_count => l_msg_count,
661: x_msg_data => l_msg_data
662: );
663:
664: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
665: x_return_status := l_return_status;
666: x_msg_count := l_msg_count;
667: x_msg_data := l_msg_data;
668: exit;

Line 683: IF FND_API.To_Boolean( p_commit ) THEN

679:
680: end if;
681: -- End of API body.
682: -- Standard check of p_commit.
683: IF FND_API.To_Boolean( p_commit ) THEN
684: COMMIT WORK;
685: END IF;
686: -- Standard call to get message count and if count is 1, get message info.
687: FND_MSG_PUB.get

Line 693: WHEN FND_API.G_EXC_ERROR THEN

689: p_data => x_msg_data
690: );
691: x_msg_data := substr(x_msg_data,1,2000);
692: EXCEPTION
693: WHEN FND_API.G_EXC_ERROR THEN
694: ROLLBACK TO instantiate_PM_Defs_pvt;
695: x_return_status := FND_API.G_RET_STS_ERROR ;
696: FND_MSG_PUB.get
697: ( p_msg_index_out => x_msg_count ,

Line 695: x_return_status := FND_API.G_RET_STS_ERROR ;

691: x_msg_data := substr(x_msg_data,1,2000);
692: EXCEPTION
693: WHEN FND_API.G_EXC_ERROR THEN
694: ROLLBACK TO instantiate_PM_Defs_pvt;
695: x_return_status := FND_API.G_RET_STS_ERROR ;
696: FND_MSG_PUB.get
697: ( p_msg_index_out => x_msg_count ,
698: p_data => x_msg_data
699: );

Line 701: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

697: ( p_msg_index_out => x_msg_count ,
698: p_data => x_msg_data
699: );
700: x_msg_data := substr(x_msg_data,1,2000);
701: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
702: ROLLBACK TO instantiate_PM_Defs_pvt;
703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
704: FND_MSG_PUB.get
705: ( p_msg_index_out => x_msg_count ,

Line 703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

699: );
700: x_msg_data := substr(x_msg_data,1,2000);
701: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
702: ROLLBACK TO instantiate_PM_Defs_pvt;
703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
704: FND_MSG_PUB.get
705: ( p_msg_index_out => x_msg_count ,
706: p_data => x_msg_data
707: );

Line 711: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

707: );
708: x_msg_data := substr(x_msg_data,1,2000);
709: WHEN OTHERS THEN
710: ROLLBACK TO instantiate_PM_Defs_pvt;
711: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
712: IF FND_MSG_PUB.Check_Msg_Level
713: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
714: THEN
715: FND_MSG_PUB.Add_Exc_Msg

Line 732: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

728:
729:
730: PROCEDURE create_PM_def
731: ( p_api_version IN NUMBER ,
732: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
733: ,
734: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
735: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
736: x_return_status OUT NOCOPY VARCHAR2

Line 734: p_commit IN VARCHAR2 := FND_API.G_FALSE ,

730: PROCEDURE create_PM_def
731: ( p_api_version IN NUMBER ,
732: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
733: ,
734: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
735: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
736: x_return_status OUT NOCOPY VARCHAR2
737: ,
738: x_msg_count OUT NOCOPY NUMBER ,

Line 735: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,

731: ( p_api_version IN NUMBER ,
732: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
733: ,
734: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
735: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
736: x_return_status OUT NOCOPY VARCHAR2
737: ,
738: x_msg_count OUT NOCOPY NUMBER ,
739: x_msg_data OUT NOCOPY VARCHAR2 ,

Line 765: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

761: BEGIN
762: -- Standard Start of API savepoint
763: SAVEPOINT create_PM_def_pub;
764: -- Standard call to check for call compatibility.
765: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
766: p_api_version ,
767: l_api_name ,
768: G_PKG_NAME )
769: THEN

Line 770: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

766: p_api_version ,
767: l_api_name ,
768: G_PKG_NAME )
769: THEN
770: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
771: END IF;
772: -- Initialize message list if p_init_msg_list is set to TRUE.
773: IF FND_API.to_Boolean( p_init_msg_list ) THEN
774: FND_MSG_PUB.initialize;

Line 773: IF FND_API.to_Boolean( p_init_msg_list ) THEN

769: THEN
770: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
771: END IF;
772: -- Initialize message list if p_init_msg_list is set to TRUE.
773: IF FND_API.to_Boolean( p_init_msg_list ) THEN
774: FND_MSG_PUB.initialize;
775: END IF;
776: -- Initialize API return status to success
777: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 777: x_return_status := FND_API.G_RET_STS_SUCCESS;

773: IF FND_API.to_Boolean( p_init_msg_list ) THEN
774: FND_MSG_PUB.initialize;
775: END IF;
776: -- Initialize API return status to success
777: x_return_status := FND_API.G_RET_STS_SUCCESS;
778:
779:
780: -- API body
781:

Line 797: RAISE FND_API.G_EXC_ERROR;

793:
794: if (not l_validated) then
795: FND_MESSAGE.SET_NAME ('EAM', l_reason_failed);
796: FND_MSG_PUB.Add;
797: RAISE FND_API.G_EXC_ERROR;
798: end if;
799:
800: l_validated := validate_pm_activities
801: (

Line 812: RAISE FND_API.G_EXC_ERROR;

808: );
809: if (not l_validated) then
810: FND_MESSAGE.SET_NAME ('EAM', l_reason_failed);
811: FND_MSG_PUB.Add;
812: RAISE FND_API.G_EXC_ERROR;
813: end if;
814: /* Validation generate_next_work_order */
815: if ( not (p_pm_schedule_rec.generate_next_work_order = 'Y'
816: OR p_pm_schedule_rec.generate_next_work_order = 'N'

Line 821: RAISE FND_API.G_EXC_ERROR;

817: OR p_pm_schedule_rec.generate_next_work_order is null)) then
818:
819: FND_MESSAGE.SET_NAME ('EAM', 'INVALID_GENERATE_NEXT_WORK_ORDER');
820: FND_MSG_PUB.Add;
821: RAISE FND_API.G_EXC_ERROR;
822:
823: end if;
824:
825: /* Validating the DFF */

Line 853: RAISE FND_API.G_EXC_ERROR;

849: IF (not l_validated) THEN
850: FND_MESSAGE.SET_NAME('EAM', 'EAM_INVALID_DESC_FLEX');
851: FND_MESSAGE.SET_TOKEN('ERROR_MSG', x_error_message);
852: FND_MSG_PUB.Add;
853: RAISE FND_API.G_EXC_ERROR;
854: END IF;
855:
856: select eam_pm_schedulings_s.nextval into l_pm_schedule_id from dual;
857:

Line 1021: if x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1017: x_msg_data => x_msg_data ,
1018: p_pm_schedule_id => l_pm_schedule_id
1019: );
1020:
1021: if x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1022: RAISE FND_API.G_EXC_ERROR;
1023: end if;
1024: /*bug 9744000 end*/
1025:

Line 1022: RAISE FND_API.G_EXC_ERROR;

1018: p_pm_schedule_id => l_pm_schedule_id
1019: );
1020:
1021: if x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1022: RAISE FND_API.G_EXC_ERROR;
1023: end if;
1024: /*bug 9744000 end*/
1025:
1026:

Line 1129: if x_return_status <> FND_API.G_RET_STS_SUCCESS then

1125: x_msg_data => x_msg_data,
1126: p_pm_schedule_id => l_pm_schedule_id
1127: );
1128:
1129: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
1130: RAISE FND_API.G_EXC_ERROR;
1131: end if;
1132: end if;
1133: /*bug 9744000 end*/

Line 1130: RAISE FND_API.G_EXC_ERROR;

1126: p_pm_schedule_id => l_pm_schedule_id
1127: );
1128:
1129: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
1130: RAISE FND_API.G_EXC_ERROR;
1131: end if;
1132: end if;
1133: /*bug 9744000 end*/
1134:

Line 1184: IF FND_API.To_Boolean( p_commit ) THEN

1180: -- End of API body.
1181:
1182:
1183: -- Standard check of p_commit.
1184: IF FND_API.To_Boolean( p_commit ) THEN
1185: COMMIT WORK;
1186: END IF;
1187: -- Standard call to get message count and if count is 1, get message info.
1188: FND_MSG_PUB.get

Line 1194: WHEN FND_API.G_EXC_ERROR THEN

1190: p_data => x_msg_data
1191: );
1192: x_msg_data := substr(x_msg_data,1,2000);
1193: EXCEPTION
1194: WHEN FND_API.G_EXC_ERROR THEN
1195: ROLLBACK TO create_PM_def_pub;
1196: x_return_status := FND_API.G_RET_STS_ERROR ;
1197: FND_MSG_PUB.get
1198: ( p_msg_index_out => x_msg_count ,

Line 1196: x_return_status := FND_API.G_RET_STS_ERROR ;

1192: x_msg_data := substr(x_msg_data,1,2000);
1193: EXCEPTION
1194: WHEN FND_API.G_EXC_ERROR THEN
1195: ROLLBACK TO create_PM_def_pub;
1196: x_return_status := FND_API.G_RET_STS_ERROR ;
1197: FND_MSG_PUB.get
1198: ( p_msg_index_out => x_msg_count ,
1199: p_data => x_msg_data
1200: );

Line 1202: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1198: ( p_msg_index_out => x_msg_count ,
1199: p_data => x_msg_data
1200: );
1201: x_msg_data := substr(x_msg_data,1,2000);
1202: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1203: ROLLBACK TO create_PM_def_pub;
1204: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1205: FND_MSG_PUB.get
1206: ( p_msg_index_out => x_msg_count ,

Line 1204: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1200: );
1201: x_msg_data := substr(x_msg_data,1,2000);
1202: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1203: ROLLBACK TO create_PM_def_pub;
1204: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1205: FND_MSG_PUB.get
1206: ( p_msg_index_out => x_msg_count ,
1207: p_data => x_msg_data
1208: );

Line 1212: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1208: );
1209: x_msg_data := substr(x_msg_data,1,2000);
1210: WHEN OTHERS THEN
1211: ROLLBACK TO create_PM_def_pub;
1212: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1213: IF FND_MSG_PUB.Check_Msg_Level
1214: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1215: THEN
1216: FND_MSG_PUB.Add_Exc_Msg

Line 1232: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,

1228:
1229:
1230: procedure update_pm_def
1231: ( p_api_version IN NUMBER ,
1232: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
1233: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
1234: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
1235: x_return_status OUT NOCOPY VARCHAR2 ,
1236: x_msg_count OUT NOCOPY NUMBER ,

Line 1233: p_commit IN VARCHAR2 := FND_API.G_FALSE ,

1229:
1230: procedure update_pm_def
1231: ( p_api_version IN NUMBER ,
1232: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
1233: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
1234: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
1235: x_return_status OUT NOCOPY VARCHAR2 ,
1236: x_msg_count OUT NOCOPY NUMBER ,
1237: x_msg_data OUT NOCOPY VARCHAR2 ,

Line 1234: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,

1230: procedure update_pm_def
1231: ( p_api_version IN NUMBER ,
1232: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
1233: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
1234: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
1235: x_return_status OUT NOCOPY VARCHAR2 ,
1236: x_msg_count OUT NOCOPY NUMBER ,
1237: x_msg_data OUT NOCOPY VARCHAR2 ,
1238: p_pm_schedule_rec IN pm_scheduling_rec_type:=null,

Line 1277: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

1273: BEGIN
1274: -- Standard Start of API savepoint
1275: SAVEPOINT update_pm_def_pub;
1276: -- Standard call to check for call compatibility.
1277: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
1278: p_api_version ,
1279: l_api_name ,
1280: G_PKG_NAME )
1281: THEN

Line 1282: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1278: p_api_version ,
1279: l_api_name ,
1280: G_PKG_NAME )
1281: THEN
1282: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1283: END IF;
1284: -- Initialize message list if p_init_msg_list is set to TRUE.
1285: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1286: FND_MSG_PUB.initialize;

Line 1285: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1281: THEN
1282: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1283: END IF;
1284: -- Initialize message list if p_init_msg_list is set to TRUE.
1285: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1286: FND_MSG_PUB.initialize;
1287: END IF;
1288: -- Initialize API return status to success
1289: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1289: x_return_status := FND_API.G_RET_STS_SUCCESS;

1285: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1286: FND_MSG_PUB.initialize;
1287: END IF;
1288: -- Initialize API return status to success
1289: x_return_status := FND_API.G_RET_STS_SUCCESS;
1290: -- API body
1291:
1292: if (p_pm_schedule_rec.pm_schedule_id is null) then
1293: FND_MESSAGE.SET_NAME ('EAM', 'EAM_PM_SCHEDULE_ID_MISSING');

Line 1295: RAISE FND_API.G_EXC_ERROR;

1291:
1292: if (p_pm_schedule_rec.pm_schedule_id is null) then
1293: FND_MESSAGE.SET_NAME ('EAM', 'EAM_PM_SCHEDULE_ID_MISSING');
1294: FND_MSG_PUB.Add;
1295: RAISE FND_API.G_EXC_ERROR;
1296: else
1297: l_pm_schedule_id:=p_pm_schedule_rec.pm_schedule_id;
1298: end if;
1299:

Line 1307: RAISE FND_API.G_EXC_ERROR;

1303: OR p_pm_schedule_rec.generate_next_work_order = 'N'
1304: OR p_pm_schedule_rec.generate_next_work_order is null)) then
1305: FND_MESSAGE.SET_NAME ('EAM', 'INVALID_GENERATE_NEXT_WORK_ORDER');
1306: FND_MSG_PUB.Add;
1307: RAISE FND_API.G_EXC_ERROR;
1308:
1309: end if;
1310: /* Validating the DFF */
1311:

Line 1336: RAISE FND_API.G_EXC_ERROR;

1332: x_error_message => x_error_message);
1333: IF (not l_validated) THEN
1334: FND_MESSAGE.SET_NAME ('EAM', x_error_message);
1335: FND_MSG_PUB.Add;
1336: RAISE FND_API.G_EXC_ERROR;
1337: END IF;
1338:
1339:
1340:

Line 1460: if x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1456: x_msg_data => x_msg_data ,
1457: p_pm_schedule_id => l_pm_schedule_id
1458: );
1459:
1460: if x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1461: RAISE FND_API.G_EXC_ERROR;
1462: end if;
1463: /*bug 9744000 end*/
1464:

Line 1461: RAISE FND_API.G_EXC_ERROR;

1457: p_pm_schedule_id => l_pm_schedule_id
1458: );
1459:
1460: if x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1461: RAISE FND_API.G_EXC_ERROR;
1462: end if;
1463: /*bug 9744000 end*/
1464:
1465: delete from eam_pm_scheduling_rules

Line 1536: if x_return_status <> FND_API.G_RET_STS_SUCCESS then

1532: x_msg_data => x_msg_data,
1533: p_pm_schedule_id => l_pm_schedule_id
1534: );
1535:
1536: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
1537: RAISE FND_API.G_EXC_ERROR;
1538: end if;
1539: end if;
1540: /*bug 9744000 end*/

Line 1537: RAISE FND_API.G_EXC_ERROR;

1533: p_pm_schedule_id => l_pm_schedule_id
1534: );
1535:
1536: if x_return_status <> FND_API.G_RET_STS_SUCCESS then
1537: RAISE FND_API.G_EXC_ERROR;
1538: end if;
1539: end if;
1540: /*bug 9744000 end*/
1541:

Line 1545: RAISE FND_API.G_EXC_ERROR;

1541:
1542: else -- rules did not validate
1543: FND_MESSAGE.SET_NAME ('EAM', l_reason_failed);
1544: FND_MSG_PUB.Add;
1545: RAISE FND_API.G_EXC_ERROR;
1546: end if;
1547:
1548: -- End of API body.
1549: -- Standard check of p_commit.

Line 1550: IF FND_API.To_Boolean( p_commit ) THEN

1546: end if;
1547:
1548: -- End of API body.
1549: -- Standard check of p_commit.
1550: IF FND_API.To_Boolean( p_commit ) THEN
1551: COMMIT WORK;
1552: END IF;
1553: -- Standard call to get message count and if count is 1, get message info.
1554: FND_MSG_PUB.get

Line 1560: WHEN FND_API.G_EXC_ERROR THEN

1556: p_data => x_msg_data
1557: );
1558: x_msg_data := substr(x_msg_data,1,2000);
1559: EXCEPTION
1560: WHEN FND_API.G_EXC_ERROR THEN
1561: ROLLBACK TO update_pm_def_pub;
1562: x_return_status := FND_API.G_RET_STS_ERROR ;
1563: FND_MSG_PUB.get
1564: ( p_msg_index_out => x_msg_count ,

Line 1562: x_return_status := FND_API.G_RET_STS_ERROR ;

1558: x_msg_data := substr(x_msg_data,1,2000);
1559: EXCEPTION
1560: WHEN FND_API.G_EXC_ERROR THEN
1561: ROLLBACK TO update_pm_def_pub;
1562: x_return_status := FND_API.G_RET_STS_ERROR ;
1563: FND_MSG_PUB.get
1564: ( p_msg_index_out => x_msg_count ,
1565: p_data => x_msg_data
1566: );

Line 1568: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1564: ( p_msg_index_out => x_msg_count ,
1565: p_data => x_msg_data
1566: );
1567: x_msg_data := substr(x_msg_data,1,2000);
1568: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1569: ROLLBACK TO update_pm_def_pub;
1570: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1571: FND_MSG_PUB.get
1572: ( p_msg_index_out => x_msg_count ,

Line 1570: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1566: );
1567: x_msg_data := substr(x_msg_data,1,2000);
1568: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1569: ROLLBACK TO update_pm_def_pub;
1570: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1571: FND_MSG_PUB.get
1572: ( p_msg_index_out => x_msg_count ,
1573: p_data => x_msg_data
1574: );

Line 1578: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1574: );
1575: x_msg_data := substr(x_msg_data,1,2000);
1576: WHEN OTHERS THEN
1577: ROLLBACK TO update_pm_def_pub;
1578: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1579: IF FND_MSG_PUB.Check_Msg_Level
1580: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1581: THEN
1582: FND_MSG_PUB.Add_Exc_Msg

Line 3013: RAISE FND_API.G_EXC_ERROR;

3009: -- Check that enough info is supplied to identify which pm schedule to copy from.
3010: if (p_pm_schedule_id is null) then
3011: FND_MESSAGE.SET_NAME ('EAM', 'EAM_MT_SUPPLY_PARAMS');
3012: FND_MSG_PUB.Add;
3013: RAISE FND_API.G_EXC_ERROR;
3014: end if;
3015:
3016: --getting the scheduling option for the pm schedule
3017:

Line 3026: RAISE FND_API.G_EXC_ERROR;

3022: --mandatory checking for rescheduling and current interval values
3023: if (l_rescheduling_point is null) then
3024: FND_MESSAGE.SET_NAME ('EAM', 'EAM_PM_NO_RESCHED');
3025: FND_MSG_PUB.Add;
3026: RAISE FND_API.G_EXC_ERROR;
3027: end if;
3028:
3029: if (l_current_seq is null) then
3030: FND_MESSAGE.SET_NAME ('EAM', 'EAM_PM_NO_CURRENTSEQ');

Line 3032: RAISE FND_API.G_EXC_ERROR;

3028:
3029: if (l_current_seq is null) then
3030: FND_MESSAGE.SET_NAME ('EAM', 'EAM_PM_NO_CURRENTSEQ');
3031: FND_MSG_PUB.Add;
3032: RAISE FND_API.G_EXC_ERROR;
3033: end if;
3034:
3035: --based on current sequence retrieve
3036:

Line 3148: WHEN FND_API.G_EXC_ERROR THEN

3144: --assigning the last activity
3145: p_activity_association_id :=nvl(l_act_assoc_id,p_activity_association_id);
3146:
3147: EXCEPTION
3148: WHEN FND_API.G_EXC_ERROR THEN
3149: x_return_status := FND_API.G_RET_STS_ERROR ;
3150: FND_MSG_PUB.get
3151: ( p_msg_index_out => x_msg_count ,
3152: p_data => x_msg_data

Line 3149: x_return_status := FND_API.G_RET_STS_ERROR ;

3145: p_activity_association_id :=nvl(l_act_assoc_id,p_activity_association_id);
3146:
3147: EXCEPTION
3148: WHEN FND_API.G_EXC_ERROR THEN
3149: x_return_status := FND_API.G_RET_STS_ERROR ;
3150: FND_MSG_PUB.get
3151: ( p_msg_index_out => x_msg_count ,
3152: p_data => x_msg_data
3153: );

Line 3157: x_return_status := fnd_api.g_ret_sts_error;

3153: );
3154: x_msg_data := substr(x_msg_data,1,2000);
3155: WHEN OTHERS THEN
3156: x_msg_count := 1;
3157: x_return_status := fnd_api.g_ret_sts_error;
3158: l_error_message := substrb(sqlerrm,1,512);
3159: x_msg_data := l_error_message;
3160: END get_pm_last_activity;
3161:

Line 3167: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,

3163:
3164:
3165: procedure update_pm_last_cyclic_act
3166: ( p_api_version IN NUMBER ,
3167: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
3168: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
3169: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
3170: x_return_status OUT NOCOPY VARCHAR2 ,
3171: x_msg_count OUT NOCOPY NUMBER ,

Line 3168: p_commit IN VARCHAR2 := FND_API.G_FALSE ,

3164:
3165: procedure update_pm_last_cyclic_act
3166: ( p_api_version IN NUMBER ,
3167: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
3168: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
3169: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
3170: x_return_status OUT NOCOPY VARCHAR2 ,
3171: x_msg_count OUT NOCOPY NUMBER ,
3172: x_msg_data OUT NOCOPY VARCHAR2 ,

Line 3169: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,

3165: procedure update_pm_last_cyclic_act
3166: ( p_api_version IN NUMBER ,
3167: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
3168: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
3169: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
3170: x_return_status OUT NOCOPY VARCHAR2 ,
3171: x_msg_count OUT NOCOPY NUMBER ,
3172: x_msg_data OUT NOCOPY VARCHAR2 ,
3173: p_pm_schedule_id IN NUMBER

Line 3196: x_return_status := FND_API.G_RET_STS_SUCCESS;

3192: l_pm_schedule_id := p_pm_schedule_id;
3193: -- Standard Start of API savepoint
3194: SAVEPOINT update_pm_last_cyclic_act;
3195:
3196: x_return_status := FND_API.G_RET_STS_SUCCESS;
3197:
3198: --mandatory checking
3199: if (p_pm_schedule_id is null) then
3200: FND_MESSAGE.SET_NAME ('EAM', 'EAM_PM_SCHEDULE_ID_MISSING');

Line 3202: RAISE FND_API.G_EXC_ERROR;

3198: --mandatory checking
3199: if (p_pm_schedule_id is null) then
3200: FND_MESSAGE.SET_NAME ('EAM', 'EAM_PM_SCHEDULE_ID_MISSING');
3201: FND_MSG_PUB.Add;
3202: RAISE FND_API.G_EXC_ERROR;
3203: end if;
3204:
3205: --call to get the last activity of the pm schedule
3206:

Line 3213: if l_return_status <> FND_API.G_RET_STS_SUCCESS then

3209: x_return_status => l_return_status,
3210: x_msg_count => l_msg_count,
3211: x_msg_data => l_msg_data);
3212:
3213: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
3214: l_get_failed := 'Y';
3215: RAISE FND_API.G_EXC_ERROR;
3216: end if;
3217:

Line 3215: RAISE FND_API.G_EXC_ERROR;

3211: x_msg_data => l_msg_data);
3212:
3213: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
3214: l_get_failed := 'Y';
3215: RAISE FND_API.G_EXC_ERROR;
3216: end if;
3217:
3218: -- updating the eam_last_cyclic_act field
3219: -- modified for 9754424.

Line 3220: if (l_act_assoc_id is not null) or (l_act_assoc_id <>FND_API.G_MISS_NUM) THEN

3216: end if;
3217:
3218: -- updating the eam_last_cyclic_act field
3219: -- modified for 9754424.
3220: if (l_act_assoc_id is not null) or (l_act_assoc_id <>FND_API.G_MISS_NUM) THEN
3221: update eam_pm_schedulings set EAM_LAST_CYCLIC_ACT = l_act_assoc_id,
3222: last_update_date=sysdate,
3223: last_updated_by=fnd_global.user_id,
3224: last_update_login=fnd_global.login_id

Line 3229: IF FND_API.To_Boolean( p_commit ) THEN

3225: where pm_schedule_id = p_pm_schedule_id;
3226: end if;
3227: --standard commit to be checked
3228:
3229: IF FND_API.To_Boolean( p_commit ) THEN
3230: COMMIT WORK;
3231: END IF;
3232:
3233: EXCEPTION

Line 3235: WHEN FND_API.G_EXC_ERROR THEN

3231: END IF;
3232:
3233: EXCEPTION
3234:
3235: WHEN FND_API.G_EXC_ERROR THEN
3236: ROLLBACK TO update_pm_last_cyclic_act;
3237: x_return_status := FND_API.G_RET_STS_ERROR ;
3238:
3239: if l_get_failed = 'Y' then

Line 3237: x_return_status := FND_API.G_RET_STS_ERROR ;

3233: EXCEPTION
3234:
3235: WHEN FND_API.G_EXC_ERROR THEN
3236: ROLLBACK TO update_pm_last_cyclic_act;
3237: x_return_status := FND_API.G_RET_STS_ERROR ;
3238:
3239: if l_get_failed = 'Y' then
3240: x_msg_count := l_msg_count;
3241: x_msg_data := l_msg_data;

Line 3249: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3245: p_data => x_msg_data
3246: );
3247: x_msg_data := substr(x_msg_data,1,2000);
3248: end if;
3249: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3250: ROLLBACK TO update_pm_last_cyclic_act;
3251: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3252: FND_MSG_PUB.get
3253: ( p_msg_index_out => x_msg_count ,

Line 3251: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

3247: x_msg_data := substr(x_msg_data,1,2000);
3248: end if;
3249: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3250: ROLLBACK TO update_pm_last_cyclic_act;
3251: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3252: FND_MSG_PUB.get
3253: ( p_msg_index_out => x_msg_count ,
3254: p_data => x_msg_data
3255: );

Line 3259: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

3255: );
3256: x_msg_data := substr(x_msg_data,1,2000);
3257: WHEN OTHERS THEN
3258: ROLLBACK TO update_pm_last_cyclic_act;
3259: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3260: IF FND_MSG_PUB.Check_Msg_Level
3261: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3262: THEN
3263: FND_MSG_PUB.Add_Exc_Msg

Line 3277: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,

3273: END update_pm_last_cyclic_act;
3274:
3275: procedure update_pm_last_service_reading
3276: ( p_api_version IN NUMBER ,
3277: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
3278: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
3279: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
3280: x_return_status OUT NOCOPY VARCHAR2 ,
3281: x_msg_count OUT NOCOPY NUMBER ,

Line 3278: p_commit IN VARCHAR2 := FND_API.G_FALSE ,

3274:
3275: procedure update_pm_last_service_reading
3276: ( p_api_version IN NUMBER ,
3277: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
3278: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
3279: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
3280: x_return_status OUT NOCOPY VARCHAR2 ,
3281: x_msg_count OUT NOCOPY NUMBER ,
3282: x_msg_data OUT NOCOPY VARCHAR2 ,

Line 3279: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,

3275: procedure update_pm_last_service_reading
3276: ( p_api_version IN NUMBER ,
3277: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
3278: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
3279: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
3280: x_return_status OUT NOCOPY VARCHAR2 ,
3281: x_msg_count OUT NOCOPY NUMBER ,
3282: x_msg_data OUT NOCOPY VARCHAR2 ,
3283: p_pm_schedule_id IN NUMBER

Line 3315: x_return_status := FND_API.G_RET_STS_SUCCESS;

3311:
3312: -- Standard Start of API savepoint
3313: SAVEPOINT update_pm_last_service_reading;
3314:
3315: x_return_status := FND_API.G_RET_STS_SUCCESS;
3316:
3317: --mandatory checking
3318:
3319: if (p_pm_schedule_id is null) then

Line 3322: RAISE FND_API.G_EXC_ERROR;

3318:
3319: if (p_pm_schedule_id is null) then
3320: FND_MESSAGE.SET_NAME ('EAM', 'EAM_PM_SCHEDULE_ID_MISSING');
3321: FND_MSG_PUB.Add;
3322: RAISE FND_API.G_EXC_ERROR;
3323: end if;
3324:
3325: --call to get the last activity of the pm schedule
3326:

Line 3333: if l_return_status <> FND_API.G_RET_STS_SUCCESS then

3329: x_return_status => l_return_status,
3330: x_msg_count => l_msg_count,
3331: x_msg_data => l_msg_data);
3332:
3333: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
3334: l_get_failed := 'Y';
3335: RAISE FND_API.G_EXC_ERROR;
3336: end if;
3337:

Line 3335: RAISE FND_API.G_EXC_ERROR;

3331: x_msg_data => l_msg_data);
3332:
3333: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
3334: l_get_failed := 'Y';
3335: RAISE FND_API.G_EXC_ERROR;
3336: end if;
3337:
3338: --get the last service reading and update the same in epsr
3339:

Line 3357: IF FND_API.To_Boolean( p_commit ) THEN

3353:
3354: end loop;
3355:
3356: --standard commit to be checked
3357: IF FND_API.To_Boolean( p_commit ) THEN
3358: COMMIT WORK;
3359: END IF;
3360:
3361: EXCEPTION

Line 3362: WHEN FND_API.G_EXC_ERROR THEN

3358: COMMIT WORK;
3359: END IF;
3360:
3361: EXCEPTION
3362: WHEN FND_API.G_EXC_ERROR THEN
3363: ROLLBACK TO update_pm_last_service_reading;
3364: x_return_status := FND_API.G_RET_STS_ERROR ;
3365: if l_get_failed = 'Y' then
3366: x_msg_count := l_msg_count;

Line 3364: x_return_status := FND_API.G_RET_STS_ERROR ;

3360:
3361: EXCEPTION
3362: WHEN FND_API.G_EXC_ERROR THEN
3363: ROLLBACK TO update_pm_last_service_reading;
3364: x_return_status := FND_API.G_RET_STS_ERROR ;
3365: if l_get_failed = 'Y' then
3366: x_msg_count := l_msg_count;
3367: x_msg_data := l_msg_data;
3368: else

Line 3375: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3371: p_data => x_msg_data
3372: );
3373: x_msg_data := substr(x_msg_data,1,2000);
3374: end if;
3375: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3376: ROLLBACK TO update_pm_last_service_reading;
3377: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3378: FND_MSG_PUB.get
3379: ( p_msg_index_out => x_msg_count ,

Line 3377: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

3373: x_msg_data := substr(x_msg_data,1,2000);
3374: end if;
3375: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3376: ROLLBACK TO update_pm_last_service_reading;
3377: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3378: FND_MSG_PUB.get
3379: ( p_msg_index_out => x_msg_count ,
3380: p_data => x_msg_data
3381: );

Line 3385: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

3381: );
3382: x_msg_data := substr(x_msg_data,1,2000);
3383: WHEN OTHERS THEN
3384: ROLLBACK TO update_pm_last_service_reading;
3385: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3386: IF FND_MSG_PUB.Check_Msg_Level
3387: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3388: THEN
3389: FND_MSG_PUB.Add_Exc_Msg