[Home] [Help]
80: l_cvv2_setup VARCHAR2(1);
81: l_statement_address_setup VARCHAR2(1);
82:
83: begin
84: --ibe_util.enable_debug;
85: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
86: ibe_util.debug('Starting ibe_ord_oneclick_pvt.Get_Settings ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
87: END IF;
88: SAVEPOINT Get_Settings_Pvt;
81: l_statement_address_setup VARCHAR2(1);
82:
83: begin
84: --ibe_util.enable_debug;
85: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
86: ibe_util.debug('Starting ibe_ord_oneclick_pvt.Get_Settings ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
87: END IF;
88: SAVEPOINT Get_Settings_Pvt;
89: -- Standard call to check for call compatibility.
82:
83: begin
84: --ibe_util.enable_debug;
85: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
86: ibe_util.debug('Starting ibe_ord_oneclick_pvt.Get_Settings ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
87: END IF;
88: SAVEPOINT Get_Settings_Pvt;
89: -- Standard call to check for call compatibility.
90: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
102:
103: -- Initialize API rturn status to success
104: x_return_status := FND_API.g_ret_sts_success;
105:
106: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
107: ibe_util.debug('------- INPUT: -----------------');
108: ibe_util.debug('p_party_id :'||p_party_id);
109: ibe_util.debug('p_acct_id :'||p_acct_id);
110: END IF;
103: -- Initialize API rturn status to success
104: x_return_status := FND_API.g_ret_sts_success;
105:
106: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
107: ibe_util.debug('------- INPUT: -----------------');
108: ibe_util.debug('p_party_id :'||p_party_id);
109: ibe_util.debug('p_acct_id :'||p_acct_id);
110: END IF;
111:
104: x_return_status := FND_API.g_ret_sts_success;
105:
106: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
107: ibe_util.debug('------- INPUT: -----------------');
108: ibe_util.debug('p_party_id :'||p_party_id);
109: ibe_util.debug('p_acct_id :'||p_acct_id);
110: END IF;
111:
112: IBE_PAYMENT_INT_PVT.check_Payment_channel_setups(
105:
106: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
107: ibe_util.debug('------- INPUT: -----------------');
108: ibe_util.debug('p_party_id :'||p_party_id);
109: ibe_util.debug('p_acct_id :'||p_acct_id);
110: END IF;
111:
112: IBE_PAYMENT_INT_PVT.check_Payment_channel_setups(
113: p_api_version => p_api_version
119: ,x_msg_count => x_msg_count
120: ,x_msg_data => x_msg_data);
121:
122: if x_return_status <> FND_API.g_ret_sts_success then
123: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
124: ibe_util.debug('ibe_ord_oneclick_pvt.Get_Settings - IBY_PAYMENT_INT_PVT.check_Payment_channel_setups ' || x_return_status);
125: END IF;
126: if x_return_status = FND_API.G_RET_STS_ERROR then
127: RAISE FND_API.G_EXC_ERROR;
120: ,x_msg_data => x_msg_data);
121:
122: if x_return_status <> FND_API.g_ret_sts_success then
123: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
124: ibe_util.debug('ibe_ord_oneclick_pvt.Get_Settings - IBY_PAYMENT_INT_PVT.check_Payment_channel_setups ' || x_return_status);
125: END IF;
126: if x_return_status = FND_API.G_RET_STS_ERROR then
127: RAISE FND_API.G_EXC_ERROR;
128: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
151: x_ONECLICK_ID := FND_API.g_miss_num;
152: end if;
153: CLOSE c_settings;
154:
155: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
156: ibe_util.debug('------- Retrieved From TABLES: -----------------');
157: ibe_util.debug('x_OBJECT_VERSION_NUMBER :'||x_OBJECT_VERSION_NUMBER);
158: ibe_util.debug('x_ONECLICK_ID :'||x_ONECLICK_ID);
159: ibe_util.debug('x_ENABLED_FLAG :'||x_ENABLED_FLAG);
152: end if;
153: CLOSE c_settings;
154:
155: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
156: ibe_util.debug('------- Retrieved From TABLES: -----------------');
157: ibe_util.debug('x_OBJECT_VERSION_NUMBER :'||x_OBJECT_VERSION_NUMBER);
158: ibe_util.debug('x_ONECLICK_ID :'||x_ONECLICK_ID);
159: ibe_util.debug('x_ENABLED_FLAG :'||x_ENABLED_FLAG);
160: ibe_util.debug('x_FREIGHT_CODE :'||x_FREIGHT_CODE);
153: CLOSE c_settings;
154:
155: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
156: ibe_util.debug('------- Retrieved From TABLES: -----------------');
157: ibe_util.debug('x_OBJECT_VERSION_NUMBER :'||x_OBJECT_VERSION_NUMBER);
158: ibe_util.debug('x_ONECLICK_ID :'||x_ONECLICK_ID);
159: ibe_util.debug('x_ENABLED_FLAG :'||x_ENABLED_FLAG);
160: ibe_util.debug('x_FREIGHT_CODE :'||x_FREIGHT_CODE);
161: ibe_util.debug('x_PAYMENT_ID :'||x_PAYMENT_ID);
154:
155: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
156: ibe_util.debug('------- Retrieved From TABLES: -----------------');
157: ibe_util.debug('x_OBJECT_VERSION_NUMBER :'||x_OBJECT_VERSION_NUMBER);
158: ibe_util.debug('x_ONECLICK_ID :'||x_ONECLICK_ID);
159: ibe_util.debug('x_ENABLED_FLAG :'||x_ENABLED_FLAG);
160: ibe_util.debug('x_FREIGHT_CODE :'||x_FREIGHT_CODE);
161: ibe_util.debug('x_PAYMENT_ID :'||x_PAYMENT_ID);
162: ibe_util.debug('x_BILL_PTYSITE_ID :'||x_BILL_PTYSITE_ID);
155: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
156: ibe_util.debug('------- Retrieved From TABLES: -----------------');
157: ibe_util.debug('x_OBJECT_VERSION_NUMBER :'||x_OBJECT_VERSION_NUMBER);
158: ibe_util.debug('x_ONECLICK_ID :'||x_ONECLICK_ID);
159: ibe_util.debug('x_ENABLED_FLAG :'||x_ENABLED_FLAG);
160: ibe_util.debug('x_FREIGHT_CODE :'||x_FREIGHT_CODE);
161: ibe_util.debug('x_PAYMENT_ID :'||x_PAYMENT_ID);
162: ibe_util.debug('x_BILL_PTYSITE_ID :'||x_BILL_PTYSITE_ID);
163: ibe_util.debug('x_SHIP_PTYSITE_ID :'||x_SHIP_PTYSITE_ID);
156: ibe_util.debug('------- Retrieved From TABLES: -----------------');
157: ibe_util.debug('x_OBJECT_VERSION_NUMBER :'||x_OBJECT_VERSION_NUMBER);
158: ibe_util.debug('x_ONECLICK_ID :'||x_ONECLICK_ID);
159: ibe_util.debug('x_ENABLED_FLAG :'||x_ENABLED_FLAG);
160: ibe_util.debug('x_FREIGHT_CODE :'||x_FREIGHT_CODE);
161: ibe_util.debug('x_PAYMENT_ID :'||x_PAYMENT_ID);
162: ibe_util.debug('x_BILL_PTYSITE_ID :'||x_BILL_PTYSITE_ID);
163: ibe_util.debug('x_SHIP_PTYSITE_ID :'||x_SHIP_PTYSITE_ID);
164: ibe_util.debug('x_LAST_UPDATE_DATE :'||to_char(x_LAST_UPDATE_DATE,'DD-MON-YYYY:HH24:MI:SS'));
157: ibe_util.debug('x_OBJECT_VERSION_NUMBER :'||x_OBJECT_VERSION_NUMBER);
158: ibe_util.debug('x_ONECLICK_ID :'||x_ONECLICK_ID);
159: ibe_util.debug('x_ENABLED_FLAG :'||x_ENABLED_FLAG);
160: ibe_util.debug('x_FREIGHT_CODE :'||x_FREIGHT_CODE);
161: ibe_util.debug('x_PAYMENT_ID :'||x_PAYMENT_ID);
162: ibe_util.debug('x_BILL_PTYSITE_ID :'||x_BILL_PTYSITE_ID);
163: ibe_util.debug('x_SHIP_PTYSITE_ID :'||x_SHIP_PTYSITE_ID);
164: ibe_util.debug('x_LAST_UPDATE_DATE :'||to_char(x_LAST_UPDATE_DATE,'DD-MON-YYYY:HH24:MI:SS'));
165: END IF;
158: ibe_util.debug('x_ONECLICK_ID :'||x_ONECLICK_ID);
159: ibe_util.debug('x_ENABLED_FLAG :'||x_ENABLED_FLAG);
160: ibe_util.debug('x_FREIGHT_CODE :'||x_FREIGHT_CODE);
161: ibe_util.debug('x_PAYMENT_ID :'||x_PAYMENT_ID);
162: ibe_util.debug('x_BILL_PTYSITE_ID :'||x_BILL_PTYSITE_ID);
163: ibe_util.debug('x_SHIP_PTYSITE_ID :'||x_SHIP_PTYSITE_ID);
164: ibe_util.debug('x_LAST_UPDATE_DATE :'||to_char(x_LAST_UPDATE_DATE,'DD-MON-YYYY:HH24:MI:SS'));
165: END IF;
166:
159: ibe_util.debug('x_ENABLED_FLAG :'||x_ENABLED_FLAG);
160: ibe_util.debug('x_FREIGHT_CODE :'||x_FREIGHT_CODE);
161: ibe_util.debug('x_PAYMENT_ID :'||x_PAYMENT_ID);
162: ibe_util.debug('x_BILL_PTYSITE_ID :'||x_BILL_PTYSITE_ID);
163: ibe_util.debug('x_SHIP_PTYSITE_ID :'||x_SHIP_PTYSITE_ID);
164: ibe_util.debug('x_LAST_UPDATE_DATE :'||to_char(x_LAST_UPDATE_DATE,'DD-MON-YYYY:HH24:MI:SS'));
165: END IF;
166:
167: open c_email_addr(p_party_id);
160: ibe_util.debug('x_FREIGHT_CODE :'||x_FREIGHT_CODE);
161: ibe_util.debug('x_PAYMENT_ID :'||x_PAYMENT_ID);
162: ibe_util.debug('x_BILL_PTYSITE_ID :'||x_BILL_PTYSITE_ID);
163: ibe_util.debug('x_SHIP_PTYSITE_ID :'||x_SHIP_PTYSITE_ID);
164: ibe_util.debug('x_LAST_UPDATE_DATE :'||to_char(x_LAST_UPDATE_DATE,'DD-MON-YYYY:HH24:MI:SS'));
165: END IF;
166:
167: open c_email_addr(p_party_id);
168: fetch c_email_addr into x_EMAIL_ADDRESS;
167: open c_email_addr(p_party_id);
168: fetch c_email_addr into x_EMAIL_ADDRESS;
169: close c_email_addr;
170:
171: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
172: ibe_util.debug('x_EMAIL_ADDRESS :'||x_EMAIL_ADDRESS);
173: END IF;
174: l_org_id := MO_GLOBAL.get_current_org_id();
175: -- in case of a single org env the feature of addr usages is unsupported
168: fetch c_email_addr into x_EMAIL_ADDRESS;
169: close c_email_addr;
170:
171: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
172: ibe_util.debug('x_EMAIL_ADDRESS :'||x_EMAIL_ADDRESS);
173: END IF;
174: l_org_id := MO_GLOBAL.get_current_org_id();
175: -- in case of a single org env the feature of addr usages is unsupported
176: if (l_org_id is not null and l_org_id <> 0) then
179:
180: if (x_BILL_PTYSITE_ID is not null) then
181: -- call address validation apis; if either is not valid turn settings off
182: l_usage_codes(1) := 'BILL_TO_COUNTRY';
183: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
184: ibe_util.debug('Calling IBE_ADDRESS_V2PVT.valid_usages ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
185: ibe_util.debug(' party_site_id: ' || x_BILL_PTYSITE_ID);
186: ibe_util.debug(' operating_unit_id: ' || l_org_id);
187: ibe_util.debug(' usage_code: ' || l_usage_codes(1));
180: if (x_BILL_PTYSITE_ID is not null) then
181: -- call address validation apis; if either is not valid turn settings off
182: l_usage_codes(1) := 'BILL_TO_COUNTRY';
183: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
184: ibe_util.debug('Calling IBE_ADDRESS_V2PVT.valid_usages ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
185: ibe_util.debug(' party_site_id: ' || x_BILL_PTYSITE_ID);
186: ibe_util.debug(' operating_unit_id: ' || l_org_id);
187: ibe_util.debug(' usage_code: ' || l_usage_codes(1));
188: END IF;
181: -- call address validation apis; if either is not valid turn settings off
182: l_usage_codes(1) := 'BILL_TO_COUNTRY';
183: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
184: ibe_util.debug('Calling IBE_ADDRESS_V2PVT.valid_usages ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
185: ibe_util.debug(' party_site_id: ' || x_BILL_PTYSITE_ID);
186: ibe_util.debug(' operating_unit_id: ' || l_org_id);
187: ibe_util.debug(' usage_code: ' || l_usage_codes(1));
188: END IF;
189: IBE_ADDRESS_V2PVT.valid_usages (
182: l_usage_codes(1) := 'BILL_TO_COUNTRY';
183: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
184: ibe_util.debug('Calling IBE_ADDRESS_V2PVT.valid_usages ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
185: ibe_util.debug(' party_site_id: ' || x_BILL_PTYSITE_ID);
186: ibe_util.debug(' operating_unit_id: ' || l_org_id);
187: ibe_util.debug(' usage_code: ' || l_usage_codes(1));
188: END IF;
189: IBE_ADDRESS_V2PVT.valid_usages (
190: p_api_version => l_api_version,
183: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
184: ibe_util.debug('Calling IBE_ADDRESS_V2PVT.valid_usages ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
185: ibe_util.debug(' party_site_id: ' || x_BILL_PTYSITE_ID);
186: ibe_util.debug(' operating_unit_id: ' || l_org_id);
187: ibe_util.debug(' usage_code: ' || l_usage_codes(1));
188: END IF;
189: IBE_ADDRESS_V2PVT.valid_usages (
190: p_api_version => l_api_version,
191: p_init_msg_list => FND_API.G_FALSE,
195: x_return_codes => l_return_codes,
196: x_return_status => x_return_status,
197: x_msg_count => x_msg_count,
198: x_msg_data => x_msg_data );
199: --ibe_util.enable_debug;
200: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
201: ibe_util.debug('Back from IBE_ADDRESS_V2PVT.valid_usages ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
202: ibe_util.debug(' return_code: ' || l_return_codes(1));
203: END IF;
196: x_return_status => x_return_status,
197: x_msg_count => x_msg_count,
198: x_msg_data => x_msg_data );
199: --ibe_util.enable_debug;
200: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
201: ibe_util.debug('Back from IBE_ADDRESS_V2PVT.valid_usages ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
202: ibe_util.debug(' return_code: ' || l_return_codes(1));
203: END IF;
204:
197: x_msg_count => x_msg_count,
198: x_msg_data => x_msg_data );
199: --ibe_util.enable_debug;
200: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
201: ibe_util.debug('Back from IBE_ADDRESS_V2PVT.valid_usages ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
202: ibe_util.debug(' return_code: ' || l_return_codes(1));
203: END IF;
204:
205: if x_return_status <> FND_API.g_ret_sts_success then
198: x_msg_data => x_msg_data );
199: --ibe_util.enable_debug;
200: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
201: ibe_util.debug('Back from IBE_ADDRESS_V2PVT.valid_usages ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
202: ibe_util.debug(' return_code: ' || l_return_codes(1));
203: END IF;
204:
205: if x_return_status <> FND_API.g_ret_sts_success then
206: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
202: ibe_util.debug(' return_code: ' || l_return_codes(1));
203: END IF;
204:
205: if x_return_status <> FND_API.g_ret_sts_success then
206: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
207: ibe_util.debug('ibe_ord_oneclick_pvt.Get_Settings - non success status from IBE_ADDRESS_V2PVT.valid_usages: ' || x_return_status);
208: END IF;
209: FND_MESSAGE.SET_NAME('IBE','IBE_EXPR_PLSQL_API_ERROR');
210: FND_MESSAGE.SET_TOKEN ( '0' , 'Get_Settings - IBE_ADDRESS_V2PVT.valid_usages' );
203: END IF;
204:
205: if x_return_status <> FND_API.g_ret_sts_success then
206: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
207: ibe_util.debug('ibe_ord_oneclick_pvt.Get_Settings - non success status from IBE_ADDRESS_V2PVT.valid_usages: ' || x_return_status);
208: END IF;
209: FND_MESSAGE.SET_NAME('IBE','IBE_EXPR_PLSQL_API_ERROR');
210: FND_MESSAGE.SET_TOKEN ( '0' , 'Get_Settings - IBE_ADDRESS_V2PVT.valid_usages' );
211: FND_MESSAGE.SET_TOKEN ( '1' , x_return_status );
225:
226: if (x_SHIP_PTYSITE_ID is not null) then
227: -- call address validation apis; if either is not valid turn settings off
228: l_usage_codes(1) := 'SHIP_TO_COUNTRY';
229: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
230: ibe_util.debug('Calling IBE_ADDRESS_V2PVT.valid_usages ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
231: ibe_util.debug(' party_site_id: ' || x_SHIP_PTYSITE_ID);
232: ibe_util.debug(' operating_unit_id: ' || l_org_id);
233: ibe_util.debug(' usage_code: ' || l_usage_codes(1));
226: if (x_SHIP_PTYSITE_ID is not null) then
227: -- call address validation apis; if either is not valid turn settings off
228: l_usage_codes(1) := 'SHIP_TO_COUNTRY';
229: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
230: ibe_util.debug('Calling IBE_ADDRESS_V2PVT.valid_usages ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
231: ibe_util.debug(' party_site_id: ' || x_SHIP_PTYSITE_ID);
232: ibe_util.debug(' operating_unit_id: ' || l_org_id);
233: ibe_util.debug(' usage_code: ' || l_usage_codes(1));
234: END IF;
227: -- call address validation apis; if either is not valid turn settings off
228: l_usage_codes(1) := 'SHIP_TO_COUNTRY';
229: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
230: ibe_util.debug('Calling IBE_ADDRESS_V2PVT.valid_usages ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
231: ibe_util.debug(' party_site_id: ' || x_SHIP_PTYSITE_ID);
232: ibe_util.debug(' operating_unit_id: ' || l_org_id);
233: ibe_util.debug(' usage_code: ' || l_usage_codes(1));
234: END IF;
235: IBE_ADDRESS_V2PVT.valid_usages (
228: l_usage_codes(1) := 'SHIP_TO_COUNTRY';
229: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
230: ibe_util.debug('Calling IBE_ADDRESS_V2PVT.valid_usages ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
231: ibe_util.debug(' party_site_id: ' || x_SHIP_PTYSITE_ID);
232: ibe_util.debug(' operating_unit_id: ' || l_org_id);
233: ibe_util.debug(' usage_code: ' || l_usage_codes(1));
234: END IF;
235: IBE_ADDRESS_V2PVT.valid_usages (
236: p_api_version => l_api_version,
229: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
230: ibe_util.debug('Calling IBE_ADDRESS_V2PVT.valid_usages ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
231: ibe_util.debug(' party_site_id: ' || x_SHIP_PTYSITE_ID);
232: ibe_util.debug(' operating_unit_id: ' || l_org_id);
233: ibe_util.debug(' usage_code: ' || l_usage_codes(1));
234: END IF;
235: IBE_ADDRESS_V2PVT.valid_usages (
236: p_api_version => l_api_version,
237: p_init_msg_list => FND_API.G_FALSE,
241: x_return_codes => l_return_codes,
242: x_return_status => x_return_status,
243: x_msg_count => x_msg_count,
244: x_msg_data => x_msg_data );
245: --ibe_util.enable_debug;
246: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
247: ibe_util.debug('Back from IBE_ADDRESS_V2PVT.valid_usages ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
248: ibe_util.debug(' return_code: ' || l_return_codes(1));
249: END IF;
242: x_return_status => x_return_status,
243: x_msg_count => x_msg_count,
244: x_msg_data => x_msg_data );
245: --ibe_util.enable_debug;
246: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
247: ibe_util.debug('Back from IBE_ADDRESS_V2PVT.valid_usages ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
248: ibe_util.debug(' return_code: ' || l_return_codes(1));
249: END IF;
250:
243: x_msg_count => x_msg_count,
244: x_msg_data => x_msg_data );
245: --ibe_util.enable_debug;
246: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
247: ibe_util.debug('Back from IBE_ADDRESS_V2PVT.valid_usages ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
248: ibe_util.debug(' return_code: ' || l_return_codes(1));
249: END IF;
250:
251: if x_return_status <> FND_API.g_ret_sts_success then
244: x_msg_data => x_msg_data );
245: --ibe_util.enable_debug;
246: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
247: ibe_util.debug('Back from IBE_ADDRESS_V2PVT.valid_usages ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
248: ibe_util.debug(' return_code: ' || l_return_codes(1));
249: END IF;
250:
251: if x_return_status <> FND_API.g_ret_sts_success then
252: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
248: ibe_util.debug(' return_code: ' || l_return_codes(1));
249: END IF;
250:
251: if x_return_status <> FND_API.g_ret_sts_success then
252: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
253: ibe_util.debug('ibe_ord_oneclick_pvt.Get_Settings - non success status from IBE_ADDRESS_V2PVT.valid_usages: ' || x_return_status);
254: END IF;
255: FND_MESSAGE.SET_NAME('IBE','IBE_EXPR_PLSQL_API_ERROR');
256: FND_MESSAGE.SET_TOKEN ( '0' , 'Get_Settings - IBE_ADDRESS_V2PVT.valid_usages' );
249: END IF;
250:
251: if x_return_status <> FND_API.g_ret_sts_success then
252: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
253: ibe_util.debug('ibe_ord_oneclick_pvt.Get_Settings - non success status from IBE_ADDRESS_V2PVT.valid_usages: ' || x_return_status);
254: END IF;
255: FND_MESSAGE.SET_NAME('IBE','IBE_EXPR_PLSQL_API_ERROR');
256: FND_MESSAGE.SET_TOKEN ( '0' , 'Get_Settings - IBE_ADDRESS_V2PVT.valid_usages' );
257: FND_MESSAGE.SET_TOKEN ( '1' , x_return_status );
271:
272: if (l_save_flag = 'Y') then
273: x_ENABLED_FLAG := 'N';
274: -- we can assume we have a row of data
275: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
276: ibe_util.debug('One or more addresses were not valid for this orgid for that usage. Updating the settings row...');
277: ibe_util.debug('x_ENABLED_FLAG :'||x_ENABLED_FLAG);
278: ibe_util.debug('x_BILL_PTYSITE_ID :'||x_BILL_PTYSITE_ID);
279: ibe_util.debug('x_SHIP_PTYSITE_ID :'||x_SHIP_PTYSITE_ID);
272: if (l_save_flag = 'Y') then
273: x_ENABLED_FLAG := 'N';
274: -- we can assume we have a row of data
275: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
276: ibe_util.debug('One or more addresses were not valid for this orgid for that usage. Updating the settings row...');
277: ibe_util.debug('x_ENABLED_FLAG :'||x_ENABLED_FLAG);
278: ibe_util.debug('x_BILL_PTYSITE_ID :'||x_BILL_PTYSITE_ID);
279: ibe_util.debug('x_SHIP_PTYSITE_ID :'||x_SHIP_PTYSITE_ID);
280: END IF;
273: x_ENABLED_FLAG := 'N';
274: -- we can assume we have a row of data
275: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
276: ibe_util.debug('One or more addresses were not valid for this orgid for that usage. Updating the settings row...');
277: ibe_util.debug('x_ENABLED_FLAG :'||x_ENABLED_FLAG);
278: ibe_util.debug('x_BILL_PTYSITE_ID :'||x_BILL_PTYSITE_ID);
279: ibe_util.debug('x_SHIP_PTYSITE_ID :'||x_SHIP_PTYSITE_ID);
280: END IF;
281:
274: -- we can assume we have a row of data
275: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
276: ibe_util.debug('One or more addresses were not valid for this orgid for that usage. Updating the settings row...');
277: ibe_util.debug('x_ENABLED_FLAG :'||x_ENABLED_FLAG);
278: ibe_util.debug('x_BILL_PTYSITE_ID :'||x_BILL_PTYSITE_ID);
279: ibe_util.debug('x_SHIP_PTYSITE_ID :'||x_SHIP_PTYSITE_ID);
280: END IF;
281:
282: update IBE_ORD_ONECLICK
275: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
276: ibe_util.debug('One or more addresses were not valid for this orgid for that usage. Updating the settings row...');
277: ibe_util.debug('x_ENABLED_FLAG :'||x_ENABLED_FLAG);
278: ibe_util.debug('x_BILL_PTYSITE_ID :'||x_BILL_PTYSITE_ID);
279: ibe_util.debug('x_SHIP_PTYSITE_ID :'||x_SHIP_PTYSITE_ID);
280: END IF;
281:
282: update IBE_ORD_ONECLICK
283: set enabled_flag = x_ENABLED_FLAG,
289: where
290: ord_oneclick_id = x_ONECLICK_ID;
291:
292: x_OBJECT_VERSION_NUMBER := x_OBJECT_VERSION_NUMBER + 1;
293: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
294: ibe_util.debug('x_OBJECT_VERSION_NUMBER :'||x_OBJECT_VERSION_NUMBER);
295: END IF;
296: end if;
297: end if; -- end of if l_org_id_s is not null
290: ord_oneclick_id = x_ONECLICK_ID;
291:
292: x_OBJECT_VERSION_NUMBER := x_OBJECT_VERSION_NUMBER + 1;
293: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
294: ibe_util.debug('x_OBJECT_VERSION_NUMBER :'||x_OBJECT_VERSION_NUMBER);
295: END IF;
296: end if;
297: end if; -- end of if l_org_id_s is not null
298:
297: end if; -- end of if l_org_id_s is not null
298:
299: end if ; --if l_cvv2_setup
300:
301: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
302: ibe_util.debug('Done with ibe_ord_oneclick_pvt.Get_Settings ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
303: END IF;
304:
305: IF FND_API.To_Boolean( p_commit ) THEN
298:
299: end if ; --if l_cvv2_setup
300:
301: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
302: ibe_util.debug('Done with ibe_ord_oneclick_pvt.Get_Settings ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
303: END IF;
304:
305: IF FND_API.To_Boolean( p_commit ) THEN
306: COMMIT WORK;
309: ( p_encoded => FND_API.G_FALSE,
310: p_count => x_msg_count,
311: p_data => x_msg_data
312: );
313: --ibe_util.disable_debug;
314:
315: EXCEPTION
316: WHEN FND_API.G_EXC_ERROR THEN
317: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
313: --ibe_util.disable_debug;
314:
315: EXCEPTION
316: WHEN FND_API.G_EXC_ERROR THEN
317: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
318: ibe_util.debug('ibe_ord_oneclick_pvt.Get_Settings: EXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
319: END IF;
320: ROLLBACK TO Get_Settings_Pvt;
321: x_return_status := FND_API.G_RET_STS_ERROR ;
314:
315: EXCEPTION
316: WHEN FND_API.G_EXC_ERROR THEN
317: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
318: ibe_util.debug('ibe_ord_oneclick_pvt.Get_Settings: EXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
319: END IF;
320: ROLLBACK TO Get_Settings_Pvt;
321: x_return_status := FND_API.G_RET_STS_ERROR ;
322: FND_MSG_PUB.Count_And_Get
323: ( p_encoded => FND_API.G_FALSE,
324: p_count => x_msg_count,
325: p_data => x_msg_data
326: );
327: --ibe_util.disable_debug;
328: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
329: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
330: ibe_util.debug('ibe_ord_oneclick_pvt.Get_Settings: UNEXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
331: END IF;
325: p_data => x_msg_data
326: );
327: --ibe_util.disable_debug;
328: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
329: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
330: ibe_util.debug('ibe_ord_oneclick_pvt.Get_Settings: UNEXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
331: END IF;
332: ROLLBACK TO Get_Settings_Pvt;
333: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
326: );
327: --ibe_util.disable_debug;
328: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
329: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
330: ibe_util.debug('ibe_ord_oneclick_pvt.Get_Settings: UNEXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
331: END IF;
332: ROLLBACK TO Get_Settings_Pvt;
333: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
334: FND_MSG_PUB.Count_And_Get
335: ( p_encoded => FND_API.G_FALSE,
336: p_count => x_msg_count,
337: p_data => x_msg_data
338: );
339: --ibe_util.disable_debug;
340: WHEN OTHERS THEN
341: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
342: ibe_util.debug('ibe_ord_oneclick_pvt.Get_Settings: OTHER EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
343: END IF;
337: p_data => x_msg_data
338: );
339: --ibe_util.disable_debug;
340: WHEN OTHERS THEN
341: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
342: ibe_util.debug('ibe_ord_oneclick_pvt.Get_Settings: OTHER EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
343: END IF;
344: ROLLBACK TO Get_Settings_Pvt;
345: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
338: );
339: --ibe_util.disable_debug;
340: WHEN OTHERS THEN
341: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
342: ibe_util.debug('ibe_ord_oneclick_pvt.Get_Settings: OTHER EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
343: END IF;
344: ROLLBACK TO Get_Settings_Pvt;
345: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
346: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
354: ( p_encoded => FND_API.G_FALSE,
355: p_count => x_msg_count,
356: p_data => x_msg_data
357: );
358: --ibe_util.disable_debug;
359: end Get_Settings;
360:
361: /*-----------------------------------------------------------------------------
362:
396: from IBE_ORD_ONECLICK
397: where party_id = c_party_id and cust_account_id = c_acct_id;
398:
399: begin
400: -- ibe_util.enable_debug;
401: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
402: ibe_util.debug('Starting ibe_ord_oneclick_pvt.Save_Settings ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
403: END IF;
404: SAVEPOINT Save_Settings_Pvt;
397: where party_id = c_party_id and cust_account_id = c_acct_id;
398:
399: begin
400: -- ibe_util.enable_debug;
401: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
402: ibe_util.debug('Starting ibe_ord_oneclick_pvt.Save_Settings ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
403: END IF;
404: SAVEPOINT Save_Settings_Pvt;
405: -- Standard call to check for call compatibility.
398:
399: begin
400: -- ibe_util.enable_debug;
401: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
402: ibe_util.debug('Starting ibe_ord_oneclick_pvt.Save_Settings ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
403: END IF;
404: SAVEPOINT Save_Settings_Pvt;
405: -- Standard call to check for call compatibility.
406: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
416: END IF;
417:
418: -- Initialize API rturn status to success
419: x_return_status := FND_API.g_ret_sts_success;
420: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
421: ibe_util.debug('-------------Input Parameters ----------');
422: ibe_util.debug('party_id :'||p_party_id);
423: ibe_util.debug('account_id :'||p_acct_id);
424: ibe_util.debug('p_OBJECT_VERSION_NUMBER :'||p_OBJECT_VERSION_NUMBER);
417:
418: -- Initialize API rturn status to success
419: x_return_status := FND_API.g_ret_sts_success;
420: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
421: ibe_util.debug('-------------Input Parameters ----------');
422: ibe_util.debug('party_id :'||p_party_id);
423: ibe_util.debug('account_id :'||p_acct_id);
424: ibe_util.debug('p_OBJECT_VERSION_NUMBER :'||p_OBJECT_VERSION_NUMBER);
425: ibe_util.debug('p_ENABLED_FLAG :'||p_ENABLED_FLAG);
418: -- Initialize API rturn status to success
419: x_return_status := FND_API.g_ret_sts_success;
420: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
421: ibe_util.debug('-------------Input Parameters ----------');
422: ibe_util.debug('party_id :'||p_party_id);
423: ibe_util.debug('account_id :'||p_acct_id);
424: ibe_util.debug('p_OBJECT_VERSION_NUMBER :'||p_OBJECT_VERSION_NUMBER);
425: ibe_util.debug('p_ENABLED_FLAG :'||p_ENABLED_FLAG);
426: ibe_util.debug('p_FREIGHT_CODE :'||p_FREIGHT_CODE);
419: x_return_status := FND_API.g_ret_sts_success;
420: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
421: ibe_util.debug('-------------Input Parameters ----------');
422: ibe_util.debug('party_id :'||p_party_id);
423: ibe_util.debug('account_id :'||p_acct_id);
424: ibe_util.debug('p_OBJECT_VERSION_NUMBER :'||p_OBJECT_VERSION_NUMBER);
425: ibe_util.debug('p_ENABLED_FLAG :'||p_ENABLED_FLAG);
426: ibe_util.debug('p_FREIGHT_CODE :'||p_FREIGHT_CODE);
427: ibe_util.debug('p_PAYMENT_ID :'||p_PAYMENT_ID);
420: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
421: ibe_util.debug('-------------Input Parameters ----------');
422: ibe_util.debug('party_id :'||p_party_id);
423: ibe_util.debug('account_id :'||p_acct_id);
424: ibe_util.debug('p_OBJECT_VERSION_NUMBER :'||p_OBJECT_VERSION_NUMBER);
425: ibe_util.debug('p_ENABLED_FLAG :'||p_ENABLED_FLAG);
426: ibe_util.debug('p_FREIGHT_CODE :'||p_FREIGHT_CODE);
427: ibe_util.debug('p_PAYMENT_ID :'||p_PAYMENT_ID);
428: ibe_util.debug('p_BILL_PTYSITE_ID :'||p_BILL_PTYSITE_ID);
421: ibe_util.debug('-------------Input Parameters ----------');
422: ibe_util.debug('party_id :'||p_party_id);
423: ibe_util.debug('account_id :'||p_acct_id);
424: ibe_util.debug('p_OBJECT_VERSION_NUMBER :'||p_OBJECT_VERSION_NUMBER);
425: ibe_util.debug('p_ENABLED_FLAG :'||p_ENABLED_FLAG);
426: ibe_util.debug('p_FREIGHT_CODE :'||p_FREIGHT_CODE);
427: ibe_util.debug('p_PAYMENT_ID :'||p_PAYMENT_ID);
428: ibe_util.debug('p_BILL_PTYSITE_ID :'||p_BILL_PTYSITE_ID);
429: ibe_util.debug('p_SHIP_PTYSITE_ID :'||p_SHIP_PTYSITE_ID);
422: ibe_util.debug('party_id :'||p_party_id);
423: ibe_util.debug('account_id :'||p_acct_id);
424: ibe_util.debug('p_OBJECT_VERSION_NUMBER :'||p_OBJECT_VERSION_NUMBER);
425: ibe_util.debug('p_ENABLED_FLAG :'||p_ENABLED_FLAG);
426: ibe_util.debug('p_FREIGHT_CODE :'||p_FREIGHT_CODE);
427: ibe_util.debug('p_PAYMENT_ID :'||p_PAYMENT_ID);
428: ibe_util.debug('p_BILL_PTYSITE_ID :'||p_BILL_PTYSITE_ID);
429: ibe_util.debug('p_SHIP_PTYSITE_ID :'||p_SHIP_PTYSITE_ID);
430: ibe_util.debug('----------Input Parameters /end --------');
423: ibe_util.debug('account_id :'||p_acct_id);
424: ibe_util.debug('p_OBJECT_VERSION_NUMBER :'||p_OBJECT_VERSION_NUMBER);
425: ibe_util.debug('p_ENABLED_FLAG :'||p_ENABLED_FLAG);
426: ibe_util.debug('p_FREIGHT_CODE :'||p_FREIGHT_CODE);
427: ibe_util.debug('p_PAYMENT_ID :'||p_PAYMENT_ID);
428: ibe_util.debug('p_BILL_PTYSITE_ID :'||p_BILL_PTYSITE_ID);
429: ibe_util.debug('p_SHIP_PTYSITE_ID :'||p_SHIP_PTYSITE_ID);
430: ibe_util.debug('----------Input Parameters /end --------');
431: END IF;
424: ibe_util.debug('p_OBJECT_VERSION_NUMBER :'||p_OBJECT_VERSION_NUMBER);
425: ibe_util.debug('p_ENABLED_FLAG :'||p_ENABLED_FLAG);
426: ibe_util.debug('p_FREIGHT_CODE :'||p_FREIGHT_CODE);
427: ibe_util.debug('p_PAYMENT_ID :'||p_PAYMENT_ID);
428: ibe_util.debug('p_BILL_PTYSITE_ID :'||p_BILL_PTYSITE_ID);
429: ibe_util.debug('p_SHIP_PTYSITE_ID :'||p_SHIP_PTYSITE_ID);
430: ibe_util.debug('----------Input Parameters /end --------');
431: END IF;
432:
425: ibe_util.debug('p_ENABLED_FLAG :'||p_ENABLED_FLAG);
426: ibe_util.debug('p_FREIGHT_CODE :'||p_FREIGHT_CODE);
427: ibe_util.debug('p_PAYMENT_ID :'||p_PAYMENT_ID);
428: ibe_util.debug('p_BILL_PTYSITE_ID :'||p_BILL_PTYSITE_ID);
429: ibe_util.debug('p_SHIP_PTYSITE_ID :'||p_SHIP_PTYSITE_ID);
430: ibe_util.debug('----------Input Parameters /end --------');
431: END IF;
432:
433: open c_oneclick_row(p_party_id, p_acct_id);
426: ibe_util.debug('p_FREIGHT_CODE :'||p_FREIGHT_CODE);
427: ibe_util.debug('p_PAYMENT_ID :'||p_PAYMENT_ID);
428: ibe_util.debug('p_BILL_PTYSITE_ID :'||p_BILL_PTYSITE_ID);
429: ibe_util.debug('p_SHIP_PTYSITE_ID :'||p_SHIP_PTYSITE_ID);
430: ibe_util.debug('----------Input Parameters /end --------');
431: END IF;
432:
433: open c_oneclick_row(p_party_id, p_acct_id);
434: fetch c_oneclick_row into l_oneclick_id;
433: open c_oneclick_row(p_party_id, p_acct_id);
434: fetch c_oneclick_row into l_oneclick_id;
435:
436: if c_oneclick_row%NOTFOUND then
437: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
438: ibe_util.debug('ibe_ord_oneclick_pvt.Save_Settings - inserting new row');
439: END IF;
440: insert into IBE_ORD_ONECLICK_ALL (
441: object_version_number,
434: fetch c_oneclick_row into l_oneclick_id;
435:
436: if c_oneclick_row%NOTFOUND then
437: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
438: ibe_util.debug('ibe_ord_oneclick_pvt.Save_Settings - inserting new row');
439: END IF;
440: insert into IBE_ORD_ONECLICK_ALL (
441: object_version_number,
442: ord_oneclick_id,
466: SYSDATE,
467: FND_GLOBAL.user_id,
468: SYSDATE)
469: returning ord_oneclick_id into l_oneclick_id;
470: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
471: ibe_util.debug('ibe_ord_oneclick_pvt.Save_Settings - new ord_oneclick_id: ' || to_char(l_oneclick_id));
472: END IF;
473: else
474: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
467: FND_GLOBAL.user_id,
468: SYSDATE)
469: returning ord_oneclick_id into l_oneclick_id;
470: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
471: ibe_util.debug('ibe_ord_oneclick_pvt.Save_Settings - new ord_oneclick_id: ' || to_char(l_oneclick_id));
472: END IF;
473: else
474: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
475: ibe_util.debug('ibe_ord_oneclick_pvt.Save_Settings - updating row');
470: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
471: ibe_util.debug('ibe_ord_oneclick_pvt.Save_Settings - new ord_oneclick_id: ' || to_char(l_oneclick_id));
472: END IF;
473: else
474: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
475: ibe_util.debug('ibe_ord_oneclick_pvt.Save_Settings - updating row');
476: END IF;
477: update IBE_ORD_ONECLICK
478: set
471: ibe_util.debug('ibe_ord_oneclick_pvt.Save_Settings - new ord_oneclick_id: ' || to_char(l_oneclick_id));
472: END IF;
473: else
474: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
475: ibe_util.debug('ibe_ord_oneclick_pvt.Save_Settings - updating row');
476: END IF;
477: update IBE_ORD_ONECLICK
478: set
479: object_version_number = p_OBJECT_VERSION_NUMBER + 1,
497: END IF;
498: end if;
499: close c_oneclick_row;
500:
501: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
502: ibe_util.debug('Done with ibe_ord_oneclick_pvt.Save_Settings ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
503: END IF;
504: IF FND_API.To_Boolean( p_commit ) THEN
505: COMMIT WORK;
498: end if;
499: close c_oneclick_row;
500:
501: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
502: ibe_util.debug('Done with ibe_ord_oneclick_pvt.Save_Settings ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
503: END IF;
504: IF FND_API.To_Boolean( p_commit ) THEN
505: COMMIT WORK;
506: END IF;
509: ( p_encoded => FND_API.G_FALSE,
510: p_count => x_msg_count,
511: p_data => x_msg_data
512: );
513: --ibe_util.disable_debug;
514: EXCEPTION
515: WHEN FND_API.G_EXC_ERROR THEN
516: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
517: ibe_util.debug('ibe_ord_oneclick_pvt.Save_Settings: EXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
512: );
513: --ibe_util.disable_debug;
514: EXCEPTION
515: WHEN FND_API.G_EXC_ERROR THEN
516: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
517: ibe_util.debug('ibe_ord_oneclick_pvt.Save_Settings: EXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
518: END IF;
519: ROLLBACK TO Save_Settings_Pvt;
520: x_return_status := FND_API.G_RET_STS_ERROR ;
513: --ibe_util.disable_debug;
514: EXCEPTION
515: WHEN FND_API.G_EXC_ERROR THEN
516: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
517: ibe_util.debug('ibe_ord_oneclick_pvt.Save_Settings: EXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
518: END IF;
519: ROLLBACK TO Save_Settings_Pvt;
520: x_return_status := FND_API.G_RET_STS_ERROR ;
521: FND_MSG_PUB.Count_And_Get
522: ( p_encoded => FND_API.G_FALSE,
523: p_count => x_msg_count,
524: p_data => x_msg_data
525: );
526: --ibe_util.disable_debug;
527: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
528: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
529: ibe_util.debug('ibe_ord_oneclick_pvt.Save_Settings: UNEXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
530: END IF;
524: p_data => x_msg_data
525: );
526: --ibe_util.disable_debug;
527: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
528: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
529: ibe_util.debug('ibe_ord_oneclick_pvt.Save_Settings: UNEXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
530: END IF;
531: ROLLBACK TO Save_Settings_Pvt;
532: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
525: );
526: --ibe_util.disable_debug;
527: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
528: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
529: ibe_util.debug('ibe_ord_oneclick_pvt.Save_Settings: UNEXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
530: END IF;
531: ROLLBACK TO Save_Settings_Pvt;
532: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
533: FND_MSG_PUB.Count_And_Get
534: ( p_encoded => FND_API.G_FALSE,
535: p_count => x_msg_count,
536: p_data => x_msg_data
537: );
538: --ibe_util.disable_debug;
539: WHEN OTHERS THEN
540: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
541: ibe_util.debug('ibe_ord_oneclick_pvt.Save_Settings: OTHER EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
542: END IF;
536: p_data => x_msg_data
537: );
538: --ibe_util.disable_debug;
539: WHEN OTHERS THEN
540: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
541: ibe_util.debug('ibe_ord_oneclick_pvt.Save_Settings: OTHER EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
542: END IF;
543: ROLLBACK TO Save_Settings_Pvt;
544: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
537: );
538: --ibe_util.disable_debug;
539: WHEN OTHERS THEN
540: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
541: ibe_util.debug('ibe_ord_oneclick_pvt.Save_Settings: OTHER EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
542: END IF;
543: ROLLBACK TO Save_Settings_Pvt;
544: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
545: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
553: ( p_encoded => FND_API.G_FALSE,
554: p_count => x_msg_count,
555: p_data => x_msg_data
556: );
557: --ibe_util.disable_debug;
558: end Save_Settings;
559:
560: /*-----------------------------------------------------------------------------
561:
684: FROM ASO_QUOTE_HEADERS
685: WHERE quote_header_id = c_qte_header_id;
686:
687: BEGIN
688: --ibe_util.enable_debug;
689: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
690: ibe_util.debug('Starting ibe_ord_oneclick_pvt.Express_Buy_Order ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
691: ibe_util.debug('PROCESSING FLAG : ' || p_flag);
692: END IF;
685: WHERE quote_header_id = c_qte_header_id;
686:
687: BEGIN
688: --ibe_util.enable_debug;
689: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
690: ibe_util.debug('Starting ibe_ord_oneclick_pvt.Express_Buy_Order ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
691: ibe_util.debug('PROCESSING FLAG : ' || p_flag);
692: END IF;
693: SAVEPOINT Express_Buy_Order_Pvt;
686:
687: BEGIN
688: --ibe_util.enable_debug;
689: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
690: ibe_util.debug('Starting ibe_ord_oneclick_pvt.Express_Buy_Order ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
691: ibe_util.debug('PROCESSING FLAG : ' || p_flag);
692: END IF;
693: SAVEPOINT Express_Buy_Order_Pvt;
694: -- Standard call to check for call compatibility.
687: BEGIN
688: --ibe_util.enable_debug;
689: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
690: ibe_util.debug('Starting ibe_ord_oneclick_pvt.Express_Buy_Order ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
691: ibe_util.debug('PROCESSING FLAG : ' || p_flag);
692: END IF;
693: SAVEPOINT Express_Buy_Order_Pvt;
694: -- Standard call to check for call compatibility.
695: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
719: l_save_trigger := 'Y';
720:
721: if ((p_retrieval_num is not null) and (p_retrieval_num <> FND_API.g_miss_num)) then
722:
723: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
724: ibe_util.debug('Express_Buy_Order: Validate_user_update START');
725: ibe_util.debug('Express_Buy_Order: p_party_id: '||p_party_id);
726: ibe_util.debug('Express_Buy_Order: p_acct_id: '||p_acct_id);
727: ibe_util.debug('Express_Buy_Order: p_retrieval_number: '||p_retrieval_num);
720:
721: if ((p_retrieval_num is not null) and (p_retrieval_num <> FND_API.g_miss_num)) then
722:
723: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
724: ibe_util.debug('Express_Buy_Order: Validate_user_update START');
725: ibe_util.debug('Express_Buy_Order: p_party_id: '||p_party_id);
726: ibe_util.debug('Express_Buy_Order: p_acct_id: '||p_acct_id);
727: ibe_util.debug('Express_Buy_Order: p_retrieval_number: '||p_retrieval_num);
728: END IF;
721: if ((p_retrieval_num is not null) and (p_retrieval_num <> FND_API.g_miss_num)) then
722:
723: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
724: ibe_util.debug('Express_Buy_Order: Validate_user_update START');
725: ibe_util.debug('Express_Buy_Order: p_party_id: '||p_party_id);
726: ibe_util.debug('Express_Buy_Order: p_acct_id: '||p_acct_id);
727: ibe_util.debug('Express_Buy_Order: p_retrieval_number: '||p_retrieval_num);
728: END IF;
729:
722:
723: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
724: ibe_util.debug('Express_Buy_Order: Validate_user_update START');
725: ibe_util.debug('Express_Buy_Order: p_party_id: '||p_party_id);
726: ibe_util.debug('Express_Buy_Order: p_acct_id: '||p_acct_id);
727: ibe_util.debug('Express_Buy_Order: p_retrieval_number: '||p_retrieval_num);
728: END IF;
729:
730: IBE_Quote_Misc_pvt.Validate_User_Update
723: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
724: ibe_util.debug('Express_Buy_Order: Validate_user_update START');
725: ibe_util.debug('Express_Buy_Order: p_party_id: '||p_party_id);
726: ibe_util.debug('Express_Buy_Order: p_acct_id: '||p_acct_id);
727: ibe_util.debug('Express_Buy_Order: p_retrieval_number: '||p_retrieval_num);
728: END IF;
729:
730: IBE_Quote_Misc_pvt.Validate_User_Update
731: (p_init_msg_list => p_Init_Msg_List
750: end if;
751:
752: END IF; -- IF(p_flag = 'CART') THEN
753:
754: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
755: ibe_util.debug('Starting ibe_ord_oneclick_pvt.Get_Express_items_settings ' );
756: ibe_util.debug('Input Cartid: '||p_cart_id);
757: ibe_util.debug('Input Partyid: '||p_party_id);
758: ibe_util.debug('Input Accountid: '||p_acct_id);
751:
752: END IF; -- IF(p_flag = 'CART') THEN
753:
754: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
755: ibe_util.debug('Starting ibe_ord_oneclick_pvt.Get_Express_items_settings ' );
756: ibe_util.debug('Input Cartid: '||p_cart_id);
757: ibe_util.debug('Input Partyid: '||p_party_id);
758: ibe_util.debug('Input Accountid: '||p_acct_id);
759: ibe_util.debug('Input p_flag: '||p_flag);
752: END IF; -- IF(p_flag = 'CART') THEN
753:
754: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
755: ibe_util.debug('Starting ibe_ord_oneclick_pvt.Get_Express_items_settings ' );
756: ibe_util.debug('Input Cartid: '||p_cart_id);
757: ibe_util.debug('Input Partyid: '||p_party_id);
758: ibe_util.debug('Input Accountid: '||p_acct_id);
759: ibe_util.debug('Input p_flag: '||p_flag);
760: ibe_util.debug('Input p_last_update_date: '||p_last_update_date);
753:
754: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
755: ibe_util.debug('Starting ibe_ord_oneclick_pvt.Get_Express_items_settings ' );
756: ibe_util.debug('Input Cartid: '||p_cart_id);
757: ibe_util.debug('Input Partyid: '||p_party_id);
758: ibe_util.debug('Input Accountid: '||p_acct_id);
759: ibe_util.debug('Input p_flag: '||p_flag);
760: ibe_util.debug('Input p_last_update_date: '||p_last_update_date);
761: END IF;
754: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
755: ibe_util.debug('Starting ibe_ord_oneclick_pvt.Get_Express_items_settings ' );
756: ibe_util.debug('Input Cartid: '||p_cart_id);
757: ibe_util.debug('Input Partyid: '||p_party_id);
758: ibe_util.debug('Input Accountid: '||p_acct_id);
759: ibe_util.debug('Input p_flag: '||p_flag);
760: ibe_util.debug('Input p_last_update_date: '||p_last_update_date);
761: END IF;
762:
755: ibe_util.debug('Starting ibe_ord_oneclick_pvt.Get_Express_items_settings ' );
756: ibe_util.debug('Input Cartid: '||p_cart_id);
757: ibe_util.debug('Input Partyid: '||p_party_id);
758: ibe_util.debug('Input Accountid: '||p_acct_id);
759: ibe_util.debug('Input p_flag: '||p_flag);
760: ibe_util.debug('Input p_last_update_date: '||p_last_update_date);
761: END IF;
762:
763: IBE_ORD_ONECLICK_PVT.Get_Express_items_settings(
756: ibe_util.debug('Input Cartid: '||p_cart_id);
757: ibe_util.debug('Input Partyid: '||p_party_id);
758: ibe_util.debug('Input Accountid: '||p_acct_id);
759: ibe_util.debug('Input p_flag: '||p_flag);
760: ibe_util.debug('Input p_last_update_date: '||p_last_update_date);
761: END IF;
762:
763: IBE_ORD_ONECLICK_PVT.Get_Express_items_settings(
764: x_qte_header_rec => l_qte_header_rec
766: ,x_payment_tbl => l_hd_payment_tbl
767: ,x_hd_shipment_tbl => l_hd_shipment_tbl
768: ,x_hd_tax_dtl_tbl => l_hd_tax_detail_tbl);
769:
770: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
771: ibe_util.debug('Output Cartid: '||l_qte_header_rec.quote_header_id);
772: END IF;
773: l_curr_cart_id := l_qte_header_rec.quote_header_id;
774:
767: ,x_hd_shipment_tbl => l_hd_shipment_tbl
768: ,x_hd_tax_dtl_tbl => l_hd_tax_detail_tbl);
769:
770: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
771: ibe_util.debug('Output Cartid: '||l_qte_header_rec.quote_header_id);
772: END IF;
773: l_curr_cart_id := l_qte_header_rec.quote_header_id;
774:
775: if (p_flag = 'ITEMS') then
776: l_save_trigger := 'Y';
777: --set items info
778:
779: if (p_item_ids.count > 0) then
780: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
781: ibe_util.debug('Express_Buy_Order - ***adding lines for products***');
782: ibe_util.debug('Express_Buy_Order - build list of quote lines for oneclick cart');
783: END IF;
784: l_count := p_item_ids.count;
777: --set items info
778:
779: if (p_item_ids.count > 0) then
780: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
781: ibe_util.debug('Express_Buy_Order - ***adding lines for products***');
782: ibe_util.debug('Express_Buy_Order - build list of quote lines for oneclick cart');
783: END IF;
784: l_count := p_item_ids.count;
785: FOR i IN 1..l_count LOOP
778:
779: if (p_item_ids.count > 0) then
780: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
781: ibe_util.debug('Express_Buy_Order - ***adding lines for products***');
782: ibe_util.debug('Express_Buy_Order - build list of quote lines for oneclick cart');
783: END IF;
784: l_count := p_item_ids.count;
785: FOR i IN 1..l_count LOOP
786: l_qte_line_tbl(i).operation_code := 'CREATE';
792: --l_qte_line_tbl(i).price_list_id := p_flags.PRICE_LIST_ID;
793: --l_qte_line_tbl(i).currency_code := p_flags.CURRENCY_CODE;
794: l_qte_line_tbl(i).line_category_code := 'ORDER';
795:
796: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
797: ibe_util.debug('l_qte_line_tbl(i).operation_code ' || l_qte_line_tbl(i).operation_code);
798: ibe_util.debug('l_qte_line_tbl(i).QUOTE_HEADER_id ' || to_char(l_qte_line_tbl(i).QUOTE_HEADER_id));
799: ibe_util.debug('l_qte_line_tbl(i).INVENTORY_ITEM_ID ' || to_char(l_qte_line_tbl(i).INVENTORY_ITEM_ID));
800: ibe_util.debug('l_qte_line_tbl(i).QUANTITY ' || l_qte_line_tbl(i).QUANTITY);
793: --l_qte_line_tbl(i).currency_code := p_flags.CURRENCY_CODE;
794: l_qte_line_tbl(i).line_category_code := 'ORDER';
795:
796: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
797: ibe_util.debug('l_qte_line_tbl(i).operation_code ' || l_qte_line_tbl(i).operation_code);
798: ibe_util.debug('l_qte_line_tbl(i).QUOTE_HEADER_id ' || to_char(l_qte_line_tbl(i).QUOTE_HEADER_id));
799: ibe_util.debug('l_qte_line_tbl(i).INVENTORY_ITEM_ID ' || to_char(l_qte_line_tbl(i).INVENTORY_ITEM_ID));
800: ibe_util.debug('l_qte_line_tbl(i).QUANTITY ' || l_qte_line_tbl(i).QUANTITY);
801: ibe_util.debug('l_qte_line_tbl(i).organization_id ' || l_qte_line_tbl(i).operation_code);
794: l_qte_line_tbl(i).line_category_code := 'ORDER';
795:
796: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
797: ibe_util.debug('l_qte_line_tbl(i).operation_code ' || l_qte_line_tbl(i).operation_code);
798: ibe_util.debug('l_qte_line_tbl(i).QUOTE_HEADER_id ' || to_char(l_qte_line_tbl(i).QUOTE_HEADER_id));
799: ibe_util.debug('l_qte_line_tbl(i).INVENTORY_ITEM_ID ' || to_char(l_qte_line_tbl(i).INVENTORY_ITEM_ID));
800: ibe_util.debug('l_qte_line_tbl(i).QUANTITY ' || l_qte_line_tbl(i).QUANTITY);
801: ibe_util.debug('l_qte_line_tbl(i).organization_id ' || l_qte_line_tbl(i).operation_code);
802: ibe_util.debug('l_qte_line_tbl(i).UOM_CODE ' || l_qte_line_tbl(i).UOM_CODE);
795:
796: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
797: ibe_util.debug('l_qte_line_tbl(i).operation_code ' || l_qte_line_tbl(i).operation_code);
798: ibe_util.debug('l_qte_line_tbl(i).QUOTE_HEADER_id ' || to_char(l_qte_line_tbl(i).QUOTE_HEADER_id));
799: ibe_util.debug('l_qte_line_tbl(i).INVENTORY_ITEM_ID ' || to_char(l_qte_line_tbl(i).INVENTORY_ITEM_ID));
800: ibe_util.debug('l_qte_line_tbl(i).QUANTITY ' || l_qte_line_tbl(i).QUANTITY);
801: ibe_util.debug('l_qte_line_tbl(i).organization_id ' || l_qte_line_tbl(i).operation_code);
802: ibe_util.debug('l_qte_line_tbl(i).UOM_CODE ' || l_qte_line_tbl(i).UOM_CODE);
803: END IF;
796: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
797: ibe_util.debug('l_qte_line_tbl(i).operation_code ' || l_qte_line_tbl(i).operation_code);
798: ibe_util.debug('l_qte_line_tbl(i).QUOTE_HEADER_id ' || to_char(l_qte_line_tbl(i).QUOTE_HEADER_id));
799: ibe_util.debug('l_qte_line_tbl(i).INVENTORY_ITEM_ID ' || to_char(l_qte_line_tbl(i).INVENTORY_ITEM_ID));
800: ibe_util.debug('l_qte_line_tbl(i).QUANTITY ' || l_qte_line_tbl(i).QUANTITY);
801: ibe_util.debug('l_qte_line_tbl(i).organization_id ' || l_qte_line_tbl(i).operation_code);
802: ibe_util.debug('l_qte_line_tbl(i).UOM_CODE ' || l_qte_line_tbl(i).UOM_CODE);
803: END IF;
804: --ibe_util.debug('l_qte_line_tbl(i).price_list_id ' || to_char(l_qte_line_tbl(i).price_list_id));
797: ibe_util.debug('l_qte_line_tbl(i).operation_code ' || l_qte_line_tbl(i).operation_code);
798: ibe_util.debug('l_qte_line_tbl(i).QUOTE_HEADER_id ' || to_char(l_qte_line_tbl(i).QUOTE_HEADER_id));
799: ibe_util.debug('l_qte_line_tbl(i).INVENTORY_ITEM_ID ' || to_char(l_qte_line_tbl(i).INVENTORY_ITEM_ID));
800: ibe_util.debug('l_qte_line_tbl(i).QUANTITY ' || l_qte_line_tbl(i).QUANTITY);
801: ibe_util.debug('l_qte_line_tbl(i).organization_id ' || l_qte_line_tbl(i).operation_code);
802: ibe_util.debug('l_qte_line_tbl(i).UOM_CODE ' || l_qte_line_tbl(i).UOM_CODE);
803: END IF;
804: --ibe_util.debug('l_qte_line_tbl(i).price_list_id ' || to_char(l_qte_line_tbl(i).price_list_id));
805: --ibe_util.debug('l_qte_line_tbl(i).currency_code ' || l_qte_line_tbl(i).currency_code);
798: ibe_util.debug('l_qte_line_tbl(i).QUOTE_HEADER_id ' || to_char(l_qte_line_tbl(i).QUOTE_HEADER_id));
799: ibe_util.debug('l_qte_line_tbl(i).INVENTORY_ITEM_ID ' || to_char(l_qte_line_tbl(i).INVENTORY_ITEM_ID));
800: ibe_util.debug('l_qte_line_tbl(i).QUANTITY ' || l_qte_line_tbl(i).QUANTITY);
801: ibe_util.debug('l_qte_line_tbl(i).organization_id ' || l_qte_line_tbl(i).operation_code);
802: ibe_util.debug('l_qte_line_tbl(i).UOM_CODE ' || l_qte_line_tbl(i).UOM_CODE);
803: END IF;
804: --ibe_util.debug('l_qte_line_tbl(i).price_list_id ' || to_char(l_qte_line_tbl(i).price_list_id));
805: --ibe_util.debug('l_qte_line_tbl(i).currency_code ' || l_qte_line_tbl(i).currency_code);
806: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
800: ibe_util.debug('l_qte_line_tbl(i).QUANTITY ' || l_qte_line_tbl(i).QUANTITY);
801: ibe_util.debug('l_qte_line_tbl(i).organization_id ' || l_qte_line_tbl(i).operation_code);
802: ibe_util.debug('l_qte_line_tbl(i).UOM_CODE ' || l_qte_line_tbl(i).UOM_CODE);
803: END IF;
804: --ibe_util.debug('l_qte_line_tbl(i).price_list_id ' || to_char(l_qte_line_tbl(i).price_list_id));
805: --ibe_util.debug('l_qte_line_tbl(i).currency_code ' || l_qte_line_tbl(i).currency_code);
806: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
807: ibe_util.debug('l_qte_line_tbl(i).line_category_code ' || l_qte_line_tbl(i).line_category_code);
808: END IF;
801: ibe_util.debug('l_qte_line_tbl(i).organization_id ' || l_qte_line_tbl(i).operation_code);
802: ibe_util.debug('l_qte_line_tbl(i).UOM_CODE ' || l_qte_line_tbl(i).UOM_CODE);
803: END IF;
804: --ibe_util.debug('l_qte_line_tbl(i).price_list_id ' || to_char(l_qte_line_tbl(i).price_list_id));
805: --ibe_util.debug('l_qte_line_tbl(i).currency_code ' || l_qte_line_tbl(i).currency_code);
806: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
807: ibe_util.debug('l_qte_line_tbl(i).line_category_code ' || l_qte_line_tbl(i).line_category_code);
808: END IF;
809: End Loop;
802: ibe_util.debug('l_qte_line_tbl(i).UOM_CODE ' || l_qte_line_tbl(i).UOM_CODE);
803: END IF;
804: --ibe_util.debug('l_qte_line_tbl(i).price_list_id ' || to_char(l_qte_line_tbl(i).price_list_id));
805: --ibe_util.debug('l_qte_line_tbl(i).currency_code ' || l_qte_line_tbl(i).currency_code);
806: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
807: ibe_util.debug('l_qte_line_tbl(i).line_category_code ' || l_qte_line_tbl(i).line_category_code);
808: END IF;
809: End Loop;
810: else
803: END IF;
804: --ibe_util.debug('l_qte_line_tbl(i).price_list_id ' || to_char(l_qte_line_tbl(i).price_list_id));
805: --ibe_util.debug('l_qte_line_tbl(i).currency_code ' || l_qte_line_tbl(i).currency_code);
806: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
807: ibe_util.debug('l_qte_line_tbl(i).line_category_code ' || l_qte_line_tbl(i).line_category_code);
808: END IF;
809: End Loop;
810: else
811: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
807: ibe_util.debug('l_qte_line_tbl(i).line_category_code ' || l_qte_line_tbl(i).line_category_code);
808: END IF;
809: End Loop;
810: else
811: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
812: ibe_util.debug('Express_Buy_Order - oneclick update: no products to add!');
813: END IF;
814: end if;
815: end if; --end if adding itmes
808: END IF;
809: End Loop;
810: else
811: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
812: ibe_util.debug('Express_Buy_Order - oneclick update: no products to add!');
813: END IF;
814: end if;
815: end if; --end if adding itmes
816:
838: l_attach_contract := FND_API.G_TRUE;
839: END IF;
840:
841: -- regardless we will need to reprice - whether a new express quote or adding items or adding from lists
842: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
843: ibe_util.debug('Express_Buy_Order - ***setting pricing flags***');
844: END IF;
845: l_control_rec.pricing_request_type := p_price_req_type;
846: l_control_rec.header_pricing_event := p_incart_event;
839: END IF;
840:
841: -- regardless we will need to reprice - whether a new express quote or adding items or adding from lists
842: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
843: ibe_util.debug('Express_Buy_Order - ***setting pricing flags***');
844: END IF;
845: l_control_rec.pricing_request_type := p_price_req_type;
846: l_control_rec.header_pricing_event := p_incart_event;
847: l_control_rec.line_pricing_event := p_incart_line_event;
848: l_control_rec.CALCULATE_TAX_FLAG := 'Y';
849: l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG := 'Y';
850: l_qte_header_rec.currency_code := p_currency_code;
851: l_qte_header_rec.price_list_id := p_price_list_id;
852: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
853: ibe_util.debug('l_control_rec.pricing_request_type ' || l_control_rec.pricing_request_type);
854: ibe_util.debug('l_control_rec.header_pricing_event ' || l_control_rec.header_pricing_event);
855: ibe_util.debug('l_control_rec.line_pricing_event ' || l_control_rec.line_pricing_event);
856: ibe_util.debug('l_control_rec.CALCULATE_TAX_FLAG ' || l_control_rec.CALCULATE_TAX_FLAG);
849: l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG := 'Y';
850: l_qte_header_rec.currency_code := p_currency_code;
851: l_qte_header_rec.price_list_id := p_price_list_id;
852: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
853: ibe_util.debug('l_control_rec.pricing_request_type ' || l_control_rec.pricing_request_type);
854: ibe_util.debug('l_control_rec.header_pricing_event ' || l_control_rec.header_pricing_event);
855: ibe_util.debug('l_control_rec.line_pricing_event ' || l_control_rec.line_pricing_event);
856: ibe_util.debug('l_control_rec.CALCULATE_TAX_FLAG ' || l_control_rec.CALCULATE_TAX_FLAG);
857: ibe_util.debug('l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG ' || l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG);
850: l_qte_header_rec.currency_code := p_currency_code;
851: l_qte_header_rec.price_list_id := p_price_list_id;
852: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
853: ibe_util.debug('l_control_rec.pricing_request_type ' || l_control_rec.pricing_request_type);
854: ibe_util.debug('l_control_rec.header_pricing_event ' || l_control_rec.header_pricing_event);
855: ibe_util.debug('l_control_rec.line_pricing_event ' || l_control_rec.line_pricing_event);
856: ibe_util.debug('l_control_rec.CALCULATE_TAX_FLAG ' || l_control_rec.CALCULATE_TAX_FLAG);
857: ibe_util.debug('l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG ' || l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG);
858: ibe_util.debug('l_qte_header_rec.currency_code' || l_qte_header_rec.currency_code);
851: l_qte_header_rec.price_list_id := p_price_list_id;
852: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
853: ibe_util.debug('l_control_rec.pricing_request_type ' || l_control_rec.pricing_request_type);
854: ibe_util.debug('l_control_rec.header_pricing_event ' || l_control_rec.header_pricing_event);
855: ibe_util.debug('l_control_rec.line_pricing_event ' || l_control_rec.line_pricing_event);
856: ibe_util.debug('l_control_rec.CALCULATE_TAX_FLAG ' || l_control_rec.CALCULATE_TAX_FLAG);
857: ibe_util.debug('l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG ' || l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG);
858: ibe_util.debug('l_qte_header_rec.currency_code' || l_qte_header_rec.currency_code);
859: ibe_util.debug('l_qte_header_rec.price_list_id ' || l_qte_header_rec.price_list_id);
852: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
853: ibe_util.debug('l_control_rec.pricing_request_type ' || l_control_rec.pricing_request_type);
854: ibe_util.debug('l_control_rec.header_pricing_event ' || l_control_rec.header_pricing_event);
855: ibe_util.debug('l_control_rec.line_pricing_event ' || l_control_rec.line_pricing_event);
856: ibe_util.debug('l_control_rec.CALCULATE_TAX_FLAG ' || l_control_rec.CALCULATE_TAX_FLAG);
857: ibe_util.debug('l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG ' || l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG);
858: ibe_util.debug('l_qte_header_rec.currency_code' || l_qte_header_rec.currency_code);
859: ibe_util.debug('l_qte_header_rec.price_list_id ' || l_qte_header_rec.price_list_id);
860: END IF;
853: ibe_util.debug('l_control_rec.pricing_request_type ' || l_control_rec.pricing_request_type);
854: ibe_util.debug('l_control_rec.header_pricing_event ' || l_control_rec.header_pricing_event);
855: ibe_util.debug('l_control_rec.line_pricing_event ' || l_control_rec.line_pricing_event);
856: ibe_util.debug('l_control_rec.CALCULATE_TAX_FLAG ' || l_control_rec.CALCULATE_TAX_FLAG);
857: ibe_util.debug('l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG ' || l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG);
858: ibe_util.debug('l_qte_header_rec.currency_code' || l_qte_header_rec.currency_code);
859: ibe_util.debug('l_qte_header_rec.price_list_id ' || l_qte_header_rec.price_list_id);
860: END IF;
861:
854: ibe_util.debug('l_control_rec.header_pricing_event ' || l_control_rec.header_pricing_event);
855: ibe_util.debug('l_control_rec.line_pricing_event ' || l_control_rec.line_pricing_event);
856: ibe_util.debug('l_control_rec.CALCULATE_TAX_FLAG ' || l_control_rec.CALCULATE_TAX_FLAG);
857: ibe_util.debug('l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG ' || l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG);
858: ibe_util.debug('l_qte_header_rec.currency_code' || l_qte_header_rec.currency_code);
859: ibe_util.debug('l_qte_header_rec.price_list_id ' || l_qte_header_rec.price_list_id);
860: END IF;
861:
862: IF (l_save_trigger = 'Y') then
855: ibe_util.debug('l_control_rec.line_pricing_event ' || l_control_rec.line_pricing_event);
856: ibe_util.debug('l_control_rec.CALCULATE_TAX_FLAG ' || l_control_rec.CALCULATE_TAX_FLAG);
857: ibe_util.debug('l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG ' || l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG);
858: ibe_util.debug('l_qte_header_rec.currency_code' || l_qte_header_rec.currency_code);
859: ibe_util.debug('l_qte_header_rec.price_list_id ' || l_qte_header_rec.price_list_id);
860: END IF;
861:
862: IF (l_save_trigger = 'Y') then
863: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
859: ibe_util.debug('l_qte_header_rec.price_list_id ' || l_qte_header_rec.price_list_id);
860: END IF;
861:
862: IF (l_save_trigger = 'Y') then
863: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
864: ibe_util.debug('****Calling IBE_Quote_Save_pvt.SAVE**** ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
865: ibe_util.debug(' l_qte_header_rec.quote_header_id : ' || l_qte_header_rec.quote_header_id);
866: ibe_util.debug(' l_qte_header_rec.quote_name : ' || l_qte_header_rec.quote_name);
867: ibe_util.debug(' l_qte_header_rec.last_update_date : ' || to_char(l_qte_header_rec.last_update_date,'DD-MON-YYYY:HH24:MI:SS'));
860: END IF;
861:
862: IF (l_save_trigger = 'Y') then
863: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
864: ibe_util.debug('****Calling IBE_Quote_Save_pvt.SAVE**** ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
865: ibe_util.debug(' l_qte_header_rec.quote_header_id : ' || l_qte_header_rec.quote_header_id);
866: ibe_util.debug(' l_qte_header_rec.quote_name : ' || l_qte_header_rec.quote_name);
867: ibe_util.debug(' l_qte_header_rec.last_update_date : ' || to_char(l_qte_header_rec.last_update_date,'DD-MON-YYYY:HH24:MI:SS'));
868: END IF;
861:
862: IF (l_save_trigger = 'Y') then
863: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
864: ibe_util.debug('****Calling IBE_Quote_Save_pvt.SAVE**** ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
865: ibe_util.debug(' l_qte_header_rec.quote_header_id : ' || l_qte_header_rec.quote_header_id);
866: ibe_util.debug(' l_qte_header_rec.quote_name : ' || l_qte_header_rec.quote_name);
867: ibe_util.debug(' l_qte_header_rec.last_update_date : ' || to_char(l_qte_header_rec.last_update_date,'DD-MON-YYYY:HH24:MI:SS'));
868: END IF;
869:
862: IF (l_save_trigger = 'Y') then
863: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
864: ibe_util.debug('****Calling IBE_Quote_Save_pvt.SAVE**** ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
865: ibe_util.debug(' l_qte_header_rec.quote_header_id : ' || l_qte_header_rec.quote_header_id);
866: ibe_util.debug(' l_qte_header_rec.quote_name : ' || l_qte_header_rec.quote_name);
867: ibe_util.debug(' l_qte_header_rec.last_update_date : ' || to_char(l_qte_header_rec.last_update_date,'DD-MON-YYYY:HH24:MI:SS'));
868: END IF;
869:
870: IF (p_retrieval_num <> FND_API.g_miss_num) then
863: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
864: ibe_util.debug('****Calling IBE_Quote_Save_pvt.SAVE**** ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
865: ibe_util.debug(' l_qte_header_rec.quote_header_id : ' || l_qte_header_rec.quote_header_id);
866: ibe_util.debug(' l_qte_header_rec.quote_name : ' || l_qte_header_rec.quote_name);
867: ibe_util.debug(' l_qte_header_rec.last_update_date : ' || to_char(l_qte_header_rec.last_update_date,'DD-MON-YYYY:HH24:MI:SS'));
868: END IF;
869:
870: IF (p_retrieval_num <> FND_API.g_miss_num) then
871: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
867: ibe_util.debug(' l_qte_header_rec.last_update_date : ' || to_char(l_qte_header_rec.last_update_date,'DD-MON-YYYY:HH24:MI:SS'));
868: END IF;
869:
870: IF (p_retrieval_num <> FND_API.g_miss_num) then
871: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
872: ibe_util.debug('passing sharee party and acct id');
873: END IF;
874: l_qte_header_rec.party_id := FND_API.G_MISS_NUM;
875: l_qte_header_rec.cust_account_id := FND_API.G_MISS_NUM;
868: END IF;
869:
870: IF (p_retrieval_num <> FND_API.g_miss_num) then
871: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
872: ibe_util.debug('passing sharee party and acct id');
873: END IF;
874: l_qte_header_rec.party_id := FND_API.G_MISS_NUM;
875: l_qte_header_rec.cust_account_id := FND_API.G_MISS_NUM;
876: l_sharee_party_id := p_party_id;
899: X_Return_Status => x_Return_Status,
900: X_Msg_Count => x_Msg_Count,
901: X_Msg_Data => x_Msg_Data);
902:
903: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
904: ibe_util.debug('Back from IBE_Quote_Save_pvt.SAVE ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS') || ' quote_header_id: ' || to_char(lx_quote_header_id));
905: END IF;
906: IF x_return_status <> FND_API.g_ret_sts_success THEN
907: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
900: X_Msg_Count => x_Msg_Count,
901: X_Msg_Data => x_Msg_Data);
902:
903: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
904: ibe_util.debug('Back from IBE_Quote_Save_pvt.SAVE ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS') || ' quote_header_id: ' || to_char(lx_quote_header_id));
905: END IF;
906: IF x_return_status <> FND_API.g_ret_sts_success THEN
907: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
908: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order - non success status from IBE_Quote_Save_pvt.SAVE: ' || x_return_status); FND_MESSAGE.SET_NAME('IBE','IBE_EXPR_PLSQL_API_ERROR');
903: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
904: ibe_util.debug('Back from IBE_Quote_Save_pvt.SAVE ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS') || ' quote_header_id: ' || to_char(lx_quote_header_id));
905: END IF;
906: IF x_return_status <> FND_API.g_ret_sts_success THEN
907: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
908: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order - non success status from IBE_Quote_Save_pvt.SAVE: ' || x_return_status); FND_MESSAGE.SET_NAME('IBE','IBE_EXPR_PLSQL_API_ERROR');
909: END IF;
910: FND_MESSAGE.SET_TOKEN ( '0' , 'Express_Buy_Order - IBE_Quote_Save_pvt.SAVE' );
911: FND_MESSAGE.SET_TOKEN ( '1' , x_return_status );
904: ibe_util.debug('Back from IBE_Quote_Save_pvt.SAVE ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS') || ' quote_header_id: ' || to_char(lx_quote_header_id));
905: END IF;
906: IF x_return_status <> FND_API.g_ret_sts_success THEN
907: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
908: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order - non success status from IBE_Quote_Save_pvt.SAVE: ' || x_return_status); FND_MESSAGE.SET_NAME('IBE','IBE_EXPR_PLSQL_API_ERROR');
909: END IF;
910: FND_MESSAGE.SET_TOKEN ( '0' , 'Express_Buy_Order - IBE_Quote_Save_pvt.SAVE' );
911: FND_MESSAGE.SET_TOKEN ( '1' , x_return_status );
912: FND_MSG_PUB.Add;
917: END IF;
918: ELSE
919: IF(l_attach_contract = FND_API.G_TRUE) THEN
920: IF (OKC_TERMS_UTIL_GRP.Get_Terms_Template('QUOTE', p_cart_id) IS NULL) THEN -- Checking whether a contract has already been attached (Bug 5260372)
921: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
922: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order - : No contract currently attached !');
923: END IF;
924: IF (FND_Profile.Value('OKC_ENABLE_SALES_CONTRACTS') = 'Y' ) THEN --Only if contracts is enabled
925: --instantiate a contract and associate to the quote
918: ELSE
919: IF(l_attach_contract = FND_API.G_TRUE) THEN
920: IF (OKC_TERMS_UTIL_GRP.Get_Terms_Template('QUOTE', p_cart_id) IS NULL) THEN -- Checking whether a contract has already been attached (Bug 5260372)
921: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
922: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order - : No contract currently attached !');
923: END IF;
924: IF (FND_Profile.Value('OKC_ENABLE_SALES_CONTRACTS') = 'Y' ) THEN --Only if contracts is enabled
925: --instantiate a contract and associate to the quote
926: /*mannamra: changes for MOAC: Bug 4682364 */
928: l_contract_template_id := to_number(ASO_UTILITY_PVT.GET_OU_ATTRIBUTE_VALUE(ASO_UTILITY_PVT.G_DEFAULT_CONTRACT_TEMPLATE)); --New style
929: /*mannamra: end of changes for MOAC*/
930:
931: IF (l_contract_template_id is not null) THEN
932: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
933: IBE_UTIL.debug('l_contract_template_id = '||l_contract_template_id);
934: IBE_UTIL.debug('Before calling OKC_TERMS_COPY_GRP.copy_terms_api, quoteheaderId = '||lx_quote_header_id);
935: END IF;
936: OKC_TERMS_COPY_GRP.copy_terms(
929: /*mannamra: end of changes for MOAC*/
930:
931: IF (l_contract_template_id is not null) THEN
932: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
933: IBE_UTIL.debug('l_contract_template_id = '||l_contract_template_id);
934: IBE_UTIL.debug('Before calling OKC_TERMS_COPY_GRP.copy_terms_api, quoteheaderId = '||lx_quote_header_id);
935: END IF;
936: OKC_TERMS_COPY_GRP.copy_terms(
937: p_api_version =>1.0
930:
931: IF (l_contract_template_id is not null) THEN
932: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
933: IBE_UTIL.debug('l_contract_template_id = '||l_contract_template_id);
934: IBE_UTIL.debug('Before calling OKC_TERMS_COPY_GRP.copy_terms_api, quoteheaderId = '||lx_quote_header_id);
935: END IF;
936: OKC_TERMS_COPY_GRP.copy_terms(
937: p_api_version =>1.0
938: ,p_template_id => l_contract_template_id
943: ,x_return_status => x_return_status
944: ,x_msg_count => x_msg_count
945: ,x_msg_data => x_msg_data);
946:
947: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
948: IBE_UTIL.debug('After copy_terms api, return status = '||x_return_status);
949: END IF;
950: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
951: RAISE FND_API.G_EXC_ERROR;
944: ,x_msg_count => x_msg_count
945: ,x_msg_data => x_msg_data);
946:
947: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
948: IBE_UTIL.debug('After copy_terms api, return status = '||x_return_status);
949: END IF;
950: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
951: RAISE FND_API.G_EXC_ERROR;
952: END IF;
955: END IF;
956: END IF; --If contract template id is not null
957: END IF; --IF (FND_Profile.Value('OKC_ENABLE_SALES_CONTRACTS')
958: ELSE
959: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
960: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order - : A contract is already instanciated for this quote');
961: END IF;
962: END IF; -- Whether there is a contract currently instanciated for this quote
963: END IF; --If l_attach_contract is true
956: END IF; --If contract template id is not null
957: END IF; --IF (FND_Profile.Value('OKC_ENABLE_SALES_CONTRACTS')
958: ELSE
959: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
960: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order - : A contract is already instanciated for this quote');
961: END IF;
962: END IF; -- Whether there is a contract currently instanciated for this quote
963: END IF; --If l_attach_contract is true
964: END IF; -- If l_return_status is success
962: END IF; -- Whether there is a contract currently instanciated for this quote
963: END IF; --If l_attach_contract is true
964: END IF; -- If l_return_status is success
965: IF (p_flag = 'CART') THEN
966: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
967: ibe_util.debug('Express_buy_order: Calling stop_sharing for quote_header_id :'||l_qte_header_rec.quote_header_id);
968: END IF;
969: IBE_QUOTE_SAVESHARE_V2_PVT.stop_sharing (
970: p_quote_header_id => p_cart_id ,
963: END IF; --If l_attach_contract is true
964: END IF; -- If l_return_status is success
965: IF (p_flag = 'CART') THEN
966: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
967: ibe_util.debug('Express_buy_order: Calling stop_sharing for quote_header_id :'||l_qte_header_rec.quote_header_id);
968: END IF;
969: IBE_QUOTE_SAVESHARE_V2_PVT.stop_sharing (
970: p_quote_header_id => p_cart_id ,
971: p_delete_context => 'IBE_SC_CART_ORDERED',
984:
985: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
986: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
987: END IF;
988: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
989: ibe_util.debug('Express_buy_order: Done Calling stop_sharing');
990: END IF;
991: END IF;
992:
985: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
986: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
987: END IF;
988: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
989: ibe_util.debug('Express_buy_order: Done Calling stop_sharing');
990: END IF;
991: END IF;
992:
993: l_curr_cart_id := lx_quote_header_id;
998:
999: -- get ready for the next update of the quote
1000:
1001: /* if (p_flag = 'LISTS') then
1002: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1003: ibe_util.debug('Calling IBE_Shop_List_PVT.Save_Quote_From_Lists ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1004: ibe_util.debug('p_mode ' || 'MERGE');
1005: END IF;
1006: l_count := p_list_ids.count;
999: -- get ready for the next update of the quote
1000:
1001: /* if (p_flag = 'LISTS') then
1002: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1003: ibe_util.debug('Calling IBE_Shop_List_PVT.Save_Quote_From_Lists ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1004: ibe_util.debug('p_mode ' || 'MERGE');
1005: END IF;
1006: l_count := p_list_ids.count;
1007: FOR i IN 1..l_count LOOP
1000:
1001: /* if (p_flag = 'LISTS') then
1002: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1003: ibe_util.debug('Calling IBE_Shop_List_PVT.Save_Quote_From_Lists ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1004: ibe_util.debug('p_mode ' || 'MERGE');
1005: END IF;
1006: l_count := p_list_ids.count;
1007: FOR i IN 1..l_count LOOP
1008: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1004: ibe_util.debug('p_mode ' || 'MERGE');
1005: END IF;
1006: l_count := p_list_ids.count;
1007: FOR i IN 1..l_count LOOP
1008: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1009: ibe_util.debug('p_shpListIds' || i || ' ' || p_list_ids(i));
1010: END IF;
1011: END LOOP;
1012:
1005: END IF;
1006: l_count := p_list_ids.count;
1007: FOR i IN 1..l_count LOOP
1008: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1009: ibe_util.debug('p_shpListIds' || i || ' ' || p_list_ids(i));
1010: END IF;
1011: END LOOP;
1012:
1013: IBE_Shop_List_PVT.Save_Quote_From_Lists(
1026: ,X_Msg_Count => x_msg_count
1027: ,X_Msg_Data => x_msg_data
1028: ,x_q_header_id => lx_quote_header_id );
1029:
1030: --ibe_util.enable_debug;
1031: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1032: ibe_util.debug('Back from IBE_Shop_List_PVT.Save_Quote_From_Lists ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1033: ibe_util.debug('X_cartId ' || lx_quote_header_id);
1034: END IF;
1027: ,X_Msg_Data => x_msg_data
1028: ,x_q_header_id => lx_quote_header_id );
1029:
1030: --ibe_util.enable_debug;
1031: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1032: ibe_util.debug('Back from IBE_Shop_List_PVT.Save_Quote_From_Lists ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1033: ibe_util.debug('X_cartId ' || lx_quote_header_id);
1034: END IF;
1035:
1028: ,x_q_header_id => lx_quote_header_id );
1029:
1030: --ibe_util.enable_debug;
1031: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1032: ibe_util.debug('Back from IBE_Shop_List_PVT.Save_Quote_From_Lists ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1033: ibe_util.debug('X_cartId ' || lx_quote_header_id);
1034: END IF;
1035:
1036: IF x_return_status <> FND_API.g_ret_sts_success THEN
1029:
1030: --ibe_util.enable_debug;
1031: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1032: ibe_util.debug('Back from IBE_Shop_List_PVT.Save_Quote_From_Lists ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1033: ibe_util.debug('X_cartId ' || lx_quote_header_id);
1034: END IF;
1035:
1036: IF x_return_status <> FND_API.g_ret_sts_success THEN
1037: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1033: ibe_util.debug('X_cartId ' || lx_quote_header_id);
1034: END IF;
1035:
1036: IF x_return_status <> FND_API.g_ret_sts_success THEN
1037: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1038: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order - non success status from IBE_Shop_List_PVT.Save_Quote_From_Lists: ' || x_return_status); FND_MESSAGE.SET_NAME('IBE','IBE_EXPR_PLSQL_API_ERROR');
1039: END IF;
1040: FND_MESSAGE.SET_TOKEN ( '0' , 'Express_Buy_Order - IBE_Shop_List_PVT.Save_Quote_From_Lists' );
1041: FND_MESSAGE.SET_TOKEN ( '1' , x_return_status );
1034: END IF;
1035:
1036: IF x_return_status <> FND_API.g_ret_sts_success THEN
1037: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1038: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order - non success status from IBE_Shop_List_PVT.Save_Quote_From_Lists: ' || x_return_status); FND_MESSAGE.SET_NAME('IBE','IBE_EXPR_PLSQL_API_ERROR');
1039: END IF;
1040: FND_MESSAGE.SET_TOKEN ( '0' , 'Express_Buy_Order - IBE_Shop_List_PVT.Save_Quote_From_Lists' );
1041: FND_MESSAGE.SET_TOKEN ( '1' , x_return_status );
1042: FND_MSG_PUB.Add;
1049:
1050: END IF;
1051: */
1052: if (p_flag = 'LIST_LINES') then
1053: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1054: ibe_util.debug('Calling IBE_Shop_List_PVT.Save_Quote_From_List_Items ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1055: ibe_util.debug('p_mode ' || 'MERGE');
1056: END IF;
1057: l_count := p_list_line_ids.count;
1050: END IF;
1051: */
1052: if (p_flag = 'LIST_LINES') then
1053: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1054: ibe_util.debug('Calling IBE_Shop_List_PVT.Save_Quote_From_List_Items ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1055: ibe_util.debug('p_mode ' || 'MERGE');
1056: END IF;
1057: l_count := p_list_line_ids.count;
1058: FOR i IN 1..l_count LOOP
1051: */
1052: if (p_flag = 'LIST_LINES') then
1053: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1054: ibe_util.debug('Calling IBE_Shop_List_PVT.Save_Quote_From_List_Items ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1055: ibe_util.debug('p_mode ' || 'MERGE');
1056: END IF;
1057: l_count := p_list_line_ids.count;
1058: FOR i IN 1..l_count LOOP
1059: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1055: ibe_util.debug('p_mode ' || 'MERGE');
1056: END IF;
1057: l_count := p_list_line_ids.count;
1058: FOR i IN 1..l_count LOOP
1059: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1060: ibe_util.debug('p_shpListLineIds' || i || ' ' || p_list_line_ids(i));
1061: END IF;
1062: end loop;
1063: IBE_Shop_List_PVT.Save_Quote_From_List_Items(
1056: END IF;
1057: l_count := p_list_line_ids.count;
1058: FOR i IN 1..l_count LOOP
1059: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1060: ibe_util.debug('p_shpListLineIds' || i || ' ' || p_list_line_ids(i));
1061: END IF;
1062: end loop;
1063: IBE_Shop_List_PVT.Save_Quote_From_List_Items(
1064: P_Api_Version => 1.0
1076: ,X_Msg_Count => x_msg_count
1077: ,X_Msg_Data => x_msg_data
1078: ,x_q_header_id => lx_quote_header_id );
1079:
1080: --ibe_util.enable_debug;
1081: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1082: ibe_util.debug('Back from IBE_Shop_List_PVT.Save_Quote_From_List_Items ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1083: ibe_util.debug('X_cartId ' || lx_quote_header_id);
1084: END IF;
1077: ,X_Msg_Data => x_msg_data
1078: ,x_q_header_id => lx_quote_header_id );
1079:
1080: --ibe_util.enable_debug;
1081: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1082: ibe_util.debug('Back from IBE_Shop_List_PVT.Save_Quote_From_List_Items ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1083: ibe_util.debug('X_cartId ' || lx_quote_header_id);
1084: END IF;
1085:
1078: ,x_q_header_id => lx_quote_header_id );
1079:
1080: --ibe_util.enable_debug;
1081: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1082: ibe_util.debug('Back from IBE_Shop_List_PVT.Save_Quote_From_List_Items ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1083: ibe_util.debug('X_cartId ' || lx_quote_header_id);
1084: END IF;
1085:
1086: if x_return_status <> FND_API.g_ret_sts_success then
1079:
1080: --ibe_util.enable_debug;
1081: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1082: ibe_util.debug('Back from IBE_Shop_List_PVT.Save_Quote_From_List_Items ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1083: ibe_util.debug('X_cartId ' || lx_quote_header_id);
1084: END IF;
1085:
1086: if x_return_status <> FND_API.g_ret_sts_success then
1087: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1083: ibe_util.debug('X_cartId ' || lx_quote_header_id);
1084: END IF;
1085:
1086: if x_return_status <> FND_API.g_ret_sts_success then
1087: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1088: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order - non success status from IBE_Shop_List_PVT.Save_Quote_From_List_Items: ' || x_return_status); FND_MESSAGE.SET_NAME('IBE','IBE_EXPR_PLSQL_API_ERROR');
1089: END IF;
1090: FND_MESSAGE.SET_NAME('IBE','IBE_EXPR_PLSQL_API_ERROR');
1091: FND_MESSAGE.SET_TOKEN ( '0' , 'Express_Buy_Order - IBE_Shop_List_PVT.Save_Quote_From_List_Items' );
1084: END IF;
1085:
1086: if x_return_status <> FND_API.g_ret_sts_success then
1087: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1088: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order - non success status from IBE_Shop_List_PVT.Save_Quote_From_List_Items: ' || x_return_status); FND_MESSAGE.SET_NAME('IBE','IBE_EXPR_PLSQL_API_ERROR');
1089: END IF;
1090: FND_MESSAGE.SET_NAME('IBE','IBE_EXPR_PLSQL_API_ERROR');
1091: FND_MESSAGE.SET_TOKEN ( '0' , 'Express_Buy_Order - IBE_Shop_List_PVT.Save_Quote_From_List_Items' );
1092: FND_MESSAGE.SET_TOKEN ( '1' , x_return_status );
1098: end if;
1099: end if;
1100: end if;
1101:
1102: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1103: ibe_util.debug('Express_Buy_Order - BOTTOM LINE: express cart used: ' || l_curr_cart_id);
1104: END IF;
1105: -- let the caller know which quote we finally updated
1106: x_new_cart_id := l_curr_cart_id;
1099: end if;
1100: end if;
1101:
1102: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1103: ibe_util.debug('Express_Buy_Order - BOTTOM LINE: express cart used: ' || l_curr_cart_id);
1104: END IF;
1105: -- let the caller know which quote we finally updated
1106: x_new_cart_id := l_curr_cart_id;
1107:
1112: ( p_encoded => FND_API.G_FALSE,
1113: p_count => x_msg_count ,
1114: p_data => x_msg_data );
1115:
1116: --ibe_util.disable_debug;
1117: EXCEPTION
1118: WHEN FND_API.G_EXC_ERROR THEN
1119: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1120: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order: EXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1115:
1116: --ibe_util.disable_debug;
1117: EXCEPTION
1118: WHEN FND_API.G_EXC_ERROR THEN
1119: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1120: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order: EXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1121: END IF;
1122: ROLLBACK TO Express_Buy_Order_Pvt;
1123: x_return_status := FND_API.G_RET_STS_ERROR;
1116: --ibe_util.disable_debug;
1117: EXCEPTION
1118: WHEN FND_API.G_EXC_ERROR THEN
1119: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1120: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order: EXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1121: END IF;
1122: ROLLBACK TO Express_Buy_Order_Pvt;
1123: x_return_status := FND_API.G_RET_STS_ERROR;
1124: x_last_update_date := IBE_Quote_Misc_pvt.getQuoteLastUpdateDate(p_cart_id);
1126: ( p_encoded => FND_API.G_FALSE,
1127: p_count => x_msg_count,
1128: p_data => x_msg_data
1129: );
1130: --ibe_util.disable_debug;
1131: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1132: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1133: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order: UNEXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1134: END IF;
1128: p_data => x_msg_data
1129: );
1130: --ibe_util.disable_debug;
1131: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1132: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1133: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order: UNEXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1134: END IF;
1135: ROLLBACK TO Express_Buy_Order_Pvt;
1136: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1129: );
1130: --ibe_util.disable_debug;
1131: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1132: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1133: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order: UNEXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1134: END IF;
1135: ROLLBACK TO Express_Buy_Order_Pvt;
1136: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1137: FND_MSG_PUB.Count_And_Get
1138: ( p_encoded => FND_API.G_FALSE,
1139: p_count => x_msg_count,
1140: p_data => x_msg_data
1141: );
1142: --ibe_util.disable_debug;
1143: WHEN OTHERS THEN
1144: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1145: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order: OTHER EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1146: END IF;
1140: p_data => x_msg_data
1141: );
1142: --ibe_util.disable_debug;
1143: WHEN OTHERS THEN
1144: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1145: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order: OTHER EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1146: END IF;
1147: ROLLBACK TO Express_Buy_Order_Pvt;
1148: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1141: );
1142: --ibe_util.disable_debug;
1143: WHEN OTHERS THEN
1144: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1145: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order: OTHER EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1146: END IF;
1147: ROLLBACK TO Express_Buy_Order_Pvt;
1148: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1149: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1157: ( p_encoded => FND_API.G_FALSE,
1158: p_count => x_msg_count,
1159: p_data => x_msg_data
1160: );
1161: --ibe_util.disable_debug;
1162: end Express_Buy_Order;
1163:
1164:
1165: Procedure get_express_items_settings(
1276: BEGIN
1277:
1278: --Begin API body
1279:
1280: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1281: ibe_util.debug('Starting ibe_ord_oneclick_pvt.Get_express_items_settings ');
1282: ibe_util.debug('PROCESSING FLAG : ' || p_flag);
1283: END IF;
1284:
1277:
1278: --Begin API body
1279:
1280: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1281: ibe_util.debug('Starting ibe_ord_oneclick_pvt.Get_express_items_settings ');
1282: ibe_util.debug('PROCESSING FLAG : ' || p_flag);
1283: END IF;
1284:
1285: l_qte_header_rec := x_qte_header_rec;
1278: --Begin API body
1279:
1280: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1281: ibe_util.debug('Starting ibe_ord_oneclick_pvt.Get_express_items_settings ');
1282: ibe_util.debug('PROCESSING FLAG : ' || p_flag);
1283: END IF;
1284:
1285: l_qte_header_rec := x_qte_header_rec;
1286: if ((x_hd_tax_dtl_tbl is not null) and (x_hd_tax_dtl_tbl.count > 0)) then
1307: CLOSE c_settings;
1308:
1309: IF (p_flag <> 'CART') THEN
1310: -- see if there is a current cart
1311: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1312: ibe_util.debug('get_express_items_settings see if there is a current cart');
1313: ibe_util.debug('Input Cartid: '||l_qte_header_rec.quote_header_id);
1314: ibe_util.debug('Input Partyid: '||l_qte_header_rec.party_id);
1315: ibe_util.debug('Input Accountid: '||l_qte_header_rec.cust_account_id);
1308:
1309: IF (p_flag <> 'CART') THEN
1310: -- see if there is a current cart
1311: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1312: ibe_util.debug('get_express_items_settings see if there is a current cart');
1313: ibe_util.debug('Input Cartid: '||l_qte_header_rec.quote_header_id);
1314: ibe_util.debug('Input Partyid: '||l_qte_header_rec.party_id);
1315: ibe_util.debug('Input Accountid: '||l_qte_header_rec.cust_account_id);
1316: END IF;
1309: IF (p_flag <> 'CART') THEN
1310: -- see if there is a current cart
1311: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1312: ibe_util.debug('get_express_items_settings see if there is a current cart');
1313: ibe_util.debug('Input Cartid: '||l_qte_header_rec.quote_header_id);
1314: ibe_util.debug('Input Partyid: '||l_qte_header_rec.party_id);
1315: ibe_util.debug('Input Accountid: '||l_qte_header_rec.cust_account_id);
1316: END IF;
1317: OPEN c_quote(x_qte_header_rec.party_id,
1310: -- see if there is a current cart
1311: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1312: ibe_util.debug('get_express_items_settings see if there is a current cart');
1313: ibe_util.debug('Input Cartid: '||l_qte_header_rec.quote_header_id);
1314: ibe_util.debug('Input Partyid: '||l_qte_header_rec.party_id);
1315: ibe_util.debug('Input Accountid: '||l_qte_header_rec.cust_account_id);
1316: END IF;
1317: OPEN c_quote(x_qte_header_rec.party_id,
1318: x_qte_header_rec.cust_account_id);
1311: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1312: ibe_util.debug('get_express_items_settings see if there is a current cart');
1313: ibe_util.debug('Input Cartid: '||l_qte_header_rec.quote_header_id);
1314: ibe_util.debug('Input Partyid: '||l_qte_header_rec.party_id);
1315: ibe_util.debug('Input Accountid: '||l_qte_header_rec.cust_account_id);
1316: END IF;
1317: OPEN c_quote(x_qte_header_rec.party_id,
1318: x_qte_header_rec.cust_account_id);
1319: FETCH c_quote INTO l_curr_cart_id, l_curr_cart_date, l_curr_cart_currcode;
1320: if c_quote%NOTFOUND then
1321: l_curr_cart_id := FND_API.g_miss_num;
1322: else
1323: null;
1324: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1325: ibe_util.debug('get_express_items_settings got l_curr_cart_id ' || to_char(l_curr_cart_id));
1326: ibe_util.debug('get_express_items_settings got l_curr_cart_date ' || to_char(l_curr_cart_date,'DD-MON-YYYY:HH:MI:SS'));
1327: ibe_util.debug('get_express_items_settings got l_curr_cart_currcode ' || l_curr_cart_currcode);
1328: END IF;
1321: l_curr_cart_id := FND_API.g_miss_num;
1322: else
1323: null;
1324: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1325: ibe_util.debug('get_express_items_settings got l_curr_cart_id ' || to_char(l_curr_cart_id));
1326: ibe_util.debug('get_express_items_settings got l_curr_cart_date ' || to_char(l_curr_cart_date,'DD-MON-YYYY:HH:MI:SS'));
1327: ibe_util.debug('get_express_items_settings got l_curr_cart_currcode ' || l_curr_cart_currcode);
1328: END IF;
1329: end if;
1322: else
1323: null;
1324: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1325: ibe_util.debug('get_express_items_settings got l_curr_cart_id ' || to_char(l_curr_cart_id));
1326: ibe_util.debug('get_express_items_settings got l_curr_cart_date ' || to_char(l_curr_cart_date,'DD-MON-YYYY:HH:MI:SS'));
1327: ibe_util.debug('get_express_items_settings got l_curr_cart_currcode ' || l_curr_cart_currcode);
1328: END IF;
1329: end if;
1330: CLOSE c_quote;
1323: null;
1324: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1325: ibe_util.debug('get_express_items_settings got l_curr_cart_id ' || to_char(l_curr_cart_id));
1326: ibe_util.debug('get_express_items_settings got l_curr_cart_date ' || to_char(l_curr_cart_date,'DD-MON-YYYY:HH:MI:SS'));
1327: ibe_util.debug('get_express_items_settings got l_curr_cart_currcode ' || l_curr_cart_currcode);
1328: END IF;
1329: end if;
1330: CLOSE c_quote;
1331: end if; -- p_flag <> cart
1346: FETCH c_quote_date INTO l_push_qte_header_rec.last_update_date;
1347: CLOSE c_quote_date;
1348:
1349: l_control_rec.last_update_date := l_push_qte_header_rec.last_update_date;
1350: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1351: ibe_util.debug('****Calling IBE_Quote_Save_pvt.SAVE for pushing out **** ');
1352: ibe_util.debug(' l_qte_header_rec.quote_header_id : ' || l_qte_header_rec.quote_header_id);
1353: ibe_util.debug(' l_qte_header_rec.quote_name : ' || l_qte_header_rec.quote_name);
1354: ibe_util.debug(' l_qte_header_rec.last_update_date : ' || to_char(l_qte_header_rec.last_update_date,'DD-MON-YYYY:HH24:MI:SS'));
1347: CLOSE c_quote_date;
1348:
1349: l_control_rec.last_update_date := l_push_qte_header_rec.last_update_date;
1350: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1351: ibe_util.debug('****Calling IBE_Quote_Save_pvt.SAVE for pushing out **** ');
1352: ibe_util.debug(' l_qte_header_rec.quote_header_id : ' || l_qte_header_rec.quote_header_id);
1353: ibe_util.debug(' l_qte_header_rec.quote_name : ' || l_qte_header_rec.quote_name);
1354: ibe_util.debug(' l_qte_header_rec.last_update_date : ' || to_char(l_qte_header_rec.last_update_date,'DD-MON-YYYY:HH24:MI:SS'));
1355: END IF;
1348:
1349: l_control_rec.last_update_date := l_push_qte_header_rec.last_update_date;
1350: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1351: ibe_util.debug('****Calling IBE_Quote_Save_pvt.SAVE for pushing out **** ');
1352: ibe_util.debug(' l_qte_header_rec.quote_header_id : ' || l_qte_header_rec.quote_header_id);
1353: ibe_util.debug(' l_qte_header_rec.quote_name : ' || l_qte_header_rec.quote_name);
1354: ibe_util.debug(' l_qte_header_rec.last_update_date : ' || to_char(l_qte_header_rec.last_update_date,'DD-MON-YYYY:HH24:MI:SS'));
1355: END IF;
1356: IBE_Quote_Save_pvt.SAVE(
1349: l_control_rec.last_update_date := l_push_qte_header_rec.last_update_date;
1350: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1351: ibe_util.debug('****Calling IBE_Quote_Save_pvt.SAVE for pushing out **** ');
1352: ibe_util.debug(' l_qte_header_rec.quote_header_id : ' || l_qte_header_rec.quote_header_id);
1353: ibe_util.debug(' l_qte_header_rec.quote_name : ' || l_qte_header_rec.quote_name);
1354: ibe_util.debug(' l_qte_header_rec.last_update_date : ' || to_char(l_qte_header_rec.last_update_date,'DD-MON-YYYY:HH24:MI:SS'));
1355: END IF;
1356: IBE_Quote_Save_pvt.SAVE(
1357: p_api_version_number => 1.0,
1350: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1351: ibe_util.debug('****Calling IBE_Quote_Save_pvt.SAVE for pushing out **** ');
1352: ibe_util.debug(' l_qte_header_rec.quote_header_id : ' || l_qte_header_rec.quote_header_id);
1353: ibe_util.debug(' l_qte_header_rec.quote_name : ' || l_qte_header_rec.quote_name);
1354: ibe_util.debug(' l_qte_header_rec.last_update_date : ' || to_char(l_qte_header_rec.last_update_date,'DD-MON-YYYY:HH24:MI:SS'));
1355: END IF;
1356: IBE_Quote_Save_pvt.SAVE(
1357: p_api_version_number => 1.0,
1358: p_init_msg_list => FND_API.G_FALSE,
1366: x_last_update_date => lx_last_update_date,
1367: X_Return_Status => lx_Return_Status,
1368: X_Msg_Count => lx_Msg_Count,
1369: X_Msg_Data => lx_Msg_Data);
1370: --ibe_util.enable_debug;
1371: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1372: ibe_util.debug('Back from IBE_Quote_Save_pvt.SAVE for pushing out' );
1373: END IF;
1374: if lx_return_status <> FND_API.g_ret_sts_success then
1367: X_Return_Status => lx_Return_Status,
1368: X_Msg_Count => lx_Msg_Count,
1369: X_Msg_Data => lx_Msg_Data);
1370: --ibe_util.enable_debug;
1371: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1372: ibe_util.debug('Back from IBE_Quote_Save_pvt.SAVE for pushing out' );
1373: END IF;
1374: if lx_return_status <> FND_API.g_ret_sts_success then
1375: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1368: X_Msg_Count => lx_Msg_Count,
1369: X_Msg_Data => lx_Msg_Data);
1370: --ibe_util.enable_debug;
1371: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1372: ibe_util.debug('Back from IBE_Quote_Save_pvt.SAVE for pushing out' );
1373: END IF;
1374: if lx_return_status <> FND_API.g_ret_sts_success then
1375: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1376: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order - non success status from IBE_Quote_Save_pvt.SAVE: ' || lx_return_status);
1371: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1372: ibe_util.debug('Back from IBE_Quote_Save_pvt.SAVE for pushing out' );
1373: END IF;
1374: if lx_return_status <> FND_API.g_ret_sts_success then
1375: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1376: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order - non success status from IBE_Quote_Save_pvt.SAVE: ' || lx_return_status);
1377: END IF;
1378: FND_MESSAGE.SET_NAME('IBE','IBE_EXPR_PLSQL_API_ERROR');
1379: FND_MESSAGE.SET_TOKEN ( '0' , 'Get_Express_Items_Settings - IBE_Quote_Save_pvt.SAVE for nonconsolidation' );
1372: ibe_util.debug('Back from IBE_Quote_Save_pvt.SAVE for pushing out' );
1373: END IF;
1374: if lx_return_status <> FND_API.g_ret_sts_success then
1375: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1376: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order - non success status from IBE_Quote_Save_pvt.SAVE: ' || lx_return_status);
1377: END IF;
1378: FND_MESSAGE.SET_NAME('IBE','IBE_EXPR_PLSQL_API_ERROR');
1379: FND_MESSAGE.SET_TOKEN ( '0' , 'Get_Express_Items_Settings - IBE_Quote_Save_pvt.SAVE for nonconsolidation' );
1380: FND_MESSAGE.SET_TOKEN ( '1' , lx_return_status );
1390: l_curr_cart_id := FND_API.g_miss_num;
1391: l_curr_cart_date := FND_API.g_miss_date;
1392: else
1393: --settings have'nt changed so we should consolidate incoming items to the open express-checkout cart
1394: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1395: ibe_util.debug('ibe_ord_oneclick_pvt.Get_express_items_settings-Consolidating to: '||l_curr_cart_id);
1396: END IF;
1397: l_qte_header_rec.quote_header_id := l_curr_cart_id;
1398: end if; -- end pushing out of old cart
1391: l_curr_cart_date := FND_API.g_miss_date;
1392: else
1393: --settings have'nt changed so we should consolidate incoming items to the open express-checkout cart
1394: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1395: ibe_util.debug('ibe_ord_oneclick_pvt.Get_express_items_settings-Consolidating to: '||l_curr_cart_id);
1396: END IF;
1397: l_qte_header_rec.quote_header_id := l_curr_cart_id;
1398: end if; -- end pushing out of old cart
1399: end if; -- end checking if we can consolidate
1403:
1404: -- see if we need to apply the Express Checkout Settings (billing, shipping, payment info)
1405: if ((p_flag = 'CART') or ((p_flag <> 'CART') and (l_curr_cart_id = FND_API.g_miss_num))) then
1406:
1407: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1408: ibe_util.debug('Express_Buy_Order got l_settings_date ' || to_char(l_settings_date,'DD-MON-YYYY:HH:MI:SS'));
1409: END IF;
1410:
1411: if (p_flag = 'CART') then
1404: -- see if we need to apply the Express Checkout Settings (billing, shipping, payment info)
1405: if ((p_flag = 'CART') or ((p_flag <> 'CART') and (l_curr_cart_id = FND_API.g_miss_num))) then
1406:
1407: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1408: ibe_util.debug('Express_Buy_Order got l_settings_date ' || to_char(l_settings_date,'DD-MON-YYYY:HH:MI:SS'));
1409: END IF;
1410:
1411: if (p_flag = 'CART') then
1412: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1408: ibe_util.debug('Express_Buy_Order got l_settings_date ' || to_char(l_settings_date,'DD-MON-YYYY:HH:MI:SS'));
1409: END IF;
1410:
1411: if (p_flag = 'CART') then
1412: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1413: ibe_util.debug('Express ordering a CART id : ' || x_qte_header_rec.quote_header_id);
1414: ibe_util.debug('Making sure user has Full privilege on this cart');
1415: END IF;
1416: l_curr_cart_id := x_qte_header_rec.quote_header_id;
1409: END IF;
1410:
1411: if (p_flag = 'CART') then
1412: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1413: ibe_util.debug('Express ordering a CART id : ' || x_qte_header_rec.quote_header_id);
1414: ibe_util.debug('Making sure user has Full privilege on this cart');
1415: END IF;
1416: l_curr_cart_id := x_qte_header_rec.quote_header_id;
1417: -- l_qte_header_rec.quote_name := l_curr_cart_id;
1410:
1411: if (p_flag = 'CART') then
1412: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1413: ibe_util.debug('Express ordering a CART id : ' || x_qte_header_rec.quote_header_id);
1414: ibe_util.debug('Making sure user has Full privilege on this cart');
1415: END IF;
1416: l_curr_cart_id := x_qte_header_rec.quote_header_id;
1417: -- l_qte_header_rec.quote_name := l_curr_cart_id;
1418: -- no need to rename the cart anymore since all cart carts will have a name now
1421: OPEN c_party_type(x_qte_header_rec.cust_account_id);
1422: FETCH c_party_type INTO l_party_type;
1423: CLOSE c_party_type;
1424:
1425: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1426: ibe_util.debug('Party Type: ' || l_party_type);
1427: END IF;
1428:
1429: if (l_party_type <> 'PERSON') then
1422: FETCH c_party_type INTO l_party_type;
1423: CLOSE c_party_type;
1424:
1425: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1426: ibe_util.debug('Party Type: ' || l_party_type);
1427: END IF;
1428:
1429: if (l_party_type <> 'PERSON') then
1430: l_optional_party_id := x_qte_header_rec.party_id;
1441: l_tax_detail_rec.quote_header_id := l_curr_cart_id; --will be g_miss for expr chkout of items
1442: l_tax_detail_rec.tax_exempt_flag := 'S';
1443: x_hd_tax_dtl_tbl(1) := l_tax_detail_rec;
1444:
1445: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1446: ibe_util.debug('Get_express_items_settings - *** creating header level tax record***');
1447: ibe_util.debug('l_tax_detail_rec.operation_code ' || l_tax_detail_rec.operation_code);
1448: ibe_util.debug('l_tax_detail_rec.quote_header_id ' || l_tax_detail_rec.quote_header_id);
1449: ibe_util.debug('l_tax_detail_rec.tax_exempt_flag ' || l_tax_detail_rec.tax_exempt_flag);
1442: l_tax_detail_rec.tax_exempt_flag := 'S';
1443: x_hd_tax_dtl_tbl(1) := l_tax_detail_rec;
1444:
1445: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1446: ibe_util.debug('Get_express_items_settings - *** creating header level tax record***');
1447: ibe_util.debug('l_tax_detail_rec.operation_code ' || l_tax_detail_rec.operation_code);
1448: ibe_util.debug('l_tax_detail_rec.quote_header_id ' || l_tax_detail_rec.quote_header_id);
1449: ibe_util.debug('l_tax_detail_rec.tax_exempt_flag ' || l_tax_detail_rec.tax_exempt_flag);
1450: END IF;
1443: x_hd_tax_dtl_tbl(1) := l_tax_detail_rec;
1444:
1445: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1446: ibe_util.debug('Get_express_items_settings - *** creating header level tax record***');
1447: ibe_util.debug('l_tax_detail_rec.operation_code ' || l_tax_detail_rec.operation_code);
1448: ibe_util.debug('l_tax_detail_rec.quote_header_id ' || l_tax_detail_rec.quote_header_id);
1449: ibe_util.debug('l_tax_detail_rec.tax_exempt_flag ' || l_tax_detail_rec.tax_exempt_flag);
1450: END IF;
1451: END IF; --l_count_tax=0
1444:
1445: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1446: ibe_util.debug('Get_express_items_settings - *** creating header level tax record***');
1447: ibe_util.debug('l_tax_detail_rec.operation_code ' || l_tax_detail_rec.operation_code);
1448: ibe_util.debug('l_tax_detail_rec.quote_header_id ' || l_tax_detail_rec.quote_header_id);
1449: ibe_util.debug('l_tax_detail_rec.tax_exempt_flag ' || l_tax_detail_rec.tax_exempt_flag);
1450: END IF;
1451: END IF; --l_count_tax=0
1452:
1445: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1446: ibe_util.debug('Get_express_items_settings - *** creating header level tax record***');
1447: ibe_util.debug('l_tax_detail_rec.operation_code ' || l_tax_detail_rec.operation_code);
1448: ibe_util.debug('l_tax_detail_rec.quote_header_id ' || l_tax_detail_rec.quote_header_id);
1449: ibe_util.debug('l_tax_detail_rec.tax_exempt_flag ' || l_tax_detail_rec.tax_exempt_flag);
1450: END IF;
1451: END IF; --l_count_tax=0
1452:
1453: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1449: ibe_util.debug('l_tax_detail_rec.tax_exempt_flag ' || l_tax_detail_rec.tax_exempt_flag);
1450: END IF;
1451: END IF; --l_count_tax=0
1452:
1453: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1454: ibe_util.debug('Get_express_items_settings - ***setting quote header info***');
1455: END IF;
1456:
1457: l_qte_header_rec.invoice_to_party_site_id := l_bill_to_pty_site_id;
1450: END IF;
1451: END IF; --l_count_tax=0
1452:
1453: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1454: ibe_util.debug('Get_express_items_settings - ***setting quote header info***');
1455: END IF;
1456:
1457: l_qte_header_rec.invoice_to_party_site_id := l_bill_to_pty_site_id;
1458: l_qte_header_rec.invoice_to_party_id := l_optional_party_id;
1456:
1457: l_qte_header_rec.invoice_to_party_site_id := l_bill_to_pty_site_id;
1458: l_qte_header_rec.invoice_to_party_id := l_optional_party_id;
1459: l_qte_header_rec.quote_source_code := 'IStore Oneclick';
1460: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1461: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.party_id ' || l_qte_header_rec.party_id);
1462: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.cust_account_id ' || l_qte_header_rec.cust_account_id);
1463: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.invoice_to_party_site_id' || l_qte_header_rec.invoice_to_party_site_id);
1464: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.invoice_to_party_id ' || l_qte_header_rec.invoice_to_party_id);
1457: l_qte_header_rec.invoice_to_party_site_id := l_bill_to_pty_site_id;
1458: l_qte_header_rec.invoice_to_party_id := l_optional_party_id;
1459: l_qte_header_rec.quote_source_code := 'IStore Oneclick';
1460: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1461: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.party_id ' || l_qte_header_rec.party_id);
1462: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.cust_account_id ' || l_qte_header_rec.cust_account_id);
1463: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.invoice_to_party_site_id' || l_qte_header_rec.invoice_to_party_site_id);
1464: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.invoice_to_party_id ' || l_qte_header_rec.invoice_to_party_id);
1465: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.quote_source_code ' || l_qte_header_rec.quote_source_code);
1458: l_qte_header_rec.invoice_to_party_id := l_optional_party_id;
1459: l_qte_header_rec.quote_source_code := 'IStore Oneclick';
1460: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1461: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.party_id ' || l_qte_header_rec.party_id);
1462: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.cust_account_id ' || l_qte_header_rec.cust_account_id);
1463: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.invoice_to_party_site_id' || l_qte_header_rec.invoice_to_party_site_id);
1464: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.invoice_to_party_id ' || l_qte_header_rec.invoice_to_party_id);
1465: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.quote_source_code ' || l_qte_header_rec.quote_source_code);
1466: END IF;
1459: l_qte_header_rec.quote_source_code := 'IStore Oneclick';
1460: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1461: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.party_id ' || l_qte_header_rec.party_id);
1462: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.cust_account_id ' || l_qte_header_rec.cust_account_id);
1463: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.invoice_to_party_site_id' || l_qte_header_rec.invoice_to_party_site_id);
1464: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.invoice_to_party_id ' || l_qte_header_rec.invoice_to_party_id);
1465: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.quote_source_code ' || l_qte_header_rec.quote_source_code);
1466: END IF;
1467:
1460: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1461: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.party_id ' || l_qte_header_rec.party_id);
1462: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.cust_account_id ' || l_qte_header_rec.cust_account_id);
1463: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.invoice_to_party_site_id' || l_qte_header_rec.invoice_to_party_site_id);
1464: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.invoice_to_party_id ' || l_qte_header_rec.invoice_to_party_id);
1465: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.quote_source_code ' || l_qte_header_rec.quote_source_code);
1466: END IF;
1467:
1468: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1461: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.party_id ' || l_qte_header_rec.party_id);
1462: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.cust_account_id ' || l_qte_header_rec.cust_account_id);
1463: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.invoice_to_party_site_id' || l_qte_header_rec.invoice_to_party_site_id);
1464: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.invoice_to_party_id ' || l_qte_header_rec.invoice_to_party_id);
1465: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.quote_source_code ' || l_qte_header_rec.quote_source_code);
1466: END IF;
1467:
1468: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1469: ibe_util.debug('Express_Buy_Order - ***setting to create or update payment rec***');
1464: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.invoice_to_party_id ' || l_qte_header_rec.invoice_to_party_id);
1465: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.quote_source_code ' || l_qte_header_rec.quote_source_code);
1466: END IF;
1467:
1468: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1469: ibe_util.debug('Express_Buy_Order - ***setting to create or update payment rec***');
1470: END IF;
1471: /*mannamra: In light of credit card consolidation, we will not be storing credit card number in one_click_all table
1472: we will also just be passing assignment id to ASO whi will in turn create a transaction and
1465: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.quote_source_code ' || l_qte_header_rec.quote_source_code);
1466: END IF;
1467:
1468: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1469: ibe_util.debug('Express_Buy_Order - ***setting to create or update payment rec***');
1470: END IF;
1471: /*mannamra: In light of credit card consolidation, we will not be storing credit card number in one_click_all table
1472: we will also just be passing assignment id to ASO whi will in turn create a transaction and
1473: store the transaction extension id for this quote in aso_payments */
1474:
1475: /*OPEN c_bank_acct(l_payment_id);
1476: FETCH c_bank_acct INTO l_credit_card_num, l_credit_card_exp, l_credit_card_holder_name;
1477: if c_bank_acct%NOTFOUND then
1478: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1479: ibe_util.debug('No credit card record found.');
1480: END IF;
1481: end if;
1482: CLOSE c_bank_acct;*/
1475: /*OPEN c_bank_acct(l_payment_id);
1476: FETCH c_bank_acct INTO l_credit_card_num, l_credit_card_exp, l_credit_card_holder_name;
1477: if c_bank_acct%NOTFOUND then
1478: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1479: ibe_util.debug('No credit card record found.');
1480: END IF;
1481: end if;
1482: CLOSE c_bank_acct;*/
1483:
1483:
1484: --l_credit_card_name := IBE_ORD_ONECLICK_PVT.Get_credit_card_Type(l_credit_card_num);
1485: /* If Credit Card name is ERROR raise appropriate exception */
1486: /*If l_credit_card_name = 'ERROR' Then
1487: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1488: ibe_util.debug('Invalid Credit Card');
1489: END IF;
1490: End If;*/
1491:
1484: --l_credit_card_name := IBE_ORD_ONECLICK_PVT.Get_credit_card_Type(l_credit_card_num);
1485: /* If Credit Card name is ERROR raise appropriate exception */
1486: /*If l_credit_card_name = 'ERROR' Then
1487: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1488: ibe_util.debug('Invalid Credit Card');
1489: END IF;
1490: End If;*/
1491:
1492: /* per Bug #3020526, using info from AP_BANK_ACCOUNTS table instead
1492: /* per Bug #3020526, using info from AP_BANK_ACCOUNTS table instead
1493: OPEN c_party_name(x_qte_header_rec.party_id);
1494: FETCH c_party_name INTO l_credit_card_holder_name;
1495: if c_party_name%NOTFOUND then
1496: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1497: ibe_util.debug('No name to use for credit card holder name.');
1498: END IF;
1499: end if;
1500: CLOSE c_party_name;
1493: OPEN c_party_name(x_qte_header_rec.party_id);
1494: FETCH c_party_name INTO l_credit_card_holder_name;
1495: if c_party_name%NOTFOUND then
1496: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1497: ibe_util.debug('No name to use for credit card holder name.');
1498: END IF;
1499: end if;
1500: CLOSE c_party_name;
1501: */
1517: l_payment_rec.credit_card_holder_name := l_credit_card_holder_name;*/
1518: l_payment_rec.payment_type_code := 'CREDIT_CARD';
1519: l_payment_rec.instr_assignment_id := l_payment_id;
1520: x_payment_tbl(1) := l_payment_rec;
1521: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1522: ibe_util.debug('l_payment_rec.operation_code ' || l_payment_rec.operation_code);
1523: ibe_util.debug('l_payment_rec.payment_term_id ' || l_payment_rec.payment_term_id);
1524: ibe_util.debug('l_payment_rec.payment_type_code '|| l_payment_rec.payment_type_code);
1525: ibe_util.debug('l_payment_rec.payment_ref_number
1518: l_payment_rec.payment_type_code := 'CREDIT_CARD';
1519: l_payment_rec.instr_assignment_id := l_payment_id;
1520: x_payment_tbl(1) := l_payment_rec;
1521: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1522: ibe_util.debug('l_payment_rec.operation_code ' || l_payment_rec.operation_code);
1523: ibe_util.debug('l_payment_rec.payment_term_id ' || l_payment_rec.payment_term_id);
1524: ibe_util.debug('l_payment_rec.payment_type_code '|| l_payment_rec.payment_type_code);
1525: ibe_util.debug('l_payment_rec.payment_ref_number
1526: ibe_util.debug('l_payment_rec.instr_asssignment_id ' || l_payment_rec.instr_assignment_id);
1519: l_payment_rec.instr_assignment_id := l_payment_id;
1520: x_payment_tbl(1) := l_payment_rec;
1521: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1522: ibe_util.debug('l_payment_rec.operation_code ' || l_payment_rec.operation_code);
1523: ibe_util.debug('l_payment_rec.payment_term_id ' || l_payment_rec.payment_term_id);
1524: ibe_util.debug('l_payment_rec.payment_type_code '|| l_payment_rec.payment_type_code);
1525: ibe_util.debug('l_payment_rec.payment_ref_number
1526: ibe_util.debug('l_payment_rec.instr_asssignment_id ' || l_payment_rec.instr_assignment_id);
1527: END IF;
1520: x_payment_tbl(1) := l_payment_rec;
1521: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1522: ibe_util.debug('l_payment_rec.operation_code ' || l_payment_rec.operation_code);
1523: ibe_util.debug('l_payment_rec.payment_term_id ' || l_payment_rec.payment_term_id);
1524: ibe_util.debug('l_payment_rec.payment_type_code '|| l_payment_rec.payment_type_code);
1525: ibe_util.debug('l_payment_rec.payment_ref_number
1526: ibe_util.debug('l_payment_rec.instr_asssignment_id ' || l_payment_rec.instr_assignment_id);
1527: END IF;
1528:
1521: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1522: ibe_util.debug('l_payment_rec.operation_code ' || l_payment_rec.operation_code);
1523: ibe_util.debug('l_payment_rec.payment_term_id ' || l_payment_rec.payment_term_id);
1524: ibe_util.debug('l_payment_rec.payment_type_code '|| l_payment_rec.payment_type_code);
1525: ibe_util.debug('l_payment_rec.payment_ref_number
1527: END IF;
1528:
1529: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1522: ibe_util.debug('l_payment_rec.operation_code ' || l_payment_rec.operation_code);
1523: ibe_util.debug('l_payment_rec.payment_term_id ' || l_payment_rec.payment_term_id);
1524: ibe_util.debug('l_payment_rec.payment_type_code '|| l_payment_rec.payment_type_code);
1525: ibe_util.debug('l_payment_rec.payment_ref_number
1526: ibe_util.debug('l_payment_rec.instr_asssignment_id ' || l_payment_rec.instr_assignment_id);
1527: END IF;
1528:
1529: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1530: ibe_util.debug('Get_express_items_settings - ***setting to create or update shipment rec***');
1525: ibe_util.debug('l_payment_rec.payment_ref_number
1526: ibe_util.debug('l_payment_rec.instr_asssignment_id ' || l_payment_rec.instr_assignment_id);
1527: END IF;
1528:
1529: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1530: ibe_util.debug('Get_express_items_settings - ***setting to create or update shipment rec***');
1531: END IF;
1532: l_shipment_rec.operation_code := 'UPDATE';
1533: OPEN c_shipment(l_curr_cart_id);
1526: ibe_util.debug('l_payment_rec.instr_asssignment_id ' || l_payment_rec.instr_assignment_id);
1527: END IF;
1528:
1529: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1530: ibe_util.debug('Get_express_items_settings - ***setting to create or update shipment rec***');
1531: END IF;
1532: l_shipment_rec.operation_code := 'UPDATE';
1533: OPEN c_shipment(l_curr_cart_id);
1534: FETCH c_shipment INTO l_shipment_rec.shipment_id;
1532: l_shipment_rec.operation_code := 'UPDATE';
1533: OPEN c_shipment(l_curr_cart_id);
1534: FETCH c_shipment INTO l_shipment_rec.shipment_id;
1535: if c_shipment%NOTFOUND then
1536: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1537: ibe_util.debug('no shipment rec at header, will CREATE one');
1538: END IF;
1539: l_shipment_rec.operation_code := 'CREATE';
1540: end if;
1533: OPEN c_shipment(l_curr_cart_id);
1534: FETCH c_shipment INTO l_shipment_rec.shipment_id;
1535: if c_shipment%NOTFOUND then
1536: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1537: ibe_util.debug('no shipment rec at header, will CREATE one');
1538: END IF;
1539: l_shipment_rec.operation_code := 'CREATE';
1540: end if;
1541: CLOSE c_shipment;
1543: l_shipment_rec.ship_method_code := l_freight_code;
1544: l_shipment_rec.ship_to_party_site_id := l_ship_to_pty_site_id;
1545: l_shipment_rec.ship_to_party_id := l_optional_party_id;
1546: x_hd_shipment_tbl(1) := l_shipment_rec;
1547: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1548: ibe_util.debug('l_shipment_rec.shipment_id ' || l_shipment_rec.shipment_id);
1549: ibe_util.debug('l_shipment_rec.operation_code ' || l_shipment_rec.operation_code);
1550: ibe_util.debug('l_shipment_rec.ship_method_code ' || l_shipment_rec.ship_method_code);
1551: ibe_util.debug('l_shipment_rec.ship_to_party_site_id ' || l_shipment_rec.ship_to_party_site_id);
1544: l_shipment_rec.ship_to_party_site_id := l_ship_to_pty_site_id;
1545: l_shipment_rec.ship_to_party_id := l_optional_party_id;
1546: x_hd_shipment_tbl(1) := l_shipment_rec;
1547: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1548: ibe_util.debug('l_shipment_rec.shipment_id ' || l_shipment_rec.shipment_id);
1549: ibe_util.debug('l_shipment_rec.operation_code ' || l_shipment_rec.operation_code);
1550: ibe_util.debug('l_shipment_rec.ship_method_code ' || l_shipment_rec.ship_method_code);
1551: ibe_util.debug('l_shipment_rec.ship_to_party_site_id ' || l_shipment_rec.ship_to_party_site_id);
1552: ibe_util.debug('l_shipment_rec.ship_to_party_id ' || l_shipment_rec.ship_to_party_id);
1545: l_shipment_rec.ship_to_party_id := l_optional_party_id;
1546: x_hd_shipment_tbl(1) := l_shipment_rec;
1547: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1548: ibe_util.debug('l_shipment_rec.shipment_id ' || l_shipment_rec.shipment_id);
1549: ibe_util.debug('l_shipment_rec.operation_code ' || l_shipment_rec.operation_code);
1550: ibe_util.debug('l_shipment_rec.ship_method_code ' || l_shipment_rec.ship_method_code);
1551: ibe_util.debug('l_shipment_rec.ship_to_party_site_id ' || l_shipment_rec.ship_to_party_site_id);
1552: ibe_util.debug('l_shipment_rec.ship_to_party_id ' || l_shipment_rec.ship_to_party_id);
1553: END IF;
1546: x_hd_shipment_tbl(1) := l_shipment_rec;
1547: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1548: ibe_util.debug('l_shipment_rec.shipment_id ' || l_shipment_rec.shipment_id);
1549: ibe_util.debug('l_shipment_rec.operation_code ' || l_shipment_rec.operation_code);
1550: ibe_util.debug('l_shipment_rec.ship_method_code ' || l_shipment_rec.ship_method_code);
1551: ibe_util.debug('l_shipment_rec.ship_to_party_site_id ' || l_shipment_rec.ship_to_party_site_id);
1552: ibe_util.debug('l_shipment_rec.ship_to_party_id ' || l_shipment_rec.ship_to_party_id);
1553: END IF;
1554:
1547: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1548: ibe_util.debug('l_shipment_rec.shipment_id ' || l_shipment_rec.shipment_id);
1549: ibe_util.debug('l_shipment_rec.operation_code ' || l_shipment_rec.operation_code);
1550: ibe_util.debug('l_shipment_rec.ship_method_code ' || l_shipment_rec.ship_method_code);
1551: ibe_util.debug('l_shipment_rec.ship_to_party_site_id ' || l_shipment_rec.ship_to_party_site_id);
1552: ibe_util.debug('l_shipment_rec.ship_to_party_id ' || l_shipment_rec.ship_to_party_id);
1553: END IF;
1554:
1555: END IF; --IF ((p_flag = 'CART') or ((p_flag <> 'CART') and (l_curr_cart_id = FND_API.g_miss_num)))
1548: ibe_util.debug('l_shipment_rec.shipment_id ' || l_shipment_rec.shipment_id);
1549: ibe_util.debug('l_shipment_rec.operation_code ' || l_shipment_rec.operation_code);
1550: ibe_util.debug('l_shipment_rec.ship_method_code ' || l_shipment_rec.ship_method_code);
1551: ibe_util.debug('l_shipment_rec.ship_to_party_site_id ' || l_shipment_rec.ship_to_party_site_id);
1552: ibe_util.debug('l_shipment_rec.ship_to_party_id ' || l_shipment_rec.ship_to_party_id);
1553: END IF;
1554:
1555: END IF; --IF ((p_flag = 'CART') or ((p_flag <> 'CART') and (l_curr_cart_id = FND_API.g_miss_num)))
1556:
1641: Begin
1642:
1643: SAVEPOINT Update_Settings;
1644:
1645: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1646: ibe_util.debug('------- Input to ibe_ord_oneclick_pvt.Update_Settings: -----------------');
1647: ibe_util.debug('p_party_id :'||p_party_id);
1648: ibe_util.debug('p_acct_id :'||p_acct_id);
1649: ibe_util.debug('p_assignment_id :'||p_assignment_id);
1642:
1643: SAVEPOINT Update_Settings;
1644:
1645: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1646: ibe_util.debug('------- Input to ibe_ord_oneclick_pvt.Update_Settings: -----------------');
1647: ibe_util.debug('p_party_id :'||p_party_id);
1648: ibe_util.debug('p_acct_id :'||p_acct_id);
1649: ibe_util.debug('p_assignment_id :'||p_assignment_id);
1650: END IF;
1643: SAVEPOINT Update_Settings;
1644:
1645: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1646: ibe_util.debug('------- Input to ibe_ord_oneclick_pvt.Update_Settings: -----------------');
1647: ibe_util.debug('p_party_id :'||p_party_id);
1648: ibe_util.debug('p_acct_id :'||p_acct_id);
1649: ibe_util.debug('p_assignment_id :'||p_assignment_id);
1650: END IF;
1651:
1644:
1645: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1646: ibe_util.debug('------- Input to ibe_ord_oneclick_pvt.Update_Settings: -----------------');
1647: ibe_util.debug('p_party_id :'||p_party_id);
1648: ibe_util.debug('p_acct_id :'||p_acct_id);
1649: ibe_util.debug('p_assignment_id :'||p_assignment_id);
1650: END IF;
1651:
1652: OPEN c_get_oneclick_settings(p_party_id, p_acct_id);
1645: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1646: ibe_util.debug('------- Input to ibe_ord_oneclick_pvt.Update_Settings: -----------------');
1647: ibe_util.debug('p_party_id :'||p_party_id);
1648: ibe_util.debug('p_acct_id :'||p_acct_id);
1649: ibe_util.debug('p_assignment_id :'||p_assignment_id);
1650: END IF;
1651:
1652: OPEN c_get_oneclick_settings(p_party_id, p_acct_id);
1653: FETCH c_get_oneclick_settings
1664: l_oneclick_id := FND_API.g_miss_num;
1665: END IF;
1666: CLOSE c_get_oneclick_settings;
1667:
1668: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1669: ibe_util.debug('------- Retrieved From TABLES: Update_Settings-----------------');
1670: ibe_util.debug('l_object_version_number :'||l_object_version_number);
1671: ibe_util.debug('l_oneclick_id :'||l_oneclick_id);
1672: ibe_util.debug('l_enabled_flag :'||l_enabled_flag);
1665: END IF;
1666: CLOSE c_get_oneclick_settings;
1667:
1668: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1669: ibe_util.debug('------- Retrieved From TABLES: Update_Settings-----------------');
1670: ibe_util.debug('l_object_version_number :'||l_object_version_number);
1671: ibe_util.debug('l_oneclick_id :'||l_oneclick_id);
1672: ibe_util.debug('l_enabled_flag :'||l_enabled_flag);
1673: ibe_util.debug('l_freight_code :'||l_freight_code);
1666: CLOSE c_get_oneclick_settings;
1667:
1668: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1669: ibe_util.debug('------- Retrieved From TABLES: Update_Settings-----------------');
1670: ibe_util.debug('l_object_version_number :'||l_object_version_number);
1671: ibe_util.debug('l_oneclick_id :'||l_oneclick_id);
1672: ibe_util.debug('l_enabled_flag :'||l_enabled_flag);
1673: ibe_util.debug('l_freight_code :'||l_freight_code);
1674: ibe_util.debug('l_payment_id :'||l_payment_id);
1667:
1668: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1669: ibe_util.debug('------- Retrieved From TABLES: Update_Settings-----------------');
1670: ibe_util.debug('l_object_version_number :'||l_object_version_number);
1671: ibe_util.debug('l_oneclick_id :'||l_oneclick_id);
1672: ibe_util.debug('l_enabled_flag :'||l_enabled_flag);
1673: ibe_util.debug('l_freight_code :'||l_freight_code);
1674: ibe_util.debug('l_payment_id :'||l_payment_id);
1675: ibe_util.debug('l_bill_ptysite_id :'||l_bill_ptysite_id);
1668: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1669: ibe_util.debug('------- Retrieved From TABLES: Update_Settings-----------------');
1670: ibe_util.debug('l_object_version_number :'||l_object_version_number);
1671: ibe_util.debug('l_oneclick_id :'||l_oneclick_id);
1672: ibe_util.debug('l_enabled_flag :'||l_enabled_flag);
1673: ibe_util.debug('l_freight_code :'||l_freight_code);
1674: ibe_util.debug('l_payment_id :'||l_payment_id);
1675: ibe_util.debug('l_bill_ptysite_id :'||l_bill_ptysite_id);
1676: ibe_util.debug('l_ship_ptysite_id :'||l_ship_ptysite_id);
1669: ibe_util.debug('------- Retrieved From TABLES: Update_Settings-----------------');
1670: ibe_util.debug('l_object_version_number :'||l_object_version_number);
1671: ibe_util.debug('l_oneclick_id :'||l_oneclick_id);
1672: ibe_util.debug('l_enabled_flag :'||l_enabled_flag);
1673: ibe_util.debug('l_freight_code :'||l_freight_code);
1674: ibe_util.debug('l_payment_id :'||l_payment_id);
1675: ibe_util.debug('l_bill_ptysite_id :'||l_bill_ptysite_id);
1676: ibe_util.debug('l_ship_ptysite_id :'||l_ship_ptysite_id);
1677: ibe_util.debug('Checking p_assignment_id not null :'||p_assignment_id);
1670: ibe_util.debug('l_object_version_number :'||l_object_version_number);
1671: ibe_util.debug('l_oneclick_id :'||l_oneclick_id);
1672: ibe_util.debug('l_enabled_flag :'||l_enabled_flag);
1673: ibe_util.debug('l_freight_code :'||l_freight_code);
1674: ibe_util.debug('l_payment_id :'||l_payment_id);
1675: ibe_util.debug('l_bill_ptysite_id :'||l_bill_ptysite_id);
1676: ibe_util.debug('l_ship_ptysite_id :'||l_ship_ptysite_id);
1677: ibe_util.debug('Checking p_assignment_id not null :'||p_assignment_id);
1678: END IF;
1671: ibe_util.debug('l_oneclick_id :'||l_oneclick_id);
1672: ibe_util.debug('l_enabled_flag :'||l_enabled_flag);
1673: ibe_util.debug('l_freight_code :'||l_freight_code);
1674: ibe_util.debug('l_payment_id :'||l_payment_id);
1675: ibe_util.debug('l_bill_ptysite_id :'||l_bill_ptysite_id);
1676: ibe_util.debug('l_ship_ptysite_id :'||l_ship_ptysite_id);
1677: ibe_util.debug('Checking p_assignment_id not null :'||p_assignment_id);
1678: END IF;
1679:
1672: ibe_util.debug('l_enabled_flag :'||l_enabled_flag);
1673: ibe_util.debug('l_freight_code :'||l_freight_code);
1674: ibe_util.debug('l_payment_id :'||l_payment_id);
1675: ibe_util.debug('l_bill_ptysite_id :'||l_bill_ptysite_id);
1676: ibe_util.debug('l_ship_ptysite_id :'||l_ship_ptysite_id);
1677: ibe_util.debug('Checking p_assignment_id not null :'||p_assignment_id);
1678: END IF;
1679:
1680: IF p_assignment_id is not NULL and l_oneclick_id <> FND_API.g_miss_num and l_enabled_flag = 'Y' and l_payment_id = p_assignment_id THEN
1673: ibe_util.debug('l_freight_code :'||l_freight_code);
1674: ibe_util.debug('l_payment_id :'||l_payment_id);
1675: ibe_util.debug('l_bill_ptysite_id :'||l_bill_ptysite_id);
1676: ibe_util.debug('l_ship_ptysite_id :'||l_ship_ptysite_id);
1677: ibe_util.debug('Checking p_assignment_id not null :'||p_assignment_id);
1678: END IF;
1679:
1680: IF p_assignment_id is not NULL and l_oneclick_id <> FND_API.g_miss_num and l_enabled_flag = 'Y' and l_payment_id = p_assignment_id THEN
1681: l_enabled_flag := 'N';
1680: IF p_assignment_id is not NULL and l_oneclick_id <> FND_API.g_miss_num and l_enabled_flag = 'Y' and l_payment_id = p_assignment_id THEN
1681: l_enabled_flag := 'N';
1682: l_payment_id := '';
1683:
1684: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1685: ibe_util.debug('Update_Settings : Deleted CC is the one selected for Express checkout');
1686: ibe_util.debug('Update_Settings : Disabling the Express checkout - Calling ibe_ord_oneclick_pvt.save_settings');
1687: END IF;
1688:
1681: l_enabled_flag := 'N';
1682: l_payment_id := '';
1683:
1684: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1685: ibe_util.debug('Update_Settings : Deleted CC is the one selected for Express checkout');
1686: ibe_util.debug('Update_Settings : Disabling the Express checkout - Calling ibe_ord_oneclick_pvt.save_settings');
1687: END IF;
1688:
1689: ibe_ord_oneclick_pvt.save_settings(
1682: l_payment_id := '';
1683:
1684: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1685: ibe_util.debug('Update_Settings : Deleted CC is the one selected for Express checkout');
1686: ibe_util.debug('Update_Settings : Disabling the Express checkout - Calling ibe_ord_oneclick_pvt.save_settings');
1687: END IF;
1688:
1689: ibe_ord_oneclick_pvt.save_settings(
1690: p_api_version => l_api_version,
1702: p_bill_ptysite_id => l_bill_ptysite_id,
1703: p_ship_ptysite_id => l_ship_ptysite_id
1704: );
1705:
1706: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1707: ibe_util.debug('Update_Settings : After Calling ibe_ord_oneclick_pvt.save_settings');
1708: ibe_util.debug('Update_Settings : x_return_status - '||x_return_status);
1709: END IF;
1710:
1703: p_ship_ptysite_id => l_ship_ptysite_id
1704: );
1705:
1706: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1707: ibe_util.debug('Update_Settings : After Calling ibe_ord_oneclick_pvt.save_settings');
1708: ibe_util.debug('Update_Settings : x_return_status - '||x_return_status);
1709: END IF;
1710:
1711: IF x_return_status <> FND_API.g_ret_sts_success THEN
1704: );
1705:
1706: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1707: ibe_util.debug('Update_Settings : After Calling ibe_ord_oneclick_pvt.save_settings');
1708: ibe_util.debug('Update_Settings : x_return_status - '||x_return_status);
1709: END IF;
1710:
1711: IF x_return_status <> FND_API.g_ret_sts_success THEN
1712: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1708: ibe_util.debug('Update_Settings : x_return_status - '||x_return_status);
1709: END IF;
1710:
1711: IF x_return_status <> FND_API.g_ret_sts_success THEN
1712: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1713: ibe_util.debug('ibe_ord_oneclick_pvt.Update_Settings - call to ibe_ord_oneclick_pvt.save_settings failed' || x_return_status);
1714: END IF;
1715: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1716: RAISE FND_API.G_EXC_ERROR;
1709: END IF;
1710:
1711: IF x_return_status <> FND_API.g_ret_sts_success THEN
1712: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1713: ibe_util.debug('ibe_ord_oneclick_pvt.Update_Settings - call to ibe_ord_oneclick_pvt.save_settings failed' || x_return_status);
1714: END IF;
1715: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1716: RAISE FND_API.G_EXC_ERROR;
1717: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1722: IF FND_API.To_Boolean( p_commit ) THEN
1723: COMMIT WORK;
1724: END IF;
1725:
1726: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1727: ibe_util.debug('Update_Settings : Success - Express Checkout disabled');
1728: ibe_util.debug('Update_Settings : End');
1729: END IF;
1730: ELSE
1723: COMMIT WORK;
1724: END IF;
1725:
1726: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1727: ibe_util.debug('Update_Settings : Success - Express Checkout disabled');
1728: ibe_util.debug('Update_Settings : End');
1729: END IF;
1730: ELSE
1731: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1724: END IF;
1725:
1726: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1727: ibe_util.debug('Update_Settings : Success - Express Checkout disabled');
1728: ibe_util.debug('Update_Settings : End');
1729: END IF;
1730: ELSE
1731: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1732: ibe_util.debug('Update_Settings : Express Checkout disabled - No need for update');
1727: ibe_util.debug('Update_Settings : Success - Express Checkout disabled');
1728: ibe_util.debug('Update_Settings : End');
1729: END IF;
1730: ELSE
1731: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1732: ibe_util.debug('Update_Settings : Express Checkout disabled - No need for update');
1733: ibe_util.debug('Update_Settings : End');
1734: END IF;
1735:
1728: ibe_util.debug('Update_Settings : End');
1729: END IF;
1730: ELSE
1731: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1732: ibe_util.debug('Update_Settings : Express Checkout disabled - No need for update');
1733: ibe_util.debug('Update_Settings : End');
1734: END IF;
1735:
1736: END IF;
1729: END IF;
1730: ELSE
1731: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1732: ibe_util.debug('Update_Settings : Express Checkout disabled - No need for update');
1733: ibe_util.debug('Update_Settings : End');
1734: END IF;
1735:
1736: END IF;
1737:
1742: );
1743:
1744: EXCEPTION
1745: WHEN FND_API.G_EXC_ERROR THEN
1746: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1747: ibe_util.debug('ibe_ord_oneclick_pvt.Update_Settings: EXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1748: END IF;
1749: ROLLBACK TO Update_Settings;
1750: x_return_status := FND_API.G_RET_STS_ERROR ;
1743:
1744: EXCEPTION
1745: WHEN FND_API.G_EXC_ERROR THEN
1746: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1747: ibe_util.debug('ibe_ord_oneclick_pvt.Update_Settings: EXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1748: END IF;
1749: ROLLBACK TO Update_Settings;
1750: x_return_status := FND_API.G_RET_STS_ERROR ;
1751: FND_MSG_PUB.Count_And_Get
1754: p_data => x_msg_data
1755: );
1756:
1757: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1758: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1759: ibe_util.debug('ibe_ord_oneclick_pvt.Update_Settings: UNEXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1760: END IF;
1761: ROLLBACK TO Update_Settings;
1762: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1755: );
1756:
1757: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1758: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1759: ibe_util.debug('ibe_ord_oneclick_pvt.Update_Settings: UNEXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1760: END IF;
1761: ROLLBACK TO Update_Settings;
1762: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1763: FND_MSG_PUB.Count_And_Get
1766: p_data => x_msg_data
1767: );
1768:
1769: WHEN OTHERS THEN
1770: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1771: ibe_util.debug('ibe_ord_oneclick_pvt.Update_Settings: OTHER EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1772: END IF;
1773: ROLLBACK TO Update_Settings;
1774: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1767: );
1768:
1769: WHEN OTHERS THEN
1770: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1771: ibe_util.debug('ibe_ord_oneclick_pvt.Update_Settings: OTHER EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1772: END IF;
1773: ROLLBACK TO Update_Settings;
1774: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1775: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN