1 PACKAGE GMD_QC_FIND_SPECS AUTHID CURRENT_USER AS
2 /* $Header: GMDQFSPS.pls 115.5 2003/12/05 17:31:31 pupakare noship $ */
3
4 -- ==================================================
5 -- The body uses find_cust_spec_rec from gmd_qc_spec_match (GMDQMCHS.pls)
6 -- for customer specs. All other searchs - vendor, item, production -
7 -- are in the body.
8 -- ==================================================
9 -- TKW 9/18/2002 B2578186 Location VARCHAR2(16)instead of VARCHAR2(4)
10
11 TYPE item_rec_in IS record
12 ( item_id NUMBER
13 , date_effective date
14 , orgn_code VARCHAR2(4)
15 , lot_id NUMBER
16 , whse_code VARCHAR2(4)
17 , location VARCHAR2(16)
18 , exact_match VARCHAR2(1)
19 , qcassy_typ_id NUMBER
20 );
21
22 TYPE supl_rec_in IS record
23 ( item_id NUMBER
24 , date_effective date
25 , orgn_code VARCHAR2(4)
26 , lot_id NUMBER
27 , vendor_id NUMBER
28 , exact_match VARCHAR2(1)
29 , qcassy_typ_id NUMBER
30 );
31
32 TYPE prod_rec_in IS record
33 ( item_id NUMBER
34 , date_effective date
35 , orgn_code VARCHAR2(4)
36 , lot_id NUMBER
37 , batch_id NUMBER
38 , formula_id NUMBER
39 , formulaline_id NUMBER
40 , routing_id NUMBER
41 , routingstep_id NUMBER
42 , routingstep_no NUMBER
43 , oprn_id NUMBER
44 , charge NUMBER
45 , exact_match VARCHAR2(1)
46 , qcassy_typ_id NUMBER
47 );
48
49 TYPE spec_found_rec IS record
50 ( spec_hdr_id NUMBER
51 ,spec_match_type VARCHAR2(4)
52 ,qc_spec_id NUMBER
53 ) ;
54
55
56 -- send in orgn_code, cust_id, item_id, order_id (if any), sched ship date
57 -- for Date_effective.
58 -- return spec_hdr_id, orgn_code of spec found
59
60
61 PROCEDURE find_spec_for_cust_info
62 ( p_cust_spec IN GMD_QC_SPEC_MATCH.find_cust_spec_rec
63 , p_api_version IN NUMBER
64 , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
65 , p_spec_out OUT NOCOPY spec_found_rec
66 , p_return_status OUT NOCOPY VARCHAR2
67 , p_msg_count OUT NOCOPY NUMBER
68 , p_msg_stack OUT NOCOPY VARCHAR2
69 );
70
71 PROCEDURE find_spec_for_supplier_info
72 ( p_supplier_in IN supl_rec_in
73 , p_api_version IN NUMBER
74 , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
75 , p_spec_out OUT NOCOPY spec_found_rec
76 , p_return_status OUT NOCOPY VARCHAR2
77 , p_msg_count OUT NOCOPY NUMBER
78 , p_msg_stack OUT NOCOPY VARCHAR2
79 );
80
81 PROCEDURE find_spec_for_prod_info
82 ( p_prod_rec_in IN prod_rec_in
83 , p_api_version IN NUMBER
84 , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
85 , p_spec_out OUT NOCOPY spec_found_rec
86 , p_return_status OUT NOCOPY VARCHAR2
87 , p_msg_count OUT NOCOPY NUMBER
88 , p_msg_stack OUT NOCOPY VARCHAR2
89 );
90
91
92 PROCEDURE find_spec_for_item_info
93 ( p_item_rec_in IN item_rec_in
94 , p_api_version IN NUMBER
95 , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
96 , p_spec_out OUT NOCOPY spec_found_rec
97 , p_return_status OUT NOCOPY VARCHAR2
98 , p_msg_count OUT NOCOPY NUMBER
99 , p_msg_stack OUT NOCOPY VARCHAR2
100 );
101
102 END gmd_qc_find_specs;