1 PACKAGE BODY INV_THIRD_PARTY_STOCK_CAD_PVT AS
2 -- $Header: INVCADVB.pls 115.5 2002/12/20 00:03:52 pseshadr noship $
3 --+=======================================================================+
4 --| Copyright (c) 2002 Oracle Corporation |
5 --| Redwood Shores, CA, USA |
6 --| All rights reserved. |
7 --+=======================================================================+
8 --| FILENAME |
9 --| INVCADVB.pls |
10 --| |
11 --| DESCRIPTION |
12 --| Create Consumption Advice Concurrent Program |
13 --| |
14 --| PROCEDURE LIST |
15 --| Update_Consumption |
16 --| Consumption_Txn_Manager |
17 --| Load Consumption |
18 --| Load_Summarized_Quantity |
19 --| Delete Record |
20 --| Batch Allocation |
21 --| Submit Worker |
22 --| Wait_For_All_Workers |
23 --| Wait_For_Worker |
24 --| Has_Worker_Completed |
25 --| Generate_Batch_Id |
26 --| Generate_Log |
27 --| Log |
28 --| Log_Initialize |
29 --| Cons_Txn_Worker |
30 --| |
31 --| HISTORY |
32 --| 11/29/02 David Herring Created procedure |
33 --+========================================================================
34
35 --===================
36 -- GLOBALS
37 --===================
38
39 G_PKG_NAME CONSTANT VARCHAR2(30) := 'INV_THIRD_PARTY_STOCK_CAD_PVT';
40 g_submit_failure_exc EXCEPTION;
41
42 --===================
43 -- PRIVATE PROCEDURES
44 --===================
45
46 --========================================================================
47 -- PROCEDURE : Update_Consumption PRIVATE
48 -- PARAMETERS:
49 -- p_consumption_po_header_id PO Header Id
50 -- p_consumption_release_id Release id
51 -- p_error_code Error code if any
52 -- p_batch_id batch id from concurrent pgm
53 -- p_consumption_processed_flag E if error,else Y
54 -- p_accrual_account_id Accrual account
55 -- p_variance_account_id Variance account
56 -- p_charg_account_id Charge account
57 -- COMMENT : Update mtl_consumption_transactions table
58 -- This procedure is called by the Create_Consumption_Advice
59 -- procedures after creation of the
60 -- document. Update the table with the appropriate release
61 -- info or the po_header info.
62 --========================================================================
63 PROCEDURE Update_Consumption
64 ( p_consumption_po_header_id IN NUMBER
65 , p_consumption_release_id IN NUMBER
66 , p_error_code IN VARCHAR2
67 , p_batch_id IN NUMBER
68 , p_transaction_source_id IN NUMBER
69 , p_consumption_processed_flag IN VARCHAR2
70 , p_accrual_account_id IN NUMBER
71 , p_variance_account_id IN NUMBER
72 , p_charge_account_id IN NUMBER
73 )
74 IS
75 BEGIN
76 NULL;
77 END Update_Consumption;
78
79
80
81 --========================================================================
82 -- PROCEDURE : Consumption_Transaction_Work PRIVATE
83 -- COMMENT : This procedure will copy all the records of a context batch
84 -- from MTL_CONSUMPTION_TRANSACTIONS to
85 -- MTL_CONSUMPTION_TRANSACTIONS_TEMP
86 -- summarize the net quantity and call the create consumption
87 -- advice procedure
88 --=========================================================================
89 PROCEDURE cons_txn_work
90 ( x_retcode OUT NOCOPY VARCHAR2
91 , p_batch_id IN NUMBER
92 )
93 IS
94
95 BEGIN
96
97 x_retcode := FND_API.G_RET_STS_SUCCESS;
98
99 END cons_txn_work;
100
101
102 --========================================================================
103 -- PROCEDURE : Consumption_Txn_Manager PUBLIC
104 -- COMMENT : This procedure will assign each unprocessed record in
105 -- MTL_CONSUMPTION_TRANSACTIONS to a batch and then call the
106 -- Consumption_Transaction_Worker for that batch. The manager
107 -- will continue until all records
108 -- in MTL_CONSUMPTION_TRANSACTIONS
109 -- have been assigned to a batch.
110 --=========================================================================
111 PROCEDURE consumption_txn_manager
112 ( x_retcode OUT NOCOPY VARCHAR2
113 , p_batch_size IN NUMBER
114 , p_max_workers IN NUMBER
115 , p_vendor_site_id IN NUMBER
116 , p_inventory_item_id IN NUMBER
117 , p_organization_id IN NUMBER
118 )
119 IS
120
121
122 BEGIN
123
124 x_retcode := FND_API.G_RET_STS_SUCCESS;
125
126 END consumption_txn_manager;
127
128 END INV_THIRD_PARTY_STOCK_CAD_PVT;