[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;
855: end if;
856:
857: l_qte_header_rec.currency_code := p_currency_code;
858: l_qte_header_rec.price_list_id := p_price_list_id;
859: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
860: ibe_util.debug('l_control_rec.pricing_request_type ' || l_control_rec.pricing_request_type);
861: ibe_util.debug('l_control_rec.header_pricing_event ' || l_control_rec.header_pricing_event);
862: ibe_util.debug('l_control_rec.line_pricing_event ' || l_control_rec.line_pricing_event);
863: ibe_util.debug('l_control_rec.CALCULATE_TAX_FLAG ' || l_control_rec.CALCULATE_TAX_FLAG);
856:
857: l_qte_header_rec.currency_code := p_currency_code;
858: l_qte_header_rec.price_list_id := p_price_list_id;
859: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
860: ibe_util.debug('l_control_rec.pricing_request_type ' || l_control_rec.pricing_request_type);
861: ibe_util.debug('l_control_rec.header_pricing_event ' || l_control_rec.header_pricing_event);
862: ibe_util.debug('l_control_rec.line_pricing_event ' || l_control_rec.line_pricing_event);
863: ibe_util.debug('l_control_rec.CALCULATE_TAX_FLAG ' || l_control_rec.CALCULATE_TAX_FLAG);
864: ibe_util.debug('l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG ' || l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG);
857: l_qte_header_rec.currency_code := p_currency_code;
858: l_qte_header_rec.price_list_id := p_price_list_id;
859: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
860: ibe_util.debug('l_control_rec.pricing_request_type ' || l_control_rec.pricing_request_type);
861: ibe_util.debug('l_control_rec.header_pricing_event ' || l_control_rec.header_pricing_event);
862: ibe_util.debug('l_control_rec.line_pricing_event ' || l_control_rec.line_pricing_event);
863: ibe_util.debug('l_control_rec.CALCULATE_TAX_FLAG ' || l_control_rec.CALCULATE_TAX_FLAG);
864: ibe_util.debug('l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG ' || l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG);
865: ibe_util.debug('l_qte_header_rec.currency_code' || l_qte_header_rec.currency_code);
858: l_qte_header_rec.price_list_id := p_price_list_id;
859: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
860: ibe_util.debug('l_control_rec.pricing_request_type ' || l_control_rec.pricing_request_type);
861: ibe_util.debug('l_control_rec.header_pricing_event ' || l_control_rec.header_pricing_event);
862: ibe_util.debug('l_control_rec.line_pricing_event ' || l_control_rec.line_pricing_event);
863: ibe_util.debug('l_control_rec.CALCULATE_TAX_FLAG ' || l_control_rec.CALCULATE_TAX_FLAG);
864: ibe_util.debug('l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG ' || l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG);
865: ibe_util.debug('l_qte_header_rec.currency_code' || l_qte_header_rec.currency_code);
866: ibe_util.debug('l_qte_header_rec.price_list_id ' || l_qte_header_rec.price_list_id);
859: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
860: ibe_util.debug('l_control_rec.pricing_request_type ' || l_control_rec.pricing_request_type);
861: ibe_util.debug('l_control_rec.header_pricing_event ' || l_control_rec.header_pricing_event);
862: ibe_util.debug('l_control_rec.line_pricing_event ' || l_control_rec.line_pricing_event);
863: ibe_util.debug('l_control_rec.CALCULATE_TAX_FLAG ' || l_control_rec.CALCULATE_TAX_FLAG);
864: ibe_util.debug('l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG ' || l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG);
865: ibe_util.debug('l_qte_header_rec.currency_code' || l_qte_header_rec.currency_code);
866: ibe_util.debug('l_qte_header_rec.price_list_id ' || l_qte_header_rec.price_list_id);
867: END IF;
860: ibe_util.debug('l_control_rec.pricing_request_type ' || l_control_rec.pricing_request_type);
861: ibe_util.debug('l_control_rec.header_pricing_event ' || l_control_rec.header_pricing_event);
862: ibe_util.debug('l_control_rec.line_pricing_event ' || l_control_rec.line_pricing_event);
863: ibe_util.debug('l_control_rec.CALCULATE_TAX_FLAG ' || l_control_rec.CALCULATE_TAX_FLAG);
864: ibe_util.debug('l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG ' || l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG);
865: ibe_util.debug('l_qte_header_rec.currency_code' || l_qte_header_rec.currency_code);
866: ibe_util.debug('l_qte_header_rec.price_list_id ' || l_qte_header_rec.price_list_id);
867: END IF;
868:
861: ibe_util.debug('l_control_rec.header_pricing_event ' || l_control_rec.header_pricing_event);
862: ibe_util.debug('l_control_rec.line_pricing_event ' || l_control_rec.line_pricing_event);
863: ibe_util.debug('l_control_rec.CALCULATE_TAX_FLAG ' || l_control_rec.CALCULATE_TAX_FLAG);
864: ibe_util.debug('l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG ' || l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG);
865: ibe_util.debug('l_qte_header_rec.currency_code' || l_qte_header_rec.currency_code);
866: ibe_util.debug('l_qte_header_rec.price_list_id ' || l_qte_header_rec.price_list_id);
867: END IF;
868:
869: IF (l_save_trigger = 'Y') then
862: ibe_util.debug('l_control_rec.line_pricing_event ' || l_control_rec.line_pricing_event);
863: ibe_util.debug('l_control_rec.CALCULATE_TAX_FLAG ' || l_control_rec.CALCULATE_TAX_FLAG);
864: ibe_util.debug('l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG ' || l_control_rec.CALCULATE_FREIGHT_CHARGE_FLAG);
865: ibe_util.debug('l_qte_header_rec.currency_code' || l_qte_header_rec.currency_code);
866: ibe_util.debug('l_qte_header_rec.price_list_id ' || l_qte_header_rec.price_list_id);
867: END IF;
868:
869: IF (l_save_trigger = 'Y') then
870: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
866: ibe_util.debug('l_qte_header_rec.price_list_id ' || l_qte_header_rec.price_list_id);
867: END IF;
868:
869: IF (l_save_trigger = 'Y') then
870: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
871: ibe_util.debug('****Calling IBE_Quote_Save_pvt.SAVE**** ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
872: ibe_util.debug(' l_qte_header_rec.quote_header_id : ' || l_qte_header_rec.quote_header_id);
873: ibe_util.debug(' l_qte_header_rec.quote_name : ' || l_qte_header_rec.quote_name);
874: 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'));
867: END IF;
868:
869: IF (l_save_trigger = 'Y') then
870: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
871: ibe_util.debug('****Calling IBE_Quote_Save_pvt.SAVE**** ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
872: ibe_util.debug(' l_qte_header_rec.quote_header_id : ' || l_qte_header_rec.quote_header_id);
873: ibe_util.debug(' l_qte_header_rec.quote_name : ' || l_qte_header_rec.quote_name);
874: 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'));
875: END IF;
868:
869: IF (l_save_trigger = 'Y') then
870: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
871: ibe_util.debug('****Calling IBE_Quote_Save_pvt.SAVE**** ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
872: ibe_util.debug(' l_qte_header_rec.quote_header_id : ' || l_qte_header_rec.quote_header_id);
873: ibe_util.debug(' l_qte_header_rec.quote_name : ' || l_qte_header_rec.quote_name);
874: 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'));
875: END IF;
876:
869: IF (l_save_trigger = 'Y') then
870: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
871: ibe_util.debug('****Calling IBE_Quote_Save_pvt.SAVE**** ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
872: ibe_util.debug(' l_qte_header_rec.quote_header_id : ' || l_qte_header_rec.quote_header_id);
873: ibe_util.debug(' l_qte_header_rec.quote_name : ' || l_qte_header_rec.quote_name);
874: 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'));
875: END IF;
876:
877: IF (p_retrieval_num <> FND_API.g_miss_num) then
870: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
871: ibe_util.debug('****Calling IBE_Quote_Save_pvt.SAVE**** ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
872: ibe_util.debug(' l_qte_header_rec.quote_header_id : ' || l_qte_header_rec.quote_header_id);
873: ibe_util.debug(' l_qte_header_rec.quote_name : ' || l_qte_header_rec.quote_name);
874: 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'));
875: END IF;
876:
877: IF (p_retrieval_num <> FND_API.g_miss_num) then
878: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
874: 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'));
875: END IF;
876:
877: IF (p_retrieval_num <> FND_API.g_miss_num) then
878: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
879: ibe_util.debug('passing sharee party and acct id');
880: END IF;
881: l_qte_header_rec.party_id := FND_API.G_MISS_NUM;
882: l_qte_header_rec.cust_account_id := FND_API.G_MISS_NUM;
875: END IF;
876:
877: IF (p_retrieval_num <> FND_API.g_miss_num) then
878: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
879: ibe_util.debug('passing sharee party and acct id');
880: END IF;
881: l_qte_header_rec.party_id := FND_API.G_MISS_NUM;
882: l_qte_header_rec.cust_account_id := FND_API.G_MISS_NUM;
883: l_sharee_party_id := p_party_id;
906: X_Return_Status => x_Return_Status,
907: X_Msg_Count => x_Msg_Count,
908: X_Msg_Data => x_Msg_Data);
909:
910: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
911: 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));
912: END IF;
913: IF x_return_status <> FND_API.g_ret_sts_success THEN
914: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
907: X_Msg_Count => x_Msg_Count,
908: X_Msg_Data => x_Msg_Data);
909:
910: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
911: 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));
912: END IF;
913: IF x_return_status <> FND_API.g_ret_sts_success THEN
914: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
915: 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');
910: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
911: 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));
912: END IF;
913: IF x_return_status <> FND_API.g_ret_sts_success THEN
914: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
915: 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');
916: END IF;
917: FND_MESSAGE.SET_TOKEN ( '0' , 'Express_Buy_Order - IBE_Quote_Save_pvt.SAVE' );
918: FND_MESSAGE.SET_TOKEN ( '1' , x_return_status );
911: 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));
912: END IF;
913: IF x_return_status <> FND_API.g_ret_sts_success THEN
914: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
915: 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');
916: END IF;
917: FND_MESSAGE.SET_TOKEN ( '0' , 'Express_Buy_Order - IBE_Quote_Save_pvt.SAVE' );
918: FND_MESSAGE.SET_TOKEN ( '1' , x_return_status );
919: FND_MSG_PUB.Add;
924: END IF;
925: ELSE
926: IF(l_attach_contract = FND_API.G_TRUE) THEN
927: 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)
928: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
929: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order - : No contract currently attached !');
930: END IF;
931: IF (FND_Profile.Value('OKC_ENABLE_SALES_CONTRACTS') = 'Y' ) THEN --Only if contracts is enabled
932: --instantiate a contract and associate to the quote
925: ELSE
926: IF(l_attach_contract = FND_API.G_TRUE) THEN
927: 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)
928: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
929: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order - : No contract currently attached !');
930: END IF;
931: IF (FND_Profile.Value('OKC_ENABLE_SALES_CONTRACTS') = 'Y' ) THEN --Only if contracts is enabled
932: --instantiate a contract and associate to the quote
933: /*mannamra: changes for MOAC: Bug 4682364 */
935: l_contract_template_id := to_number(ASO_UTILITY_PVT.GET_OU_ATTRIBUTE_VALUE(ASO_UTILITY_PVT.G_DEFAULT_CONTRACT_TEMPLATE)); --New style
936: /*mannamra: end of changes for MOAC*/
937:
938: IF (l_contract_template_id is not null) THEN
939: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
940: IBE_UTIL.debug('l_contract_template_id = '||l_contract_template_id);
941: IBE_UTIL.debug('Before calling OKC_TERMS_COPY_GRP.copy_terms_api, quoteheaderId = '||lx_quote_header_id);
942: END IF;
943: OKC_TERMS_COPY_GRP.copy_terms(
936: /*mannamra: end of changes for MOAC*/
937:
938: IF (l_contract_template_id is not null) THEN
939: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
940: IBE_UTIL.debug('l_contract_template_id = '||l_contract_template_id);
941: IBE_UTIL.debug('Before calling OKC_TERMS_COPY_GRP.copy_terms_api, quoteheaderId = '||lx_quote_header_id);
942: END IF;
943: OKC_TERMS_COPY_GRP.copy_terms(
944: p_api_version =>1.0
937:
938: IF (l_contract_template_id is not null) THEN
939: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
940: IBE_UTIL.debug('l_contract_template_id = '||l_contract_template_id);
941: IBE_UTIL.debug('Before calling OKC_TERMS_COPY_GRP.copy_terms_api, quoteheaderId = '||lx_quote_header_id);
942: END IF;
943: OKC_TERMS_COPY_GRP.copy_terms(
944: p_api_version =>1.0
945: ,p_template_id => l_contract_template_id
950: ,x_return_status => x_return_status
951: ,x_msg_count => x_msg_count
952: ,x_msg_data => x_msg_data);
953:
954: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
955: IBE_UTIL.debug('After copy_terms api, return status = '||x_return_status);
956: END IF;
957: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
958: RAISE FND_API.G_EXC_ERROR;
951: ,x_msg_count => x_msg_count
952: ,x_msg_data => x_msg_data);
953:
954: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
955: IBE_UTIL.debug('After copy_terms api, return status = '||x_return_status);
956: END IF;
957: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
958: RAISE FND_API.G_EXC_ERROR;
959: END IF;
962: END IF;
963: END IF; --If contract template id is not null
964: END IF; --IF (FND_Profile.Value('OKC_ENABLE_SALES_CONTRACTS')
965: ELSE
966: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
967: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order - : A contract is already instanciated for this quote');
968: END IF;
969: END IF; -- Whether there is a contract currently instanciated for this quote
970: END IF; --If l_attach_contract is true
963: END IF; --If contract template id is not null
964: END IF; --IF (FND_Profile.Value('OKC_ENABLE_SALES_CONTRACTS')
965: ELSE
966: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
967: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order - : A contract is already instanciated for this quote');
968: END IF;
969: END IF; -- Whether there is a contract currently instanciated for this quote
970: END IF; --If l_attach_contract is true
971: END IF; -- If l_return_status is success
969: END IF; -- Whether there is a contract currently instanciated for this quote
970: END IF; --If l_attach_contract is true
971: END IF; -- If l_return_status is success
972: IF (p_flag = 'CART') THEN
973: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
974: ibe_util.debug('Express_buy_order: Calling stop_sharing for quote_header_id :'||l_qte_header_rec.quote_header_id);
975: END IF;
976: IBE_QUOTE_SAVESHARE_V2_PVT.stop_sharing (
977: p_quote_header_id => p_cart_id ,
970: END IF; --If l_attach_contract is true
971: END IF; -- If l_return_status is success
972: IF (p_flag = 'CART') THEN
973: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
974: ibe_util.debug('Express_buy_order: Calling stop_sharing for quote_header_id :'||l_qte_header_rec.quote_header_id);
975: END IF;
976: IBE_QUOTE_SAVESHARE_V2_PVT.stop_sharing (
977: p_quote_header_id => p_cart_id ,
978: p_delete_context => 'IBE_SC_CART_ORDERED',
991:
992: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
993: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
994: END IF;
995: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
996: ibe_util.debug('Express_buy_order: Done Calling stop_sharing');
997: END IF;
998: END IF;
999:
992: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
993: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
994: END IF;
995: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
996: ibe_util.debug('Express_buy_order: Done Calling stop_sharing');
997: END IF;
998: END IF;
999:
1000: l_curr_cart_id := lx_quote_header_id;
1005:
1006: -- get ready for the next update of the quote
1007:
1008: /* if (p_flag = 'LISTS') then
1009: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1010: ibe_util.debug('Calling IBE_Shop_List_PVT.Save_Quote_From_Lists ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1011: ibe_util.debug('p_mode ' || 'MERGE');
1012: END IF;
1013: l_count := p_list_ids.count;
1006: -- get ready for the next update of the quote
1007:
1008: /* if (p_flag = 'LISTS') then
1009: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1010: ibe_util.debug('Calling IBE_Shop_List_PVT.Save_Quote_From_Lists ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1011: ibe_util.debug('p_mode ' || 'MERGE');
1012: END IF;
1013: l_count := p_list_ids.count;
1014: FOR i IN 1..l_count LOOP
1007:
1008: /* if (p_flag = 'LISTS') then
1009: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1010: ibe_util.debug('Calling IBE_Shop_List_PVT.Save_Quote_From_Lists ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1011: ibe_util.debug('p_mode ' || 'MERGE');
1012: END IF;
1013: l_count := p_list_ids.count;
1014: FOR i IN 1..l_count LOOP
1015: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1011: ibe_util.debug('p_mode ' || 'MERGE');
1012: END IF;
1013: l_count := p_list_ids.count;
1014: FOR i IN 1..l_count LOOP
1015: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1016: ibe_util.debug('p_shpListIds' || i || ' ' || p_list_ids(i));
1017: END IF;
1018: END LOOP;
1019:
1012: END IF;
1013: l_count := p_list_ids.count;
1014: FOR i IN 1..l_count LOOP
1015: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1016: ibe_util.debug('p_shpListIds' || i || ' ' || p_list_ids(i));
1017: END IF;
1018: END LOOP;
1019:
1020: IBE_Shop_List_PVT.Save_Quote_From_Lists(
1033: ,X_Msg_Count => x_msg_count
1034: ,X_Msg_Data => x_msg_data
1035: ,x_q_header_id => lx_quote_header_id );
1036:
1037: --ibe_util.enable_debug;
1038: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1039: ibe_util.debug('Back from IBE_Shop_List_PVT.Save_Quote_From_Lists ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1040: ibe_util.debug('X_cartId ' || lx_quote_header_id);
1041: END IF;
1034: ,X_Msg_Data => x_msg_data
1035: ,x_q_header_id => lx_quote_header_id );
1036:
1037: --ibe_util.enable_debug;
1038: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1039: ibe_util.debug('Back from IBE_Shop_List_PVT.Save_Quote_From_Lists ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1040: ibe_util.debug('X_cartId ' || lx_quote_header_id);
1041: END IF;
1042:
1035: ,x_q_header_id => lx_quote_header_id );
1036:
1037: --ibe_util.enable_debug;
1038: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1039: ibe_util.debug('Back from IBE_Shop_List_PVT.Save_Quote_From_Lists ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1040: ibe_util.debug('X_cartId ' || lx_quote_header_id);
1041: END IF;
1042:
1043: IF x_return_status <> FND_API.g_ret_sts_success THEN
1036:
1037: --ibe_util.enable_debug;
1038: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1039: ibe_util.debug('Back from IBE_Shop_List_PVT.Save_Quote_From_Lists ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1040: ibe_util.debug('X_cartId ' || lx_quote_header_id);
1041: END IF;
1042:
1043: IF x_return_status <> FND_API.g_ret_sts_success THEN
1044: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1040: ibe_util.debug('X_cartId ' || lx_quote_header_id);
1041: END IF;
1042:
1043: IF x_return_status <> FND_API.g_ret_sts_success THEN
1044: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1045: 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');
1046: END IF;
1047: FND_MESSAGE.SET_TOKEN ( '0' , 'Express_Buy_Order - IBE_Shop_List_PVT.Save_Quote_From_Lists' );
1048: FND_MESSAGE.SET_TOKEN ( '1' , x_return_status );
1041: END IF;
1042:
1043: IF x_return_status <> FND_API.g_ret_sts_success THEN
1044: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1045: 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');
1046: END IF;
1047: FND_MESSAGE.SET_TOKEN ( '0' , 'Express_Buy_Order - IBE_Shop_List_PVT.Save_Quote_From_Lists' );
1048: FND_MESSAGE.SET_TOKEN ( '1' , x_return_status );
1049: FND_MSG_PUB.Add;
1056:
1057: END IF;
1058: */
1059: if (p_flag = 'LIST_LINES') then
1060: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1061: ibe_util.debug('Calling IBE_Shop_List_PVT.Save_Quote_From_List_Items ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1062: ibe_util.debug('p_mode ' || 'MERGE');
1063: END IF;
1064: l_count := p_list_line_ids.count;
1057: END IF;
1058: */
1059: if (p_flag = 'LIST_LINES') then
1060: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1061: ibe_util.debug('Calling IBE_Shop_List_PVT.Save_Quote_From_List_Items ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1062: ibe_util.debug('p_mode ' || 'MERGE');
1063: END IF;
1064: l_count := p_list_line_ids.count;
1065: FOR i IN 1..l_count LOOP
1058: */
1059: if (p_flag = 'LIST_LINES') then
1060: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1061: ibe_util.debug('Calling IBE_Shop_List_PVT.Save_Quote_From_List_Items ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1062: ibe_util.debug('p_mode ' || 'MERGE');
1063: END IF;
1064: l_count := p_list_line_ids.count;
1065: FOR i IN 1..l_count LOOP
1066: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1062: ibe_util.debug('p_mode ' || 'MERGE');
1063: END IF;
1064: l_count := p_list_line_ids.count;
1065: FOR i IN 1..l_count LOOP
1066: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1067: ibe_util.debug('p_shpListLineIds' || i || ' ' || p_list_line_ids(i));
1068: END IF;
1069: end loop;
1070: IBE_Shop_List_PVT.Save_Quote_From_List_Items(
1063: END IF;
1064: l_count := p_list_line_ids.count;
1065: FOR i IN 1..l_count LOOP
1066: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1067: ibe_util.debug('p_shpListLineIds' || i || ' ' || p_list_line_ids(i));
1068: END IF;
1069: end loop;
1070: IBE_Shop_List_PVT.Save_Quote_From_List_Items(
1071: P_Api_Version => 1.0
1083: ,X_Msg_Count => x_msg_count
1084: ,X_Msg_Data => x_msg_data
1085: ,x_q_header_id => lx_quote_header_id );
1086:
1087: --ibe_util.enable_debug;
1088: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1089: ibe_util.debug('Back from IBE_Shop_List_PVT.Save_Quote_From_List_Items ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1090: ibe_util.debug('X_cartId ' || lx_quote_header_id);
1091: END IF;
1084: ,X_Msg_Data => x_msg_data
1085: ,x_q_header_id => lx_quote_header_id );
1086:
1087: --ibe_util.enable_debug;
1088: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1089: ibe_util.debug('Back from IBE_Shop_List_PVT.Save_Quote_From_List_Items ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1090: ibe_util.debug('X_cartId ' || lx_quote_header_id);
1091: END IF;
1092:
1085: ,x_q_header_id => lx_quote_header_id );
1086:
1087: --ibe_util.enable_debug;
1088: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1089: ibe_util.debug('Back from IBE_Shop_List_PVT.Save_Quote_From_List_Items ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1090: ibe_util.debug('X_cartId ' || lx_quote_header_id);
1091: END IF;
1092:
1093: if x_return_status <> FND_API.g_ret_sts_success then
1086:
1087: --ibe_util.enable_debug;
1088: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1089: ibe_util.debug('Back from IBE_Shop_List_PVT.Save_Quote_From_List_Items ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1090: ibe_util.debug('X_cartId ' || lx_quote_header_id);
1091: END IF;
1092:
1093: if x_return_status <> FND_API.g_ret_sts_success then
1094: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1090: ibe_util.debug('X_cartId ' || lx_quote_header_id);
1091: END IF;
1092:
1093: if x_return_status <> FND_API.g_ret_sts_success then
1094: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1095: 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');
1096: END IF;
1097: FND_MESSAGE.SET_NAME('IBE','IBE_EXPR_PLSQL_API_ERROR');
1098: FND_MESSAGE.SET_TOKEN ( '0' , 'Express_Buy_Order - IBE_Shop_List_PVT.Save_Quote_From_List_Items' );
1091: END IF;
1092:
1093: if x_return_status <> FND_API.g_ret_sts_success then
1094: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1095: 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');
1096: END IF;
1097: FND_MESSAGE.SET_NAME('IBE','IBE_EXPR_PLSQL_API_ERROR');
1098: FND_MESSAGE.SET_TOKEN ( '0' , 'Express_Buy_Order - IBE_Shop_List_PVT.Save_Quote_From_List_Items' );
1099: FND_MESSAGE.SET_TOKEN ( '1' , x_return_status );
1105: end if;
1106: end if;
1107: end if;
1108:
1109: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1110: ibe_util.debug('Express_Buy_Order - BOTTOM LINE: express cart used: ' || l_curr_cart_id);
1111: END IF;
1112: -- let the caller know which quote we finally updated
1113: x_new_cart_id := l_curr_cart_id;
1106: end if;
1107: end if;
1108:
1109: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1110: ibe_util.debug('Express_Buy_Order - BOTTOM LINE: express cart used: ' || l_curr_cart_id);
1111: END IF;
1112: -- let the caller know which quote we finally updated
1113: x_new_cart_id := l_curr_cart_id;
1114:
1119: ( p_encoded => FND_API.G_FALSE,
1120: p_count => x_msg_count ,
1121: p_data => x_msg_data );
1122:
1123: --ibe_util.disable_debug;
1124: EXCEPTION
1125: WHEN FND_API.G_EXC_ERROR THEN
1126: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1127: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order: EXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1122:
1123: --ibe_util.disable_debug;
1124: EXCEPTION
1125: WHEN FND_API.G_EXC_ERROR THEN
1126: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1127: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order: EXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1128: END IF;
1129: ROLLBACK TO Express_Buy_Order_Pvt;
1130: x_return_status := FND_API.G_RET_STS_ERROR;
1123: --ibe_util.disable_debug;
1124: EXCEPTION
1125: WHEN FND_API.G_EXC_ERROR THEN
1126: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1127: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order: EXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1128: END IF;
1129: ROLLBACK TO Express_Buy_Order_Pvt;
1130: x_return_status := FND_API.G_RET_STS_ERROR;
1131: x_last_update_date := IBE_Quote_Misc_pvt.getQuoteLastUpdateDate(p_cart_id);
1133: ( p_encoded => FND_API.G_FALSE,
1134: p_count => x_msg_count,
1135: p_data => x_msg_data
1136: );
1137: --ibe_util.disable_debug;
1138: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1139: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1140: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order: UNEXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1141: END IF;
1135: p_data => x_msg_data
1136: );
1137: --ibe_util.disable_debug;
1138: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1139: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1140: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order: UNEXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1141: END IF;
1142: ROLLBACK TO Express_Buy_Order_Pvt;
1143: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1136: );
1137: --ibe_util.disable_debug;
1138: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1139: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1140: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order: UNEXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1141: END IF;
1142: ROLLBACK TO Express_Buy_Order_Pvt;
1143: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1144: FND_MSG_PUB.Count_And_Get
1145: ( p_encoded => FND_API.G_FALSE,
1146: p_count => x_msg_count,
1147: p_data => x_msg_data
1148: );
1149: --ibe_util.disable_debug;
1150: WHEN OTHERS THEN
1151: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1152: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order: OTHER EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1153: END IF;
1147: p_data => x_msg_data
1148: );
1149: --ibe_util.disable_debug;
1150: WHEN OTHERS THEN
1151: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1152: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order: OTHER EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1153: END IF;
1154: ROLLBACK TO Express_Buy_Order_Pvt;
1155: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1148: );
1149: --ibe_util.disable_debug;
1150: WHEN OTHERS THEN
1151: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1152: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order: OTHER EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1153: END IF;
1154: ROLLBACK TO Express_Buy_Order_Pvt;
1155: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1156: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1164: ( p_encoded => FND_API.G_FALSE,
1165: p_count => x_msg_count,
1166: p_data => x_msg_data
1167: );
1168: --ibe_util.disable_debug;
1169: end Express_Buy_Order;
1170:
1171:
1172: Procedure get_express_items_settings(
1283: BEGIN
1284:
1285: --Begin API body
1286:
1287: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1288: ibe_util.debug('Starting ibe_ord_oneclick_pvt.Get_express_items_settings ');
1289: ibe_util.debug('PROCESSING FLAG : ' || p_flag);
1290: END IF;
1291:
1284:
1285: --Begin API body
1286:
1287: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1288: ibe_util.debug('Starting ibe_ord_oneclick_pvt.Get_express_items_settings ');
1289: ibe_util.debug('PROCESSING FLAG : ' || p_flag);
1290: END IF;
1291:
1292: l_qte_header_rec := x_qte_header_rec;
1285: --Begin API body
1286:
1287: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1288: ibe_util.debug('Starting ibe_ord_oneclick_pvt.Get_express_items_settings ');
1289: ibe_util.debug('PROCESSING FLAG : ' || p_flag);
1290: END IF;
1291:
1292: l_qte_header_rec := x_qte_header_rec;
1293: if ((x_hd_tax_dtl_tbl is not null) and (x_hd_tax_dtl_tbl.count > 0)) then
1314: CLOSE c_settings;
1315:
1316: IF (p_flag <> 'CART') THEN
1317: -- see if there is a current cart
1318: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1319: ibe_util.debug('get_express_items_settings see if there is a current cart');
1320: ibe_util.debug('Input Cartid: '||l_qte_header_rec.quote_header_id);
1321: ibe_util.debug('Input Partyid: '||l_qte_header_rec.party_id);
1322: ibe_util.debug('Input Accountid: '||l_qte_header_rec.cust_account_id);
1315:
1316: IF (p_flag <> 'CART') THEN
1317: -- see if there is a current cart
1318: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1319: ibe_util.debug('get_express_items_settings see if there is a current cart');
1320: ibe_util.debug('Input Cartid: '||l_qte_header_rec.quote_header_id);
1321: ibe_util.debug('Input Partyid: '||l_qte_header_rec.party_id);
1322: ibe_util.debug('Input Accountid: '||l_qte_header_rec.cust_account_id);
1323: END IF;
1316: IF (p_flag <> 'CART') THEN
1317: -- see if there is a current cart
1318: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1319: ibe_util.debug('get_express_items_settings see if there is a current cart');
1320: ibe_util.debug('Input Cartid: '||l_qte_header_rec.quote_header_id);
1321: ibe_util.debug('Input Partyid: '||l_qte_header_rec.party_id);
1322: ibe_util.debug('Input Accountid: '||l_qte_header_rec.cust_account_id);
1323: END IF;
1324: OPEN c_quote(x_qte_header_rec.party_id,
1317: -- see if there is a current cart
1318: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1319: ibe_util.debug('get_express_items_settings see if there is a current cart');
1320: ibe_util.debug('Input Cartid: '||l_qte_header_rec.quote_header_id);
1321: ibe_util.debug('Input Partyid: '||l_qte_header_rec.party_id);
1322: ibe_util.debug('Input Accountid: '||l_qte_header_rec.cust_account_id);
1323: END IF;
1324: OPEN c_quote(x_qte_header_rec.party_id,
1325: x_qte_header_rec.cust_account_id);
1318: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1319: ibe_util.debug('get_express_items_settings see if there is a current cart');
1320: ibe_util.debug('Input Cartid: '||l_qte_header_rec.quote_header_id);
1321: ibe_util.debug('Input Partyid: '||l_qte_header_rec.party_id);
1322: ibe_util.debug('Input Accountid: '||l_qte_header_rec.cust_account_id);
1323: END IF;
1324: OPEN c_quote(x_qte_header_rec.party_id,
1325: x_qte_header_rec.cust_account_id);
1326: FETCH c_quote INTO l_curr_cart_id, l_curr_cart_date, l_curr_cart_currcode;
1327: if c_quote%NOTFOUND then
1328: l_curr_cart_id := FND_API.g_miss_num;
1329: else
1330: null;
1331: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1332: ibe_util.debug('get_express_items_settings got l_curr_cart_id ' || to_char(l_curr_cart_id));
1333: ibe_util.debug('get_express_items_settings got l_curr_cart_date ' || to_char(l_curr_cart_date,'DD-MON-YYYY:HH:MI:SS'));
1334: ibe_util.debug('get_express_items_settings got l_curr_cart_currcode ' || l_curr_cart_currcode);
1335: END IF;
1328: l_curr_cart_id := FND_API.g_miss_num;
1329: else
1330: null;
1331: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1332: ibe_util.debug('get_express_items_settings got l_curr_cart_id ' || to_char(l_curr_cart_id));
1333: ibe_util.debug('get_express_items_settings got l_curr_cart_date ' || to_char(l_curr_cart_date,'DD-MON-YYYY:HH:MI:SS'));
1334: ibe_util.debug('get_express_items_settings got l_curr_cart_currcode ' || l_curr_cart_currcode);
1335: END IF;
1336: end if;
1329: else
1330: null;
1331: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1332: ibe_util.debug('get_express_items_settings got l_curr_cart_id ' || to_char(l_curr_cart_id));
1333: ibe_util.debug('get_express_items_settings got l_curr_cart_date ' || to_char(l_curr_cart_date,'DD-MON-YYYY:HH:MI:SS'));
1334: ibe_util.debug('get_express_items_settings got l_curr_cart_currcode ' || l_curr_cart_currcode);
1335: END IF;
1336: end if;
1337: CLOSE c_quote;
1330: null;
1331: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1332: ibe_util.debug('get_express_items_settings got l_curr_cart_id ' || to_char(l_curr_cart_id));
1333: ibe_util.debug('get_express_items_settings got l_curr_cart_date ' || to_char(l_curr_cart_date,'DD-MON-YYYY:HH:MI:SS'));
1334: ibe_util.debug('get_express_items_settings got l_curr_cart_currcode ' || l_curr_cart_currcode);
1335: END IF;
1336: end if;
1337: CLOSE c_quote;
1338: end if; -- p_flag <> cart
1353: FETCH c_quote_date INTO l_push_qte_header_rec.last_update_date;
1354: CLOSE c_quote_date;
1355:
1356: l_control_rec.last_update_date := l_push_qte_header_rec.last_update_date;
1357: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1358: ibe_util.debug('****Calling IBE_Quote_Save_pvt.SAVE for pushing out **** ');
1359: ibe_util.debug(' l_qte_header_rec.quote_header_id : ' || l_qte_header_rec.quote_header_id);
1360: ibe_util.debug(' l_qte_header_rec.quote_name : ' || l_qte_header_rec.quote_name);
1361: 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'));
1354: CLOSE c_quote_date;
1355:
1356: l_control_rec.last_update_date := l_push_qte_header_rec.last_update_date;
1357: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1358: ibe_util.debug('****Calling IBE_Quote_Save_pvt.SAVE for pushing out **** ');
1359: ibe_util.debug(' l_qte_header_rec.quote_header_id : ' || l_qte_header_rec.quote_header_id);
1360: ibe_util.debug(' l_qte_header_rec.quote_name : ' || l_qte_header_rec.quote_name);
1361: 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'));
1362: END IF;
1355:
1356: l_control_rec.last_update_date := l_push_qte_header_rec.last_update_date;
1357: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1358: ibe_util.debug('****Calling IBE_Quote_Save_pvt.SAVE for pushing out **** ');
1359: ibe_util.debug(' l_qte_header_rec.quote_header_id : ' || l_qte_header_rec.quote_header_id);
1360: ibe_util.debug(' l_qte_header_rec.quote_name : ' || l_qte_header_rec.quote_name);
1361: 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'));
1362: END IF;
1363: IBE_Quote_Save_pvt.SAVE(
1356: l_control_rec.last_update_date := l_push_qte_header_rec.last_update_date;
1357: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1358: ibe_util.debug('****Calling IBE_Quote_Save_pvt.SAVE for pushing out **** ');
1359: ibe_util.debug(' l_qte_header_rec.quote_header_id : ' || l_qte_header_rec.quote_header_id);
1360: ibe_util.debug(' l_qte_header_rec.quote_name : ' || l_qte_header_rec.quote_name);
1361: 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'));
1362: END IF;
1363: IBE_Quote_Save_pvt.SAVE(
1364: p_api_version_number => 1.0,
1357: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1358: ibe_util.debug('****Calling IBE_Quote_Save_pvt.SAVE for pushing out **** ');
1359: ibe_util.debug(' l_qte_header_rec.quote_header_id : ' || l_qte_header_rec.quote_header_id);
1360: ibe_util.debug(' l_qte_header_rec.quote_name : ' || l_qte_header_rec.quote_name);
1361: 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'));
1362: END IF;
1363: IBE_Quote_Save_pvt.SAVE(
1364: p_api_version_number => 1.0,
1365: p_init_msg_list => FND_API.G_FALSE,
1373: x_last_update_date => lx_last_update_date,
1374: X_Return_Status => lx_Return_Status,
1375: X_Msg_Count => lx_Msg_Count,
1376: X_Msg_Data => lx_Msg_Data);
1377: --ibe_util.enable_debug;
1378: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1379: ibe_util.debug('Back from IBE_Quote_Save_pvt.SAVE for pushing out' );
1380: END IF;
1381: if lx_return_status <> FND_API.g_ret_sts_success then
1374: X_Return_Status => lx_Return_Status,
1375: X_Msg_Count => lx_Msg_Count,
1376: X_Msg_Data => lx_Msg_Data);
1377: --ibe_util.enable_debug;
1378: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1379: ibe_util.debug('Back from IBE_Quote_Save_pvt.SAVE for pushing out' );
1380: END IF;
1381: if lx_return_status <> FND_API.g_ret_sts_success then
1382: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1375: X_Msg_Count => lx_Msg_Count,
1376: X_Msg_Data => lx_Msg_Data);
1377: --ibe_util.enable_debug;
1378: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1379: ibe_util.debug('Back from IBE_Quote_Save_pvt.SAVE for pushing out' );
1380: END IF;
1381: if lx_return_status <> FND_API.g_ret_sts_success then
1382: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1383: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order - non success status from IBE_Quote_Save_pvt.SAVE: ' || lx_return_status);
1378: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1379: ibe_util.debug('Back from IBE_Quote_Save_pvt.SAVE for pushing out' );
1380: END IF;
1381: if lx_return_status <> FND_API.g_ret_sts_success then
1382: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1383: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order - non success status from IBE_Quote_Save_pvt.SAVE: ' || lx_return_status);
1384: END IF;
1385: FND_MESSAGE.SET_NAME('IBE','IBE_EXPR_PLSQL_API_ERROR');
1386: FND_MESSAGE.SET_TOKEN ( '0' , 'Get_Express_Items_Settings - IBE_Quote_Save_pvt.SAVE for nonconsolidation' );
1379: ibe_util.debug('Back from IBE_Quote_Save_pvt.SAVE for pushing out' );
1380: END IF;
1381: if lx_return_status <> FND_API.g_ret_sts_success then
1382: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1383: ibe_util.debug('ibe_ord_oneclick_pvt.Express_Buy_Order - non success status from IBE_Quote_Save_pvt.SAVE: ' || lx_return_status);
1384: END IF;
1385: FND_MESSAGE.SET_NAME('IBE','IBE_EXPR_PLSQL_API_ERROR');
1386: FND_MESSAGE.SET_TOKEN ( '0' , 'Get_Express_Items_Settings - IBE_Quote_Save_pvt.SAVE for nonconsolidation' );
1387: FND_MESSAGE.SET_TOKEN ( '1' , lx_return_status );
1397: l_curr_cart_id := FND_API.g_miss_num;
1398: l_curr_cart_date := FND_API.g_miss_date;
1399: else
1400: --settings have'nt changed so we should consolidate incoming items to the open express-checkout cart
1401: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1402: ibe_util.debug('ibe_ord_oneclick_pvt.Get_express_items_settings-Consolidating to: '||l_curr_cart_id);
1403: END IF;
1404: l_qte_header_rec.quote_header_id := l_curr_cart_id;
1405: end if; -- end pushing out of old cart
1398: l_curr_cart_date := FND_API.g_miss_date;
1399: else
1400: --settings have'nt changed so we should consolidate incoming items to the open express-checkout cart
1401: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1402: ibe_util.debug('ibe_ord_oneclick_pvt.Get_express_items_settings-Consolidating to: '||l_curr_cart_id);
1403: END IF;
1404: l_qte_header_rec.quote_header_id := l_curr_cart_id;
1405: end if; -- end pushing out of old cart
1406: end if; -- end checking if we can consolidate
1410:
1411: -- see if we need to apply the Express Checkout Settings (billing, shipping, payment info)
1412: if ((p_flag = 'CART') or ((p_flag <> 'CART') and (l_curr_cart_id = FND_API.g_miss_num))) then
1413:
1414: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1415: ibe_util.debug('Express_Buy_Order got l_settings_date ' || to_char(l_settings_date,'DD-MON-YYYY:HH:MI:SS'));
1416: END IF;
1417:
1418: if (p_flag = 'CART') then
1411: -- see if we need to apply the Express Checkout Settings (billing, shipping, payment info)
1412: if ((p_flag = 'CART') or ((p_flag <> 'CART') and (l_curr_cart_id = FND_API.g_miss_num))) then
1413:
1414: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1415: ibe_util.debug('Express_Buy_Order got l_settings_date ' || to_char(l_settings_date,'DD-MON-YYYY:HH:MI:SS'));
1416: END IF;
1417:
1418: if (p_flag = 'CART') then
1419: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1415: ibe_util.debug('Express_Buy_Order got l_settings_date ' || to_char(l_settings_date,'DD-MON-YYYY:HH:MI:SS'));
1416: END IF;
1417:
1418: if (p_flag = 'CART') then
1419: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1420: ibe_util.debug('Express ordering a CART id : ' || x_qte_header_rec.quote_header_id);
1421: ibe_util.debug('Making sure user has Full privilege on this cart');
1422: END IF;
1423: l_curr_cart_id := x_qte_header_rec.quote_header_id;
1416: END IF;
1417:
1418: if (p_flag = 'CART') then
1419: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1420: ibe_util.debug('Express ordering a CART id : ' || x_qte_header_rec.quote_header_id);
1421: ibe_util.debug('Making sure user has Full privilege on this cart');
1422: END IF;
1423: l_curr_cart_id := x_qte_header_rec.quote_header_id;
1424: -- l_qte_header_rec.quote_name := l_curr_cart_id;
1417:
1418: if (p_flag = 'CART') then
1419: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1420: ibe_util.debug('Express ordering a CART id : ' || x_qte_header_rec.quote_header_id);
1421: ibe_util.debug('Making sure user has Full privilege on this cart');
1422: END IF;
1423: l_curr_cart_id := x_qte_header_rec.quote_header_id;
1424: -- l_qte_header_rec.quote_name := l_curr_cart_id;
1425: -- no need to rename the cart anymore since all cart carts will have a name now
1428: OPEN c_party_type(x_qte_header_rec.cust_account_id);
1429: FETCH c_party_type INTO l_party_type;
1430: CLOSE c_party_type;
1431:
1432: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1433: ibe_util.debug('Party Type: ' || l_party_type);
1434: END IF;
1435:
1436: if (l_party_type <> 'PERSON') then
1429: FETCH c_party_type INTO l_party_type;
1430: CLOSE c_party_type;
1431:
1432: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1433: ibe_util.debug('Party Type: ' || l_party_type);
1434: END IF;
1435:
1436: if (l_party_type <> 'PERSON') then
1437: l_optional_party_id := x_qte_header_rec.party_id;
1448: l_tax_detail_rec.quote_header_id := l_curr_cart_id; --will be g_miss for expr chkout of items
1449: l_tax_detail_rec.tax_exempt_flag := 'S';
1450: x_hd_tax_dtl_tbl(1) := l_tax_detail_rec;
1451:
1452: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1453: ibe_util.debug('Get_express_items_settings - *** creating header level tax record***');
1454: ibe_util.debug('l_tax_detail_rec.operation_code ' || l_tax_detail_rec.operation_code);
1455: ibe_util.debug('l_tax_detail_rec.quote_header_id ' || l_tax_detail_rec.quote_header_id);
1456: ibe_util.debug('l_tax_detail_rec.tax_exempt_flag ' || l_tax_detail_rec.tax_exempt_flag);
1449: l_tax_detail_rec.tax_exempt_flag := 'S';
1450: x_hd_tax_dtl_tbl(1) := l_tax_detail_rec;
1451:
1452: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1453: ibe_util.debug('Get_express_items_settings - *** creating header level tax record***');
1454: ibe_util.debug('l_tax_detail_rec.operation_code ' || l_tax_detail_rec.operation_code);
1455: ibe_util.debug('l_tax_detail_rec.quote_header_id ' || l_tax_detail_rec.quote_header_id);
1456: ibe_util.debug('l_tax_detail_rec.tax_exempt_flag ' || l_tax_detail_rec.tax_exempt_flag);
1457: END IF;
1450: x_hd_tax_dtl_tbl(1) := l_tax_detail_rec;
1451:
1452: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1453: ibe_util.debug('Get_express_items_settings - *** creating header level tax record***');
1454: ibe_util.debug('l_tax_detail_rec.operation_code ' || l_tax_detail_rec.operation_code);
1455: ibe_util.debug('l_tax_detail_rec.quote_header_id ' || l_tax_detail_rec.quote_header_id);
1456: ibe_util.debug('l_tax_detail_rec.tax_exempt_flag ' || l_tax_detail_rec.tax_exempt_flag);
1457: END IF;
1458: END IF; --l_count_tax=0
1451:
1452: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1453: ibe_util.debug('Get_express_items_settings - *** creating header level tax record***');
1454: ibe_util.debug('l_tax_detail_rec.operation_code ' || l_tax_detail_rec.operation_code);
1455: ibe_util.debug('l_tax_detail_rec.quote_header_id ' || l_tax_detail_rec.quote_header_id);
1456: ibe_util.debug('l_tax_detail_rec.tax_exempt_flag ' || l_tax_detail_rec.tax_exempt_flag);
1457: END IF;
1458: END IF; --l_count_tax=0
1459:
1452: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1453: ibe_util.debug('Get_express_items_settings - *** creating header level tax record***');
1454: ibe_util.debug('l_tax_detail_rec.operation_code ' || l_tax_detail_rec.operation_code);
1455: ibe_util.debug('l_tax_detail_rec.quote_header_id ' || l_tax_detail_rec.quote_header_id);
1456: ibe_util.debug('l_tax_detail_rec.tax_exempt_flag ' || l_tax_detail_rec.tax_exempt_flag);
1457: END IF;
1458: END IF; --l_count_tax=0
1459:
1460: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1456: ibe_util.debug('l_tax_detail_rec.tax_exempt_flag ' || l_tax_detail_rec.tax_exempt_flag);
1457: END IF;
1458: END IF; --l_count_tax=0
1459:
1460: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1461: ibe_util.debug('Get_express_items_settings - ***setting quote header info***');
1462: END IF;
1463:
1464: l_qte_header_rec.invoice_to_party_site_id := l_bill_to_pty_site_id;
1457: END IF;
1458: END IF; --l_count_tax=0
1459:
1460: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1461: ibe_util.debug('Get_express_items_settings - ***setting quote header info***');
1462: END IF;
1463:
1464: l_qte_header_rec.invoice_to_party_site_id := l_bill_to_pty_site_id;
1465: l_qte_header_rec.invoice_to_party_id := l_optional_party_id;
1463:
1464: l_qte_header_rec.invoice_to_party_site_id := l_bill_to_pty_site_id;
1465: l_qte_header_rec.invoice_to_party_id := l_optional_party_id;
1466: l_qte_header_rec.quote_source_code := 'IStore Oneclick';
1467: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1468: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.party_id ' || l_qte_header_rec.party_id);
1469: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.cust_account_id ' || l_qte_header_rec.cust_account_id);
1470: 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);
1471: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.invoice_to_party_id ' || l_qte_header_rec.invoice_to_party_id);
1464: l_qte_header_rec.invoice_to_party_site_id := l_bill_to_pty_site_id;
1465: l_qte_header_rec.invoice_to_party_id := l_optional_party_id;
1466: l_qte_header_rec.quote_source_code := 'IStore Oneclick';
1467: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1468: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.party_id ' || l_qte_header_rec.party_id);
1469: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.cust_account_id ' || l_qte_header_rec.cust_account_id);
1470: 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);
1471: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.invoice_to_party_id ' || l_qte_header_rec.invoice_to_party_id);
1472: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.quote_source_code ' || l_qte_header_rec.quote_source_code);
1465: l_qte_header_rec.invoice_to_party_id := l_optional_party_id;
1466: l_qte_header_rec.quote_source_code := 'IStore Oneclick';
1467: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1468: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.party_id ' || l_qte_header_rec.party_id);
1469: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.cust_account_id ' || l_qte_header_rec.cust_account_id);
1470: 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);
1471: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.invoice_to_party_id ' || l_qte_header_rec.invoice_to_party_id);
1472: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.quote_source_code ' || l_qte_header_rec.quote_source_code);
1473: END IF;
1466: l_qte_header_rec.quote_source_code := 'IStore Oneclick';
1467: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1468: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.party_id ' || l_qte_header_rec.party_id);
1469: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.cust_account_id ' || l_qte_header_rec.cust_account_id);
1470: 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);
1471: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.invoice_to_party_id ' || l_qte_header_rec.invoice_to_party_id);
1472: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.quote_source_code ' || l_qte_header_rec.quote_source_code);
1473: END IF;
1474:
1467: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1468: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.party_id ' || l_qte_header_rec.party_id);
1469: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.cust_account_id ' || l_qte_header_rec.cust_account_id);
1470: 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);
1471: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.invoice_to_party_id ' || l_qte_header_rec.invoice_to_party_id);
1472: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.quote_source_code ' || l_qte_header_rec.quote_source_code);
1473: END IF;
1474:
1475: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1468: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.party_id ' || l_qte_header_rec.party_id);
1469: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.cust_account_id ' || l_qte_header_rec.cust_account_id);
1470: 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);
1471: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.invoice_to_party_id ' || l_qte_header_rec.invoice_to_party_id);
1472: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.quote_source_code ' || l_qte_header_rec.quote_source_code);
1473: END IF;
1474:
1475: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1476: ibe_util.debug('Express_Buy_Order - ***setting to create or update payment rec***');
1471: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.invoice_to_party_id ' || l_qte_header_rec.invoice_to_party_id);
1472: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.quote_source_code ' || l_qte_header_rec.quote_source_code);
1473: END IF;
1474:
1475: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1476: ibe_util.debug('Express_Buy_Order - ***setting to create or update payment rec***');
1477: END IF;
1478: /*mannamra: In light of credit card consolidation, we will not be storing credit card number in one_click_all table
1479: we will also just be passing assignment id to ASO whi will in turn create a transaction and
1472: ibe_util.debug('Get_express_items_settings:l_qte_header_rec.quote_source_code ' || l_qte_header_rec.quote_source_code);
1473: END IF;
1474:
1475: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1476: ibe_util.debug('Express_Buy_Order - ***setting to create or update payment rec***');
1477: END IF;
1478: /*mannamra: In light of credit card consolidation, we will not be storing credit card number in one_click_all table
1479: we will also just be passing assignment id to ASO whi will in turn create a transaction and
1480: store the transaction extension id for this quote in aso_payments */
1481:
1482: /*OPEN c_bank_acct(l_payment_id);
1483: FETCH c_bank_acct INTO l_credit_card_num, l_credit_card_exp, l_credit_card_holder_name;
1484: if c_bank_acct%NOTFOUND then
1485: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1486: ibe_util.debug('No credit card record found.');
1487: END IF;
1488: end if;
1489: CLOSE c_bank_acct;*/
1482: /*OPEN c_bank_acct(l_payment_id);
1483: FETCH c_bank_acct INTO l_credit_card_num, l_credit_card_exp, l_credit_card_holder_name;
1484: if c_bank_acct%NOTFOUND then
1485: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1486: ibe_util.debug('No credit card record found.');
1487: END IF;
1488: end if;
1489: CLOSE c_bank_acct;*/
1490:
1490:
1491: --l_credit_card_name := IBE_ORD_ONECLICK_PVT.Get_credit_card_Type(l_credit_card_num);
1492: /* If Credit Card name is ERROR raise appropriate exception */
1493: /*If l_credit_card_name = 'ERROR' Then
1494: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1495: ibe_util.debug('Invalid Credit Card');
1496: END IF;
1497: End If;*/
1498:
1491: --l_credit_card_name := IBE_ORD_ONECLICK_PVT.Get_credit_card_Type(l_credit_card_num);
1492: /* If Credit Card name is ERROR raise appropriate exception */
1493: /*If l_credit_card_name = 'ERROR' Then
1494: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1495: ibe_util.debug('Invalid Credit Card');
1496: END IF;
1497: End If;*/
1498:
1499: /* per Bug #3020526, using info from AP_BANK_ACCOUNTS table instead
1499: /* per Bug #3020526, using info from AP_BANK_ACCOUNTS table instead
1500: OPEN c_party_name(x_qte_header_rec.party_id);
1501: FETCH c_party_name INTO l_credit_card_holder_name;
1502: if c_party_name%NOTFOUND then
1503: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1504: ibe_util.debug('No name to use for credit card holder name.');
1505: END IF;
1506: end if;
1507: CLOSE c_party_name;
1500: OPEN c_party_name(x_qte_header_rec.party_id);
1501: FETCH c_party_name INTO l_credit_card_holder_name;
1502: if c_party_name%NOTFOUND then
1503: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1504: ibe_util.debug('No name to use for credit card holder name.');
1505: END IF;
1506: end if;
1507: CLOSE c_party_name;
1508: */
1524: l_payment_rec.credit_card_holder_name := l_credit_card_holder_name;*/
1525: l_payment_rec.payment_type_code := 'CREDIT_CARD';
1526: l_payment_rec.instr_assignment_id := l_payment_id;
1527: x_payment_tbl(1) := l_payment_rec;
1528: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1529: ibe_util.debug('l_payment_rec.operation_code ' || l_payment_rec.operation_code);
1530: ibe_util.debug('l_payment_rec.payment_term_id ' || l_payment_rec.payment_term_id);
1531: ibe_util.debug('l_payment_rec.payment_type_code '|| l_payment_rec.payment_type_code);
1532: ibe_util.debug('l_payment_rec.payment_ref_number
1525: l_payment_rec.payment_type_code := 'CREDIT_CARD';
1526: l_payment_rec.instr_assignment_id := l_payment_id;
1527: x_payment_tbl(1) := l_payment_rec;
1528: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1529: ibe_util.debug('l_payment_rec.operation_code ' || l_payment_rec.operation_code);
1530: ibe_util.debug('l_payment_rec.payment_term_id ' || l_payment_rec.payment_term_id);
1531: ibe_util.debug('l_payment_rec.payment_type_code '|| l_payment_rec.payment_type_code);
1532: ibe_util.debug('l_payment_rec.payment_ref_number
1533: ibe_util.debug('l_payment_rec.instr_asssignment_id ' || l_payment_rec.instr_assignment_id);
1526: l_payment_rec.instr_assignment_id := l_payment_id;
1527: x_payment_tbl(1) := l_payment_rec;
1528: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1529: ibe_util.debug('l_payment_rec.operation_code ' || l_payment_rec.operation_code);
1530: ibe_util.debug('l_payment_rec.payment_term_id ' || l_payment_rec.payment_term_id);
1531: ibe_util.debug('l_payment_rec.payment_type_code '|| l_payment_rec.payment_type_code);
1532: ibe_util.debug('l_payment_rec.payment_ref_number
1533: ibe_util.debug('l_payment_rec.instr_asssignment_id ' || l_payment_rec.instr_assignment_id);
1534: END IF;
1527: x_payment_tbl(1) := l_payment_rec;
1528: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1529: ibe_util.debug('l_payment_rec.operation_code ' || l_payment_rec.operation_code);
1530: ibe_util.debug('l_payment_rec.payment_term_id ' || l_payment_rec.payment_term_id);
1531: ibe_util.debug('l_payment_rec.payment_type_code '|| l_payment_rec.payment_type_code);
1532: ibe_util.debug('l_payment_rec.payment_ref_number
1533: ibe_util.debug('l_payment_rec.instr_asssignment_id ' || l_payment_rec.instr_assignment_id);
1534: END IF;
1535:
1528: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1529: ibe_util.debug('l_payment_rec.operation_code ' || l_payment_rec.operation_code);
1530: ibe_util.debug('l_payment_rec.payment_term_id ' || l_payment_rec.payment_term_id);
1531: ibe_util.debug('l_payment_rec.payment_type_code '|| l_payment_rec.payment_type_code);
1532: ibe_util.debug('l_payment_rec.payment_ref_number
1534: END IF;
1535:
1536: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1529: ibe_util.debug('l_payment_rec.operation_code ' || l_payment_rec.operation_code);
1530: ibe_util.debug('l_payment_rec.payment_term_id ' || l_payment_rec.payment_term_id);
1531: ibe_util.debug('l_payment_rec.payment_type_code '|| l_payment_rec.payment_type_code);
1532: ibe_util.debug('l_payment_rec.payment_ref_number
1533: ibe_util.debug('l_payment_rec.instr_asssignment_id ' || l_payment_rec.instr_assignment_id);
1534: END IF;
1535:
1536: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1537: ibe_util.debug('Get_express_items_settings - ***setting to create or update shipment rec***');
1532: ibe_util.debug('l_payment_rec.payment_ref_number
1533: ibe_util.debug('l_payment_rec.instr_asssignment_id ' || l_payment_rec.instr_assignment_id);
1534: END IF;
1535:
1536: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1537: ibe_util.debug('Get_express_items_settings - ***setting to create or update shipment rec***');
1538: END IF;
1539: l_shipment_rec.operation_code := 'UPDATE';
1540: OPEN c_shipment(l_curr_cart_id);
1533: ibe_util.debug('l_payment_rec.instr_asssignment_id ' || l_payment_rec.instr_assignment_id);
1534: END IF;
1535:
1536: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1537: ibe_util.debug('Get_express_items_settings - ***setting to create or update shipment rec***');
1538: END IF;
1539: l_shipment_rec.operation_code := 'UPDATE';
1540: OPEN c_shipment(l_curr_cart_id);
1541: FETCH c_shipment INTO l_shipment_rec.shipment_id;
1539: l_shipment_rec.operation_code := 'UPDATE';
1540: OPEN c_shipment(l_curr_cart_id);
1541: FETCH c_shipment INTO l_shipment_rec.shipment_id;
1542: if c_shipment%NOTFOUND then
1543: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1544: ibe_util.debug('no shipment rec at header, will CREATE one');
1545: END IF;
1546: l_shipment_rec.operation_code := 'CREATE';
1547: end if;
1540: OPEN c_shipment(l_curr_cart_id);
1541: FETCH c_shipment INTO l_shipment_rec.shipment_id;
1542: if c_shipment%NOTFOUND then
1543: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1544: ibe_util.debug('no shipment rec at header, will CREATE one');
1545: END IF;
1546: l_shipment_rec.operation_code := 'CREATE';
1547: end if;
1548: CLOSE c_shipment;
1550: l_shipment_rec.ship_method_code := l_freight_code;
1551: l_shipment_rec.ship_to_party_site_id := l_ship_to_pty_site_id;
1552: l_shipment_rec.ship_to_party_id := l_optional_party_id;
1553: x_hd_shipment_tbl(1) := l_shipment_rec;
1554: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1555: ibe_util.debug('l_shipment_rec.shipment_id ' || l_shipment_rec.shipment_id);
1556: ibe_util.debug('l_shipment_rec.operation_code ' || l_shipment_rec.operation_code);
1557: ibe_util.debug('l_shipment_rec.ship_method_code ' || l_shipment_rec.ship_method_code);
1558: ibe_util.debug('l_shipment_rec.ship_to_party_site_id ' || l_shipment_rec.ship_to_party_site_id);
1551: l_shipment_rec.ship_to_party_site_id := l_ship_to_pty_site_id;
1552: l_shipment_rec.ship_to_party_id := l_optional_party_id;
1553: x_hd_shipment_tbl(1) := l_shipment_rec;
1554: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1555: ibe_util.debug('l_shipment_rec.shipment_id ' || l_shipment_rec.shipment_id);
1556: ibe_util.debug('l_shipment_rec.operation_code ' || l_shipment_rec.operation_code);
1557: ibe_util.debug('l_shipment_rec.ship_method_code ' || l_shipment_rec.ship_method_code);
1558: ibe_util.debug('l_shipment_rec.ship_to_party_site_id ' || l_shipment_rec.ship_to_party_site_id);
1559: ibe_util.debug('l_shipment_rec.ship_to_party_id ' || l_shipment_rec.ship_to_party_id);
1552: l_shipment_rec.ship_to_party_id := l_optional_party_id;
1553: x_hd_shipment_tbl(1) := l_shipment_rec;
1554: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1555: ibe_util.debug('l_shipment_rec.shipment_id ' || l_shipment_rec.shipment_id);
1556: ibe_util.debug('l_shipment_rec.operation_code ' || l_shipment_rec.operation_code);
1557: ibe_util.debug('l_shipment_rec.ship_method_code ' || l_shipment_rec.ship_method_code);
1558: ibe_util.debug('l_shipment_rec.ship_to_party_site_id ' || l_shipment_rec.ship_to_party_site_id);
1559: ibe_util.debug('l_shipment_rec.ship_to_party_id ' || l_shipment_rec.ship_to_party_id);
1560: END IF;
1553: x_hd_shipment_tbl(1) := l_shipment_rec;
1554: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1555: ibe_util.debug('l_shipment_rec.shipment_id ' || l_shipment_rec.shipment_id);
1556: ibe_util.debug('l_shipment_rec.operation_code ' || l_shipment_rec.operation_code);
1557: ibe_util.debug('l_shipment_rec.ship_method_code ' || l_shipment_rec.ship_method_code);
1558: ibe_util.debug('l_shipment_rec.ship_to_party_site_id ' || l_shipment_rec.ship_to_party_site_id);
1559: ibe_util.debug('l_shipment_rec.ship_to_party_id ' || l_shipment_rec.ship_to_party_id);
1560: END IF;
1561:
1554: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1555: ibe_util.debug('l_shipment_rec.shipment_id ' || l_shipment_rec.shipment_id);
1556: ibe_util.debug('l_shipment_rec.operation_code ' || l_shipment_rec.operation_code);
1557: ibe_util.debug('l_shipment_rec.ship_method_code ' || l_shipment_rec.ship_method_code);
1558: ibe_util.debug('l_shipment_rec.ship_to_party_site_id ' || l_shipment_rec.ship_to_party_site_id);
1559: ibe_util.debug('l_shipment_rec.ship_to_party_id ' || l_shipment_rec.ship_to_party_id);
1560: END IF;
1561:
1562: END IF; --IF ((p_flag = 'CART') or ((p_flag <> 'CART') and (l_curr_cart_id = FND_API.g_miss_num)))
1555: ibe_util.debug('l_shipment_rec.shipment_id ' || l_shipment_rec.shipment_id);
1556: ibe_util.debug('l_shipment_rec.operation_code ' || l_shipment_rec.operation_code);
1557: ibe_util.debug('l_shipment_rec.ship_method_code ' || l_shipment_rec.ship_method_code);
1558: ibe_util.debug('l_shipment_rec.ship_to_party_site_id ' || l_shipment_rec.ship_to_party_site_id);
1559: ibe_util.debug('l_shipment_rec.ship_to_party_id ' || l_shipment_rec.ship_to_party_id);
1560: END IF;
1561:
1562: END IF; --IF ((p_flag = 'CART') or ((p_flag <> 'CART') and (l_curr_cart_id = FND_API.g_miss_num)))
1563:
1651:
1652: -- Initialize API rturn status to success
1653: x_return_status := FND_API.g_ret_sts_success;
1654:
1655: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1656: ibe_util.debug('------- Input to ibe_ord_oneclick_pvt.Update_Settings: -----------------');
1657: ibe_util.debug('p_party_id :'||p_party_id);
1658: ibe_util.debug('p_acct_id :'||p_acct_id);
1659: ibe_util.debug('p_assignment_id :'||p_assignment_id);
1652: -- Initialize API rturn status to success
1653: x_return_status := FND_API.g_ret_sts_success;
1654:
1655: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1656: ibe_util.debug('------- Input to ibe_ord_oneclick_pvt.Update_Settings: -----------------');
1657: ibe_util.debug('p_party_id :'||p_party_id);
1658: ibe_util.debug('p_acct_id :'||p_acct_id);
1659: ibe_util.debug('p_assignment_id :'||p_assignment_id);
1660: END IF;
1653: x_return_status := FND_API.g_ret_sts_success;
1654:
1655: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1656: ibe_util.debug('------- Input to ibe_ord_oneclick_pvt.Update_Settings: -----------------');
1657: ibe_util.debug('p_party_id :'||p_party_id);
1658: ibe_util.debug('p_acct_id :'||p_acct_id);
1659: ibe_util.debug('p_assignment_id :'||p_assignment_id);
1660: END IF;
1661:
1654:
1655: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1656: ibe_util.debug('------- Input to ibe_ord_oneclick_pvt.Update_Settings: -----------------');
1657: ibe_util.debug('p_party_id :'||p_party_id);
1658: ibe_util.debug('p_acct_id :'||p_acct_id);
1659: ibe_util.debug('p_assignment_id :'||p_assignment_id);
1660: END IF;
1661:
1662: OPEN c_get_oneclick_settings(p_party_id, p_acct_id);
1655: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1656: ibe_util.debug('------- Input to ibe_ord_oneclick_pvt.Update_Settings: -----------------');
1657: ibe_util.debug('p_party_id :'||p_party_id);
1658: ibe_util.debug('p_acct_id :'||p_acct_id);
1659: ibe_util.debug('p_assignment_id :'||p_assignment_id);
1660: END IF;
1661:
1662: OPEN c_get_oneclick_settings(p_party_id, p_acct_id);
1663: FETCH c_get_oneclick_settings
1674: l_oneclick_id := FND_API.g_miss_num;
1675: END IF;
1676: CLOSE c_get_oneclick_settings;
1677:
1678: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1679: ibe_util.debug('------- Retrieved From TABLES: Update_Settings-----------------');
1680: ibe_util.debug('l_object_version_number :'||l_object_version_number);
1681: ibe_util.debug('l_oneclick_id :'||l_oneclick_id);
1682: ibe_util.debug('l_enabled_flag :'||l_enabled_flag);
1675: END IF;
1676: CLOSE c_get_oneclick_settings;
1677:
1678: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1679: ibe_util.debug('------- Retrieved From TABLES: Update_Settings-----------------');
1680: ibe_util.debug('l_object_version_number :'||l_object_version_number);
1681: ibe_util.debug('l_oneclick_id :'||l_oneclick_id);
1682: ibe_util.debug('l_enabled_flag :'||l_enabled_flag);
1683: ibe_util.debug('l_freight_code :'||l_freight_code);
1676: CLOSE c_get_oneclick_settings;
1677:
1678: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1679: ibe_util.debug('------- Retrieved From TABLES: Update_Settings-----------------');
1680: ibe_util.debug('l_object_version_number :'||l_object_version_number);
1681: ibe_util.debug('l_oneclick_id :'||l_oneclick_id);
1682: ibe_util.debug('l_enabled_flag :'||l_enabled_flag);
1683: ibe_util.debug('l_freight_code :'||l_freight_code);
1684: ibe_util.debug('l_payment_id :'||l_payment_id);
1677:
1678: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1679: ibe_util.debug('------- Retrieved From TABLES: Update_Settings-----------------');
1680: ibe_util.debug('l_object_version_number :'||l_object_version_number);
1681: ibe_util.debug('l_oneclick_id :'||l_oneclick_id);
1682: ibe_util.debug('l_enabled_flag :'||l_enabled_flag);
1683: ibe_util.debug('l_freight_code :'||l_freight_code);
1684: ibe_util.debug('l_payment_id :'||l_payment_id);
1685: ibe_util.debug('l_bill_ptysite_id :'||l_bill_ptysite_id);
1678: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1679: ibe_util.debug('------- Retrieved From TABLES: Update_Settings-----------------');
1680: ibe_util.debug('l_object_version_number :'||l_object_version_number);
1681: ibe_util.debug('l_oneclick_id :'||l_oneclick_id);
1682: ibe_util.debug('l_enabled_flag :'||l_enabled_flag);
1683: ibe_util.debug('l_freight_code :'||l_freight_code);
1684: ibe_util.debug('l_payment_id :'||l_payment_id);
1685: ibe_util.debug('l_bill_ptysite_id :'||l_bill_ptysite_id);
1686: ibe_util.debug('l_ship_ptysite_id :'||l_ship_ptysite_id);
1679: ibe_util.debug('------- Retrieved From TABLES: Update_Settings-----------------');
1680: ibe_util.debug('l_object_version_number :'||l_object_version_number);
1681: ibe_util.debug('l_oneclick_id :'||l_oneclick_id);
1682: ibe_util.debug('l_enabled_flag :'||l_enabled_flag);
1683: ibe_util.debug('l_freight_code :'||l_freight_code);
1684: ibe_util.debug('l_payment_id :'||l_payment_id);
1685: ibe_util.debug('l_bill_ptysite_id :'||l_bill_ptysite_id);
1686: ibe_util.debug('l_ship_ptysite_id :'||l_ship_ptysite_id);
1687: ibe_util.debug('Checking p_assignment_id not null :'||p_assignment_id);
1680: ibe_util.debug('l_object_version_number :'||l_object_version_number);
1681: ibe_util.debug('l_oneclick_id :'||l_oneclick_id);
1682: ibe_util.debug('l_enabled_flag :'||l_enabled_flag);
1683: ibe_util.debug('l_freight_code :'||l_freight_code);
1684: ibe_util.debug('l_payment_id :'||l_payment_id);
1685: ibe_util.debug('l_bill_ptysite_id :'||l_bill_ptysite_id);
1686: ibe_util.debug('l_ship_ptysite_id :'||l_ship_ptysite_id);
1687: ibe_util.debug('Checking p_assignment_id not null :'||p_assignment_id);
1688: END IF;
1681: ibe_util.debug('l_oneclick_id :'||l_oneclick_id);
1682: ibe_util.debug('l_enabled_flag :'||l_enabled_flag);
1683: ibe_util.debug('l_freight_code :'||l_freight_code);
1684: ibe_util.debug('l_payment_id :'||l_payment_id);
1685: ibe_util.debug('l_bill_ptysite_id :'||l_bill_ptysite_id);
1686: ibe_util.debug('l_ship_ptysite_id :'||l_ship_ptysite_id);
1687: ibe_util.debug('Checking p_assignment_id not null :'||p_assignment_id);
1688: END IF;
1689:
1682: ibe_util.debug('l_enabled_flag :'||l_enabled_flag);
1683: ibe_util.debug('l_freight_code :'||l_freight_code);
1684: ibe_util.debug('l_payment_id :'||l_payment_id);
1685: ibe_util.debug('l_bill_ptysite_id :'||l_bill_ptysite_id);
1686: ibe_util.debug('l_ship_ptysite_id :'||l_ship_ptysite_id);
1687: ibe_util.debug('Checking p_assignment_id not null :'||p_assignment_id);
1688: END IF;
1689:
1690: 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
1683: ibe_util.debug('l_freight_code :'||l_freight_code);
1684: ibe_util.debug('l_payment_id :'||l_payment_id);
1685: ibe_util.debug('l_bill_ptysite_id :'||l_bill_ptysite_id);
1686: ibe_util.debug('l_ship_ptysite_id :'||l_ship_ptysite_id);
1687: ibe_util.debug('Checking p_assignment_id not null :'||p_assignment_id);
1688: END IF;
1689:
1690: 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
1691: l_enabled_flag := 'N';
1690: 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
1691: l_enabled_flag := 'N';
1692: l_payment_id := '';
1693:
1694: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1695: ibe_util.debug('Update_Settings : Deleted CC is the one selected for Express checkout');
1696: ibe_util.debug('Update_Settings : Disabling the Express checkout - Calling ibe_ord_oneclick_pvt.save_settings');
1697: END IF;
1698:
1691: l_enabled_flag := 'N';
1692: l_payment_id := '';
1693:
1694: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1695: ibe_util.debug('Update_Settings : Deleted CC is the one selected for Express checkout');
1696: ibe_util.debug('Update_Settings : Disabling the Express checkout - Calling ibe_ord_oneclick_pvt.save_settings');
1697: END IF;
1698:
1699: ibe_ord_oneclick_pvt.save_settings(
1692: l_payment_id := '';
1693:
1694: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1695: ibe_util.debug('Update_Settings : Deleted CC is the one selected for Express checkout');
1696: ibe_util.debug('Update_Settings : Disabling the Express checkout - Calling ibe_ord_oneclick_pvt.save_settings');
1697: END IF;
1698:
1699: ibe_ord_oneclick_pvt.save_settings(
1700: p_api_version => l_api_version,
1712: p_bill_ptysite_id => l_bill_ptysite_id,
1713: p_ship_ptysite_id => l_ship_ptysite_id
1714: );
1715:
1716: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1717: ibe_util.debug('Update_Settings : After Calling ibe_ord_oneclick_pvt.save_settings');
1718: ibe_util.debug('Update_Settings : x_return_status - '||x_return_status);
1719: END IF;
1720:
1713: p_ship_ptysite_id => l_ship_ptysite_id
1714: );
1715:
1716: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1717: ibe_util.debug('Update_Settings : After Calling ibe_ord_oneclick_pvt.save_settings');
1718: ibe_util.debug('Update_Settings : x_return_status - '||x_return_status);
1719: END IF;
1720:
1721: IF x_return_status <> FND_API.g_ret_sts_success THEN
1714: );
1715:
1716: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1717: ibe_util.debug('Update_Settings : After Calling ibe_ord_oneclick_pvt.save_settings');
1718: ibe_util.debug('Update_Settings : x_return_status - '||x_return_status);
1719: END IF;
1720:
1721: IF x_return_status <> FND_API.g_ret_sts_success THEN
1722: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1718: ibe_util.debug('Update_Settings : x_return_status - '||x_return_status);
1719: END IF;
1720:
1721: IF x_return_status <> FND_API.g_ret_sts_success THEN
1722: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1723: ibe_util.debug('ibe_ord_oneclick_pvt.Update_Settings - call to ibe_ord_oneclick_pvt.save_settings failed' || x_return_status);
1724: END IF;
1725: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1726: RAISE FND_API.G_EXC_ERROR;
1719: END IF;
1720:
1721: IF x_return_status <> FND_API.g_ret_sts_success THEN
1722: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1723: ibe_util.debug('ibe_ord_oneclick_pvt.Update_Settings - call to ibe_ord_oneclick_pvt.save_settings failed' || x_return_status);
1724: END IF;
1725: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1726: RAISE FND_API.G_EXC_ERROR;
1727: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1732: IF FND_API.To_Boolean( p_commit ) THEN
1733: COMMIT WORK;
1734: END IF;
1735:
1736: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1737: ibe_util.debug('Update_Settings : Success - Express Checkout disabled');
1738: ibe_util.debug('Update_Settings : End');
1739: END IF;
1740: ELSE
1733: COMMIT WORK;
1734: END IF;
1735:
1736: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1737: ibe_util.debug('Update_Settings : Success - Express Checkout disabled');
1738: ibe_util.debug('Update_Settings : End');
1739: END IF;
1740: ELSE
1741: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1734: END IF;
1735:
1736: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1737: ibe_util.debug('Update_Settings : Success - Express Checkout disabled');
1738: ibe_util.debug('Update_Settings : End');
1739: END IF;
1740: ELSE
1741: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1742: ibe_util.debug('Update_Settings : Express Checkout disabled - No need for update');
1737: ibe_util.debug('Update_Settings : Success - Express Checkout disabled');
1738: ibe_util.debug('Update_Settings : End');
1739: END IF;
1740: ELSE
1741: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1742: ibe_util.debug('Update_Settings : Express Checkout disabled - No need for update');
1743: ibe_util.debug('Update_Settings : End');
1744: END IF;
1745:
1738: ibe_util.debug('Update_Settings : End');
1739: END IF;
1740: ELSE
1741: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1742: ibe_util.debug('Update_Settings : Express Checkout disabled - No need for update');
1743: ibe_util.debug('Update_Settings : End');
1744: END IF;
1745:
1746: END IF;
1739: END IF;
1740: ELSE
1741: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1742: ibe_util.debug('Update_Settings : Express Checkout disabled - No need for update');
1743: ibe_util.debug('Update_Settings : End');
1744: END IF;
1745:
1746: END IF;
1747:
1752: );
1753:
1754: EXCEPTION
1755: WHEN FND_API.G_EXC_ERROR THEN
1756: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1757: ibe_util.debug('ibe_ord_oneclick_pvt.Update_Settings: EXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1758: END IF;
1759: ROLLBACK TO Update_Settings;
1760: x_return_status := FND_API.G_RET_STS_ERROR ;
1753:
1754: EXCEPTION
1755: WHEN FND_API.G_EXC_ERROR THEN
1756: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1757: ibe_util.debug('ibe_ord_oneclick_pvt.Update_Settings: EXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1758: END IF;
1759: ROLLBACK TO Update_Settings;
1760: x_return_status := FND_API.G_RET_STS_ERROR ;
1761: FND_MSG_PUB.Count_And_Get
1764: p_data => x_msg_data
1765: );
1766:
1767: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1768: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1769: ibe_util.debug('ibe_ord_oneclick_pvt.Update_Settings: UNEXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1770: END IF;
1771: ROLLBACK TO Update_Settings;
1772: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1765: );
1766:
1767: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1768: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1769: ibe_util.debug('ibe_ord_oneclick_pvt.Update_Settings: UNEXPECTED ERROR EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1770: END IF;
1771: ROLLBACK TO Update_Settings;
1772: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1773: FND_MSG_PUB.Count_And_Get
1776: p_data => x_msg_data
1777: );
1778:
1779: WHEN OTHERS THEN
1780: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1781: ibe_util.debug('ibe_ord_oneclick_pvt.Update_Settings: OTHER EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1782: END IF;
1783: ROLLBACK TO Update_Settings;
1784: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1777: );
1778:
1779: WHEN OTHERS THEN
1780: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1781: ibe_util.debug('ibe_ord_oneclick_pvt.Update_Settings: OTHER EXCEPTION ' || to_char(sysdate,'DD-MON-YYYY:HH24:MI:SS'));
1782: END IF;
1783: ROLLBACK TO Update_Settings;
1784: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1785: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN