22: fetch order_info
23: into X_order_currency, X_order_category;
24: close order_info;
25: exception when others then
26: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
27: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.get_order_info');
28: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
29: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
30: APP_EXCEPTION.Raise_Exception;
23: into X_order_currency, X_order_category;
24: close order_info;
25: exception when others then
26: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
27: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.get_order_info');
28: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
29: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
30: APP_EXCEPTION.Raise_Exception;
31:
24: close order_info;
25: exception when others then
26: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
27: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.get_order_info');
28: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
29: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
30: APP_EXCEPTION.Raise_Exception;
31:
32: end;
25: exception when others then
26: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
27: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.get_order_info');
28: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
29: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
30: APP_EXCEPTION.Raise_Exception;
31:
32: end;
33: END GET_ORDER_INFO;
58: CLOSE open_hdr;
59: RETURN (FALSE);
60: END IF;
61: EXCEPTION WHEN OTHERS THEN
62: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
63: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.pickslip_closed');
64: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
65: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
66: APP_EXCEPTION.Raise_Exception;
59: RETURN (FALSE);
60: END IF;
61: EXCEPTION WHEN OTHERS THEN
62: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
63: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.pickslip_closed');
64: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
65: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
66: APP_EXCEPTION.Raise_Exception;
67:
60: END IF;
61: EXCEPTION WHEN OTHERS THEN
62: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
63: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.pickslip_closed');
64: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
65: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
66: APP_EXCEPTION.Raise_Exception;
67:
68: END;
61: EXCEPTION WHEN OTHERS THEN
62: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
63: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.pickslip_closed');
64: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
65: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
66: APP_EXCEPTION.Raise_Exception;
67:
68: END;
69:
110: close control_codes;
111:
112:
113: exception when others then
114: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
115: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.get_item_control_codes');
116: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
117: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
118: APP_EXCEPTION.Raise_Exception;
111:
112:
113: exception when others then
114: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
115: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.get_item_control_codes');
116: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
117: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
118: APP_EXCEPTION.Raise_Exception;
119: end;
112:
113: exception when others then
114: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
115: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.get_item_control_codes');
116: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
117: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
118: APP_EXCEPTION.Raise_Exception;
119: end;
120: END get_item_control_codes;
113: exception when others then
114: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
115: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.get_item_control_codes');
116: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
117: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
118: APP_EXCEPTION.Raise_Exception;
119: end;
120: END get_item_control_codes;
121:
183: END IF;
184:
185: return (TRUE);
186: exception when others then
187: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
188: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_subinventory');
189: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
190: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
191: APP_EXCEPTION.Raise_Exception;
184:
185: return (TRUE);
186: exception when others then
187: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
188: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_subinventory');
189: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
190: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
191: APP_EXCEPTION.Raise_Exception;
192: end;
185: return (TRUE);
186: exception when others then
187: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
188: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_subinventory');
189: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
190: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
191: APP_EXCEPTION.Raise_Exception;
192: end;
193: END valid_subinventory;
186: exception when others then
187: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
188: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_subinventory');
189: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
190: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
191: APP_EXCEPTION.Raise_Exception;
192: end;
193: END valid_subinventory;
194:
235:
236: RETURN (dflt_subinventory);
237:
238: exception when others then
239: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
240: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.default_subinventory');
241: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
242: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
243: APP_EXCEPTION.Raise_Exception;
236: RETURN (dflt_subinventory);
237:
238: exception when others then
239: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
240: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.default_subinventory');
241: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
242: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
243: APP_EXCEPTION.Raise_Exception;
244:
237:
238: exception when others then
239: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
240: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.default_subinventory');
241: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
242: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
243: APP_EXCEPTION.Raise_Exception;
244:
245: end;
238: exception when others then
239: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
240: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.default_subinventory');
241: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
242: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
243: APP_EXCEPTION.Raise_Exception;
244:
245: end;
246: END DEFAULT_SUBINVENTORY;
300: error_code := 'WSH_OI_MISSING_LOC_CNTRL';
301: end if;
302: close locator_controls;
303: exception when others then
304: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
305: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.get_locator_controls');
306: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
307: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
308: APP_EXCEPTION.Raise_Exception;
301: end if;
302: close locator_controls;
303: exception when others then
304: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
305: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.get_locator_controls');
306: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
307: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
308: APP_EXCEPTION.Raise_Exception;
309: end;
302: close locator_controls;
303: exception when others then
304: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
305: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.get_locator_controls');
306: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
307: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
308: APP_EXCEPTION.Raise_Exception;
309: end;
310: END get_locator_controls;
303: exception when others then
304: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
305: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.get_locator_controls');
306: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
307: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
308: APP_EXCEPTION.Raise_Exception;
309: end;
310: END get_locator_controls;
311:
349: end if;
350: return (TRUE);
351:
352: exception when others then
353: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
354: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_lot_number');
355: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
356: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
357: APP_EXCEPTION.Raise_Exception;
350: return (TRUE);
351:
352: exception when others then
353: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
354: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_lot_number');
355: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
356: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
357: APP_EXCEPTION.Raise_Exception;
358:
351:
352: exception when others then
353: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
354: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_lot_number');
355: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
356: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
357: APP_EXCEPTION.Raise_Exception;
358:
359: end;
352: exception when others then
353: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
354: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_lot_number');
355: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
356: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
357: APP_EXCEPTION.Raise_Exception;
358:
359: end;
360: END valid_lot_number;
396: end if;
397: return (TRUE);
398:
399: exception when others then
400: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
401: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_revision');
402: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
403: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
404: APP_EXCEPTION.Raise_Exception;
397: return (TRUE);
398:
399: exception when others then
400: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
401: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_revision');
402: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
403: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
404: APP_EXCEPTION.Raise_Exception;
405: end;
398:
399: exception when others then
400: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
401: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_revision');
402: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
403: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
404: APP_EXCEPTION.Raise_Exception;
405: end;
406: END VALID_REVISION;
399: exception when others then
400: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
401: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_revision');
402: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
403: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
404: APP_EXCEPTION.Raise_Exception;
405: end;
406: END VALID_REVISION;
407:
456: RETURN(FALSE);
457: end if;
458:
459: exception when others then
460: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
461: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_locator_id');
462: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
463: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
464: APP_EXCEPTION.Raise_Exception;
457: end if;
458:
459: exception when others then
460: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
461: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_locator_id');
462: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
463: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
464: APP_EXCEPTION.Raise_Exception;
465:
458:
459: exception when others then
460: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
461: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_locator_id');
462: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
463: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
464: APP_EXCEPTION.Raise_Exception;
465:
466: end;
459: exception when others then
460: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
461: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_locator_id');
462: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
463: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
464: APP_EXCEPTION.Raise_Exception;
465:
466: end;
467: END valid_locator_id;
520:
521: return (dflt_locator_id);
522:
523: exception when others then
524: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
525: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.default_locator');
526: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
527: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
528: APP_EXCEPTION.Raise_Exception;
521: return (dflt_locator_id);
522:
523: exception when others then
524: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
525: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.default_locator');
526: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
527: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
528: APP_EXCEPTION.Raise_Exception;
529: end;
522:
523: exception when others then
524: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
525: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.default_locator');
526: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
527: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
528: APP_EXCEPTION.Raise_Exception;
529: end;
530: END default_locator;
523: exception when others then
524: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
525: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.default_locator');
526: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
527: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
528: APP_EXCEPTION.Raise_Exception;
529: end;
530: END default_locator;
531:
629: end if;
630: return (TRUE);
631:
632: exception when others then
633: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
634: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_serial_number');
635: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
636: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
637: APP_EXCEPTION.Raise_Exception;
630: return (TRUE);
631:
632: exception when others then
633: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
634: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_serial_number');
635: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
636: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
637: APP_EXCEPTION.Raise_Exception;
638:
631:
632: exception when others then
633: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
634: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_serial_number');
635: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
636: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
637: APP_EXCEPTION.Raise_Exception;
638:
639: end;
632: exception when others then
633: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
634: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_serial_number');
635: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
636: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
637: APP_EXCEPTION.Raise_Exception;
638:
639: end;
640: END valid_serial_number;
671: wsh_del_oi_core.println('Its not AR_interfaced');
672: RETURN (FALSE);
673: end if;
674: exception when others then
675: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
676: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.AR_INTERFACED');
677: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
678: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
679: APP_EXCEPTION.Raise_Exception;
672: RETURN (FALSE);
673: end if;
674: exception when others then
675: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
676: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.AR_INTERFACED');
677: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
678: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
679: APP_EXCEPTION.Raise_Exception;
680: end;
673: end if;
674: exception when others then
675: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
676: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.AR_INTERFACED');
677: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
678: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
679: APP_EXCEPTION.Raise_Exception;
680: end;
681:
674: exception when others then
675: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
676: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.AR_INTERFACED');
677: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
678: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
679: APP_EXCEPTION.Raise_Exception;
680: end;
681:
682: END AR_INTERFACED;
711:
712: return (x_out_id);
713:
714: exception when others then
715: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
716: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_freight_type');
717: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
718: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
719: APP_EXCEPTION.Raise_Exception;
712: return (x_out_id);
713:
714: exception when others then
715: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
716: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_freight_type');
717: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
718: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
719: APP_EXCEPTION.Raise_Exception;
720: end;
713:
714: exception when others then
715: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
716: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_freight_type');
717: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
718: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
719: APP_EXCEPTION.Raise_Exception;
720: end;
721: END Valid_freight_type;
714: exception when others then
715: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
716: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_freight_type');
717: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
718: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
719: APP_EXCEPTION.Raise_Exception;
720: end;
721: END Valid_freight_type;
722:
752: return(FALSE);
753: end if;
754:
755: exception when others then
756: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
757: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_freight_type');
758: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
759: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
760: APP_EXCEPTION.Raise_Exception;
753: end if;
754:
755: exception when others then
756: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
757: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_freight_type');
758: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
759: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
760: APP_EXCEPTION.Raise_Exception;
761: end;
754:
755: exception when others then
756: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
757: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_freight_type');
758: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
759: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
760: APP_EXCEPTION.Raise_Exception;
761: end;
762: END Valid_Carrier_Code;
755: exception when others then
756: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
757: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.valid_freight_type');
758: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
759: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
760: APP_EXCEPTION.Raise_Exception;
761: end;
762: END Valid_Carrier_Code;
763:
814: return (container_id);
815:
816: exception
817: when others then
818: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
819: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.validate_container_id');
820: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
821: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
822: APP_EXCEPTION.Raise_Exception;
815:
816: exception
817: when others then
818: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
819: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.validate_container_id');
820: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
821: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
822: APP_EXCEPTION.Raise_Exception;
823: end;
816: exception
817: when others then
818: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
819: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.validate_container_id');
820: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
821: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
822: APP_EXCEPTION.Raise_Exception;
823: end;
824: END Validate_container_id;
817: when others then
818: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
819: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.validate_container_id');
820: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
821: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
822: APP_EXCEPTION.Raise_Exception;
823: end;
824: END Validate_container_id;
825:
858:
859: begin
860: if x_in_code is null and x_in_name is null then
861: error_code := 'CURR-No code';
862: FND_MESSAGE.set_name('FND', error_code);
863: else
864: open currency_cursor;
865: fetch currency_cursor
866: into X_out_code, X_out_name, X_precision, X_in_precision;
866: into X_out_code, X_out_name, X_precision, X_in_precision;
867: if currency_cursor%notfound then
868: if x_in_code is not null then
869: error_code := 'CURR-Invalid code';
870: FND_MESSAGE.set_name('FND', error_code);
871: FND_MESSAGE.set_token('CODE',x_in_code);
872: else
873: error_code := 'CURR-Invalid currency value';
874: FND_MESSAGE.set_name('FND', error_code);
867: if currency_cursor%notfound then
868: if x_in_code is not null then
869: error_code := 'CURR-Invalid code';
870: FND_MESSAGE.set_name('FND', error_code);
871: FND_MESSAGE.set_token('CODE',x_in_code);
872: else
873: error_code := 'CURR-Invalid currency value';
874: FND_MESSAGE.set_name('FND', error_code);
875: end if;
870: FND_MESSAGE.set_name('FND', error_code);
871: FND_MESSAGE.set_token('CODE',x_in_code);
872: else
873: error_code := 'CURR-Invalid currency value';
874: FND_MESSAGE.set_name('FND', error_code);
875: end if;
876: end if;
877: close currency_cursor;
878: if x_in_precision > x_precision then
876: end if;
877: close currency_cursor;
878: if x_in_precision > x_precision then
879: error_code := 'CURR-Precision';
880: FND_MESSAGE.set_name('FND', error_code);
881: FND_MESSAGE.set_token('PRECISON',to_char(x_precision));
882: end if;
883: end if;
884: exception when others then
877: close currency_cursor;
878: if x_in_precision > x_precision then
879: error_code := 'CURR-Precision';
880: FND_MESSAGE.set_name('FND', error_code);
881: FND_MESSAGE.set_token('PRECISON',to_char(x_precision));
882: end if;
883: end if;
884: exception when others then
885: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
881: FND_MESSAGE.set_token('PRECISON',to_char(x_precision));
882: end if;
883: end if;
884: exception when others then
885: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
886: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.validate_currency');
887: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
888: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
889: APP_EXCEPTION.Raise_Exception;
882: end if;
883: end if;
884: exception when others then
885: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
886: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.validate_currency');
887: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
888: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
889: APP_EXCEPTION.Raise_Exception;
890: end;
883: end if;
884: exception when others then
885: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
886: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.validate_currency');
887: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
888: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
889: APP_EXCEPTION.Raise_Exception;
890: end;
891:
884: exception when others then
885: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
886: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.validate_currency');
887: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
888: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
889: APP_EXCEPTION.Raise_Exception;
890: end;
891:
892: END validate_currency;
925: end if;
926: close uom_cursor;
927: end if;
928: exception when others then
929: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
930: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.validate_uom');
931: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
932: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
933: APP_EXCEPTION.Raise_Exception;
926: close uom_cursor;
927: end if;
928: exception when others then
929: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
930: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.validate_uom');
931: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
932: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
933: APP_EXCEPTION.Raise_Exception;
934: end;
927: end if;
928: exception when others then
929: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
930: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.validate_uom');
931: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
932: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
933: APP_EXCEPTION.Raise_Exception;
934: end;
935:
928: exception when others then
929: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
930: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.validate_uom');
931: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
932: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
933: APP_EXCEPTION.Raise_Exception;
934: end;
935:
936: END validate_uom;
968: end if;
969: close user_lookup;
970: end if;
971: exception when others then
972: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
973: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.validate_user');
974: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
975: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
976: APP_EXCEPTION.Raise_Exception;
969: close user_lookup;
970: end if;
971: exception when others then
972: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
973: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.validate_user');
974: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
975: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
976: APP_EXCEPTION.Raise_Exception;
977: end;
970: end if;
971: exception when others then
972: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
973: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.validate_user');
974: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
975: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
976: APP_EXCEPTION.Raise_Exception;
977: end;
978:
971: exception when others then
972: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
973: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.validate_user');
974: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
975: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
976: APP_EXCEPTION.Raise_Exception;
977: end;
978:
979: END validate_user;
1008: wsh_del_oi_core.println('OEBSCO Returned with status '||x_dummy||' msg '||x_return_msg
1009: ||' and code = '||to_char(error_code_num));
1010:
1011: IF (error_code_num = 2) THEN
1012: FND_MESSAGE.Set_Name('OE','OE_SH_PROCESS_ONLINE_NO_MGR');
1013:
1014: ELSIF (error_code_num <> 0) THEN
1015: FND_MESSAGE.Set_Name('OE','OE_SH_PROCESS_ONLINE_ERROR');
1016:
1011: IF (error_code_num = 2) THEN
1012: FND_MESSAGE.Set_Name('OE','OE_SH_PROCESS_ONLINE_NO_MGR');
1013:
1014: ELSIF (error_code_num <> 0) THEN
1015: FND_MESSAGE.Set_Name('OE','OE_SH_PROCESS_ONLINE_ERROR');
1016:
1017: ELSE
1018: IF (x_return_msg = 'FAILURE') THEN
1019: error_code_num := FND_TRANSACTION.get_values(x_return_msg,
1022: x_dummy, x_dummy, x_dummy, x_dummy, x_dummy,
1023: x_dummy, x_dummy, x_dummy, x_dummy);
1024:
1025: IF (x_return_msg = 'SUCCESS') THEN
1026: FND_MESSAGE.Set_Name('OE','OE_SH_PROCESS_ONLINE_FAILED');
1027: FND_MESSAGE.Set_Token('PROCESS','OE_SH_INVENTORY_INTERFACE');
1028:
1029: ELSE
1030: FND_MESSAGE.Set_Name('OE','OE_SH_PROCESS_ONLINE_FAILED');
1023: x_dummy, x_dummy, x_dummy, x_dummy);
1024:
1025: IF (x_return_msg = 'SUCCESS') THEN
1026: FND_MESSAGE.Set_Name('OE','OE_SH_PROCESS_ONLINE_FAILED');
1027: FND_MESSAGE.Set_Token('PROCESS','OE_SH_INVENTORY_INTERFACE');
1028:
1029: ELSE
1030: FND_MESSAGE.Set_Name('OE','OE_SH_PROCESS_ONLINE_FAILED');
1031: FND_MESSAGE.Set_Token('PROCESS','OE_SH_UPDATE_SHIPPING_INFO');
1026: FND_MESSAGE.Set_Name('OE','OE_SH_PROCESS_ONLINE_FAILED');
1027: FND_MESSAGE.Set_Token('PROCESS','OE_SH_INVENTORY_INTERFACE');
1028:
1029: ELSE
1030: FND_MESSAGE.Set_Name('OE','OE_SH_PROCESS_ONLINE_FAILED');
1031: FND_MESSAGE.Set_Token('PROCESS','OE_SH_UPDATE_SHIPPING_INFO');
1032:
1033: END IF;
1034: END IF;
1027: FND_MESSAGE.Set_Token('PROCESS','OE_SH_INVENTORY_INTERFACE');
1028:
1029: ELSE
1030: FND_MESSAGE.Set_Name('OE','OE_SH_PROCESS_ONLINE_FAILED');
1031: FND_MESSAGE.Set_Token('PROCESS','OE_SH_UPDATE_SHIPPING_INFO');
1032:
1033: END IF;
1034: END IF;
1035: END IF;
1144:
1145: close so_code_lookup;
1146:
1147: exception when others then
1148: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
1149: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.validate_so_code');
1150: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
1151: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
1152: APP_EXCEPTION.Raise_Exception;
1145: close so_code_lookup;
1146:
1147: exception when others then
1148: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
1149: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.validate_so_code');
1150: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
1151: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
1152: APP_EXCEPTION.Raise_Exception;
1153: end;
1146:
1147: exception when others then
1148: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
1149: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.validate_so_code');
1150: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
1151: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
1152: APP_EXCEPTION.Raise_Exception;
1153: end;
1154: END Validate_so_code;
1147: exception when others then
1148: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
1149: FND_MESSAGE.Set_Token('PACKAGE','WSH_DEL_OI_CORE.validate_so_code');
1150: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
1151: FND_MESSAGE.Set_Token('ORA_TEXT',SQLERRM);
1152: APP_EXCEPTION.Raise_Exception;
1153: end;
1154: END Validate_so_code;
1155: