[Home] [Help]
PACKAGE BODY: APPS.FUN_VENDOR_PVT_PKG
Source
1 PACKAGE BODY FUN_VENDOR_PVT_PKG AS
2 /* $Header: funvndrb.pls 120.0 2006/02/15 14:28:02 ashikuma noship $ */
3 --Using these record type declarations to copy values to and call AP APIs
4 p_vendor_rec_a AP_VENDOR_PUB_PKG.r_vendor_rec_type;
5 p_vendor_site_rec_a AP_VENDOR_PUB_PKG.r_vendor_site_rec_type;
6 -- This procedure is invoked indirectly from the Supplier-Customer Association creation page
7 -- through the rosetta-generated java and plsql packages
8 PROCEDURE Create_Vendor
9 ( p_api_version IN NUMBER,
10 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
11 p_commit IN VARCHAR2 := FND_API.G_FALSE,
12 p_validation_level IN NUMBER :=
13 FND_API.G_VALID_LEVEL_FULL,
14 x_return_status OUT NOCOPY VARCHAR2 ,
15 x_msg_count OUT NOCOPY NUMBER,
16 x_msg_data OUT NOCOPY VARCHAR2,
17 p_vendor_rec IN r_vendor_rec_type,
18 x_vendor_id OUT NOCOPY PO_VENDORS.VENDOR_ID%TYPE,
19 x_party_id OUT NOCOPY HZ_PARTIES.PARTY_ID%TYPE
20 ) IS
21 BEGIN
22 --Copying values between record types
23 p_vendor_rec_a.vendor_id :=p_vendor_rec.vendor_id;
24 p_vendor_rec_a.SEGMENT1 := p_vendor_rec.SEGMENT1 ;
25 p_vendor_rec_a.VENDOR_NAME := p_vendor_rec.VENDOR_NAME ;
26 p_vendor_rec_a.VENDOR_NAME_ALT := p_vendor_rec.VENDOR_NAME_ALT;
27 p_vendor_rec_a.SUMMARY_FLAG := p_vendor_rec.SUMMARY_FLAG ;
28 p_vendor_rec_a.ENABLED_FLAG := p_vendor_rec.ENABLED_FLAG;
29 p_vendor_rec_a.SEGMENT2 := p_vendor_rec.SEGMENT2;
30 p_vendor_rec_a.SEGMENT3 := p_vendor_rec.SEGMENT3;
31 p_vendor_rec_a.SEGMENT4 := p_vendor_rec.SEGMENT4;
32 p_vendor_rec_a.SEGMENT5 := p_vendor_rec.SEGMENT5;
33 p_vendor_rec_a.EMPLOYEE_ID := p_vendor_rec.EMPLOYEE_ID;
34 p_vendor_rec_a.VENDOR_TYPE_LOOKUP_CODE := p_vendor_rec.VENDOR_TYPE_LOOKUP_CODE;
35 p_vendor_rec_a.CUSTOMER_NUM := p_vendor_rec.CUSTOMER_NUM;
36 p_vendor_rec_a.ONE_TIME_FLAG := p_vendor_rec.ONE_TIME_FLAG;
37 p_vendor_rec_a.PARENT_VENDOR_ID := p_vendor_rec.PARENT_VENDOR_ID;
38 p_vendor_rec_a.MIN_ORDER_AMOUNT := p_vendor_rec.MIN_ORDER_AMOUNT;
39 p_vendor_rec_a.TERMS_ID := p_vendor_rec.TERMS_ID;
40 p_vendor_rec_a.SET_OF_BOOKS_ID := p_vendor_rec.SET_OF_BOOKS_ID;
41 p_vendor_rec_a.ALWAYS_TAKE_DISC_FLAG := p_vendor_rec.ALWAYS_TAKE_DISC_FLAG;
42 p_vendor_rec_a.PAY_DATE_BASIS_LOOKUP_CODE := p_vendor_rec.PAY_DATE_BASIS_LOOKUP_CODE;
43 p_vendor_rec_a.PAY_GROUP_LOOKUP_CODE := p_vendor_rec.PAY_GROUP_LOOKUP_CODE;
44 p_vendor_rec_a.PAYMENT_PRIORITY := p_vendor_rec.PAYMENT_PRIORITY;
45 p_vendor_rec_a.INVOICE_CURRENCY_CODE := p_vendor_rec.INVOICE_CURRENCY_CODE;
46 p_vendor_rec_a.PAYMENT_CURRENCY_CODE := p_vendor_rec.PAYMENT_CURRENCY_CODE;
47 p_vendor_rec_a.INVOICE_AMOUNT_LIMIT := p_vendor_rec.INVOICE_AMOUNT_LIMIT;
48 p_vendor_rec_a.HOLD_ALL_PAYMENTS_FLAG := p_vendor_rec.HOLD_ALL_PAYMENTS_FLAG;
49 p_vendor_rec_a.HOLD_FUTURE_PAYMENTS_FLAG := p_vendor_rec.HOLD_FUTURE_PAYMENTS_FLAG;
50 p_vendor_rec_a.HOLD_REASON := p_vendor_rec.HOLD_REASON;
51 p_vendor_rec_a.TYPE_1099 := p_vendor_rec.TYPE_1099;
52 p_vendor_rec_a.WITHHOLDING_STATUS_LOOKUP_CODE := p_vendor_rec.WITHHOLDING_STATUS_LOOKUP_CODE;
53 p_vendor_rec_a.WITHHOLDING_START_DATE := p_vendor_rec.WITHHOLDING_START_DATE;
54 p_vendor_rec_a.ORGANIZATION_TYPE_LOOKUP_CODE := p_vendor_rec.ORGANIZATION_TYPE_LOOKUP_CODE;
55 p_vendor_rec_a.START_DATE_ACTIVE := p_vendor_rec.START_DATE_ACTIVE;
56 p_vendor_rec_a.END_DATE_ACTIVE := p_vendor_rec.END_DATE_ACTIVE;
57 p_vendor_rec_a.MINORITY_GROUP_LOOKUP_CODE := p_vendor_rec.MINORITY_GROUP_LOOKUP_CODE;
58 p_vendor_rec_a.WOMEN_OWNED_FLAG := p_vendor_rec.WOMEN_OWNED_FLAG;
59 p_vendor_rec_a.SMALL_BUSINESS_FLAG := p_vendor_rec.SMALL_BUSINESS_FLAG;
60 p_vendor_rec_a.HOLD_FLAG := p_vendor_rec.HOLD_FLAG;
61 p_vendor_rec_a.PURCHASING_HOLD_REASON := p_vendor_rec.PURCHASING_HOLD_REASON;
62 p_vendor_rec_a.HOLD_BY := p_vendor_rec.HOLD_BY;
63 p_vendor_rec_a.HOLD_DATE := p_vendor_rec.HOLD_DATE;
64 p_vendor_rec_a.TERMS_DATE_BASIS := p_vendor_rec.TERMS_DATE_BASIS;
65 p_vendor_rec_a.INSPECTION_REQUIRED_FLAG := p_vendor_rec.INSPECTION_REQUIRED_FLAG;
66 p_vendor_rec_a.RECEIPT_REQUIRED_FLAG := p_vendor_rec.RECEIPT_REQUIRED_FLAG;
67 p_vendor_rec_a.QTY_RCV_TOLERANCE := p_vendor_rec.QTY_RCV_TOLERANCE;
68 p_vendor_rec_a.QTY_RCV_EXCEPTION_CODE := p_vendor_rec.QTY_RCV_EXCEPTION_CODE;
69 p_vendor_rec_a.ENFORCE_SHIP_TO_LOCATION_CODE := p_vendor_rec.ENFORCE_SHIP_TO_LOCATION_CODE;
70 p_vendor_rec_a.DAYS_EARLY_RECEIPT_ALLOWED := p_vendor_rec.DAYS_EARLY_RECEIPT_ALLOWED;
71 p_vendor_rec_a.DAYS_LATE_RECEIPT_ALLOWED := p_vendor_rec.DAYS_LATE_RECEIPT_ALLOWED;
72 p_vendor_rec_a.RECEIPT_DAYS_EXCEPTION_CODE := p_vendor_rec.RECEIPT_DAYS_EXCEPTION_CODE;
73 p_vendor_rec_a.RECEIVING_ROUTING_ID := p_vendor_rec.RECEIVING_ROUTING_ID;
74 p_vendor_rec_a.ALLOW_SUBSTITUTE_RECEIPTS_FLAG := p_vendor_rec.ALLOW_SUBSTITUTE_RECEIPTS_FLAG;
75 p_vendor_rec_a.ALLOW_UNORDERED_RECEIPTS_FLAG := p_vendor_rec.ALLOW_UNORDERED_RECEIPTS_FLAG;
76 p_vendor_rec_a.HOLD_UNMATCHED_INVOICES_FLAG := p_vendor_rec.HOLD_UNMATCHED_INVOICES_FLAG;
77 p_vendor_rec_a.TAX_VERIFICATION_DATE := p_vendor_rec.TAX_VERIFICATION_DATE;
78 p_vendor_rec_a.NAME_CONTROL := p_vendor_rec.NAME_CONTROL;
79 p_vendor_rec_a.STATE_REPORTABLE_FLAG := p_vendor_rec.STATE_REPORTABLE_FLAG;
80 p_vendor_rec_a.FEDERAL_REPORTABLE_FLAG := p_vendor_rec.FEDERAL_REPORTABLE_FLAG;
81 p_vendor_rec_a.ATTRIBUTE_CATEGORY := p_vendor_rec.ATTRIBUTE_CATEGORY;
82 p_vendor_rec_a.ATTRIBUTE1 := p_vendor_rec.ATTRIBUTE1;
83 p_vendor_rec_a.ATTRIBUTE2 := p_vendor_rec.ATTRIBUTE2;
84 p_vendor_rec_a.ATTRIBUTE3 := p_vendor_rec.ATTRIBUTE3;
85 p_vendor_rec_a.ATTRIBUTE4 := p_vendor_rec.ATTRIBUTE4;
86 p_vendor_rec_a.ATTRIBUTE5 := p_vendor_rec.ATTRIBUTE5;
87 p_vendor_rec_a.ATTRIBUTE6 := p_vendor_rec.ATTRIBUTE6;
88 p_vendor_rec_a.ATTRIBUTE7 := p_vendor_rec.ATTRIBUTE7;
89 p_vendor_rec_a.ATTRIBUTE8 := p_vendor_rec.ATTRIBUTE8;
90 p_vendor_rec_a.ATTRIBUTE9 := p_vendor_rec.ATTRIBUTE9;
91 p_vendor_rec_a.ATTRIBUTE10 := p_vendor_rec.ATTRIBUTE10;
92 p_vendor_rec_a.ATTRIBUTE11 := p_vendor_rec.ATTRIBUTE11;
93 p_vendor_rec_a.ATTRIBUTE12 := p_vendor_rec.ATTRIBUTE12;
94 p_vendor_rec_a.ATTRIBUTE13 := p_vendor_rec.ATTRIBUTE13;
95 p_vendor_rec_a.ATTRIBUTE14 := p_vendor_rec.ATTRIBUTE14;
96 p_vendor_rec_a.ATTRIBUTE15 := p_vendor_rec.ATTRIBUTE15;
97 p_vendor_rec_a.AUTO_CALCULATE_INTEREST_FLAG := p_vendor_rec.AUTO_CALCULATE_INTEREST_FLAG;
98 p_vendor_rec_a.VALIDATION_NUMBER := p_vendor_rec.VALIDATION_NUMBER;
99 p_vendor_rec_a.EXCLUDE_FREIGHT_FROM_DISCOUNT := p_vendor_rec.EXCLUDE_FREIGHT_FROM_DISCOUNT;
100 p_vendor_rec_a.TAX_REPORTING_NAME := p_vendor_rec.TAX_REPORTING_NAME;
101 p_vendor_rec_a.CHECK_DIGITS := p_vendor_rec.CHECK_DIGITS;
102 p_vendor_rec_a.ALLOW_AWT_FLAG := p_vendor_rec.ALLOW_AWT_FLAG;
103 p_vendor_rec_a.AWT_GROUP_ID := p_vendor_rec.AWT_GROUP_ID;
104 p_vendor_rec_a.AWT_GROUP_NAME := p_vendor_rec.AWT_GROUP_NAME;
105 p_vendor_rec_a.GLOBAL_ATTRIBUTE1 := p_vendor_rec.GLOBAL_ATTRIBUTE1;
106 p_vendor_rec_a.GLOBAL_ATTRIBUTE2 := p_vendor_rec.GLOBAL_ATTRIBUTE2;
107 p_vendor_rec_a.GLOBAL_ATTRIBUTE3 := p_vendor_rec.GLOBAL_ATTRIBUTE3;
108 p_vendor_rec_a.GLOBAL_ATTRIBUTE4 := p_vendor_rec.GLOBAL_ATTRIBUTE4;
109 p_vendor_rec_a.GLOBAL_ATTRIBUTE5 := p_vendor_rec.GLOBAL_ATTRIBUTE5;
110 p_vendor_rec_a.GLOBAL_ATTRIBUTE6 := p_vendor_rec.GLOBAL_ATTRIBUTE6;
111 p_vendor_rec_a.GLOBAL_ATTRIBUTE7 := p_vendor_rec.GLOBAL_ATTRIBUTE7;
112 p_vendor_rec_a.GLOBAL_ATTRIBUTE8 := p_vendor_rec.GLOBAL_ATTRIBUTE8;
113 p_vendor_rec_a.GLOBAL_ATTRIBUTE9 := p_vendor_rec.GLOBAL_ATTRIBUTE9;
114 p_vendor_rec_a.GLOBAL_ATTRIBUTE10 := p_vendor_rec.GLOBAL_ATTRIBUTE10;
115 p_vendor_rec_a.GLOBAL_ATTRIBUTE11 := p_vendor_rec.GLOBAL_ATTRIBUTE11;
116 p_vendor_rec_a.GLOBAL_ATTRIBUTE12 := p_vendor_rec.GLOBAL_ATTRIBUTE12;
117 p_vendor_rec_a.GLOBAL_ATTRIBUTE13 := p_vendor_rec.GLOBAL_ATTRIBUTE13;
118 p_vendor_rec_a.GLOBAL_ATTRIBUTE14 := p_vendor_rec.GLOBAL_ATTRIBUTE14;
119 p_vendor_rec_a.GLOBAL_ATTRIBUTE15 := p_vendor_rec.GLOBAL_ATTRIBUTE15;
120 p_vendor_rec_a.GLOBAL_ATTRIBUTE16 := p_vendor_rec.GLOBAL_ATTRIBUTE16;
121 p_vendor_rec_a.GLOBAL_ATTRIBUTE17 := p_vendor_rec.GLOBAL_ATTRIBUTE17;
122 p_vendor_rec_a.GLOBAL_ATTRIBUTE18 := p_vendor_rec.GLOBAL_ATTRIBUTE18;
123 p_vendor_rec_a.GLOBAL_ATTRIBUTE19 := p_vendor_rec.GLOBAL_ATTRIBUTE19;
124 p_vendor_rec_a.GLOBAL_ATTRIBUTE20 := p_vendor_rec.GLOBAL_ATTRIBUTE20;
125 p_vendor_rec_a.GLOBAL_ATTRIBUTE_CATEGORY := p_vendor_rec.GLOBAL_ATTRIBUTE_CATEGORY;
126 p_vendor_rec_a.BANK_CHARGE_BEARER := p_vendor_rec.BANK_CHARGE_BEARER;
127 p_vendor_rec_a.MATCH_OPTION := p_vendor_rec.MATCH_OPTION;
128 p_vendor_rec_a.CREATE_DEBIT_MEMO_FLAG := p_vendor_rec.CREATE_DEBIT_MEMO_FLAG;
129 p_vendor_rec_a.PARTY_ID := p_vendor_rec.PARTY_ID;
130 p_vendor_rec_a.PARENT_PARTY_ID := p_vendor_rec.PARENT_PARTY_ID;
131 p_vendor_rec_a. JGZZ_FISCAL_CODE := p_vendor_rec.JGZZ_FISCAL_CODE;
132 p_vendor_rec_a.SIC_CODE := p_vendor_rec.SIC_CODE;
133 p_vendor_rec_a. TAX_REFERENCE := p_vendor_rec.TAX_REFERENCE;
134 p_vendor_rec_a.INVENTORY_ORGANIZATION_ID := p_vendor_rec.INVENTORY_ORGANIZATION_ID;
135 p_vendor_rec_a.TERMS_NAME := p_vendor_rec.TERMS_NAME;
136 p_vendor_rec_a.DEFAULT_TERMS_ID := p_vendor_rec.DEFAULT_TERMS_ID;
137 p_vendor_rec_a.VENDOR_INTERFACE_ID := p_vendor_rec.VENDOR_INTERFACE_ID;
138 p_vendor_rec_a.NI_NUMBER := p_vendor_rec.NI_NUMBER;
139
140 -- Call to AP APIs
141 AP_VENDOR_PUB_PKG.Create_Vendor
142 ( p_api_version,
143 p_init_msg_list,
144 p_commit,
145 p_validation_level,
146 x_return_status,
147 x_msg_count,
148 x_msg_data,
149 p_vendor_rec_a,
150 x_vendor_id,
151 x_party_id
152 );
153 END Create_Vendor;
154 -- This procedure is invoked indirectly from the Supplier-Customer Association updation page
155 -- through the rosetta-generated java and plsql packages
156 PROCEDURE Update_Vendor
157 ( p_api_version IN NUMBER,
158 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
159 p_commit IN VARCHAR2 := FND_API.G_FALSE,
160 p_validation_level IN NUMBER :=
161 FND_API.G_VALID_LEVEL_FULL,
162 x_return_status OUT NOCOPY VARCHAR2 ,
163 x_msg_count OUT NOCOPY NUMBER,
164 x_msg_data OUT NOCOPY VARCHAR2,
165 p_vendor_rec IN r_vendor_rec_type,
166 p_vendor_id IN NUMBER
167 )
168 IS
169 BEGIN
170 --Copying values between record types
171 p_vendor_rec_a.vendor_id :=p_vendor_rec.vendor_id;
172 p_vendor_rec_a.SEGMENT1 := p_vendor_rec.SEGMENT1 ;
173 p_vendor_rec_a.VENDOR_NAME := p_vendor_rec.VENDOR_NAME ;
174 p_vendor_rec_a.VENDOR_NAME_ALT := p_vendor_rec.VENDOR_NAME_ALT;
175 p_vendor_rec_a.SUMMARY_FLAG := p_vendor_rec.SUMMARY_FLAG ;
176 p_vendor_rec_a.ENABLED_FLAG := p_vendor_rec.ENABLED_FLAG;
177 p_vendor_rec_a.SEGMENT2 := p_vendor_rec.SEGMENT2;
178 p_vendor_rec_a.SEGMENT3 := p_vendor_rec.SEGMENT3;
179 p_vendor_rec_a.SEGMENT4 := p_vendor_rec.SEGMENT4;
180 p_vendor_rec_a.SEGMENT5 := p_vendor_rec.SEGMENT5;
181 p_vendor_rec_a.EMPLOYEE_ID := p_vendor_rec.EMPLOYEE_ID;
182 p_vendor_rec_a.VENDOR_TYPE_LOOKUP_CODE := p_vendor_rec.VENDOR_TYPE_LOOKUP_CODE;
183 p_vendor_rec_a.CUSTOMER_NUM := p_vendor_rec.CUSTOMER_NUM;
184 p_vendor_rec_a.ONE_TIME_FLAG := p_vendor_rec.ONE_TIME_FLAG;
185 p_vendor_rec_a.PARENT_VENDOR_ID := p_vendor_rec.PARENT_VENDOR_ID;
186 p_vendor_rec_a.MIN_ORDER_AMOUNT := p_vendor_rec.MIN_ORDER_AMOUNT;
187 p_vendor_rec_a.TERMS_ID := p_vendor_rec.TERMS_ID;
188 p_vendor_rec_a.SET_OF_BOOKS_ID := p_vendor_rec.SET_OF_BOOKS_ID;
189 p_vendor_rec_a.ALWAYS_TAKE_DISC_FLAG := p_vendor_rec.ALWAYS_TAKE_DISC_FLAG;
190 p_vendor_rec_a.PAY_DATE_BASIS_LOOKUP_CODE := p_vendor_rec.PAY_DATE_BASIS_LOOKUP_CODE;
191 p_vendor_rec_a.PAY_GROUP_LOOKUP_CODE := p_vendor_rec.PAY_GROUP_LOOKUP_CODE;
192 p_vendor_rec_a.PAYMENT_PRIORITY := p_vendor_rec.PAYMENT_PRIORITY;
193 p_vendor_rec_a.INVOICE_CURRENCY_CODE := p_vendor_rec.INVOICE_CURRENCY_CODE;
194 p_vendor_rec_a.PAYMENT_CURRENCY_CODE := p_vendor_rec.PAYMENT_CURRENCY_CODE;
195 p_vendor_rec_a.INVOICE_AMOUNT_LIMIT := p_vendor_rec.INVOICE_AMOUNT_LIMIT;
196 p_vendor_rec_a.HOLD_ALL_PAYMENTS_FLAG := p_vendor_rec.HOLD_ALL_PAYMENTS_FLAG;
197 p_vendor_rec_a.HOLD_FUTURE_PAYMENTS_FLAG := p_vendor_rec.HOLD_FUTURE_PAYMENTS_FLAG;
198 p_vendor_rec_a.HOLD_REASON := p_vendor_rec.HOLD_REASON;
199 p_vendor_rec_a.TYPE_1099 := p_vendor_rec.TYPE_1099;
200 p_vendor_rec_a.WITHHOLDING_STATUS_LOOKUP_CODE := p_vendor_rec.WITHHOLDING_STATUS_LOOKUP_CODE;
201 p_vendor_rec_a.WITHHOLDING_START_DATE := p_vendor_rec.WITHHOLDING_START_DATE;
202 p_vendor_rec_a.ORGANIZATION_TYPE_LOOKUP_CODE := p_vendor_rec.ORGANIZATION_TYPE_LOOKUP_CODE;
203 p_vendor_rec_a.START_DATE_ACTIVE := p_vendor_rec.START_DATE_ACTIVE;
204 p_vendor_rec_a.END_DATE_ACTIVE := p_vendor_rec.END_DATE_ACTIVE;
205 p_vendor_rec_a.MINORITY_GROUP_LOOKUP_CODE := p_vendor_rec.MINORITY_GROUP_LOOKUP_CODE;
206 p_vendor_rec_a.WOMEN_OWNED_FLAG := p_vendor_rec.WOMEN_OWNED_FLAG;
207 p_vendor_rec_a.SMALL_BUSINESS_FLAG := p_vendor_rec.SMALL_BUSINESS_FLAG;
208 p_vendor_rec_a.HOLD_FLAG := p_vendor_rec.HOLD_FLAG;
209 p_vendor_rec_a.PURCHASING_HOLD_REASON := p_vendor_rec.PURCHASING_HOLD_REASON;
210 p_vendor_rec_a.HOLD_BY := p_vendor_rec.HOLD_BY;
211 p_vendor_rec_a.HOLD_DATE := p_vendor_rec.HOLD_DATE;
212 p_vendor_rec_a.TERMS_DATE_BASIS := p_vendor_rec.TERMS_DATE_BASIS;
213 p_vendor_rec_a.INSPECTION_REQUIRED_FLAG := p_vendor_rec.INSPECTION_REQUIRED_FLAG;
214 p_vendor_rec_a.RECEIPT_REQUIRED_FLAG := p_vendor_rec.RECEIPT_REQUIRED_FLAG;
215 p_vendor_rec_a.QTY_RCV_TOLERANCE := p_vendor_rec.QTY_RCV_TOLERANCE;
216 p_vendor_rec_a.QTY_RCV_EXCEPTION_CODE := p_vendor_rec.QTY_RCV_EXCEPTION_CODE;
217 p_vendor_rec_a.ENFORCE_SHIP_TO_LOCATION_CODE := p_vendor_rec.ENFORCE_SHIP_TO_LOCATION_CODE;
218 p_vendor_rec_a.DAYS_EARLY_RECEIPT_ALLOWED := p_vendor_rec.DAYS_EARLY_RECEIPT_ALLOWED;
219 p_vendor_rec_a.DAYS_LATE_RECEIPT_ALLOWED := p_vendor_rec.DAYS_LATE_RECEIPT_ALLOWED;
220 p_vendor_rec_a.RECEIPT_DAYS_EXCEPTION_CODE := p_vendor_rec.RECEIPT_DAYS_EXCEPTION_CODE;
221 p_vendor_rec_a.RECEIVING_ROUTING_ID := p_vendor_rec.RECEIVING_ROUTING_ID;
222 p_vendor_rec_a.ALLOW_SUBSTITUTE_RECEIPTS_FLAG := p_vendor_rec.ALLOW_SUBSTITUTE_RECEIPTS_FLAG;
223 p_vendor_rec_a.ALLOW_UNORDERED_RECEIPTS_FLAG := p_vendor_rec.ALLOW_UNORDERED_RECEIPTS_FLAG;
224 p_vendor_rec_a.HOLD_UNMATCHED_INVOICES_FLAG := p_vendor_rec.HOLD_UNMATCHED_INVOICES_FLAG;
225 p_vendor_rec_a.TAX_VERIFICATION_DATE := p_vendor_rec.TAX_VERIFICATION_DATE;
226 p_vendor_rec_a.NAME_CONTROL := p_vendor_rec.NAME_CONTROL;
227 p_vendor_rec_a.STATE_REPORTABLE_FLAG := p_vendor_rec.STATE_REPORTABLE_FLAG;
228 p_vendor_rec_a.FEDERAL_REPORTABLE_FLAG := p_vendor_rec.FEDERAL_REPORTABLE_FLAG;
229 p_vendor_rec_a.ATTRIBUTE_CATEGORY := p_vendor_rec.ATTRIBUTE_CATEGORY;
230 p_vendor_rec_a.ATTRIBUTE1 := p_vendor_rec.ATTRIBUTE1;
231 p_vendor_rec_a.ATTRIBUTE2 := p_vendor_rec.ATTRIBUTE2;
232 p_vendor_rec_a.ATTRIBUTE3 := p_vendor_rec.ATTRIBUTE3;
233 p_vendor_rec_a.ATTRIBUTE4 := p_vendor_rec.ATTRIBUTE4;
234 p_vendor_rec_a.ATTRIBUTE5 := p_vendor_rec.ATTRIBUTE5;
235 p_vendor_rec_a.ATTRIBUTE6 := p_vendor_rec.ATTRIBUTE6;
236 p_vendor_rec_a.ATTRIBUTE7 := p_vendor_rec.ATTRIBUTE7;
237 p_vendor_rec_a.ATTRIBUTE8 := p_vendor_rec.ATTRIBUTE8;
238 p_vendor_rec_a.ATTRIBUTE9 := p_vendor_rec.ATTRIBUTE9;
239 p_vendor_rec_a.ATTRIBUTE10 := p_vendor_rec.ATTRIBUTE10;
240 p_vendor_rec_a.ATTRIBUTE11 := p_vendor_rec.ATTRIBUTE11;
241 p_vendor_rec_a.ATTRIBUTE12 := p_vendor_rec.ATTRIBUTE12;
242 p_vendor_rec_a.ATTRIBUTE13 := p_vendor_rec.ATTRIBUTE13;
243 p_vendor_rec_a.ATTRIBUTE14 := p_vendor_rec.ATTRIBUTE14;
244 p_vendor_rec_a.ATTRIBUTE15 := p_vendor_rec.ATTRIBUTE15;
245 p_vendor_rec_a.AUTO_CALCULATE_INTEREST_FLAG := p_vendor_rec.AUTO_CALCULATE_INTEREST_FLAG;
246 p_vendor_rec_a.VALIDATION_NUMBER := p_vendor_rec.VALIDATION_NUMBER;
247 p_vendor_rec_a.EXCLUDE_FREIGHT_FROM_DISCOUNT := p_vendor_rec.EXCLUDE_FREIGHT_FROM_DISCOUNT;
248 p_vendor_rec_a.TAX_REPORTING_NAME := p_vendor_rec.TAX_REPORTING_NAME;
249 p_vendor_rec_a.CHECK_DIGITS := p_vendor_rec.CHECK_DIGITS;
250 p_vendor_rec_a.ALLOW_AWT_FLAG := p_vendor_rec.ALLOW_AWT_FLAG;
251 p_vendor_rec_a.AWT_GROUP_ID := p_vendor_rec.AWT_GROUP_ID;
252 p_vendor_rec_a.AWT_GROUP_NAME := p_vendor_rec.AWT_GROUP_NAME;
253 p_vendor_rec_a.GLOBAL_ATTRIBUTE1 := p_vendor_rec.GLOBAL_ATTRIBUTE1;
254 p_vendor_rec_a.GLOBAL_ATTRIBUTE2 := p_vendor_rec.GLOBAL_ATTRIBUTE2;
255 p_vendor_rec_a.GLOBAL_ATTRIBUTE3 := p_vendor_rec.GLOBAL_ATTRIBUTE3;
256 p_vendor_rec_a.GLOBAL_ATTRIBUTE4 := p_vendor_rec.GLOBAL_ATTRIBUTE4;
257 p_vendor_rec_a.GLOBAL_ATTRIBUTE5 := p_vendor_rec.GLOBAL_ATTRIBUTE5;
258 p_vendor_rec_a.GLOBAL_ATTRIBUTE6 := p_vendor_rec.GLOBAL_ATTRIBUTE6;
259 p_vendor_rec_a.GLOBAL_ATTRIBUTE7 := p_vendor_rec.GLOBAL_ATTRIBUTE7;
260 p_vendor_rec_a.GLOBAL_ATTRIBUTE8 := p_vendor_rec.GLOBAL_ATTRIBUTE8;
261 p_vendor_rec_a.GLOBAL_ATTRIBUTE9 := p_vendor_rec.GLOBAL_ATTRIBUTE9;
262 p_vendor_rec_a.GLOBAL_ATTRIBUTE10 := p_vendor_rec.GLOBAL_ATTRIBUTE10;
263 p_vendor_rec_a.GLOBAL_ATTRIBUTE11 := p_vendor_rec.GLOBAL_ATTRIBUTE11;
264 p_vendor_rec_a.GLOBAL_ATTRIBUTE12 := p_vendor_rec.GLOBAL_ATTRIBUTE12;
265 p_vendor_rec_a.GLOBAL_ATTRIBUTE13 := p_vendor_rec.GLOBAL_ATTRIBUTE13;
266 p_vendor_rec_a.GLOBAL_ATTRIBUTE14 := p_vendor_rec.GLOBAL_ATTRIBUTE14;
267 p_vendor_rec_a.GLOBAL_ATTRIBUTE15 := p_vendor_rec.GLOBAL_ATTRIBUTE15;
268 p_vendor_rec_a.GLOBAL_ATTRIBUTE16 := p_vendor_rec.GLOBAL_ATTRIBUTE16;
269 p_vendor_rec_a.GLOBAL_ATTRIBUTE17 := p_vendor_rec.GLOBAL_ATTRIBUTE17;
270 p_vendor_rec_a.GLOBAL_ATTRIBUTE18 := p_vendor_rec.GLOBAL_ATTRIBUTE18;
271 p_vendor_rec_a.GLOBAL_ATTRIBUTE19 := p_vendor_rec.GLOBAL_ATTRIBUTE19;
272 p_vendor_rec_a.GLOBAL_ATTRIBUTE20 := p_vendor_rec.GLOBAL_ATTRIBUTE20;
273 p_vendor_rec_a.GLOBAL_ATTRIBUTE_CATEGORY := p_vendor_rec.GLOBAL_ATTRIBUTE_CATEGORY;
274 p_vendor_rec_a.BANK_CHARGE_BEARER := p_vendor_rec.BANK_CHARGE_BEARER;
275 p_vendor_rec_a.MATCH_OPTION := p_vendor_rec.MATCH_OPTION;
276 p_vendor_rec_a.CREATE_DEBIT_MEMO_FLAG := p_vendor_rec.CREATE_DEBIT_MEMO_FLAG;
277 p_vendor_rec_a.PARTY_ID := p_vendor_rec.PARTY_ID;
278 p_vendor_rec_a.PARENT_PARTY_ID := p_vendor_rec.PARENT_PARTY_ID;
279 p_vendor_rec_a. JGZZ_FISCAL_CODE := p_vendor_rec.JGZZ_FISCAL_CODE;
280 p_vendor_rec_a.SIC_CODE := p_vendor_rec.SIC_CODE;
281 p_vendor_rec_a. TAX_REFERENCE := p_vendor_rec.TAX_REFERENCE;
282 p_vendor_rec_a.INVENTORY_ORGANIZATION_ID := p_vendor_rec.INVENTORY_ORGANIZATION_ID;
283 p_vendor_rec_a.TERMS_NAME := p_vendor_rec.TERMS_NAME;
284 p_vendor_rec_a.DEFAULT_TERMS_ID := p_vendor_rec.DEFAULT_TERMS_ID;
285 p_vendor_rec_a.VENDOR_INTERFACE_ID := p_vendor_rec.VENDOR_INTERFACE_ID;
286 p_vendor_rec_a.NI_NUMBER := p_vendor_rec.NI_NUMBER;
287
288 -- Call to AP APIs
289 AP_VENDOR_PUB_PKG.Update_Vendor
290 ( p_api_version,
291 p_init_msg_list,
292 p_commit,
293 p_validation_level,
294 x_return_status,
295 x_msg_count,
296 x_msg_data,
297 p_vendor_rec_a,
298 p_vendor_id
299 );
300 END Update_Vendor;
301 -- This procedure is invoked indirectly from the Supplier-Customer Association creation page
302 -- through the rosetta-generated java and plsql packages
303 PROCEDURE Create_Vendor_Site
304 ( p_api_version IN NUMBER,
305 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
306 p_commit IN VARCHAR2 := FND_API.G_FALSE,
307 p_validation_level IN NUMBER :=
308 FND_API.G_VALID_LEVEL_FULL,
309 x_return_status OUT NOCOPY VARCHAR2 ,
310 x_msg_count OUT NOCOPY NUMBER,
311 x_msg_data OUT NOCOPY VARCHAR2,
312 p_vendor_site_rec IN r_vendor_site_rec_type,
313 x_vendor_site_id OUT NOCOPY NUMBER,
314 x_party_site_id OUT NOCOPY NUMBER,
315 x_location_id OUT NOCOPY NUMBER
316 )
317 IS
318 BEGIN
319 --Copying values between record types
320 p_vendor_site_rec_a.AREA_CODE := p_vendor_site_rec.AREA_CODE;
321 p_vendor_site_rec_a.PHONE := p_vendor_site_rec.PHONE;
322 p_vendor_site_rec_a.CUSTOMER_NUM := p_vendor_site_rec.CUSTOMER_NUM;
323 p_vendor_site_rec_a.SHIP_TO_LOCATION_ID := p_vendor_site_rec.SHIP_TO_LOCATION_ID;
324 p_vendor_site_rec_a.BILL_TO_LOCATION_ID := p_vendor_site_rec.BILL_TO_LOCATION_ID;
325 p_vendor_site_rec_a.SHIP_VIA_LOOKUP_CODE := p_vendor_site_rec.SHIP_VIA_LOOKUP_CODE;
326 p_vendor_site_rec_a.FREIGHT_TERMS_LOOKUP_CODE := p_vendor_site_rec.FREIGHT_TERMS_LOOKUP_CODE;
327 p_vendor_site_rec_a.FOB_LOOKUP_CODE := p_vendor_site_rec.FOB_LOOKUP_CODE;
328 p_vendor_site_rec_a.INACTIVE_DATE := p_vendor_site_rec.INACTIVE_DATE;
329 p_vendor_site_rec_a.FAX := p_vendor_site_rec.FAX;
330 p_vendor_site_rec_a.FAX_AREA_CODE := p_vendor_site_rec.FAX_AREA_CODE;
331 p_vendor_site_rec_a.TELEX := p_vendor_site_rec.TELEX;
332 p_vendor_site_rec_a.TERMS_DATE_BASIS := p_vendor_site_rec.TERMS_DATE_BASIS;
333 p_vendor_site_rec_a.DISTRIBUTION_SET_ID := p_vendor_site_rec.DISTRIBUTION_SET_ID;
334 p_vendor_site_rec_a.ACCTS_PAY_CODE_COMBINATION_ID := p_vendor_site_rec.ACCTS_PAY_CODE_COMBINATION_ID;
335 p_vendor_site_rec_a.PREPAY_CODE_COMBINATION_ID := p_vendor_site_rec.PREPAY_CODE_COMBINATION_ID;
336 p_vendor_site_rec_a.PAY_GROUP_LOOKUP_CODE := p_vendor_site_rec.PAY_GROUP_LOOKUP_CODE;
337 p_vendor_site_rec_a.PAYMENT_PRIORITY := p_vendor_site_rec.PAYMENT_PRIORITY;
338 p_vendor_site_rec_a.TERMS_ID := p_vendor_site_rec.TERMS_ID;
339 p_vendor_site_rec_a.INVOICE_AMOUNT_LIMIT := p_vendor_site_rec.INVOICE_AMOUNT_LIMIT;
340 p_vendor_site_rec_a.PAY_DATE_BASIS_LOOKUP_CODE := p_vendor_site_rec.PAY_DATE_BASIS_LOOKUP_CODE;
341 p_vendor_site_rec_a.ALWAYS_TAKE_DISC_FLAG := p_vendor_site_rec.ALWAYS_TAKE_DISC_FLAG;
342 p_vendor_site_rec_a.INVOICE_CURRENCY_CODE := p_vendor_site_rec.INVOICE_CURRENCY_CODE;
343 p_vendor_site_rec_a.PAYMENT_CURRENCY_CODE := p_vendor_site_rec.PAYMENT_CURRENCY_CODE;
344 p_vendor_site_rec_a.VENDOR_SITE_ID := p_vendor_site_rec.VENDOR_SITE_ID;
345 p_vendor_site_rec_a.LAST_UPDATE_DATE := p_vendor_site_rec.LAST_UPDATE_DATE;
346 p_vendor_site_rec_a.LAST_UPDATED_BY := p_vendor_site_rec.LAST_UPDATED_BY;
347 p_vendor_site_rec_a.VENDOR_ID := p_vendor_site_rec.VENDOR_ID;
348 p_vendor_site_rec_a.VENDOR_SITE_CODE := p_vendor_site_rec.VENDOR_SITE_CODE;
349 p_vendor_site_rec_a.VENDOR_SITE_CODE_ALT := p_vendor_site_rec.VENDOR_SITE_CODE_ALT;
350 p_vendor_site_rec_a.PURCHASING_SITE_FLAG := p_vendor_site_rec.PURCHASING_SITE_FLAG;
351 p_vendor_site_rec_a.RFQ_ONLY_SITE_FLAG := p_vendor_site_rec.RFQ_ONLY_SITE_FLAG;
352 p_vendor_site_rec_a.PAY_SITE_FLAG := p_vendor_site_rec.PAY_SITE_FLAG;
353 p_vendor_site_rec_a.ATTENTION_AR_FLAG := p_vendor_site_rec.ATTENTION_AR_FLAG;
354 p_vendor_site_rec_a.HOLD_ALL_PAYMENTS_FLAG := p_vendor_site_rec.HOLD_ALL_PAYMENTS_FLAG;
355 p_vendor_site_rec_a.HOLD_FUTURE_PAYMENTS_FLAG := p_vendor_site_rec.HOLD_FUTURE_PAYMENTS_FLAG;
356 p_vendor_site_rec_a.HOLD_REASON := p_vendor_site_rec.HOLD_REASON;
357 p_vendor_site_rec_a.HOLD_UNMATCHED_INVOICES_FLAG := p_vendor_site_rec.HOLD_UNMATCHED_INVOICES_FLAG;
358 p_vendor_site_rec_a.TAX_REPORTING_SITE_FLAG := p_vendor_site_rec.TAX_REPORTING_SITE_FLAG;
359 p_vendor_site_rec_a.ATTRIBUTE_CATEGORY := p_vendor_site_rec.ATTRIBUTE_CATEGORY;
360 p_vendor_site_rec_a.ATTRIBUTE1 := p_vendor_site_rec.ATTRIBUTE1;
361 p_vendor_site_rec_a.ATTRIBUTE2 := p_vendor_site_rec.ATTRIBUTE2;
362 p_vendor_site_rec_a.ATTRIBUTE3 := p_vendor_site_rec.ATTRIBUTE3;
363 p_vendor_site_rec_a.ATTRIBUTE4 := p_vendor_site_rec.ATTRIBUTE4;
364 p_vendor_site_rec_a.ATTRIBUTE5 := p_vendor_site_rec.ATTRIBUTE5;
365 p_vendor_site_rec_a.ATTRIBUTE6 := p_vendor_site_rec.ATTRIBUTE6;
366 p_vendor_site_rec_a.ATTRIBUTE7 := p_vendor_site_rec.ATTRIBUTE7;
367 p_vendor_site_rec_a.ATTRIBUTE8 := p_vendor_site_rec.ATTRIBUTE8;
368 p_vendor_site_rec_a.ATTRIBUTE9 := p_vendor_site_rec.ATTRIBUTE9;
369 p_vendor_site_rec_a.ATTRIBUTE10 := p_vendor_site_rec.ATTRIBUTE10;
370 p_vendor_site_rec_a.ATTRIBUTE11 := p_vendor_site_rec.ATTRIBUTE11;
371 p_vendor_site_rec_a.ATTRIBUTE12 := p_vendor_site_rec.ATTRIBUTE12;
372 p_vendor_site_rec_a.ATTRIBUTE13 := p_vendor_site_rec.ATTRIBUTE13;
373 p_vendor_site_rec_a.ATTRIBUTE14 := p_vendor_site_rec.ATTRIBUTE14;
374 p_vendor_site_rec_a.ATTRIBUTE15 := p_vendor_site_rec.ATTRIBUTE15;
375 p_vendor_site_rec_a.VALIDATION_NUMBER := p_vendor_site_rec.VALIDATION_NUMBER;
376 p_vendor_site_rec_a.EXCLUDE_FREIGHT_FROM_DISCOUNT := p_vendor_site_rec.EXCLUDE_FREIGHT_FROM_DISCOUNT;
377 p_vendor_site_rec_a.BANK_CHARGE_BEARER := p_vendor_site_rec.BANK_CHARGE_BEARER;
378 p_vendor_site_rec_a.ORG_ID := p_vendor_site_rec.ORG_ID;
379 p_vendor_site_rec_a.CHECK_DIGITS := p_vendor_site_rec.CHECK_DIGITS;
380 p_vendor_site_rec_a.ALLOW_AWT_FLAG := p_vendor_site_rec.ALLOW_AWT_FLAG;
381 p_vendor_site_rec_a.AWT_GROUP_ID := p_vendor_site_rec.AWT_GROUP_ID;
382 p_vendor_site_rec_a.DEFAULT_PAY_SITE_ID := p_vendor_site_rec.DEFAULT_PAY_SITE_ID;
383 p_vendor_site_rec_a.PAY_ON_CODE := p_vendor_site_rec.PAY_ON_CODE;
384 p_vendor_site_rec_a.PAY_ON_RECEIPT_SUMMARY_CODE := p_vendor_site_rec.PAY_ON_RECEIPT_SUMMARY_CODE;
385 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE_CATEGORY := p_vendor_site_rec.GLOBAL_ATTRIBUTE_CATEGORY;
386 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE1 := p_vendor_site_rec.GLOBAL_ATTRIBUTE1;
387 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE2 := p_vendor_site_rec.GLOBAL_ATTRIBUTE2;
388 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE3 := p_vendor_site_rec.GLOBAL_ATTRIBUTE3;
389 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE4 := p_vendor_site_rec.GLOBAL_ATTRIBUTE4;
390 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE5 := p_vendor_site_rec.GLOBAL_ATTRIBUTE5;
391 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE6 := p_vendor_site_rec.GLOBAL_ATTRIBUTE6;
392 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE7 := p_vendor_site_rec.GLOBAL_ATTRIBUTE7;
393 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE8 := p_vendor_site_rec.GLOBAL_ATTRIBUTE8;
394 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE9 := p_vendor_site_rec.GLOBAL_ATTRIBUTE9;
395 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE10 := p_vendor_site_rec.GLOBAL_ATTRIBUTE10;
396 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE11 := p_vendor_site_rec.GLOBAL_ATTRIBUTE11;
397 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE12 := p_vendor_site_rec.GLOBAL_ATTRIBUTE12;
398 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE13 := p_vendor_site_rec.GLOBAL_ATTRIBUTE13;
399 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE14 := p_vendor_site_rec.GLOBAL_ATTRIBUTE14;
400 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE15 := p_vendor_site_rec.GLOBAL_ATTRIBUTE15;
401 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE16 := p_vendor_site_rec.GLOBAL_ATTRIBUTE16;
402 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE17 := p_vendor_site_rec.GLOBAL_ATTRIBUTE17;
403 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE18 := p_vendor_site_rec.GLOBAL_ATTRIBUTE18;
404 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE19 := p_vendor_site_rec.GLOBAL_ATTRIBUTE19;
405 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE20 := p_vendor_site_rec.GLOBAL_ATTRIBUTE20;
406 p_vendor_site_rec_a.TP_HEADER_ID := p_vendor_site_rec.TP_HEADER_ID;
407 p_vendor_site_rec_a.ECE_TP_LOCATION_CODE := p_vendor_site_rec.ECE_TP_LOCATION_CODE;
408 p_vendor_site_rec_a.PCARD_SITE_FLAG := p_vendor_site_rec.PCARD_SITE_FLAG;
409 p_vendor_site_rec_a.MATCH_OPTION := p_vendor_site_rec.MATCH_OPTION;
410 p_vendor_site_rec_a.COUNTRY_OF_ORIGIN_CODE := p_vendor_site_rec.COUNTRY_OF_ORIGIN_CODE;
411 p_vendor_site_rec_a.FUTURE_DATED_PAYMENT_CCID := p_vendor_site_rec.FUTURE_DATED_PAYMENT_CCID;
412 p_vendor_site_rec_a.CREATE_DEBIT_MEMO_FLAG := p_vendor_site_rec.CREATE_DEBIT_MEMO_FLAG;
413 p_vendor_site_rec_a.SUPPLIER_NOTIF_METHOD := p_vendor_site_rec.SUPPLIER_NOTIF_METHOD;
414 p_vendor_site_rec_a.EMAIL_ADDRESS := p_vendor_site_rec.EMAIL_ADDRESS;
415 p_vendor_site_rec_a.PRIMARY_PAY_SITE_FLAG := p_vendor_site_rec.PRIMARY_PAY_SITE_FLAG;
416 p_vendor_site_rec_a.SHIPPING_CONTROL := p_vendor_site_rec.SHIPPING_CONTROL;
417 p_vendor_site_rec_a.SELLING_COMPANY_IDENTIFIER := p_vendor_site_rec.SELLING_COMPANY_IDENTIFIER;
418 p_vendor_site_rec_a.GAPLESS_INV_NUM_FLAG := p_vendor_site_rec.GAPLESS_INV_NUM_FLAG;
419 p_vendor_site_rec_a.LOCATION_ID := p_vendor_site_rec.LOCATION_ID;
420 p_vendor_site_rec_a.PARTY_SITE_ID := p_vendor_site_rec.PARTY_SITE_ID;
421 p_vendor_site_rec_a.ORG_NAME := p_vendor_site_rec.ORG_NAME;
422 p_vendor_site_rec_a.DUNS_NUMBER := p_vendor_site_rec.DUNS_NUMBER;
423 p_vendor_site_rec_a.ADDRESS_STYLE := p_vendor_site_rec.ADDRESS_STYLE;
424 p_vendor_site_rec_a.LANGUAGE := p_vendor_site_rec.LANGUAGE;
425 p_vendor_site_rec_a.PROVINCE := p_vendor_site_rec.PROVINCE;
426 p_vendor_site_rec_a.COUNTRY := p_vendor_site_rec.COUNTRY;
427 p_vendor_site_rec_a.ADDRESS_LINE1 := p_vendor_site_rec.ADDRESS_LINE1;
428 p_vendor_site_rec_a.ADDRESS_LINE2 := p_vendor_site_rec.ADDRESS_LINE2;
429 p_vendor_site_rec_a.ADDRESS_LINE3 := p_vendor_site_rec.ADDRESS_LINE3;
430 p_vendor_site_rec_a.ADDRESS_LINE4 := p_vendor_site_rec.ADDRESS_LINE4;
431 p_vendor_site_rec_a.ADDRESS_LINES_ALT := p_vendor_site_rec.ADDRESS_LINES_ALT;
432 p_vendor_site_rec_a.COUNTY := p_vendor_site_rec.COUNTY;
433 p_vendor_site_rec_a.CITY := p_vendor_site_rec.CITY;
434 p_vendor_site_rec_a.STATE := p_vendor_site_rec.STATE;
435 p_vendor_site_rec_a.ZIP := p_vendor_site_rec.ZIP;
436 p_vendor_site_rec_a.TERMS_NAME := p_vendor_site_rec.TERMS_NAME;
437 p_vendor_site_rec_a.DEFAULT_TERMS_ID := p_vendor_site_rec.DEFAULT_TERMS_ID;
438 p_vendor_site_rec_a.AWT_GROUP_NAME := p_vendor_site_rec.AWT_GROUP_NAME;
439 p_vendor_site_rec_a.DISTRIBUTION_SET_NAME := p_vendor_site_rec.DISTRIBUTION_SET_NAME;
440 p_vendor_site_rec_a.SHIP_TO_LOCATION_CODE := p_vendor_site_rec.SHIP_TO_LOCATION_CODE;
441 p_vendor_site_rec_a.BILL_TO_LOCATION_CODE := p_vendor_site_rec.BILL_TO_LOCATION_CODE;
442 p_vendor_site_rec_a.DEFAULT_DIST_SET_ID := p_vendor_site_rec.DEFAULT_DIST_SET_ID;
443 p_vendor_site_rec_a.DEFAULT_SHIP_TO_LOC_ID := p_vendor_site_rec.DEFAULT_SHIP_TO_LOC_ID;
444 p_vendor_site_rec_a.DEFAULT_BILL_TO_LOC_ID := p_vendor_site_rec.DEFAULT_BILL_TO_LOC_ID;
445 p_vendor_site_rec_a.TOLERANCE_ID := p_vendor_site_rec.TOLERANCE_ID;
446 p_vendor_site_rec_a.TOLERANCE_NAME := p_vendor_site_rec.TOLERANCE_NAME;
447 p_vendor_site_rec_a.VENDOR_INTERFACE_ID := p_vendor_site_rec.VENDOR_INTERFACE_ID;
448 p_vendor_site_rec_a.VENDOR_SITE_INTERFACE_ID := p_vendor_site_rec.VENDOR_SITE_INTERFACE_ID;
449 p_vendor_site_rec_a.RETAINAGE_RATE := p_vendor_site_rec.RETAINAGE_RATE;
450
451 -- Call to AP APIs
452 AP_VENDOR_PUB_PKG.Create_Vendor_Site
453 ( p_api_version,
454 p_init_msg_list,
455 p_commit,
456 p_validation_level,
457 x_return_status,
458 x_msg_count,
459 x_msg_data,
460 p_vendor_site_rec_a,
461 x_vendor_site_id,
462 x_party_site_id,
463 x_location_id
464 );
465 END Create_Vendor_Site;
466 -- This procedure is invoked indirectly from the Supplier-Customer Association updation page
467 -- through the rosetta-generated java and plsql packages
468 PROCEDURE Update_Vendor_Site
469 ( p_api_version IN NUMBER,
470 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
471 p_commit IN VARCHAR2 := FND_API.G_FALSE,
472 p_validation_level IN NUMBER :=
473 FND_API.G_VALID_LEVEL_FULL,
474 x_return_status OUT NOCOPY VARCHAR2 ,
475 x_msg_count OUT NOCOPY NUMBER,
476 x_msg_data OUT NOCOPY VARCHAR2,
477 p_vendor_site_rec IN r_vendor_site_rec_type,
478 p_vendor_site_id IN NUMBER
479 )
480 IS
481 BEGIN
482 --Copying values between record types
483 p_vendor_site_rec_a.AREA_CODE := p_vendor_site_rec.AREA_CODE;
484 p_vendor_site_rec_a.PHONE := p_vendor_site_rec.PHONE;
485 p_vendor_site_rec_a.CUSTOMER_NUM := p_vendor_site_rec.CUSTOMER_NUM;
486 p_vendor_site_rec_a.SHIP_TO_LOCATION_ID := p_vendor_site_rec.SHIP_TO_LOCATION_ID;
487 p_vendor_site_rec_a.BILL_TO_LOCATION_ID := p_vendor_site_rec.BILL_TO_LOCATION_ID;
488 p_vendor_site_rec_a.SHIP_VIA_LOOKUP_CODE := p_vendor_site_rec.SHIP_VIA_LOOKUP_CODE;
489 p_vendor_site_rec_a.FREIGHT_TERMS_LOOKUP_CODE := p_vendor_site_rec.FREIGHT_TERMS_LOOKUP_CODE;
490 p_vendor_site_rec_a.FOB_LOOKUP_CODE := p_vendor_site_rec.FOB_LOOKUP_CODE;
491 p_vendor_site_rec_a.INACTIVE_DATE := p_vendor_site_rec.INACTIVE_DATE;
492 p_vendor_site_rec_a.FAX := p_vendor_site_rec.FAX;
493 p_vendor_site_rec_a.FAX_AREA_CODE := p_vendor_site_rec.FAX_AREA_CODE;
494 p_vendor_site_rec_a.TELEX := p_vendor_site_rec.TELEX;
495 p_vendor_site_rec_a.TERMS_DATE_BASIS := p_vendor_site_rec.TERMS_DATE_BASIS;
496 p_vendor_site_rec_a.DISTRIBUTION_SET_ID := p_vendor_site_rec.DISTRIBUTION_SET_ID;
497 p_vendor_site_rec_a.ACCTS_PAY_CODE_COMBINATION_ID := p_vendor_site_rec.ACCTS_PAY_CODE_COMBINATION_ID;
498 p_vendor_site_rec_a.PREPAY_CODE_COMBINATION_ID := p_vendor_site_rec.PREPAY_CODE_COMBINATION_ID;
499 p_vendor_site_rec_a.PAY_GROUP_LOOKUP_CODE := p_vendor_site_rec.PAY_GROUP_LOOKUP_CODE;
500 p_vendor_site_rec_a.PAYMENT_PRIORITY := p_vendor_site_rec.PAYMENT_PRIORITY;
501 p_vendor_site_rec_a.TERMS_ID := p_vendor_site_rec.TERMS_ID;
502 p_vendor_site_rec_a.INVOICE_AMOUNT_LIMIT := p_vendor_site_rec.INVOICE_AMOUNT_LIMIT;
503 p_vendor_site_rec_a.PAY_DATE_BASIS_LOOKUP_CODE := p_vendor_site_rec.PAY_DATE_BASIS_LOOKUP_CODE;
504 p_vendor_site_rec_a.ALWAYS_TAKE_DISC_FLAG := p_vendor_site_rec.ALWAYS_TAKE_DISC_FLAG;
505 p_vendor_site_rec_a.INVOICE_CURRENCY_CODE := p_vendor_site_rec.INVOICE_CURRENCY_CODE;
506 p_vendor_site_rec_a.PAYMENT_CURRENCY_CODE := p_vendor_site_rec.PAYMENT_CURRENCY_CODE;
507 p_vendor_site_rec_a.VENDOR_SITE_ID := p_vendor_site_rec.VENDOR_SITE_ID;
508 p_vendor_site_rec_a.LAST_UPDATE_DATE := p_vendor_site_rec.LAST_UPDATE_DATE;
509 p_vendor_site_rec_a.LAST_UPDATED_BY := p_vendor_site_rec.LAST_UPDATED_BY;
510 p_vendor_site_rec_a.VENDOR_ID := p_vendor_site_rec.VENDOR_ID;
511 p_vendor_site_rec_a.VENDOR_SITE_CODE := p_vendor_site_rec.VENDOR_SITE_CODE;
512 p_vendor_site_rec_a.VENDOR_SITE_CODE_ALT := p_vendor_site_rec.VENDOR_SITE_CODE_ALT;
513 p_vendor_site_rec_a.PURCHASING_SITE_FLAG := p_vendor_site_rec.PURCHASING_SITE_FLAG;
514 p_vendor_site_rec_a.RFQ_ONLY_SITE_FLAG := p_vendor_site_rec.RFQ_ONLY_SITE_FLAG;
515 p_vendor_site_rec_a.PAY_SITE_FLAG := p_vendor_site_rec.PAY_SITE_FLAG;
516 p_vendor_site_rec_a.ATTENTION_AR_FLAG := p_vendor_site_rec.ATTENTION_AR_FLAG;
517 p_vendor_site_rec_a.HOLD_ALL_PAYMENTS_FLAG := p_vendor_site_rec.HOLD_ALL_PAYMENTS_FLAG;
518 p_vendor_site_rec_a.HOLD_FUTURE_PAYMENTS_FLAG := p_vendor_site_rec.HOLD_FUTURE_PAYMENTS_FLAG;
519 p_vendor_site_rec_a.HOLD_REASON := p_vendor_site_rec.HOLD_REASON;
520 p_vendor_site_rec_a.HOLD_UNMATCHED_INVOICES_FLAG := p_vendor_site_rec.HOLD_UNMATCHED_INVOICES_FLAG;
521 p_vendor_site_rec_a.TAX_REPORTING_SITE_FLAG := p_vendor_site_rec.TAX_REPORTING_SITE_FLAG;
522 p_vendor_site_rec_a.ATTRIBUTE_CATEGORY := p_vendor_site_rec.ATTRIBUTE_CATEGORY;
523 p_vendor_site_rec_a.ATTRIBUTE1 := p_vendor_site_rec.ATTRIBUTE1;
524 p_vendor_site_rec_a.ATTRIBUTE2 := p_vendor_site_rec.ATTRIBUTE2;
525 p_vendor_site_rec_a.ATTRIBUTE3 := p_vendor_site_rec.ATTRIBUTE3;
526 p_vendor_site_rec_a.ATTRIBUTE4 := p_vendor_site_rec.ATTRIBUTE4;
527 p_vendor_site_rec_a.ATTRIBUTE5 := p_vendor_site_rec.ATTRIBUTE5;
528 p_vendor_site_rec_a.ATTRIBUTE6 := p_vendor_site_rec.ATTRIBUTE6;
529 p_vendor_site_rec_a.ATTRIBUTE7 := p_vendor_site_rec.ATTRIBUTE7;
530 p_vendor_site_rec_a.ATTRIBUTE8 := p_vendor_site_rec.ATTRIBUTE8;
531 p_vendor_site_rec_a.ATTRIBUTE9 := p_vendor_site_rec.ATTRIBUTE9;
532 p_vendor_site_rec_a.ATTRIBUTE10 := p_vendor_site_rec.ATTRIBUTE10;
533 p_vendor_site_rec_a.ATTRIBUTE11 := p_vendor_site_rec.ATTRIBUTE11;
534 p_vendor_site_rec_a.ATTRIBUTE12 := p_vendor_site_rec.ATTRIBUTE12;
535 p_vendor_site_rec_a.ATTRIBUTE13 := p_vendor_site_rec.ATTRIBUTE13;
536 p_vendor_site_rec_a.ATTRIBUTE14 := p_vendor_site_rec.ATTRIBUTE14;
537 p_vendor_site_rec_a.ATTRIBUTE15 := p_vendor_site_rec.ATTRIBUTE15;
538 p_vendor_site_rec_a.VALIDATION_NUMBER := p_vendor_site_rec.VALIDATION_NUMBER;
539 p_vendor_site_rec_a.EXCLUDE_FREIGHT_FROM_DISCOUNT := p_vendor_site_rec.EXCLUDE_FREIGHT_FROM_DISCOUNT;
540 p_vendor_site_rec_a.BANK_CHARGE_BEARER := p_vendor_site_rec.BANK_CHARGE_BEARER;
541 p_vendor_site_rec_a.ORG_ID := p_vendor_site_rec.ORG_ID;
542 p_vendor_site_rec_a.CHECK_DIGITS := p_vendor_site_rec.CHECK_DIGITS;
543 p_vendor_site_rec_a.ALLOW_AWT_FLAG := p_vendor_site_rec.ALLOW_AWT_FLAG;
544 p_vendor_site_rec_a.AWT_GROUP_ID := p_vendor_site_rec.AWT_GROUP_ID;
545 p_vendor_site_rec_a.DEFAULT_PAY_SITE_ID := p_vendor_site_rec.DEFAULT_PAY_SITE_ID;
546 p_vendor_site_rec_a.PAY_ON_CODE := p_vendor_site_rec.PAY_ON_CODE;
547 p_vendor_site_rec_a.PAY_ON_RECEIPT_SUMMARY_CODE := p_vendor_site_rec.PAY_ON_RECEIPT_SUMMARY_CODE;
548 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE_CATEGORY := p_vendor_site_rec.GLOBAL_ATTRIBUTE_CATEGORY;
549 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE1 := p_vendor_site_rec.GLOBAL_ATTRIBUTE1;
550 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE2 := p_vendor_site_rec.GLOBAL_ATTRIBUTE2;
551 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE3 := p_vendor_site_rec.GLOBAL_ATTRIBUTE3;
552 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE4 := p_vendor_site_rec.GLOBAL_ATTRIBUTE4;
553 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE5 := p_vendor_site_rec.GLOBAL_ATTRIBUTE5;
554 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE6 := p_vendor_site_rec.GLOBAL_ATTRIBUTE6;
555 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE7 := p_vendor_site_rec.GLOBAL_ATTRIBUTE7;
556 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE8 := p_vendor_site_rec.GLOBAL_ATTRIBUTE8;
557 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE9 := p_vendor_site_rec.GLOBAL_ATTRIBUTE9;
558 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE10 := p_vendor_site_rec.GLOBAL_ATTRIBUTE10;
559 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE11 := p_vendor_site_rec.GLOBAL_ATTRIBUTE11;
560 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE12 := p_vendor_site_rec.GLOBAL_ATTRIBUTE12;
561 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE13 := p_vendor_site_rec.GLOBAL_ATTRIBUTE13;
562 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE14 := p_vendor_site_rec.GLOBAL_ATTRIBUTE14;
563 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE15 := p_vendor_site_rec.GLOBAL_ATTRIBUTE15;
564 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE16 := p_vendor_site_rec.GLOBAL_ATTRIBUTE16;
565 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE17 := p_vendor_site_rec.GLOBAL_ATTRIBUTE17;
566 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE18 := p_vendor_site_rec.GLOBAL_ATTRIBUTE18;
567 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE19 := p_vendor_site_rec.GLOBAL_ATTRIBUTE19;
568 p_vendor_site_rec_a.GLOBAL_ATTRIBUTE20 := p_vendor_site_rec.GLOBAL_ATTRIBUTE20;
569 p_vendor_site_rec_a.TP_HEADER_ID := p_vendor_site_rec.TP_HEADER_ID;
570 p_vendor_site_rec_a.ECE_TP_LOCATION_CODE := p_vendor_site_rec.ECE_TP_LOCATION_CODE;
571 p_vendor_site_rec_a.PCARD_SITE_FLAG := p_vendor_site_rec.PCARD_SITE_FLAG;
572 p_vendor_site_rec_a.MATCH_OPTION := p_vendor_site_rec.MATCH_OPTION;
573 p_vendor_site_rec_a.COUNTRY_OF_ORIGIN_CODE := p_vendor_site_rec.COUNTRY_OF_ORIGIN_CODE;
574 p_vendor_site_rec_a.FUTURE_DATED_PAYMENT_CCID := p_vendor_site_rec.FUTURE_DATED_PAYMENT_CCID;
575 p_vendor_site_rec_a.CREATE_DEBIT_MEMO_FLAG := p_vendor_site_rec.CREATE_DEBIT_MEMO_FLAG;
576 p_vendor_site_rec_a.SUPPLIER_NOTIF_METHOD := p_vendor_site_rec.SUPPLIER_NOTIF_METHOD;
577 p_vendor_site_rec_a.EMAIL_ADDRESS := p_vendor_site_rec.EMAIL_ADDRESS;
578 p_vendor_site_rec_a.PRIMARY_PAY_SITE_FLAG := p_vendor_site_rec.PRIMARY_PAY_SITE_FLAG;
579 p_vendor_site_rec_a.SHIPPING_CONTROL := p_vendor_site_rec.SHIPPING_CONTROL;
580 p_vendor_site_rec_a.SELLING_COMPANY_IDENTIFIER := p_vendor_site_rec.SELLING_COMPANY_IDENTIFIER;
581 p_vendor_site_rec_a.GAPLESS_INV_NUM_FLAG := p_vendor_site_rec.GAPLESS_INV_NUM_FLAG;
582 p_vendor_site_rec_a.LOCATION_ID := p_vendor_site_rec.LOCATION_ID;
583 p_vendor_site_rec_a.PARTY_SITE_ID := p_vendor_site_rec.PARTY_SITE_ID;
584 p_vendor_site_rec_a.ORG_NAME := p_vendor_site_rec.ORG_NAME;
585 p_vendor_site_rec_a.DUNS_NUMBER := p_vendor_site_rec.DUNS_NUMBER;
586 p_vendor_site_rec_a.ADDRESS_STYLE := p_vendor_site_rec.ADDRESS_STYLE;
587 p_vendor_site_rec_a.LANGUAGE := p_vendor_site_rec.LANGUAGE;
588 p_vendor_site_rec_a.PROVINCE := p_vendor_site_rec.PROVINCE;
589 p_vendor_site_rec_a.COUNTRY := p_vendor_site_rec.COUNTRY;
590 p_vendor_site_rec_a.ADDRESS_LINE1 := p_vendor_site_rec.ADDRESS_LINE1;
591 p_vendor_site_rec_a.ADDRESS_LINE2 := p_vendor_site_rec.ADDRESS_LINE2;
592 p_vendor_site_rec_a.ADDRESS_LINE3 := p_vendor_site_rec.ADDRESS_LINE3;
593 p_vendor_site_rec_a.ADDRESS_LINE4 := p_vendor_site_rec.ADDRESS_LINE4;
594 p_vendor_site_rec_a.ADDRESS_LINES_ALT := p_vendor_site_rec.ADDRESS_LINES_ALT;
595 p_vendor_site_rec_a.COUNTY := p_vendor_site_rec.COUNTY;
596 p_vendor_site_rec_a.CITY := p_vendor_site_rec.CITY;
597 p_vendor_site_rec_a.STATE := p_vendor_site_rec.STATE;
598 p_vendor_site_rec_a.ZIP := p_vendor_site_rec.ZIP;
599 p_vendor_site_rec_a.TERMS_NAME := p_vendor_site_rec.TERMS_NAME;
600 p_vendor_site_rec_a.DEFAULT_TERMS_ID := p_vendor_site_rec.DEFAULT_TERMS_ID;
601 p_vendor_site_rec_a.AWT_GROUP_NAME := p_vendor_site_rec.AWT_GROUP_NAME;
602 p_vendor_site_rec_a.DISTRIBUTION_SET_NAME := p_vendor_site_rec.DISTRIBUTION_SET_NAME;
603 p_vendor_site_rec_a.SHIP_TO_LOCATION_CODE := p_vendor_site_rec.SHIP_TO_LOCATION_CODE;
604 p_vendor_site_rec_a.BILL_TO_LOCATION_CODE := p_vendor_site_rec.BILL_TO_LOCATION_CODE;
605 p_vendor_site_rec_a.DEFAULT_DIST_SET_ID := p_vendor_site_rec.DEFAULT_DIST_SET_ID;
606 p_vendor_site_rec_a.DEFAULT_SHIP_TO_LOC_ID := p_vendor_site_rec.DEFAULT_SHIP_TO_LOC_ID;
607 p_vendor_site_rec_a.DEFAULT_BILL_TO_LOC_ID := p_vendor_site_rec.DEFAULT_BILL_TO_LOC_ID;
608 p_vendor_site_rec_a.TOLERANCE_ID := p_vendor_site_rec.TOLERANCE_ID;
609 p_vendor_site_rec_a.TOLERANCE_NAME := p_vendor_site_rec.TOLERANCE_NAME;
610 p_vendor_site_rec_a.VENDOR_INTERFACE_ID := p_vendor_site_rec.VENDOR_INTERFACE_ID;
611 p_vendor_site_rec_a.VENDOR_SITE_INTERFACE_ID := p_vendor_site_rec.VENDOR_SITE_INTERFACE_ID;
612 p_vendor_site_rec_a.RETAINAGE_RATE := p_vendor_site_rec.RETAINAGE_RATE;
613
614 -- Call to AP APIs
615 AP_VENDOR_PUB_PKG.Update_Vendor_Site
616 ( p_api_version,
617 p_init_msg_list,
618 p_commit,
619 p_validation_level,
620 x_return_status,
621 x_msg_count,
622 x_msg_data,
623 p_vendor_site_rec_a,
624 p_vendor_site_id
625 );
626 END Update_Vendor_Site;
627 END;
628
629