1: PACKAGE BODY WSH_REPORT_QUANTITIES AS
2: /* $Header: WSHUTRQB.pls 115.6 99/07/16 08:24:09 porting shi $ */
3:
4:
5: -- NAME: populate_temp_table
476: dbms_sql.close_cursor(l_cursor);
477: END IF;
478:
479: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
480: FND_MESSAGE.Set_Token('PACKAGE','WSH_REPORT_QUANTITIES.populate_temp_table');
481: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
482: APP_EXCEPTION.Raise_Exception;
483:
484: END;
592: END LOOP;
593:
594: EXCEPTION WHEN OTHERS THEN
595: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
596: FND_MESSAGE.Set_Token('PACKAGE','WSH_REPORT_QUANTITIES.add_non_ship_lines');
597: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
598: APP_EXCEPTION.Raise_Exception;
599:
600: END;
685: END IF;
686:
687: EXCEPTION WHEN OTHERS THEN
688: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
689: FND_MESSAGE.Set_Token('PACKAGE','WSH_REPORT_QUANTITIES.set_shipped_quantity');
690: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
691: APP_EXCEPTION.Raise_Exception;
692: END;
693:
765: END IF;
766:
767: EXCEPTION WHEN OTHERS THEN
768: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
769: FND_MESSAGE.Set_Token('PACKAGE','WSH_REPORT_QUANTITIES.set_invoice_quantity');
770: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
771: APP_EXCEPTION.Raise_Exception;
772: END;
773: END SET_INVOICE_QUANTITY;
916: END IF;
917:
918: EXCEPTION WHEN OTHERS THEN
919: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
920: FND_MESSAGE.Set_Token('PACKAGE','WSH_REPORT_QUANTITIES.insert_order_line');
921: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
922: APP_EXCEPTION.Raise_Exception;
923: END;
924: END INSERT_ORDER_LINE;
1054: CLOSE ORDER_LINES;
1055:
1056: EXCEPTION WHEN OTHERS THEN
1057: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
1058: FND_MESSAGE.Set_Token('PACKAGE','WSH_REPORT_QUANTITIES.insert_ato_components');
1059: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
1060: APP_EXCEPTION.Raise_Exception;
1061: END;
1062: END INSERT_ATO_COMPONENTS;
1127: RETURN(l_sq);
1128:
1129: EXCEPTION WHEN OTHERS THEN
1130: FND_MESSAGE.Set_Name('OE','OE_QUERY_ERROR');
1131: FND_MESSAGE.Set_Token('PACKAGE','WSH_REPORT_QUANTITIES.line_shipped_quantity');
1132: FND_MESSAGE.Set_Token('ORA_ERROR',to_char(sqlcode));
1133: APP_EXCEPTION.Raise_Exception;
1134: END;
1135:
1143: OR CREATION_DATE < sysdate - 2;
1144:
1145: END DELETE_REPORT;
1146:
1147: end WSH_REPORT_QUANTITIES;