8: -- trace : TO log all message
9: -----------------------------------------------------
10: PROCEDURE trace(p_msg IN VARCHAR2) IS
11:
12: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
13: BEGIN
14: IF (l_debug = 1) THEN
15: inv_trx_util_pub.trace(p_msg,'WMS_EPC_PVT', 9);
16: END IF;
143: l_outermost_lpn_id NUMBER;
144: l_lpn_item_id NUMBER;
145: l_uom_code VARCHAR2(3);
146: l_rev VARCHAR2(3);
147: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
148: BEGIN
149: --to be called from the Rules Engine
150: --Rules engine will look in to WMS_label_requestes table to get thte
151: --lpn_id AND pass it TO this api.
296: PRAGMA AUTONOMOUS_TRANSACTION;
297:
298: l_cur_serial_num NUMBER;
299: l_new_serial NUMBER := 0; --Just some random start value for a NEW GTIN
300: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
301: BEGIN
302:
303: -- See if there are records in the table for this GTIN
304: -- trace('P_gtin :'||p_gtin);
399: l_uom_code VARCHAR2(3);
400: l_found_gtin NUMBER;
401: l_gtin NUMBER;
402: l_rev_id NUMBER;
403: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
404: BEGIN
405:
406: x_return_status := fnd_api.g_ret_sts_success;
407:
616: l_total_qty NUMBER :=0;
617: l_found_gtin NUMBER := 0;
618: l_rev VARCHAR2(3);
619: l_uom_code VARCHAR2(3);
620: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
621: l_gtin NUMBER;
622: l_is_gtin_valid BOOLEAN := TRUE;
623:
624: l_total_wlc_qty NUMBER;
1069: l_pri_qty NUMBER;
1070: l_found_gtin NUMBER;
1071: l_uom_code VARCHAR2(3);
1072: l_primary_uom_code VARCHAR2(3);
1073: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1074: BEGIN
1075: x_return_status := fnd_api.g_ret_sts_success;
1076: -- if p_uom_code is NOT primary UOM, get primary qty in primary UOM
1077: -- For the primary qty, get the corresponding UOM conversion
1192:
1193:
1194: l_gtin NUMBER;
1195: l_rev_id NUMBER;
1196: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1197: BEGIN
1198:
1199: x_return_status := fnd_api.g_ret_sts_success;
1200:
1270: l_is_sscc_valid BOOLEAN;
1271: l_sscc VARCHAR2(30);
1272: l_sscc_len NUMBER;
1273: l_lpn_num_format NUMBER;
1274: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1275:
1276: BEGIN
1277: IF l_debug = 1 then
1278: trace('get_ssc() p_lpn_id,p_org_id :'||p_lpn_id ||','||p_org_id);
1341: x_return_status OUT nocopy VARCHAR2,
1342: x_return_mesg OUT nocopy VARCHAR2
1343: ) IS
1344:
1345: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1346:
1347: BEGIN
1348: x_return_status := fnd_api.g_ret_sts_success;
1349:
1447:
1448: PRAGMA AUTONOMOUS_TRANSACTION;
1449:
1450: l_epc_id NUMBER;
1451: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1452: BEGIN
1453:
1454: x_return_status := fnd_api.g_ret_sts_success;
1455:
1749: l_total_qty NUMBER :=0;
1750: l_found_gtin NUMBER := 0;
1751: l_rev VARCHAR2(3);
1752: l_uom_code VARCHAR2(3);
1753: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1754: l_gtin NUMBER;
1755:
1756: l_total_wlc_qty NUMBER;
1757: l_total_mmtt_qty NUMBER;
2249: l_cust_comp_prefix_index NUMBER;
2250: l_comp_prefix_len NUMBER;
2251: l_cross_ref_type NUMBER;
2252: l_epc_category_id NUMBER;
2253: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2254: l_lpn_id NUMBER;
2255: l_serial_number VARCHAR2(30);
2256: l_item_id NUMBER;
2257: l_rev VARCHAR2(3);
2258: l_bit_length NUMBER;
2259: l_components mgd_id_component_varray;
2260: pcode mgd_id;
2261:
2262: l_internet_proxy_hostname VARCHAR2(100) := FND_PROFILE.VALUE('WMS_INTERNET_PROXY_HOSTNAME');
2263: l_internet_proxy_port_number NUMBER := FND_PROFILE.VALUE('WMS_INTERNET_PROXY_PORT');
2264:
2265: BEGIN
2266:
2259: l_components mgd_id_component_varray;
2260: pcode mgd_id;
2261:
2262: l_internet_proxy_hostname VARCHAR2(100) := FND_PROFILE.VALUE('WMS_INTERNET_PROXY_HOSTNAME');
2263: l_internet_proxy_port_number NUMBER := FND_PROFILE.VALUE('WMS_INTERNET_PROXY_PORT');
2264:
2265: BEGIN
2266:
2267: G_PROFILE_GTIN := FND_PROFILE.value('INV:GTIN_CROSS_REFERENCE_TYPE');
2263: l_internet_proxy_port_number NUMBER := FND_PROFILE.VALUE('WMS_INTERNET_PROXY_PORT');
2264:
2265: BEGIN
2266:
2267: G_PROFILE_GTIN := FND_PROFILE.value('INV:GTIN_CROSS_REFERENCE_TYPE');
2268: x_return_status := fnd_api.g_ret_sts_success;
2269:
2270:
2271: IF l_debug = 1 THEN
2597:
2598:
2599:
2600: --{{ Get the EPC ENCODING defined with the profile 'WMS_EPC_ENCODING'}}
2601: l_epc_output_rep := NVL(fnd_profile.value('WMS_EPC_ENCODING'), 2);
2602: -- 1 : Binary
2603: -- 2 : Hex
2604: -- 3 : Decimal
2605:
2819:
2820: PRAGMA AUTONOMOUS_TRANSACTION;
2821:
2822: l_epc_id NUMBER;
2823: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2824: BEGIN
2825:
2826: x_return_status := fnd_api.g_ret_sts_success;
2827:
3172: l_total_qty NUMBER :=0;
3173: l_found_gtin NUMBER := 0;
3174: l_rev VARCHAR2(3);
3175: l_uom_code VARCHAR2(3);
3176: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3177: l_gtin NUMBER;
3178:
3179: l_total_wlc_qty NUMBER;
3180: l_total_mmtt_qty NUMBER;
3599: from mgd_idencoding_type ;
3600:
3601: l_index NUMBER;
3602: l_epc_type_id NUMBER := NULL;
3603: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3604:
3605: BEGIN
3606: IF l_debug = 1 THEN
3607: trace('Inside Cache_and_get_rule');
3767: l_cust_comp_prefix_index NUMBER;
3768: l_comp_prefix_len NUMBER;
3769: l_cross_ref_type NUMBER;
3770: l_epc_category_id NUMBER;
3771: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3772: l_lpn_id NUMBER;
3773: l_serial_number VARCHAR2(30);
3774: l_item_id NUMBER;
3775: l_rev VARCHAR2(3);
3778: pcode mgd_idcode;
3779:
3780: BEGIN
3781:
3782: G_PROFILE_GTIN := FND_PROFILE.value('INV:GTIN_CROSS_REFERENCE_TYPE');
3783: x_return_status := fnd_api.g_ret_sts_success;
3784:
3785: IF l_debug = 1 THEN
3786: trace('************ inside generate_epc ***********');
4154:
4155:
4156:
4157: --{{ Get the EPC ENCODING defined with the profile 'WMS_EPC_ENCODING'}}
4158: l_epc_output_rep := NVL(fnd_profile.value('WMS_EPC_ENCODING'), 2);
4159: -- 1 : Binary
4160: -- 2 : Hex
4161: -- 3 : Decimal
4162: