168: ||p_business_flow||','||p_label_type_id||','||p_format_id||','||p_printer_name, TRACE_PROMPT, TRACE_LEVEL);
169: END IF;
170: x_return_status := FND_API.G_RET_STS_SUCCESS;
171:
172: --Bug 4553439. Getting the value of org_id from fnd_profile
173: FND_PROFILE.GET('MFG_ORGANIZATION_ID', l_org_id );
174: IF(l_debug = 1 ) THEN
175: trace('Value of org id from the profile' || l_org_id, TRACE_PROMPT,TRACE_LEVEL);
176: END IF;
169: END IF;
170: x_return_status := FND_API.G_RET_STS_SUCCESS;
171:
172: --Bug 4553439. Getting the value of org_id from fnd_profile
173: FND_PROFILE.GET('MFG_ORGANIZATION_ID', l_org_id );
174: IF(l_debug = 1 ) THEN
175: trace('Value of org id from the profile' || l_org_id, TRACE_PROMPT,TRACE_LEVEL);
176: END IF;
177: --End of fix for Bug 4553439
869: BEGIN
870: -- Get Sysdate in Date/Time
871: -- Bug 14253300 starts
872: IF (l_debug = 1) THEN
873: trace('get_date_time_user CLIENT_TIMEZONE_ID:' || fnd_profile.VALUE('CLIENT_TIMEZONE_ID'), TRACE_PROMPT, TRACE_LEVEL);
874: END IF;
875:
876: IF fnd_profile.VALUE('CLIENT_TIMEZONE_ID') IS NOT NULL THEN
877: SELECT REPLACE(tz_offset(a.timezone_code),':3',':5') INTO l_tz_offset FROM FND_TIMEZONES_VL a WHERE enabled_flag = 'Y' AND fnd_profile.VALUE('CLIENT_TIMEZONE_ID') = upgrade_tz_id;
872: IF (l_debug = 1) THEN
873: trace('get_date_time_user CLIENT_TIMEZONE_ID:' || fnd_profile.VALUE('CLIENT_TIMEZONE_ID'), TRACE_PROMPT, TRACE_LEVEL);
874: END IF;
875:
876: IF fnd_profile.VALUE('CLIENT_TIMEZONE_ID') IS NOT NULL THEN
877: SELECT REPLACE(tz_offset(a.timezone_code),':3',':5') INTO l_tz_offset FROM FND_TIMEZONES_VL a WHERE enabled_flag = 'Y' AND fnd_profile.VALUE('CLIENT_TIMEZONE_ID') = upgrade_tz_id;
878: IF (l_debug = 1) THEN
879: trace('l_tz_offset:'||l_tz_offset||'...l_db_offset:'||l_db_offset, TRACE_PROMPT, TRACE_LEVEL);
880: END IF;
873: trace('get_date_time_user CLIENT_TIMEZONE_ID:' || fnd_profile.VALUE('CLIENT_TIMEZONE_ID'), TRACE_PROMPT, TRACE_LEVEL);
874: END IF;
875:
876: IF fnd_profile.VALUE('CLIENT_TIMEZONE_ID') IS NOT NULL THEN
877: SELECT REPLACE(tz_offset(a.timezone_code),':3',':5') INTO l_tz_offset FROM FND_TIMEZONES_VL a WHERE enabled_flag = 'Y' AND fnd_profile.VALUE('CLIENT_TIMEZONE_ID') = upgrade_tz_id;
878: IF (l_debug = 1) THEN
879: trace('l_tz_offset:'||l_tz_offset||'...l_db_offset:'||l_db_offset, TRACE_PROMPT, TRACE_LEVEL);
880: END IF;
881: l_tz_offset_hrs := To_Number(SubStr(l_tz_offset,1,3) || '.' || SubStr(l_tz_offset,5,2));
1062: l_file_prefix VARCHAR2(100);
1063: l_output_dir VARCHAR2(200);
1064: l_date_mask VARCHAR2(100);
1065: BEGIN
1066: FND_PROFILE.GET('WMS_PRINT_MODE', l_print_mode);
1067: IF (l_debug = 1) THEN
1068: trace('l_print_mode => ' || l_print_mode, TRACE_PROMPT, TRACE_LEVEL);
1069: END IF;
1070:
1067: IF (l_debug = 1) THEN
1068: trace('l_print_mode => ' || l_print_mode, TRACE_PROMPT, TRACE_LEVEL);
1069: END IF;
1070:
1071: FND_PROFILE.GET('WMS_LABEL_FILE_PREFIX', l_file_prefix);
1072: IF (l_debug = 1) THEN
1073: trace('l_file_prefix => ' || l_file_prefix, TRACE_PROMPT, TRACE_LEVEL);
1074: END IF;
1075:
1072: IF (l_debug = 1) THEN
1073: trace('l_file_prefix => ' || l_file_prefix, TRACE_PROMPT, TRACE_LEVEL);
1074: END IF;
1075:
1076: FND_PROFILE.GET('WMS_LABEL_OUTPUT_DIRECTORY', l_output_dir);
1077: IF (l_debug = 1) THEN
1078: trace('l_output_dir => ' || l_output_dir, TRACE_PROMPT, TRACE_LEVEL);
1079: END IF;
1080:
1077: IF (l_debug = 1) THEN
1078: trace('l_output_dir => ' || l_output_dir, TRACE_PROMPT, TRACE_LEVEL);
1079: END IF;
1080:
1081: FND_PROFILE.GET('ICX_DATE_FORMAT_MASK',l_date_mask);
1082: IF (l_debug = 1) THEN
1083: trace('l_date_mask => ' || l_date_mask, TRACE_PROMPT, TRACE_LEVEL);
1084: END IF;
1085:
1387: l_cur_index NUMBER;
1388:
1389: BEGIN
1390: -- Bug 2449358 : LABELING: LABEL_XML.LOG SHOULD ONLY BE CREATED IF DEBUG IS ON
1391: -- The fnd_profile.get, gets the value for the
1392: -- input('INV_DEBUG_TRACE') based on the current fnd_global.user_id.
1393: -- According to the new design, the LABEL_XML.log will only be generated if the profile option
1394: -- INV: Debug Trace is set to 'Yes'. Hence the IF clause around the existing code.
1395:
1393: -- According to the new design, the LABEL_XML.log will only be generated if the profile option
1394: -- INV: Debug Trace is set to 'Yes'. Hence the IF clause around the existing code.
1395:
1396: -- Get INV_DEBUG_TRACE profile for the current user.
1397: fnd_profile.get('INV_DEBUG_TRACE',l_debug_trace);
1398:
1399: --l_debug_trace := fnd_profile.value_specific('INV_DEBUG_TRACE',fnd_global.user_id);
1400: IF (l_debug = 1) THEN
1401: trace('INV_DEBUG_TRACE = ' || l_debug_trace, TRACE_PROMPT, TRACE_LEVEL);
1395:
1396: -- Get INV_DEBUG_TRACE profile for the current user.
1397: fnd_profile.get('INV_DEBUG_TRACE',l_debug_trace);
1398:
1399: --l_debug_trace := fnd_profile.value_specific('INV_DEBUG_TRACE',fnd_global.user_id);
1400: IF (l_debug = 1) THEN
1401: trace('INV_DEBUG_TRACE = ' || l_debug_trace, TRACE_PROMPT, TRACE_LEVEL);
1402: END IF;
1403:
1404: IF (l_debug_trace = 1) THEN
1405: -- l_debug_trace = 1 means 'Yes' and 2 means 'No'
1406:
1407: --Get directory from INV_DEBUG_FILE profile
1408: fnd_profile.get('INV_DEBUG_FILE',l_dir);
1409: --l_dir := fnd_profile.value_specific('INV_DEBUG_FILE',fnd_global.user_id);
1410: IF (l_debug = 1) THEN
1411: trace('INV_DEBUG_FILE = ' || l_dir, TRACE_PROMPT, TRACE_LEVEL);
1412: END IF;
1405: -- l_debug_trace = 1 means 'Yes' and 2 means 'No'
1406:
1407: --Get directory from INV_DEBUG_FILE profile
1408: fnd_profile.get('INV_DEBUG_FILE',l_dir);
1409: --l_dir := fnd_profile.value_specific('INV_DEBUG_FILE',fnd_global.user_id);
1410: IF (l_debug = 1) THEN
1411: trace('INV_DEBUG_FILE = ' || l_dir, TRACE_PROMPT, TRACE_LEVEL);
1412: END IF;
1413:
2189: l_transaction_id INV_LABEL.transaction_id_rec_type;
2190: l_transaction_identifier NUMBER ;
2191:
2192: BEGIN
2193: l_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2194:
2195: IF (l_debug = 1) THEN
2196: trace('Begin: print_label_wrap() ' || 'p_bus_flow, txn_id, p_transaction_identifier: '
2197: ||p_business_flow_code||','||p_transaction_id||','|| p_transaction_identifier , TRACE_PROMPT, TRACE_LEVEL);
2288: l_revision mtl_item_revisions_b.REVISION%TYPE;
2289: BEGIN
2290:
2291:
2292: l_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2293: IF (l_debug = 1) THEN
2294: trace('Begin : print_label_manual_wrap() input parameters are ' , TRACE_PROMPT, TRACE_LEVEL);
2295: trace(' BusFlow,labelType: '||p_business_flow_code||','||p_label_type,TRACE_PROMPT, TRACE_LEVEL);
2296: trace(' Org,Item,Rev,Lot,fmSer,toSer: '||p_organization_id||','||p_inventory_item_id||','||p_revision||','
2642: cntr BINARY_INTEGER;
2643:
2644: BEGIN
2645:
2646: l_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2647: IF (l_debug = 1) THEN
2648: trace(' **** In Print_label ****', TRACE_PROMPT, TRACE_LEVEL);
2649: trace(' p_print_mode, p_label_type_id, p_business_flow_code: '
2650: || p_print_mode ||','||p_label_type_id||','||p_business_flow_code, TRACE_PROMPT, TRACE_LEVEL);
3527: l_msg_data VARCHAR2(4000);
3528: l_sysdate DATE;
3529:
3530: BEGIN
3531: l_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3532:
3533: IF (l_debug = 1) THEN
3534: trace('In resubmit label request',TRACE_PROMPT, TRACE_LEVEL);
3535: trace('resubmit, hist_request_id='||p_hist_label_request_id
3759: x_Status OUT NOCOPY VARCHAR2,
3760: x_Message OUT NOCOPY VARCHAR2
3761: ) IS
3762: BEGIN
3763: l_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3764: x_Status := FND_API.G_RET_STS_SUCCESS;
3765: IF (l_debug = 1) THEN
3766: trace('Querying label request hist with Printer='|| p_printer_Name||
3767: ',BusFlow=' || p_bus_flow_Code ||
3842: BEGIN
3843: trace('p_inventory_item_id : p_organization_id : p_unit_of_measure : p_revision'
3844: || p_inventory_item_id ||','||p_organization_id||','||p_unit_of_measure||','||p_revision, TRACE_PROMPT, TRACE_LEVEL);
3845: x_return_status := FND_API.G_RET_STS_SUCCESS;
3846: G_PROFILE_GTIN := FND_PROFILE.value('INV:GTIN_CROSS_REFERENCE_TYPE');
3847: trace('Profile INV:GTIN_CROSS_REFERENCE_TYPE : '||G_PROFILE_GTIN,TRACE_PROMPT, TRACE_LEVEL);
3848: IF(G_PROFILE_GTIN IS NOT NULL) THEN
3849:
3850: -- Bug 6917861, Bifurcating the code for revision and non-revision controlled items.