1 PACKAGE MSC_CL_SUPPLIER_RESP AUTHID CURRENT_USER AS
2 /* $Header: MSCXCSRS.pls 115.3 2004/05/03 22:22:31 pshah ship $ */
3
4 /* Constants */
5 SYS_YES CONSTANT NUMBER := 1;
6 SYS_NO CONSTANT NUMBER := 2;
7 NULL_STRING CONSTANT VARCHAR2(7) :='-234567';
8 G_SR_INSTANCE_ID CONSTANT NUMBER := -1;
9 G_MRP_PO_ACK CONSTANT NUMBER := 49;
10 G_PLAN_ID CONSTANT NUMBER := -1;
11 G_OEM_ID CONSTANT NUMBER := 1;
12 G_SALES_ORDER CONSTANT NUMBER := 14;
13 G_PO CONSTANT NUMBER := 13;
14 G_SR_OEM_ID CONSTANT NUMBER := -1;
15 G_ORGANIZATION CONSTANT NUMBER := 3;
16
17 /* Collection variables */
18 TYPE number_arr IS TABLE OF NUMBER;
19 TYPE order_numbers IS TABLE OF MSC_ST_SUPPLIES.ORDER_NUMBER%TYPE;
20 TYPE order_line_numbers IS TABLE OF MSC_ST_SUPPLIES.ORDER_LINE_NUMBER%TYPE;
21 TYPE dates IS TABLE OF DATE;
22 TYPE end_order_numbers IS TABLE OF MSC_ST_SUPPLIES.END_ORDER_NUMBER%TYPE;
23 TYPE end_order_line_nums IS TABLE OF MSC_ST_SUPPLIES.END_ORDER_LINE_NUMBER%TYPE;
24 TYPE end_order_rel_nums IS TABLE OF MSC_ST_SUPPLIES.END_ORDER_RELEASE_NUMBER%TYPE;
25 TYPE company_names IS TABLE OF MSC_COMPANIES.COMPANY_NAME%TYPE;
26 TYPE company_site_names IS TABLE OF MSC_COMPANY_SITES.COMPANY_SITE_NAME%TYPE;
27 TYPE item_names IS TABLE OF MSC_SUP_DEM_ENTRIES.ITEM_NAME%TYPE;
28 TYPE item_descriptions IS TABLE OF MSC_SUP_DEM_ENTRIES.ITEM_description%TYPE;
29 TYPE tp_uom_codes IS TABLE OF MSC_SUP_DEM_ENTRIES.tp_uom_code%TYPE;
30 TYPE order_types IS TABLE OF MSC_SUP_DEM_ENTRIES.publisher_order_type_desc%TYPE;
31 TYPE acceptance_required_flags IS TABLE OF MSC_ST_SUPPLIES.ACCEPTANCE_REQUIRED_FLAG%TYPE;
32 TYPE ack_reference_numbers IS TABLE OF MSC_ST_SUPPLIES.ACK_REFERENCE_NUMBER%TYPE;
33
34
35 /* Procedures */
36 PROCEDURE PULL_SUPPLIER_RESP(p_dblink IN varchar2,
37 p_instance_id IN NUMBER,
38 p_return_status OUT NOCOPY BOOLEAN,
39 p_supplier_response_flag IN NUMBER,
40 p_refresh_id IN NUMBER,
41 p_lrn IN NUMBER,
42 p_in_org_str IN VARCHAR2
43 );
44
45 PROCEDURE LOAD_SUPPLIER_RESPONSE(p_instance_id IN NUMBER ,
46 p_is_complete_refresh IN BOOLEAN,
47 p_is_partial_refresh IN BOOLEAN,
48 p_is_incremental_refresh IN BOOLEAN,
49 p_temp_supply_table IN VARCHAR2,
50 p_user_id IN NUMBER,
51 p_last_collection_id NUMBER);
52
53 PROCEDURE PUBLISH_SUPPLIER_RESPONSE(p_refresh_number IN NUMBER,
54 p_sr_instance_id IN NUMBER,
55 p_return_status OUT NOCOPY BOOLEAN,
56 p_collection_type IN VARCHAR2,
57 p_user_id IN NUMBER,
58 p_in_org_str IN VARCHAR2
59 );
60
61 END MSC_CL_SUPPLIER_RESP;