328: end if;
329:
330: EXCEPTION
331: WHEN OTHERS THEN
332: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
333: FND_MESSAGE.Set_Token('PACKAGE','SHP_SC_SERIAL_VALIDATION_PKG.Check_Serial_Numbers');
334: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
335: FND_MESSAGE.Set_Token('ORA_TEXT',X_Stmt_Num ||':'|| X_Stmt);
336: APP_EXCEPTION.Raise_Exception;
329:
330: EXCEPTION
331: WHEN OTHERS THEN
332: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
333: FND_MESSAGE.Set_Token('PACKAGE','SHP_SC_SERIAL_VALIDATION_PKG.Check_Serial_Numbers');
334: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
335: FND_MESSAGE.Set_Token('ORA_TEXT',X_Stmt_Num ||':'|| X_Stmt);
336: APP_EXCEPTION.Raise_Exception;
337: END Check_serial_number;
330: EXCEPTION
331: WHEN OTHERS THEN
332: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
333: FND_MESSAGE.Set_Token('PACKAGE','SHP_SC_SERIAL_VALIDATION_PKG.Check_Serial_Numbers');
334: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
335: FND_MESSAGE.Set_Token('ORA_TEXT',X_Stmt_Num ||':'|| X_Stmt);
336: APP_EXCEPTION.Raise_Exception;
337: END Check_serial_number;
338:
331: WHEN OTHERS THEN
332: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
333: FND_MESSAGE.Set_Token('PACKAGE','SHP_SC_SERIAL_VALIDATION_PKG.Check_Serial_Numbers');
334: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
335: FND_MESSAGE.Set_Token('ORA_TEXT',X_Stmt_Num ||':'|| X_Stmt);
336: APP_EXCEPTION.Raise_Exception;
337: END Check_serial_number;
338:
339:
449: and nvl(delivery_id, nvl(x_delivery_id,-1)) = nvl(x_delivery_id,-1)
450: and nvl(container_id, nvl(x_container_id,-1)) = nvl(x_container_id,-1)
451: and rownum < 2;
452: EXCEPTION when others then
453: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
454: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.update_sopld');
455: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
456: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
457: APP_EXCEPTION.Raise_Exception;
450: and nvl(container_id, nvl(x_container_id,-1)) = nvl(x_container_id,-1)
451: and rownum < 2;
452: EXCEPTION when others then
453: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
454: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.update_sopld');
455: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
456: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
457: APP_EXCEPTION.Raise_Exception;
458: END;
451: and rownum < 2;
452: EXCEPTION when others then
453: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
454: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.update_sopld');
455: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
456: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
457: APP_EXCEPTION.Raise_Exception;
458: END;
459:
452: EXCEPTION when others then
453: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
454: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.update_sopld');
455: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
456: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
457: APP_EXCEPTION.Raise_Exception;
458: END;
459:
460: if sql%notfound then
634: WHERE PLD.PICKING_LINE_DETAIL_ID = X_Parent_Detail_Id
635: AND m.inventory_location_id (+) = nvl(x_locator_id,pld.inventory_location_id);
636:
637: EXCEPTION when others then
638: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
639: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.Insert_sopld');
640: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
641: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
642: APP_EXCEPTION.Raise_Exception;
635: AND m.inventory_location_id (+) = nvl(x_locator_id,pld.inventory_location_id);
636:
637: EXCEPTION when others then
638: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
639: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.Insert_sopld');
640: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
641: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
642: APP_EXCEPTION.Raise_Exception;
643:
636:
637: EXCEPTION when others then
638: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
639: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.Insert_sopld');
640: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
641: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
642: APP_EXCEPTION.Raise_Exception;
643:
644: END Insert_Sopld_Row;
637: EXCEPTION when others then
638: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
639: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.Insert_sopld');
640: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
641: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
642: APP_EXCEPTION.Raise_Exception;
643:
644: END Insert_Sopld_Row;
645:
689: wsh_del_oi_core.println('Reduced req_qty in pl:'|| to_char(X_picking_line_detail_id)||
690: ' by:'||to_char(X_shipped_quantity));
691:
692: EXCEPTION when others then
693: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
694: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.update_requested_quantity');
695: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
696: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
697: APP_EXCEPTION.Raise_Exception;
690: ' by:'||to_char(X_shipped_quantity));
691:
692: EXCEPTION when others then
693: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
694: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.update_requested_quantity');
695: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
696: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
697: APP_EXCEPTION.Raise_Exception;
698: END;
691:
692: EXCEPTION when others then
693: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
694: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.update_requested_quantity');
695: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
696: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
697: APP_EXCEPTION.Raise_Exception;
698: END;
699: if sql%notfound then
692: EXCEPTION when others then
693: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
694: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.update_requested_quantity');
695: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
696: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
697: APP_EXCEPTION.Raise_Exception;
698: END;
699: if sql%notfound then
700: wsh_del_oi_core.println('Unexpected error on picking detail '||to_char(x_picking_line_detail_id));
781: x_att13, x_att14, x_att15);
782: end if;
783:
784: EXCEPTION when others then
785: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
786: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.split_sopld_row');
787: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
788: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
789: APP_EXCEPTION.Raise_Exception;
782: end if;
783:
784: EXCEPTION when others then
785: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
786: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.split_sopld_row');
787: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
788: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
789: APP_EXCEPTION.Raise_Exception;
790:
783:
784: EXCEPTION when others then
785: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
786: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.split_sopld_row');
787: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
788: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
789: APP_EXCEPTION.Raise_Exception;
790:
791: END split_SOPLD_row;
784: EXCEPTION when others then
785: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
786: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.split_sopld_row');
787: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
788: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
789: APP_EXCEPTION.Raise_Exception;
790:
791: END split_SOPLD_row;
792:
1035: if error_code <> '0' then
1036: wsh_del_oi_core.println(' ');
1037: wsh_del_oi_core.println('Validation Error in PROCESS_SOPLD_INTERFACE Error Line = 100 ');
1038: wsh_del_oi_core.println(' ');
1039: FND_MESSAGE.SET_NAME('OE', error_code);
1040: raise stop_pld_processing;
1041: end if;
1042:
1043:
1057: wsh_del_oi_core.println(' ');
1058: wsh_del_oi_core.println('Validation Error in PROCESS_SOPLD_INTERFACE Error Line = 110 ');
1059: wsh_del_oi_core.println(' ');
1060: error_code := 'WSH_OI_LINES_NOT_IN_WHS';
1061: FND_MESSAGE.SET_NAME('OE', error_code);
1062: raise stop_pld_processing;
1063: end if;
1064:
1065:
1088: if error_code <> '0' then
1089: wsh_del_oi_core.println(' ');
1090: wsh_del_oi_core.println('Validation Error in PROCESS_SOPLD_INTERFACE Error Line = 120 ');
1091: wsh_del_oi_core.println(' ');
1092: FND_MESSAGE.SET_NAME('OE', error_code);
1093: raise stop_pld_processing;
1094: end if;
1095:
1096:
1115: if error_code <> '0' then
1116: wsh_del_oi_core.println(' ');
1117: wsh_del_oi_core.println('Validation Error in PROCESS_SOPLD_INTERFACE Error Line = 130 ');
1118: wsh_del_oi_core.println(' ');
1119: FND_MESSAGE.SET_NAME('OE', error_code);
1120: raise stop_pld_processing;
1121: end if;
1122:
1123:
1136: if error_code <> '0' then
1137: wsh_del_oi_core.println(' ');
1138: wsh_del_oi_core.println('Validation Error in PROCESS_SOPLD_INTERFACE Error Line = 140 ');
1139: wsh_del_oi_core.println(' ');
1140: FND_MESSAGE.SET_NAME('OE', error_code);
1141: raise stop_pld_processing;
1142: end if;
1143:
1144:
1179: if error_code <> '0' then
1180: wsh_del_oi_core.println(' ');
1181: wsh_del_oi_core.println('Validation Error in PROCESS_SOPLD_INTERFACE Error Line = 150 ');
1182: wsh_del_oi_core.println(' ');
1183: FND_MESSAGE.SET_NAME('OE', error_code);
1184: raise stop_pld_processing;
1185: end if;
1186:
1187: --------------------------------------------------------------------------
1251: if error_code <> '0' then
1252: wsh_del_oi_core.println(' ');
1253: wsh_del_oi_core.println('Validation Error in PROCESS_SOPLD_INTERFACE Error Line = 160 ');
1254: wsh_del_oi_core.println(' ');
1255: FND_MESSAGE.SET_NAME('OE', error_code);
1256: raise stop_pld_processing;
1257: end if;
1258:
1259: --------------------------------------------------------------------------
1276: if error_code <> '0' then
1277: wsh_del_oi_core.println(' ');
1278: wsh_del_oi_core.println('Validation Error in PROCESS_SOPLD_INTERFACE Error Line = 170 ');
1279: wsh_del_oi_core.println(' ');
1280: FND_MESSAGE.SET_NAME('OE', error_code);
1281: raise stop_pld_processing;
1282: end if;
1283:
1284: --------------------------------------------------------------------------
1300: if error_code <> '0' then
1301: wsh_del_oi_core.println(' ');
1302: wsh_del_oi_core.println('Validation Error in PROCESS_SOPLD_INTERFACE Error Line = 180 ');
1303: wsh_del_oi_core.println(' ');
1304: FND_MESSAGE.SET_NAME('OE', error_code);
1305: raise stop_pld_processing;
1306: end if;
1307:
1308:
1331: if error_code <> '0' then
1332: wsh_del_oi_core.println(' ');
1333: wsh_del_oi_core.println('Validation Error in PROCESS_SOPLD_INTERFACE Error Line = 190 ');
1334: wsh_del_oi_core.println(' ');
1335: FND_MESSAGE.SET_NAME('OE', error_code);
1336: raise stop_pld_processing;
1337: end if;
1338:
1339: --------------------------------------------------------------------------
1372: if error_code <> '0' then
1373: wsh_del_oi_core.println(' ');
1374: wsh_del_oi_core.println('Validation Error in PROCESS_SOPLD_INTERFACE Error Line = 200 ');
1375: wsh_del_oi_core.println(' ');
1376: FND_MESSAGE.SET_NAME('OE', error_code);
1377: raise stop_pld_processing;
1378: end if;
1379: -------------------------------------------------------------------------
1380:
1409: if error_code <> '0' then
1410: wsh_del_oi_core.println(' ');
1411: wsh_del_oi_core.println('Validation Error in PROCESS_SOPLD_INTERFACE Error Line = 210 ');
1412: wsh_del_oi_core.println(' ');
1413: FND_MESSAGE.SET_NAME('OE', error_code);
1414: raise stop_pld_processing;
1415: end if;
1416:
1417: --------------------------------------------------------------------------
1432: if error_code <> '0' then
1433: wsh_del_oi_core.println(' ');
1434: wsh_del_oi_core.println('Validation Error in PROCESS_SOPLD_INTERFACE Error Line = 220 ');
1435: wsh_del_oi_core.println(' ');
1436: FND_MESSAGE.SET_NAME('OE', error_code);
1437: raise stop_pld_processing;
1438: end if;
1439:
1440:
1457: if error_code <> '0' then
1458: wsh_del_oi_core.println(' ');
1459: wsh_del_oi_core.println('Validation Error in PROCESS_SOPLD_INTERFACE Error Line = 230 ');
1460: wsh_del_oi_core.println(' ');
1461: FND_MESSAGE.SET_NAME('OE', error_code);
1462: raise stop_pld_processing;
1463: end if;
1464:
1465:
1528: TO_CHAR(oirec.shipped_quantity),
1529: TO_CHAR(x_delivery_id));
1530: if (ret_val = 2) then
1531: error_code := 'SHP_ONLINE_NO_MANAGER';
1532: FND_MESSAGE.SET_NAME('OE', error_code);
1533: RAISE online_no_manager;
1534: elsif (ret_val <> 0) then
1535: error_code := 'SHP_AOL_ONLINE_FAILED';
1536: FND_MESSAGE.SET_NAME('OE', error_code);
1532: FND_MESSAGE.SET_NAME('OE', error_code);
1533: RAISE online_no_manager;
1534: elsif (ret_val <> 0) then
1535: error_code := 'SHP_AOL_ONLINE_FAILED';
1536: FND_MESSAGE.SET_NAME('OE', error_code);
1537: RAISE online_error;
1538: else
1539: if (message = 'FAILURE') then
1540: error_code := 'WSH_SC_CANNOT_TRANSFER_PLD';
1537: RAISE online_error;
1538: else
1539: if (message = 'FAILURE') then
1540: error_code := 'WSH_SC_CANNOT_TRANSFER_PLD';
1541: FND_MESSAGE.SET_NAME('OE', error_code);
1542: RAISE cannot_transfer;
1543: end if;
1544: end if;
1545: else
1569: if sql%notfound then
1570: wsh_del_oi_core.println('Could not find record in PLD. pld:'||
1571: to_char(new_pld_id) );
1572: error_code := '1';
1573: FND_MESSAGE.SET_NAME('OE' , error_code);
1574: raise stop_pld_processing;
1575: end if;
1576:
1577: EXCEPTION when others then
1574: raise stop_pld_processing;
1575: end if;
1576:
1577: EXCEPTION when others then
1578: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
1579: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.update_sopld1');
1580: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
1581: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
1582: APP_EXCEPTION.Raise_Exception;
1575: end if;
1576:
1577: EXCEPTION when others then
1578: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
1579: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.update_sopld1');
1580: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
1581: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
1582: APP_EXCEPTION.Raise_Exception;
1583: END;
1576:
1577: EXCEPTION when others then
1578: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
1579: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.update_sopld1');
1580: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
1581: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
1582: APP_EXCEPTION.Raise_Exception;
1583: END;
1584:
1577: EXCEPTION when others then
1578: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
1579: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.update_sopld1');
1580: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
1581: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
1582: APP_EXCEPTION.Raise_Exception;
1583: END;
1584:
1585: -- oirec.picking_line_detail_id := new_pld_id;
1705: null;
1706:
1707: WHEN online_no_manager THEN
1708: wsh_del_oi_core.println('PLD Process EXCEPTION online_no_manager');
1709: --FND_MESSAGE.SET_NAME('OE','SHP_ONLINE_NO_MANAGER');
1710: x_error_code := error_code;
1711:
1712: WHEN online_error THEN
1713: wsh_del_oi_core.println('PLD Process EXCEPTION online_error');
1710: x_error_code := error_code;
1711:
1712: WHEN online_error THEN
1713: wsh_del_oi_core.println('PLD Process EXCEPTION online_error');
1714: --FND_MESSAGE.SET_NAME('OE','SHP_ONLINE_NO_MANAGER');
1715: --FND_MESSAGE.SET_NAME('OE','SHP_AOL_ONLINE_FAILED');
1716: --FND_MESSAGE.SET_TOKEN('PROGRAM', 'WSHURTF');
1717: x_error_code := error_code;
1718:
1711:
1712: WHEN online_error THEN
1713: wsh_del_oi_core.println('PLD Process EXCEPTION online_error');
1714: --FND_MESSAGE.SET_NAME('OE','SHP_ONLINE_NO_MANAGER');
1715: --FND_MESSAGE.SET_NAME('OE','SHP_AOL_ONLINE_FAILED');
1716: --FND_MESSAGE.SET_TOKEN('PROGRAM', 'WSHURTF');
1717: x_error_code := error_code;
1718:
1719: WHEN cannot_transfer THEN
1712: WHEN online_error THEN
1713: wsh_del_oi_core.println('PLD Process EXCEPTION online_error');
1714: --FND_MESSAGE.SET_NAME('OE','SHP_ONLINE_NO_MANAGER');
1715: --FND_MESSAGE.SET_NAME('OE','SHP_AOL_ONLINE_FAILED');
1716: --FND_MESSAGE.SET_TOKEN('PROGRAM', 'WSHURTF');
1717: x_error_code := error_code;
1718:
1719: WHEN cannot_transfer THEN
1720: wsh_del_oi_core.println('PLD Process EXCEPTION cannot_transfer');
1720: wsh_del_oi_core.println('PLD Process EXCEPTION cannot_transfer');
1721: ret_val := Fnd_Transaction.get_values( a1, a2, a3, a4, a5, a6,
1722: a7, a8, a9, a10, a11, a12, a13, a14,
1723: a15, a16, a17, a18, a19, a20);
1724: --FND_MESSAGE.Set_Name('OE','WSH_SC_CANNOT_TRANSFER_PLD');
1725: --FND_MESSAGE.Set_Token('PLD_ID', TO_CHAR(new_pld_id));
1726: --FND_MESSAGE.Set_Token('REASON', a1);
1727: x_error_code := error_code;
1728:
1721: ret_val := Fnd_Transaction.get_values( a1, a2, a3, a4, a5, a6,
1722: a7, a8, a9, a10, a11, a12, a13, a14,
1723: a15, a16, a17, a18, a19, a20);
1724: --FND_MESSAGE.Set_Name('OE','WSH_SC_CANNOT_TRANSFER_PLD');
1725: --FND_MESSAGE.Set_Token('PLD_ID', TO_CHAR(new_pld_id));
1726: --FND_MESSAGE.Set_Token('REASON', a1);
1727: x_error_code := error_code;
1728:
1729: WHEN others then
1722: a7, a8, a9, a10, a11, a12, a13, a14,
1723: a15, a16, a17, a18, a19, a20);
1724: --FND_MESSAGE.Set_Name('OE','WSH_SC_CANNOT_TRANSFER_PLD');
1725: --FND_MESSAGE.Set_Token('PLD_ID', TO_CHAR(new_pld_id));
1726: --FND_MESSAGE.Set_Token('REASON', a1);
1727: x_error_code := error_code;
1728:
1729: WHEN others then
1730: return_msg1 := FND_MESSAGE.get;
1726: --FND_MESSAGE.Set_Token('REASON', a1);
1727: x_error_code := error_code;
1728:
1729: WHEN others then
1730: return_msg1 := FND_MESSAGE.get;
1731: wsh_del_oi_core.println('msg ='|| return_msg1);
1732: x_error_code := 'OE_QUERY_ERROR';
1733: FND_MESSAGE.SET_NAME('OE', x_error_code);
1734: wsh_del_oi_core.println('PLD Process EXCEPTION others ');
1729: WHEN others then
1730: return_msg1 := FND_MESSAGE.get;
1731: wsh_del_oi_core.println('msg ='|| return_msg1);
1732: x_error_code := 'OE_QUERY_ERROR';
1733: FND_MESSAGE.SET_NAME('OE', x_error_code);
1734: wsh_del_oi_core.println('PLD Process EXCEPTION others ');
1735: --FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
1736: --FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.process_sopld_interface');
1737: --FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
1731: wsh_del_oi_core.println('msg ='|| return_msg1);
1732: x_error_code := 'OE_QUERY_ERROR';
1733: FND_MESSAGE.SET_NAME('OE', x_error_code);
1734: wsh_del_oi_core.println('PLD Process EXCEPTION others ');
1735: --FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
1736: --FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.process_sopld_interface');
1737: --FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
1738: --FND_MESSAGE.Set_Token('ORA_TEXT','Insert statement');
1739: --APP_EXCEPTION.Raise_Exception;
1732: x_error_code := 'OE_QUERY_ERROR';
1733: FND_MESSAGE.SET_NAME('OE', x_error_code);
1734: wsh_del_oi_core.println('PLD Process EXCEPTION others ');
1735: --FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
1736: --FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.process_sopld_interface');
1737: --FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
1738: --FND_MESSAGE.Set_Token('ORA_TEXT','Insert statement');
1739: --APP_EXCEPTION.Raise_Exception;
1740: END;
1733: FND_MESSAGE.SET_NAME('OE', x_error_code);
1734: wsh_del_oi_core.println('PLD Process EXCEPTION others ');
1735: --FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
1736: --FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.process_sopld_interface');
1737: --FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
1738: --FND_MESSAGE.Set_Token('ORA_TEXT','Insert statement');
1739: --APP_EXCEPTION.Raise_Exception;
1740: END;
1741:
1734: wsh_del_oi_core.println('PLD Process EXCEPTION others ');
1735: --FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
1736: --FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.process_sopld_interface');
1737: --FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
1738: --FND_MESSAGE.Set_Token('ORA_TEXT','Insert statement');
1739: --APP_EXCEPTION.Raise_Exception;
1740: END;
1741:
1742: END PROCESS_PICKING_DETAILS_INTER;
1860: if error_code <> '0' then
1861: wsh_del_oi_core.println(' ');
1862: wsh_del_oi_core.println('This Delivery is already A/R Interfaced');
1863: wsh_del_oi_core.println(' ');
1864: FND_MESSAGE.set_name('OE', error_code);
1865: raise stop_fc_processing;
1866: end if;
1867: first_time := FALSE;
1868: end if;
1885: if (error_code <> '0' ) then
1886: wsh_del_oi_core.println(' ');
1887: wsh_del_oi_core.println('Invalid Freight Charge');
1888: wsh_del_oi_core.println(' ');
1889: FND_MESSAGE.set_name('OE', error_code);
1890: raise stop_fc_processing;
1891: end if;
1892:
1893: ----------------------------------------------------------------------------
1927: if nvl(valid_cur_code,'') <> nvl(x_del_currency,'') then
1928: wsh_del_oi_core.println(' ');
1929: wsh_del_oi_core.println('Delivery Currency is not the same as Freight Charge Currency');
1930: wsh_del_oi_core.println(' ');
1931: fnd_message.set_name('OE','WSH_OI_CURRENCY_NOT_SAME'); -- Error Message Not Defined
1932: raise stop_fc_processing;
1933: end if;
1934:
1935:
1956: if error_code <> '0' then
1957: wsh_del_oi_core.println(' ');
1958: wsh_del_oi_core.println('Invalid Freight Charge Container');
1959: wsh_del_oi_core.println(' ');
1960: fnd_message.set_name('OE',error_code);
1961: raise stop_fc_processing;
1962: end if;
1963:
1964: ----------------------------------------------------------------------------------
1974: if error_code <> '0' then
1975: wsh_del_oi_core.println(' ');
1976: wsh_del_oi_core.println('Invalid Freight Charge Amount. Either Negative or Zero');
1977: wsh_del_oi_core.println(' ');
1978: fnd_message.set_name('OE',error_code);
1979: raise stop_fc_processing;
1980: end if;
1981:
1982: --------------------------------------------------------------------------------
1993: if error_code <> '0' then
1994: wsh_del_oi_core.println(' ');
1995: wsh_del_oi_core.println('This Delivery has a Duplicate AETC');
1996: wsh_del_oi_core.println(' ');
1997: fnd_message.set_name('OE',error_code);
1998: raise stop_fc_processing;
1999: end if;
2000:
2001: --------------------------------------------------------------------------------
2020: -- fail transaction
2021: wsh_del_oi_core.println(' ');
2022: wsh_del_oi_core.println('Process failed while selecting order header id');
2023: wsh_del_oi_core.println(' ');
2024: fnd_message.set_name('OE',error_code);
2025: raise stop_fc_processing;
2026: end if;
2027: end if;
2028:
2085: fcrec.ac_attribute13,fcrec.ac_attribute14,fcrec.ac_attribute15);
2086:
2087: EXCEPTION
2088: when others then
2089: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
2090: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.insert_freight_charges statement');
2091: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
2092: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
2093: APP_EXCEPTION.Raise_Exception;
2086:
2087: EXCEPTION
2088: when others then
2089: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
2090: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.insert_freight_charges statement');
2091: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
2092: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
2093: APP_EXCEPTION.Raise_Exception;
2094: EXIT;
2087: EXCEPTION
2088: when others then
2089: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
2090: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.insert_freight_charges statement');
2091: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
2092: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
2093: APP_EXCEPTION.Raise_Exception;
2094: EXIT;
2095:
2088: when others then
2089: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
2090: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.insert_freight_charges statement');
2091: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
2092: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
2093: APP_EXCEPTION.Raise_Exception;
2094: EXIT;
2095:
2096: if ( sql%found ) then
2120: x_error_code := error_code;
2121: null;
2122:
2123: when others then
2124: return_msg1 := FND_MESSAGE.get;
2125: wsh_del_oi_core.println('msg ='|| return_msg1);
2126: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
2127: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.insert_freight_charges');
2128: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
2122:
2123: when others then
2124: return_msg1 := FND_MESSAGE.get;
2125: wsh_del_oi_core.println('msg ='|| return_msg1);
2126: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
2127: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.insert_freight_charges');
2128: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
2129: FND_MESSAGE.Set_Token('ORA_TEXT','Insert statement');
2130: APP_EXCEPTION.Raise_Exception;
2123: when others then
2124: return_msg1 := FND_MESSAGE.get;
2125: wsh_del_oi_core.println('msg ='|| return_msg1);
2126: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
2127: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.insert_freight_charges');
2128: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
2129: FND_MESSAGE.Set_Token('ORA_TEXT','Insert statement');
2130: APP_EXCEPTION.Raise_Exception;
2131:
2124: return_msg1 := FND_MESSAGE.get;
2125: wsh_del_oi_core.println('msg ='|| return_msg1);
2126: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
2127: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.insert_freight_charges');
2128: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
2129: FND_MESSAGE.Set_Token('ORA_TEXT','Insert statement');
2130: APP_EXCEPTION.Raise_Exception;
2131:
2132: end;
2125: wsh_del_oi_core.println('msg ='|| return_msg1);
2126: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
2127: FND_MESSAGE.Set_Token('PACKAGE','WSH_SC_TRX_INTERFACE.insert_freight_charges');
2128: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
2129: FND_MESSAGE.Set_Token('ORA_TEXT','Insert statement');
2130: APP_EXCEPTION.Raise_Exception;
2131:
2132: end;
2133: