DBA Data[Home] [Help]

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 1590: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --

1586: ------------------------------
1587: /*************Added for bug 8329527 ****************/
1588: Procedure Migrate_Attachment_And_Change (
1589: p_api_version IN NUMBER --
1590: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1591: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1592: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1593: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1594: ,p_output_dir IN VARCHAR2 := NULL --

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

1587: /*************Added for bug 8329527 ****************/
1588: Procedure Migrate_Attachment_And_Change (
1589: p_api_version IN NUMBER --
1590: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1591: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1592: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1593: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1594: ,p_output_dir IN VARCHAR2 := NULL --
1595: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Migrate_Attachment_And_Change.log'

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

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

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

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

Line 1627: IF NOT FND_API.Compatible_API_Call ( l_api_version

1623: BEGIN
1624: -- Standard Start of API savepoint
1625: SAVEPOINT Migrate_Attachment_And_Change;
1626: -- Standard call to check for call compatibility
1627: IF NOT FND_API.Compatible_API_Call ( l_api_version
1628: ,p_api_version
1629: ,l_api_name
1630: ,G_PKG_NAME )
1631: THEN

Line 1632: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1628: ,p_api_version
1629: ,l_api_name
1630: ,G_PKG_NAME )
1631: THEN
1632: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1633: END IF;
1634: -- Initialize message list if p_init_msg_list is set to TRUE.
1635: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1636: FND_MSG_PUB.initialize;

Line 1635: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1631: THEN
1632: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1633: END IF;
1634: -- Initialize message list if p_init_msg_list is set to TRUE.
1635: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1636: FND_MSG_PUB.initialize;
1637: END IF ;
1638: -- For Test/Debug
1639: IF FND_API.to_Boolean( p_debug ) THEN

Line 1639: IF FND_API.to_Boolean( p_debug ) THEN

1635: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1636: FND_MSG_PUB.initialize;
1637: END IF ;
1638: -- For Test/Debug
1639: IF FND_API.to_Boolean( p_debug ) THEN
1640: Open_Debug_Session(p_output_dir, p_debug_filename ) ;
1641: END IF ;
1642:
1643: -- Write debug message if debug mode is on

Line 1657: x_return_status := FND_API.G_RET_STS_SUCCESS;

1653: Write_Debug('-----------------------------------------------------');
1654: Write_Debug('Initializing return status... ' );
1655: END IF ;
1656: -- Initialize API return status to success
1657: x_return_status := FND_API.G_RET_STS_SUCCESS;
1658:
1659: -- Real code starts here -----------------------------------------------
1660: select count(*)
1661: into l_count

Line 1738: IF FND_API.To_Boolean( p_commit ) THEN

1734: and pk3_value = p_curr_rev_id ;
1735:
1736:
1737: -- Standard check of p_commit.
1738: IF FND_API.To_Boolean( p_commit ) THEN
1739: IF g_debug_flag THEN
1740: Write_Debug('Do Commit.') ;
1741: END IF ;
1742: COMMIT WORK;

Line 1755: WHEN FND_API.G_EXC_ERROR THEN

1751: Close_Debug_Session ;
1752: END IF ;
1753:
1754: EXCEPTION
1755: WHEN FND_API.G_EXC_ERROR THEN
1756: ROLLBACK TO Migrate_Attachment_And_Change;
1757: x_return_status := FND_API.G_RET_STS_ERROR;
1758: FND_MSG_PUB.Count_And_Get
1759: ( p_count => x_msg_count

Line 1757: x_return_status := FND_API.G_RET_STS_ERROR;

1753:
1754: EXCEPTION
1755: WHEN FND_API.G_EXC_ERROR THEN
1756: ROLLBACK TO Migrate_Attachment_And_Change;
1757: x_return_status := FND_API.G_RET_STS_ERROR;
1758: FND_MSG_PUB.Count_And_Get
1759: ( p_count => x_msg_count
1760: ,p_data => x_msg_data );
1761: IF g_debug_flag THEN

Line 1765: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1761: IF g_debug_flag THEN
1762: Write_Debug('Rollback and Finish with expected error.') ;
1763: Close_Debug_Session ;
1764: END IF ;
1765: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1766: ROLLBACK TO Migrate_Attachment_And_Change;
1767: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1768: FND_MSG_PUB.Count_And_Get
1769: ( p_count => x_msg_count

Line 1767: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1763: Close_Debug_Session ;
1764: END IF ;
1765: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1766: ROLLBACK TO Migrate_Attachment_And_Change;
1767: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1768: FND_MSG_PUB.Count_And_Get
1769: ( p_count => x_msg_count
1770: ,p_data => x_msg_data );
1771: IF g_debug_flag THEN

Line 1777: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1773: Close_Debug_Session ;
1774: END IF ;
1775: WHEN OTHERS THEN
1776: ROLLBACK TO Migrate_Attachment_And_Change;
1777: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1778: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1779: THEN
1780: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME, l_api_name );
1781: END IF;

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

1791:
1792: ------------------------------
1793: Procedure Delete_Attachments_And_Changes (
1794: p_api_version IN NUMBER --
1795: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1796: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1797: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1798: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1799: ,p_output_dir IN VARCHAR2 := NULL --

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

1792: ------------------------------
1793: Procedure Delete_Attachments_And_Changes (
1794: p_api_version IN NUMBER --
1795: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1796: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1797: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1798: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1799: ,p_output_dir IN VARCHAR2 := NULL --
1800: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Attachments_And_Changes.log'

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

1793: Procedure Delete_Attachments_And_Changes (
1794: p_api_version IN NUMBER --
1795: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1796: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1797: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1798: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1799: ,p_output_dir IN VARCHAR2 := NULL --
1800: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Attachments_And_Changes.log'
1801: ,x_return_status OUT NOCOPY VARCHAR2 --

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

1794: p_api_version IN NUMBER --
1795: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1796: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1797: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1798: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1799: ,p_output_dir IN VARCHAR2 := NULL --
1800: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Attachments_And_Changes.log'
1801: ,x_return_status OUT NOCOPY VARCHAR2 --
1802: ,x_msg_count OUT NOCOPY NUMBER --

Line 1841: IF NOT FND_API.Compatible_API_Call ( l_api_version

1837: BEGIN
1838: -- Standard Start of API savepoint
1839: SAVEPOINT Delete_Attachments_And_Changes;
1840: -- Standard call to check for call compatibility
1841: IF NOT FND_API.Compatible_API_Call ( l_api_version
1842: ,p_api_version
1843: ,l_api_name
1844: ,G_PKG_NAME )
1845: THEN

Line 1846: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1842: ,p_api_version
1843: ,l_api_name
1844: ,G_PKG_NAME )
1845: THEN
1846: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1847: END IF;
1848: -- Initialize message list if p_init_msg_list is set to TRUE.
1849: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1850: FND_MSG_PUB.initialize;

Line 1849: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1845: THEN
1846: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1847: END IF;
1848: -- Initialize message list if p_init_msg_list is set to TRUE.
1849: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1850: FND_MSG_PUB.initialize;
1851: END IF ;
1852: -- For Test/Debug
1853: IF FND_API.to_Boolean( p_debug ) THEN

Line 1853: IF FND_API.to_Boolean( p_debug ) THEN

1849: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1850: FND_MSG_PUB.initialize;
1851: END IF ;
1852: -- For Test/Debug
1853: IF FND_API.to_Boolean( p_debug ) THEN
1854: Open_Debug_Session(p_output_dir, p_debug_filename ) ;
1855: END IF ;
1856:
1857: -- Write debug message if debug mode is on

Line 1870: x_return_status := FND_API.G_RET_STS_SUCCESS;

1866: Write_Debug('-----------------------------------------------------');
1867: Write_Debug('Initializing return status... ' );
1868: END IF ;
1869: -- Initialize API return status to success
1870: x_return_status := FND_API.G_RET_STS_SUCCESS;
1871:
1872: -- Real code starts here -----------------------------------------------
1873: open C;
1874: loop

Line 1895: WHEN FND_API.G_EXC_ERROR THEN

1891: Close_Debug_Session ;
1892: END IF ;
1893:
1894: EXCEPTION
1895: WHEN FND_API.G_EXC_ERROR THEN
1896: ROLLBACK TO Delete_Attachments_And_Changes;
1897: x_return_status := FND_API.G_RET_STS_ERROR;
1898: FND_MSG_PUB.Count_And_Get
1899: ( p_count => x_msg_count

Line 1897: x_return_status := FND_API.G_RET_STS_ERROR;

1893:
1894: EXCEPTION
1895: WHEN FND_API.G_EXC_ERROR THEN
1896: ROLLBACK TO Delete_Attachments_And_Changes;
1897: x_return_status := FND_API.G_RET_STS_ERROR;
1898: FND_MSG_PUB.Count_And_Get
1899: ( p_count => x_msg_count
1900: ,p_data => x_msg_data );
1901: IF g_debug_flag THEN

Line 1905: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1901: IF g_debug_flag THEN
1902: Write_Debug('Rollback and Finish with expected error.') ;
1903: Close_Debug_Session ;
1904: END IF ;
1905: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1906: ROLLBACK TO Delete_Attachments_And_Changes;
1907: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1908: FND_MSG_PUB.Count_And_Get
1909: ( p_count => x_msg_count

Line 1907: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1903: Close_Debug_Session ;
1904: END IF ;
1905: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1906: ROLLBACK TO Delete_Attachments_And_Changes;
1907: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1908: FND_MSG_PUB.Count_And_Get
1909: ( p_count => x_msg_count
1910: ,p_data => x_msg_data );
1911: IF g_debug_flag THEN

Line 1917: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1913: Close_Debug_Session ;
1914: END IF ;
1915: WHEN OTHERS THEN
1916: ROLLBACK TO Delete_Attachments_And_Changes;
1917: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1918: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1919: THEN
1920: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME, l_api_name );
1921: END IF;

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

1929: END Delete_Attachments_And_Changes;
1930:
1931: Procedure Delete_Attachments_For_Curr_CO (
1932: p_api_version IN NUMBER --
1933: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1934: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1935: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1936: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1937: ,p_output_dir IN VARCHAR2 := NULL --

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

1930:
1931: Procedure Delete_Attachments_For_Curr_CO (
1932: p_api_version IN NUMBER --
1933: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1934: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1935: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1936: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1937: ,p_output_dir IN VARCHAR2 := NULL --
1938: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Attachments_For_Curr_CO.log'

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

1931: Procedure Delete_Attachments_For_Curr_CO (
1932: p_api_version IN NUMBER --
1933: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1934: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1935: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1936: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1937: ,p_output_dir IN VARCHAR2 := NULL --
1938: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Attachments_For_Curr_CO.log'
1939: ,x_return_status OUT NOCOPY VARCHAR2 --

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

1932: p_api_version IN NUMBER --
1933: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
1934: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
1935: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1936: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
1937: ,p_output_dir IN VARCHAR2 := NULL --
1938: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Attachments_For_Curr_CO.log'
1939: ,x_return_status OUT NOCOPY VARCHAR2 --
1940: ,x_msg_count OUT NOCOPY NUMBER --

Line 1966: IF NOT FND_API.Compatible_API_Call ( l_api_version

1962: /*
1963: -- Standard Start of API savepoint
1964: SAVEPOINT Delete_Attachments_For_Curr_CO;
1965: -- Standard call to check for call compatibility
1966: IF NOT FND_API.Compatible_API_Call ( l_api_version
1967: ,p_api_version
1968: ,l_api_name
1969: ,G_PKG_NAME )
1970: THEN

Line 1971: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1967: ,p_api_version
1968: ,l_api_name
1969: ,G_PKG_NAME )
1970: THEN
1971: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1972: END IF;
1973: -- Initialize message list if p_init_msg_list is set to TRUE.
1974: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1975: FND_MSG_PUB.initialize;

Line 1974: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1970: THEN
1971: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1972: END IF;
1973: -- Initialize message list if p_init_msg_list is set to TRUE.
1974: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1975: FND_MSG_PUB.initialize;
1976: END IF ;
1977: -- For Test/Debug
1978: IF FND_API.to_Boolean( p_debug ) THEN

Line 1978: IF FND_API.to_Boolean( p_debug ) THEN

1974: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1975: FND_MSG_PUB.initialize;
1976: END IF ;
1977: -- For Test/Debug
1978: IF FND_API.to_Boolean( p_debug ) THEN
1979: Open_Debug_Session(p_output_dir, p_debug_filename ) ;
1980: END IF ;
1981:
1982: -- Write debug message if debug mode is on

Line 1992: x_return_status := FND_API.G_RET_STS_SUCCESS;

1988: Write_Debug('-----------------------------------------------------');
1989: Write_Debug('Initializing return status... ' );
1990: END IF ;
1991: -- Initialize API return status to success
1992: x_return_status := FND_API.G_RET_STS_SUCCESS;
1993:
1994: -- Real code starts here -----------------------------------------------
1995: open C;
1996: loop

Line 2033: WHEN FND_API.G_EXC_ERROR THEN

2029: Close_Debug_Session ;
2030: END IF ;
2031:
2032: EXCEPTION
2033: WHEN FND_API.G_EXC_ERROR THEN
2034: ROLLBACK TO Delete_Attachments_For_Curr_CO;
2035: x_return_status := FND_API.G_RET_STS_ERROR;
2036: FND_MSG_PUB.Count_And_Get
2037: ( p_count => x_msg_count

Line 2035: x_return_status := FND_API.G_RET_STS_ERROR;

2031:
2032: EXCEPTION
2033: WHEN FND_API.G_EXC_ERROR THEN
2034: ROLLBACK TO Delete_Attachments_For_Curr_CO;
2035: x_return_status := FND_API.G_RET_STS_ERROR;
2036: FND_MSG_PUB.Count_And_Get
2037: ( p_count => x_msg_count
2038: ,p_data => x_msg_data );
2039: IF g_debug_flag THEN

Line 2043: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2039: IF g_debug_flag THEN
2040: Write_Debug('Rollback and Finish with expected error.') ;
2041: Close_Debug_Session ;
2042: END IF ;
2043: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2044: ROLLBACK TO Delete_Attachments_For_Curr_CO;
2045: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2046: FND_MSG_PUB.Count_And_Get
2047: ( p_count => x_msg_count

Line 2045: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2041: Close_Debug_Session ;
2042: END IF ;
2043: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2044: ROLLBACK TO Delete_Attachments_For_Curr_CO;
2045: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2046: FND_MSG_PUB.Count_And_Get
2047: ( p_count => x_msg_count
2048: ,p_data => x_msg_data );
2049: IF g_debug_flag THEN

Line 2055: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2051: Close_Debug_Session ;
2052: END IF ;
2053: WHEN OTHERS THEN
2054: ROLLBACK TO Delete_Attachments_For_Curr_CO;
2055: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2056: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
2057: THEN
2058: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME, l_api_name );
2059: END IF;

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

2068: END Delete_Attachments_For_Curr_CO;
2069:
2070: Procedure Delete_Attachments (
2071: p_api_version IN NUMBER --
2072: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
2073: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
2074: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2075: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
2076: ,p_output_dir IN VARCHAR2 := NULL --

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

2069:
2070: Procedure Delete_Attachments (
2071: p_api_version IN NUMBER --
2072: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
2073: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
2074: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2075: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
2076: ,p_output_dir IN VARCHAR2 := NULL --
2077: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Attachments.log'

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

2070: Procedure Delete_Attachments (
2071: p_api_version IN NUMBER --
2072: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
2073: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
2074: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2075: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
2076: ,p_output_dir IN VARCHAR2 := NULL --
2077: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Attachments.log'
2078: ,x_return_status OUT NOCOPY VARCHAR2 --

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

2071: p_api_version IN NUMBER --
2072: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
2073: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
2074: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2075: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
2076: ,p_output_dir IN VARCHAR2 := NULL --
2077: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Attachments.log'
2078: ,x_return_status OUT NOCOPY VARCHAR2 --
2079: ,x_msg_count OUT NOCOPY NUMBER --

Line 2104: IF NOT FND_API.Compatible_API_Call ( l_api_version

2100: BEGIN
2101: -- Standard Start of API savepoint
2102: SAVEPOINT Delete_Attachments;
2103: -- Standard call to check for call compatibility
2104: IF NOT FND_API.Compatible_API_Call ( l_api_version
2105: ,p_api_version
2106: ,l_api_name
2107: ,G_PKG_NAME )
2108: THEN

Line 2109: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2105: ,p_api_version
2106: ,l_api_name
2107: ,G_PKG_NAME )
2108: THEN
2109: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2110: END IF;
2111: -- Initialize message list if p_init_msg_list is set to TRUE.
2112: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2113: FND_MSG_PUB.initialize;

Line 2112: IF FND_API.to_Boolean( p_init_msg_list ) THEN

2108: THEN
2109: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2110: END IF;
2111: -- Initialize message list if p_init_msg_list is set to TRUE.
2112: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2113: FND_MSG_PUB.initialize;
2114: END IF ;
2115: -- For Test/Debug
2116: IF FND_API.to_Boolean( p_debug ) THEN

Line 2116: IF FND_API.to_Boolean( p_debug ) THEN

2112: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2113: FND_MSG_PUB.initialize;
2114: END IF ;
2115: -- For Test/Debug
2116: IF FND_API.to_Boolean( p_debug ) THEN
2117: Open_Debug_Session(p_output_dir, p_debug_filename ) ;
2118: END IF ;
2119:
2120: -- Write debug message if debug mode is on

Line 2131: x_return_status := FND_API.G_RET_STS_SUCCESS;

2127: Write_Debug('-----------------------------------------------------');
2128: Write_Debug('Initializing return status... ' );
2129: END IF ;
2130: -- Initialize API return status to success
2131: x_return_status := FND_API.G_RET_STS_SUCCESS;
2132:
2133: -- Real code starts here -----------------------------------------------
2134: open C;
2135: loop

Line 2153: WHEN FND_API.G_EXC_ERROR THEN

2149: Close_Debug_Session ;
2150: END IF ;
2151:
2152: EXCEPTION
2153: WHEN FND_API.G_EXC_ERROR THEN
2154: ROLLBACK TO Delete_Attachments;
2155: x_return_status := FND_API.G_RET_STS_ERROR;
2156: FND_MSG_PUB.Count_And_Get
2157: ( p_count => x_msg_count

Line 2155: x_return_status := FND_API.G_RET_STS_ERROR;

2151:
2152: EXCEPTION
2153: WHEN FND_API.G_EXC_ERROR THEN
2154: ROLLBACK TO Delete_Attachments;
2155: x_return_status := FND_API.G_RET_STS_ERROR;
2156: FND_MSG_PUB.Count_And_Get
2157: ( p_count => x_msg_count
2158: ,p_data => x_msg_data );
2159: IF g_debug_flag THEN

Line 2163: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2159: IF g_debug_flag THEN
2160: Write_Debug('Rollback and Finish with expected error.') ;
2161: Close_Debug_Session ;
2162: END IF ;
2163: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2164: ROLLBACK TO Delete_Attachments;
2165: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2166: FND_MSG_PUB.Count_And_Get
2167: ( p_count => x_msg_count

Line 2165: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2161: Close_Debug_Session ;
2162: END IF ;
2163: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2164: ROLLBACK TO Delete_Attachments;
2165: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2166: FND_MSG_PUB.Count_And_Get
2167: ( p_count => x_msg_count
2168: ,p_data => x_msg_data );
2169: IF g_debug_flag THEN

Line 2175: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2171: Close_Debug_Session ;
2172: END IF ;
2173: WHEN OTHERS THEN
2174: ROLLBACK TO Delete_Attachments;
2175: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2176: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
2177: THEN
2178: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME, l_api_name );
2179: END IF;

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

2187: END Delete_Attachments;
2188:
2189: Procedure Delete_Attachment (
2190: p_api_version IN NUMBER --
2191: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
2192: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
2193: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2194: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
2195: ,p_output_dir IN VARCHAR2 := NULL --

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

2188:
2189: Procedure Delete_Attachment (
2190: p_api_version IN NUMBER --
2191: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
2192: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
2193: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2194: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
2195: ,p_output_dir IN VARCHAR2 := NULL --
2196: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Attachment.log'

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

2189: Procedure Delete_Attachment (
2190: p_api_version IN NUMBER --
2191: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
2192: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
2193: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2194: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
2195: ,p_output_dir IN VARCHAR2 := NULL --
2196: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Attachment.log'
2197: ,x_return_status OUT NOCOPY VARCHAR2 --

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

2190: p_api_version IN NUMBER --
2191: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
2192: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
2193: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2194: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
2195: ,p_output_dir IN VARCHAR2 := NULL --
2196: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Attachment.log'
2197: ,x_return_status OUT NOCOPY VARCHAR2 --
2198: ,x_msg_count OUT NOCOPY NUMBER --

Line 2214: IF NOT FND_API.Compatible_API_Call ( l_api_version

2210: BEGIN
2211: -- Standard Start of API savepoint
2212: SAVEPOINT Delete_Attachment;
2213: -- Standard call to check for call compatibility
2214: IF NOT FND_API.Compatible_API_Call ( l_api_version
2215: ,p_api_version
2216: ,l_api_name
2217: ,G_PKG_NAME )
2218: THEN

Line 2219: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2215: ,p_api_version
2216: ,l_api_name
2217: ,G_PKG_NAME )
2218: THEN
2219: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2220: END IF;
2221: -- Initialize message list if p_init_msg_list is set to TRUE.
2222: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2223: FND_MSG_PUB.initialize;

Line 2222: IF FND_API.to_Boolean( p_init_msg_list ) THEN

2218: THEN
2219: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2220: END IF;
2221: -- Initialize message list if p_init_msg_list is set to TRUE.
2222: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2223: FND_MSG_PUB.initialize;
2224: END IF ;
2225: -- For Test/Debug
2226: IF FND_API.to_Boolean( p_debug ) THEN

Line 2226: IF FND_API.to_Boolean( p_debug ) THEN

2222: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2223: FND_MSG_PUB.initialize;
2224: END IF ;
2225: -- For Test/Debug
2226: IF FND_API.to_Boolean( p_debug ) THEN
2227: Open_Debug_Session(p_output_dir, p_debug_filename ) ;
2228: END IF ;
2229:
2230: -- Write debug message if debug mode is on

Line 2239: x_return_status := FND_API.G_RET_STS_SUCCESS;

2235: Write_Debug('-----------------------------------------------------');
2236: Write_Debug('Initializing return status... ' );
2237: END IF ;
2238: -- Initialize API return status to success
2239: x_return_status := FND_API.G_RET_STS_SUCCESS;
2240:
2241: -- Real code starts here -----------------------------------------------
2242: begin
2243: select document_id into l_document_id

Line 2265: WHEN FND_API.G_EXC_ERROR THEN

2261: Close_Debug_Session ;
2262: END IF ;
2263:
2264: EXCEPTION
2265: WHEN FND_API.G_EXC_ERROR THEN
2266: ROLLBACK TO Delete_Attachment;
2267: x_return_status := FND_API.G_RET_STS_ERROR;
2268: FND_MSG_PUB.Count_And_Get
2269: ( p_count => x_msg_count

Line 2267: x_return_status := FND_API.G_RET_STS_ERROR;

2263:
2264: EXCEPTION
2265: WHEN FND_API.G_EXC_ERROR THEN
2266: ROLLBACK TO Delete_Attachment;
2267: x_return_status := FND_API.G_RET_STS_ERROR;
2268: FND_MSG_PUB.Count_And_Get
2269: ( p_count => x_msg_count
2270: ,p_data => x_msg_data );
2271: IF g_debug_flag THEN

Line 2275: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2271: IF g_debug_flag THEN
2272: Write_Debug('Rollback and Finish with expected error.') ;
2273: Close_Debug_Session ;
2274: END IF ;
2275: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2276: ROLLBACK TO Delete_Attachment;
2277: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2278: FND_MSG_PUB.Count_And_Get
2279: ( p_count => x_msg_count

Line 2277: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2273: Close_Debug_Session ;
2274: END IF ;
2275: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2276: ROLLBACK TO Delete_Attachment;
2277: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2278: FND_MSG_PUB.Count_And_Get
2279: ( p_count => x_msg_count
2280: ,p_data => x_msg_data );
2281: IF g_debug_flag THEN

Line 2287: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2283: Close_Debug_Session ;
2284: END IF ;
2285: WHEN OTHERS THEN
2286: ROLLBACK TO Delete_Attachment;
2287: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2288: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
2289: THEN
2290: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME, l_api_name );
2291: END IF;

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

2299: END Delete_Attachment;
2300:
2301: Procedure Delete_Changes (
2302: p_api_version IN NUMBER --
2303: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
2304: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
2305: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2306: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
2307: ,p_output_dir IN VARCHAR2 := NULL --

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

2300:
2301: Procedure Delete_Changes (
2302: p_api_version IN NUMBER --
2303: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
2304: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
2305: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2306: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
2307: ,p_output_dir IN VARCHAR2 := NULL --
2308: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Changes.log'

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

2301: Procedure Delete_Changes (
2302: p_api_version IN NUMBER --
2303: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
2304: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
2305: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2306: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
2307: ,p_output_dir IN VARCHAR2 := NULL --
2308: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Changes.log'
2309: ,x_return_status OUT NOCOPY VARCHAR2 --

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

2302: p_api_version IN NUMBER --
2303: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
2304: ,p_commit IN VARCHAR2 := FND_API.G_FALSE --
2305: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2306: ,p_debug IN VARCHAR2 := FND_API.G_FALSE --
2307: ,p_output_dir IN VARCHAR2 := NULL --
2308: ,p_debug_filename IN VARCHAR2 := 'ENGUATTB.Delete_Changes.log'
2309: ,x_return_status OUT NOCOPY VARCHAR2 --
2310: ,x_msg_count OUT NOCOPY NUMBER --

Line 2325: IF NOT FND_API.Compatible_API_Call ( l_api_version

2321: BEGIN
2322: -- Standard Start of API savepoint
2323: SAVEPOINT Delete_Changes;
2324: -- Standard call to check for call compatibility
2325: IF NOT FND_API.Compatible_API_Call ( l_api_version
2326: ,p_api_version
2327: ,l_api_name
2328: ,G_PKG_NAME )
2329: THEN

Line 2330: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2326: ,p_api_version
2327: ,l_api_name
2328: ,G_PKG_NAME )
2329: THEN
2330: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2331: END IF;
2332: -- Initialize message list if p_init_msg_list is set to TRUE.
2333: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2334: FND_MSG_PUB.initialize;

Line 2333: IF FND_API.to_Boolean( p_init_msg_list ) THEN

2329: THEN
2330: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2331: END IF;
2332: -- Initialize message list if p_init_msg_list is set to TRUE.
2333: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2334: FND_MSG_PUB.initialize;
2335: END IF ;
2336: -- For Test/Debug
2337: IF FND_API.to_Boolean( p_debug ) THEN

Line 2337: IF FND_API.to_Boolean( p_debug ) THEN

2333: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2334: FND_MSG_PUB.initialize;
2335: END IF ;
2336: -- For Test/Debug
2337: IF FND_API.to_Boolean( p_debug ) THEN
2338: Open_Debug_Session(p_output_dir, p_debug_filename ) ;
2339: END IF ;
2340:
2341: -- Write debug message if debug mode is on

Line 2351: x_return_status := FND_API.G_RET_STS_SUCCESS;

2347: Write_Debug('-----------------------------------------------------');
2348: Write_Debug('Initializing return status... ' );
2349: END IF ;
2350: -- Initialize API return status to success
2351: x_return_status := FND_API.G_RET_STS_SUCCESS;
2352:
2353: -- Real code starts here -----------------------------------------------
2354: delete from eng_attachment_changes
2355: where change_id = p_change_id

Line 2368: WHEN FND_API.G_EXC_ERROR THEN

2364: Close_Debug_Session ;
2365: END IF ;
2366:
2367: EXCEPTION
2368: WHEN FND_API.G_EXC_ERROR THEN
2369: ROLLBACK TO Delete_Changes;
2370: x_return_status := FND_API.G_RET_STS_ERROR;
2371: FND_MSG_PUB.Count_And_Get
2372: ( p_count => x_msg_count

Line 2370: x_return_status := FND_API.G_RET_STS_ERROR;

2366:
2367: EXCEPTION
2368: WHEN FND_API.G_EXC_ERROR THEN
2369: ROLLBACK TO Delete_Changes;
2370: x_return_status := FND_API.G_RET_STS_ERROR;
2371: FND_MSG_PUB.Count_And_Get
2372: ( p_count => x_msg_count
2373: ,p_data => x_msg_data );
2374: IF g_debug_flag THEN

Line 2378: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2374: IF g_debug_flag THEN
2375: Write_Debug('Rollback and Finish with expected error.') ;
2376: Close_Debug_Session ;
2377: END IF ;
2378: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2379: ROLLBACK TO Delete_Changes;
2380: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2381: FND_MSG_PUB.Count_And_Get
2382: ( p_count => x_msg_count

Line 2380: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2376: Close_Debug_Session ;
2377: END IF ;
2378: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2379: ROLLBACK TO Delete_Changes;
2380: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2381: FND_MSG_PUB.Count_And_Get
2382: ( p_count => x_msg_count
2383: ,p_data => x_msg_data );
2384: IF g_debug_flag THEN

Line 2390: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2386: Close_Debug_Session ;
2387: END IF ;
2388: WHEN OTHERS THEN
2389: ROLLBACK TO Delete_Changes;
2390: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2391: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
2392: THEN
2393: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME, l_api_name );
2394: END IF;

Line 2441: x_return_status := FND_API.G_RET_STS_SUCCESS;

2437:
2438: SAVEPOINT Implement_Attachment_Change;
2439:
2440: -- Initialize API return status to success
2441: x_return_status := FND_API.G_RET_STS_SUCCESS;
2442:
2443: l_change_id := p_change_id;
2444: l_revised_item_seq_id := p_rev_item_seq_id;
2445:

Line 2504: x_return_status := FND_API.G_RET_STS_ERROR;

2500: END LOOP;
2501:
2502: EXCEPTION
2503: WHEN change_policy_defined THEN
2504: x_return_status := FND_API.G_RET_STS_ERROR;
2505: x_msg_count := 1;
2506: x_msg_data := 'Error: This Change Order has floating version attachments that are under change required change policy. Such CO cannot be implemented';
2507: RAISE FND_API.G_EXC_ERROR;
2508: WHEN OTHERS THEN

Line 2507: RAISE FND_API.G_EXC_ERROR;

2503: WHEN change_policy_defined THEN
2504: x_return_status := FND_API.G_RET_STS_ERROR;
2505: x_msg_count := 1;
2506: x_msg_data := 'Error: This Change Order has floating version attachments that are under change required change policy. Such CO cannot be implemented';
2507: RAISE FND_API.G_EXC_ERROR;
2508: WHEN OTHERS THEN
2509: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
2510: THEN
2511: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME, l_api_name );