DBA Data[Home] [Help]

APPS.EAM_PROCESS_ISOLATION_PVT dependencies on EAM_PROCESS_WO_PVT

Line 46: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_PROCESS_ISOLATION_PVT.VALIDATE_TRANSACTION_TYPE'); end if;

42:
43:
44: BEGIN
45:
46: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_PROCESS_ISOLATION_PVT.VALIDATE_TRANSACTION_TYPE'); end if;
47:
48: IF (p_entity = 'ISOLATION') THEN
49: IF (p_validation_level = EAM_PROCESS_WO_PVT.G_OPR_CREATE)
50: OR (p_validation_level = EAM_PROCESS_WO_PVT.G_OPR_UPDATE) then

Line 49: IF (p_validation_level = EAM_PROCESS_WO_PVT.G_OPR_CREATE)

45:
46: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_PROCESS_ISOLATION_PVT.VALIDATE_TRANSACTION_TYPE'); end if;
47:
48: IF (p_entity = 'ISOLATION') THEN
49: IF (p_validation_level = EAM_PROCESS_WO_PVT.G_OPR_CREATE)
50: OR (p_validation_level = EAM_PROCESS_WO_PVT.G_OPR_UPDATE) then
51: x_return_status := FND_API.G_RET_STS_SUCCESS;
52:
53: ELSE

Line 50: OR (p_validation_level = EAM_PROCESS_WO_PVT.G_OPR_UPDATE) then

46: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_PROCESS_ISOLATION_PVT.VALIDATE_TRANSACTION_TYPE'); end if;
47:
48: IF (p_entity = 'ISOLATION') THEN
49: IF (p_validation_level = EAM_PROCESS_WO_PVT.G_OPR_CREATE)
50: OR (p_validation_level = EAM_PROCESS_WO_PVT.G_OPR_UPDATE) then
51: x_return_status := FND_API.G_RET_STS_SUCCESS;
52:
53: ELSE
54: x_return_status := FND_API.G_RET_STS_ERROR;

Line 112: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_PROCESS_ISOLATION_PVT.PROCESS_ISOLATION'); end if;

108: BEGIN
109:
110: SAVEPOINT PROCESS_ISOLATION;
111:
112: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_PROCESS_ISOLATION_PVT.PROCESS_ISOLATION'); end if;
113:
114:
115: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling ISOLATION from PROCESS_ISOLATION'); end if;
116:

Line 115: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling ISOLATION from PROCESS_ISOLATION'); end if;

111:
112: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_PROCESS_ISOLATION_PVT.PROCESS_ISOLATION'); end if;
113:
114:
115: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling ISOLATION from PROCESS_ISOLATION'); end if;
116:
117:
118:
119: WORK_ISOLATION

Line 141: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling ESTABLISHMENT from PROCESS_ISOLATION'); end if;

137: raise fnd_api.g_exc_unexpected_error;
138: END IF;
139: l_isolation_id :=lx_iso_header_rec.isolation_id;
140: IF p_establish_iso_tbl.COUNT > 0 THEN
141: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling ESTABLISHMENT from PROCESS_ISOLATION'); end if;
142: ESTABLISHMENT
143: (
144: p_organization_id => p_iso_header_rec.organization_id
145: , p_establish_iso_tbl => p_establish_iso_tbl

Line 166: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Re-ESTABLISHMENT from PROCESS_ISOLATION'); end if;

162: END IF;
163:
164:
165: IF p_re_establish_iso_tbl.COUNT > 0 THEN
166: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Re-ESTABLISHMENT from PROCESS_ISOLATION'); end if;
167: ESTABLISHMENT
168: (
169: p_organization_id => p_iso_header_rec.organization_id
170: , p_establish_iso_tbl => p_re_establish_iso_tbl

Line 190: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling ISOLATED_ASSETS from PROCESS_ISOLATION'); end if;

186:
187: END IF;
188:
189: IF p_isolated_asset_tbl.COUNT > 0 THEN
190: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling ISOLATED_ASSETS from PROCESS_ISOLATION'); end if;
191:
192: FOR i in p_isolated_asset_tbl.FIRST..p_isolated_asset_tbl.LAST LOOP
193:
194: l_safety_assoc_rec := p_isolated_asset_tbl(i);

Line 292: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_PROCESS_ISOLATION_PVT.ISOLATION'); end if;

288: BEGIN
289:
290: SAVEPOINT WORK_ISOLATION;
291:
292: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_PROCESS_ISOLATION_PVT.ISOLATION'); end if;
293:
294: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling VALIDATE_TRANSACTION_TYPE'); end if;
295:
296: EAM_PROCESS_ISOLATION_PVT.VALIDATE_TRANSACTION_TYPE

Line 294: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling VALIDATE_TRANSACTION_TYPE'); end if;

290: SAVEPOINT WORK_ISOLATION;
291:
292: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_PROCESS_ISOLATION_PVT.ISOLATION'); end if;
293:
294: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling VALIDATE_TRANSACTION_TYPE'); end if;
295:
296: EAM_PROCESS_ISOLATION_PVT.VALIDATE_TRANSACTION_TYPE
297: ( p_validation_level => p_validation_level
298: , p_entity => 'ISOLATION'

Line 308: IF (p_validation_level = EAM_PROCESS_WO_PVT.G_OPR_CREATE) THEN

304: THEN
305: RAISE l_isolation_transaction_error;
306: END IF;
307:
308: IF (p_validation_level = EAM_PROCESS_WO_PVT.G_OPR_CREATE) THEN
309: IF (l_isolation_id IS NULL) OR (l_isolation_id = FND_API.G_MISS_NUM) THEN
310: OPEN C;
311: FETCH C INTO l_isolation_id;
312: CLOSE C;

Line 317: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Check_Existence'); end if;

313: l_iso_header_rec.isolation_id :=l_isolation_id;
314: END IF;
315: END IF;
316:
317: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Check_Existence'); end if;
318:
319: EAM_ISOLATION_VALIDATE_PVT.Check_Existence
320: ( p_iso_header_rec => l_iso_header_rec
321: , x_iso_header_rec => l_old_iso_header_rec

Line 330: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Populate_NULL_Columns'); end if;

326: THEN
327: RAISE l_isolation_existence_error;
328: END IF;
329:
330: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Populate_NULL_Columns'); end if;
331: IF (p_validation_level = EAM_PROCESS_WO_PVT.G_OPR_UPDATE) THEN
332:
333:
334: EAM_ISOLATION_DEFAULT_PVT.Populate_NULL_Columns

Line 331: IF (p_validation_level = EAM_PROCESS_WO_PVT.G_OPR_UPDATE) THEN

327: RAISE l_isolation_existence_error;
328: END IF;
329:
330: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Populate_NULL_Columns'); end if;
331: IF (p_validation_level = EAM_PROCESS_WO_PVT.G_OPR_UPDATE) THEN
332:
333:
334: EAM_ISOLATION_DEFAULT_PVT.Populate_NULL_Columns
335: ( p_eam_iso_header_rec => l_iso_header_rec

Line 342: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Check_required'); end if;

338: );
339: l_iso_header_rec :=l_out_iso_header_rec;
340: END IF;
341:
342: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Check_required'); end if;
343:
344:
345: EAM_ISOLATION_VALIDATE_PVT.CHECK_REQUIRED
346: ( p_iso_header_rec => l_iso_header_rec

Line 357: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Check_attributes'); end if;

353: RAISE l_isolation_required_error;
354: END IF;
355:
356:
357: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Check_attributes'); end if;
358:
359: EAM_ISOLATION_VALIDATE_PVT.CHECK_ATTRIBUTES
360: ( p_iso_header_rec => l_iso_header_rec
361: , p_old_iso_header_rec => l_old_iso_header_rec

Line 384: IF((l_iso_header_rec.transaction_type=EAM_PROCESS_WO_PVT.G_OPR_CREATE ) --created

380: l_workflow_enabled := 'N';
381: END;
382:
383: IF(l_workflow_enabled = 'Y') THEN --if workflow is enabled
384: IF((l_iso_header_rec.transaction_type=EAM_PROCESS_WO_PVT.G_OPR_CREATE ) --created
385: OR (l_iso_header_rec.transaction_type=EAM_PROCESS_WO_PVT.G_OPR_UPDATE -- updated
386: AND NVL(l_old_iso_header_rec.pending_flag,'N') = 'N' --old status is not pending
387: --and old status is not same as new status
388: AND (l_old_iso_header_rec.SYSTEM_STATUS <>l_iso_header_rec.SYSTEM_STATUS)

Line 385: OR (l_iso_header_rec.transaction_type=EAM_PROCESS_WO_PVT.G_OPR_UPDATE -- updated

381: END;
382:
383: IF(l_workflow_enabled = 'Y') THEN --if workflow is enabled
384: IF((l_iso_header_rec.transaction_type=EAM_PROCESS_WO_PVT.G_OPR_CREATE ) --created
385: OR (l_iso_header_rec.transaction_type=EAM_PROCESS_WO_PVT.G_OPR_UPDATE -- updated
386: AND NVL(l_old_iso_header_rec.pending_flag,'N') = 'N' --old status is not pending
387: --and old status is not same as new status
388: AND (l_old_iso_header_rec.SYSTEM_STATUS <>l_iso_header_rec.SYSTEM_STATUS)
389: )

Line 395: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug ('Calling iSOLATION Wkflow required check API...') ; END IF;

391: l_test := (WF_EVENT.TEST(l_status_pending_event));
392:
393: IF(WF_EVENT.TEST(l_status_pending_event) <> 'NONE') THEN
394:
395: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug ('Calling iSOLATION Wkflow required check API...') ; END IF;
396:
397:
398: EAM_ISOLATION_WORKFLOW_PVT.Is_Approval_Required_Released
399: (p_old_isolation_rec => l_old_iso_header_rec,

Line 431: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Perform_Writes'); end if;

427: l_iso_header_rec.COMPLETION_DATE := NVL(l_iso_header_rec.COMPLETION_DATE,sysdate);
428: END IF;
429: END IF;*/
430:
431: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Perform_Writes'); end if;
432:
433: EAM_ISOLATION_UTILITY_PVT.PERFORM_WRITES
434: ( p_isolation_header_rec => l_iso_header_rec
435: , x_mesg_token_Tbl => l_Mesg_Token_Tbl

Line 446: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Created Isolation with isolation id: '||p_iso_header_rec.isolation_id); end if;

442: END IF;
443:
444: x_iso_header_rec :=l_iso_header_rec;
445:
446: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Created Isolation with isolation id: '||p_iso_header_rec.isolation_id); end if;
447:
448: --If isolation is approved and no workflow then call the procedure CHANGE_ISOLATION_STATUS
449: IF((l_workflow_enabled = 'N')
450: OR (l_iso_header_rec.APPROVED_BY IS NOT NULL)

Line 454: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Calling CHANGE_ISOLATION_STATUS') ; END IF ;

450: OR (l_iso_header_rec.APPROVED_BY IS NOT NULL)
451: OR (l_iso_header_rec.APPROVED_BY <> FND_API.G_MISS_NUM))
452: AND (l_old_iso_header_rec.SYSTEM_STATUS <>l_iso_header_rec.SYSTEM_STATUS) THEN
453:
454: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Calling CHANGE_ISOLATION_STATUS') ; END IF ;
455:
456: EAM_ISOLATION_UTILITY_PVT.CHANGE_ISOLATION_STATUS
457: ( p_isolation_id => l_iso_header_rec.isolation_id
458: , p_organization_id => l_iso_header_rec.organization_id

Line 467: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Status Change Isolation completed with status ' || l_return_status) ; END IF ;

463: , x_return_status => l_return_status
464: , x_Mesg_Token_Tbl => l_mesg_token_tbl
465: );
466:
467: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Status Change Isolation completed with status ' || l_return_status) ; END IF ;
468: IF NVL(l_return_status, 'S') <> 'S' THEN
469: l_return_status := FND_API.G_RET_STS_ERROR;
470: RAISE l_err_status_change;
471:

Line 480: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Calling the Raise_Workflow_Events procedure ...') ; END IF ;

476: --If workflow is enabled and workflow approval is required call the procedure RAISE_WORKFLOW_EVENTS.
477:
478: IF(l_workflow_enabled = 'Y')
479: AND (l_approval_required) THEN
480: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Calling the Raise_Workflow_Events procedure ...') ; END IF ;
481: Raise_Workflow_Events
482: ( p_api_version => 1.0,
483: p_validation_level => p_validation_level,
484: p_eam_iso_rec => l_iso_header_rec,

Line 494: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Raise_Workflow_Events procedure completed with status '||l_return_status) ; END IF ;

490: x_return_status => l_return_status,
491: x_mesg_token_tbl => l_mesg_token_tbl
492: );
493:
494: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Raise_Workflow_Events procedure completed with status '||l_return_status) ; END IF ;
495: /* IF(l_return_status <> 'S') THEN
496: l_bo_return_status := l_return_status;
497: END IF;*/
498: END IF;

Line 661: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_PROCESS_ISOLATION_PVT.ESTABLISHMENT'); end if;

657:
658: BEGIN
659:
660: SAVEPOINT ESTABLISHMENT;
661: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_PROCESS_ISOLATION_PVT.ESTABLISHMENT'); end if;
662:
663:
664: IF p_establish_iso_tbl.COUNT > 0 THEN
665: FOR i in p_establish_iso_tbl.FIRST..p_establish_iso_tbl.LAST LOOP

Line 677: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Checking asset existence for establishment'); end if;

673: if l_establish_iso_rec.ORGANIZATION_ID is null then
674: l_establish_iso_rec.ORGANIZATION_ID :=p_organization_id;
675: end if;
676:
677: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Checking asset existence for establishment'); end if;
678:
679: SELECT COUNT(*)
680: INTO l_count
681: FROM csi_item_instances

Line 691: If Eam_process_wo_pvt.Get_debug = 'Y' Then Eam_error_message_pvt.Write_debug(' Checking uniqueness for Sequence type'); End If;

687: THEN
688: RAISE SAF_ASSET_EXISTENCE_ERROR;
689: END IF;
690:
691: If Eam_process_wo_pvt.Get_debug = 'Y' Then Eam_error_message_pvt.Write_debug(' Checking uniqueness for Sequence type'); End If;
692:
693: SELECT COUNT(*)
694: Into L_count
695: From Eam_establishment_details

Line 701: If L_establish_iso_rec.Transaction_type = Eam_process_wo_pvt.G_opr_create Then

697: And Sequence_type = L_establish_iso_rec.Sequence_type
698: And Organization_id= L_establish_iso_rec.Organization_id
699: And Sequence_number=L_establish_iso_rec.Sequence_number;
700:
701: If L_establish_iso_rec.Transaction_type = Eam_process_wo_pvt.G_opr_create Then
702:
703: IF (l_count > 0)
704: Then
705: Raise Saf_estab_seq_duplicate;

Line 709: IF l_establish_iso_rec.TRANSACTION_TYPE = EAM_PROCESS_WO_PVT.G_OPR_UPDATE THEN

705: Raise Saf_estab_seq_duplicate;
706: End If;
707: END IF;
708:
709: IF l_establish_iso_rec.TRANSACTION_TYPE = EAM_PROCESS_WO_PVT.G_OPR_UPDATE THEN
710: BEGIN
711: Select Establishment_id
712: Into l_temp
713: From Eam_establishment_details

Line 731: IF l_establish_iso_rec.TRANSACTION_TYPE = EAM_PROCESS_WO_PVT.G_OPR_CREATE THEN

727: End If;
728:
729: End If ;
730:
731: IF l_establish_iso_rec.TRANSACTION_TYPE = EAM_PROCESS_WO_PVT.G_OPR_CREATE THEN
732: OPEN C2;
733: FETCH C2 INTO l_iso_seq;
734: CLOSE C2;
735: L_establish_iso_rec.Establishment_id :=L_iso_seq;

Line 738: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Checking Required attributes'); end if;

734: CLOSE C2;
735: L_establish_iso_rec.Establishment_id :=L_iso_seq;
736: END IF;
737:
738: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Checking Required attributes'); end if;
739:
740: EAM_ESTABLISHMENT_UTILITY_PVT.CHECK_REQUIRED
741: ( p_safety_establishment_rec => l_establish_iso_rec
742: , x_mesg_token_Tbl => l_Mesg_Token_Tbl

Line 750: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Perform_Writes'); end if;

746: THEN
747: Raise L_estab_required_error;
748: End If;
749:
750: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Perform_Writes'); end if;
751:
752: EAM_ESTABLISHMENT_UTILITY_PVT.PERFORM_WRITES
753: ( p_safety_establishment_rec => l_establish_iso_rec
754: , x_mesg_token_Tbl => l_Mesg_Token_Tbl