DBA Data[Home] [Help]

APPS.AMW_LOAD_CONSTRAINT_DATA dependencies on FND_API

Line 54: x_return_status := FND_API.G_RET_STS_SUCCESS;

50: CURSOR c_resp_appl_id (c_resp_id NUMBER) IS
51: select application_id from fnd_responsibility
52: where responsibility_id = c_resp_id;
53: BEGIN
54: x_return_status := FND_API.G_RET_STS_SUCCESS;
55:
56: --Added by DLIAO. fix for duplicate function/cp/resp. issue.
57: l_application_id := p_app_id;
58:

Line 102: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

98: );
99:
100: EXCEPTION
101: WHEN OTHERS THEN
102: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
103: v_err_msg :='Error working in procedure: '
104: || L_API_NAME
105: || ' '
106: || SUBSTR (SQLERRM, 1, 100);

Line 128: x_return_status := FND_API.G_RET_STS_SUCCESS;

124: IS
125: L_API_NAME CONSTANT VARCHAR2(30) := 'delete_constraint_entries';
126: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
127: BEGIN
128: x_return_status := FND_API.G_RET_STS_SUCCESS;
129:
130: delete from amw_constraint_entries
131: where constraint_rev_id = p_constraint_rev_id;
132:

Line 142: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

138: WHEN no_data_found THEN
139: fnd_file.put_line (fnd_file.LOG, 'No data found for AMW_LOAD_CONSTRAINT_DATA.delete_constraint_entries: constraint_rev_id = '||p_constraint_rev_id);
140:
141: WHEN OTHERS THEN
142: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
143: v_err_msg :='Error working in procedure: '
144: || L_API_NAME
145: || ' '
146: || SUBSTR (SQLERRM, 1, 100);

Line 167: x_return_status := FND_API.G_RET_STS_SUCCESS;

163: IS
164: L_API_NAME CONSTANT VARCHAR2(30) := 'delete_constraint_waivers';
165: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
166: BEGIN
167: x_return_status := FND_API.G_RET_STS_SUCCESS;
168:
169: delete from amw_constraint_waivers
170: where constraint_rev_id = p_constraint_rev_id;
171:

Line 181: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

177: WHEN no_data_found THEN
178: fnd_file.put_line (fnd_file.LOG, 'No data found for AMW_LOAD_CONSTRAINT_DATA.delete_constraint_waivers: constraint_rev_id = '||p_constraint_rev_id);
179:
180: WHEN OTHERS THEN
181: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
182: v_err_msg :='Error working in procedure: '
183: || L_API_NAME
184: || ' '
185: || SUBSTR (SQLERRM, 1, 100);

Line 217: x_return_status := FND_API.G_RET_STS_SUCCESS;

213: -- store the violation status (status_code), default is 'NA' (Not Applicable)
214: l_violation_status VARCHAR2(30) := 'NA';
215:
216: BEGIN
217: x_return_status := FND_API.G_RET_STS_SUCCESS;
218:
219: -- decide violation status, if no passed-in p_violation_status, use default
220: IF (p_violation_status is not NULL) THEN
221: l_violation_status := p_violation_status;

Line 237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

233: WHEN no_data_found THEN
234: fnd_file.put_line (fnd_file.LOG, 'No data found for AMW_LOAD_CONSTRAINT_DATA.update_violations: constraint_rev_id = '||p_constraint_rev_id);
235:
236: WHEN OTHERS THEN
237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
238: v_err_msg :='Error working in procedure: '
239: || L_API_NAME
240: || ' '
241: || SUBSTR (SQLERRM, 1, 100);

Line 458: x_return_status := FND_API.G_RET_STS_SUCCESS;

454: OPEN c_constraint_rev_id;
455: FETCH c_constraint_rev_id INTO l_constraint_rev_id;
456: CLOSE c_constraint_rev_id;
457:
458: x_return_status := FND_API.G_RET_STS_SUCCESS;
459: x_CONSTRAINT_REV_ID := NULL;
460: IF l_classification IS NULL THEN
461: BEGIN
462: SELECT work_type_id

Line 521: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

517: --fnd_file.put_line(fnd_file.LOG,'Done with AMW_CONSTRAINTS_PKG.INSERT_ROW');
518:
519: EXCEPTION
520: WHEN OTHERS THEN
521: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
522: v_err_msg :='Error working in procedure: '
523: || L_API_NAME
524: || ' '
525: || SUBSTR (SQLERRM, 1, 100);

Line 581: x_return_status := FND_API.G_RET_STS_SUCCESS;

577: OPEN c_constraint_rev_id;
578: FETCH c_constraint_rev_id INTO l_constraint_rev_id;
579: CLOSE c_constraint_rev_id;
580:
581: x_return_status := FND_API.G_RET_STS_SUCCESS;
582: IF l_classification IS NULL THEN
583: OPEN c_classification(p_CONSTRAINT_REV_ID);
584: FETCH c_classification INTO l_classification;
585: CLOSE c_classification;

Line 634: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

630: --fnd_file.put_line(fnd_file.LOG,'Done with AMW_CONSTRAINTS_PKG.UPDATE_ROW');
631:
632: EXCEPTION
633: WHEN OTHERS THEN
634: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
635: v_err_msg :='Error working in procedure: '
636: || L_API_NAME
637: || ' '
638: || SUBSTR (SQLERRM, 1, 100);

Line 840: x_return_status := FND_API.G_RET_STS_SUCCESS;

836:
837: BEGIN
838: --fnd_file.put_line (fnd_file.LOG, 'resp id: '||fnd_global.RESP_ID);
839: --fnd_file.put_line (fnd_file.LOG, 'resp appl id: '||fnd_global.RESP_APPL_ID);
840: x_return_status := FND_API.G_RET_STS_SUCCESS;
841:
842: -- use party_id as entered_by_id in AMW_CONSTRAINTS_B
843: l_entered_by_id := Get_Party_Id(p_user_id);
844: IF (l_entered_by_id is NULL) THEN

Line 1065: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1061: p_user_id => p_user_id
1062: );
1063: --fnd_file.put_line(fnd_file.LOG,'%%%%%%%%%%%% After AMW_LOAD_CONSTRIANT_DATA.insert_constraint %%%%%%%%%%%%');
1064:
1065: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1066: v_err_msg :='Error working in procedure: '
1067: || L_API_NAME
1068: || ' '
1069: || SUBSTR (SQLERRM, 1, 100);

Line 1074: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1070: fnd_file.put_line (fnd_file.LOG, SUBSTR (v_err_msg, 1, 200));
1071: update_interface_with_error (v_err_msg
1072: ,'AMW_CONSTRAINTS'
1073: ,l_interface_id);
1074: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1075: END IF;
1076:
1077:
1078: -- create new constraint entries for the newly created constraint

Line 1095: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1091: p_group_code => constraint_entries_rec.cst_entries_group_code,
1092: p_object_type => 'RESP' -- 21:04:2006 psomanat : temporary fix for Object_type column = null
1093: ); -- for responsibility constraint created via webadi
1094:
1095: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1096: v_err_msg :='Error working in procedure: '
1097: || L_API_NAME
1098: || ' '
1099: || SUBSTR (SQLERRM, 1, 100);

Line 1104: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1100: fnd_file.put_line (fnd_file.LOG, SUBSTR (v_err_msg, 1, 200));
1101: update_interface_with_error (v_err_msg
1102: ,'AMW_CONSTRAINT_ENTRIES'
1103: ,constraint_entries_rec.cst_interface_id);
1104: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1105: END IF;
1106: END LOOP; -- end of for: constraint_entries_rec, RESPSET constraint type
1107: ELSE
1108: -- constraint type is Responsibility (RESPALL, RESPME)

Line 1121: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1117: p_group_code => '1', -- 21:04:2006 psomanat : group code set to 1 in self service
1118: p_object_type => 'RESP' -- 21:04:2006 psomanat : temporary fix for Object_type column = null
1119: ); -- for responsibility constraint created via webadi
1120:
1121: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1122: v_err_msg :='Error working in procedure: '
1123: || L_API_NAME
1124: || ' '
1125: || SUBSTR (SQLERRM, 1, 100);

Line 1130: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1126: fnd_file.put_line (fnd_file.LOG, SUBSTR (v_err_msg, 1, 200));
1127: update_interface_with_error (v_err_msg
1128: ,'AMW_CONSTRAINT_ENTRIES'
1129: ,constraint_entries_rec.cst_interface_id);
1130: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1131: END IF;
1132: END LOOP; -- end of for: constraint_entries_rec, RESPALL, RESPME constraint type
1133: END IF; -- end of if: constraint_rec.cst_type_code = 'RESPSET'
1134:

Line 1149: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1145: x_return_status => x_return_status,
1146: p_group_code => constraint_entries_rec.cst_entries_group_code,
1147: p_object_type => constraint_entries_rec.cst_violat_obj_type
1148: );
1149: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1150: v_err_msg :='Error working in procedure: '
1151: || L_API_NAME
1152: || ' '
1153: || SUBSTR (SQLERRM, 1, 100);

Line 1158: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1154: fnd_file.put_line (fnd_file.LOG, SUBSTR (v_err_msg, 1, 200));
1155: update_interface_with_error (v_err_msg
1156: ,'AMW_CONSTRAINT_ENTRIES'
1157: ,constraint_entries_rec.cst_interface_id);
1158: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1159: END IF;
1160: END LOOP; -- end of for: constraint_entries_rec, Function Constraint (SET) type
1161: ELSE
1162: -- constraint type is Function (ALL, ME)

Line 1174: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1170: x_return_status => x_return_status,
1171: p_group_code => '1', -- 21:04:2006 psomanat : group code set to 1 in self service
1172: p_object_type => constraint_entries_rec.cst_violat_obj_type
1173: );
1174: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1175: v_err_msg :='Error working in procedure: '
1176: || L_API_NAME
1177: || ' '
1178: || SUBSTR (SQLERRM, 1, 100);

Line 1183: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1179: fnd_file.put_line (fnd_file.LOG, SUBSTR (v_err_msg, 1, 200));
1180: update_interface_with_error (v_err_msg
1181: ,'AMW_CONSTRAINT_ENTRIES'
1182: ,constraint_entries_rec.cst_interface_id);
1183: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1184: END IF;
1185: END LOOP; -- end of for: constraint_entries_rec, Function Constraint (ALL, ME) type
1186:
1187: END IF; -- end of if: constraint_rec.cst_type_code = 'SET'

Line 1210: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1206: p_user_id => p_user_id
1207: );
1208: --fnd_file.put_line(fnd_file.LOG,'%%%%%%%%%%%% After AMW_LOAD_CONSTRIANT_DATA.update_constraint %%%%%%%%%%%%');
1209:
1210: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1211: v_err_msg :='Error working in procedure: '
1212: || L_API_NAME
1213: || ' '
1214: || SUBSTR (SQLERRM, 1, 100);

Line 1219: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1215: fnd_file.put_line (fnd_file.LOG, SUBSTR (v_err_msg, 1, 200));
1216: update_interface_with_error (v_err_msg
1217: ,'AMW_CONSTRAINTS'
1218: ,l_interface_id);
1219: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1220: END IF;
1221:
1222: -- update violations's status for specified constraint_rev_d
1223: update_violations (

Line 1228: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1224: x_return_status => x_return_status,
1225: p_constraint_rev_id => l_constraint_rev_id,
1226: p_violation_status => 'NA'
1227: );
1228: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1229: v_err_msg :='Error working in procedure: '
1230: || L_API_NAME
1231: || ' '
1232: || SUBSTR (SQLERRM, 1, 100);

Line 1237: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1233: fnd_file.put_line (fnd_file.LOG, SUBSTR (v_err_msg, 1, 200));
1234: update_interface_with_error (v_err_msg
1235: ,'AMW_VIOLATIONS'
1236: ,l_interface_id);
1237: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1238: END IF;
1239:
1240:
1241: -- delete existing constraint waivers for specified constraint_rev_d

Line 1246: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1242: delete_constraint_waivers(
1243: p_constraint_rev_id => l_constraint_rev_id,
1244: x_return_status => x_return_status
1245: );
1246: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1247: v_err_msg :='Error working in procedure: '
1248: || L_API_NAME
1249: || ' '
1250: || SUBSTR (SQLERRM, 1, 100);

Line 1255: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1251: fnd_file.put_line (fnd_file.LOG, SUBSTR (v_err_msg, 1, 200));
1252: update_interface_with_error (v_err_msg
1253: ,'AMW_CONSTRAINT_WAIVERS'
1254: ,l_interface_id);
1255: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1256: END IF;
1257:
1258: -- delete existing constraint entries for specified constraint_rev_d
1259: delete_constraint_entries(

Line 1263: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1259: delete_constraint_entries(
1260: p_constraint_rev_id => l_constraint_rev_id,
1261: x_return_status => x_return_status
1262: );
1263: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1264: v_err_msg :='Error working in procedure: '
1265: || L_API_NAME
1266: || ' '
1267: || SUBSTR (SQLERRM, 1, 100);

Line 1272: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1268: fnd_file.put_line (fnd_file.LOG, SUBSTR (v_err_msg, 1, 200));
1269: update_interface_with_error (v_err_msg
1270: ,'AMW_CONSTRAINT_ENTRIES'
1271: ,l_interface_id);
1272: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1273: END IF;
1274:
1275: -- insert constraint entries for the specified constraint_rev_id
1276: -- 09.13.2005 tsho: consider group_code, object_type of constraint entries

Line 1292: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1288: p_group_code => constraint_entries_rec.cst_entries_group_code,
1289: p_object_type => 'RESP' -- 21:04:2006 psomanat : temporary fix for Object_type column = null
1290: ); -- for responsibility constraint created via webadi
1291:
1292: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1293: v_err_msg :='Error working in procedure: '
1294: || L_API_NAME
1295: || ' '
1296: || SUBSTR (SQLERRM, 1, 100);

Line 1301: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1297: fnd_file.put_line (fnd_file.LOG, SUBSTR (v_err_msg, 1, 200));
1298: update_interface_with_error (v_err_msg
1299: ,'AMW_CONSTRAINT_ENTRIES'
1300: ,constraint_entries_rec.cst_interface_id);
1301: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1302: END IF;
1303: END LOOP; -- end of for: constraint_entries_rec, RESPSET constraint type
1304: ELSE
1305: -- constraint type is Responsibility (RESPALL, RESPME)

Line 1318: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1314: p_group_code => '1', -- 21:04:2006 psomanat : group code set to 1 in self service
1315: p_object_type => 'RESP' -- 21:04:2006 psomanat : temporary fix for Object_type column = null
1316: ); -- for responsibility constraint created via webadi
1317:
1318: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1319: v_err_msg :='Error working in procedure: '
1320: || L_API_NAME
1321: || ' '
1322: || SUBSTR (SQLERRM, 1, 100);

Line 1327: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1323: fnd_file.put_line (fnd_file.LOG, SUBSTR (v_err_msg, 1, 200));
1324: update_interface_with_error (v_err_msg
1325: ,'AMW_CONSTRAINT_ENTRIES'
1326: ,constraint_entries_rec.cst_interface_id);
1327: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1328: END IF;
1329: END LOOP; -- end of for: constraint_entries_rec, RESPALL, RESPME constraint type
1330: END IF; -- end of if: constraint_rec.cst_type_code = 'RESPSET'
1331:

Line 1346: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1342: x_return_status => x_return_status,
1343: p_group_code => constraint_entries_rec.cst_entries_group_code,
1344: p_object_type => constraint_entries_rec.cst_violat_obj_type
1345: );
1346: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1347: v_err_msg :='Error working in procedure: '
1348: || L_API_NAME
1349: || ' '
1350: || SUBSTR (SQLERRM, 1, 100);

Line 1355: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1351: fnd_file.put_line (fnd_file.LOG, SUBSTR (v_err_msg, 1, 200));
1352: update_interface_with_error (v_err_msg
1353: ,'AMW_CONSTRAINT_ENTRIES'
1354: ,constraint_entries_rec.cst_interface_id);
1355: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1356: END IF;
1357: END LOOP; -- end of for: constraint_entries_rec, Function Constraint (SET) type
1358: ELSE
1359: -- constraint type is Function (ALL, ME)

Line 1371: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1367: x_return_status => x_return_status,
1368: p_group_code => '1', -- 21:04:2006 psomanat : group code set to 1 in self service
1369: p_object_type => constraint_entries_rec.cst_violat_obj_type
1370: );
1371: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1372: v_err_msg :='Error working in procedure: '
1373: || L_API_NAME
1374: || ' '
1375: || SUBSTR (SQLERRM, 1, 100);

Line 1380: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1376: fnd_file.put_line (fnd_file.LOG, SUBSTR (v_err_msg, 1, 200));
1377: update_interface_with_error (v_err_msg
1378: ,'AMW_CONSTRAINT_ENTRIES'
1379: ,constraint_entries_rec.cst_interface_id);
1380: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1381: END IF;
1382: END LOOP; -- end of for: constraint_entries_rec, Function Constraint (ALL, ME) type
1383:
1384: END IF; -- end of if: constraint_rec.cst_type_code = 'SET'