1 package csi_rma_receipt_pub AS
2 /* $Header: csipirms.pls 120.1.12000000.1 2007/01/16 15:35:07 appldev ship $*/
3
4 g_pkg_name varchar2(30) := 'csi_rma_receipt_pub';
5 g_user_id number := fnd_global.user_id;
6 g_login_id number := fnd_global.login_id;
7 g_sysdate date := sysdate;
8
9 /* ---------------------------------------------------------------------- */
10 /* Record definition to hold the inventory material transaction info */
11 /* get_mtl_txn_rec routine populates this data structure */
12 /* ---------------------------------------------------------------------- */
13
14 TYPE mtl_txn_rec IS RECORD (
15 transaction_id number := fnd_api.g_miss_num,
16 oe_line_id number := fnd_api.g_miss_num,
17 inventory_item_id number := fnd_api.g_miss_num,
18 organization_id number := fnd_api.g_miss_num,
19 revision varchar2(3) := fnd_api.g_miss_char,
20 subinventory_code varchar2(10) := fnd_api.g_miss_char,
21 locator_id number := fnd_api.g_miss_num,
22 lot_number varchar2(80) := fnd_api.g_miss_char,
23 serial_number varchar2(30) := fnd_api.g_miss_char,
24 inv_location_id number := fnd_api.g_miss_num,
25 primary_uom_code varchar2(3) := fnd_api.g_miss_char,
26 mmt_primary_quantity number := fnd_api.g_miss_num,
27 lot_primary_quantity number := fnd_api.g_miss_num,
28 transaction_quantity number := fnd_api.g_miss_num,
29 transaction_uom varchar2(3) := fnd_api.g_miss_char,
30 transaction_date date := fnd_api.g_miss_date,
31 last_updated_by number := fnd_api.g_miss_num,
32 transaction_type_id number := fnd_api.g_miss_num,
33 instance_id number := null,
34 instance_quantity number := fnd_api.g_miss_num,
35 original_order_line_id number := fnd_api.g_miss_num,
36 customer_location_id number := fnd_api.g_miss_num,
37 customer_account_id number := fnd_api.g_miss_num,
38 party_id number := fnd_api.g_miss_num,
39 txn_line_detail_id number := fnd_api.g_miss_num,
40 sub_type_id number := fnd_api.g_miss_num,
41 verified_flag varchar2(1) := 'N',
42 processed_flag varchar2(1) := 'N',
43 mtl_txn_creation_date date := fnd_api.g_miss_date);--bug 4026148
44
45
46 TYPE mtl_txn_tbl IS TABLE OF mtl_txn_rec INDEX BY BINARY_INTEGER;
47
48 TYPE item_control_rec IS RECORD (
49 inventory_item_id number := fnd_api.g_miss_num,
50 organization_id number := fnd_api.g_miss_num,
51 serial_control_code number := fnd_api.g_miss_num,
52 lot_control_code number := fnd_api.g_miss_num,
53 revision_control_code number := fnd_api.g_miss_num,
54 locator_control_code number := fnd_api.g_miss_num,
55 ib_trackable_flag varchar2(1) := fnd_api.g_miss_char,
56 primary_uom_code varchar2(3) := fnd_api.g_miss_char,
57 bom_item_type number := fnd_api.g_miss_num,
58 model_item_id number := fnd_api.g_miss_num,
59 pick_components_flag varchar2(1) := fnd_api.g_miss_char,
60 mult_srl_control_flag varchar2(1) := fnd_api.g_miss_char);
61
62 TYPE inst_pa_rec IS RECORD (
63 instance_id number := fnd_api.g_miss_num,
64 internal_party_id number := fnd_api.g_miss_num,
65 src_txn_party_id number := fnd_api.g_miss_num,
66 src_txn_acct_id number := fnd_api.g_miss_num,
67 ownership_ovr_flag varchar2(1) := fnd_api.g_miss_char,
68 instance_party_id number := fnd_api.g_miss_num,
69 party_id number := fnd_api.g_miss_num,
70 pty_obj_version number := fnd_api.g_miss_num,
71 party_rltnshp_code varchar2(30) := fnd_api.g_miss_char,
72 ip_account_id number := fnd_api.g_miss_num,
73 account_id number := fnd_api.g_miss_num,
74 acct_obj_version number := fnd_api.g_miss_num,
75 acct_rltnshp_code varchar2(30) := fnd_api.g_miss_char);
76
77 TYPE tld_inst_rec IS RECORD (
78 txn_line_detail_id number := fnd_api.g_miss_num,
79 sub_type_id number := fnd_api.g_miss_num,
80 inventory_item_id number := fnd_api.g_miss_num,
81 lot_number varchar2(80) := fnd_api.g_miss_char,
82 serial_number varchar2(30) := fnd_api.g_miss_char,
83 quantity number := fnd_api.g_miss_num,
84 instance_id number := fnd_api.g_miss_num,
85 verified_flag varchar2(1) := 'N',
86 processed_flag varchar2(1) := 'N',
87 mtl_txn_creation_date date := fnd_api.g_miss_date);--bug 4026148
88
89 TYPE tld_inst_tbl IS TABLE OF tld_inst_rec INDEX BY BINARY_INTEGER;
90
91 TYPE source_order_rec IS RECORD (
92 transaction_id number := fnd_api.g_miss_num,
93 rma_line_id number := fnd_api.g_miss_num,
94 original_order_line_id number := fnd_api.g_miss_num,
95 original_order_qty number := fnd_api.g_miss_num,
96 customer_location_id number := fnd_api.g_miss_num,
97 party_id number := fnd_api.g_miss_num,
98 customer_account_id number := fnd_api.g_miss_num);
99
100 TYPE mtl_trx_type IS RECORD(
101 transaction_id number,
102 transaction_date date,
103 transaction_type_id number,
104 source_line_id number,
105 source_line_ref varchar2(30),
106 source_header_id number,
107 source_header_ref varchar2(30));
108
109 PROCEDURE get_rma_info(
110 p_transaction_id IN number,
111 x_mtl_trx_type OUT NOCOPY mtl_trx_type,
112 x_error_message OUT NOCOPY varchar2,
113 x_return_status OUT NOCOPY varchar2);
114
115 PROCEDURE get_sub_type_rec(
116 p_transaction_type_id IN number,
117 p_sub_type_id IN number,
118 x_sub_type_rec OUT NOCOPY csi_txn_sub_types%rowtype,
119 x_return_status OUT NOCOPY varchar2);
120
121 PROCEDURE decode_message(
122 p_msg_header IN xnp_message.msg_header_rec_type,
123 p_msg_text IN varchar2,
124 x_mtl_trx_rec OUT NOCOPY mtl_trx_type,
125 x_error_message OUT NOCOPY varchar2,
126 x_return_status OUT NOCOPY varchar2);
127
128 PROCEDURE rma_receipt(
129 p_mtl_txn_id IN number,
130 p_message_id IN number,
131 x_return_status OUT NOCOPY varchar2,
132 px_trx_error_rec IN OUT NOCOPY csi_datastructures_pub.transaction_error_rec);
133
134 -- Moved the check and break routine to process txn pvt to avoid circular dependancy introduced in that routine for bug 2373109 and also to not load rma receipt for Non RMA txns . shegde. Bug 2443204
135 /* Included this as part of fix for Bug : 2373109
136 This procedure is called from different places
137
138 PROCEDURE check_and_break_relation(
139 p_instance_id IN number,
140 p_csi_txn_rec IN OUT NOCOPY csi_datastructures_pub.transaction_rec,
141 x_return_status OUT NOCOPY varchar2);
142 End Of Inclusion for Bug : 2373109
143 */
144
145 END csi_rma_receipt_pub;