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.ENG_ATTACHMENT_IMPLEMENTATION dependencies on FND_API

Line 156: x_return_status := FND_API.G_RET_STS_SUCCESS;

152:
153:
154: BEGIN
155: -- Initialize API return status to success
156: x_return_status := FND_API.G_RET_STS_SUCCESS;
157:
158: l_fnd_user_id :=TO_NUMBER(FND_PROFILE.VALUE('USER_ID'));
159: l_fnd_login_id :=TO_NUMBER(FND_PROFILE.VALUE('LOGIN_ID'));
160:

Line 189: x_return_status := FND_API.G_RET_STS_ERROR;

185: CLOSE C;
186:
187: EXCEPTION
188: WHEN OTHERS THEN
189: x_return_status := FND_API.G_RET_STS_ERROR;
190:
191: END Cancel_Review_Approval;
192:
193:

Line 197: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --

193:
194: Procedure Update_Attachment_Status
195: (
196: p_api_version IN NUMBER --
197: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
198: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
199: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
200: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
201: ,p_output_dir IN VARCHAR2 := NULL --

Line 198: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --

194: Procedure Update_Attachment_Status
195: (
196: p_api_version IN NUMBER --
197: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
198: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
199: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
200: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
201: ,p_output_dir IN VARCHAR2 := NULL --
202: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Update_Attachment_Status.log'

Line 199: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

195: (
196: p_api_version IN NUMBER --
197: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
198: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
199: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
200: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
201: ,p_output_dir IN VARCHAR2 := NULL --
202: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Update_Attachment_Status.log'
203: ,x_return_status OUT NOCOPY VARCHAR2 --

Line 200: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --

196: p_api_version IN NUMBER --
197: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
198: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
199: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
200: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
201: ,p_output_dir IN VARCHAR2 := NULL --
202: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Update_Attachment_Status.log'
203: ,x_return_status OUT NOCOPY VARCHAR2 --
204: ,x_msg_count OUT NOCOPY NUMBER --

Line 252: IF NOT FND_API.Compatible_API_Call ( l_api_version

248: -- commit;
249:
250: -- following temp code to test the debug messages
251: -- Standard call to check for call compatibility
252: IF NOT FND_API.Compatible_API_Call ( l_api_version
253: ,p_api_version
254: ,l_api_name
255: ,G_PKG_NAME )
256: THEN

Line 257: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

253: ,p_api_version
254: ,l_api_name
255: ,G_PKG_NAME )
256: THEN
257: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
258: END IF;
259: -- Initialize message list if p_init_msg_list is set to TRUE.
260: IF FND_API.to_Boolean( p_init_msg_list ) THEN
261: FND_MSG_PUB.initialize;

Line 260: IF FND_API.to_Boolean( p_init_msg_list ) THEN

256: THEN
257: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
258: END IF;
259: -- Initialize message list if p_init_msg_list is set to TRUE.
260: IF FND_API.to_Boolean( p_init_msg_list ) THEN
261: FND_MSG_PUB.initialize;
262: END IF ;
263: -- For Test/Debug
264: IF FND_API.to_Boolean( p_debug ) THEN

Line 264: IF FND_API.to_Boolean( p_debug ) THEN

260: IF FND_API.to_Boolean( p_init_msg_list ) THEN
261: FND_MSG_PUB.initialize;
262: END IF ;
263: -- For Test/Debug
264: IF FND_API.to_Boolean( p_debug ) THEN
265: Open_Debug_Session(p_output_dir, p_debug_filename ) ;
266: END IF ;
267:
268: -- insert into swarb values(0, 'FND_USER', to_char(l_fnd_user_id));

Line 281: x_return_status := FND_API.G_RET_STS_SUCCESS;

277: Write_Debug('-----------------------------------------------------');
278: Write_Debug('Initializing return status... ' );
279: END IF ;
280: -- Initialize API return status to success
281: x_return_status := FND_API.G_RET_STS_SUCCESS;
282:
283:
284: -- Real code starts here -----------------------------------
285: -- FND_PROFILE package is not available for workflow (WF),

Line 427: WHEN FND_API.G_EXC_ERROR THEN

423: Close_Debug_Session ;
424: END IF ;
425:
426: EXCEPTION
427: WHEN FND_API.G_EXC_ERROR THEN
428: ROLLBACK TO Update_Attachment_Status;
429: x_return_status := FND_API.G_RET_STS_ERROR;
430: FND_MSG_PUB.Count_And_Get
431: ( p_count => x_msg_count

Line 429: x_return_status := FND_API.G_RET_STS_ERROR;

425:
426: EXCEPTION
427: WHEN FND_API.G_EXC_ERROR THEN
428: ROLLBACK TO Update_Attachment_Status;
429: x_return_status := FND_API.G_RET_STS_ERROR;
430: FND_MSG_PUB.Count_And_Get
431: ( p_count => x_msg_count
432: ,p_data => x_msg_data );
433: IF g_debug_flag THEN

Line 438: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

434: Write_Debug('Msg Data' || x_msg_data);
435: Write_Debug('Rollback and Finish with expected error.') ;
436: Close_Debug_Session ;
437: END IF ;
438: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
439: ROLLBACK TO Update_Attachment_Status;
440: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
441: FND_MSG_PUB.Count_And_Get
442: ( p_count => x_msg_count

Line 440: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

436: Close_Debug_Session ;
437: END IF ;
438: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
439: ROLLBACK TO Update_Attachment_Status;
440: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
441: FND_MSG_PUB.Count_And_Get
442: ( p_count => x_msg_count
443: ,p_data => x_msg_data );
444: IF g_debug_flag THEN

Line 451: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

447: Close_Debug_Session ;
448: END IF ;
449: WHEN OTHERS THEN
450: ROLLBACK TO Update_Attachment_Status;
451: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
452: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
453: THEN
454: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME, l_api_name );
455: END IF;

Line 513: x_return_status := FND_API.G_RET_STS_SUCCESS;

509:
510: -- insert into swarb values(7.0, 'In project deliverable', to_char(p_change_id));
511: -- commit;
512:
513: x_return_status := FND_API.G_RET_STS_SUCCESS;
514:
515: -- Cursor to get project and task based on the change_id
516: OPEN c_get_change_project_info;
517: FETCH c_get_change_project_info into l_project_id, l_task_id, l_org_id;

Line 698: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

694: END IF; -- if base change mgmt type code is attachment approval
695:
696: EXCEPTION
697: WHEN OTHERS THEN
698: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
699: Write_Debug('Msg Data' || x_msg_data);
700:
701: END Project_Deliverable_Tracking;
702:

Line 709: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --

705:
706: Procedure Implement_Attachment_Change
707: (
708: p_api_version IN NUMBER --
709: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
710: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
711: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
712: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
713: ,p_output_dir IN VARCHAR2 := NULL --

Line 710: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --

706: Procedure Implement_Attachment_Change
707: (
708: p_api_version IN NUMBER --
709: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
710: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
711: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
712: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
713: ,p_output_dir IN VARCHAR2 := NULL --
714: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Implement_Attachment_Change.log'

Line 711: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

707: (
708: p_api_version IN NUMBER --
709: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
710: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
711: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
712: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
713: ,p_output_dir IN VARCHAR2 := NULL --
714: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Implement_Attachment_Change.log'
715: ,x_return_status OUT NOCOPY VARCHAR2 --

Line 712: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --

708: p_api_version IN NUMBER --
709: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
710: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
711: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
712: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
713: ,p_output_dir IN VARCHAR2 := NULL --
714: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Implement_Attachment_Change.log'
715: ,x_return_status OUT NOCOPY VARCHAR2 --
716: ,x_msg_count OUT NOCOPY NUMBER --

Line 786: IF NOT FND_API.Compatible_API_Call ( l_api_version

782: -- Standard Start of API savepoint
783: SAVEPOINT Implement_Attachment_Change;
784:
785: -- Standard call to check for call compatibility
786: IF NOT FND_API.Compatible_API_Call ( l_api_version
787: ,p_api_version
788: ,l_api_name
789: ,G_PKG_NAME )
790: THEN

Line 791: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

787: ,p_api_version
788: ,l_api_name
789: ,G_PKG_NAME )
790: THEN
791: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
792: END IF;
793:
794: -- Initialize message list if p_init_msg_list is set to TRUE.
795: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 795: IF FND_API.to_Boolean( p_init_msg_list ) THEN

791: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
792: END IF;
793:
794: -- Initialize message list if p_init_msg_list is set to TRUE.
795: IF FND_API.to_Boolean( p_init_msg_list ) THEN
796: FND_MSG_PUB.initialize;
797: END IF ;
798: -- For Test/Debug
799: IF FND_API.to_Boolean( p_debug ) THEN

Line 799: IF FND_API.to_Boolean( p_debug ) THEN

795: IF FND_API.to_Boolean( p_init_msg_list ) THEN
796: FND_MSG_PUB.initialize;
797: END IF ;
798: -- For Test/Debug
799: IF FND_API.to_Boolean( p_debug ) THEN
800: Open_Debug_Session(p_output_dir, p_debug_filename ) ;
801: END IF ;
802:
803: -- Write debug message if debug mode is on

Line 813: x_return_status := FND_API.G_RET_STS_SUCCESS;

809: Write_Debug('-----------------------------------------------------');
810: Write_Debug('Initializing return status... ' );
811: END IF ;
812: -- Initialize API return status to success
813: x_return_status := FND_API.G_RET_STS_SUCCESS;
814:
815:
816: -- Real code starts here -----------------------------------------------
817:

Line 875: x_return_status := FND_API.G_RET_STS_ERROR;

871: l_message := 'ENG_DETACH_IMP_ERROR';
872: FND_MESSAGE.Set_Name('ENG', l_message);
873: FND_MESSAGE.Set_Token('FILE_NAME', l_file_name);
874: FND_MSG_PUB.Add;
875: x_return_status := FND_API.G_RET_STS_ERROR;
876: END IF;
877:
878:
879: IF l_action_type = 'ATTACH' THEN

Line 976: WHEN FND_API.G_EXC_ERROR THEN

972: Close_Debug_Session ;
973: END IF ;
974:
975: EXCEPTION
976: WHEN FND_API.G_EXC_ERROR THEN
977: ROLLBACK TO Implement_Attachment_Change;
978: x_return_status := FND_API.G_RET_STS_ERROR;
979: FND_MSG_PUB.Count_And_Get
980: ( p_count => x_msg_count

Line 978: x_return_status := FND_API.G_RET_STS_ERROR;

974:
975: EXCEPTION
976: WHEN FND_API.G_EXC_ERROR THEN
977: ROLLBACK TO Implement_Attachment_Change;
978: x_return_status := FND_API.G_RET_STS_ERROR;
979: FND_MSG_PUB.Count_And_Get
980: ( p_count => x_msg_count
981: ,p_data => x_msg_data );
982: IF g_debug_flag THEN

Line 986: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

982: IF g_debug_flag THEN
983: Write_Debug('Rollback and Finish with expected error.') ;
984: Close_Debug_Session ;
985: END IF ;
986: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
987: ROLLBACK TO Implement_Attachment_Change;
988: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
989: FND_MSG_PUB.Count_And_Get
990: ( p_count => x_msg_count

Line 988: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

984: Close_Debug_Session ;
985: END IF ;
986: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
987: ROLLBACK TO Implement_Attachment_Change;
988: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
989: FND_MSG_PUB.Count_And_Get
990: ( p_count => x_msg_count
991: ,p_data => x_msg_data );
992: IF g_debug_flag THEN

Line 998: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

994: Close_Debug_Session ;
995: END IF ;
996: WHEN OTHERS THEN
997: ROLLBACK TO Implement_Attachment_Change;
998: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
999: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1000: THEN
1001: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME, l_api_name );
1002: END IF;

Line 1017: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --

1013:
1014: -- This API is DEPRICATED. Please use DOM_ATTACHMENT_UTIL_PKG.copy_attachments
1015: Procedure Copy_Attachment (
1016: p_api_version IN NUMBER --
1017: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1018: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1019: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1020: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1021: ,p_output_dir IN VARCHAR2 := NULL --

Line 1018: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --

1014: -- This API is DEPRICATED. Please use DOM_ATTACHMENT_UTIL_PKG.copy_attachments
1015: Procedure Copy_Attachment (
1016: p_api_version IN NUMBER --
1017: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1018: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1019: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1020: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1021: ,p_output_dir IN VARCHAR2 := NULL --
1022: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Copy_Attachment.log'

Line 1019: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

1015: Procedure Copy_Attachment (
1016: p_api_version IN NUMBER --
1017: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1018: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1019: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1020: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1021: ,p_output_dir IN VARCHAR2 := NULL --
1022: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Copy_Attachment.log'
1023: ,x_return_status OUT NOCOPY VARCHAR2 --

Line 1020: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --

1016: p_api_version IN NUMBER --
1017: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1018: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1019: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1020: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1021: ,p_output_dir IN VARCHAR2 := NULL --
1022: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Copy_Attachment.log'
1023: ,x_return_status OUT NOCOPY VARCHAR2 --
1024: ,x_msg_count OUT NOCOPY NUMBER --

Line 1069: IF NOT FND_API.Compatible_API_Call ( l_api_version

1065: BEGIN
1066: -- Standard Start of API savepoint
1067: SAVEPOINT Copy_Attachment;
1068: -- Standard call to check for call compatibility
1069: IF NOT FND_API.Compatible_API_Call ( l_api_version
1070: ,p_api_version
1071: ,l_api_name
1072: ,G_PKG_NAME )
1073: THEN

Line 1074: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1070: ,p_api_version
1071: ,l_api_name
1072: ,G_PKG_NAME )
1073: THEN
1074: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1075: END IF;
1076: -- Initialize message list if p_init_msg_list is set to TRUE.
1077: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1078: FND_MSG_PUB.initialize;

Line 1077: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1073: THEN
1074: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1075: END IF;
1076: -- Initialize message list if p_init_msg_list is set to TRUE.
1077: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1078: FND_MSG_PUB.initialize;
1079: END IF ;
1080: -- For Test/Debug
1081: IF FND_API.to_Boolean( p_debug ) THEN

Line 1081: IF FND_API.to_Boolean( p_debug ) THEN

1077: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1078: FND_MSG_PUB.initialize;
1079: END IF ;
1080: -- For Test/Debug
1081: IF FND_API.to_Boolean( p_debug ) THEN
1082: Open_Debug_Session(p_output_dir, p_debug_filename ) ;
1083: END IF ;
1084:
1085: -- Write debug message if debug mode is on

Line 1101: x_return_status := FND_API.G_RET_STS_SUCCESS;

1097: Write_Debug('-----------------------------------------------------');
1098: Write_Debug('Initializing return status... ' );
1099: END IF ;
1100: -- Initialize API return status to success
1101: x_return_status := FND_API.G_RET_STS_SUCCESS;
1102: -- Real code starts here -----------------------------------------------
1103: l_fnd_user_id := fnd_global.user_id; -- -1; -- Bug 3700111
1104: l_fnd_login_id := fnd_global.login_id; -- ''; -- Bug 3700111
1105: select userenv('LANG') into l_language from dual;

Line 1174: WHEN FND_API.G_EXC_ERROR THEN

1170: Close_Debug_Session ;
1171: END IF ;
1172:
1173: EXCEPTION
1174: WHEN FND_API.G_EXC_ERROR THEN
1175: ROLLBACK TO Copy_Attachment;
1176: x_return_status := FND_API.G_RET_STS_ERROR;
1177: FND_MSG_PUB.Count_And_Get
1178: ( p_count => x_msg_count

Line 1176: x_return_status := FND_API.G_RET_STS_ERROR;

1172:
1173: EXCEPTION
1174: WHEN FND_API.G_EXC_ERROR THEN
1175: ROLLBACK TO Copy_Attachment;
1176: x_return_status := FND_API.G_RET_STS_ERROR;
1177: FND_MSG_PUB.Count_And_Get
1178: ( p_count => x_msg_count
1179: ,p_data => x_msg_data );
1180: IF g_debug_flag THEN

Line 1184: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1180: IF g_debug_flag THEN
1181: Write_Debug('Rollback and Finish with expected error.') ;
1182: Close_Debug_Session ;
1183: END IF ;
1184: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1185: ROLLBACK TO Copy_Attachment;
1186: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1187: FND_MSG_PUB.Count_And_Get
1188: ( p_count => x_msg_count

Line 1186: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1182: Close_Debug_Session ;
1183: END IF ;
1184: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1185: ROLLBACK TO Copy_Attachment;
1186: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1187: FND_MSG_PUB.Count_And_Get
1188: ( p_count => x_msg_count
1189: ,p_data => x_msg_data );
1190: IF g_debug_flag THEN

Line 1196: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1192: Close_Debug_Session ;
1193: END IF ;
1194: WHEN OTHERS THEN
1195: ROLLBACK TO Copy_Attachment;
1196: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1197: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1198: THEN
1199: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME, l_api_name );
1200: END IF;

Line 1263: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --

1259:
1260: Procedure Complete_Attachment_Approval
1261: (
1262: p_api_version IN NUMBER --
1263: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1264: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1265: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1266: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1267: ,p_output_dir IN VARCHAR2 := NULL --

Line 1264: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --

1260: Procedure Complete_Attachment_Approval
1261: (
1262: p_api_version IN NUMBER --
1263: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1264: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1265: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1266: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1267: ,p_output_dir IN VARCHAR2 := NULL --
1268: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Complete_Attachment_Approval.log'

Line 1265: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

1261: (
1262: p_api_version IN NUMBER --
1263: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1264: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1265: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1266: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1267: ,p_output_dir IN VARCHAR2 := NULL --
1268: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Complete_Attachment_Approval.log'
1269: ,x_return_status OUT NOCOPY VARCHAR2 --

Line 1266: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --

1262: p_api_version IN NUMBER --
1263: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1264: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1265: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1266: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1267: ,p_output_dir IN VARCHAR2 := NULL --
1268: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Complete_Attachment_Approval.log'
1269: ,x_return_status OUT NOCOPY VARCHAR2 --
1270: ,x_msg_count OUT NOCOPY NUMBER --

Line 1293: IF NOT FND_API.Compatible_API_Call ( l_api_version

1289: BEGIN
1290: -- Standard Start of API savepoint
1291: SAVEPOINT Complete_Attachment_Approval;
1292: -- Standard call to check for call compatibility
1293: IF NOT FND_API.Compatible_API_Call ( l_api_version
1294: ,p_api_version
1295: ,l_api_name
1296: ,G_PKG_NAME )
1297: THEN

Line 1298: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1294: ,p_api_version
1295: ,l_api_name
1296: ,G_PKG_NAME )
1297: THEN
1298: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1299: END IF;
1300: -- Initialize message list if p_init_msg_list is set to TRUE.
1301: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1302: FND_MSG_PUB.initialize;

Line 1301: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1297: THEN
1298: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1299: END IF;
1300: -- Initialize message list if p_init_msg_list is set to TRUE.
1301: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1302: FND_MSG_PUB.initialize;
1303: END IF ;
1304: -- For Test/Debug
1305: IF FND_API.to_Boolean( p_debug ) THEN

Line 1305: IF FND_API.to_Boolean( p_debug ) THEN

1301: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1302: FND_MSG_PUB.initialize;
1303: END IF ;
1304: -- For Test/Debug
1305: IF FND_API.to_Boolean( p_debug ) THEN
1306: Open_Debug_Session(p_output_dir, p_debug_filename ) ;
1307: END IF ;
1308:
1309: -- Write debug message if debug mode is on

Line 1319: x_return_status := FND_API.G_RET_STS_SUCCESS;

1315: Write_Debug('-----------------------------------------------------');
1316: Write_Debug('Initializing return status... ' );
1317: END IF ;
1318: -- Initialize API return status to success
1319: x_return_status := FND_API.G_RET_STS_SUCCESS;
1320:
1321:
1322: -- Real code starts here -----------------------------------
1323: -- FND_PROFILE package is not available for workflow (WF),

Line 1352: WHEN FND_API.G_EXC_ERROR THEN

1348: Close_Debug_Session ;
1349: END IF ;
1350:
1351: EXCEPTION
1352: WHEN FND_API.G_EXC_ERROR THEN
1353: ROLLBACK TO Complete_Attachment_Approval;
1354: x_return_status := FND_API.G_RET_STS_ERROR;
1355: FND_MSG_PUB.Count_And_Get
1356: ( p_count => x_msg_count

Line 1354: x_return_status := FND_API.G_RET_STS_ERROR;

1350:
1351: EXCEPTION
1352: WHEN FND_API.G_EXC_ERROR THEN
1353: ROLLBACK TO Complete_Attachment_Approval;
1354: x_return_status := FND_API.G_RET_STS_ERROR;
1355: FND_MSG_PUB.Count_And_Get
1356: ( p_count => x_msg_count
1357: ,p_data => x_msg_data );
1358: IF g_debug_flag THEN

Line 1362: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1358: IF g_debug_flag THEN
1359: Write_Debug('Rollback and Finish with expected error.') ;
1360: Close_Debug_Session ;
1361: END IF ;
1362: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1363: ROLLBACK TO Complete_Attachment_Approval;
1364: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1365: FND_MSG_PUB.Count_And_Get
1366: ( p_count => x_msg_count

Line 1364: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1360: Close_Debug_Session ;
1361: END IF ;
1362: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1363: ROLLBACK TO Complete_Attachment_Approval;
1364: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1365: FND_MSG_PUB.Count_And_Get
1366: ( p_count => x_msg_count
1367: ,p_data => x_msg_data );
1368: IF g_debug_flag THEN

Line 1374: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1370: Close_Debug_Session ;
1371: END IF ;
1372: WHEN OTHERS THEN
1373: ROLLBACK TO Complete_Attachment_Approval;
1374: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1375: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1376: THEN
1377: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME, l_api_name );
1378: END IF;

Line 1391: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --

1387: END Complete_Attachment_Approval;
1388:
1389: Procedure Copy_Attachments_And_Changes (
1390: p_api_version IN NUMBER --
1391: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1392: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1393: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1394: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1395: ,p_output_dir IN VARCHAR2 := NULL --

Line 1392: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --

1388:
1389: Procedure Copy_Attachments_And_Changes (
1390: p_api_version IN NUMBER --
1391: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1392: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1393: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1394: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1395: ,p_output_dir IN VARCHAR2 := NULL --
1396: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Copy_Attachments_And_Changes.log'

Line 1393: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

1389: Procedure Copy_Attachments_And_Changes (
1390: p_api_version IN NUMBER --
1391: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1392: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1393: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1394: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1395: ,p_output_dir IN VARCHAR2 := NULL --
1396: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Copy_Attachments_And_Changes.log'
1397: ,x_return_status OUT NOCOPY VARCHAR2 --

Line 1394: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --

1390: p_api_version IN NUMBER --
1391: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1392: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1393: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1394: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1395: ,p_output_dir IN VARCHAR2 := NULL --
1396: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Copy_Attachments_And_Changes.log'
1397: ,x_return_status OUT NOCOPY VARCHAR2 --
1398: ,x_msg_count OUT NOCOPY NUMBER --

Line 1431: IF NOT FND_API.Compatible_API_Call ( l_api_version

1427: BEGIN
1428: -- Standard Start of API savepoint
1429: SAVEPOINT Copy_Attachments_And_Changes;
1430: -- Standard call to check for call compatibility
1431: IF NOT FND_API.Compatible_API_Call ( l_api_version
1432: ,p_api_version
1433: ,l_api_name
1434: ,G_PKG_NAME )
1435: THEN

Line 1436: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1432: ,p_api_version
1433: ,l_api_name
1434: ,G_PKG_NAME )
1435: THEN
1436: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1437: END IF;
1438: -- Initialize message list if p_init_msg_list is set to TRUE.
1439: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1440: FND_MSG_PUB.initialize;

Line 1439: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1435: THEN
1436: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1437: END IF;
1438: -- Initialize message list if p_init_msg_list is set to TRUE.
1439: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1440: FND_MSG_PUB.initialize;
1441: END IF ;
1442: -- For Test/Debug
1443: IF FND_API.to_Boolean( p_debug ) THEN

Line 1443: IF FND_API.to_Boolean( p_debug ) THEN

1439: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1440: FND_MSG_PUB.initialize;
1441: END IF ;
1442: -- For Test/Debug
1443: IF FND_API.to_Boolean( p_debug ) THEN
1444: Open_Debug_Session(p_output_dir, p_debug_filename ) ;
1445: END IF ;
1446:
1447: -- Write debug message if debug mode is on

Line 1461: x_return_status := FND_API.G_RET_STS_SUCCESS;

1457: Write_Debug('-----------------------------------------------------');
1458: Write_Debug('Initializing return status... ' );
1459: END IF ;
1460: -- Initialize API return status to success
1461: x_return_status := FND_API.G_RET_STS_SUCCESS;
1462:
1463: -- Real code starts here -----------------------------------------------
1464:
1465: -- Copying attachment

Line 1533: IF FND_API.To_Boolean( p_commit ) THEN

1529: end loop;
1530: close C;
1531:
1532: -- Standard check of p_commit.
1533: IF FND_API.To_Boolean( p_commit ) THEN
1534: IF g_debug_flag THEN
1535: Write_Debug('Do Commit.') ;
1536: END IF ;
1537: COMMIT WORK;

Line 1550: WHEN FND_API.G_EXC_ERROR THEN

1546: Close_Debug_Session ;
1547: END IF ;
1548:
1549: EXCEPTION
1550: WHEN FND_API.G_EXC_ERROR THEN
1551: ROLLBACK TO Copy_Attachments_And_Changes;
1552: x_return_status := FND_API.G_RET_STS_ERROR;
1553: FND_MSG_PUB.Count_And_Get
1554: ( p_count => x_msg_count

Line 1552: x_return_status := FND_API.G_RET_STS_ERROR;

1548:
1549: EXCEPTION
1550: WHEN FND_API.G_EXC_ERROR THEN
1551: ROLLBACK TO Copy_Attachments_And_Changes;
1552: x_return_status := FND_API.G_RET_STS_ERROR;
1553: FND_MSG_PUB.Count_And_Get
1554: ( p_count => x_msg_count
1555: ,p_data => x_msg_data );
1556: IF g_debug_flag THEN

Line 1560: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1556: IF g_debug_flag THEN
1557: Write_Debug('Rollback and Finish with expected error.') ;
1558: Close_Debug_Session ;
1559: END IF ;
1560: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1561: ROLLBACK TO Copy_Attachments_And_Changes;
1562: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1563: FND_MSG_PUB.Count_And_Get
1564: ( p_count => x_msg_count

Line 1562: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1558: Close_Debug_Session ;
1559: END IF ;
1560: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1561: ROLLBACK TO Copy_Attachments_And_Changes;
1562: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1563: FND_MSG_PUB.Count_And_Get
1564: ( p_count => x_msg_count
1565: ,p_data => x_msg_data );
1566: IF g_debug_flag THEN

Line 1572: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1568: Close_Debug_Session ;
1569: END IF ;
1570: WHEN OTHERS THEN
1571: ROLLBACK TO Copy_Attachments_And_Changes;
1572: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1573: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1574: THEN
1575: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME, l_api_name );
1576: END IF;

Line 1588: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --

1584: END Copy_Attachments_And_Changes;
1585:
1586: Procedure Delete_Attachments_And_Changes (
1587: p_api_version IN NUMBER --
1588: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1589: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1590: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1591: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1592: ,p_output_dir IN VARCHAR2 := NULL --

Line 1589: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --

1585:
1586: Procedure Delete_Attachments_And_Changes (
1587: p_api_version IN NUMBER --
1588: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1589: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1590: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1591: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1592: ,p_output_dir IN VARCHAR2 := NULL --
1593: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Attachments_And_Changes.log'

Line 1590: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

1586: Procedure Delete_Attachments_And_Changes (
1587: p_api_version IN NUMBER --
1588: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1589: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1590: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1591: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1592: ,p_output_dir IN VARCHAR2 := NULL --
1593: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Attachments_And_Changes.log'
1594: ,x_return_status OUT NOCOPY VARCHAR2 --

Line 1591: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --

1587: p_api_version IN NUMBER --
1588: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1589: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1590: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1591: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1592: ,p_output_dir IN VARCHAR2 := NULL --
1593: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Attachments_And_Changes.log'
1594: ,x_return_status OUT NOCOPY VARCHAR2 --
1595: ,x_msg_count OUT NOCOPY NUMBER --

Line 1634: IF NOT FND_API.Compatible_API_Call ( l_api_version

1630: BEGIN
1631: -- Standard Start of API savepoint
1632: SAVEPOINT Delete_Attachments_And_Changes;
1633: -- Standard call to check for call compatibility
1634: IF NOT FND_API.Compatible_API_Call ( l_api_version
1635: ,p_api_version
1636: ,l_api_name
1637: ,G_PKG_NAME )
1638: THEN

Line 1639: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1635: ,p_api_version
1636: ,l_api_name
1637: ,G_PKG_NAME )
1638: THEN
1639: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1640: END IF;
1641: -- Initialize message list if p_init_msg_list is set to TRUE.
1642: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1643: FND_MSG_PUB.initialize;

Line 1642: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1638: THEN
1639: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1640: END IF;
1641: -- Initialize message list if p_init_msg_list is set to TRUE.
1642: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1643: FND_MSG_PUB.initialize;
1644: END IF ;
1645: -- For Test/Debug
1646: IF FND_API.to_Boolean( p_debug ) THEN

Line 1646: IF FND_API.to_Boolean( p_debug ) THEN

1642: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1643: FND_MSG_PUB.initialize;
1644: END IF ;
1645: -- For Test/Debug
1646: IF FND_API.to_Boolean( p_debug ) THEN
1647: Open_Debug_Session(p_output_dir, p_debug_filename ) ;
1648: END IF ;
1649:
1650: -- Write debug message if debug mode is on

Line 1663: x_return_status := FND_API.G_RET_STS_SUCCESS;

1659: Write_Debug('-----------------------------------------------------');
1660: Write_Debug('Initializing return status... ' );
1661: END IF ;
1662: -- Initialize API return status to success
1663: x_return_status := FND_API.G_RET_STS_SUCCESS;
1664:
1665: -- Real code starts here -----------------------------------------------
1666: open C;
1667: loop

Line 1688: WHEN FND_API.G_EXC_ERROR THEN

1684: Close_Debug_Session ;
1685: END IF ;
1686:
1687: EXCEPTION
1688: WHEN FND_API.G_EXC_ERROR THEN
1689: ROLLBACK TO Delete_Attachments_And_Changes;
1690: x_return_status := FND_API.G_RET_STS_ERROR;
1691: FND_MSG_PUB.Count_And_Get
1692: ( p_count => x_msg_count

Line 1690: x_return_status := FND_API.G_RET_STS_ERROR;

1686:
1687: EXCEPTION
1688: WHEN FND_API.G_EXC_ERROR THEN
1689: ROLLBACK TO Delete_Attachments_And_Changes;
1690: x_return_status := FND_API.G_RET_STS_ERROR;
1691: FND_MSG_PUB.Count_And_Get
1692: ( p_count => x_msg_count
1693: ,p_data => x_msg_data );
1694: IF g_debug_flag THEN

Line 1698: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1694: IF g_debug_flag THEN
1695: Write_Debug('Rollback and Finish with expected error.') ;
1696: Close_Debug_Session ;
1697: END IF ;
1698: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1699: ROLLBACK TO Delete_Attachments_And_Changes;
1700: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1701: FND_MSG_PUB.Count_And_Get
1702: ( p_count => x_msg_count

Line 1700: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1696: Close_Debug_Session ;
1697: END IF ;
1698: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1699: ROLLBACK TO Delete_Attachments_And_Changes;
1700: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1701: FND_MSG_PUB.Count_And_Get
1702: ( p_count => x_msg_count
1703: ,p_data => x_msg_data );
1704: IF g_debug_flag THEN

Line 1710: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1706: Close_Debug_Session ;
1707: END IF ;
1708: WHEN OTHERS THEN
1709: ROLLBACK TO Delete_Attachments_And_Changes;
1710: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1711: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1712: THEN
1713: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME, l_api_name );
1714: END IF;

Line 1726: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --

1722: END Delete_Attachments_And_Changes;
1723:
1724: Procedure Delete_Attachments_For_Curr_CO (
1725: p_api_version IN NUMBER --
1726: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1727: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1728: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1729: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1730: ,p_output_dir IN VARCHAR2 := NULL --

Line 1727: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --

1723:
1724: Procedure Delete_Attachments_For_Curr_CO (
1725: p_api_version IN NUMBER --
1726: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1727: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1728: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1729: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1730: ,p_output_dir IN VARCHAR2 := NULL --
1731: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Attachments_For_Curr_CO.log'

Line 1728: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

1724: Procedure Delete_Attachments_For_Curr_CO (
1725: p_api_version IN NUMBER --
1726: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1727: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1728: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1729: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1730: ,p_output_dir IN VARCHAR2 := NULL --
1731: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Attachments_For_Curr_CO.log'
1732: ,x_return_status OUT NOCOPY VARCHAR2 --

Line 1729: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --

1725: p_api_version IN NUMBER --
1726: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1727: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1728: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1729: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1730: ,p_output_dir IN VARCHAR2 := NULL --
1731: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Attachments_For_Curr_CO.log'
1732: ,x_return_status OUT NOCOPY VARCHAR2 --
1733: ,x_msg_count OUT NOCOPY NUMBER --

Line 1759: IF NOT FND_API.Compatible_API_Call ( l_api_version

1755: /*
1756: -- Standard Start of API savepoint
1757: SAVEPOINT Delete_Attachments_For_Curr_CO;
1758: -- Standard call to check for call compatibility
1759: IF NOT FND_API.Compatible_API_Call ( l_api_version
1760: ,p_api_version
1761: ,l_api_name
1762: ,G_PKG_NAME )
1763: THEN

Line 1764: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1760: ,p_api_version
1761: ,l_api_name
1762: ,G_PKG_NAME )
1763: THEN
1764: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1765: END IF;
1766: -- Initialize message list if p_init_msg_list is set to TRUE.
1767: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1768: FND_MSG_PUB.initialize;

Line 1767: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1763: THEN
1764: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1765: END IF;
1766: -- Initialize message list if p_init_msg_list is set to TRUE.
1767: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1768: FND_MSG_PUB.initialize;
1769: END IF ;
1770: -- For Test/Debug
1771: IF FND_API.to_Boolean( p_debug ) THEN

Line 1771: IF FND_API.to_Boolean( p_debug ) THEN

1767: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1768: FND_MSG_PUB.initialize;
1769: END IF ;
1770: -- For Test/Debug
1771: IF FND_API.to_Boolean( p_debug ) THEN
1772: Open_Debug_Session(p_output_dir, p_debug_filename ) ;
1773: END IF ;
1774:
1775: -- Write debug message if debug mode is on

Line 1785: x_return_status := FND_API.G_RET_STS_SUCCESS;

1781: Write_Debug('-----------------------------------------------------');
1782: Write_Debug('Initializing return status... ' );
1783: END IF ;
1784: -- Initialize API return status to success
1785: x_return_status := FND_API.G_RET_STS_SUCCESS;
1786:
1787: -- Real code starts here -----------------------------------------------
1788: open C;
1789: loop

Line 1826: WHEN FND_API.G_EXC_ERROR THEN

1822: Close_Debug_Session ;
1823: END IF ;
1824:
1825: EXCEPTION
1826: WHEN FND_API.G_EXC_ERROR THEN
1827: ROLLBACK TO Delete_Attachments_For_Curr_CO;
1828: x_return_status := FND_API.G_RET_STS_ERROR;
1829: FND_MSG_PUB.Count_And_Get
1830: ( p_count => x_msg_count

Line 1828: x_return_status := FND_API.G_RET_STS_ERROR;

1824:
1825: EXCEPTION
1826: WHEN FND_API.G_EXC_ERROR THEN
1827: ROLLBACK TO Delete_Attachments_For_Curr_CO;
1828: x_return_status := FND_API.G_RET_STS_ERROR;
1829: FND_MSG_PUB.Count_And_Get
1830: ( p_count => x_msg_count
1831: ,p_data => x_msg_data );
1832: IF g_debug_flag THEN

Line 1836: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1832: IF g_debug_flag THEN
1833: Write_Debug('Rollback and Finish with expected error.') ;
1834: Close_Debug_Session ;
1835: END IF ;
1836: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1837: ROLLBACK TO Delete_Attachments_For_Curr_CO;
1838: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1839: FND_MSG_PUB.Count_And_Get
1840: ( p_count => x_msg_count

Line 1838: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1834: Close_Debug_Session ;
1835: END IF ;
1836: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1837: ROLLBACK TO Delete_Attachments_For_Curr_CO;
1838: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1839: FND_MSG_PUB.Count_And_Get
1840: ( p_count => x_msg_count
1841: ,p_data => x_msg_data );
1842: IF g_debug_flag THEN

Line 1848: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1844: Close_Debug_Session ;
1845: END IF ;
1846: WHEN OTHERS THEN
1847: ROLLBACK TO Delete_Attachments_For_Curr_CO;
1848: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1849: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1850: THEN
1851: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME, l_api_name );
1852: END IF;

Line 1865: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --

1861: END Delete_Attachments_For_Curr_CO;
1862:
1863: Procedure Delete_Attachments (
1864: p_api_version IN NUMBER --
1865: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1866: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1867: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1868: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1869: ,p_output_dir IN VARCHAR2 := NULL --

Line 1866: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --

1862:
1863: Procedure Delete_Attachments (
1864: p_api_version IN NUMBER --
1865: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1866: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1867: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1868: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1869: ,p_output_dir IN VARCHAR2 := NULL --
1870: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Attachments.log'

Line 1867: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

1863: Procedure Delete_Attachments (
1864: p_api_version IN NUMBER --
1865: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1866: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1867: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1868: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1869: ,p_output_dir IN VARCHAR2 := NULL --
1870: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Attachments.log'
1871: ,x_return_status OUT NOCOPY VARCHAR2 --

Line 1868: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --

1864: p_api_version IN NUMBER --
1865: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1866: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1867: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1868: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1869: ,p_output_dir IN VARCHAR2 := NULL --
1870: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Attachments.log'
1871: ,x_return_status OUT NOCOPY VARCHAR2 --
1872: ,x_msg_count OUT NOCOPY NUMBER --

Line 1897: IF NOT FND_API.Compatible_API_Call ( l_api_version

1893: BEGIN
1894: -- Standard Start of API savepoint
1895: SAVEPOINT Delete_Attachments;
1896: -- Standard call to check for call compatibility
1897: IF NOT FND_API.Compatible_API_Call ( l_api_version
1898: ,p_api_version
1899: ,l_api_name
1900: ,G_PKG_NAME )
1901: THEN

Line 1902: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1898: ,p_api_version
1899: ,l_api_name
1900: ,G_PKG_NAME )
1901: THEN
1902: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1903: END IF;
1904: -- Initialize message list if p_init_msg_list is set to TRUE.
1905: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1906: FND_MSG_PUB.initialize;

Line 1905: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1901: THEN
1902: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1903: END IF;
1904: -- Initialize message list if p_init_msg_list is set to TRUE.
1905: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1906: FND_MSG_PUB.initialize;
1907: END IF ;
1908: -- For Test/Debug
1909: IF FND_API.to_Boolean( p_debug ) THEN

Line 1909: IF FND_API.to_Boolean( p_debug ) THEN

1905: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1906: FND_MSG_PUB.initialize;
1907: END IF ;
1908: -- For Test/Debug
1909: IF FND_API.to_Boolean( p_debug ) THEN
1910: Open_Debug_Session(p_output_dir, p_debug_filename ) ;
1911: END IF ;
1912:
1913: -- Write debug message if debug mode is on

Line 1924: x_return_status := FND_API.G_RET_STS_SUCCESS;

1920: Write_Debug('-----------------------------------------------------');
1921: Write_Debug('Initializing return status... ' );
1922: END IF ;
1923: -- Initialize API return status to success
1924: x_return_status := FND_API.G_RET_STS_SUCCESS;
1925:
1926: -- Real code starts here -----------------------------------------------
1927: open C;
1928: loop

Line 1946: WHEN FND_API.G_EXC_ERROR THEN

1942: Close_Debug_Session ;
1943: END IF ;
1944:
1945: EXCEPTION
1946: WHEN FND_API.G_EXC_ERROR THEN
1947: ROLLBACK TO Delete_Attachments;
1948: x_return_status := FND_API.G_RET_STS_ERROR;
1949: FND_MSG_PUB.Count_And_Get
1950: ( p_count => x_msg_count

Line 1948: x_return_status := FND_API.G_RET_STS_ERROR;

1944:
1945: EXCEPTION
1946: WHEN FND_API.G_EXC_ERROR THEN
1947: ROLLBACK TO Delete_Attachments;
1948: x_return_status := FND_API.G_RET_STS_ERROR;
1949: FND_MSG_PUB.Count_And_Get
1950: ( p_count => x_msg_count
1951: ,p_data => x_msg_data );
1952: IF g_debug_flag THEN

Line 1956: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1952: IF g_debug_flag THEN
1953: Write_Debug('Rollback and Finish with expected error.') ;
1954: Close_Debug_Session ;
1955: END IF ;
1956: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1957: ROLLBACK TO Delete_Attachments;
1958: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1959: FND_MSG_PUB.Count_And_Get
1960: ( p_count => x_msg_count

Line 1958: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1954: Close_Debug_Session ;
1955: END IF ;
1956: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1957: ROLLBACK TO Delete_Attachments;
1958: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1959: FND_MSG_PUB.Count_And_Get
1960: ( p_count => x_msg_count
1961: ,p_data => x_msg_data );
1962: IF g_debug_flag THEN

Line 1968: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1964: Close_Debug_Session ;
1965: END IF ;
1966: WHEN OTHERS THEN
1967: ROLLBACK TO Delete_Attachments;
1968: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1969: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1970: THEN
1971: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME, l_api_name );
1972: END IF;

Line 1984: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --

1980: END Delete_Attachments;
1981:
1982: Procedure Delete_Attachment (
1983: p_api_version IN NUMBER --
1984: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1985: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1986: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1987: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1988: ,p_output_dir IN VARCHAR2 := NULL --

Line 1985: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --

1981:
1982: Procedure Delete_Attachment (
1983: p_api_version IN NUMBER --
1984: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1985: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1986: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1987: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1988: ,p_output_dir IN VARCHAR2 := NULL --
1989: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Attachment.log'

Line 1986: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

1982: Procedure Delete_Attachment (
1983: p_api_version IN NUMBER --
1984: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1985: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1986: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1987: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1988: ,p_output_dir IN VARCHAR2 := NULL --
1989: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Attachment.log'
1990: ,x_return_status OUT NOCOPY VARCHAR2 --

Line 1987: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --

1983: p_api_version IN NUMBER --
1984: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1985: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1986: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1987: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1988: ,p_output_dir IN VARCHAR2 := NULL --
1989: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Attachment.log'
1990: ,x_return_status OUT NOCOPY VARCHAR2 --
1991: ,x_msg_count OUT NOCOPY NUMBER --

Line 2007: IF NOT FND_API.Compatible_API_Call ( l_api_version

2003: BEGIN
2004: -- Standard Start of API savepoint
2005: SAVEPOINT Delete_Attachment;
2006: -- Standard call to check for call compatibility
2007: IF NOT FND_API.Compatible_API_Call ( l_api_version
2008: ,p_api_version
2009: ,l_api_name
2010: ,G_PKG_NAME )
2011: THEN

Line 2012: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2008: ,p_api_version
2009: ,l_api_name
2010: ,G_PKG_NAME )
2011: THEN
2012: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2013: END IF;
2014: -- Initialize message list if p_init_msg_list is set to TRUE.
2015: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2016: FND_MSG_PUB.initialize;

Line 2015: IF FND_API.to_Boolean( p_init_msg_list ) THEN

2011: THEN
2012: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2013: END IF;
2014: -- Initialize message list if p_init_msg_list is set to TRUE.
2015: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2016: FND_MSG_PUB.initialize;
2017: END IF ;
2018: -- For Test/Debug
2019: IF FND_API.to_Boolean( p_debug ) THEN

Line 2019: IF FND_API.to_Boolean( p_debug ) THEN

2015: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2016: FND_MSG_PUB.initialize;
2017: END IF ;
2018: -- For Test/Debug
2019: IF FND_API.to_Boolean( p_debug ) THEN
2020: Open_Debug_Session(p_output_dir, p_debug_filename ) ;
2021: END IF ;
2022:
2023: -- Write debug message if debug mode is on

Line 2032: x_return_status := FND_API.G_RET_STS_SUCCESS;

2028: Write_Debug('-----------------------------------------------------');
2029: Write_Debug('Initializing return status... ' );
2030: END IF ;
2031: -- Initialize API return status to success
2032: x_return_status := FND_API.G_RET_STS_SUCCESS;
2033:
2034: -- Real code starts here -----------------------------------------------
2035: begin
2036: select document_id into l_document_id

Line 2058: WHEN FND_API.G_EXC_ERROR THEN

2054: Close_Debug_Session ;
2055: END IF ;
2056:
2057: EXCEPTION
2058: WHEN FND_API.G_EXC_ERROR THEN
2059: ROLLBACK TO Delete_Attachment;
2060: x_return_status := FND_API.G_RET_STS_ERROR;
2061: FND_MSG_PUB.Count_And_Get
2062: ( p_count => x_msg_count

Line 2060: x_return_status := FND_API.G_RET_STS_ERROR;

2056:
2057: EXCEPTION
2058: WHEN FND_API.G_EXC_ERROR THEN
2059: ROLLBACK TO Delete_Attachment;
2060: x_return_status := FND_API.G_RET_STS_ERROR;
2061: FND_MSG_PUB.Count_And_Get
2062: ( p_count => x_msg_count
2063: ,p_data => x_msg_data );
2064: IF g_debug_flag THEN

Line 2068: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2064: IF g_debug_flag THEN
2065: Write_Debug('Rollback and Finish with expected error.') ;
2066: Close_Debug_Session ;
2067: END IF ;
2068: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2069: ROLLBACK TO Delete_Attachment;
2070: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2071: FND_MSG_PUB.Count_And_Get
2072: ( p_count => x_msg_count

Line 2070: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2066: Close_Debug_Session ;
2067: END IF ;
2068: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2069: ROLLBACK TO Delete_Attachment;
2070: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2071: FND_MSG_PUB.Count_And_Get
2072: ( p_count => x_msg_count
2073: ,p_data => x_msg_data );
2074: IF g_debug_flag THEN

Line 2080: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2076: Close_Debug_Session ;
2077: END IF ;
2078: WHEN OTHERS THEN
2079: ROLLBACK TO Delete_Attachment;
2080: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2081: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
2082: THEN
2083: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME, l_api_name );
2084: END IF;

Line 2096: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --

2092: END Delete_Attachment;
2093:
2094: Procedure Delete_Changes (
2095: p_api_version IN NUMBER --
2096: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
2097: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
2098: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2099: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
2100: ,p_output_dir IN VARCHAR2 := NULL --

Line 2097: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --

2093:
2094: Procedure Delete_Changes (
2095: p_api_version IN NUMBER --
2096: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
2097: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
2098: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2099: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
2100: ,p_output_dir IN VARCHAR2 := NULL --
2101: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Changes.log'

Line 2098: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

2094: Procedure Delete_Changes (
2095: p_api_version IN NUMBER --
2096: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
2097: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
2098: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2099: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
2100: ,p_output_dir IN VARCHAR2 := NULL --
2101: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Changes.log'
2102: ,x_return_status OUT NOCOPY VARCHAR2 --

Line 2099: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --

2095: p_api_version IN NUMBER --
2096: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
2097: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
2098: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2099: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
2100: ,p_output_dir IN VARCHAR2 := NULL --
2101: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Changes.log'
2102: ,x_return_status OUT NOCOPY VARCHAR2 --
2103: ,x_msg_count OUT NOCOPY NUMBER --

Line 2118: IF NOT FND_API.Compatible_API_Call ( l_api_version

2114: BEGIN
2115: -- Standard Start of API savepoint
2116: SAVEPOINT Delete_Changes;
2117: -- Standard call to check for call compatibility
2118: IF NOT FND_API.Compatible_API_Call ( l_api_version
2119: ,p_api_version
2120: ,l_api_name
2121: ,G_PKG_NAME )
2122: THEN

Line 2123: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2119: ,p_api_version
2120: ,l_api_name
2121: ,G_PKG_NAME )
2122: THEN
2123: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2124: END IF;
2125: -- Initialize message list if p_init_msg_list is set to TRUE.
2126: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2127: FND_MSG_PUB.initialize;

Line 2126: IF FND_API.to_Boolean( p_init_msg_list ) THEN

2122: THEN
2123: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2124: END IF;
2125: -- Initialize message list if p_init_msg_list is set to TRUE.
2126: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2127: FND_MSG_PUB.initialize;
2128: END IF ;
2129: -- For Test/Debug
2130: IF FND_API.to_Boolean( p_debug ) THEN

Line 2130: IF FND_API.to_Boolean( p_debug ) THEN

2126: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2127: FND_MSG_PUB.initialize;
2128: END IF ;
2129: -- For Test/Debug
2130: IF FND_API.to_Boolean( p_debug ) THEN
2131: Open_Debug_Session(p_output_dir, p_debug_filename ) ;
2132: END IF ;
2133:
2134: -- Write debug message if debug mode is on

Line 2144: x_return_status := FND_API.G_RET_STS_SUCCESS;

2140: Write_Debug('-----------------------------------------------------');
2141: Write_Debug('Initializing return status... ' );
2142: END IF ;
2143: -- Initialize API return status to success
2144: x_return_status := FND_API.G_RET_STS_SUCCESS;
2145:
2146: -- Real code starts here -----------------------------------------------
2147: delete from eng_attachment_changes
2148: where change_id = p_change_id

Line 2161: WHEN FND_API.G_EXC_ERROR THEN

2157: Close_Debug_Session ;
2158: END IF ;
2159:
2160: EXCEPTION
2161: WHEN FND_API.G_EXC_ERROR THEN
2162: ROLLBACK TO Delete_Changes;
2163: x_return_status := FND_API.G_RET_STS_ERROR;
2164: FND_MSG_PUB.Count_And_Get
2165: ( p_count => x_msg_count

Line 2163: x_return_status := FND_API.G_RET_STS_ERROR;

2159:
2160: EXCEPTION
2161: WHEN FND_API.G_EXC_ERROR THEN
2162: ROLLBACK TO Delete_Changes;
2163: x_return_status := FND_API.G_RET_STS_ERROR;
2164: FND_MSG_PUB.Count_And_Get
2165: ( p_count => x_msg_count
2166: ,p_data => x_msg_data );
2167: IF g_debug_flag THEN

Line 2171: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2167: IF g_debug_flag THEN
2168: Write_Debug('Rollback and Finish with expected error.') ;
2169: Close_Debug_Session ;
2170: END IF ;
2171: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2172: ROLLBACK TO Delete_Changes;
2173: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2174: FND_MSG_PUB.Count_And_Get
2175: ( p_count => x_msg_count

Line 2173: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2169: Close_Debug_Session ;
2170: END IF ;
2171: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2172: ROLLBACK TO Delete_Changes;
2173: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2174: FND_MSG_PUB.Count_And_Get
2175: ( p_count => x_msg_count
2176: ,p_data => x_msg_data );
2177: IF g_debug_flag THEN

Line 2183: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2179: Close_Debug_Session ;
2180: END IF ;
2181: WHEN OTHERS THEN
2182: ROLLBACK TO Delete_Changes;
2183: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2184: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
2185: THEN
2186: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME, l_api_name );
2187: END IF;

Line 2234: x_return_status := FND_API.G_RET_STS_SUCCESS;

2230:
2231: SAVEPOINT Implement_Attachment_Change;
2232:
2233: -- Initialize API return status to success
2234: x_return_status := FND_API.G_RET_STS_SUCCESS;
2235:
2236: l_change_id := p_change_id;
2237: l_revised_item_seq_id := p_rev_item_seq_id;
2238:

Line 2297: x_return_status := FND_API.G_RET_STS_ERROR;

2293: END LOOP;
2294:
2295: EXCEPTION
2296: WHEN change_policy_defined THEN
2297: x_return_status := FND_API.G_RET_STS_ERROR;
2298: x_msg_count := 1;
2299: x_msg_data := 'Error: This Change Order has floating version attachments that are under change required change policy. Such CO cannot be implemented';
2300: RAISE FND_API.G_EXC_ERROR;
2301: WHEN OTHERS THEN

Line 2300: RAISE FND_API.G_EXC_ERROR;

2296: WHEN change_policy_defined THEN
2297: x_return_status := FND_API.G_RET_STS_ERROR;
2298: x_msg_count := 1;
2299: x_msg_data := 'Error: This Change Order has floating version attachments that are under change required change policy. Such CO cannot be implemented';
2300: RAISE FND_API.G_EXC_ERROR;
2301: WHEN OTHERS THEN
2302: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
2303: THEN
2304: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME, l_api_name );