158:
159: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
160: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
161: END IF;
162: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
163: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
164: fnd_msg_pub.add;
165:
166: END Create_Address_Record;
159: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
160: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
161: END IF;
162: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
163: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
164: fnd_msg_pub.add;
165:
166: END Create_Address_Record;
167:
225:
226: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
227: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
228: END IF;
229: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
230: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
231: fnd_msg_pub.add;
232:
233: END Create_Line_Record;
226: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
227: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
228: END IF;
229: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
230: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
231: fnd_msg_pub.add;
232:
233: END Create_Line_Record;
234:
298:
299: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
300: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
301: END IF;
302: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
303: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
304: fnd_msg_pub.add;
305:
306: END Create_Delivery_Record;
299: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
300: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
301: END IF;
302: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
303: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
304: fnd_msg_pub.add;
305:
306: END Create_Delivery_Record;
307:
356:
357: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
358: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
359: END IF;
360: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
361: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
362: fnd_msg_pub.add;
363:
364: END Create_Header_Record;
357: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
358: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
359: END IF;
360: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
361: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
362: fnd_msg_pub.add;
363:
364: END Create_Header_Record;
365:
441: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
442: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
443: END IF;
444:
445: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
446: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
447: fnd_msg_pub.add;
448:
449: END Is_All_Line_Error;
442: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
443: END IF;
444:
445: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
446: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
447: fnd_msg_pub.add;
448:
449: END Is_All_Line_Error;
450:
452: -- Start of comments
453: -- API name : set_message
454: -- Type : Private
455: -- Pre-reqs : None.
456: -- Function: API to get translated message from FND Message stack.Error Messages are first transfer from FND stack
457: -- to store in local table,so that error meesages can be appended to output message tabe to UI in sequence
458: -- of success then error messages.
459: -- Parameters :
460: -- IN:
460: -- IN:
461: -- p_product IN Product Code
462: -- p_msg_name IN Message Code
463: -- RETURN:
464: -- Translated message from FND Message.
465: -- End of comments
466: FUNCTION set_message(p_product varchar2,p_msg_name varchar2) RETURN varchar2
467: IS
468:
483: WSH_DEBUG_SV.log(l_module_name,'p_product',p_product);
484: END IF;
485:
486: --Set the message to FND stack, so that translation is taken care off.
487: FND_MESSAGE.SET_NAME(p_product, p_msg_name);
488: l_msg :=FND_MESSAGE.GET;
489:
490: IF l_debug_on THEN
491: WSH_DEBUG_SV.log(l_module_name,'Message',l_msg);
484: END IF;
485:
486: --Set the message to FND stack, so that translation is taken care off.
487: FND_MESSAGE.SET_NAME(p_product, p_msg_name);
488: l_msg :=FND_MESSAGE.GET;
489:
490: IF l_debug_on THEN
491: WSH_DEBUG_SV.log(l_module_name,'Message',l_msg);
492: WSH_DEBUG_SV.pop(l_module_name);
503: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
504: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
505: END IF;
506:
507: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
508: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
509: fnd_msg_pub.add;
510:
511: raise ;
504: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
505: END IF;
506:
507: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
508: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
509: fnd_msg_pub.add;
510:
511: raise ;
512: END set_message;
578: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
579: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
580: END IF;
581:
582: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
583: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
584: fnd_msg_pub.add;
585:
586: raise ;
579: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
580: END IF;
581:
582: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
583: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
584: fnd_msg_pub.add;
585:
586: raise ;
587: END add_time_to_date;
657: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
658: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
659: END IF;
660:
661: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
662: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
663: g_error_tbl(g_error_tbl.count + 1) :=FND_MESSAGE.GET;
664: END Get_message;
665:
658: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
659: END IF;
660:
661: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
662: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
663: g_error_tbl(g_error_tbl.count + 1) :=FND_MESSAGE.GET;
664: END Get_message;
665:
666:
659: END IF;
660:
661: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
662: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
663: g_error_tbl(g_error_tbl.count + 1) :=FND_MESSAGE.GET;
664: END Get_message;
665:
666:
667: -- Start of comments
893: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
894: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
895: END IF;
896:
897: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
898: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
899: fnd_msg_pub.add;
900:
901: raise ;
894: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
895: END IF;
896:
897: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
898: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
899: fnd_msg_pub.add;
900:
901: raise ;
902: END Init_Routing_Req_Validation;
1020: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1021: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1022: END IF;
1023:
1024: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1025: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1026: fnd_msg_pub.add;
1027:
1028: raise ;
1021: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1022: END IF;
1023:
1024: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1025: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1026: fnd_msg_pub.add;
1027:
1028: raise ;
1029: END Init_Supplier_Validation;
1106: END IF;
1107:
1108: IF (g_field.requried(i) = 'Y' ) THEN
1109: l_find_miss_column:= true;
1110: FND_MESSAGE.SET_NAME('WSH','WSH_RR_MISS_COLUMN');
1111: FND_MESSAGE.SET_TOKEN('COL_NAME',g_field.name(i));
1112: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',g_file_line_number);
1113: fnd_msg_pub.add;
1114: END IF;
1107:
1108: IF (g_field.requried(i) = 'Y' ) THEN
1109: l_find_miss_column:= true;
1110: FND_MESSAGE.SET_NAME('WSH','WSH_RR_MISS_COLUMN');
1111: FND_MESSAGE.SET_TOKEN('COL_NAME',g_field.name(i));
1112: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',g_file_line_number);
1113: fnd_msg_pub.add;
1114: END IF;
1115: END IF;
1108: IF (g_field.requried(i) = 'Y' ) THEN
1109: l_find_miss_column:= true;
1110: FND_MESSAGE.SET_NAME('WSH','WSH_RR_MISS_COLUMN');
1111: FND_MESSAGE.SET_TOKEN('COL_NAME',g_field.name(i));
1112: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',g_file_line_number);
1113: fnd_msg_pub.add;
1114: END IF;
1115: END IF;
1116:
1130:
1131: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1132: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1133: END IF;
1134: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1135: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1136: fnd_msg_pub.add;
1137:
1138: raise;
1131: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1132: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1133: END IF;
1134: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1135: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1136: fnd_msg_pub.add;
1137:
1138: raise;
1139: END Find_Miss_Column;
1185:
1186: --Required and not null field.
1187: IF (nvl(g_field.requried(p_index),'N') = 'Y' and p_field_value IS NULL )
1188: THEN
1189: FND_MESSAGE.SET_NAME('WSH','WSH_RR_REQUIRED_FIELD_NULL');
1190: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(p_index));
1191: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',g_file_line_number);
1192: fnd_msg_pub.add;
1193:
1186: --Required and not null field.
1187: IF (nvl(g_field.requried(p_index),'N') = 'Y' and p_field_value IS NULL )
1188: THEN
1189: FND_MESSAGE.SET_NAME('WSH','WSH_RR_REQUIRED_FIELD_NULL');
1190: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(p_index));
1191: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',g_file_line_number);
1192: fnd_msg_pub.add;
1193:
1194: l_status := false;
1187: IF (nvl(g_field.requried(p_index),'N') = 'Y' and p_field_value IS NULL )
1188: THEN
1189: FND_MESSAGE.SET_NAME('WSH','WSH_RR_REQUIRED_FIELD_NULL');
1190: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(p_index));
1191: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',g_file_line_number);
1192: fnd_msg_pub.add;
1193:
1194: l_status := false;
1195: END IF;
1236: --where g_field.max_size(p_index) will be null
1237: IF ( g_field.max_size(p_index) IS NOT NULL
1238: AND (length(l_field_value) > g_field.max_size(p_index)) ) THEN
1239:
1240: FND_MESSAGE.SET_NAME('WSH','WSH_RR_EXC_SIZE');
1241: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(p_index));
1242: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',g_file_line_number);
1243: fnd_msg_pub.add;
1244:
1237: IF ( g_field.max_size(p_index) IS NOT NULL
1238: AND (length(l_field_value) > g_field.max_size(p_index)) ) THEN
1239:
1240: FND_MESSAGE.SET_NAME('WSH','WSH_RR_EXC_SIZE');
1241: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(p_index));
1242: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',g_file_line_number);
1243: fnd_msg_pub.add;
1244:
1245: l_status := false;
1238: AND (length(l_field_value) > g_field.max_size(p_index)) ) THEN
1239:
1240: FND_MESSAGE.SET_NAME('WSH','WSH_RR_EXC_SIZE');
1241: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(p_index));
1242: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',g_file_line_number);
1243: fnd_msg_pub.add;
1244:
1245: l_status := false;
1246: END IF;
1268:
1269: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1270: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1271: END IF;
1272: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1273: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1274: fnd_msg_pub.add;
1275:
1276: RETURN false;
1269: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1270: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1271: END IF;
1272: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1273: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1274: fnd_msg_pub.add;
1275:
1276: RETURN false;
1277: END Is_field_valid;
1466: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1467: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1468: END IF;
1469:
1470: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_INVALID_FIELD');
1471: FND_MESSAGE.SET_TOKEN('FIELD_NAME', p_col_name);
1472: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_index);
1473: fnd_msg_pub.add;
1474:
1467: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1468: END IF;
1469:
1470: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_INVALID_FIELD');
1471: FND_MESSAGE.SET_TOKEN('FIELD_NAME', p_col_name);
1472: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_index);
1473: fnd_msg_pub.add;
1474:
1475: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1468: END IF;
1469:
1470: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_INVALID_FIELD');
1471: FND_MESSAGE.SET_TOKEN('FIELD_NAME', p_col_name);
1472: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_index);
1473: fnd_msg_pub.add;
1474:
1475: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1476: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1471: FND_MESSAGE.SET_TOKEN('FIELD_NAME', p_col_name);
1472: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_index);
1473: fnd_msg_pub.add;
1474:
1475: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1476: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1477: fnd_msg_pub.add;
1478:
1479:
1472: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_index);
1473: fnd_msg_pub.add;
1474:
1475: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1476: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1477: fnd_msg_pub.add;
1478:
1479:
1480: END Process_Address_Line;
1672: x_return_status',x_return_status);
1673: END IF;
1674: END IF;
1675:
1676: --Merge Message from fnd message stack and global message table
1677: --to output message table.
1678: get_message;
1679: l_msg_count:= x_message_tbl.count;
1680:
1691: IF l_debug_on THEN
1692: fnd_profile.get('WSH_DEBUG_LOG_DIRECTORY',l_debugfile);
1693: l_debugfile := l_debugfile||'/'||WSH_DEBUG_SV.g_file;
1694:
1695: FND_MESSAGE.SET_NAME('WSH','WSH_DEBUG_FILE_NAME');
1696: FND_MESSAGE.SET_TOKEN('DEBUG_FILE_NAME',l_debugfile);
1697:
1698: l_msg_count:= l_msg_count + 1;
1699: x_message_tbl.extend;
1692: fnd_profile.get('WSH_DEBUG_LOG_DIRECTORY',l_debugfile);
1693: l_debugfile := l_debugfile||'/'||WSH_DEBUG_SV.g_file;
1694:
1695: FND_MESSAGE.SET_NAME('WSH','WSH_DEBUG_FILE_NAME');
1696: FND_MESSAGE.SET_TOKEN('DEBUG_FILE_NAME',l_debugfile);
1697:
1698: l_msg_count:= l_msg_count + 1;
1699: x_message_tbl.extend;
1700: x_message_tbl(l_msg_count):= FND_MESSAGE.GET;
1696: FND_MESSAGE.SET_TOKEN('DEBUG_FILE_NAME',l_debugfile);
1697:
1698: l_msg_count:= l_msg_count + 1;
1699: x_message_tbl.extend;
1700: x_message_tbl(l_msg_count):= FND_MESSAGE.GET;
1701: END IF;
1702:
1703:
1704: IF l_debug_on THEN
1723:
1724: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1725: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1726: END IF;
1727: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1728: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1729: l_msg_count:= l_msg_count + 1;
1730: x_message_tbl.extend;
1731: x_message_tbl(l_msg_count):= FND_MESSAGE.GET;
1724: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1725: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1726: END IF;
1727: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1728: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1729: l_msg_count:= l_msg_count + 1;
1730: x_message_tbl.extend;
1731: x_message_tbl(l_msg_count):= FND_MESSAGE.GET;
1732:
1727: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1728: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1729: l_msg_count:= l_msg_count + 1;
1730: x_message_tbl.extend;
1731: x_message_tbl(l_msg_count):= FND_MESSAGE.GET;
1732:
1733: END Process_Address_File;
1734:
1735:
1901:
1902: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1903: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1904: END IF;
1905: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_INVALID_FIELD');
1906: FND_MESSAGE.SET_TOKEN('FIELD_NAME', p_col_name);
1907: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_index);
1908: fnd_msg_pub.add;
1909:
1902: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1903: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1904: END IF;
1905: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_INVALID_FIELD');
1906: FND_MESSAGE.SET_TOKEN('FIELD_NAME', p_col_name);
1907: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_index);
1908: fnd_msg_pub.add;
1909:
1910: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1903: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1904: END IF;
1905: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_INVALID_FIELD');
1906: FND_MESSAGE.SET_TOKEN('FIELD_NAME', p_col_name);
1907: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_index);
1908: fnd_msg_pub.add;
1909:
1910: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1911: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1906: FND_MESSAGE.SET_TOKEN('FIELD_NAME', p_col_name);
1907: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_index);
1908: fnd_msg_pub.add;
1909:
1910: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1911: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1912: fnd_msg_pub.add;
1913:
1914:
1907: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_index);
1908: fnd_msg_pub.add;
1909:
1910: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1911: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1912: fnd_msg_pub.add;
1913:
1914:
1915: END Process_Line;
2135:
2136: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2137: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2138: END IF;
2139: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_INVALID_FIELD');
2140: FND_MESSAGE.SET_TOKEN('FIELD_NAME', p_col_name);
2141: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_index);
2142: fnd_msg_pub.add;
2143:
2136: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2137: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2138: END IF;
2139: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_INVALID_FIELD');
2140: FND_MESSAGE.SET_TOKEN('FIELD_NAME', p_col_name);
2141: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_index);
2142: fnd_msg_pub.add;
2143:
2144: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2137: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2138: END IF;
2139: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_INVALID_FIELD');
2140: FND_MESSAGE.SET_TOKEN('FIELD_NAME', p_col_name);
2141: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_index);
2142: fnd_msg_pub.add;
2143:
2144: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2145: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
2140: FND_MESSAGE.SET_TOKEN('FIELD_NAME', p_col_name);
2141: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_index);
2142: fnd_msg_pub.add;
2143:
2144: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2145: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
2146: fnd_msg_pub.add;
2147:
2148: END Process_Delivery;
2141: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_index);
2142: fnd_msg_pub.add;
2143:
2144: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2145: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
2146: fnd_msg_pub.add;
2147:
2148: END Process_Delivery;
2149:
2241:
2242: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2243: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2244: END IF;
2245: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_INVALID_FIELD');
2246: FND_MESSAGE.SET_TOKEN('FIELD_NAME', p_col_name);
2247: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_index);
2248: fnd_msg_pub.add;
2249:
2242: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2243: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2244: END IF;
2245: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_INVALID_FIELD');
2246: FND_MESSAGE.SET_TOKEN('FIELD_NAME', p_col_name);
2247: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_index);
2248: fnd_msg_pub.add;
2249:
2250: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2243: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2244: END IF;
2245: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_INVALID_FIELD');
2246: FND_MESSAGE.SET_TOKEN('FIELD_NAME', p_col_name);
2247: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_index);
2248: fnd_msg_pub.add;
2249:
2250: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2251: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
2246: FND_MESSAGE.SET_TOKEN('FIELD_NAME', p_col_name);
2247: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_index);
2248: fnd_msg_pub.add;
2249:
2250: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2251: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
2252: fnd_msg_pub.add;
2253:
2254: END Process_Header;
2247: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_index);
2248: fnd_msg_pub.add;
2249:
2250: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2251: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
2252: fnd_msg_pub.add;
2253:
2254: END Process_Header;
2255:
2399: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2400: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2401: END IF;
2402:
2403: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2404: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
2405: fnd_msg_pub.add;
2406:
2407: END Validate_UOM;
2400: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2401: END IF;
2402:
2403: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2404: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
2405: fnd_msg_pub.add;
2406:
2407: END Validate_UOM;
2408:
2509: WSH_DEBUG_SV.log(l_module_name,'p_email',p_email);
2510: END IF;
2511:
2512: IF (p_vendor_id IS NULL) THEN
2513: FND_MESSAGE.SET_NAME('WSH','WSH_REQUIRED_FIELD_NULL');
2514: FND_MESSAGE.SET_TOKEN('FIELD_NAME','p_vendor_id');
2515: wsh_util_core.add_message(x_return_status,l_module_name);
2516: raise fnd_api.g_exc_error;
2517: END IF;
2510: END IF;
2511:
2512: IF (p_vendor_id IS NULL) THEN
2513: FND_MESSAGE.SET_NAME('WSH','WSH_REQUIRED_FIELD_NULL');
2514: FND_MESSAGE.SET_TOKEN('FIELD_NAME','p_vendor_id');
2515: wsh_util_core.add_message(x_return_status,l_module_name);
2516: raise fnd_api.g_exc_error;
2517: END IF;
2518:
2516: raise fnd_api.g_exc_error;
2517: END IF;
2518:
2519: IF (P_location_code IS NULL) THEN
2520: FND_MESSAGE.SET_NAME('WSH','WSH_REQUIRED_FIELD_NULL');
2521: FND_MESSAGE.SET_TOKEN('FIELD_NAME','p_location_code');
2522: wsh_util_core.add_message(x_return_status,l_module_name);
2523: raise fnd_api.g_exc_error;
2524: END IF;
2517: END IF;
2518:
2519: IF (P_location_code IS NULL) THEN
2520: FND_MESSAGE.SET_NAME('WSH','WSH_REQUIRED_FIELD_NULL');
2521: FND_MESSAGE.SET_TOKEN('FIELD_NAME','p_location_code');
2522: wsh_util_core.add_message(x_return_status,l_module_name);
2523: raise fnd_api.g_exc_error;
2524: END IF;
2525:
2576: -- If Party Site is not Active then error out, with a suitable message.
2577: IF l_party_site_status <> 'A'
2578: THEN
2579: l_party_site_msg := p_location_code;
2580: FND_MESSAGE.SET_NAME('WSH','WSH_INACTIVE_PARTY_SITE');
2581: FND_MESSAGE.SET_TOKEN('PARTY_SITE',l_party_site_msg);
2582: fnd_msg_pub.add;
2583: raise FND_API.G_EXC_ERROR;
2584: END IF;
2577: IF l_party_site_status <> 'A'
2578: THEN
2579: l_party_site_msg := p_location_code;
2580: FND_MESSAGE.SET_NAME('WSH','WSH_INACTIVE_PARTY_SITE');
2581: FND_MESSAGE.SET_TOKEN('PARTY_SITE',l_party_site_msg);
2582: fnd_msg_pub.add;
2583: raise FND_API.G_EXC_ERROR;
2584: END IF;
2585: -- } IB-Phase-2
2651:
2652: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2653: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2654: END IF;
2655: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2656: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
2657: fnd_msg_pub.add;
2658:
2659: END Process_Address;
2652: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2653: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2654: END IF;
2655: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2656: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
2657: fnd_msg_pub.add;
2658:
2659: END Process_Address;
2660:
2821:
2822: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2823: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2824: END IF;
2825: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2826: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
2827: fnd_msg_pub.add;
2828:
2829: END Create_PO;
2822: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2823: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2824: END IF;
2825: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2826: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
2827: fnd_msg_pub.add;
2828:
2829: END Create_PO;
2830:
2935: AND
2936: nvl(l_po_status_rec.cancel_flag(l_index),'N') <> 'Y'
2937: ) THEN
2938:
2939: FND_MESSAGE.SET_NAME('WSH','WSH_RR_PO_ERROR_CLOSED');
2940: fnd_msg_pub.add;
2941: raise fnd_api.g_exc_error;
2942: END IF;
2943:
2942: END IF;
2943:
2944: --If PO is cancelled.
2945: IF (nvl(l_po_status_rec.cancel_flag(l_index),'N') = 'Y' ) THEN
2946: FND_MESSAGE.SET_NAME('WSH','WSH_RR_PO_ERROR_CANCELLED');
2947: fnd_msg_pub.add;
2948: raise fnd_api.g_exc_error;
2949: END IF;
2950:
2949: END IF;
2950:
2951: --If PO is in Hold.
2952: IF (nvl(l_po_status_rec.hold_flag(l_index),'N') = 'Y') THEN
2953: FND_MESSAGE.SET_NAME('WSH','WSH_RR_PO_ERROR_HOLD');
2954: fnd_msg_pub.add;
2955: raise fnd_api.g_exc_error;
2956: END IF;
2957:
2956: END IF;
2957:
2958: --If PO is not Approved.
2959: IF (nvl(l_po_status_rec.approval_flag(l_index),'N') <> 'Y' ) THEN
2960: FND_MESSAGE.SET_NAME('WSH','WSH_RR_PO_ERROR_UNAPPROVED');
2961: fnd_msg_pub.add;
2962: raise fnd_api.g_exc_error;
2963: END IF;
2964:
2996:
2997: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2998: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2999: END IF;
3000: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
3001: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
3002: fnd_msg_pub.add;
3003:
3004: END Validate_PO;
2997: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2998: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2999: END IF;
3000: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
3001: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
3002: fnd_msg_pub.add;
3003:
3004: END Validate_PO;
3005:
3092: --Either latest_pickup_date or earliest_pickup_date is requried.
3093: --If both date are specified than earlies pickup date should not be grater than latest pickup date.
3094: IF (p_line.earliest_pickup_date(p_line_index) IS NULL and
3095: p_line.latest_pickup_date(p_line_index) IS NULL) THEN
3096: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_REQ_PICKUP_DATE');
3097: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_line_index);
3098: fnd_msg_pub.add;
3099: raise fnd_api.g_exc_error;
3100: ELSIF (p_line.earliest_pickup_date(p_line_index) IS NOT NULL
3093: --If both date are specified than earlies pickup date should not be grater than latest pickup date.
3094: IF (p_line.earliest_pickup_date(p_line_index) IS NULL and
3095: p_line.latest_pickup_date(p_line_index) IS NULL) THEN
3096: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_REQ_PICKUP_DATE');
3097: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_line_index);
3098: fnd_msg_pub.add;
3099: raise fnd_api.g_exc_error;
3100: ELSIF (p_line.earliest_pickup_date(p_line_index) IS NOT NULL
3101: and p_line.latest_pickup_date(p_line_index) IS NULL) THEN
3106: ELSIF (p_line.earliest_pickup_date(p_line_index) IS NOT NULL
3107: and p_line.latest_pickup_date(p_line_index) IS NOT NULL) THEN
3108:
3109: IF (p_line.earliest_pickup_date(p_line_index) > p_line.latest_pickup_date(p_line_index) ) THEN
3110: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_INV_PICKUP_DATE');
3111: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_line_index);
3112: fnd_msg_pub.add;
3113: raise fnd_api.g_exc_error;
3114: END IF;
3107: and p_line.latest_pickup_date(p_line_index) IS NOT NULL) THEN
3108:
3109: IF (p_line.earliest_pickup_date(p_line_index) > p_line.latest_pickup_date(p_line_index) ) THEN
3110: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_INV_PICKUP_DATE');
3111: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_line_index);
3112: fnd_msg_pub.add;
3113: raise fnd_api.g_exc_error;
3114: END IF;
3115:
3116: END IF;
3117:
3118: --No negative Item qty.
3119: IF (p_line.Item_quantity(p_line_index) < 0 ) THEN
3120: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_NEG_NUM');
3121: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_item_qty));
3122: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_line_index);
3123: fnd_msg_pub.add;
3124: raise fnd_api.g_exc_error;
3117:
3118: --No negative Item qty.
3119: IF (p_line.Item_quantity(p_line_index) < 0 ) THEN
3120: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_NEG_NUM');
3121: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_item_qty));
3122: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_line_index);
3123: fnd_msg_pub.add;
3124: raise fnd_api.g_exc_error;
3125: END IF;
3118: --No negative Item qty.
3119: IF (p_line.Item_quantity(p_line_index) < 0 ) THEN
3120: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_NEG_NUM');
3121: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_item_qty));
3122: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_line_index);
3123: fnd_msg_pub.add;
3124: raise fnd_api.g_exc_error;
3125: END IF;
3126:
3125: END IF;
3126:
3127: --No negative weight.
3128: IF (nvl(p_line.weight(p_line_index),1) < 0 ) THEN
3129: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_NEG_NUM');
3130: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_total_weight));
3131: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_line_index);
3132: fnd_msg_pub.add;
3133: raise fnd_api.g_exc_error;
3126:
3127: --No negative weight.
3128: IF (nvl(p_line.weight(p_line_index),1) < 0 ) THEN
3129: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_NEG_NUM');
3130: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_total_weight));
3131: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_line_index);
3132: fnd_msg_pub.add;
3133: raise fnd_api.g_exc_error;
3134: END IF;
3127: --No negative weight.
3128: IF (nvl(p_line.weight(p_line_index),1) < 0 ) THEN
3129: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_NEG_NUM');
3130: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_total_weight));
3131: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_line_index);
3132: fnd_msg_pub.add;
3133: raise fnd_api.g_exc_error;
3134: END IF;
3135:
3135:
3136:
3137: --No negative volume.
3138: IF (nvl(p_line.volume(p_line_index),1) < 0 ) THEN
3139: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_NEG_NUM');
3140: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_total_volume));
3141: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_line_index);
3142: fnd_msg_pub.add;
3143: raise fnd_api.g_exc_error;
3136:
3137: --No negative volume.
3138: IF (nvl(p_line.volume(p_line_index),1) < 0 ) THEN
3139: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_NEG_NUM');
3140: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_total_volume));
3141: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_line_index);
3142: fnd_msg_pub.add;
3143: raise fnd_api.g_exc_error;
3144: END IF;
3137: --No negative volume.
3138: IF (nvl(p_line.volume(p_line_index),1) < 0 ) THEN
3139: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_NEG_NUM');
3140: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_total_volume));
3141: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_line_index);
3142: fnd_msg_pub.add;
3143: raise fnd_api.g_exc_error;
3144: END IF;
3145:
3148: IF ((p_line.weight(p_line_index) IS NOT NULL and p_line.weight_uom(p_line_index) IS NULL)
3149: OR (p_line.weight(p_line_index) IS NULL and p_line.weight_uom(p_line_index) IS NOT NULL)
3150: ) THEN
3151:
3152: FND_MESSAGE.SET_NAME('WSH','WSH_RR_REQUIRED_FIELD_NULL');
3153: IF (p_line.weight(p_line_index) IS NULL) THEN
3154: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_total_weight));
3155: ELSE
3156: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_weight_uom));
3150: ) THEN
3151:
3152: FND_MESSAGE.SET_NAME('WSH','WSH_RR_REQUIRED_FIELD_NULL');
3153: IF (p_line.weight(p_line_index) IS NULL) THEN
3154: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_total_weight));
3155: ELSE
3156: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_weight_uom));
3157: END IF;
3158: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_line_index);
3152: FND_MESSAGE.SET_NAME('WSH','WSH_RR_REQUIRED_FIELD_NULL');
3153: IF (p_line.weight(p_line_index) IS NULL) THEN
3154: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_total_weight));
3155: ELSE
3156: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_weight_uom));
3157: END IF;
3158: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_line_index);
3159: fnd_msg_pub.add;
3160: raise fnd_api.g_exc_error;
3154: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_total_weight));
3155: ELSE
3156: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_weight_uom));
3157: END IF;
3158: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_line_index);
3159: fnd_msg_pub.add;
3160: raise fnd_api.g_exc_error;
3161: END IF;
3162:
3163: --If Volume UOM is given then Volume is requried, vice-versa.
3164: IF ( (p_line.volume(p_line_index) IS NOT NULL and p_line.volume_uom(p_line_index) IS NULL )
3165: OR (p_line.volume(p_line_index) IS NULL and p_line.volume_uom(p_line_index) IS NOT NULL)
3166: )THEN
3167: FND_MESSAGE.SET_NAME('WSH','WSH_RR_REQUIRED_FIELD_NULL');
3168: IF (p_line.volume(p_line_index) IS NULL) THEN
3169: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_total_volume));
3170: ELSE
3171: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_volume_uom));
3165: OR (p_line.volume(p_line_index) IS NULL and p_line.volume_uom(p_line_index) IS NOT NULL)
3166: )THEN
3167: FND_MESSAGE.SET_NAME('WSH','WSH_RR_REQUIRED_FIELD_NULL');
3168: IF (p_line.volume(p_line_index) IS NULL) THEN
3169: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_total_volume));
3170: ELSE
3171: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_volume_uom));
3172: END IF;
3173:
3167: FND_MESSAGE.SET_NAME('WSH','WSH_RR_REQUIRED_FIELD_NULL');
3168: IF (p_line.volume(p_line_index) IS NULL) THEN
3169: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_total_volume));
3170: ELSE
3171: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_volume_uom));
3172: END IF;
3173:
3174: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_line_index);
3175: fnd_msg_pub.add;
3170: ELSE
3171: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_volume_uom));
3172: END IF;
3173:
3174: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_line_index);
3175: fnd_msg_pub.add;
3176: raise fnd_api.g_exc_error;
3177: END IF;
3178:
3188:
3189: OPEN get_item_uom(p_line.item_uom(p_line_index));
3190: FETCH get_item_uom INTO l_tmp;
3191: IF (get_item_uom%NOTFOUND) THEN
3192: FND_MESSAGE.SET_NAME('WSH','WSH_OI_INVALID_UOM');
3193: fnd_msg_pub.add;
3194: CLOSE get_item_uom;
3195: raise fnd_api.g_exc_error;
3196: END IF;
3335: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3336: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3337: END IF;
3338:
3339: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
3340: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
3341: fnd_msg_pub.add;
3342:
3343: END Validate_line;
3336: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3337: END IF;
3338:
3339: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
3340: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
3341: fnd_msg_pub.add;
3342:
3343: END Validate_line;
3344:
3391: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3392:
3393:
3394: IF (nvl(p_delivery.Number_of_containers(p_delivery_index),1) < 0 ) THEN
3395: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_NEG_NUM');
3396: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_number_of_containers));
3397: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_delivery_index);
3398: fnd_msg_pub.add;
3399:
3392:
3393:
3394: IF (nvl(p_delivery.Number_of_containers(p_delivery_index),1) < 0 ) THEN
3395: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_NEG_NUM');
3396: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_number_of_containers));
3397: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_delivery_index);
3398: fnd_msg_pub.add;
3399:
3400: raise fnd_api.g_exc_error;
3393:
3394: IF (nvl(p_delivery.Number_of_containers(p_delivery_index),1) < 0 ) THEN
3395: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_NEG_NUM');
3396: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_number_of_containers));
3397: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_delivery_index);
3398: fnd_msg_pub.add;
3399:
3400: raise fnd_api.g_exc_error;
3401: END IF;
3400: raise fnd_api.g_exc_error;
3401: END IF;
3402:
3403: IF (nvl(p_delivery.total_weight(p_delivery_index),1) < 0 ) THEN
3404: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_NEG_NUM');
3405: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_del_total_weight));
3406: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_delivery_index);
3407: fnd_msg_pub.add;
3408:
3401: END IF;
3402:
3403: IF (nvl(p_delivery.total_weight(p_delivery_index),1) < 0 ) THEN
3404: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_NEG_NUM');
3405: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_del_total_weight));
3406: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_delivery_index);
3407: fnd_msg_pub.add;
3408:
3409: raise fnd_api.g_exc_error;
3402:
3403: IF (nvl(p_delivery.total_weight(p_delivery_index),1) < 0 ) THEN
3404: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_NEG_NUM');
3405: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_del_total_weight));
3406: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_delivery_index);
3407: fnd_msg_pub.add;
3408:
3409: raise fnd_api.g_exc_error;
3410: END IF;
3410: END IF;
3411:
3412:
3413: IF (nvl(p_delivery.total_volume(p_delivery_index),1) < 0 ) THEN
3414: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_NEG_NUM');
3415: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_del_total_volume));
3416: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_delivery_index);
3417: fnd_msg_pub.add;
3418:
3411:
3412:
3413: IF (nvl(p_delivery.total_volume(p_delivery_index),1) < 0 ) THEN
3414: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_NEG_NUM');
3415: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_del_total_volume));
3416: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_delivery_index);
3417: fnd_msg_pub.add;
3418:
3419: raise fnd_api.g_exc_error;
3412:
3413: IF (nvl(p_delivery.total_volume(p_delivery_index),1) < 0 ) THEN
3414: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_NEG_NUM');
3415: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_del_total_volume));
3416: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_delivery_index);
3417: fnd_msg_pub.add;
3418:
3419: raise fnd_api.g_exc_error;
3420: END IF;
3423: --If weigh UOM given the weight is requried, vice-versa
3424: IF ( (p_delivery.total_weight(p_delivery_index) IS NOT NULL and p_delivery.weight_uom(p_delivery_index) IS NULL)
3425: OR (p_delivery.total_weight(p_delivery_index) IS NULL and p_delivery.weight_uom(p_delivery_index) IS NOT NULL)
3426: )THEN
3427: FND_MESSAGE.SET_NAME('WSH','WSH_RR_REQUIRED_FIELD_NULL');
3428: IF (p_delivery.total_weight(p_delivery_index) IS NULL) THEN
3429: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_del_total_weight));
3430: ELSE
3431: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_del_weight_uom));
3425: OR (p_delivery.total_weight(p_delivery_index) IS NULL and p_delivery.weight_uom(p_delivery_index) IS NOT NULL)
3426: )THEN
3427: FND_MESSAGE.SET_NAME('WSH','WSH_RR_REQUIRED_FIELD_NULL');
3428: IF (p_delivery.total_weight(p_delivery_index) IS NULL) THEN
3429: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_del_total_weight));
3430: ELSE
3431: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_del_weight_uom));
3432: END IF;
3433: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_delivery_index);
3427: FND_MESSAGE.SET_NAME('WSH','WSH_RR_REQUIRED_FIELD_NULL');
3428: IF (p_delivery.total_weight(p_delivery_index) IS NULL) THEN
3429: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_del_total_weight));
3430: ELSE
3431: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_del_weight_uom));
3432: END IF;
3433: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_delivery_index);
3434: fnd_msg_pub.add;
3435:
3429: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_del_total_weight));
3430: ELSE
3431: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_del_weight_uom));
3432: END IF;
3433: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_delivery_index);
3434: fnd_msg_pub.add;
3435:
3436: raise fnd_api.g_exc_error;
3437: END IF;
3439: --If volume UOM given the volume is requried, vice-versa
3440: IF ((p_delivery.total_volume(p_delivery_index) IS NOT NULL and p_delivery.volume_uom(p_delivery_index) IS NULL)
3441: OR (p_delivery.total_volume(p_delivery_index) IS NULL and p_delivery.volume_uom(p_delivery_index) IS NOT NULL)
3442: ) THEN
3443: FND_MESSAGE.SET_NAME('WSH','WSH_RR_REQUIRED_FIELD_NULL');
3444: IF (p_delivery.total_volume(p_delivery_index) IS NULL) THEN
3445: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_del_total_volume));
3446: ELSE
3447: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_del_volume_uom));
3441: OR (p_delivery.total_volume(p_delivery_index) IS NULL and p_delivery.volume_uom(p_delivery_index) IS NOT NULL)
3442: ) THEN
3443: FND_MESSAGE.SET_NAME('WSH','WSH_RR_REQUIRED_FIELD_NULL');
3444: IF (p_delivery.total_volume(p_delivery_index) IS NULL) THEN
3445: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_del_total_volume));
3446: ELSE
3447: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_del_volume_uom));
3448: END IF;
3449:
3443: FND_MESSAGE.SET_NAME('WSH','WSH_RR_REQUIRED_FIELD_NULL');
3444: IF (p_delivery.total_volume(p_delivery_index) IS NULL) THEN
3445: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_del_total_volume));
3446: ELSE
3447: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_del_volume_uom));
3448: END IF;
3449:
3450: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_delivery_index);
3451: fnd_msg_pub.add;
3446: ELSE
3447: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_del_volume_uom));
3448: END IF;
3449:
3450: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_delivery_index);
3451: fnd_msg_pub.add;
3452:
3453: raise fnd_api.g_exc_error;
3454: END IF;
3520: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3521: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3522: END IF;
3523:
3524: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
3525: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
3526: fnd_msg_pub.add;
3527:
3528: END Validate_Delivery;
3521: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3522: END IF;
3523:
3524: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
3525: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
3526: fnd_msg_pub.add;
3527:
3528: END Validate_Delivery;
3529:
3642: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3643: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3644: END IF;
3645:
3646: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
3647: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
3648: fnd_msg_pub.add;
3649:
3650: END Validate_Delivery_uom;
3643: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3644: END IF;
3645:
3646: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
3647: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
3648: fnd_msg_pub.add;
3649:
3650: END Validate_Delivery_uom;
3651:
3979: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3980: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3981: END IF;
3982:
3983: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
3984: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
3985: fnd_msg_pub.add;
3986:
3987: END Update_Split_Details;
3980: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3981: END IF;
3982:
3983: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
3984: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
3985: fnd_msg_pub.add;
3986:
3987: END Update_Split_Details;
3988:
4050: END IF;
4051:
4052: --Unassigned allowed only lines are released status 'X' i.e. Inbound open lines.
4053: IF (del_rec.released_status <> 'X' ) THEN
4054: FND_MESSAGE.SET_NAME('WSH','WSH_RR_UNASSIGN_DET_ERROR');
4055: fnd_msg_pub.add;
4056: raise fnd_api.g_exc_error;
4057: END IF;
4058: l_detail_ids(l_detail_ids.count + 1):= del_rec.delivery_detail_id;
4135: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4136: END IF;
4137:
4138:
4139: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
4140: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
4141: fnd_msg_pub.add;
4142:
4143: END UnAssign_Details;
4136: END IF;
4137:
4138:
4139: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
4140: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
4141: fnd_msg_pub.add;
4142:
4143: END UnAssign_Details;
4144:
4291: END IF;
4292:
4293: -- Scan through details line, delivery associated is same for all lines.
4294: IF (l_prev_delivery_id IS NOT NULL AND l_prev_delivery_id <> l_del_info.delivery_id) THEN
4295: FND_MESSAGE.SET_NAME('WSH','WSH_RR_PO_GROUP_NOT_MATCH');
4296: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_del_info.delivery_id));
4297: FND_MESSAGE.SET_TOKEN('PO_HEADER_NUM',l_del_info.source_header_number);
4298: FND_MESSAGE.SET_TOKEN('PO_LINE_NUM', l_del_info.source_line_number);
4299: FND_MESSAGE.SET_TOKEN('PO_SHIPMENT_LINE_NUM', l_del_info.po_shipment_line_number);
4292:
4293: -- Scan through details line, delivery associated is same for all lines.
4294: IF (l_prev_delivery_id IS NOT NULL AND l_prev_delivery_id <> l_del_info.delivery_id) THEN
4295: FND_MESSAGE.SET_NAME('WSH','WSH_RR_PO_GROUP_NOT_MATCH');
4296: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_del_info.delivery_id));
4297: FND_MESSAGE.SET_TOKEN('PO_HEADER_NUM',l_del_info.source_header_number);
4298: FND_MESSAGE.SET_TOKEN('PO_LINE_NUM', l_del_info.source_line_number);
4299: FND_MESSAGE.SET_TOKEN('PO_SHIPMENT_LINE_NUM', l_del_info.po_shipment_line_number);
4300: FND_MESSAGE.SET_TOKEN('PO_RELEASE_NUM',l_del_info.source_blanket_reference_num);
4293: -- Scan through details line, delivery associated is same for all lines.
4294: IF (l_prev_delivery_id IS NOT NULL AND l_prev_delivery_id <> l_del_info.delivery_id) THEN
4295: FND_MESSAGE.SET_NAME('WSH','WSH_RR_PO_GROUP_NOT_MATCH');
4296: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_del_info.delivery_id));
4297: FND_MESSAGE.SET_TOKEN('PO_HEADER_NUM',l_del_info.source_header_number);
4298: FND_MESSAGE.SET_TOKEN('PO_LINE_NUM', l_del_info.source_line_number);
4299: FND_MESSAGE.SET_TOKEN('PO_SHIPMENT_LINE_NUM', l_del_info.po_shipment_line_number);
4300: FND_MESSAGE.SET_TOKEN('PO_RELEASE_NUM',l_del_info.source_blanket_reference_num);
4301: fnd_msg_pub.add;
4294: IF (l_prev_delivery_id IS NOT NULL AND l_prev_delivery_id <> l_del_info.delivery_id) THEN
4295: FND_MESSAGE.SET_NAME('WSH','WSH_RR_PO_GROUP_NOT_MATCH');
4296: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_del_info.delivery_id));
4297: FND_MESSAGE.SET_TOKEN('PO_HEADER_NUM',l_del_info.source_header_number);
4298: FND_MESSAGE.SET_TOKEN('PO_LINE_NUM', l_del_info.source_line_number);
4299: FND_MESSAGE.SET_TOKEN('PO_SHIPMENT_LINE_NUM', l_del_info.po_shipment_line_number);
4300: FND_MESSAGE.SET_TOKEN('PO_RELEASE_NUM',l_del_info.source_blanket_reference_num);
4301: fnd_msg_pub.add;
4302: raise fnd_api.g_exc_error;
4295: FND_MESSAGE.SET_NAME('WSH','WSH_RR_PO_GROUP_NOT_MATCH');
4296: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_del_info.delivery_id));
4297: FND_MESSAGE.SET_TOKEN('PO_HEADER_NUM',l_del_info.source_header_number);
4298: FND_MESSAGE.SET_TOKEN('PO_LINE_NUM', l_del_info.source_line_number);
4299: FND_MESSAGE.SET_TOKEN('PO_SHIPMENT_LINE_NUM', l_del_info.po_shipment_line_number);
4300: FND_MESSAGE.SET_TOKEN('PO_RELEASE_NUM',l_del_info.source_blanket_reference_num);
4301: fnd_msg_pub.add;
4302: raise fnd_api.g_exc_error;
4303: ELSE
4296: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_del_info.delivery_id));
4297: FND_MESSAGE.SET_TOKEN('PO_HEADER_NUM',l_del_info.source_header_number);
4298: FND_MESSAGE.SET_TOKEN('PO_LINE_NUM', l_del_info.source_line_number);
4299: FND_MESSAGE.SET_TOKEN('PO_SHIPMENT_LINE_NUM', l_del_info.po_shipment_line_number);
4300: FND_MESSAGE.SET_TOKEN('PO_RELEASE_NUM',l_del_info.source_blanket_reference_num);
4301: fnd_msg_pub.add;
4302: raise fnd_api.g_exc_error;
4303: ELSE
4304: x_new_deliveries(1):=l_del_info.delivery_id;
4329: WSH_DEBUG_SV.log(l_module_name,'source_blanket_reference_num',l_del_info.source_blanket_reference_num);
4330: END IF;
4331:
4332:
4333: FND_MESSAGE.SET_NAME('WSH','WSH_RR_PO_GROUP_NOT_MATCH');
4334: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_del_info.delivery_id));
4335: FND_MESSAGE.SET_TOKEN('PO_HEADER_NUM',l_del_info.source_header_number);
4336: FND_MESSAGE.SET_TOKEN('PO_LINE_NUM', l_del_info.source_line_number);
4337: FND_MESSAGE.SET_TOKEN('PO_SHIPMENT_LINE_NUM', l_del_info.po_shipment_line_number);
4330: END IF;
4331:
4332:
4333: FND_MESSAGE.SET_NAME('WSH','WSH_RR_PO_GROUP_NOT_MATCH');
4334: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_del_info.delivery_id));
4335: FND_MESSAGE.SET_TOKEN('PO_HEADER_NUM',l_del_info.source_header_number);
4336: FND_MESSAGE.SET_TOKEN('PO_LINE_NUM', l_del_info.source_line_number);
4337: FND_MESSAGE.SET_TOKEN('PO_SHIPMENT_LINE_NUM', l_del_info.po_shipment_line_number);
4338: FND_MESSAGE.SET_TOKEN('PO_RELEASE_NUM',l_del_info.source_blanket_reference_num);
4331:
4332:
4333: FND_MESSAGE.SET_NAME('WSH','WSH_RR_PO_GROUP_NOT_MATCH');
4334: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_del_info.delivery_id));
4335: FND_MESSAGE.SET_TOKEN('PO_HEADER_NUM',l_del_info.source_header_number);
4336: FND_MESSAGE.SET_TOKEN('PO_LINE_NUM', l_del_info.source_line_number);
4337: FND_MESSAGE.SET_TOKEN('PO_SHIPMENT_LINE_NUM', l_del_info.po_shipment_line_number);
4338: FND_MESSAGE.SET_TOKEN('PO_RELEASE_NUM',l_del_info.source_blanket_reference_num);
4339: fnd_msg_pub.add;
4332:
4333: FND_MESSAGE.SET_NAME('WSH','WSH_RR_PO_GROUP_NOT_MATCH');
4334: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_del_info.delivery_id));
4335: FND_MESSAGE.SET_TOKEN('PO_HEADER_NUM',l_del_info.source_header_number);
4336: FND_MESSAGE.SET_TOKEN('PO_LINE_NUM', l_del_info.source_line_number);
4337: FND_MESSAGE.SET_TOKEN('PO_SHIPMENT_LINE_NUM', l_del_info.po_shipment_line_number);
4338: FND_MESSAGE.SET_TOKEN('PO_RELEASE_NUM',l_del_info.source_blanket_reference_num);
4339: fnd_msg_pub.add;
4340: END LOOP;
4333: FND_MESSAGE.SET_NAME('WSH','WSH_RR_PO_GROUP_NOT_MATCH');
4334: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_del_info.delivery_id));
4335: FND_MESSAGE.SET_TOKEN('PO_HEADER_NUM',l_del_info.source_header_number);
4336: FND_MESSAGE.SET_TOKEN('PO_LINE_NUM', l_del_info.source_line_number);
4337: FND_MESSAGE.SET_TOKEN('PO_SHIPMENT_LINE_NUM', l_del_info.po_shipment_line_number);
4338: FND_MESSAGE.SET_TOKEN('PO_RELEASE_NUM',l_del_info.source_blanket_reference_num);
4339: fnd_msg_pub.add;
4340: END LOOP;
4341:
4334: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_del_info.delivery_id));
4335: FND_MESSAGE.SET_TOKEN('PO_HEADER_NUM',l_del_info.source_header_number);
4336: FND_MESSAGE.SET_TOKEN('PO_LINE_NUM', l_del_info.source_line_number);
4337: FND_MESSAGE.SET_TOKEN('PO_SHIPMENT_LINE_NUM', l_del_info.po_shipment_line_number);
4338: FND_MESSAGE.SET_TOKEN('PO_RELEASE_NUM',l_del_info.source_blanket_reference_num);
4339: fnd_msg_pub.add;
4340: END LOOP;
4341:
4342: raise fnd_api.g_exc_error;
4491: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4492: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4493: END IF;
4494:
4495: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
4496: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
4497: fnd_msg_pub.add;
4498:
4499: END Create_Delivery;
4492: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4493: END IF;
4494:
4495: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
4496: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
4497: fnd_msg_pub.add;
4498:
4499: END Create_Delivery;
4500:
4564: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4565:
4566: --Negative revision is not allowed.
4567: IF (p_request_revision < 0 ) THEN
4568: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_NEG_NUM');
4569: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_request_revision));
4570: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_line_number);
4571: fnd_msg_pub.add;
4572: raise fnd_api.g_exc_error;
4565:
4566: --Negative revision is not allowed.
4567: IF (p_request_revision < 0 ) THEN
4568: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_NEG_NUM');
4569: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_request_revision));
4570: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_line_number);
4571: fnd_msg_pub.add;
4572: raise fnd_api.g_exc_error;
4573: END IF;
4566: --Negative revision is not allowed.
4567: IF (p_request_revision < 0 ) THEN
4568: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_NEG_NUM');
4569: FND_MESSAGE.SET_TOKEN('FIELD_NAME',g_field.name(c_request_revision));
4570: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',p_line_number);
4571: fnd_msg_pub.add;
4572: raise fnd_api.g_exc_error;
4573: END IF;
4574:
4603: WSH_DEBUG_SV.logmsg(l_module_name,'get_revision_number_csr FOUND');
4604: END IF;
4605:
4606: IF (p_request_revision <= nvl(l_revision_number,-99) ) THEN
4607: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_INVALID_REVISION');
4608: FND_MESSAGE.SET_TOKEN('C_REV_NUM', p_request_revision);
4609: FND_MESSAGE.SET_TOKEN('P_REV_NUM', l_revision_number);
4610: fnd_msg_pub.add;
4611:
4604: END IF;
4605:
4606: IF (p_request_revision <= nvl(l_revision_number,-99) ) THEN
4607: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_INVALID_REVISION');
4608: FND_MESSAGE.SET_TOKEN('C_REV_NUM', p_request_revision);
4609: FND_MESSAGE.SET_TOKEN('P_REV_NUM', l_revision_number);
4610: fnd_msg_pub.add;
4611:
4612: raise fnd_api.g_exc_error;
4605:
4606: IF (p_request_revision <= nvl(l_revision_number,-99) ) THEN
4607: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_INVALID_REVISION');
4608: FND_MESSAGE.SET_TOKEN('C_REV_NUM', p_request_revision);
4609: FND_MESSAGE.SET_TOKEN('P_REV_NUM', l_revision_number);
4610: fnd_msg_pub.add;
4611:
4612: raise fnd_api.g_exc_error;
4613: END IF;
4693: IF ( get_revision_number_csr%ISOPEN) THEN
4694: CLOSE get_revision_number_csr;
4695: END IF;
4696:
4697: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
4698: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
4699: fnd_msg_pub.add;
4700:
4701: END Validate_Header;
4694: CLOSE get_revision_number_csr;
4695: END IF;
4696:
4697: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
4698: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
4699: fnd_msg_pub.add;
4700:
4701: END Validate_Header;
4702:
4767: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4768: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4769: END IF;
4770:
4771: FND_MESSAGE.SET_NAME('WSH','WSH_OI_INVALID_ORG');
4772: fnd_msg_pub.add;
4773:
4774: WHEN OTHERS THEN
4775: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4781: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4782: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4783: END IF;
4784:
4785: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
4786: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
4787: fnd_msg_pub.add;
4788:
4789:
4782: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4783: END IF;
4784:
4785: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
4786: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
4787: fnd_msg_pub.add;
4788:
4789:
4790: END validate_org;
4985: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS ;
4986:
4987: --Error if any one of header,delivery or line record has no data.
4988: IF (p_header.supplier_name.count <> 1 OR p_delivery.ship_from_address1.count < 1 OR p_line.po_header_number.count < 1) THEN
4989: FND_MESSAGE.SET_NAME('WSH','WSH_RR_INV_FILE_FORMAT');
4990: fnd_msg_pub.add;
4991: raise FND_API.G_EXC_ERROR;
4992: END IF;
4993:
5079: IF (p_in_param.caller='ISP') THEN
5080: --If caller ic ISP than do not displayed the delivery name.
5081: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
5082: l_warn_count:=l_warn_count + 1;
5083: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_WARN');
5084: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_prev_delivery_index);
5085: fnd_msg_pub.add;
5086: ELSE
5087: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_SUCCESS');
5080: --If caller ic ISP than do not displayed the delivery name.
5081: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
5082: l_warn_count:=l_warn_count + 1;
5083: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_WARN');
5084: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_prev_delivery_index);
5085: fnd_msg_pub.add;
5086: ELSE
5087: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_SUCCESS');
5088: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_prev_delivery_index);
5083: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_WARN');
5084: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_prev_delivery_index);
5085: fnd_msg_pub.add;
5086: ELSE
5087: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_SUCCESS');
5088: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_prev_delivery_index);
5089: END IF;
5090: ELSE
5091: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
5084: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_prev_delivery_index);
5085: fnd_msg_pub.add;
5086: ELSE
5087: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_SUCCESS');
5088: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_prev_delivery_index);
5089: END IF;
5090: ELSE
5091: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
5092: l_warn_count:=l_warn_count + 1;
5089: END IF;
5090: ELSE
5091: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
5092: l_warn_count:=l_warn_count + 1;
5093: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_WSH_DEL_WARN');
5094: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(l_new_deliveries(l_del_new_index)));
5095: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_prev_delivery_index);
5096: fnd_msg_pub.add;
5097: ELSE
5090: ELSE
5091: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
5092: l_warn_count:=l_warn_count + 1;
5093: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_WSH_DEL_WARN');
5094: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(l_new_deliveries(l_del_new_index)));
5095: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_prev_delivery_index);
5096: fnd_msg_pub.add;
5097: ELSE
5098: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_WSH_DEL_SUCCESS');
5091: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
5092: l_warn_count:=l_warn_count + 1;
5093: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_WSH_DEL_WARN');
5094: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(l_new_deliveries(l_del_new_index)));
5095: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_prev_delivery_index);
5096: fnd_msg_pub.add;
5097: ELSE
5098: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_WSH_DEL_SUCCESS');
5099: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(l_new_deliveries(l_del_new_index)));
5094: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(l_new_deliveries(l_del_new_index)));
5095: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_prev_delivery_index);
5096: fnd_msg_pub.add;
5097: ELSE
5098: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_WSH_DEL_SUCCESS');
5099: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(l_new_deliveries(l_del_new_index)));
5100: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_prev_delivery_index);
5101: END IF;
5102: END IF;
5095: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_prev_delivery_index);
5096: fnd_msg_pub.add;
5097: ELSE
5098: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_WSH_DEL_SUCCESS');
5099: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(l_new_deliveries(l_del_new_index)));
5100: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_prev_delivery_index);
5101: END IF;
5102: END IF;
5103:
5096: fnd_msg_pub.add;
5097: ELSE
5098: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_WSH_DEL_SUCCESS');
5099: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(l_new_deliveries(l_del_new_index)));
5100: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_prev_delivery_index);
5101: END IF;
5102: END IF;
5103:
5104: IF (l_return_status=WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
5103:
5104: IF (l_return_status=WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
5105: l_msg_count:= l_msg_count + 1;
5106: x_success_tbl.extend;
5107: x_success_tbl(l_msg_count):= FND_MESSAGE.GET;
5108: END IF;
5109:
5110: l_del_new_index:=l_new_deliveries.next(l_del_new_index);
5111: END LOOP;
5111: END LOOP;
5112:
5113: ELSE
5114: p_delivery.error_flag(l_prev_delivery_index):='Y';
5115: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_ERROR');
5116: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_prev_delivery_index);
5117: fnd_msg_pub.add;
5118:
5119: IF l_debug_on THEN
5112:
5113: ELSE
5114: p_delivery.error_flag(l_prev_delivery_index):='Y';
5115: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_ERROR');
5116: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_prev_delivery_index);
5117: fnd_msg_pub.add;
5118:
5119: IF l_debug_on THEN
5120: WSH_DEBUG_SV.logmsg(l_module_name,'Delivery Rollback to save point l_delivery_savepoint');
5177:
5178: -- First Routing Request should not be correction.
5179: -- A correction is routing request line with zero quantity.
5180: IF (p_line.item_quantity(l_line_index) = 0 AND l_detail_att.prev_routing_req_id is NULL) THEN
5181: FND_MESSAGE.SET_NAME('WSH','WSH_RR_INVALID_CORRECTION');
5182: fnd_msg_pub.add;
5183:
5184: raise FND_API.G_EXC_ERROR;
5185: END IF;
5329:
5330: --If transportation is not arranged by Buyer than error.
5331: IF (l_po_not_found_detail.shipping_control <> 'BUYER') THEN
5332: CLOSE get_po_not_found_detail;
5333: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_BUYER_PO');
5334: FND_MESSAGE.SET_TOKEN('PO_NUMBER', p_line.po_header_number(l_line_index));
5335: fnd_msg_pub.add;
5336:
5337: raise FND_API.G_EXC_ERROR;
5330: --If transportation is not arranged by Buyer than error.
5331: IF (l_po_not_found_detail.shipping_control <> 'BUYER') THEN
5332: CLOSE get_po_not_found_detail;
5333: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_BUYER_PO');
5334: FND_MESSAGE.SET_TOKEN('PO_NUMBER', p_line.po_header_number(l_line_index));
5335: fnd_msg_pub.add;
5336:
5337: raise FND_API.G_EXC_ERROR;
5338: END IF;
5398: l_total_req_qty2 := 0;
5399: ELSE
5400: --Detail lines are not found for input PO, error out.
5401: CLOSE get_po_not_found_detail;
5402: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_PO_INFO');
5403: FND_MESSAGE.SET_TOKEN('SUPPLIER', l_supplier_name);
5404: FND_MESSAGE.SET_TOKEN('HRD_NUMBER', p_line.po_header_number(l_line_index));
5405: FND_MESSAGE.SET_TOKEN('REL_NUMBER', p_line.po_release_number(l_line_index));
5406: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_line.po_line_number(l_line_index));
5399: ELSE
5400: --Detail lines are not found for input PO, error out.
5401: CLOSE get_po_not_found_detail;
5402: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_PO_INFO');
5403: FND_MESSAGE.SET_TOKEN('SUPPLIER', l_supplier_name);
5404: FND_MESSAGE.SET_TOKEN('HRD_NUMBER', p_line.po_header_number(l_line_index));
5405: FND_MESSAGE.SET_TOKEN('REL_NUMBER', p_line.po_release_number(l_line_index));
5406: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_line.po_line_number(l_line_index));
5407: FND_MESSAGE.SET_TOKEN('SHIP_NUMBER', p_line.po_shipment_number(l_line_index));
5400: --Detail lines are not found for input PO, error out.
5401: CLOSE get_po_not_found_detail;
5402: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_PO_INFO');
5403: FND_MESSAGE.SET_TOKEN('SUPPLIER', l_supplier_name);
5404: FND_MESSAGE.SET_TOKEN('HRD_NUMBER', p_line.po_header_number(l_line_index));
5405: FND_MESSAGE.SET_TOKEN('REL_NUMBER', p_line.po_release_number(l_line_index));
5406: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_line.po_line_number(l_line_index));
5407: FND_MESSAGE.SET_TOKEN('SHIP_NUMBER', p_line.po_shipment_number(l_line_index));
5408: FND_MESSAGE.SET_TOKEN('OP_UNIT', p_line.po_operating_unit(l_line_index));
5401: CLOSE get_po_not_found_detail;
5402: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_PO_INFO');
5403: FND_MESSAGE.SET_TOKEN('SUPPLIER', l_supplier_name);
5404: FND_MESSAGE.SET_TOKEN('HRD_NUMBER', p_line.po_header_number(l_line_index));
5405: FND_MESSAGE.SET_TOKEN('REL_NUMBER', p_line.po_release_number(l_line_index));
5406: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_line.po_line_number(l_line_index));
5407: FND_MESSAGE.SET_TOKEN('SHIP_NUMBER', p_line.po_shipment_number(l_line_index));
5408: FND_MESSAGE.SET_TOKEN('OP_UNIT', p_line.po_operating_unit(l_line_index));
5409: fnd_msg_pub.add;
5402: FND_MESSAGE.SET_NAME('WSH','WSH_RR_NO_PO_INFO');
5403: FND_MESSAGE.SET_TOKEN('SUPPLIER', l_supplier_name);
5404: FND_MESSAGE.SET_TOKEN('HRD_NUMBER', p_line.po_header_number(l_line_index));
5405: FND_MESSAGE.SET_TOKEN('REL_NUMBER', p_line.po_release_number(l_line_index));
5406: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_line.po_line_number(l_line_index));
5407: FND_MESSAGE.SET_TOKEN('SHIP_NUMBER', p_line.po_shipment_number(l_line_index));
5408: FND_MESSAGE.SET_TOKEN('OP_UNIT', p_line.po_operating_unit(l_line_index));
5409: fnd_msg_pub.add;
5410: raise FND_API.G_EXC_ERROR;
5403: FND_MESSAGE.SET_TOKEN('SUPPLIER', l_supplier_name);
5404: FND_MESSAGE.SET_TOKEN('HRD_NUMBER', p_line.po_header_number(l_line_index));
5405: FND_MESSAGE.SET_TOKEN('REL_NUMBER', p_line.po_release_number(l_line_index));
5406: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_line.po_line_number(l_line_index));
5407: FND_MESSAGE.SET_TOKEN('SHIP_NUMBER', p_line.po_shipment_number(l_line_index));
5408: FND_MESSAGE.SET_TOKEN('OP_UNIT', p_line.po_operating_unit(l_line_index));
5409: fnd_msg_pub.add;
5410: raise FND_API.G_EXC_ERROR;
5411: END IF;
5404: FND_MESSAGE.SET_TOKEN('HRD_NUMBER', p_line.po_header_number(l_line_index));
5405: FND_MESSAGE.SET_TOKEN('REL_NUMBER', p_line.po_release_number(l_line_index));
5406: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_line.po_line_number(l_line_index));
5407: FND_MESSAGE.SET_TOKEN('SHIP_NUMBER', p_line.po_shipment_number(l_line_index));
5408: FND_MESSAGE.SET_TOKEN('OP_UNIT', p_line.po_operating_unit(l_line_index));
5409: fnd_msg_pub.add;
5410: raise FND_API.G_EXC_ERROR;
5411: END IF;
5412:
5505: END IF;
5506:
5507: p_line.error_flag(l_line_index):='Y';
5508: p_delivery.error_flag(l_delivery_index):='Y';
5509: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_ERROR');
5510: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_delivery_index);
5511: fnd_msg_pub.add;
5512:
5513: IF (get_po_not_found_detail%ISOPEN) THEN
5506:
5507: p_line.error_flag(l_line_index):='Y';
5508: p_delivery.error_flag(l_delivery_index):='Y';
5509: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_ERROR');
5510: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_delivery_index);
5511: fnd_msg_pub.add;
5512:
5513: IF (get_po_not_found_detail%ISOPEN) THEN
5514: CLOSE get_po_not_found_detail;
5527:
5528: p_line.error_flag(l_line_index):='Y';
5529: p_delivery.error_flag(l_delivery_index):='Y';
5530:
5531: FND_MESSAGE.SET_NAME('WSH','WSH_DELIVERY_LINES_LOCKED');
5532: fnd_msg_pub.add;
5533:
5534: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_ERROR');
5535: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_delivery_index);
5530:
5531: FND_MESSAGE.SET_NAME('WSH','WSH_DELIVERY_LINES_LOCKED');
5532: fnd_msg_pub.add;
5533:
5534: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_ERROR');
5535: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_delivery_index);
5536: fnd_msg_pub.add;
5537:
5538: IF (get_po_not_found_detail%ISOPEN) THEN
5531: FND_MESSAGE.SET_NAME('WSH','WSH_DELIVERY_LINES_LOCKED');
5532: fnd_msg_pub.add;
5533:
5534: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_ERROR');
5535: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_delivery_index);
5536: fnd_msg_pub.add;
5537:
5538: IF (get_po_not_found_detail%ISOPEN) THEN
5539: CLOSE get_po_not_found_detail;
5562: END IF;
5563: p_line.error_flag(l_line_index):='Y';
5564: p_delivery.error_flag(l_delivery_index):='Y';
5565:
5566: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
5567: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
5568: fnd_msg_pub.add;
5569:
5570: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_ERROR');
5563: p_line.error_flag(l_line_index):='Y';
5564: p_delivery.error_flag(l_delivery_index):='Y';
5565:
5566: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
5567: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
5568: fnd_msg_pub.add;
5569:
5570: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_ERROR');
5571: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_delivery_index);
5566: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
5567: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
5568: fnd_msg_pub.add;
5569:
5570: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_ERROR');
5571: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_delivery_index);
5572: fnd_msg_pub.add;
5573: END;
5574:
5567: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
5568: fnd_msg_pub.add;
5569:
5570: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_ERROR');
5571: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_delivery_index);
5572: fnd_msg_pub.add;
5573: END;
5574:
5575:
5613: IF (p_in_param.caller='ISP') THEN
5614: --If caller ic ISP than do not displayed the delivery name.
5615: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
5616: l_warn_count:=l_warn_count + 1;
5617: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_WARN');
5618: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_delivery_index);
5619: fnd_msg_pub.add;
5620: ELSE
5621: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_SUCCESS');
5614: --If caller ic ISP than do not displayed the delivery name.
5615: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
5616: l_warn_count:=l_warn_count + 1;
5617: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_WARN');
5618: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_delivery_index);
5619: fnd_msg_pub.add;
5620: ELSE
5621: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_SUCCESS');
5622: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_delivery_index);
5617: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_WARN');
5618: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_delivery_index);
5619: fnd_msg_pub.add;
5620: ELSE
5621: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_SUCCESS');
5622: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_delivery_index);
5623: END IF;
5624: ELSE
5625: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
5618: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_delivery_index);
5619: fnd_msg_pub.add;
5620: ELSE
5621: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_SUCCESS');
5622: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_delivery_index);
5623: END IF;
5624: ELSE
5625: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
5626: l_warn_count:=l_warn_count + 1;
5623: END IF;
5624: ELSE
5625: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
5626: l_warn_count:=l_warn_count + 1;
5627: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_WSH_DEL_WARN');
5628: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(l_new_deliveries(l_del_new_index)));
5629: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_delivery_index);
5630: fnd_msg_pub.add;
5631: ELSE
5624: ELSE
5625: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
5626: l_warn_count:=l_warn_count + 1;
5627: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_WSH_DEL_WARN');
5628: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(l_new_deliveries(l_del_new_index)));
5629: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_delivery_index);
5630: fnd_msg_pub.add;
5631: ELSE
5632: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_WSH_DEL_SUCCESS');
5625: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
5626: l_warn_count:=l_warn_count + 1;
5627: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_WSH_DEL_WARN');
5628: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(l_new_deliveries(l_del_new_index)));
5629: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_delivery_index);
5630: fnd_msg_pub.add;
5631: ELSE
5632: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_WSH_DEL_SUCCESS');
5633: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(l_new_deliveries(l_del_new_index)));
5628: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(l_new_deliveries(l_del_new_index)));
5629: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_delivery_index);
5630: fnd_msg_pub.add;
5631: ELSE
5632: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_WSH_DEL_SUCCESS');
5633: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(l_new_deliveries(l_del_new_index)));
5634: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_delivery_index);
5635: END IF;
5636: END IF;
5629: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_delivery_index);
5630: fnd_msg_pub.add;
5631: ELSE
5632: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_WSH_DEL_SUCCESS');
5633: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(l_new_deliveries(l_del_new_index)));
5634: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_delivery_index);
5635: END IF;
5636: END IF;
5637:
5630: fnd_msg_pub.add;
5631: ELSE
5632: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_WSH_DEL_SUCCESS');
5633: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(l_new_deliveries(l_del_new_index)));
5634: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_delivery_index);
5635: END IF;
5636: END IF;
5637:
5638: IF (l_return_status=WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
5637:
5638: IF (l_return_status=WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
5639: l_msg_count:= l_msg_count + 1;
5640: x_success_tbl.extend;
5641: x_success_tbl(l_msg_count):= FND_MESSAGE.GET;
5642: END IF;
5643:
5644: l_del_new_index:=l_new_deliveries.next(l_del_new_index);
5645: END LOOP;
5645: END LOOP;
5646:
5647: ELSE
5648: p_delivery.error_flag(l_delivery_index):='Y';
5649: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_ERROR');
5650: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_delivery_index);
5651: fnd_msg_pub.add;
5652:
5653: IF l_debug_on THEN
5646:
5647: ELSE
5648: p_delivery.error_flag(l_delivery_index):='Y';
5649: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_ERROR');
5650: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_delivery_index);
5651: fnd_msg_pub.add;
5652:
5653: IF l_debug_on THEN
5654: WSH_DEBUG_SV.logmsg(l_module_name,'Delivery Rollback to save point l_delivery_savepoint');
5678: END IF;
5679:
5680: l_header_error := l_header_error + 1;
5681: p_header.error_flag(l_header_index):='Y';
5682: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_HEADER_FAILED');
5683: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_header_index);
5684: fnd_msg_pub.add;
5685:
5686:
5679:
5680: l_header_error := l_header_error + 1;
5681: p_header.error_flag(l_header_index):='Y';
5682: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_HEADER_FAILED');
5683: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_header_index);
5684: fnd_msg_pub.add;
5685:
5686:
5687: WHEN others THEN
5690: END IF;
5691: l_header_error := l_header_error + 1;
5692: p_header.error_flag(l_header_index):='Y';
5693:
5694: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
5695: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
5696: fnd_msg_pub.add;
5697:
5698: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_HEADER_FAILED');
5691: l_header_error := l_header_error + 1;
5692: p_header.error_flag(l_header_index):='Y';
5693:
5694: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
5695: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
5696: fnd_msg_pub.add;
5697:
5698: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_HEADER_FAILED');
5699: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_header_index);
5694: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
5695: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
5696: fnd_msg_pub.add;
5697:
5698: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_HEADER_FAILED');
5699: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_header_index);
5700: fnd_msg_pub.add;
5701:
5702: END;
5695: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
5696: fnd_msg_pub.add;
5697:
5698: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_HEADER_FAILED');
5699: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_header_index);
5700: fnd_msg_pub.add;
5701:
5702: END;
5703:
5766: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5767: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5768: END IF;
5769:
5770: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
5771: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
5772: fnd_msg_pub.add;
5773:
5774: END Process_Routing_Request;
5767: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5768: END IF;
5769:
5770: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
5771: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
5772: fnd_msg_pub.add;
5773:
5774: END Process_Routing_Request;
5775:
5918:
5919: --Display error for corresponding level.
5920: IF (l_prev_level_number = 1) THEN
5921: IF ( l_header.error_flag(l_prev_line_number)='Y') THEN
5922: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_HEADER_FAILED');
5923: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_prev_line_number);
5924: fnd_msg_pub.add;
5925: END IF;
5926: ELSIF (l_prev_level_number = 2) THEN
5919: --Display error for corresponding level.
5920: IF (l_prev_level_number = 1) THEN
5921: IF ( l_header.error_flag(l_prev_line_number)='Y') THEN
5922: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_HEADER_FAILED');
5923: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_prev_line_number);
5924: fnd_msg_pub.add;
5925: END IF;
5926: ELSIF (l_prev_level_number = 2) THEN
5927: IF (l_delivery.error_flag(l_prev_line_number)='Y') THEN
5924: fnd_msg_pub.add;
5925: END IF;
5926: ELSIF (l_prev_level_number = 2) THEN
5927: IF (l_delivery.error_flag(l_prev_line_number)='Y') THEN
5928: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_ERROR');
5929: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_prev_line_number);
5930: fnd_msg_pub.add;
5931: END IF;
5932: ELSIF (l_prev_level_number = 3) THEN
5925: END IF;
5926: ELSIF (l_prev_level_number = 2) THEN
5927: IF (l_delivery.error_flag(l_prev_line_number)='Y') THEN
5928: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_ERROR');
5929: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_prev_line_number);
5930: fnd_msg_pub.add;
5931: END IF;
5932: ELSIF (l_prev_level_number = 3) THEN
5933: IF (l_line.error_flag(l_prev_line_number)='Y') THEN
5930: fnd_msg_pub.add;
5931: END IF;
5932: ELSIF (l_prev_level_number = 3) THEN
5933: IF (l_line.error_flag(l_prev_line_number)='Y') THEN
5934: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_ERROR');
5935: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_line.delivery_line_number(l_prev_line_number));
5936: fnd_msg_pub.add;
5937: END IF;
5938: END IF;
5931: END IF;
5932: ELSIF (l_prev_level_number = 3) THEN
5933: IF (l_line.error_flag(l_prev_line_number)='Y') THEN
5934: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_ERROR');
5935: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_line.delivery_line_number(l_prev_line_number));
5936: fnd_msg_pub.add;
5937: END IF;
5938: END IF;
5939:
6014:
6015: --Display error for corresponding level.
6016: IF (l_prev_level_number = 1) THEN
6017: IF ( l_header.error_flag(l_prev_line_number)='Y') THEN
6018: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_HEADER_FAILED');
6019: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_prev_line_number);
6020: fnd_msg_pub.add;
6021: END IF;
6022: ELSIF (l_prev_level_number = 2) THEN
6015: --Display error for corresponding level.
6016: IF (l_prev_level_number = 1) THEN
6017: IF ( l_header.error_flag(l_prev_line_number)='Y') THEN
6018: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_HEADER_FAILED');
6019: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_prev_line_number);
6020: fnd_msg_pub.add;
6021: END IF;
6022: ELSIF (l_prev_level_number = 2) THEN
6023: IF (l_delivery.error_flag(l_prev_line_number)='Y') THEN
6020: fnd_msg_pub.add;
6021: END IF;
6022: ELSIF (l_prev_level_number = 2) THEN
6023: IF (l_delivery.error_flag(l_prev_line_number)='Y') THEN
6024: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_ERROR');
6025: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_prev_line_number);
6026: fnd_msg_pub.add;
6027: END IF;
6028: ELSIF (l_prev_level_number = 3) THEN
6021: END IF;
6022: ELSIF (l_prev_level_number = 2) THEN
6023: IF (l_delivery.error_flag(l_prev_line_number)='Y') THEN
6024: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_ERROR');
6025: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_prev_line_number);
6026: fnd_msg_pub.add;
6027: END IF;
6028: ELSIF (l_prev_level_number = 3) THEN
6029: IF (l_line.error_flag(l_prev_line_number)='Y') THEN
6026: fnd_msg_pub.add;
6027: END IF;
6028: ELSIF (l_prev_level_number = 3) THEN
6029: IF (l_line.error_flag(l_prev_line_number)='Y') THEN
6030: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_ERROR');
6031: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_line.delivery_line_number(l_prev_line_number));
6032: fnd_msg_pub.add;
6033: END IF;
6034: END IF;
6027: END IF;
6028: ELSIF (l_prev_level_number = 3) THEN
6029: IF (l_line.error_flag(l_prev_line_number)='Y') THEN
6030: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_DEL_ERROR');
6031: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_line.delivery_line_number(l_prev_line_number));
6032: fnd_msg_pub.add;
6033: END IF;
6034: END IF;
6035:
6162: END IF;
6163:
6164: END IF;
6165:
6166: --Merge Message from fnd message stack and global message table
6167: --to output message table.
6168: get_message;
6169:
6170: l_msg_count:= x_message_tbl.count;
6240: IF l_debug_on THEN
6241: fnd_profile.get('WSH_DEBUG_LOG_DIRECTORY',l_debugfile);
6242: l_debugfile := l_debugfile||'/'||WSH_DEBUG_SV.g_file;
6243:
6244: FND_MESSAGE.SET_NAME('WSH','WSH_DEBUG_FILE_NAME');
6245: FND_MESSAGE.SET_TOKEN('DEBUG_FILE_NAME',l_debugfile);
6246:
6247: l_msg_count:= l_msg_count + 1;
6248: x_message_tbl.extend;
6241: fnd_profile.get('WSH_DEBUG_LOG_DIRECTORY',l_debugfile);
6242: l_debugfile := l_debugfile||'/'||WSH_DEBUG_SV.g_file;
6243:
6244: FND_MESSAGE.SET_NAME('WSH','WSH_DEBUG_FILE_NAME');
6245: FND_MESSAGE.SET_TOKEN('DEBUG_FILE_NAME',l_debugfile);
6246:
6247: l_msg_count:= l_msg_count + 1;
6248: x_message_tbl.extend;
6249: x_message_tbl(l_msg_count):= FND_MESSAGE.GET;
6245: FND_MESSAGE.SET_TOKEN('DEBUG_FILE_NAME',l_debugfile);
6246:
6247: l_msg_count:= l_msg_count + 1;
6248: x_message_tbl.extend;
6249: x_message_tbl(l_msg_count):= FND_MESSAGE.GET;
6250: END IF;
6251:
6252: IF l_debug_on THEN
6253: WSH_DEBUG_SV.pop(l_module_name);
6330: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6331: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6332: END IF;
6333:
6334: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
6335: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
6336:
6337: l_msg_count:= l_msg_count + 1;
6338: x_message_tbl.extend;
6331: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6332: END IF;
6333:
6334: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
6335: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
6336:
6337: l_msg_count:= l_msg_count + 1;
6338: x_message_tbl.extend;
6339: x_message_tbl(l_msg_count):= FND_MESSAGE.GET;
6335: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
6336:
6337: l_msg_count:= l_msg_count + 1;
6338: x_message_tbl.extend;
6339: x_message_tbl(l_msg_count):= FND_MESSAGE.GET;
6340: END Process_Routing_Request_File;
6341:
6342:
6343: -- Start of comments
6394: WSH_DEBUG_SV.log(l_module_name,'x_message_tbl.count',x_message_tbl.count);
6395: WSH_DEBUG_SV.log(l_module_name,'g_error_tbl.count',g_error_tbl.count);
6396: END IF;
6397:
6398: --Initialize error message and fnd message table.
6399: g_error_tbl.delete;
6400: FND_MSG_PUB.Initialize;
6401:
6402: --Colleted the input scalar parameter to record to facilities
6448: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6449: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6450: END IF;
6451:
6452: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
6453: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
6454: x_message_tbl.extend;
6455: x_message_tbl(l_msg_count):= FND_MESSAGE.GET;
6456: END Process_File;
6449: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6450: END IF;
6451:
6452: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
6453: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
6454: x_message_tbl.extend;
6455: x_message_tbl(l_msg_count):= FND_MESSAGE.GET;
6456: END Process_File;
6457:
6451:
6452: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
6453: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
6454: x_message_tbl.extend;
6455: x_message_tbl(l_msg_count):= FND_MESSAGE.GET;
6456: END Process_File;
6457:
6458:
6459: END WSH_ROUTING_REQUEST;