220: and interface_type = p_intf_type;
221:
222: ELSE
223: x_return_status := fnd_api.g_ret_sts_error;
224: fnd_message.clear;
225: fnd_message.set_name('JTF', 'JTY_OTH_TERR_CIR_REF');
226: x_msg_data := fnd_message.GET();
227:
228: UPDATE jty_webadi_oth_terr_intf
221:
222: ELSE
223: x_return_status := fnd_api.g_ret_sts_error;
224: fnd_message.clear;
225: fnd_message.set_name('JTF', 'JTY_OTH_TERR_CIR_REF');
226: x_msg_data := fnd_message.GET();
227:
228: UPDATE jty_webadi_oth_terr_intf
229: SET status = x_return_status,
222: ELSE
223: x_return_status := fnd_api.g_ret_sts_error;
224: fnd_message.clear;
225: fnd_message.set_name('JTF', 'JTY_OTH_TERR_CIR_REF');
226: x_msg_data := fnd_message.GET();
227:
228: UPDATE jty_webadi_oth_terr_intf
229: SET status = x_return_status,
230: error_msg = x_msg_data
234: END IF;
235: EXCEPTION WHEN OTHERS THEN
236: IF SQLCODE = -01436 THEN
237: x_return_status := fnd_api.g_ret_sts_error;
238: fnd_message.clear;
239: fnd_message.set_name('JTF', 'JTY_OTH_TERR_CIR_REF');
240: x_msg_data := fnd_message.GET();
241:
242: UPDATE jty_webadi_oth_terr_intf
235: EXCEPTION WHEN OTHERS THEN
236: IF SQLCODE = -01436 THEN
237: x_return_status := fnd_api.g_ret_sts_error;
238: fnd_message.clear;
239: fnd_message.set_name('JTF', 'JTY_OTH_TERR_CIR_REF');
240: x_msg_data := fnd_message.GET();
241:
242: UPDATE jty_webadi_oth_terr_intf
243: SET status = x_return_status,
236: IF SQLCODE = -01436 THEN
237: x_return_status := fnd_api.g_ret_sts_error;
238: fnd_message.clear;
239: fnd_message.set_name('JTF', 'JTY_OTH_TERR_CIR_REF');
240: x_msg_data := fnd_message.GET();
241:
242: UPDATE jty_webadi_oth_terr_intf
243: SET status = x_return_status,
244: error_msg = x_msg_data
249: END;
250:
251: else
252: x_return_status := FND_API.G_RET_STS_ERROR;
253: fnd_message.clear;
254: FND_MESSAGE.set_name ('JTF', 'JTY_OTH_TERR_NON_UNIQUE_TERR');
255: FND_MESSAGE.set_token ('POSITION', l_parent);
256: X_Msg_Data := fnd_message.get();
257: update JTY_WEBADI_OTH_TERR_INTF
250:
251: else
252: x_return_status := FND_API.G_RET_STS_ERROR;
253: fnd_message.clear;
254: FND_MESSAGE.set_name ('JTF', 'JTY_OTH_TERR_NON_UNIQUE_TERR');
255: FND_MESSAGE.set_token ('POSITION', l_parent);
256: X_Msg_Data := fnd_message.get();
257: update JTY_WEBADI_OTH_TERR_INTF
258: set status = x_return_status
251: else
252: x_return_status := FND_API.G_RET_STS_ERROR;
253: fnd_message.clear;
254: FND_MESSAGE.set_name ('JTF', 'JTY_OTH_TERR_NON_UNIQUE_TERR');
255: FND_MESSAGE.set_token ('POSITION', l_parent);
256: X_Msg_Data := fnd_message.get();
257: update JTY_WEBADI_OTH_TERR_INTF
258: set status = x_return_status
259: , error_msg = X_Msg_Data
252: x_return_status := FND_API.G_RET_STS_ERROR;
253: fnd_message.clear;
254: FND_MESSAGE.set_name ('JTF', 'JTY_OTH_TERR_NON_UNIQUE_TERR');
255: FND_MESSAGE.set_token ('POSITION', l_parent);
256: X_Msg_Data := fnd_message.get();
257: update JTY_WEBADI_OTH_TERR_INTF
258: set status = x_return_status
259: , error_msg = X_Msg_Data
260: where terr_name = l_hierarchy_tbl(c).terr_name
291: and name = l_parent
292: and parent_territory_id = l_anc_id;
293: else
294: x_return_status := FND_API.G_RET_STS_ERROR;
295: fnd_message.clear;
296: FND_MESSAGE.set_name ('JTF', 'JTY_OTH_TERR_NON_UNIQUE_TERR');
297: FND_MESSAGE.set_token ('POSITION', l_parent);
298: X_Msg_Data := fnd_message.get();
299:
292: and parent_territory_id = l_anc_id;
293: else
294: x_return_status := FND_API.G_RET_STS_ERROR;
295: fnd_message.clear;
296: FND_MESSAGE.set_name ('JTF', 'JTY_OTH_TERR_NON_UNIQUE_TERR');
297: FND_MESSAGE.set_token ('POSITION', l_parent);
298: X_Msg_Data := fnd_message.get();
299:
300: update JTY_WEBADI_OTH_TERR_INTF
293: else
294: x_return_status := FND_API.G_RET_STS_ERROR;
295: fnd_message.clear;
296: FND_MESSAGE.set_name ('JTF', 'JTY_OTH_TERR_NON_UNIQUE_TERR');
297: FND_MESSAGE.set_token ('POSITION', l_parent);
298: X_Msg_Data := fnd_message.get();
299:
300: update JTY_WEBADI_OTH_TERR_INTF
301: set status = x_return_status
294: x_return_status := FND_API.G_RET_STS_ERROR;
295: fnd_message.clear;
296: FND_MESSAGE.set_name ('JTF', 'JTY_OTH_TERR_NON_UNIQUE_TERR');
297: FND_MESSAGE.set_token ('POSITION', l_parent);
298: X_Msg_Data := fnd_message.get();
299:
300: update JTY_WEBADI_OTH_TERR_INTF
301: set status = x_return_status
302: , error_msg = X_Msg_Data
391: SET parent_territory_id = l_parent_id
392: WHERE terr_id = p_terr_id;
393: ELSE
394: x_return_status := fnd_api.g_ret_sts_error;
395: fnd_message.clear;
396: fnd_message.set_name('JTF', 'JTY_OTH_TERR_CIR_REF');
397: x_msg_data := fnd_message.GET();
398:
399: UPDATE jty_webadi_oth_terr_intf
392: WHERE terr_id = p_terr_id;
393: ELSE
394: x_return_status := fnd_api.g_ret_sts_error;
395: fnd_message.clear;
396: fnd_message.set_name('JTF', 'JTY_OTH_TERR_CIR_REF');
397: x_msg_data := fnd_message.GET();
398:
399: UPDATE jty_webadi_oth_terr_intf
400: SET status = x_return_status,
393: ELSE
394: x_return_status := fnd_api.g_ret_sts_error;
395: fnd_message.clear;
396: fnd_message.set_name('JTF', 'JTY_OTH_TERR_CIR_REF');
397: x_msg_data := fnd_message.GET();
398:
399: UPDATE jty_webadi_oth_terr_intf
400: SET status = x_return_status,
401: error_msg = x_msg_data
405: END IF;
406: EXCEPTION WHEN OTHERS THEN
407: IF SQLCODE = -01436 THEN
408: x_return_status := fnd_api.g_ret_sts_error;
409: fnd_message.clear;
410: fnd_message.set_name('JTF', 'JTY_OTH_TERR_CIR_REF');
411: x_msg_data := fnd_message.GET();
412:
413: UPDATE jty_webadi_oth_terr_intf
406: EXCEPTION WHEN OTHERS THEN
407: IF SQLCODE = -01436 THEN
408: x_return_status := fnd_api.g_ret_sts_error;
409: fnd_message.clear;
410: fnd_message.set_name('JTF', 'JTY_OTH_TERR_CIR_REF');
411: x_msg_data := fnd_message.GET();
412:
413: UPDATE jty_webadi_oth_terr_intf
414: SET status = x_return_status,
407: IF SQLCODE = -01436 THEN
408: x_return_status := fnd_api.g_ret_sts_error;
409: fnd_message.clear;
410: fnd_message.set_name('JTF', 'JTY_OTH_TERR_CIR_REF');
411: x_msg_data := fnd_message.GET();
412:
413: UPDATE jty_webadi_oth_terr_intf
414: SET status = x_return_status,
415: error_msg = x_msg_data
420: END;
421:
422: ELSE
423: x_return_status := fnd_api.g_ret_sts_error;
424: fnd_message.clear;
425: fnd_message.set_name('JTF', 'JTY_OTH_TERR_NON_UNIQUE_TERR');
426: fnd_message.set_token('POSITION', l_parent);
427: x_msg_data := fnd_message.GET();
428:
421:
422: ELSE
423: x_return_status := fnd_api.g_ret_sts_error;
424: fnd_message.clear;
425: fnd_message.set_name('JTF', 'JTY_OTH_TERR_NON_UNIQUE_TERR');
426: fnd_message.set_token('POSITION', l_parent);
427: x_msg_data := fnd_message.GET();
428:
429: UPDATE jty_webadi_oth_terr_intf
422: ELSE
423: x_return_status := fnd_api.g_ret_sts_error;
424: fnd_message.clear;
425: fnd_message.set_name('JTF', 'JTY_OTH_TERR_NON_UNIQUE_TERR');
426: fnd_message.set_token('POSITION', l_parent);
427: x_msg_data := fnd_message.GET();
428:
429: UPDATE jty_webadi_oth_terr_intf
430: SET status = x_return_status,
423: x_return_status := fnd_api.g_ret_sts_error;
424: fnd_message.clear;
425: fnd_message.set_name('JTF', 'JTY_OTH_TERR_NON_UNIQUE_TERR');
426: fnd_message.set_token('POSITION', l_parent);
427: x_msg_data := fnd_message.GET();
428:
429: UPDATE jty_webadi_oth_terr_intf
430: SET status = x_return_status,
431: error_msg = x_msg_data
466: AND parent_terr_id = l_anc_id;
467:
468: ELSE
469: x_return_status := fnd_api.g_ret_sts_error;
470: fnd_message.clear;
471: fnd_message.set_name('JTF', 'JTY_OTH_TERR_NON_UNIQUE_TERR');
472: fnd_message.set_token('POSITION', l_parent);
473: x_msg_data := fnd_message.GET();
474:
467:
468: ELSE
469: x_return_status := fnd_api.g_ret_sts_error;
470: fnd_message.clear;
471: fnd_message.set_name('JTF', 'JTY_OTH_TERR_NON_UNIQUE_TERR');
472: fnd_message.set_token('POSITION', l_parent);
473: x_msg_data := fnd_message.GET();
474:
475: UPDATE jty_webadi_oth_terr_intf
468: ELSE
469: x_return_status := fnd_api.g_ret_sts_error;
470: fnd_message.clear;
471: fnd_message.set_name('JTF', 'JTY_OTH_TERR_NON_UNIQUE_TERR');
472: fnd_message.set_token('POSITION', l_parent);
473: x_msg_data := fnd_message.GET();
474:
475: UPDATE jty_webadi_oth_terr_intf
476: SET status = x_return_status,
469: x_return_status := fnd_api.g_ret_sts_error;
470: fnd_message.clear;
471: fnd_message.set_name('JTF', 'JTY_OTH_TERR_NON_UNIQUE_TERR');
472: fnd_message.set_token('POSITION', l_parent);
473: x_msg_data := fnd_message.GET();
474:
475: UPDATE jty_webadi_oth_terr_intf
476: SET status = x_return_status,
477: error_msg = x_msg_data
1203: BEGIN
1204: debugmsg('VALIDATE_TERRITORY_RECORDS: P_USER_SEQUENCE : ' || P_USER_SEQUENCE);
1205: debugmsg('VALIDATE_TERRITORY_RECORDS: P_INTF_TYPE : ' || P_INTF_TYPE);
1206: x_return_status := FND_API.G_RET_STS_ERROR;
1207: fnd_message.clear;
1208: fnd_message.set_name ('JTF', 'JTF_TTY_INVALID_TERR_NAME');
1209: X_Msg_Data := fnd_message.get();
1210: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTF_TTY_INVALID_TERR_NAME : ' );
1211: update JTY_WEBADI_OTH_TERR_INTF jwot
1204: debugmsg('VALIDATE_TERRITORY_RECORDS: P_USER_SEQUENCE : ' || P_USER_SEQUENCE);
1205: debugmsg('VALIDATE_TERRITORY_RECORDS: P_INTF_TYPE : ' || P_INTF_TYPE);
1206: x_return_status := FND_API.G_RET_STS_ERROR;
1207: fnd_message.clear;
1208: fnd_message.set_name ('JTF', 'JTF_TTY_INVALID_TERR_NAME');
1209: X_Msg_Data := fnd_message.get();
1210: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTF_TTY_INVALID_TERR_NAME : ' );
1211: update JTY_WEBADI_OTH_TERR_INTF jwot
1212: set status = x_return_status,
1205: debugmsg('VALIDATE_TERRITORY_RECORDS: P_INTF_TYPE : ' || P_INTF_TYPE);
1206: x_return_status := FND_API.G_RET_STS_ERROR;
1207: fnd_message.clear;
1208: fnd_message.set_name ('JTF', 'JTF_TTY_INVALID_TERR_NAME');
1209: X_Msg_Data := fnd_message.get();
1210: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTF_TTY_INVALID_TERR_NAME : ' );
1211: update JTY_WEBADI_OTH_TERR_INTF jwot
1212: set status = x_return_status,
1213: error_msg = X_Msg_Data
1217: and jwot.status is null;
1218:
1219: -- Fix for bug 8289489. Rank can't be null. This fix can be removed, if webadi raises error for not null columns.
1220: x_return_status := FND_API.G_RET_STS_ERROR;
1221: fnd_message.clear;
1222: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_INVALID_RANK');
1223: X_Msg_Data := fnd_message.get();
1224:
1225: update JTY_WEBADI_OTH_TERR_INTF jwot
1218:
1219: -- Fix for bug 8289489. Rank can't be null. This fix can be removed, if webadi raises error for not null columns.
1220: x_return_status := FND_API.G_RET_STS_ERROR;
1221: fnd_message.clear;
1222: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_INVALID_RANK');
1223: X_Msg_Data := fnd_message.get();
1224:
1225: update JTY_WEBADI_OTH_TERR_INTF jwot
1226: set status = x_return_status,
1219: -- Fix for bug 8289489. Rank can't be null. This fix can be removed, if webadi raises error for not null columns.
1220: x_return_status := FND_API.G_RET_STS_ERROR;
1221: fnd_message.clear;
1222: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_INVALID_RANK');
1223: X_Msg_Data := fnd_message.get();
1224:
1225: update JTY_WEBADI_OTH_TERR_INTF jwot
1226: set status = x_return_status,
1227: error_msg = X_Msg_Data
1232: and jwot.status is null;
1233:
1234: -- Fix for bug 8289489. ORG ID can't be null. This fix can be removed, if webadi raises error for not null columns.
1235: x_return_status := FND_API.G_RET_STS_ERROR;
1236: fnd_message.clear;
1237: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_INVALID_ORGID');
1238: X_Msg_Data := fnd_message.get();
1239:
1240: update JTY_WEBADI_OTH_TERR_INTF jwot
1233:
1234: -- Fix for bug 8289489. ORG ID can't be null. This fix can be removed, if webadi raises error for not null columns.
1235: x_return_status := FND_API.G_RET_STS_ERROR;
1236: fnd_message.clear;
1237: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_INVALID_ORGID');
1238: X_Msg_Data := fnd_message.get();
1239:
1240: update JTY_WEBADI_OTH_TERR_INTF jwot
1241: set status = x_return_status,
1234: -- Fix for bug 8289489. ORG ID can't be null. This fix can be removed, if webadi raises error for not null columns.
1235: x_return_status := FND_API.G_RET_STS_ERROR;
1236: fnd_message.clear;
1237: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_INVALID_ORGID');
1238: X_Msg_Data := fnd_message.get();
1239:
1240: update JTY_WEBADI_OTH_TERR_INTF jwot
1241: set status = x_return_status,
1242: error_msg = X_Msg_Data
1249: l_header := 'RSC';
1250: l_action_flag := 'D';
1251:
1252: x_return_status := FND_API.G_RET_STS_ERROR;
1253: fnd_message.clear;
1254: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_INVALID_ID');
1255: X_Msg_Data := fnd_message.get();
1256: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_INVALID_ID : ' );
1257: update JTY_WEBADI_OTH_TERR_INTF jwot
1250: l_action_flag := 'D';
1251:
1252: x_return_status := FND_API.G_RET_STS_ERROR;
1253: fnd_message.clear;
1254: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_INVALID_ID');
1255: X_Msg_Data := fnd_message.get();
1256: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_INVALID_ID : ' );
1257: update JTY_WEBADI_OTH_TERR_INTF jwot
1258: set status = x_return_status,
1251:
1252: x_return_status := FND_API.G_RET_STS_ERROR;
1253: fnd_message.clear;
1254: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_INVALID_ID');
1255: X_Msg_Data := fnd_message.get();
1256: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_INVALID_ID : ' );
1257: update JTY_WEBADI_OTH_TERR_INTF jwot
1258: set status = x_return_status,
1259: error_msg = X_Msg_Data
1309:
1310: l_action_flag := 'U';
1311:
1312: x_return_status := FND_API.G_RET_STS_ERROR;
1313: fnd_message.clear;
1314: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_INVALID_TEMPLATE');
1315: X_Msg_Data := fnd_message.get();
1316: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_INVALID_TEMPLATE : ' );
1317: update JTY_WEBADI_OTH_TERR_INTF jwot
1310: l_action_flag := 'U';
1311:
1312: x_return_status := FND_API.G_RET_STS_ERROR;
1313: fnd_message.clear;
1314: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_INVALID_TEMPLATE');
1315: X_Msg_Data := fnd_message.get();
1316: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_INVALID_TEMPLATE : ' );
1317: update JTY_WEBADI_OTH_TERR_INTF jwot
1318: set jwot.status = x_return_status,
1311:
1312: x_return_status := FND_API.G_RET_STS_ERROR;
1313: fnd_message.clear;
1314: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_INVALID_TEMPLATE');
1315: X_Msg_Data := fnd_message.get();
1316: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_INVALID_TEMPLATE : ' );
1317: update JTY_WEBADI_OTH_TERR_INTF jwot
1318: set jwot.status = x_return_status,
1319: jwot.error_msg = X_Msg_Data
1330: AND jwot.TERR_ID is not null;
1331:
1332:
1333: x_return_status := FND_API.G_RET_STS_ERROR;
1334: fnd_message.clear;
1335: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_NO_TEMPLATE');
1336: X_Msg_Data := fnd_message.get();
1337: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_NO_TEMPLATE : ' );
1338: update JTY_WEBADI_OTH_TERR_INTF jwot
1331:
1332:
1333: x_return_status := FND_API.G_RET_STS_ERROR;
1334: fnd_message.clear;
1335: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_NO_TEMPLATE');
1336: X_Msg_Data := fnd_message.get();
1337: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_NO_TEMPLATE : ' );
1338: update JTY_WEBADI_OTH_TERR_INTF jwot
1339: set status = x_return_status,
1332:
1333: x_return_status := FND_API.G_RET_STS_ERROR;
1334: fnd_message.clear;
1335: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_NO_TEMPLATE');
1336: X_Msg_Data := fnd_message.get();
1337: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_NO_TEMPLATE : ' );
1338: update JTY_WEBADI_OTH_TERR_INTF jwot
1339: set status = x_return_status,
1340: error_msg = X_Msg_Data
1346:
1347: -- Commented it as a part of fix for bug #5479649
1348: /*
1349: x_return_status := FND_API.G_RET_STS_ERROR;
1350: fnd_message.clear;
1351: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_INVALID_ACCESS');
1352: X_Msg_Data := fnd_message.get();
1353: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_INVALID_ACCESS : ' );
1354: update JTY_WEBADI_OTH_TERR_INTF jwot
1347: -- Commented it as a part of fix for bug #5479649
1348: /*
1349: x_return_status := FND_API.G_RET_STS_ERROR;
1350: fnd_message.clear;
1351: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_INVALID_ACCESS');
1352: X_Msg_Data := fnd_message.get();
1353: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_INVALID_ACCESS : ' );
1354: update JTY_WEBADI_OTH_TERR_INTF jwot
1355: set jwot.status = x_return_status,
1348: /*
1349: x_return_status := FND_API.G_RET_STS_ERROR;
1350: fnd_message.clear;
1351: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_INVALID_ACCESS');
1352: X_Msg_Data := fnd_message.get();
1353: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_INVALID_ACCESS : ' );
1354: update JTY_WEBADI_OTH_TERR_INTF jwot
1355: set jwot.status = x_return_status,
1356: jwot.error_msg = X_Msg_Data
1400: -- Fix for bug #5479649 START
1401: -- An error message should be displayed when all the access types
1402: -- are NONE for all the transaction type of a resource.
1403: x_return_status := FND_API.G_RET_STS_ERROR;
1404: fnd_message.clear;
1405: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_INVALID_ACCESS');
1406: X_Msg_Data := fnd_message.get();
1407: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_INVALID_ACCESS : ' );
1408: update JTY_WEBADI_OTH_TERR_INTF jwot
1401: -- An error message should be displayed when all the access types
1402: -- are NONE for all the transaction type of a resource.
1403: x_return_status := FND_API.G_RET_STS_ERROR;
1404: fnd_message.clear;
1405: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_INVALID_ACCESS');
1406: X_Msg_Data := fnd_message.get();
1407: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_INVALID_ACCESS : ' );
1408: update JTY_WEBADI_OTH_TERR_INTF jwot
1409: set jwot.status = x_return_status,
1402: -- are NONE for all the transaction type of a resource.
1403: x_return_status := FND_API.G_RET_STS_ERROR;
1404: fnd_message.clear;
1405: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_INVALID_ACCESS');
1406: X_Msg_Data := fnd_message.get();
1407: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_INVALID_ACCESS : ' );
1408: update JTY_WEBADI_OTH_TERR_INTF jwot
1409: set jwot.status = x_return_status,
1410: jwot.error_msg = X_Msg_Data
1433:
1434: -- Fix for bug # 6372728 START
1435: -- Should display a error message when user tries to add a duplicate reosurce.
1436: x_return_status := FND_API.G_RET_STS_ERROR;
1437: fnd_message.clear;
1438: fnd_message.set_name ('JTF', 'JTF_TTY_DUPLICATE_RESOURCE');
1439: X_Msg_Data := fnd_message.get();
1440: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTF_TTY_DUPLICATE_RESOURCE : ' );
1441: update JTY_WEBADI_OTH_TERR_INTF jwot
1434: -- Fix for bug # 6372728 START
1435: -- Should display a error message when user tries to add a duplicate reosurce.
1436: x_return_status := FND_API.G_RET_STS_ERROR;
1437: fnd_message.clear;
1438: fnd_message.set_name ('JTF', 'JTF_TTY_DUPLICATE_RESOURCE');
1439: X_Msg_Data := fnd_message.get();
1440: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTF_TTY_DUPLICATE_RESOURCE : ' );
1441: update JTY_WEBADI_OTH_TERR_INTF jwot
1442: set status = x_return_status
1435: -- Should display a error message when user tries to add a duplicate reosurce.
1436: x_return_status := FND_API.G_RET_STS_ERROR;
1437: fnd_message.clear;
1438: fnd_message.set_name ('JTF', 'JTF_TTY_DUPLICATE_RESOURCE');
1439: X_Msg_Data := fnd_message.get();
1440: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTF_TTY_DUPLICATE_RESOURCE : ' );
1441: update JTY_WEBADI_OTH_TERR_INTF jwot
1442: set status = x_return_status
1443: , error_msg = X_Msg_Data
1488: );
1489: -- Fix for bug # 9124144 END
1490:
1491: x_return_status := FND_API.G_RET_STS_ERROR;
1492: fnd_message.clear;
1493: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_RSC_START_DATE');
1494: X_Msg_Data := fnd_message.get();
1495: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_RSC_START_DATE : ' );
1496: UPDATE JTY_WEBADI_OTH_TERR_INTF jwot
1489: -- Fix for bug # 9124144 END
1490:
1491: x_return_status := FND_API.G_RET_STS_ERROR;
1492: fnd_message.clear;
1493: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_RSC_START_DATE');
1494: X_Msg_Data := fnd_message.get();
1495: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_RSC_START_DATE : ' );
1496: UPDATE JTY_WEBADI_OTH_TERR_INTF jwot
1497: set jwot.status = x_return_status,
1490:
1491: x_return_status := FND_API.G_RET_STS_ERROR;
1492: fnd_message.clear;
1493: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_RSC_START_DATE');
1494: X_Msg_Data := fnd_message.get();
1495: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_RSC_START_DATE : ' );
1496: UPDATE JTY_WEBADI_OTH_TERR_INTF jwot
1497: set jwot.status = x_return_status,
1498: jwot.error_msg = X_Msg_Data
1510: and jwot.header = l_header
1511: and jwot.status is null;
1512:
1513: x_return_status := FND_API.G_RET_STS_ERROR;
1514: fnd_message.clear;
1515: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_RSC_END_DATE');
1516: X_Msg_Data := fnd_message.get();
1517: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_RSC_END_DATE : ' );
1518: UPDATE JTY_WEBADI_OTH_TERR_INTF jwot
1511: and jwot.status is null;
1512:
1513: x_return_status := FND_API.G_RET_STS_ERROR;
1514: fnd_message.clear;
1515: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_RSC_END_DATE');
1516: X_Msg_Data := fnd_message.get();
1517: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_RSC_END_DATE : ' );
1518: UPDATE JTY_WEBADI_OTH_TERR_INTF jwot
1519: set jwot.status = x_return_status,
1512:
1513: x_return_status := FND_API.G_RET_STS_ERROR;
1514: fnd_message.clear;
1515: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_RSC_END_DATE');
1516: X_Msg_Data := fnd_message.get();
1517: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_RSC_END_DATE : ' );
1518: UPDATE JTY_WEBADI_OTH_TERR_INTF jwot
1519: set jwot.status = x_return_status,
1520: jwot.error_msg = X_Msg_Data
1534:
1535:
1536: l_header := 'QUAL';
1537: x_return_status := FND_API.G_RET_STS_ERROR;
1538: fnd_message.clear;
1539: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_INVALID_QUAL');
1540: X_Msg_Data := fnd_message.get();
1541: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_INVALID_QUAL : ' );
1542: open get_qual_csr(p_user_sequence, p_intf_type, l_header);
1535:
1536: l_header := 'QUAL';
1537: x_return_status := FND_API.G_RET_STS_ERROR;
1538: fnd_message.clear;
1539: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_INVALID_QUAL');
1540: X_Msg_Data := fnd_message.get();
1541: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_INVALID_QUAL : ' );
1542: open get_qual_csr(p_user_sequence, p_intf_type, l_header);
1543: fetch get_qual_csr bulk collect into qual_rec.qualifier_name, qual_rec.lay_seq_num;
1536: l_header := 'QUAL';
1537: x_return_status := FND_API.G_RET_STS_ERROR;
1538: fnd_message.clear;
1539: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_INVALID_QUAL');
1540: X_Msg_Data := fnd_message.get();
1541: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_INVALID_QUAL : ' );
1542: open get_qual_csr(p_user_sequence, p_intf_type, l_header);
1543: fetch get_qual_csr bulk collect into qual_rec.qualifier_name, qual_rec.lay_seq_num;
1544: close get_qual_csr;
1557:
1558: l_header := 'TERR';
1559:
1560: x_return_status := FND_API.G_RET_STS_ERROR;
1561: fnd_message.clear;
1562: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_START_DATE');
1563: X_Msg_Data := fnd_message.get();
1564: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_START_DATE : ' );
1565: UPDATE JTY_WEBADI_OTH_TERR_INTF jwot
1558: l_header := 'TERR';
1559:
1560: x_return_status := FND_API.G_RET_STS_ERROR;
1561: fnd_message.clear;
1562: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_START_DATE');
1563: X_Msg_Data := fnd_message.get();
1564: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_START_DATE : ' );
1565: UPDATE JTY_WEBADI_OTH_TERR_INTF jwot
1566: set status = x_return_status,
1559:
1560: x_return_status := FND_API.G_RET_STS_ERROR;
1561: fnd_message.clear;
1562: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_START_DATE');
1563: X_Msg_Data := fnd_message.get();
1564: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_START_DATE : ' );
1565: UPDATE JTY_WEBADI_OTH_TERR_INTF jwot
1566: set status = x_return_status,
1567: error_msg = X_Msg_Data
1583: and NOT(jwot.TERR_START_DATE between jta.START_DATE_ACTIVE and jta.END_DATE_ACTIVE))
1584: );
1585:
1586: x_return_status := FND_API.G_RET_STS_ERROR;
1587: fnd_message.clear;
1588: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_END_DATE');
1589: X_Msg_Data := fnd_message.get();
1590: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_END_DATE : ' );
1591: UPDATE JTY_WEBADI_OTH_TERR_INTF jwot
1584: );
1585:
1586: x_return_status := FND_API.G_RET_STS_ERROR;
1587: fnd_message.clear;
1588: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_END_DATE');
1589: X_Msg_Data := fnd_message.get();
1590: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_END_DATE : ' );
1591: UPDATE JTY_WEBADI_OTH_TERR_INTF jwot
1592: set status = x_return_status,
1585:
1586: x_return_status := FND_API.G_RET_STS_ERROR;
1587: fnd_message.clear;
1588: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_END_DATE');
1589: X_Msg_Data := fnd_message.get();
1590: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_END_DATE : ' );
1591: UPDATE JTY_WEBADI_OTH_TERR_INTF jwot
1592: set status = x_return_status,
1593: error_msg = X_Msg_Data
1613:
1614: -- Should display a error message when user tries to create a territory
1615: -- with same name.
1616: x_return_status := FND_API.G_RET_STS_ERROR;
1617: fnd_message.clear;
1618: fnd_message.set_name ('JTF', 'JTY_TTY_DUPLICATE_TERR');
1619: X_Msg_Data := fnd_message.get();
1620: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_TTY_DUPLICATE_TERR : ' );
1621:
1614: -- Should display a error message when user tries to create a territory
1615: -- with same name.
1616: x_return_status := FND_API.G_RET_STS_ERROR;
1617: fnd_message.clear;
1618: fnd_message.set_name ('JTF', 'JTY_TTY_DUPLICATE_TERR');
1619: X_Msg_Data := fnd_message.get();
1620: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_TTY_DUPLICATE_TERR : ' );
1621:
1622: update JTY_WEBADI_OTH_TERR_INTF jwot
1615: -- with same name.
1616: x_return_status := FND_API.G_RET_STS_ERROR;
1617: fnd_message.clear;
1618: fnd_message.set_name ('JTF', 'JTY_TTY_DUPLICATE_TERR');
1619: X_Msg_Data := fnd_message.get();
1620: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_TTY_DUPLICATE_TERR : ' );
1621:
1622: update JTY_WEBADI_OTH_TERR_INTF jwot
1623: set status = x_return_status
1658:
1659: -- Should display a error message when user tries to create a territory
1660: -- with empty Territory DFF.
1661: x_return_status := FND_API.G_RET_STS_ERROR;
1662: fnd_message.clear;
1663: fnd_message.set_name ('JTF', 'JTY_TERR_OTH_MTERR_DFF_NA');
1664: X_Msg_Data := fnd_message.get();
1665: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_TERR_OTH_MTERR_DFF_NA : ' );
1666: update JTY_WEBADI_OTH_TERR_INTF jwot
1659: -- Should display a error message when user tries to create a territory
1660: -- with empty Territory DFF.
1661: x_return_status := FND_API.G_RET_STS_ERROR;
1662: fnd_message.clear;
1663: fnd_message.set_name ('JTF', 'JTY_TERR_OTH_MTERR_DFF_NA');
1664: X_Msg_Data := fnd_message.get();
1665: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_TERR_OTH_MTERR_DFF_NA : ' );
1666: update JTY_WEBADI_OTH_TERR_INTF jwot
1667: set status = x_return_status
1660: -- with empty Territory DFF.
1661: x_return_status := FND_API.G_RET_STS_ERROR;
1662: fnd_message.clear;
1663: fnd_message.set_name ('JTF', 'JTY_TERR_OTH_MTERR_DFF_NA');
1664: X_Msg_Data := fnd_message.get();
1665: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_TERR_OTH_MTERR_DFF_NA : ' );
1666: update JTY_WEBADI_OTH_TERR_INTF jwot
1667: set status = x_return_status
1668: , error_msg = X_Msg_Data
1676: -- Fix for bug # 8208298 END
1677:
1678:
1679: x_return_status := FND_API.G_RET_STS_ERROR;
1680: fnd_message.clear;
1681: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_NO_ACCESS');
1682: X_Msg_Data := fnd_message.get();
1683: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_NO_ACCESS : ' );
1684: update JTY_WEBADI_OTH_TERR_INTF jwot
1677:
1678:
1679: x_return_status := FND_API.G_RET_STS_ERROR;
1680: fnd_message.clear;
1681: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_NO_ACCESS');
1682: X_Msg_Data := fnd_message.get();
1683: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_NO_ACCESS : ' );
1684: update JTY_WEBADI_OTH_TERR_INTF jwot
1685: set status = x_return_status,
1678:
1679: x_return_status := FND_API.G_RET_STS_ERROR;
1680: fnd_message.clear;
1681: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_NO_ACCESS');
1682: X_Msg_Data := fnd_message.get();
1683: debugmsg('VALIDATE_TERRITORY_RECORDS: Validate JTY_OTH_TERR_NO_ACCESS : ' );
1684: update JTY_WEBADI_OTH_TERR_INTF jwot
1685: set status = x_return_status,
1686: error_msg = X_Msg_Data
1705: -- Fix for BUG12758833 by nbombili
1706: --Here Account classification and Oppurtunity classification qualifiers validation has been done.
1707:
1708: x_return_status := FND_API.G_RET_STS_ERROR;
1709: fnd_message.clear;
1710: update JTY_WEBADI_OTH_TERR_INTF jwot
1711: set status = x_return_status,
1712: error_msg = 'Primary Interest and Secondary Interest values are mandatory. Please enter values for Primary and Secondary Interest'
1713: where ((jwot.QUAL1_VALUE1 is not null AND (jwot.QUAL1_VALUE2 is null OR jwot.QUAL1_VALUE3 is null))
4196:
4197: EXCEPTION
4198: when others then
4199: x_return_status := FND_API.G_RET_STS_ERROR;
4200: fnd_message.clear;
4201: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_DELETE_TERR');
4202: X_Msg_Data := fnd_message.get();
4203:
4204: forall i in l_del_terr_rec.lay_seq_num.first..l_del_terr_rec.lay_seq_num.last
4197: EXCEPTION
4198: when others then
4199: x_return_status := FND_API.G_RET_STS_ERROR;
4200: fnd_message.clear;
4201: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_DELETE_TERR');
4202: X_Msg_Data := fnd_message.get();
4203:
4204: forall i in l_del_terr_rec.lay_seq_num.first..l_del_terr_rec.lay_seq_num.last
4205: update JTY_WEBADI_OTH_TERR_INTF
4198: when others then
4199: x_return_status := FND_API.G_RET_STS_ERROR;
4200: fnd_message.clear;
4201: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_DELETE_TERR');
4202: X_Msg_Data := fnd_message.get();
4203:
4204: forall i in l_del_terr_rec.lay_seq_num.first..l_del_terr_rec.lay_seq_num.last
4205: update JTY_WEBADI_OTH_TERR_INTF
4206: set status = x_return_status,
4245:
4246: EXCEPTION
4247: when others then
4248: x_return_status := FND_API.G_RET_STS_ERROR;
4249: fnd_message.clear;
4250: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_DELETE_QUAL');
4251: X_Msg_Data := fnd_message.get();
4252:
4253: forall i in l_del_qual_val_rec.lay_seq_num.first..l_del_qual_val_rec.lay_seq_num.last
4246: EXCEPTION
4247: when others then
4248: x_return_status := FND_API.G_RET_STS_ERROR;
4249: fnd_message.clear;
4250: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_DELETE_QUAL');
4251: X_Msg_Data := fnd_message.get();
4252:
4253: forall i in l_del_qual_val_rec.lay_seq_num.first..l_del_qual_val_rec.lay_seq_num.last
4254: update JTY_WEBADI_OTH_TERR_INTF
4247: when others then
4248: x_return_status := FND_API.G_RET_STS_ERROR;
4249: fnd_message.clear;
4250: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_DELETE_QUAL');
4251: X_Msg_Data := fnd_message.get();
4252:
4253: forall i in l_del_qual_val_rec.lay_seq_num.first..l_del_qual_val_rec.lay_seq_num.last
4254: update JTY_WEBADI_OTH_TERR_INTF
4255: set status = x_return_status,
4292:
4293: EXCEPTION
4294: when others then
4295: x_return_status := FND_API.G_RET_STS_ERROR;
4296: fnd_message.clear;
4297: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_DELETE_RSC');
4298: X_Msg_Data := fnd_message.get();
4299:
4300: forall i in l_del_rsc_rec.lay_seq_num.first..l_del_rsc_rec.lay_seq_num.last
4293: EXCEPTION
4294: when others then
4295: x_return_status := FND_API.G_RET_STS_ERROR;
4296: fnd_message.clear;
4297: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_DELETE_RSC');
4298: X_Msg_Data := fnd_message.get();
4299:
4300: forall i in l_del_rsc_rec.lay_seq_num.first..l_del_rsc_rec.lay_seq_num.last
4301: update JTY_WEBADI_OTH_TERR_INTF
4294: when others then
4295: x_return_status := FND_API.G_RET_STS_ERROR;
4296: fnd_message.clear;
4297: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_DELETE_RSC');
4298: X_Msg_Data := fnd_message.get();
4299:
4300: forall i in l_del_rsc_rec.lay_seq_num.first..l_del_rsc_rec.lay_seq_num.last
4301: update JTY_WEBADI_OTH_TERR_INTF
4302: set status = x_return_status,
4353:
4354: EXCEPTION
4355: WHEN OTHERS THEN
4356: x_return_status := FND_API.G_RET_STS_ERROR;
4357: fnd_message.clear;
4358: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_CREATE_QUAL');
4359: X_Msg_Data := fnd_message.get();
4360:
4361: END INSERT_TERR_QUAL;
4354: EXCEPTION
4355: WHEN OTHERS THEN
4356: x_return_status := FND_API.G_RET_STS_ERROR;
4357: fnd_message.clear;
4358: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_CREATE_QUAL');
4359: X_Msg_Data := fnd_message.get();
4360:
4361: END INSERT_TERR_QUAL;
4362:
4355: WHEN OTHERS THEN
4356: x_return_status := FND_API.G_RET_STS_ERROR;
4357: fnd_message.clear;
4358: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_CREATE_QUAL');
4359: X_Msg_Data := fnd_message.get();
4360:
4361: END INSERT_TERR_QUAL;
4362:
4363: PROCEDURE check_duplicate_value(
4400: NULL;
4401: END;
4402: END LOOP;
4403: IF l_dummy = 'X' THEN
4404: fnd_message.clear;
4405: fnd_message.set_name('JTF', 'JTY_DUP_TRANS_ATTR_VAL');
4406: x_msg_data := fnd_message.GET();
4407: x_return_status := fnd_api.g_ret_sts_error;
4408: END IF;
4401: END;
4402: END LOOP;
4403: IF l_dummy = 'X' THEN
4404: fnd_message.clear;
4405: fnd_message.set_name('JTF', 'JTY_DUP_TRANS_ATTR_VAL');
4406: x_msg_data := fnd_message.GET();
4407: x_return_status := fnd_api.g_ret_sts_error;
4408: END IF;
4409: END IF;
4402: END LOOP;
4403: IF l_dummy = 'X' THEN
4404: fnd_message.clear;
4405: fnd_message.set_name('JTF', 'JTY_DUP_TRANS_ATTR_VAL');
4406: x_msg_data := fnd_message.GET();
4407: x_return_status := fnd_api.g_ret_sts_error;
4408: END IF;
4409: END IF;
4410:
4410:
4411: EXCEPTION --
4412: WHEN others THEN
4413: x_return_status := fnd_api.g_ret_sts_error;
4414: fnd_message.set_name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
4415: fnd_message.set_token('PROC_NAME', 'Check_duplicate_Value');
4416: fnd_message.set_token('ERROR', sqlerrm);
4417: x_msg_data := fnd_message.GET();
4418: END;
4411: EXCEPTION --
4412: WHEN others THEN
4413: x_return_status := fnd_api.g_ret_sts_error;
4414: fnd_message.set_name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
4415: fnd_message.set_token('PROC_NAME', 'Check_duplicate_Value');
4416: fnd_message.set_token('ERROR', sqlerrm);
4417: x_msg_data := fnd_message.GET();
4418: END;
4419:
4412: WHEN others THEN
4413: x_return_status := fnd_api.g_ret_sts_error;
4414: fnd_message.set_name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
4415: fnd_message.set_token('PROC_NAME', 'Check_duplicate_Value');
4416: fnd_message.set_token('ERROR', sqlerrm);
4417: x_msg_data := fnd_message.GET();
4418: END;
4419:
4420: PROCEDURE check_duplicate_value_update(
4413: x_return_status := fnd_api.g_ret_sts_error;
4414: fnd_message.set_name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
4415: fnd_message.set_token('PROC_NAME', 'Check_duplicate_Value');
4416: fnd_message.set_token('ERROR', sqlerrm);
4417: x_msg_data := fnd_message.GET();
4418: END;
4419:
4420: PROCEDURE check_duplicate_value_update(
4421: p_Terr_Values_Rec IN Terr_values_rec_type,
4460: END;
4461: END LOOP;
4462:
4463: IF l_dummy = 'X' THEN
4464: fnd_message.clear;
4465: fnd_message.set_name('JTF', 'JTY_DUP_TRANS_ATTR_VAL');
4466: x_msg_data := fnd_message.GET();
4467: x_return_status := fnd_api.g_ret_sts_error;
4468: END IF;
4461: END LOOP;
4462:
4463: IF l_dummy = 'X' THEN
4464: fnd_message.clear;
4465: fnd_message.set_name('JTF', 'JTY_DUP_TRANS_ATTR_VAL');
4466: x_msg_data := fnd_message.GET();
4467: x_return_status := fnd_api.g_ret_sts_error;
4468: END IF;
4469: END IF;
4462:
4463: IF l_dummy = 'X' THEN
4464: fnd_message.clear;
4465: fnd_message.set_name('JTF', 'JTY_DUP_TRANS_ATTR_VAL');
4466: x_msg_data := fnd_message.GET();
4467: x_return_status := fnd_api.g_ret_sts_error;
4468: END IF;
4469: END IF;
4470:
4470:
4471: EXCEPTION --
4472: WHEN others THEN
4473: x_return_status := fnd_api.g_ret_sts_error;
4474: fnd_message.set_name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
4475: fnd_message.set_token('PROC_NAME', 'Check_duplicate_Value');
4476: fnd_message.set_token('ERROR', sqlerrm);
4477: x_msg_data := fnd_message.GET();
4478: --test('x_msg_data', x_msg_data);
4471: EXCEPTION --
4472: WHEN others THEN
4473: x_return_status := fnd_api.g_ret_sts_error;
4474: fnd_message.set_name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
4475: fnd_message.set_token('PROC_NAME', 'Check_duplicate_Value');
4476: fnd_message.set_token('ERROR', sqlerrm);
4477: x_msg_data := fnd_message.GET();
4478: --test('x_msg_data', x_msg_data);
4479: END check_duplicate_value_update;
4472: WHEN others THEN
4473: x_return_status := fnd_api.g_ret_sts_error;
4474: fnd_message.set_name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
4475: fnd_message.set_token('PROC_NAME', 'Check_duplicate_Value');
4476: fnd_message.set_token('ERROR', sqlerrm);
4477: x_msg_data := fnd_message.GET();
4478: --test('x_msg_data', x_msg_data);
4479: END check_duplicate_value_update;
4480:
4473: x_return_status := fnd_api.g_ret_sts_error;
4474: fnd_message.set_name('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
4475: fnd_message.set_token('PROC_NAME', 'Check_duplicate_Value');
4476: fnd_message.set_token('ERROR', sqlerrm);
4477: x_msg_data := fnd_message.GET();
4478: --test('x_msg_data', x_msg_data);
4479: END check_duplicate_value_update;
4480:
4481: PROCEDURE INSERT_TERR_VALUES (
4687: END IF; -- TERR_QUAL_ID count
4688: EXCEPTION
4689: WHEN OTHERS THEN
4690: x_return_status := FND_API.G_RET_STS_ERROR;
4691: fnd_message.clear;
4692: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_CREATE_QUAL_VAL');
4693: X_Msg_Data := fnd_message.get();
4694:
4695: --dbms_output.put_line(sqlerrm);
4688: EXCEPTION
4689: WHEN OTHERS THEN
4690: x_return_status := FND_API.G_RET_STS_ERROR;
4691: fnd_message.clear;
4692: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_CREATE_QUAL_VAL');
4693: X_Msg_Data := fnd_message.get();
4694:
4695: --dbms_output.put_line(sqlerrm);
4696:
4689: WHEN OTHERS THEN
4690: x_return_status := FND_API.G_RET_STS_ERROR;
4691: fnd_message.clear;
4692: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_CREATE_QUAL_VAL');
4693: X_Msg_Data := fnd_message.get();
4694:
4695: --dbms_output.put_line(sqlerrm);
4696:
4697: END INSERT_TERR_VALUES;
5007: EXCEPTION
5008: WHEN OTHERS THEN
5009: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
5010:
5011: fnd_message.clear;
5012: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_CREATE_TERR');
5013: X_Msg_Data := fnd_message.get();
5014: debugmsg (X_Msg_Data || SQLERRM);
5015:
5008: WHEN OTHERS THEN
5009: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
5010:
5011: fnd_message.clear;
5012: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_CREATE_TERR');
5013: X_Msg_Data := fnd_message.get();
5014: debugmsg (X_Msg_Data || SQLERRM);
5015:
5016: update JTY_WEBADI_OTH_TERR_INTF jwot
5009: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
5010:
5011: fnd_message.clear;
5012: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_CREATE_TERR');
5013: X_Msg_Data := fnd_message.get();
5014: debugmsg (X_Msg_Data || SQLERRM);
5015:
5016: update JTY_WEBADI_OTH_TERR_INTF jwot
5017: set status = x_return_status,
10450: EXCEPTION
10451: WHEN OTHERS THEN
10452: debugmsg('UPDATE_TERR_DEF: UPDATE_TERR_QUAL : Inside exception others');
10453: x_return_status := FND_API.G_RET_STS_ERROR;
10454: fnd_message.clear;
10455: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_UPDATE_QUAL_VAL');
10456: X_Msg_Data := fnd_message.get();
10457:
10458: forall i in l_Terr_Qual_Rec.TERR_QUAL_ID.first..l_Terr_Qual_Rec.TERR_QUAL_ID.last
10451: WHEN OTHERS THEN
10452: debugmsg('UPDATE_TERR_DEF: UPDATE_TERR_QUAL : Inside exception others');
10453: x_return_status := FND_API.G_RET_STS_ERROR;
10454: fnd_message.clear;
10455: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_UPDATE_QUAL_VAL');
10456: X_Msg_Data := fnd_message.get();
10457:
10458: forall i in l_Terr_Qual_Rec.TERR_QUAL_ID.first..l_Terr_Qual_Rec.TERR_QUAL_ID.last
10459: UPDATE JTY_WEBADI_OTH_TERR_INTF jwot
10452: debugmsg('UPDATE_TERR_DEF: UPDATE_TERR_QUAL : Inside exception others');
10453: x_return_status := FND_API.G_RET_STS_ERROR;
10454: fnd_message.clear;
10455: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_UPDATE_QUAL_VAL');
10456: X_Msg_Data := fnd_message.get();
10457:
10458: forall i in l_Terr_Qual_Rec.TERR_QUAL_ID.first..l_Terr_Qual_Rec.TERR_QUAL_ID.last
10459: UPDATE JTY_WEBADI_OTH_TERR_INTF jwot
10460: SET STATUS = x_return_status,
10559:
10560: EXCEPTION
10561: WHEN OTHERS THEN
10562: x_return_status := FND_API.G_RET_STS_ERROR;
10563: fnd_message.clear;
10564: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_DELETE_QUAL_VAL');
10565: X_Msg_Data := fnd_message.get();
10566:
10567: forall i in l_Terr_Qual_Rec.TERR_QUAL_ID.first..l_Terr_Qual_Rec.TERR_QUAL_ID.last
10560: EXCEPTION
10561: WHEN OTHERS THEN
10562: x_return_status := FND_API.G_RET_STS_ERROR;
10563: fnd_message.clear;
10564: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_DELETE_QUAL_VAL');
10565: X_Msg_Data := fnd_message.get();
10566:
10567: forall i in l_Terr_Qual_Rec.TERR_QUAL_ID.first..l_Terr_Qual_Rec.TERR_QUAL_ID.last
10568: UPDATE JTY_WEBADI_OTH_TERR_INTF jwot
10561: WHEN OTHERS THEN
10562: x_return_status := FND_API.G_RET_STS_ERROR;
10563: fnd_message.clear;
10564: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_DELETE_QUAL_VAL');
10565: X_Msg_Data := fnd_message.get();
10566:
10567: forall i in l_Terr_Qual_Rec.TERR_QUAL_ID.first..l_Terr_Qual_Rec.TERR_QUAL_ID.last
10568: UPDATE JTY_WEBADI_OTH_TERR_INTF jwot
10569: SET STATUS = x_return_status,
11178:
11179: exception
11180: when others then
11181: x_return_status := FND_API.G_RET_STS_ERROR;
11182: fnd_message.clear;
11183: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_CREATE_ACCESS');
11184: X_Msg_Data := fnd_message.get();
11185:
11186: forall i in l_rsc_access_rec.TERR_RSC_ID.first..l_rsc_access_rec.TERR_RSC_ID.last
11179: exception
11180: when others then
11181: x_return_status := FND_API.G_RET_STS_ERROR;
11182: fnd_message.clear;
11183: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_CREATE_ACCESS');
11184: X_Msg_Data := fnd_message.get();
11185:
11186: forall i in l_rsc_access_rec.TERR_RSC_ID.first..l_rsc_access_rec.TERR_RSC_ID.last
11187: update JTY_WEBADI_OTH_TERR_INTF jwot
11180: when others then
11181: x_return_status := FND_API.G_RET_STS_ERROR;
11182: fnd_message.clear;
11183: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_CREATE_ACCESS');
11184: X_Msg_Data := fnd_message.get();
11185:
11186: forall i in l_rsc_access_rec.TERR_RSC_ID.first..l_rsc_access_rec.TERR_RSC_ID.last
11187: update JTY_WEBADI_OTH_TERR_INTF jwot
11188: set status = x_return_status,
11243:
11244: exception
11245: when others then
11246: x_return_status := FND_API.G_RET_STS_ERROR;
11247: fnd_message.clear;
11248: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_UPDATE_ACCESS');
11249: X_Msg_Data := fnd_message.get();
11250:
11251: forall i in l_rsc_access_rec.TERR_RSC_ID.first..l_rsc_access_rec.TERR_RSC_ID.last
11244: exception
11245: when others then
11246: x_return_status := FND_API.G_RET_STS_ERROR;
11247: fnd_message.clear;
11248: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_UPDATE_ACCESS');
11249: X_Msg_Data := fnd_message.get();
11250:
11251: forall i in l_rsc_access_rec.TERR_RSC_ID.first..l_rsc_access_rec.TERR_RSC_ID.last
11252: update JTY_WEBADI_OTH_TERR_INTF jwot
11245: when others then
11246: x_return_status := FND_API.G_RET_STS_ERROR;
11247: fnd_message.clear;
11248: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_UPDATE_ACCESS');
11249: X_Msg_Data := fnd_message.get();
11250:
11251: forall i in l_rsc_access_rec.TERR_RSC_ID.first..l_rsc_access_rec.TERR_RSC_ID.last
11252: update JTY_WEBADI_OTH_TERR_INTF jwot
11253: set status = x_return_status,
11267:
11268: exception
11269: when others then
11270: x_return_status := FND_API.G_RET_STS_ERROR;
11271: fnd_message.clear;
11272: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_UPDATE_RSC');
11273: X_Msg_Data := fnd_message.get();
11274:
11275: update JTY_WEBADI_OTH_TERR_INTF jwot
11268: exception
11269: when others then
11270: x_return_status := FND_API.G_RET_STS_ERROR;
11271: fnd_message.clear;
11272: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_UPDATE_RSC');
11273: X_Msg_Data := fnd_message.get();
11274:
11275: update JTY_WEBADI_OTH_TERR_INTF jwot
11276: set status = x_return_status,
11269: when others then
11270: x_return_status := FND_API.G_RET_STS_ERROR;
11271: fnd_message.clear;
11272: fnd_message.set_name ('JTF', 'JTY_OTH_TERR_UPDATE_RSC');
11273: X_Msg_Data := fnd_message.get();
11274:
11275: update JTY_WEBADI_OTH_TERR_INTF jwot
11276: set status = x_return_status,
11277: error_msg = X_Msg_Data