eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.EAM_PROCESS_PERMIT_PVT dependencies on EAM_PROCESS_WO_PVT

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

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

Line 50: IF (p_validation_level = EAM_PROCESS_WO_PVT.G_OPR_CREATE)

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

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

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

Line 153: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_PROCESS_PERMIT_PVT.PROCESS_WORK_PERMIT'); end if;

149: BEGIN
150:
151: SAVEPOINT PROCESS_PERMIT;
152:
153: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_PROCESS_PERMIT_PVT.PROCESS_WORK_PERMIT'); end if;
154:
155: -- 1) Work_Permit for processing of Work Permit header record
156:
157: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling WORK_PERMIT from PROCESS_WORK_PERMIT'); end if;

Line 157: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling WORK_PERMIT from PROCESS_WORK_PERMIT'); end if;

153: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_PROCESS_PERMIT_PVT.PROCESS_WORK_PERMIT'); end if;
154:
155: -- 1) Work_Permit for processing of Work Permit header record
156:
157: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling WORK_PERMIT from PROCESS_WORK_PERMIT'); end if;
158:
159: WORK_PERMIT
160: (
161: p_validation_level => l_validation_level

Line 182: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling CLEARANCE_PERMIT_ASSOCIATION from PROCESS_WORK_PERMIT'); end if;

178:
179: l_permit_id :=x_work_permit_header_rec.permit_id;
180:
181: IF p_permit_clearance_asso_tbl.COUNT > 0 THEN
182: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling CLEARANCE_PERMIT_ASSOCIATION from PROCESS_WORK_PERMIT'); end if;
183:
184:
185: FOR i in p_permit_clearance_asso_tbl.FIRST..p_permit_clearance_asso_tbl.LAST LOOP
186:

Line 216: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling PERMIT_WORK_ORDER_ASSOCIATION from PROCESS_WORK_PERMIT'); end if;

212: raise fnd_api.g_exc_unexpected_error;
213: END IF;
214:
215: IF p_permit_wo_association_tbl.COUNT > 0 THEN
216: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling PERMIT_WORK_ORDER_ASSOCIATION from PROCESS_WORK_PERMIT'); end if;
217: FOR i in p_permit_wo_association_tbl.FIRST..p_permit_wo_association_tbl.LAST LOOP
218:
219: l_safety_assoc_rec := p_permit_wo_association_tbl(i);
220:

Line 318: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_PROCESS_PERMIT_PVT.WORK_PERMIT'); end if;

314: BEGIN
315:
316: SAVEPOINT WORK_PERMIT;
317:
318: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_PROCESS_PERMIT_PVT.WORK_PERMIT'); end if;
319:
320: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling VALIDATE_TRANSACTION_TYPE'); end if;
321:
322: EAM_PROCESS_PERMIT_PVT.VALIDATE_TRANSACTION_TYPE

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

316: SAVEPOINT WORK_PERMIT;
317:
318: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_PROCESS_PERMIT_PVT.WORK_PERMIT'); end if;
319:
320: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling VALIDATE_TRANSACTION_TYPE'); end if;
321:
322: EAM_PROCESS_PERMIT_PVT.VALIDATE_TRANSACTION_TYPE
323: ( p_validation_level => p_validation_level
324: , p_entity => 'WORK PERMIT'

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

330: THEN
331: RAISE l_permit_transaction_error;
332: END IF;
333:
334: IF (p_validation_level = EAM_PROCESS_WO_PVT.G_OPR_CREATE) THEN
335: IF (l_permit_id IS NULL) OR (l_permit_id = FND_API.G_MISS_NUM) THEN
336: OPEN C;
337: FETCH C INTO l_permit_id;
338: CLOSE C;

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

339: l_work_permit_header_rec.permit_id :=l_permit_id;
340: END IF;
341: END IF;
342:
343: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Check_Existence'); end if;
344:
345: EAM_PERMIT_VALIDATE_PVT.Check_Existence
346: ( p_work_permit_header_rec => l_work_permit_header_rec
347: , x_work_permit_header_rec => l_old_work_permit_header_rec

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

355: RAISE l_permit_existence_error;
356: END IF;
357:
358:
359: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Populate_NULL_Columns'); end if;
360: IF (p_validation_level = EAM_PROCESS_WO_PVT.G_OPR_UPDATE) THEN
361:
362: EAM_PERMIT_DEFAULT_PVT.Populate_NULL_Columns
363: ( p_eam_wp_rec => l_work_permit_header_rec

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

356: END IF;
357:
358:
359: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Populate_NULL_Columns'); end if;
360: IF (p_validation_level = EAM_PROCESS_WO_PVT.G_OPR_UPDATE) THEN
361:
362: EAM_PERMIT_DEFAULT_PVT.Populate_NULL_Columns
363: ( p_eam_wp_rec => l_work_permit_header_rec
364: , p_old_eam_wp_rec => l_old_work_permit_header_rec

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

369:
370:
371: END IF;
372:
373: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Check_required'); end if;
374:
375:
376: EAM_PERMIT_VALIDATE_PVT.CHECK_REQUIRED
377: ( p_work_permit_header_rec => l_work_permit_header_rec

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

384: RAISE l_permit_required_error;
385: END IF;
386:
387:
388: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Check_attributes'); end if;
389:
390:
391: EAM_PERMIT_VALIDATE_PVT.CHECK_ATTRIBUTES
392: ( p_work_permit_header_rec => l_work_permit_header_rec

Line 407: IF((l_work_permit_header_rec.transaction_type=EAM_PROCESS_WO_PVT.G_OPR_CREATE ) --created

403: --Check if work flow is enabled and work permit requires an approval, set the pending flag to ?Y? in the work permit record.
404: l_workflow_enabled := Is_Workflow_Enabled(l_maintenance_object_source, p_organization_id);
405:
406: IF(l_workflow_enabled = 'Y') THEN --if workflow is enabled
407: IF((l_work_permit_header_rec.transaction_type=EAM_PROCESS_WO_PVT.G_OPR_CREATE ) --created
408: OR (l_work_permit_header_rec.transaction_type=EAM_PROCESS_WO_PVT.G_OPR_UPDATE --workorder updated
409: AND NVL(l_old_work_permit_header_rec.pending_flag,'N') = 'N' --old status is not pending
410: --and old status is not same as new status
411: AND (l_old_work_permit_header_rec.status_type <>l_work_permit_header_rec.status_type)

Line 408: OR (l_work_permit_header_rec.transaction_type=EAM_PROCESS_WO_PVT.G_OPR_UPDATE --workorder updated

404: l_workflow_enabled := Is_Workflow_Enabled(l_maintenance_object_source, p_organization_id);
405:
406: IF(l_workflow_enabled = 'Y') THEN --if workflow is enabled
407: IF((l_work_permit_header_rec.transaction_type=EAM_PROCESS_WO_PVT.G_OPR_CREATE ) --created
408: OR (l_work_permit_header_rec.transaction_type=EAM_PROCESS_WO_PVT.G_OPR_UPDATE --workorder updated
409: AND NVL(l_old_work_permit_header_rec.pending_flag,'N') = 'N' --old status is not pending
410: --and old status is not same as new status
411: AND (l_old_work_permit_header_rec.status_type <>l_work_permit_header_rec.status_type)
412: )

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

413: ) THEN
414:
415: IF(WF_EVENT.TEST(l_status_pending_event) <> 'NONE') THEN
416:
417: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug ('Calling Wkflow required check API...') ; END IF;
418:
419:
420: EAM_WORKPERMIT_WORKFLOW_PVT.Is_Approval_Required_Released
421: (p_old_wp_rec => l_old_work_permit_header_rec,

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

449: END IF;
450: END IF;
451:
452:
453: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Perform_Writes'); end if;
454:
455: EAM_PERMIT_UTILITY_PVT.PERFORM_WRITES
456: ( p_work_permit_header_rec => l_work_permit_header_rec
457: , x_mesg_token_Tbl => l_Mesg_Token_Tbl

Line 467: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Created Permit with permit id: '||p_work_permit_header_rec.permit_id); end if;

463: END IF;
464:
465: x_work_permit_header_rec :=l_work_permit_header_rec;
466:
467: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Created Permit with permit id: '||p_work_permit_header_rec.permit_id); end if;
468:
469: --If work permit is approved and no workflow then call the procedure CHANGE_WORK_PERMIT_STATUS
470: IF(l_workflow_enabled = 'N')
471: OR (l_work_permit_header_rec.APPROVED_BY IS NOT NULL)

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

470: IF(l_workflow_enabled = 'N')
471: OR (l_work_permit_header_rec.APPROVED_BY IS NOT NULL)
472: OR (l_work_permit_header_rec.APPROVED_BY <> FND_API.G_MISS_NUM) THEN
473:
474: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Calling CHANGE_WORK_PERMIT_STATUS') ; END IF ;
475:
476: EAM_PERMIT_UTILITY_PVT.CHANGE_WORK_PERMIT_STATUS
477: ( p_permit_id => l_work_permit_header_rec.permit_id
478: , p_organization_id => l_work_permit_header_rec.organization_id

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

483: , x_return_status => l_return_status
484: , x_Mesg_Token_Tbl => l_mesg_token_tbl
485: );
486:
487: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Status Change WO completed with status ' || l_return_status) ; END IF ;
488: IF NVL(l_return_status, 'S') <> 'S' THEN
489: l_return_status := FND_API.G_RET_STS_ERROR;
490: RAISE l_err_status_change;
491:

Line 496: --IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling INSERT_PERMIT_HISTORY_ROW'); end if;

492: END IF;
493:
494: END IF;
495:
496: --IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling INSERT_PERMIT_HISTORY_ROW'); end if;
497: --Call the procedure EAM_PERMIT_UTILITY_PVT.INSERT_PERMIT_HISTORY_ROW to insert the event details in the EAM_SAFETY_HISTORY table
498:
499: --If workflow is enabled and workflow approval is required call the procedure RAISE_WORKFLOW_EVENTS.
500:

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

499: --If workflow is enabled and workflow approval is required call the procedure RAISE_WORKFLOW_EVENTS.
500:
501: IF(l_workflow_enabled = 'Y')
502: AND (l_approval_required) THEN
503: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Calling the Raise_Workflow_Events procedure ...') ; END IF ;
504: Raise_Workflow_Events
505: ( p_api_version => 1.0,
506: p_validation_level => p_validation_level,
507: p_eam_wp_rec => l_work_permit_header_rec,

Line 517: 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 ;

513: x_return_status => l_return_status,
514: x_mesg_token_tbl => l_mesg_token_tbl
515: );
516:
517: 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 ;
518:
519: END IF;
520:
521: x_return_status :=l_return_status;

Line 674: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_PROCESS_PERMIT_PVT.PERMIT_WORK_ORDER_ASSOCIATION'); end if;

670:
671: BEGIN
672:
673: SAVEPOINT PERMIT_WORK_ORDER_ASSOCIATION;
674: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Inside EAM_PROCESS_PERMIT_PVT.PERMIT_WORK_ORDER_ASSOCIATION'); end if;
675:
676:
677: /*For each record in the table
678: -- Check if the parent work permit, work order exists.

Line 684: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating status_type . . . '); END IF;

680: IF p_permit_wo_association_tbl.COUNT > 0 THEN
681: FOR i in p_permit_wo_association_tbl.FIRST..p_permit_wo_association_tbl.LAST LOOP
682:
683: /* -- status_type
684: IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating status_type . . . '); END IF;
685:
686: begin
687:
688: select status_type

Line 701: if (p_permit_wo_association_tbl(i).transaction_type = EAM_PROCESS_WO_PVT.G_OPR_CREATE and

697: where permit_id =p_work_permit_id
698: and organization_id =p_organization_id;
699:
700:
701: if (p_permit_wo_association_tbl(i).transaction_type = EAM_PROCESS_WO_PVT.G_OPR_CREATE and
702: (l_wo_status not in (wip_constants.released, wip_constants.draft) or
703: l_permit_status not in (wip_constants.released, wip_constants.draft))) then
704:
705: raise fnd_api.g_exc_unexpected_error;

Line 707: elsif (p_permit_wo_association_tbl(i).transaction_type = EAM_PROCESS_WO_PVT.G_OPR_UPDATE and

703: l_permit_status not in (wip_constants.released, wip_constants.draft))) then
704:
705: raise fnd_api.g_exc_unexpected_error;
706:
707: elsif (p_permit_wo_association_tbl(i).transaction_type = EAM_PROCESS_WO_PVT.G_OPR_UPDATE and
708: (l_wo_status not in (wip_constants.released, wip_constants.draft) or
709: l_permit_status not in (wip_constants.released, wip_constants.draft))) then
710:
711: raise fnd_api.g_exc_unexpected_error;

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

726: , p_entity => 'ASSOCIATION'
727: , x_mesg_token_Tbl => l_Mesg_Token_Tbl
728: , x_return_Status => l_return_status
729: );
730: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Perform_Writes'); end if;
731: IF l_safety_assoc_rec.TRANSACTION_TYPE = EAM_PROCESS_WO_PVT.G_OPR_CREATE THEN
732: OPEN C;
733: FETCH C INTO l_safety_assoc_id;
734: CLOSE C;

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

727: , x_mesg_token_Tbl => l_Mesg_Token_Tbl
728: , x_return_Status => l_return_status
729: );
730: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling Perform_Writes'); end if;
731: IF l_safety_assoc_rec.TRANSACTION_TYPE = EAM_PROCESS_WO_PVT.G_OPR_CREATE THEN
732: OPEN C;
733: FETCH C INTO l_safety_assoc_id;
734: CLOSE C;
735: l_safety_assoc_rec.SAFETY_ASSOCIATION_ID :=l_safety_assoc_id;

Line 961: l_validation_level NUMBER := EAM_PROCESS_WO_PVT.G_OPR_CREATE;

957:
958: )IS
959: CURSOR C IS SELECT EAM_PERMIT_NAME_S.NEXTVAL FROM SYS.DUAL;
960: l_api_name CONSTANT VARCHAR2(30) := G_PKG_NAME;
961: l_validation_level NUMBER := EAM_PROCESS_WO_PVT.G_OPR_CREATE;
962:
963: l_return_status VARCHAR2(1);
964: l_msg_count NUMBER;
965: l_permit_id NUMBER:=px_permit_id;

Line 981: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Start of copy permit '); end if;

977:
978: BEGIN
979:
980: SAVEPOINT COPY_PERMIT;
981: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Start of copy permit '); end if;
982: EAM_PERMIT_UTILITY_PVT.QUERY_ROW
983: ( p_work_permit_id => l_permit_id
984: , p_organization_id => l_org_id
985: , x_work_permit_header_rec => l_work_permit_header_rec

Line 1000: l_work_permit_header_rec.transaction_type :=EAM_PROCESS_WO_PVT.G_OPR_CREATE;

996: CLOSE C;
997:
998: l_work_permit_header_rec.permit_id :=null;
999: l_work_permit_header_rec.permit_name :=to_char(l_permit_name);
1000: l_work_permit_header_rec.transaction_type :=EAM_PROCESS_WO_PVT.G_OPR_CREATE;
1001: l_work_permit_header_rec.pending_flag := null;
1002: l_work_permit_header_rec.completion_date := null;
1003: l_work_permit_header_rec.approved_by := null;
1004:

Line 1019: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling WORK_PERMIT from PROCESS_WORK_PERMIT'); end if;

1015: l_work_permit_header_rec.USER_DEFINED_STATUS_ID :=wip_constants.draft;
1016: -- END IF;
1017:
1018:
1019: IF EAM_PROCESS_WO_PVT.get_debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.write_debug(' Calling WORK_PERMIT from PROCESS_WORK_PERMIT'); end if;
1020: WORK_PERMIT
1021: (
1022: p_validation_level => l_validation_level
1023: , p_work_permit_id => l_permit_id