1 PACKAGE FA_MODIFY_DISTRIBUTIONS_PKG as
2 /* $Header: FAMDSTS.pls 120.3 2002/11/12 08:02:25 glchen ship $ */
3
4 -- GLOBAL VARIABLES
5
6 -- asgn_line_rec : Record to store one distribution
7
8 TYPE asgn_line_rec IS RECORD
9 ( row_id ROWID,
10 dist_id NUMBER(15),
11 asset_id NUMBER(15) DEFAULT NULL,
12 units NUMBER, -- units assigned
13 transaction_date_entered DATE,
14 date_effective DATE,
15 ccid NUMBER(15),
16 location_id NUMBER(15),
17 th_id_in NUMBER(15),
18 assigned_to NUMBER(15),
19 trans_units NUMBER,
20 record_status VARCHAR2(6),
21 -- record_status = 'UPDATE', 'INSERT' or 'DELETE'. Informs what
22 -- SQL transaction has to be performed on this distribution line
23 -- (non-database field, added for Transfer transaction.)
24 attribute1 VARCHAR2(150),
25 attribute2 VARCHAR2(150),
26 attribute3 VARCHAR2(150),
27 attribute4 VARCHAR2(150),
28 attribute5 VARCHAR2(150),
29 attribute6 VARCHAR2(150),
30 attribute7 VARCHAR2(150),
31 attribute8 VARCHAR2(150),
32 attribute9 VARCHAR2(150),
33 attribute10 VARCHAR2(150),
34 attribute11 VARCHAR2(150),
35 attribute12 VARCHAR2(150),
36 attribute13 VARCHAR2(150),
37 attribute14 VARCHAR2(150),
38 attribute15 VARCHAR2(150),
39 attribute_category_code VARCHAR2(30),
40 last_updated_by NUMBER(15),
41 last_update_date DATE,
42 last_update_login NUMBER(15)
43 );
44
45 -- asgn_line_tbl : A global table to store distribution lines
46
47 TYPE asgn_line_tbl IS TABLE OF asgn_line_rec
48 INDEX BY BINARY_INTEGER;
49
50 asgn_table asgn_line_tbl;
51
52 -- Global variable holding the number of asgn lines count
53 g_asgn_count NUMBER := 0;
54
55 --
56 -- Procedure load_asgn_table
57 --
58 -- Usage Called by client to load all distributions in the
59 -- global table asgn_line_tbl before calling the API
60 --
61 --
62
63 PROCEDURE load_asgn_table (
64 p_row_id IN ROWID default null,
65 p_dist_id IN NUMBER default null,
66 p_asset_id IN NUMBER default null,
67 p_units IN NUMBER,
68 p_transaction_date_entered IN DATE,
69 p_date_effective IN DATE,
70 p_ccid IN NUMBER,
71 p_location_id IN NUMBER,
72 p_th_id_in IN NUMBER,
73 p_assigned_to IN NUMBER,
74 p_trans_units IN NUMBER,
75 p_record_status IN VARCHAR2,
76 p_attribute1 IN VARCHAR2,
77 p_attribute2 IN VARCHAR2,
78 p_attribute3 IN VARCHAR2,
79 p_attribute4 IN VARCHAR2,
80 p_attribute5 IN VARCHAR2,
81 p_attribute6 IN VARCHAR2,
82 p_attribute7 IN VARCHAR2,
83 p_attribute8 IN VARCHAR2,
84 p_attribute9 IN VARCHAR2,
85 p_attribute10 IN VARCHAR2,
86 p_attribute11 IN VARCHAR2,
87 p_attribute12 IN VARCHAR2,
88 p_attribute13 IN VARCHAR2,
89 p_attribute14 IN VARCHAR2,
90 p_attribute15 IN VARCHAR2,
91 p_attribute_category_code IN VARCHAR2,
92 p_last_updated_by IN NUMBER,
93 p_last_update_date IN DATE,
94 p_last_update_login IN NUMBER
95 );
96
97 PROCEDURE modify_distributions(
98 P_api_version IN NUMBER,
99 P_init_msg_list IN VARCHAR2,
100 P_commit IN VARCHAR2,
101 P_validation_level IN NUMBER,
102 P_debug_flag IN VARCHAR2,
103 X_return_status OUT NOCOPY VARCHAR2,
104 X_msg_count OUT NOCOPY NUMBER,
105 X_msg_data OUT NOCOPY VARCHAR2
106 );
107
108 PROCEDURE insert_dist_table(
109 row_id IN ROWID,
110 asset_id IN NUMBER,
111 transfer_units IN NUMBER,
112 transaction_date_entered IN DATE,
113 from_dist_id IN NUMBER,
114 from_location_id IN NUMBER,
115 from_assigned_to IN NUMBER,
116 from_ccid IN NUMBER,
117 to_dist_id IN NUMBER,
118 to_location_id IN NUMBER,
119 to_assigned_to IN NUMBER,
120 to_ccid IN NUMBER,
121 attribute1 IN VARCHAR2,
122 attribute2 IN VARCHAR2,
123 attribute3 IN VARCHAR2,
124 attribute4 IN VARCHAR2,
125 attribute5 IN VARCHAR2,
126 attribute6 IN VARCHAR2,
127 attribute7 IN VARCHAR2,
128 attribute8 IN VARCHAR2,
129 attribute9 IN VARCHAR2,
130 attribute10 IN VARCHAR2,
131 attribute11 IN VARCHAR2,
132 attribute12 IN VARCHAR2,
133 attribute13 IN VARCHAR2,
134 attribute14 IN VARCHAR2,
135 attribute15 IN VARCHAR2,
136 attribute_category_code IN VARCHAR2,
137 post_batch_id IN NUMBER,
138 last_updated_by IN NUMBER,
139 last_update_date IN DATE,
140 last_update_login IN NUMBER
141 );
142
143 FUNCTION process_unit_adjustment(
144 p_api_version IN NUMBER,
145 p_init_msg_list IN VARCHAR2,
146 p_commit IN VARCHAR2,
147 p_validation_level IN NUMBER,
148 p_debug_flag IN VARCHAR2,
149 x_return_status OUT NOCOPY VARCHAR2,
150 x_msg_count OUT NOCOPY NUMBER,
151 x_msg_data OUT NOCOPY VARCHAR2,
152 book_type_code IN VARCHAR2,
153 asset_id IN NUMBER
154 ) RETURN VARCHAR2;
155
156 FUNCTION process_transfer(
157 p_api_version IN NUMBER,
158 p_init_msg_list IN VARCHAR2,
159 p_commit IN VARCHAR2,
160 p_validation_level IN NUMBER,
161 p_debug_flag IN VARCHAR2,
162 x_return_status OUT NOCOPY VARCHAR2,
163 x_msg_count OUT NOCOPY NUMBER,
164 x_msg_data OUT NOCOPY VARCHAR2,
165 book_type_code IN VARCHAR2,
166 asset_id IN NUMBER
167 ) RETURN VARCHAR2;
168
169
170 PROCEDURE get_header_info(
171 X_Asset_Id IN NUMBER,
172 X_Book_Type_Code IN VARCHAR2,
173 X_Transaction_Header_Id OUT NOCOPY NUMBER,
174 X_Transaction_Date_Entered OUT NOCOPY DATE,
175 X_Max_Transaction_Date OUT NOCOPY DATE,
176 X_Current_PC OUT NOCOPY NUMBER,
177 X_Calendar_Period_Open_Date OUT NOCOPY DATE,
178 X_Calendar_Period_Close_Date OUT NOCOPY DATE,
179 X_FY_Start_Date OUT NOCOPY DATE,
180 X_FY_End_Date OUT NOCOPY DATE,
181 X_return_status OUT NOCOPY VARCHAR2
182 );
183
184
185 FUNCTION check_if_corp_book(
186 book_type_code IN VARCHAR2
187 ) RETURN VARCHAR2;
188
189 FUNCTION check_location_ccid(
190 p_location_id IN NUMBER,
191 p_ccid_id IN NUMBER
192 ) RETURN VARCHAR2;
193
194
195 END FA_MODIFY_DISTRIBUTIONS_PKG;