DBA Data[Home] [Help]

APPS.INV_PR_PICK_SLIP_NUMBER dependencies on INV_PR_PICK_SLIP_NUMBER

Line 1: PACKAGE BODY inv_pr_pick_slip_number AS

1: PACKAGE BODY inv_pr_pick_slip_number AS
2: /* $Header: INVPRPNB.pls 120.5 2006/10/31 19:45:07 stdavid ship $ */
3:
4:
5: --

Line 66: g_pkg_name CONSTANT VARCHAR2(50) := 'INV_PR_PICK_SLIP_NUMBER';

62: g_wip_pskey_table wipkeytabtyp;
63: g_rule_table grptabtyp;
64: g_hash_base NUMBER := 1;
65: g_hash_size NUMBER := POWER(2, 25);
66: g_pkg_name CONSTANT VARCHAR2(50) := 'INV_PR_PICK_SLIP_NUMBER';
67: g_trace_on NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),2);
68: -- For cahing the limit information for an org
69: g_prev_org_id NUMBER;
70: g_pickslip_limit NUMBER;

Line 105: inv_log_util.trace('Exception: ' || SQLERRM,'INV_PR_PICK_SLIP_NUMBER.INSERT_KEY',3);

101: EXCEPTION
102: WHEN OTHERS THEN
103: x_error_message := 'Error occurred in INV_PR_PICK_NUMBER.INSERT_KEY';
104: IF g_trace_on = 1 THEN
105: inv_log_util.trace('Exception: ' || SQLERRM,'INV_PR_PICK_SLIP_NUMBER.INSERT_KEY',3);
106: END IF;
107: END insert_key;
108:
109: --

Line 265: inv_log_util.trace('Exception: ' || SQLERRM,'INV_PR_PICK_SLIP_NUMBER.CREATE_HASH',3);

261: EXCEPTION
262: WHEN OTHERS THEN
263: x_error_message := 'Error occurred in INV_PR_PICK_NUMBER.CREATE_HASH';
264: IF g_trace_on = 1 THEN
265: inv_log_util.trace('Exception: ' || SQLERRM,'INV_PR_PICK_SLIP_NUMBER.CREATE_HASH',3);
266: END IF;
267: END create_hash;
268:
269: --

Line 570: inv_log_util.trace('Exception: ' || SQLERRM,'INV_PR_PICK_SLIP_NUMBER.GET_PICK_SLIP_NUMBER',3);

566: EXCEPTION
567: WHEN OTHERS THEN
568: x_error_message := 'Error occurred in INV_PR_PICK_NUMBER.GET_PICK_SLIP_NUMBER';
569: IF g_trace_on = 1 THEN
570: inv_log_util.trace('Exception: ' || SQLERRM,'INV_PR_PICK_SLIP_NUMBER.GET_PICK_SLIP_NUMBER',3);
571: END IF;
572: x_api_status := fnd_api.g_ret_sts_unexp_error;
573: END get_pick_slip_number;
574:

Line 607: inv_log_util.trace('Exception: ' || SQLERRM,'INV_PR_PICK_SLIP_NUMBER.INSERT_KEY',3);

603: EXCEPTION
604: WHEN OTHERS THEN
605: x_error_message := 'Error occurred in INV_PR_PICK_NUMBER.INSERT_KEY';
606: IF g_trace_on = 1 THEN
607: inv_log_util.trace('Exception: ' || SQLERRM,'INV_PR_PICK_SLIP_NUMBER.INSERT_KEY',3);
608: END IF;
609: END insert_key;
610:
611: --

Line 746: inv_log_util.trace('Exception: ' || SQLERRM,'INV_PR_PICK_SLIP_NUMBER.CREATE_HASH',3);

742: EXCEPTION
743: WHEN OTHERS THEN
744: x_error_message := 'Error occurred in INV_PR_PICK_NUMBER.CREATE_HASH';
745: IF g_trace_on = 1 THEN
746: inv_log_util.trace('Exception: ' || SQLERRM,'INV_PR_PICK_SLIP_NUMBER.CREATE_HASH',3);
747: END IF;
748: END create_hash;
749:
750: --

Line 957: inv_log_util.trace('Exception: ' || SQLERRM,'INV_PR_PICK_SLIP_NUMBER.GET_PICK_SLIP_NUMBER',3);

953: EXCEPTION
954: WHEN OTHERS THEN
955: x_error_message := 'Error occurred in INV_PR_PICK_NUMBER.GET_PICK_SLIP_NUMBER';
956: IF g_trace_on = 1 THEN
957: inv_log_util.trace('Exception: ' || SQLERRM,'INV_PR_PICK_SLIP_NUMBER.GET_PICK_SLIP_NUMBER',3);
958: END IF;
959: x_api_status := fnd_api.g_ret_sts_unexp_error;
960: END get_pick_slip_number;
961:

Line 1028: inv_log_util.trace('Exception: ' || SQLERRM,'INV_PR_PICK_SLIP_NUMBER.DELETE_WIP_PS_TBL', 3);

1024: BEGIN
1025: g_wip_pskey_table.DELETE;
1026: EXCEPTION
1027: WHEN OTHERS THEN
1028: inv_log_util.trace('Exception: ' || SQLERRM,'INV_PR_PICK_SLIP_NUMBER.DELETE_WIP_PS_TBL', 3);
1029: END delete_wip_ps_tbl;
1030:
1031: -- /* For Parallel Pick-Release */
1032: -- Name

Line 1164: inv_log_util.trace('Exception: ' || SQLERRM,'INV_PR_PICK_SLIP_NUMBER.CREATE_PICK_SLIP_STRING',3);

1160: EXCEPTION
1161: WHEN OTHERS THEN
1162: x_error_message := 'Error occurred in INV_PR_PICK_NUMBER.CREATE_PICK_SLIP_STRING';
1163: IF g_trace_on = 1 THEN
1164: inv_log_util.trace('Exception: ' || SQLERRM,'INV_PR_PICK_SLIP_NUMBER.CREATE_PICK_SLIP_STRING',3);
1165: END IF;
1166: END create_pick_slip_string;
1167:
1168: -- /* For Parallel Pick-Release */

Line 1209: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER', 3);

1205: l_debug := NVL(fnd_profile.VALUE('INV_DEBUG_TRACE'), 0);
1206:
1207: IF (l_debug = 1) THEN
1208: inv_log_util.trace('p_hash_string = ' || p_hash_string,
1209: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER', 3);
1210: inv_log_util.trace('p_limit = ' || p_limit,
1211: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER', 3);
1212: END IF;
1213:

Line 1211: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER', 3);

1207: IF (l_debug = 1) THEN
1208: inv_log_util.trace('p_hash_string = ' || p_hash_string,
1209: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER', 3);
1210: inv_log_util.trace('p_limit = ' || p_limit,
1211: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER', 3);
1212: END IF;
1213:
1214: l_success := FALSE;
1215: l_num_attempts := 1;

Line 1241: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER', 3);

1237: -- exception others
1238: -- exit loop
1239: IF (l_debug = 1) THEN
1240: inv_log_util.trace('l_num_attempts = ' || l_num_attempts,
1241: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER', 3);
1242: END IF;
1243: BEGIN
1244: INSERT INTO mtl_pick_slip_numbers
1245: ( id

Line 1263: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER', 3);

1259: INTO l_pick_slip_number;
1260:
1261: IF (l_debug = 1) THEN
1262: inv_log_util.trace('Inserted pick slip # ' || l_pick_slip_number,
1263: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER', 3);
1264: END IF;
1265: l_success := TRUE;
1266: EXCEPTION
1267: -- {

Line 1271: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER', 3);

1267: -- {
1268: WHEN unique_constraint_exc THEN
1269: IF (l_debug = 1) THEN
1270: inv_log_util.trace('INSERT failed, row already exists',
1271: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER', 3);
1272: END IF;
1273: BEGIN
1274: SELECT pick_slip_number
1275: , pick_slip_count

Line 1288: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER', 3);

1284:
1285: IF (l_debug = 1) THEN
1286: inv_log_util.trace('Locked row, pick slip # is ' || l_pick_slip_number
1287: || ', pick slip count is ' || l_pick_slip_count,
1288: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER', 3);
1289: END IF;
1290: EXCEPTION
1291: WHEN wait_timeout_exc THEN
1292: IF (l_debug = 1) THEN

Line 1294: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER', 3);

1290: EXCEPTION
1291: WHEN wait_timeout_exc THEN
1292: IF (l_debug = 1) THEN
1293: inv_log_util.trace('Timeout waiting for lock',
1294: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER', 3);
1295: END IF;
1296: l_success := FALSE;
1297: WHEN NO_DATA_FOUND THEN
1298: IF (l_debug = 1) THEN

Line 1300: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER', 3);

1296: l_success := FALSE;
1297: WHEN NO_DATA_FOUND THEN
1298: IF (l_debug = 1) THEN
1299: inv_log_util.trace('No data found, so retrying INSERT',
1300: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER', 3);
1301: END IF;
1302: l_success := FALSE;
1303: WHEN OTHERS THEN
1304: IF (l_debug = 1) THEN

Line 1306: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER', 3);

1302: l_success := FALSE;
1303: WHEN OTHERS THEN
1304: IF (l_debug = 1) THEN
1305: inv_log_util.trace('Other exception: ' || sqlerrm,
1306: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER', 3);
1307: END IF;
1308: l_success := FALSE;
1309: EXIT;
1310: END;

Line 1314: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER', 3);

1310: END;
1311: WHEN OTHERS THEN
1312: IF (l_debug = 1) THEN
1313: inv_log_util.trace('Other exception: ' || sqlerrm,
1314: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER', 3);
1315: END IF;
1316: l_success := FALSE;
1317: EXIT;
1318: -- }

Line 1332: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER', 3);

1328: l_pick_slip_status := 2;
1329: IF (l_debug = 1) THEN
1330: inv_log_util.trace('Failed to INSERT or LOCK pick slip record. Returning next value: '
1331: || l_pick_slip_number,
1332: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER', 3);
1333: END IF;
1334: ELSE
1335: IF (l_pick_slip_count + 1) >= p_limit THEN
1336: l_pick_slip_status := 2;

Line 1347: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER', 3);

1343: RETURNING pick_slip_count INTO l_pick_slip_count;
1344: IF (l_debug = 1) AND SQL%FOUND THEN
1345: inv_log_util.trace('Updated count to ' || l_pick_slip_count ||
1346: ', status to ' || l_pick_slip_status,
1347: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER', 3);
1348: END IF;
1349: END IF;
1350:
1351: COMMIT;

Line 1362: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER',3);

1358: x_error_message := 'Error occurred in GEN_PARALLEL_PICK_SLIP_NUMBER';
1359: x_api_status := fnd_api.g_ret_sts_unexp_error;
1360: IF (l_debug = 1) THEN
1361: inv_log_util.trace('Exception: ' || SQLERRM,
1362: 'INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER',3);
1363: END IF;
1364: END gen_parallel_pick_slip_number;
1365:
1366:

Line 1579: x_error_message := 'Error occurred in INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER';

1575: ,x_api_status => x_api_status
1576: ,x_pick_slip_status => l_pick_slip_status);
1577:
1578: IF (x_api_status <> fnd_api.g_ret_sts_success) THEN
1579: x_error_message := 'Error occurred in INV_PR_PICK_SLIP_NUMBER.GEN_PARALLEL_PICK_SLIP_NUMBER';
1580: RETURN;
1581: END IF;
1582:
1583: IF (p_ps_mode = 'I' AND l_limit <> -1) THEN

Line 1595: x_error_message := 'Error occurred in INV_PR_PICK_SLIP_NUMBER.GET_PICK_SLIP_NUMBER';

1591:
1592: x_api_status := fnd_api.g_ret_sts_success;
1593: EXCEPTION
1594: WHEN OTHERS THEN
1595: x_error_message := 'Error occurred in INV_PR_PICK_SLIP_NUMBER.GET_PICK_SLIP_NUMBER';
1596: IF g_trace_on = 1 THEN
1597: inv_log_util.trace('Exception: ' || SQLERRM,'INV_PR_PICK_SLIP_NUMBER.GET_PICK_SLIP_NUMBER',3);
1598: END IF;
1599: x_api_status := fnd_api.g_ret_sts_unexp_error;

Line 1597: inv_log_util.trace('Exception: ' || SQLERRM,'INV_PR_PICK_SLIP_NUMBER.GET_PICK_SLIP_NUMBER',3);

1593: EXCEPTION
1594: WHEN OTHERS THEN
1595: x_error_message := 'Error occurred in INV_PR_PICK_SLIP_NUMBER.GET_PICK_SLIP_NUMBER';
1596: IF g_trace_on = 1 THEN
1597: inv_log_util.trace('Exception: ' || SQLERRM,'INV_PR_PICK_SLIP_NUMBER.GET_PICK_SLIP_NUMBER',3);
1598: END IF;
1599: x_api_status := fnd_api.g_ret_sts_unexp_error;
1600:
1601: END get_pick_slip_number_parallel;

Line 1603: END inv_pr_pick_slip_number;

1599: x_api_status := fnd_api.g_ret_sts_unexp_error;
1600:
1601: END get_pick_slip_number_parallel;
1602:
1603: END inv_pr_pick_slip_number;