1 PACKAGE RCV_CreateAccounting_PVT AUTHID CURRENT_USER AS
2 /* $Header: RCVVACCS.pls 120.2.12010000.2 2008/11/10 14:39:44 mpuranik ship $ */
3
4 -- Table Type definitions
5 TYPE RCV_AE_REC_TYPE IS RECORD (
6 ACCOUNTING_EVENT_ID NUMBER,
7 EVENT_TYPE_ID NUMBER,
8 RCV_TRANSACTION_ID NUMBER,
9 GLOBAL_PROC_FLAG VARCHAR2(1),
10 DOC_NUMBER VARCHAR2(20),
11 DOC_HEADER_ID NUMBER,
12 DOC_DISTRIBUTION_ID NUMBER,
13 ITEM_DESCRIPTION VARCHAR2(240),
14 ORG_ID NUMBER,
15 ORGANIZATION_ID NUMBER,
16 SET_OF_BOOKS_ID NUMBER,
17 ACTUAL_FLAG VARCHAR2(1),
18 UNIT_PRICE NUMBER,
19 PRIOR_UNIT_PRICE NUMBER,
20 TRANSACTION_AMOUNT NUMBER,
21 PRIMARY_QUANTITY NUMBER,
22 ACCOUNTED_DR NUMBER,
23 ACCOUNTED_CR NUMBER,
24 ENTERED_CR NUMBER,
25 ENTERED_DR NUMBER,
26 NR_TAX NUMBER,
27 REC_TAX NUMBER,
28 ACCOUNTED_REC_TAX NUMBER,
29 ACCOUNTED_NR_TAX NUMBER,
30 ENTERED_REC_TAX NUMBER,
31 ENTERED_NR_TAX NUMBER,
32 CURRENCY_CODE VARCHAR2(15),
33 CURRENCY_CONVERSION_RATE NUMBER,
34 CURRENCY_CONVERSION_DATE DATE,
35 CURRENCY_CONVERSION_TYPE VARCHAR2(30),
36 TRANSACTION_DATE DATE,
37 DEBIT_ACCOUNT NUMBER,
38 CREDIT_ACCOUNT NUMBER,
39 DEBIT_LINE_TYPE VARCHAR2(30),
40 CREDIT_LINE_TYPE VARCHAR2(30),
41 PROCUREMENT_ORG_FLAG VARCHAR2(1),
42 INVENTORY_ITEM_ID NUMBER,
43 USSGL_TRANSACTION_CODE VARCHAR2(32),
44 GL_GROUP_ID NUMBER,
45 CREATED_BY NUMBER,
46 LAST_UPDATED_BY NUMBER,
47 LAST_UPDATE_LOGIN NUMBER,
48 REQUEST_ID NUMBER,
49 PROGRAM_APPLICATION_ID NUMBER,
50 PROGRAM_ID NUMBER,
51 /* Support for Landed Cost Management */
52 LDD_COST_ABS_ENTERED NUMBER,
53 LDD_COST_ABS_ACCOUNTED NUMBER,
54 LCM_ACCOUNT_ID NUMBER,
55 UNIT_LANDED_COST NUMBER
56 );
57
58 -- Miscellaneous GL Information for Journal Import Process
59 TYPE RCV_AE_GLINFO_REC_TYPE IS RECORD (
60 APPLICATION_ID NUMBER,
61 PERIOD_NAME VARCHAR2(15),
62 CHART_OF_ACCOUNTS_ID NUMBER,
63 SET_OF_BOOKS_ID NUMBER,
64 CURRENCY_CODE VARCHAR2(15),
65 CURRENCY_PRECISION NUMBER,
66 MIN_ACCT_UNIT NUMBER,
67 USER_JE_SOURCE_NAME VARCHAR2(25),
68 USER_JE_CATEGORY_NAME VARCHAR2(25),
69 ENCUMBRANCE_TYPE_ID NUMBER,
70 PURCH_ENCUMBRANCE_FLAG VARCHAR2(1)
71 );
72
73 -- Currency Information
74 TYPE RCV_CURR_REC_TYPE IS RECORD (
75 DOCUMENT_CURRENCY VARCHAR2(15),
76 FUNCTIONAL_CURRENCY VARCHAR2(15),
77 MIN_ACCT_UNIT_DOC NUMBER,
78 MIN_ACCT_UNIT_FUNC NUMBER,
79 PRECISION_DOC NUMBER,
80 PRECISION_FUNC NUMBER,
81 CURRENCY_CONVERSION_TYPE VARCHAR2(30),
82 CURRENCY_CONVERSION_RATE NUMBER,
83 CURRENCY_CONVERSION_DATE DATE
84 );
85
86 -----------------------------------------------------------------------------------
87 -- Start of Comments
88 -- API name : Create_AccountingEntry
89 -- Type : Private
90 -- Pre-reqs :
91 -- Function : To create the accounting entries for an accounting event
92 -- in RCV_RECEIVING_SUBLEDGER and post the entries to GL
93 -- Parameters :
94 -- IN : p_api_version IN NUMBER Required
95 -- p_init_msg_list IN VARCHAR2 Optional
96 -- Default = FND_API.G_FALSE
97 -- p_commit IN VARCHAR2 Optional
98 -- Default = FND_API.G_FALSE
99 -- p_validation_level IN NUMBER Optional
100 -- Default = FND_API.G_VALID_LEVEL_FULL
101 -- p_accounting_event_id IN NUMBER Required
102 -- p_lcm_flag IN VARCHAR2 Optional
103 --
104 -- OUT : x_return_status OUT VARCHAR2(1)
105 -- x_msg_count OUT NUMBER
106 -- x_msg_data OUT VARCHAR2(2000)
107 -- Version :
108 -- Initial version 1.0
109 --
110 -- Notes :
111 -- This API is called by RCV_AccEvents_GRP.Create_AccoutingEvent
112 -- to create the distributions in the sub ledger table,
113 -- RCV_RECEIVING_SUB_LEDGER, corresponding to the event that is
114 -- seeded in RCV_ACCOUNTING_EVENTS. The entries are also posted
115 -- to the GL interface table, GL_INTERFACE.
116 -- End of Comments
117 ---------------------------------------------------------------------------------------
118 PROCEDURE Create_AccountingEntry(
119 p_api_version IN NUMBER,
120 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
121 p_commit IN VARCHAR2 := FND_API.G_FALSE,
122 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
123 x_return_status OUT NOCOPY VARCHAR2,
124 x_msg_count OUT NOCOPY NUMBER,
125 x_msg_data OUT NOCOPY VARCHAR2,
126 p_accounting_event_id IN NUMBER,
127 /* Support for Landed Cost Management */
128 p_lcm_flag IN VARCHAR2 := 'N'
129 );
130
131 ----------------------------------------------------------------------------------
132 -- API Name : Get_AccountingLineType
133 -- Type : Private
134 -- Function : The API returns the Accounting Line Type for an accounting
135 -- event. It returns the line types for both Credit and Debit
136 -- lines.
137 -- Parameters :
138 -- IN : p_event_type_id : Event Type (RCV_SeedEvent_PVT)
139 -- p_parent_txn_type : Transaction Type of the Parent of the
140 -- current event
141 -- p_proc_org_flag : Whether the Organization where accounting
142 -- event occured is facing the supplier
143 -- p_one_time_item_flag: Whether the item associated with the
144 -- event is a one-time item
145 -- p_destination_type : Destination_Type_Code for the Event
146 -- ('Inventory', 'Shop Floor', 'Expense')
147 -- p_global_proc_flag : Whether event has been created in a
148 -- global procurement scenario
149 -- OUT : x_debit_line_type : Accounting Line Type for Debit
150 -- x_credit_line_type : Accounting Line Type for Credit
151 ----------------------------------------------------------------------------------
152 PROCEDURE Get_AccountingLineType(
153 p_api_version IN NUMBER,
154 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
155 p_commit IN VARCHAR2 := FND_API.G_FALSE,
156 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
157 x_return_status OUT NOCOPY VARCHAR2,
158 x_msg_count OUT NOCOPY NUMBER,
159 x_msg_data OUT NOCOPY VARCHAR2,
160 p_event_type_id IN NUMBER,
161 p_parent_txn_type IN VARCHAR2,
162 p_proc_org_flag IN VARCHAR2,
163 p_one_time_item_flag IN VARCHAR2,
164 p_destination_type IN VARCHAR2,
165 p_global_proc_flag IN VARCHAR2,
166 x_debit_line_type OUT NOCOPY VARCHAR2,
167 x_credit_line_type OUT NOCOPY VARCHAR2
168 );
169
170
171 ----------------------------------------------------------------------------------
172 -- API Name : Insert_SubLedgerLines
173 -- Type : Private
174 -- Function : The API inserts an entry in RCV_RECEIVING_SUB_LEDGER
175 -- depending on information passed in P_RCV_AE_LINE and
176 -- P_GLINFO structures
177 -- Parameters :
178 -- IN : P_RCV_AE_LINE : Structure containing the accounting information
179 -- (Credit/Debit) for an event
180 -- P_GLINFO : Structure containing the GL Information
181 -- for the event
182 -- OUT :
183 ----------------------------------------------------------------------------------
184 PROCEDURE Insert_SubLedgerLines(
185 p_api_version IN NUMBER,
186 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
187 p_commit IN VARCHAR2 := FND_API.G_FALSE,
188 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
189 x_return_status OUT NOCOPY VARCHAR2,
190 x_msg_count OUT NOCOPY NUMBER,
191 x_msg_data OUT NOCOPY VARCHAR2,
192 p_rcv_ae_line IN RCV_AE_REC_TYPE,
193 p_glinfo IN RCV_AE_GLINFO_REC_TYPE
194 );
195
196 ----------------------------------------------------------------------------------
197 -- API Name : Get_GLInformation
198 -- Type : Private
199 -- Function : The Function returns information from GL tables
200 -- into a structure of type RCV_AE_GLINFO_REC_TYPE. This
201 -- information is generated for each event since events
202 -- could possibly be in different Operating Units, Sets of Books
203 -- Parameters :
204 -- IN : p_event_date: Event Date
205 -- p_event_doc_num : Document Number for the Event (PO Number)
206 -- p_event_type_id : Event Type ID (RCV_SeedEvents_PVT lists
207 -- all such events
208 -- p_set_of_books_id:Set of Books ID
209 -- OUT :
210 ----------------------------------------------------------------------------------
211
212 PROCEDURE Get_GLInformation(
213 p_api_version IN NUMBER,
214 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
215 p_commit IN VARCHAR2 := FND_API.G_FALSE,
216 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
217 x_return_status OUT NOCOPY VARCHAR2,
218 x_msg_count OUT NOCOPY NUMBER,
219 x_msg_data OUT NOCOPY VARCHAR2,
220 p_event_date IN DATE,
221 p_event_doc_num IN VARCHAR2,
222 p_event_type_id IN NUMBER,
223 p_set_of_books_id IN NUMBER,
224 x_gl_information OUT NOCOPY RCV_AE_GLINFO_REC_TYPE
225 );
226 END RCV_CreateAccounting_PVT;