DBA Data[Home] [Help]

APPS.EAM_PROCESS_PERMIT_PVT dependencies on EAM_ERROR_MESSAGE_PVT

Line 35: , x_Mesg_Token_Tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type

31: (
32: p_validation_level IN NUMBER
33: , p_entity IN VARCHAR2
34: , x_return_status OUT NOCOPY VARCHAR2
35: , x_Mesg_Token_Tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type
36: )IS
37:
38: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type ;
39: l_mesg_token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

Line 38: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type ;

34: , x_return_status OUT NOCOPY VARCHAR2
35: , x_Mesg_Token_Tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type
36: )IS
37:
38: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type ;
39: l_mesg_token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
40: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type ;
41: l_other_message VARCHAR2(2000);
42: l_err_text VARCHAR2(2000);

Line 39: l_mesg_token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

35: , x_Mesg_Token_Tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type
36: )IS
37:
38: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type ;
39: l_mesg_token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
40: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type ;
41: l_other_message VARCHAR2(2000);
42: l_err_text VARCHAR2(2000);
43:

Line 40: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type ;

36: )IS
37:
38: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type ;
39: l_mesg_token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
40: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type ;
41: l_other_message VARCHAR2(2000);
42: l_err_text VARCHAR2(2000);
43:
44:

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 140: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type ;

136: l_safety_assoc_rec EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_rec_type;
137: l_permit_id NUMBER;
138:
139: /* Error Handling Variables */
140: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type ;
141: l_mesg_token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
142: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type ;
143: l_other_message VARCHAR2(2000);
144: l_err_text VARCHAR2(2000);

Line 141: l_mesg_token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

137: l_permit_id NUMBER;
138:
139: /* Error Handling Variables */
140: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type ;
141: l_mesg_token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
142: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type ;
143: l_other_message VARCHAR2(2000);
144: l_err_text VARCHAR2(2000);
145: l_error_level NUMBER :=EAM_ERROR_MESSAGE_PVT.G_BO_LEVEL;

Line 142: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type ;

138:
139: /* Error Handling Variables */
140: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type ;
141: l_mesg_token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
142: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type ;
143: l_other_message VARCHAR2(2000);
144: l_err_text VARCHAR2(2000);
145: l_error_level NUMBER :=EAM_ERROR_MESSAGE_PVT.G_BO_LEVEL;
146: l_entity_index NUMBER :=1;

Line 145: l_error_level NUMBER :=EAM_ERROR_MESSAGE_PVT.G_BO_LEVEL;

141: l_mesg_token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
142: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type ;
143: l_other_message VARCHAR2(2000);
144: l_err_text VARCHAR2(2000);
145: l_error_level NUMBER :=EAM_ERROR_MESSAGE_PVT.G_BO_LEVEL;
146: l_entity_index NUMBER :=1;
147:
148:
149: BEGIN

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 171: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages

167: , x_return_status => l_return_status
168: );
169: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
170: THEN
171: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages
172: ( p_mesg_token_Tbl => l_out_Mesg_Token_Tbl
173: , p_error_level => l_error_level
174: , p_entity_index => l_entity_index
175: );

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 207: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages

203:
204:
205: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
206: THEN
207: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages
208: ( p_mesg_token_Tbl => l_out_Mesg_Token_Tbl
209: , p_error_level => l_error_level
210: , p_entity_index => l_entity_index
211: );

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 239: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages

235:
236:
237: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
238: THEN
239: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages
240: ( p_mesg_token_Tbl => l_out_Mesg_Token_Tbl
241: , p_error_level => l_error_level
242: , p_entity_index => l_entity_index
243: );

Line 259: x_msg_count := EAM_ERROR_MESSAGE_PVT.Get_Message_Count;

255:
256: WHEN fnd_api.g_exc_unexpected_error THEN
257: ROLLBACK TO PROCESS_PERMIT;
258: x_return_status := FND_API.G_RET_STS_ERROR;
259: x_msg_count := EAM_ERROR_MESSAGE_PVT.Get_Message_Count;
260:
261: WHEN OTHERS THEN
262: ROLLBACK TO PROCESS_PERMIT;
263: x_return_status := FND_API.G_RET_STS_ERROR;

Line 281: , x_mesg_token_tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.MESG_TOKEN_TBL_TYPE

277: , p_work_permit_id IN NUMBER :=NULL
278: , p_organization_id IN NUMBER :=NULL
279: , p_work_permit_header_rec IN EAM_PROCESS_SAFETY_PUB.eam_wp_header_rec_type
280: , x_work_permit_header_rec OUT NOCOPY EAM_PROCESS_SAFETY_PUB.eam_wp_header_rec_type
281: , x_mesg_token_tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.MESG_TOKEN_TBL_TYPE
282: , x_return_status OUT NOCOPY VARCHAR2
283: )IS
284:
285: CURSOR C IS SELECT EAM_WORK_PERMIT_S.NEXTVAL FROM SYS.DUAL;

Line 287: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;

283: )IS
284:
285: CURSOR C IS SELECT EAM_WORK_PERMIT_S.NEXTVAL FROM SYS.DUAL;
286:
287: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
288: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
289: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
290: l_return_status VARCHAR2(1);
291:

Line 288: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

284:
285: CURSOR C IS SELECT EAM_WORK_PERMIT_S.NEXTVAL FROM SYS.DUAL;
286:
287: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
288: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
289: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
290: l_return_status VARCHAR2(1);
291:
292: l_permit_id NUMBER := p_work_permit_header_rec.PERMIT_ID;

Line 289: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

285: CURSOR C IS SELECT EAM_WORK_PERMIT_S.NEXTVAL FROM SYS.DUAL;
286:
287: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
288: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
289: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
290: l_return_status VARCHAR2(1);
291:
292: l_permit_id NUMBER := p_work_permit_header_rec.PERMIT_ID;
293: l_workflow_enabled VARCHAR2(1);

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 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 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 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 531: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

527: l_token_tbl(1).token_name := 'PERMIT_NAME';
528: l_token_tbl(1).token_value := p_work_permit_header_rec.PERMIT_NAME;
529:
530: l_out_mesg_token_tbl := l_mesg_token_tbl;
531: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
532: ( p_message_name => 'EAM_PERMIT_WRITE_ERROR'
533: , p_token_tbl => l_token_tbl
534: , p_mesg_token_tbl => l_mesg_token_tbl
535: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 548: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

544: l_token_tbl(1).token_name := 'PERMIT_NAME';
545: l_token_tbl(1).token_value := p_work_permit_header_rec.PERMIT_NAME;
546:
547: l_out_mesg_token_tbl := l_mesg_token_tbl;
548: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
549: ( p_message_name => 'EAM_PERMIT_TRANSACTION_ERROR'
550: , p_token_tbl => l_token_tbl
551: , p_mesg_token_tbl => l_mesg_token_tbl
552: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 565: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

561: l_token_tbl(1).token_name := 'PERMIT_NAME';
562: l_token_tbl(1).token_value := p_work_permit_header_rec.PERMIT_NAME;
563:
564: l_out_mesg_token_tbl := l_mesg_token_tbl;
565: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
566: ( p_message_name => 'EAM_PERMIT_EXISTENCE_ERROR'
567: , p_token_tbl => l_token_tbl
568: , p_mesg_token_tbl => l_mesg_token_tbl
569: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 581: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

577: l_token_tbl(1).token_name := 'PERMIT_NAME';
578: l_token_tbl(1).token_value := p_work_permit_header_rec.PERMIT_NAME;
579:
580: l_out_mesg_token_tbl := l_mesg_token_tbl;
581: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
582: ( p_message_name => 'EAM_PERMIT_REQUIRED_ERROR'
583: , p_token_tbl => l_token_tbl
584: , p_mesg_token_tbl => l_mesg_token_tbl
585: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 597: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

593: l_token_tbl(1).token_name := 'PERMIT_NAME';
594: l_token_tbl(1).token_value := p_work_permit_header_rec.PERMIT_NAME;
595:
596: l_out_mesg_token_tbl := l_mesg_token_tbl;
597: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
598: ( p_message_name => 'EAM_PERMIT_ATTRIBUTE_ERROR'
599: , p_token_tbl => l_token_tbl
600: , p_mesg_token_tbl => l_mesg_token_tbl
601: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 613: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

609: l_token_tbl(1).token_name := 'PERMIT_NAME';
610: l_token_tbl(1).token_value := p_work_permit_header_rec.PERMIT_NAME;
611:
612: l_out_mesg_token_tbl := l_mesg_token_tbl;
613: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
614: ( p_message_name => 'EAM_PERMIT_STATUS_CNG_ERROR'
615: , p_token_tbl => l_token_tbl
616: , p_mesg_token_tbl => l_mesg_token_tbl
617: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 628: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

624: WHEN OTHERS THEN
625: l_token_tbl(1).token_name := 'PERMIT_NAME';
626: l_token_tbl(1).token_value := p_work_permit_header_rec.PERMIT_NAME;
627: l_out_mesg_token_tbl := l_mesg_token_tbl;
628: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
629: ( p_message_name => 'EAM_PERMIT_UNEXPECTED_ERROR'
630: , p_token_tbl => l_token_tbl
631: , p_mesg_token_tbl => l_mesg_token_tbl
632: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 654: , x_mesg_token_tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.MESG_TOKEN_TBL_TYPE

650: , p_organization_id IN NUMBER
651: , p_permit_wo_association_tbl IN EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_rec_type
652: , p_work_permit_id IN NUMBER
653: , x_permit_wo_association_tbl OUT NOCOPY EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_rec_type
654: , x_mesg_token_tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.MESG_TOKEN_TBL_TYPE
655: , x_return_status OUT NOCOPY VARCHAR2
656: )IS
657: CURSOR C IS SELECT EAM_SAFETY_ASSOCIATIONS_S.NEXTVAL FROM SYS.DUAL;
658: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;

Line 658: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;

654: , x_mesg_token_tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.MESG_TOKEN_TBL_TYPE
655: , x_return_status OUT NOCOPY VARCHAR2
656: )IS
657: CURSOR C IS SELECT EAM_SAFETY_ASSOCIATIONS_S.NEXTVAL FROM SYS.DUAL;
658: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
659: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
660: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
661: l_return_status VARCHAR2(1);
662: l_safety_assoc_rec EAM_PROCESS_SAFETY_PUB.eam_wp_association_rec_type;

Line 659: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

655: , x_return_status OUT NOCOPY VARCHAR2
656: )IS
657: CURSOR C IS SELECT EAM_SAFETY_ASSOCIATIONS_S.NEXTVAL FROM SYS.DUAL;
658: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
659: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
660: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
661: l_return_status VARCHAR2(1);
662: l_safety_assoc_rec EAM_PROCESS_SAFETY_PUB.eam_wp_association_rec_type;
663: l_permit_status NUMBER;

Line 660: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

656: )IS
657: CURSOR C IS SELECT EAM_SAFETY_ASSOCIATIONS_S.NEXTVAL FROM SYS.DUAL;
658: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
659: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
660: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
661: l_return_status VARCHAR2(1);
662: l_safety_assoc_rec EAM_PROCESS_SAFETY_PUB.eam_wp_association_rec_type;
663: l_permit_status NUMBER;
664: l_wo_status NUMBER;

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 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 758: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

754: --l_token_tbl(1).token_name := 'Status type';
755: --l_token_tbl(1).token_value := p_eam_wo_rec.status_type;
756:
757: l_out_mesg_token_tbl := l_mesg_token_tbl;
758: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
759: ( p_message_name => 'EAM_PERMIT_WO_STATUS_TYPE'
760: , p_token_tbl => l_token_tbl
761: , p_mesg_token_tbl => l_mesg_token_tbl
762: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 775: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

771: -- l_token_tbl(1).token_name := 'Object Type';
772: -- l_token_tbl(1).token_value := p_eam_wo_rec.maintenance_object_type;
773:
774: l_out_mesg_token_tbl := l_mesg_token_tbl;
775: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
776: ( p_message_name => 'EAM_PERMIT_ASSO_ERROR'
777: , p_token_tbl => l_token_tbl
778: , p_mesg_token_tbl => l_mesg_token_tbl
779: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 793: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

789: -- l_token_tbl(1).token_name := 'Organization Id';
790: -- l_token_tbl(1).token_value := p_eam_wo_rec.organization_id;
791:
792: l_out_mesg_token_tbl := l_mesg_token_tbl;
793: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
794: ( p_message_name => 'EAM_PERMIT_WO_NOT_EXIST'
795: , p_token_tbl => l_token_tbl
796: , p_mesg_token_tbl => l_mesg_token_tbl
797: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 819: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

815: /* l_token_tbl(1).token_name := 'WORKORDER';
816: l_token_tbl(1).token_value := l_eam_wo_rec.wip_entity_id;
817:
818: l_out_mesg_token_tbl := l_mesg_token_tbl;
819: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
820: ( x_Mesg_token_tbl => l_out_Mesg_Token_Tbl
821: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
822: , p_message_name => 'EAM_POPULATE_REL_ERR'
823: , p_token_tbl => l_token_tbl

Line 847: , x_mesg_token_tbl IN OUT NOCOPY EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type

843: , p_approval_required IN BOOLEAN
844: , p_new_system_status IN NUMBER
845: , p_workflow_name IN VARCHAR2
846: , p_workflow_process IN VARCHAR2
847: , x_mesg_token_tbl IN OUT NOCOPY EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type
848: , x_return_status IN OUT NOCOPY VARCHAR2
849: ) IS
850:
851: l_status_pending_event VARCHAR2(240);

Line 974: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type ;

970: l_work_permit_header_rec EAM_PROCESS_SAFETY_PUB.eam_wp_header_rec_type;
971: l_out_work_permit_header_rec EAM_PROCESS_SAFETY_PUB.eam_wp_header_rec_type;
972:
973: /* Error Handling Variables */
974: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type ;
975: l_error_level NUMBER :=EAM_ERROR_MESSAGE_PVT.G_BO_LEVEL;
976: l_entity_index NUMBER :=1;
977:
978: BEGIN

Line 975: l_error_level NUMBER :=EAM_ERROR_MESSAGE_PVT.G_BO_LEVEL;

971: l_out_work_permit_header_rec EAM_PROCESS_SAFETY_PUB.eam_wp_header_rec_type;
972:
973: /* Error Handling Variables */
974: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type ;
975: l_error_level NUMBER :=EAM_ERROR_MESSAGE_PVT.G_BO_LEVEL;
976: l_entity_index NUMBER :=1;
977:
978: BEGIN
979:

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 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

Line 1064: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages

1060:
1061:
1062: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
1063: THEN
1064: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages
1065: ( p_mesg_token_Tbl => l_out_Mesg_Token_Tbl
1066: , p_error_level => l_error_level
1067: , p_entity_index => l_entity_index
1068: );

Line 1076: x_msg_count := EAM_ERROR_MESSAGE_PVT.Get_Message_Count;

1072: EXCEPTION
1073: WHEN fnd_api.g_exc_unexpected_error THEN
1074: ROLLBACK TO COPY_PERMIT;
1075: x_return_status := FND_API.G_RET_STS_ERROR;
1076: x_msg_count := EAM_ERROR_MESSAGE_PVT.Get_Message_Count;
1077: WHEN OTHERS THEN
1078: ROLLBACK TO COPY_PERMIT;
1079: x_return_status := FND_API.G_RET_STS_ERROR;
1080: