[Home] [Help]
PACKAGE: APPS.GML_PO_GLDIST
Source
1 PACKAGE GML_PO_GLDIST AUTHID CURRENT_USER AS
2 /* $Header: GMLDISTS.pls 115.9 2002/12/04 19:03:16 gmangari ship $ */
3
4 FUNCTION calc_dist_amount_aqui RETURN NUMBER;
5 PROCEDURE calc_dist_amount ;
6
7 PROCEDURE receive_data (V_doc_type VARCHAR2, V_pos_id NUMBER,
8 V_line_id NUMBER, V_orgn_code VARCHAR2,
9 V_po_date DATE, V_shipvend_id NUMBER,
10 V_base_currency VARCHAR2,
11 V_billing_currency VARCHAR2,
12 V_to_whse VARCHAR2, V_line_no NUMBER,
13 V_item_no VARCHAR2,
14 V_extended_price NUMBER,
15 V_project VARCHAR2, V_order_qty1 NUMBER,
16 V_order_um1 VARCHAR2, V_gl_item_id NUMBER,
17 V_mul_div_sign NUMBER,
18 V_exchange_rate NUMBER,
19 V_price NUMBER, V_action NUMBER,
20 V_single_aqui BOOLEAN,
21 retcode IN OUT NOCOPY NUMBER,
22 V_transaction_type IN VARCHAR2);
23
24 PROCEDURE process_trans (V_type VARCHAR2, retcode IN OUT NOCOPY NUMBER);
25 FUNCTION default_mapping RETURN NUMBER;
26 FUNCTION get_acctg_unit_no RETURN VARCHAR2;
27 PROCEDURE get_acct_no(V_acct_no OUT NOCOPY VARCHAR2, V_acct_desc OUT NOCOPY VARCHAR2);
28
29 /* Constant values.*/
30 GL$SE_NEW_RECV NUMBER DEFAULT 10010;
31 GL$AT_INV NUMBER DEFAULT 1500;
32 GL$AT_AAP NUMBER DEFAULT 3100; /* Batch Close Variance.*/
33 GL$AT_PPV NUMBER DEFAULT 6100;
34 GL$AT_EXP NUMBER DEFAULT 5100;
35 GL$AT_AAC NUMBER DEFAULT 3150;
36 GL$AT_ACV NUMBER DEFAULT 6150;
37 GL$AT_ERV NUMBER DEFAULT 5500;
38 SY$DEFAULT_CURR VARCHAR2(5) DEFAULT 'USD'; /* This has to be modified accordingly.*/
39
40
41
42 /* Package Variables.*/
43 P_row_num NUMBER;
44 P_row_num_upd NUMBER;
45 P_aqui_analysis_code VARCHAR2(5);
46 P_aqui_cmpntcls_id NUMBER;
47 P_cost_amount NUMBER;
48 P_itemglclass VARCHAR2(20);
49 P_acctg_unit_id NUMBER;
50 P_base_currency VARCHAR2(5);
51 P_default_currency VARCHAR2(5);
52 P_billing_currency VARCHAR2(5);
53 P_mul_div_sign VARCHAR2(5);
54 P_exchange_rate NUMBER;
55 P_exch_date DATE;
56 P_line_no NUMBER;
57 P_line_id NUMBER;
58 P_non_inv_ind NUMBER;
59 P_gl_class VARCHAR2(50);
60 P_vend_gl_class VARCHAR2(50);
61 P_co_code VARCHAR2(6);
62 P_whse_co_code sy_orgn_mst.co_code%TYPE; /* RVK B1394532 */
63 P_whse_orgn_code sy_orgn_mst.orgn_code%TYPE; /* RVK B1394532 */
64 P_cust_id NUMBER;
65 P_reason_code VARCHAR2(10);
66 P_cust_gl_class VARCHAR2(20);
67 P_routing_id NUMBER;
68 P_charge_id NUMBER;
69 P_taxauth_id NUMBER;
70 P_aqui_cost_id NUMBER ;
71 P_resources VARCHAR2(10);
72 P_cost_cmpntcls_id NUMBER;
73 P_cost_analysis_code VARCHAR2(5);
74 P_order_type VARCHAR2(5);
75 P_sub_event_type NUMBER(10) DEFAULT 10010;
76 P_doc_type VARCHAR2(5);
77 P_pos_id NUMBER;
78 P_orgn_code VARCHAR2(4);
79 P_po_date DATE;
80 P_shipvend_id NUMBER;
81 P_to_whse VARCHAR2(5);
82 P_item_no VARCHAR2(70);
83 P_extended_price NUMBER;
84 P_project VARCHAR2(16) ;
85 P_order_qty1 NUMBER;
86 P_order_um1 VARCHAR2(10);
87 P_gl_item_id NUMBER(10);
88 P_acct_id NUMBER (10);
89 P_acctg_unit_no VARCHAR2( 270);
90 P_acct_no VARCHAR2(270);
91 P_acct_desc VARCHAR2(270);
92 P_po_cost NUMBER;
93 P_tmp_po_cost NUMBER;
94 P_tmp_amt NUMBER;
95 P_tmp_amt2 NUMBER;
96 P_amount_trans NUMBER;
97 P_amount_base NUMBER;
98 P_amount_trans_aqui NUMBER;
99 P_amount_base_aqui NUMBER;
100 P_acct_ttl_num NUMBER;
101 P_incl_ind NUMBER;
102 P_type VARCHAR2(10);
103 P_fiscal_year NUMBER;
104 P_period NUMBER;
105 P_gl_posted_ind NUMBER;
106 P_ledger_code VARCHAR2(70);
107 P_recv_seq_no NUMBER;
108 P_precision NUMBER;
109 P_action NUMBER;
110 P_tot_amount_inv NUMBER;
111 P_tot_amount_aap NUMBER;
112 P_tot_amount_inv_aqui NUMBER;
113 P_tot_amount_aap_aqui NUMBER;
114
115 /*Bug# 1324319 Added code to pass the AAP and PPV accts generated at the OPM side
116 over to the APPS side.Just added one paramerter passed to receive_data procedure.
117 P_transaction_type */
118
119 P_transaction_type VARCHAR2(100);
120
121 /* 11.Nov.98.. Added an extra variable for delete_mark.*/
122 P_delete_mark NUMBER DEFAULT 0;
123
124 /* From glcommon.pll*/
125 P_sobname gl_plcy_mst.set_of_books_name%TYPE;
126 P_periodname VARCHAR2(15);
127 P_periodstatus VARCHAR2(1);
128 P_periodyear NUMBER(5);
129 P_periodnumber NUMBER(15);
130 P_quarternum NUMBER(15);
131 P_fiscal_year_desc VARCHAR2(240);
132 P_statuscode NUMBER(19);
133 P_period_start_date DATE;
134 P_period_end_date DATE;
135 P_calendar_name VARCHAR2(15);
136 P_period_type VARCHAR2(15);
137
138 FUNCTION get_exchg_rate(V_psource_type NUMBER, V_po_date DATE,
139 V_default_currency VARCHAR2 ,
140 V_billing_currency VARCHAR2 ) RETURN NUMBER;
141
142 PROCEDURE set_data (retcode IN OUT NOCOPY NUMBER);
143
144 PROCEDURE poglded2_check_new_aqui(retcode IN OUT NOCOPY NUMBER);
145
146 TYPE t_gltitlestable IS TABLE OF NUMBER
147 INDEX BY BINARY_INTEGER;
148
149 v_gltitles t_gltitlestable;
150
151 TYPE t_cmpntclstable IS TABLE OF NUMBER
152 INDEX BY BINARY_INTEGER;
153
154 v_cmpntcls t_cmpntclstable;
155
156 TYPE t_analysiscodetable IS TABLE OF VARCHAR2(4)
157 INDEX BY BINARY_INTEGER;
158
159 v_analysiscode t_analysiscodetable;
160
161 PROCEDURE load_acct_titles(v_type VARCHAR2,
162 v_item_id NUMBER,
163 v_co_code VARCHAR2,
164 v_non_inv_ind NUMBER,
165 v_to_whse IN VARCHAR2,
166 v_trans_date IN DATE,
167 v_include_ind IN NUMBER,
168 v_row_num OUT NOCOPY NUMBER,
169 v_status OUT NOCOPY NUMBER,
170 v_gltitles OUT NOCOPY t_gltitlestable,
171 v_cmpntcls OUT NOCOPY t_cmpntclstable,
172 v_analysiscode OUT NOCOPY t_analysiscodetable);
173
174
175 PROCEDURE delete_aqui_costs;
176
177
178 /* From glcommon.pll*/
179 FUNCTION get_orafin_sob (V_co_code IN VARCHAR2, V_err_ind IN NUMBER )
180 RETURN NUMBER;
181 FUNCTION get_ofperiod_info(V_co_code IN VARCHAR2, V_err_ind IN NUMBER,
182 V_sobname VARCHAR2, V_calendar_name VARCHAR2,V_period_type VARCHAR2,
183 V_gl_period NUMBER,V_fiscal_year NUMBER,V_gl_date DATE DEFAULT NULL)
184 RETURN NUMBER;
185
186 /*Bug# 1324319 Added code to pass the AAP and PPV accts generated at the OPM side
187 over to the APPS side.Just added one paramerter passed to receive_data procedure.
188 P_transaction_type */
189 TYPE A_segment IS TABLE OF VARCHAR(200) INDEX BY BINARY_INTEGER;
190
191 PROCEDURE combination_id( v_co_code IN VARCHAR2,
192 v_acct_id IN NUMBER,
193 v_acctg_unit_id IN NUMBER,
194 v_combination_id IN OUT NOCOPY NUMBER);
195
196
197 PROCEDURE parse_account( v_co_code IN VARCHAR2,
198 v_account IN VARCHAR2,
199 v_type IN NUMBER,
200 v_offset IN NUMBER,
201 v_segment IN OUT NOCOPY fnd_flex_ext.SegmentArray,
202 V_no_of_seg IN OUT NOCOPY NUMBER );
203
204
205 /*Procedure to update the combination id on the apps side in the table PO_DISTRIBUTIONS_ALL */
206 PROCEDURE update_accounts_orcl(v_po_id IN NUMBER,
207 v_line_id IN NUMBER,
208 v_orgn_code IN VARCHAR2,
209 v_acct_ttl_num IN NUMBER,
210 v_combination_id IN NUMBER);
211
212 /*End 1324319 */
213
214 END GML_PO_GLDIST;