DBA Data[Home] [Help]

APPS.EAM_PROCESS_ISOLATION_PVT dependencies on EAM_ERROR_MESSAGE_PVT

Line 34: , x_Mesg_Token_Tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type

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

Line 37: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type ;

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

Line 38: l_mesg_token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

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

Line 39: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type ;

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

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

95: l_isolated_asset_tbl EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type;
96: l_safety_assoc_rec EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_rec_type;
97:
98: /* Error Handling Variables */
99: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type ;
100: l_error_level NUMBER :=EAM_ERROR_MESSAGE_PVT.G_BO_LEVEL;
101: l_entity_index NUMBER :=1;
102: l_mesg_token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
103: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type ;

Line 100: l_error_level NUMBER :=EAM_ERROR_MESSAGE_PVT.G_BO_LEVEL;

96: l_safety_assoc_rec EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_rec_type;
97:
98: /* Error Handling Variables */
99: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type ;
100: l_error_level NUMBER :=EAM_ERROR_MESSAGE_PVT.G_BO_LEVEL;
101: l_entity_index NUMBER :=1;
102: l_mesg_token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
103: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type ;
104: l_other_message VARCHAR2(2000);

Line 102: l_mesg_token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

98: /* Error Handling Variables */
99: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type ;
100: l_error_level NUMBER :=EAM_ERROR_MESSAGE_PVT.G_BO_LEVEL;
101: l_entity_index NUMBER :=1;
102: l_mesg_token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
103: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type ;
104: l_other_message VARCHAR2(2000);
105: l_err_text VARCHAR2(2000);
106:

Line 103: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type ;

99: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type ;
100: l_error_level NUMBER :=EAM_ERROR_MESSAGE_PVT.G_BO_LEVEL;
101: l_entity_index NUMBER :=1;
102: l_mesg_token_tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
103: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type ;
104: l_other_message VARCHAR2(2000);
105: l_err_text VARCHAR2(2000);
106:
107:

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

128: );
129:
130: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
131: THEN
132: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages
133: ( p_mesg_token_Tbl => l_out_Mesg_Token_Tbl
134: , p_error_level => l_error_level
135: , p_entity_index => l_entity_index
136: );

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

150: );
151:
152: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
153: THEN
154: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages
155: ( p_mesg_token_Tbl => l_out_Mesg_Token_Tbl
156: , p_error_level => l_error_level
157: , p_entity_index => l_entity_index
158: );

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

175: );
176:
177: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
178: THEN
179: EAM_ERROR_MESSAGE_PVT.Translate_And_Insert_Messages
180: ( p_mesg_token_Tbl => l_out_Mesg_Token_Tbl
181: , p_error_level => l_error_level
182: , p_entity_index => l_entity_index
183: );

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

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

Line 232: x_msg_count := EAM_ERROR_MESSAGE_PVT.Get_Message_Count;

228:
229: WHEN fnd_api.g_exc_unexpected_error THEN
230: ROLLBACK TO PROCESS_ISOLATION;
231: x_return_status := FND_API.G_RET_STS_ERROR;
232: x_msg_count := EAM_ERROR_MESSAGE_PVT.Get_Message_Count;
233:
234: WHEN OTHERS THEN
235: ROLLBACK TO PROCESS_ISOLATION;
236: x_return_status := FND_API.G_RET_STS_ERROR;

Line 254: , x_mesg_token_tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.MESG_TOKEN_TBL_TYPE

250: , p_isolation_id IN NUMBER :=NULL
251: , p_organization_id IN NUMBER :=NULL
252: , p_iso_header_rec IN EAM_PROCESS_SAFETY_PUB.eam_iso_header_rec_type
253: , x_iso_header_rec OUT NOCOPY EAM_PROCESS_SAFETY_PUB.eam_iso_header_rec_type
254: , x_mesg_token_tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.MESG_TOKEN_TBL_TYPE
255: , x_return_status OUT NOCOPY VARCHAR2
256: )IS
257:
258: CURSOR C IS SELECT EAM_ISOLATIONS_S.NEXTVAL FROM SYS.DUAL;

Line 260: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;

256: )IS
257:
258: CURSOR C IS SELECT EAM_ISOLATIONS_S.NEXTVAL FROM SYS.DUAL;
259:
260: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
261: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
262: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
263: l_return_status VARCHAR2(1);
264:

Line 261: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

257:
258: CURSOR C IS SELECT EAM_ISOLATIONS_S.NEXTVAL FROM SYS.DUAL;
259:
260: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
261: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
262: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
263: l_return_status VARCHAR2(1);
264:
265: l_isolation_id NUMBER := p_iso_header_rec.isolation_id;

Line 262: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

258: CURSOR C IS SELECT EAM_ISOLATIONS_S.NEXTVAL FROM SYS.DUAL;
259:
260: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
261: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
262: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
263: l_return_status VARCHAR2(1);
264:
265: l_isolation_id NUMBER := p_iso_header_rec.isolation_id;
266: l_workflow_enabled VARCHAR2(1);

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

507: l_token_tbl(1).token_name := 'SAFETY_NAME';
508: l_token_tbl(1).token_value := l_iso_header_rec.ISOLATION_NAME;
509:
510: l_out_mesg_token_tbl := l_mesg_token_tbl;
511: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
512: ( p_message_name => 'EAM_SAFETY_WRITE_ERROR'
513: , p_token_tbl => l_token_tbl
514: , p_mesg_token_tbl => l_mesg_token_tbl
515: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 528: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

524: l_token_tbl(1).token_name := 'SAFETY_NAME';
525: l_token_tbl(1).token_value := l_iso_header_rec.ISOLATION_NAME;
526:
527: l_out_mesg_token_tbl := l_mesg_token_tbl;
528: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
529: ( p_message_name => 'EAM_SAFETY_TRANSACTION_ERROR'
530: , p_token_tbl => l_token_tbl
531: , p_mesg_token_tbl => l_mesg_token_tbl
532: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 545: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

541: l_token_tbl(1).token_name := 'SAFETY_NAME';
542: l_token_tbl(1).token_value := l_iso_header_rec.ISOLATION_NAME;
543:
544: l_out_mesg_token_tbl := l_mesg_token_tbl;
545: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
546: ( p_message_name => 'EAM_SAFETY_EXISTENCE_ERROR'
547: , p_token_tbl => l_token_tbl
548: , p_mesg_token_tbl => l_mesg_token_tbl
549: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 562: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

558: l_token_tbl(1).token_value := l_iso_header_rec.ISOLATION_NAME;
559:
560: ROLLBACK TO WORK_ISOLATION;
561: l_out_mesg_token_tbl := l_mesg_token_tbl;
562: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
563: ( p_message_name => 'EAM_SAFETY_REQUIRED_ERROR'
564: , p_token_tbl => l_token_tbl
565: , p_mesg_token_tbl => l_mesg_token_tbl
566: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 579: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

575: l_token_tbl(1).token_name := 'SAFETY_NAME';
576: l_token_tbl(1).token_value := l_iso_header_rec.ISOLATION_NAME;
577:
578: l_out_mesg_token_tbl := l_mesg_token_tbl;
579: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
580: ( p_message_name => 'EAM_SAFETY_ATTRIBUTE_ERROR'
581: , p_token_tbl => l_token_tbl
582: , p_mesg_token_tbl => l_mesg_token_tbl
583: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 595: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

591: l_token_tbl(1).token_name := 'SAFETY_NAME';
592: l_token_tbl(1).token_value := l_iso_header_rec.ISOLATION_NAME;
593:
594: l_out_mesg_token_tbl := l_mesg_token_tbl;
595: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
596: ( p_message_name => 'EAM_SAFETY_STATUS_CNG_ERROR'
597: , p_token_tbl => l_token_tbl
598: , p_mesg_token_tbl => l_mesg_token_tbl
599: , 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 := 'SAFETY_NAME';
610: l_token_tbl(1).token_value := l_iso_header_rec.ISOLATION_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_SAFETY_UNEXPECTED_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 637: , x_mesg_token_tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.MESG_TOKEN_TBL_TYPE

633: ( p_organization_id IN NUMBER
634: , p_establish_iso_tbl IN EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type
635: , p_safety_source_id IN NUMBER
636: , x_establish_iso_tbl OUT NOCOPY EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type
637: , x_mesg_token_tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.MESG_TOKEN_TBL_TYPE
638: , x_return_status OUT NOCOPY VARCHAR2
639: ) IS
640:
641: CURSOR C2 IS SELECT EAM_ESTABLISHMENT_DETAILS_S.NEXTVAL FROM SYS.DUAL;

Line 643: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;

639: ) IS
640:
641: CURSOR C2 IS SELECT EAM_ESTABLISHMENT_DETAILS_S.NEXTVAL FROM SYS.DUAL;
642:
643: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
644: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
645: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
646:
647: l_return_status VARCHAR2(1);

Line 644: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

640:
641: CURSOR C2 IS SELECT EAM_ESTABLISHMENT_DETAILS_S.NEXTVAL FROM SYS.DUAL;
642:
643: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
644: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
645: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
646:
647: l_return_status VARCHAR2(1);
648: L_count Number;

Line 645: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;

641: CURSOR C2 IS SELECT EAM_ESTABLISHMENT_DETAILS_S.NEXTVAL FROM SYS.DUAL;
642:
643: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type;
644: l_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
645: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type;
646:
647: l_return_status VARCHAR2(1);
648: L_count Number;
649: l_temp NUMBER;

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

Line 774: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

770: WHEN SAF_ASSET_EXISTENCE_ERROR THEN
771: ROLLBACK TO ESTABLISHMENT;
772:
773: l_out_mesg_token_tbl := l_mesg_token_tbl;
774: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
775: ( p_message_name => 'SAF_ASSET_EXISTENCE_ERROR'
776: , p_token_tbl => l_token_tbl
777: , p_mesg_token_tbl => l_mesg_token_tbl
778: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 788: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

784: WHEN l_estab_required_error THEN
785: ROLLBACK TO ESTABLISHMENT;
786:
787: l_out_mesg_token_tbl := l_mesg_token_tbl;
788: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
789: ( p_message_name => 'l_estab_required_error'
790: , p_token_tbl => l_token_tbl
791: , p_mesg_token_tbl => l_mesg_token_tbl
792: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 802: EAM_ERROR_MESSAGE_PVT.Add_Error_Token

798: WHEN ISO_ESTABLISH_ERROR THEN
799: ROLLBACK TO ESTABLISHMENT;
800:
801: l_out_mesg_token_tbl := l_mesg_token_tbl;
802: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
803: ( p_message_name => 'ISO_ESTABLISH_ERROR'
804: , p_token_tbl => l_token_tbl
805: , p_mesg_token_tbl => l_mesg_token_tbl
806: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 818: Eam_error_message_pvt.Add_error_token

814: L_token_tbl(1).Token_name := 'SEQ_NUMBER';
815: L_TOKEN_TBL(1).TOKEN_VALUE := L_ESTABLISH_ISO_REC.SEQUENCE_NUMBER;
816:
817: l_out_mesg_token_tbl := l_mesg_token_tbl;
818: Eam_error_message_pvt.Add_error_token
819: ( p_message_name => 'EAM_SAF_ESTAB_SEQ_DUPLICATE'
820: , p_token_tbl => l_token_tbl
821: , p_mesg_token_tbl => l_mesg_token_tbl
822: , x_mesg_token_tbl => l_out_mesg_token_tbl

Line 849: , x_mesg_token_tbl IN OUT NOCOPY EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type

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