DBA Data[Home] [Help]

APPS.EAM_SCHED_BOTTOM_UP_PVT dependencies on FND_API

Line 77: l_return_status := FND_API.G_RET_STS_SUCCESS;

73: l_res_seq_num := p_curr_inst_rec.resource_seq_num ;
74: l_inst_start_date := p_curr_inst_rec.start_date ;
75: l_inst_end_date := p_curr_inst_rec.completion_date ;
76: l_eam_res_tbl := p_eam_res_tbl ;
77: l_return_status := FND_API.G_RET_STS_SUCCESS;
78:
79: x_return_status := l_return_status ;
80:
81: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug(' Inside update_resource ') ; END IF ;

Line 127: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

123: l_resource_rec.organization_id := l_org_id ;
124: l_resource_rec.operation_seq_num := l_op_seq_num ;
125: l_resource_rec.resource_seq_num := l_res_seq_num ;
126:
127: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
128: RAISE FND_API.G_EXC_ERROR ;
129: END IF;
130:
131: l_resource_rec.transaction_type := EAM_PROCESS_WO_PUB.G_OPR_UPDATE;

Line 128: RAISE FND_API.G_EXC_ERROR ;

124: l_resource_rec.operation_seq_num := l_op_seq_num ;
125: l_resource_rec.resource_seq_num := l_res_seq_num ;
126:
127: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
128: RAISE FND_API.G_EXC_ERROR ;
129: END IF;
130:
131: l_resource_rec.transaction_type := EAM_PROCESS_WO_PUB.G_OPR_UPDATE;
132: l_eam_res_tbl( l_eam_res_tbl.COUNT+1) := l_resource_rec ;

Line 217: WHEN FND_API.G_EXC_ERROR THEN

213: x_return_status := l_return_status ;
214:
215: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug(' Exiting update_resource ') ; END IF ;
216: EXCEPTION
217: WHEN FND_API.G_EXC_ERROR THEN
218:
219: x_return_status := l_return_status ;
220: END update_resource;
221:

Line 267: l_return_status := FND_API.G_RET_STS_SUCCESS;

263: l_eam_op_tbl := p_eam_op_tbl ;
264:
265: l_res_start_date := p_curr_res_rec.start_date;
266: l_res_end_date := p_curr_res_rec.completion_date;
267: l_return_status := FND_API.G_RET_STS_SUCCESS;
268:
269:
270: x_return_status := l_return_status;
271: l_eam_op_tbl_index := l_eam_op_tbl.FIRST;

Line 314: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

310: l_operation_rec.organization_id := l_org_id ;
311: l_operation_rec.operation_seq_num := l_op_seq_num ;
312:
313:
314: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
315: RAISE FND_API.G_EXC_ERROR ;
316: END IF;
317:
318: l_operation_rec.transaction_type := EAM_PROCESS_WO_PUB.G_OPR_UPDATE;

Line 315: RAISE FND_API.G_EXC_ERROR ;

311: l_operation_rec.operation_seq_num := l_op_seq_num ;
312:
313:
314: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
315: RAISE FND_API.G_EXC_ERROR ;
316: END IF;
317:
318: l_operation_rec.transaction_type := EAM_PROCESS_WO_PUB.G_OPR_UPDATE;
319: l_eam_op_tbl( l_eam_op_tbl.COUNT+1) := l_operation_rec;

Line 360: WHEN FND_API.G_EXC_ERROR THEN

356: x_return_status := l_return_status ;
357:
358: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug(' Exiting update_operations ') ; END IF ;
359: EXCEPTION
360: WHEN FND_API.G_EXC_ERROR THEN
361: x_return_status := l_return_status ;
362: END update_operations;
363:
364:

Line 401: l_return_status := FND_API.G_RET_STS_SUCCESS;

397: -- Initialize variables
398: l_op_start_date := p_curr_op_rec.start_date;
399: l_op_end_date := p_curr_op_rec.completion_date;
400: l_eam_wo_rec := p_eam_wo_rec;
401: l_return_status := FND_API.G_RET_STS_SUCCESS;
402:
403: x_return_status := l_return_status ;
404:
405: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug(' Inside update_workorder ') ; END IF ;

Line 418: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

414: l_eam_wo_rec.organization_id := p_curr_op_rec.organization_id ;
415:
416: END IF;
417:
418: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
419: RAISE FND_API.G_EXC_ERROR ;
420: END IF;
421:
422: l_wo_start_date := l_eam_wo_rec.scheduled_start_date ;

Line 419: RAISE FND_API.G_EXC_ERROR ;

415:
416: END IF;
417:
418: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
419: RAISE FND_API.G_EXC_ERROR ;
420: END IF;
421:
422: l_wo_start_date := l_eam_wo_rec.scheduled_start_date ;
423: l_wo_end_date := l_eam_wo_rec.scheduled_completion_date ;

Line 460: WHEN FND_API.G_EXC_ERROR THEN

456: x_return_status := l_return_status ;
457: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug(' Exiting update_workorder') ; END IF ;
458:
459: EXCEPTION
460: WHEN FND_API.G_EXC_ERROR THEN
461: x_return_status := l_return_status ;
462:
463: END update_workorder;
464:

Line 601: l_return_status := FND_API.G_RET_STS_SUCCESS;

597: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug(' Entering schedule_bottom_up_pvt ') ; END IF ;
598:
599: SAVEPOINT SCHED_BOTTOM_UP;
600:
601: l_return_status := FND_API.G_RET_STS_SUCCESS;
602: x_return_status := l_return_status ;
603:
604: --/* Get the various operations and associated resources in the WO
605: FOR c_opresource_rec IN get_opresource_csr(p_wip_entity_id) LOOP

Line 821: WHEN FND_API.G_EXC_ERROR THEN

817: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug(' Exiting schedule_bottom_up_pvt ') ; END IF ;
818:
819: EXCEPTION
820:
821: WHEN FND_API.G_EXC_ERROR THEN
822: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug(' Error occured in schedule_bottom_up_pvt API ') ; END IF ;
823: x_return_status := FND_API.G_RET_STS_ERROR ;
824: x_message_name := ' EAM_SCHED_BOTTOMUP_ERR';
825:

Line 823: x_return_status := FND_API.G_RET_STS_ERROR ;

819: EXCEPTION
820:
821: WHEN FND_API.G_EXC_ERROR THEN
822: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug(' Error occured in schedule_bottom_up_pvt API ') ; END IF ;
823: x_return_status := FND_API.G_RET_STS_ERROR ;
824: x_message_name := ' EAM_SCHED_BOTTOMUP_ERR';
825:
826: END schedule_bottom_up_pvt ;
827:

Line 868: l_return_status := FND_API.G_RET_STS_SUCCESS ;

864: BEGIN
865:
866: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug(' Inside insert_into_woru' ) ; END IF ;
867:
868: l_return_status := FND_API.G_RET_STS_SUCCESS ;
869: x_return_status := l_return_status ;
870: l_rec_exists := 2 ;
871:
872: IF ( p_eam_res_usage_rec.instance_id IS NULL ) THEN -- ckeck if recource record has already been inserted

Line 933: l_return_status := FND_API.G_RET_STS_ERROR ;

929: , p_eam_res_usage_rec.program_id
930: , SYSDATE);
931:
932: EXCEPTION WHEN OTHERS THEN
933: l_return_status := FND_API.G_RET_STS_ERROR ;
934: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug(' Error occurred ' ||SQLERRM ) ; END IF ;
935: END ;
936:
937: END IF; -- end of l_rec_exists

Line 1090: l_return_status := FND_API.G_RET_STS_SUCCESS;

1086: l_instance_id := p_eam_res_usage_rec.instance_id;
1087: l_serial_number := p_eam_res_usage_rec.serial_number;
1088: l_org_id := p_eam_res_usage_rec.organization_id;
1089: l_found := 'N';
1090: l_return_status := FND_API.G_RET_STS_SUCCESS;
1091:
1092: x_return_status := l_return_status;
1093: x_eam_res_inst_tbl := l_eam_res_inst_tbl;
1094:

Line 1187: IF ( l_return_status = FND_API.G_RET_STS_SUCCESS ) THEN

1183: l_eam_res_inst_rec.resource_seq_num := l_res_seq_num ;
1184: l_eam_res_inst_rec.instance_id := l_instance_id ;
1185: l_eam_res_inst_rec.serial_number := l_serial_number;
1186:
1187: IF ( l_return_status = FND_API.G_RET_STS_SUCCESS ) THEN
1188: l_eam_res_inst_rec.start_date := l_min_start_date;
1189: l_eam_res_inst_rec.completion_date := l_max_completion_date;
1190: l_eam_res_inst_tbl( l_eam_res_inst_tbl.COUNT + 1) := l_eam_res_inst_rec;
1191: ELSE

Line 1192: RAISE FND_API.G_EXC_ERROR;

1188: l_eam_res_inst_rec.start_date := l_min_start_date;
1189: l_eam_res_inst_rec.completion_date := l_max_completion_date;
1190: l_eam_res_inst_tbl( l_eam_res_inst_tbl.COUNT + 1) := l_eam_res_inst_rec;
1191: ELSE
1192: RAISE FND_API.G_EXC_ERROR;
1193: END IF;
1194:
1195: END IF; -- end of check for l_found
1196:

Line 1204: EXCEPTION WHEN FND_API.G_EXC_ERROR THEN

1200: x_eam_res_inst_tbl := l_eam_res_inst_tbl;
1201:
1202: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug(' Exiting update_wori ' ) ; END IF ;
1203:
1204: EXCEPTION WHEN FND_API.G_EXC_ERROR THEN
1205: x_return_status := l_return_status;
1206: END update_wori;
1207:
1208: /*************************************************************************************************************************

Line 1246: l_return_status := FND_API.G_RET_STS_SUCCESS;

1242: l_operation_seq_num := p_eam_res_usage_rec.operation_seq_num;
1243: l_res_seq_num := p_eam_res_usage_rec.resource_seq_num;
1244: l_org_id := p_eam_res_usage_rec.organization_id;
1245: l_found := 'N';
1246: l_return_status := FND_API.G_RET_STS_SUCCESS;
1247:
1248: x_return_status := l_return_status;
1249: x_eam_res_tbl := l_eam_res_tbl;
1250:

Line 1323: IF ( l_return_status = FND_API.G_RET_STS_SUCCESS ) THEN

1319: l_resource_rec.organization_id := l_org_id ;
1320: l_resource_rec.operation_seq_num := l_operation_seq_num ;
1321: l_resource_rec.resource_seq_num := l_res_seq_num ;
1322:
1323: IF ( l_return_status = FND_API.G_RET_STS_SUCCESS ) THEN
1324: l_resource_rec.start_date := l_min_start_date;
1325: l_resource_rec.completion_date := l_max_completion_date;
1326: l_eam_res_tbl( l_eam_res_tbl.COUNT + 1) := l_resource_rec;
1327: ELSE

Line 1328: RAISE FND_API.G_EXC_ERROR;

1324: l_resource_rec.start_date := l_min_start_date;
1325: l_resource_rec.completion_date := l_max_completion_date;
1326: l_eam_res_tbl( l_eam_res_tbl.COUNT + 1) := l_resource_rec;
1327: ELSE
1328: RAISE FND_API.G_EXC_ERROR;
1329: END IF;
1330:
1331: END IF; -- end of check for l_found
1332:

Line 1340: EXCEPTION WHEN FND_API.G_EXC_ERROR THEN

1336: x_eam_res_tbl := l_eam_res_tbl;
1337:
1338: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug(' exiting update_wor ' ) ; END IF ;
1339:
1340: EXCEPTION WHEN FND_API.G_EXC_ERROR THEN
1341: x_return_status := l_return_status;
1342: END update_wor;
1343:
1344: /*************************************************************************************************************************

Line 1447: l_return_status := FND_API.G_RET_STS_SUCCESS;

1443: BEGIN
1444: SAVEPOINT UPDATE_RES_USAGE ;
1445:
1446: -- Initialize variables
1447: l_return_status := FND_API.G_RET_STS_SUCCESS;
1448: l_eam_res_tbl := p_eam_res_tbl;
1449: l_eam_res_usage_tbl := p_eam_res_usage_tbl;
1450: l_eam_res_inst_tbl := p_eam_res_inst_tbl;
1451: l_min_found :='N';

Line 1579: l_return_status := FND_API.G_RET_STS_ERROR ;

1575:
1576: END IF;
1577:
1578: EXCEPTION WHEN NO_DATA_FOUND THEN
1579: l_return_status := FND_API.G_RET_STS_ERROR ;
1580: RAISE FND_API.G_EXC_ERROR ;
1581: END ;
1582:
1583: END IF; -- end of check for l_eam_res_inst_tbl(l_res_inst_tbl_index).transaction_type

Line 1580: RAISE FND_API.G_EXC_ERROR ;

1576: END IF;
1577:
1578: EXCEPTION WHEN NO_DATA_FOUND THEN
1579: l_return_status := FND_API.G_RET_STS_ERROR ;
1580: RAISE FND_API.G_EXC_ERROR ;
1581: END ;
1582:
1583: END IF; -- end of check for l_eam_res_inst_tbl(l_res_inst_tbl_index).transaction_type
1584:

Line 1784: l_return_status := FND_API.G_RET_STS_ERROR ;

1780: END IF ;
1781:
1782: END IF;
1783: EXCEPTION WHEN NO_DATA_FOUND THEN
1784: l_return_status := FND_API.G_RET_STS_ERROR ;
1785: RAISE FND_API.G_EXC_ERROR ;
1786: END ;
1787:
1788: END IF; -- end of check for l_eam_res_tbl(l_res_tbl_index).transaction_type

Line 1785: RAISE FND_API.G_EXC_ERROR ;

1781:
1782: END IF;
1783: EXCEPTION WHEN NO_DATA_FOUND THEN
1784: l_return_status := FND_API.G_RET_STS_ERROR ;
1785: RAISE FND_API.G_EXC_ERROR ;
1786: END ;
1787:
1788: END IF; -- end of check for l_eam_res_tbl(l_res_tbl_index).transaction_type
1789:

Line 1835: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

1831: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug(' Txn: Create resource usage ') ; END IF ;
1832:
1833: insert_into_woru( l_eam_res_usage_rec , l_return_status ) ;
1834:
1835: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1836: RAISE FND_API.G_EXC_ERROR;
1837: END IF;
1838:
1839: ELSIF ( l_eam_res_usage_rec.transaction_type = EAM_PROCESS_WO_PUB.G_OPR_DELETE ) THEN

Line 1836: RAISE FND_API.G_EXC_ERROR;

1832:
1833: insert_into_woru( l_eam_res_usage_rec , l_return_status ) ;
1834:
1835: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1836: RAISE FND_API.G_EXC_ERROR;
1837: END IF;
1838:
1839: ELSIF ( l_eam_res_usage_rec.transaction_type = EAM_PROCESS_WO_PUB.G_OPR_DELETE ) THEN
1840: -- call method delete usage and update inst table.

Line 1866: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

1862: ,p_eam_res_inst_tbl
1863: ,l_eam_res_inst_tbl
1864: ,l_return_status );
1865:
1866: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1867: RAISE FND_API.G_EXC_ERROR;
1868: END IF;
1869:
1870: ELSE

Line 1867: RAISE FND_API.G_EXC_ERROR;

1863: ,l_eam_res_inst_tbl
1864: ,l_return_status );
1865:
1866: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1867: RAISE FND_API.G_EXC_ERROR;
1868: END IF;
1869:
1870: ELSE
1871: update_wor ( l_eam_res_usage_rec

Line 1878: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

1874: , l_return_status );
1875:
1876: l_eam_res_tbl := l_out_eam_res_tbl;
1877:
1878: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1879: RAISE FND_API.G_EXC_ERROR;
1880: END IF;
1881: END IF ;
1882: END LOOP ;

Line 1879: RAISE FND_API.G_EXC_ERROR;

1875:
1876: l_eam_res_tbl := l_out_eam_res_tbl;
1877:
1878: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1879: RAISE FND_API.G_EXC_ERROR;
1880: END IF;
1881: END IF ;
1882: END LOOP ;
1883: END IF ;

Line 1893: WHEN FND_API.G_EXC_ERROR THEN

1889:
1890: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug(' Exiting update_resource_usage ') ; END IF ;
1891:
1892: EXCEPTION
1893: WHEN FND_API.G_EXC_ERROR THEN
1894: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug(' Error occured in update_resource_usage API ') ; END IF ;
1895: ROLLBACK TO UPDATE_RES_USAGE ;
1896: x_return_status := l_return_status ;
1897: x_message_name := ' ' ;