DBA Data[Home] [Help]

PACKAGE BODY: APPS.INV_THIRD_PARTY_STOCK_CAD_PVT

Source


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;