DBA Data[Home] [Help]

PACKAGE: APPS.CSI_RMA_RECEIPT_PUB

Source


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;