DBA Data[Home] [Help]

APPS.EAM_RES_UTILITY_PVT dependencies on EAM_ERROR_MESSAGE_PVT

Line 156: , x_mesg_token_Tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type

152: *********************************************************************/
153:
154: PROCEDURE Insert_Row
155: ( p_eam_res_rec IN EAM_PROCESS_WO_PUB.eam_res_rec_type
156: , x_mesg_token_Tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type
157: , x_return_Status OUT NOCOPY VARCHAR2
158: )
159: IS
160: l_return_status VARCHAR2(30) := '';

Line 166: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Writing Resource rec for ' || p_eam_res_rec.resource_seq_num); END IF;

162: l_msg_data VARCHAR2(2000) := '';
163:
164: BEGIN
165:
166: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Writing Resource rec for ' || p_eam_res_rec.resource_seq_num); END IF;
167:
168: -- bug no 3444091
169: if p_eam_res_rec.start_date > p_eam_res_rec.completion_date then
170: x_return_status := fnd_api.g_ret_sts_error;

Line 274: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug ('Creating new resources') ; END IF;

270: , p_eam_res_rec.program_application_id
271: , p_eam_res_rec.program_id
272: , SYSDATE);
273:
274: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug ('Creating new resources') ; END IF;
275:
276:
277: x_return_status := FND_API.G_RET_STS_SUCCESS;
278:

Line 297: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

293:
294:
295: EXCEPTION
296: WHEN OTHERS THEN
297: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
298: ( p_message_name => NULL
299: , p_message_text => G_PKG_NAME ||' :Inserting Record ' || SQLERRM
300: , x_mesg_token_Tbl => x_mesg_token_tbl
301: );

Line 318: , x_mesg_token_Tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type

314: *********************************************************************/
315:
316: PROCEDURE Update_Row
317: ( p_eam_res_rec IN EAM_PROCESS_WO_PUB.eam_res_rec_type
318: , x_mesg_token_Tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type
319: , x_return_Status OUT NOCOPY VARCHAR2
320: )
321: IS
322: l_return_status VARCHAR2(30) := '';

Line 329: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Updating Resource: '|| p_eam_res_rec.resource_seq_num); END IF;

325: l_usage_rate_or_amount NUMBER := 0;
326:
327: BEGIN
328:
329: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Updating Resource: '|| p_eam_res_rec.resource_seq_num); END IF;
330:
331: -- bug no 3444091
332: if p_eam_res_rec.start_date > p_eam_res_rec.completion_date then
333: x_return_status := fnd_api.g_ret_sts_error;

Line 394: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug ('Updating resources') ; END IF;

390: AND organization_id = p_eam_res_rec.organization_id
391: AND operation_seq_num = p_eam_res_rec.operation_seq_num
392: AND resource_seq_num = p_eam_res_rec.resource_seq_num;
393:
394: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug ('Updating resources') ; END IF;
395:
396: x_return_status := FND_API.G_RET_STS_SUCCESS;
397:
398: -- comparing new usage rate with existing

Line 431: , x_mesg_token_Tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type

427: *********************************************************************/
428:
429: PROCEDURE Delete_Row
430: ( p_eam_res_rec IN EAM_PROCESS_WO_PUB.eam_res_rec_type
431: , x_mesg_token_Tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type
432: , x_return_Status OUT NOCOPY VARCHAR2
433: )
434: IS
435: l_Mesg_Token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

Line 435: l_Mesg_Token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

431: , x_mesg_token_Tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type
432: , x_return_Status OUT NOCOPY VARCHAR2
433: )
434: IS
435: l_Mesg_Token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
436: -- l_return_status VARCHAR2(1):= FND_API.G_RET_STS_SUCCESS;
437: l_return_status VARCHAR2(30) := '';
438: l_msg_count NUMBER := 0;
439: l_msg_data VARCHAR2(2000) := '';

Line 443: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug ('Deleting Resource Usage') ; END IF;

439: l_msg_data VARCHAR2(2000) := '';
440:
441: BEGIN
442:
443: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug ('Deleting Resource Usage') ; END IF;
444:
445: EAM_RES_USAGE_UTILITY_PVT.Delete_Usage
446: ( p_wip_entity_id => p_eam_res_rec.wip_entity_id
447: , p_organization_id => p_eam_res_rec.organization_id

Line 454: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Deleting Resource Instance for '|| p_eam_res_rec.resource_seq_num); END IF;

450: , x_mesg_token_Tbl => l_mesg_token_Tbl
451: , x_return_Status => l_return_Status
452: );
453:
454: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Deleting Resource Instance for '|| p_eam_res_rec.resource_seq_num); END IF;
455:
456: DELETE FROM WIP_OP_RESOURCE_INSTANCES
457: WHERE wip_entity_id = p_eam_res_rec.wip_entity_id
458: AND organization_id = p_eam_res_rec.organization_id

Line 463: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Deleting Resource: '|| p_eam_res_rec.resource_seq_num); END IF;

459: AND operation_seq_num = p_eam_res_rec.operation_seq_num
460: AND resource_seq_num = p_eam_res_rec.resource_seq_num;
461:
462:
463: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Deleting Resource: '|| p_eam_res_rec.resource_seq_num); END IF;
464:
465: DELETE FROM WIP_OPERATION_RESOURCES
466: WHERE wip_entity_id = p_eam_res_rec.wip_entity_id
467: AND organization_id = p_eam_res_rec.organization_id

Line 506: , x_mesg_token_tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type

502: *********************************************************************/
503:
504: PROCEDURE Perform_Writes
505: ( p_eam_res_rec IN EAM_PROCESS_WO_PUB.eam_res_rec_type
506: , x_mesg_token_tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type
507: , x_return_status OUT NOCOPY VARCHAR2
508: )
509: IS
510: l_Mesg_Token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

Line 510: l_Mesg_Token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

506: , x_mesg_token_tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type
507: , x_return_status OUT NOCOPY VARCHAR2
508: )
509: IS
510: l_Mesg_Token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
511: l_return_status VARCHAR2(1):= FND_API.G_RET_STS_SUCCESS;
512: BEGIN
513:
514: IF p_eam_res_rec.transaction_type = EAM_PROCESS_WO_PVT.G_OPR_CREATE

Line 586: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Processing osp creation for resource'|| I || ' record') ; END IF ;

582:
583: FOR I IN 1..p_eam_res_tbl.COUNT LOOP
584:
585:
586: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Processing osp creation for resource'|| I || ' record') ; END IF ;
587:
588: -- Load local records.
589: l_eam_res_rec := p_eam_res_tbl(I);
590:

Line 594: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('inside if to create req') ; END IF ;

590:
591: IF(l_eam_res_rec.transaction_type= EAM_PROCESS_WO_PVT.G_OPR_CREATE AND
592: l_eam_res_rec.autocharge_type=WIP_CONSTANTS.PO_RECEIPT) THEN
593:
594: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('inside if to create req') ; END IF ;
595: WIP_OSP.CREATE_REQUISITION(
596: P_Wip_Entity_Id =>l_eam_res_rec.wip_entity_id,
597: P_Organization_Id =>l_eam_res_rec.organization_id,
598: P_Repetitive_Schedule_Id =>NULL,

Line 609: x_return_status := EAM_ERROR_MESSAGE_PVT.G_STATUS_ERROR;

605:
606: END LOOP;
607: EXCEPTION
608: WHEN OTHERS THEN
609: x_return_status := EAM_ERROR_MESSAGE_PVT.G_STATUS_ERROR;
610: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Exception in creating req for osp') ; END IF ;
611: END CREATE_OSP_REQ;
612:
613:

Line 610: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Exception in creating req for osp') ; END IF ;

606: END LOOP;
607: EXCEPTION
608: WHEN OTHERS THEN
609: x_return_status := EAM_ERROR_MESSAGE_PVT.G_STATUS_ERROR;
610: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Exception in creating req for osp') ; END IF ;
611: END CREATE_OSP_REQ;
612:
613:
614: