15: ELSE
16: FND_FILE.put(fnd_file.log,message);
17: END IF;
18: IF PG_DEBUG = 'Y' THEN
19: ARP_STANDARD.DEBUG(message);
20: END IF;
21: END log;
22:
23: PROCEDURE out(
71: END IF;
72:
73: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
74: IF p_start_date < p_end_date THEN
75: arp_standard.debug(' end date should be greater than the start date');
76: fnd_message.set_name('AR', 'HZ_API_DATE_GREATER');
77: --Int'l Calendar Project
78: fnd_message.set_token('DATE2', fnd_date.date_to_chardate(p_end_date, calendar_aware=> FND_DATE.calendar_aware_alt));
79: fnd_message.set_token('DATE1', fnd_date.date_to_chardate(p_start_date, calendar_aware=> FND_DATE.calendar_aware_alt));
202: no_event_found EXCEPTION;
203: ent_ev_no_exist EXCEPTION;
204:
205: BEGIN
206: arp_standard.debug('do_on_existing_events+');
207: arp_standard.debug(' p_trx_number :'||p_trx_number);
208: arp_standard.debug(' p_legal_entity_id :'||p_legal_entity_id);
209: arp_standard.debug(' p_ledger_id :'||p_ledger_id);
210: arp_standard.debug(' p_org_id :'||p_org_id);
203: ent_ev_no_exist EXCEPTION;
204:
205: BEGIN
206: arp_standard.debug('do_on_existing_events+');
207: arp_standard.debug(' p_trx_number :'||p_trx_number);
208: arp_standard.debug(' p_legal_entity_id :'||p_legal_entity_id);
209: arp_standard.debug(' p_ledger_id :'||p_ledger_id);
210: arp_standard.debug(' p_org_id :'||p_org_id);
211: arp_standard.debug(' p_event_id :'||p_event_id);
204:
205: BEGIN
206: arp_standard.debug('do_on_existing_events+');
207: arp_standard.debug(' p_trx_number :'||p_trx_number);
208: arp_standard.debug(' p_legal_entity_id :'||p_legal_entity_id);
209: arp_standard.debug(' p_ledger_id :'||p_ledger_id);
210: arp_standard.debug(' p_org_id :'||p_org_id);
211: arp_standard.debug(' p_event_id :'||p_event_id);
212: arp_standard.debug(' p_valuation_method :'||p_valuation_method);
205: BEGIN
206: arp_standard.debug('do_on_existing_events+');
207: arp_standard.debug(' p_trx_number :'||p_trx_number);
208: arp_standard.debug(' p_legal_entity_id :'||p_legal_entity_id);
209: arp_standard.debug(' p_ledger_id :'||p_ledger_id);
210: arp_standard.debug(' p_org_id :'||p_org_id);
211: arp_standard.debug(' p_event_id :'||p_event_id);
212: arp_standard.debug(' p_valuation_method :'||p_valuation_method);
213: arp_standard.debug(' p_entity_type_code :'||p_entity_type_code);
206: arp_standard.debug('do_on_existing_events+');
207: arp_standard.debug(' p_trx_number :'||p_trx_number);
208: arp_standard.debug(' p_legal_entity_id :'||p_legal_entity_id);
209: arp_standard.debug(' p_ledger_id :'||p_ledger_id);
210: arp_standard.debug(' p_org_id :'||p_org_id);
211: arp_standard.debug(' p_event_id :'||p_event_id);
212: arp_standard.debug(' p_valuation_method :'||p_valuation_method);
213: arp_standard.debug(' p_entity_type_code :'||p_entity_type_code);
214: arp_standard.debug(' p_event_type_code :'||p_event_type_code);
207: arp_standard.debug(' p_trx_number :'||p_trx_number);
208: arp_standard.debug(' p_legal_entity_id :'||p_legal_entity_id);
209: arp_standard.debug(' p_ledger_id :'||p_ledger_id);
210: arp_standard.debug(' p_org_id :'||p_org_id);
211: arp_standard.debug(' p_event_id :'||p_event_id);
212: arp_standard.debug(' p_valuation_method :'||p_valuation_method);
213: arp_standard.debug(' p_entity_type_code :'||p_entity_type_code);
214: arp_standard.debug(' p_event_type_code :'||p_event_type_code);
215: arp_standard.debug(' p_status :'||p_status);
208: arp_standard.debug(' p_legal_entity_id :'||p_legal_entity_id);
209: arp_standard.debug(' p_ledger_id :'||p_ledger_id);
210: arp_standard.debug(' p_org_id :'||p_org_id);
211: arp_standard.debug(' p_event_id :'||p_event_id);
212: arp_standard.debug(' p_valuation_method :'||p_valuation_method);
213: arp_standard.debug(' p_entity_type_code :'||p_entity_type_code);
214: arp_standard.debug(' p_event_type_code :'||p_event_type_code);
215: arp_standard.debug(' p_status :'||p_status);
216: arp_standard.debug(' p_action :'||p_action);
209: arp_standard.debug(' p_ledger_id :'||p_ledger_id);
210: arp_standard.debug(' p_org_id :'||p_org_id);
211: arp_standard.debug(' p_event_id :'||p_event_id);
212: arp_standard.debug(' p_valuation_method :'||p_valuation_method);
213: arp_standard.debug(' p_entity_type_code :'||p_entity_type_code);
214: arp_standard.debug(' p_event_type_code :'||p_event_type_code);
215: arp_standard.debug(' p_status :'||p_status);
216: arp_standard.debug(' p_action :'||p_action);
217: arp_standard.debug(' p_event_date :'||p_event_date);
210: arp_standard.debug(' p_org_id :'||p_org_id);
211: arp_standard.debug(' p_event_id :'||p_event_id);
212: arp_standard.debug(' p_valuation_method :'||p_valuation_method);
213: arp_standard.debug(' p_entity_type_code :'||p_entity_type_code);
214: arp_standard.debug(' p_event_type_code :'||p_event_type_code);
215: arp_standard.debug(' p_status :'||p_status);
216: arp_standard.debug(' p_action :'||p_action);
217: arp_standard.debug(' p_event_date :'||p_event_date);
218: arp_standard.debug(' p_curr_event_date :'||p_curr_event_date);
211: arp_standard.debug(' p_event_id :'||p_event_id);
212: arp_standard.debug(' p_valuation_method :'||p_valuation_method);
213: arp_standard.debug(' p_entity_type_code :'||p_entity_type_code);
214: arp_standard.debug(' p_event_type_code :'||p_event_type_code);
215: arp_standard.debug(' p_status :'||p_status);
216: arp_standard.debug(' p_action :'||p_action);
217: arp_standard.debug(' p_event_date :'||p_event_date);
218: arp_standard.debug(' p_curr_event_date :'||p_curr_event_date);
219: arp_standard.debug(' p_curr_trx_date :'||p_curr_trx_date);
212: arp_standard.debug(' p_valuation_method :'||p_valuation_method);
213: arp_standard.debug(' p_entity_type_code :'||p_entity_type_code);
214: arp_standard.debug(' p_event_type_code :'||p_event_type_code);
215: arp_standard.debug(' p_status :'||p_status);
216: arp_standard.debug(' p_action :'||p_action);
217: arp_standard.debug(' p_event_date :'||p_event_date);
218: arp_standard.debug(' p_curr_event_date :'||p_curr_event_date);
219: arp_standard.debug(' p_curr_trx_date :'||p_curr_trx_date);
220:
213: arp_standard.debug(' p_entity_type_code :'||p_entity_type_code);
214: arp_standard.debug(' p_event_type_code :'||p_event_type_code);
215: arp_standard.debug(' p_status :'||p_status);
216: arp_standard.debug(' p_action :'||p_action);
217: arp_standard.debug(' p_event_date :'||p_event_date);
218: arp_standard.debug(' p_curr_event_date :'||p_curr_event_date);
219: arp_standard.debug(' p_curr_trx_date :'||p_curr_trx_date);
220:
221: -- get the eve
214: arp_standard.debug(' p_event_type_code :'||p_event_type_code);
215: arp_standard.debug(' p_status :'||p_status);
216: arp_standard.debug(' p_action :'||p_action);
217: arp_standard.debug(' p_event_date :'||p_event_date);
218: arp_standard.debug(' p_curr_event_date :'||p_curr_event_date);
219: arp_standard.debug(' p_curr_trx_date :'||p_curr_trx_date);
220:
221: -- get the eve
222: IF p_ledger_id IS NULL OR p_org_id IS NULL THEN
215: arp_standard.debug(' p_status :'||p_status);
216: arp_standard.debug(' p_action :'||p_action);
217: arp_standard.debug(' p_event_date :'||p_event_date);
218: arp_standard.debug(' p_curr_event_date :'||p_curr_event_date);
219: arp_standard.debug(' p_curr_trx_date :'||p_curr_trx_date);
220:
221: -- get the eve
222: IF p_ledger_id IS NULL OR p_org_id IS NULL THEN
223: RAISE not_suffisant_info;
240:
241: l_security.security_id_int_1 := p_org_id;
242:
243:
244: arp_standard.debug(' dist_ctlgd_id :'|| l_rec.dist_ctlgd_id );
245: arp_standard.debug(' dist_gl_date :'|| l_rec.dist_gl_date );
246: arp_standard.debug(' dist_account_set_flag :'|| l_rec.dist_account_set_flag );
247: arp_standard.debug(' trx_trx_id :'|| l_rec.trx_trx_id );
248: arp_standard.debug(' trx_complete_flag :'|| l_rec.trx_complete_flag );
241: l_security.security_id_int_1 := p_org_id;
242:
243:
244: arp_standard.debug(' dist_ctlgd_id :'|| l_rec.dist_ctlgd_id );
245: arp_standard.debug(' dist_gl_date :'|| l_rec.dist_gl_date );
246: arp_standard.debug(' dist_account_set_flag :'|| l_rec.dist_account_set_flag );
247: arp_standard.debug(' trx_trx_id :'|| l_rec.trx_trx_id );
248: arp_standard.debug(' trx_complete_flag :'|| l_rec.trx_complete_flag );
249: arp_standard.debug(' trx_trx_date :'|| l_rec.trx_trx_date );
242:
243:
244: arp_standard.debug(' dist_ctlgd_id :'|| l_rec.dist_ctlgd_id );
245: arp_standard.debug(' dist_gl_date :'|| l_rec.dist_gl_date );
246: arp_standard.debug(' dist_account_set_flag :'|| l_rec.dist_account_set_flag );
247: arp_standard.debug(' trx_trx_id :'|| l_rec.trx_trx_id );
248: arp_standard.debug(' trx_complete_flag :'|| l_rec.trx_complete_flag );
249: arp_standard.debug(' trx_trx_date :'|| l_rec.trx_trx_date );
250: arp_standard.debug(' trx_invoicing_rule_id :'|| l_rec.trx_invoicing_rule_id );
243:
244: arp_standard.debug(' dist_ctlgd_id :'|| l_rec.dist_ctlgd_id );
245: arp_standard.debug(' dist_gl_date :'|| l_rec.dist_gl_date );
246: arp_standard.debug(' dist_account_set_flag :'|| l_rec.dist_account_set_flag );
247: arp_standard.debug(' trx_trx_id :'|| l_rec.trx_trx_id );
248: arp_standard.debug(' trx_complete_flag :'|| l_rec.trx_complete_flag );
249: arp_standard.debug(' trx_trx_date :'|| l_rec.trx_trx_date );
250: arp_standard.debug(' trx_invoicing_rule_id :'|| l_rec.trx_invoicing_rule_id );
251: arp_standard.debug(' trx_post_to_gl :'|| l_rec.trx_post_to_gl );
244: arp_standard.debug(' dist_ctlgd_id :'|| l_rec.dist_ctlgd_id );
245: arp_standard.debug(' dist_gl_date :'|| l_rec.dist_gl_date );
246: arp_standard.debug(' dist_account_set_flag :'|| l_rec.dist_account_set_flag );
247: arp_standard.debug(' trx_trx_id :'|| l_rec.trx_trx_id );
248: arp_standard.debug(' trx_complete_flag :'|| l_rec.trx_complete_flag );
249: arp_standard.debug(' trx_trx_date :'|| l_rec.trx_trx_date );
250: arp_standard.debug(' trx_invoicing_rule_id :'|| l_rec.trx_invoicing_rule_id );
251: arp_standard.debug(' trx_post_to_gl :'|| l_rec.trx_post_to_gl );
252: arp_standard.debug(' ent_entity_id :'|| l_rec.ent_entity_id );
245: arp_standard.debug(' dist_gl_date :'|| l_rec.dist_gl_date );
246: arp_standard.debug(' dist_account_set_flag :'|| l_rec.dist_account_set_flag );
247: arp_standard.debug(' trx_trx_id :'|| l_rec.trx_trx_id );
248: arp_standard.debug(' trx_complete_flag :'|| l_rec.trx_complete_flag );
249: arp_standard.debug(' trx_trx_date :'|| l_rec.trx_trx_date );
250: arp_standard.debug(' trx_invoicing_rule_id :'|| l_rec.trx_invoicing_rule_id );
251: arp_standard.debug(' trx_post_to_gl :'|| l_rec.trx_post_to_gl );
252: arp_standard.debug(' ent_entity_id :'|| l_rec.ent_entity_id );
253: arp_standard.debug(' trx_event_id :'|| l_rec.trx_event_id );
246: arp_standard.debug(' dist_account_set_flag :'|| l_rec.dist_account_set_flag );
247: arp_standard.debug(' trx_trx_id :'|| l_rec.trx_trx_id );
248: arp_standard.debug(' trx_complete_flag :'|| l_rec.trx_complete_flag );
249: arp_standard.debug(' trx_trx_date :'|| l_rec.trx_trx_date );
250: arp_standard.debug(' trx_invoicing_rule_id :'|| l_rec.trx_invoicing_rule_id );
251: arp_standard.debug(' trx_post_to_gl :'|| l_rec.trx_post_to_gl );
252: arp_standard.debug(' ent_entity_id :'|| l_rec.ent_entity_id );
253: arp_standard.debug(' trx_event_id :'|| l_rec.trx_event_id );
254: arp_standard.debug(' trx_event_date :'|| l_rec.trx_event_date );
247: arp_standard.debug(' trx_trx_id :'|| l_rec.trx_trx_id );
248: arp_standard.debug(' trx_complete_flag :'|| l_rec.trx_complete_flag );
249: arp_standard.debug(' trx_trx_date :'|| l_rec.trx_trx_date );
250: arp_standard.debug(' trx_invoicing_rule_id :'|| l_rec.trx_invoicing_rule_id );
251: arp_standard.debug(' trx_post_to_gl :'|| l_rec.trx_post_to_gl );
252: arp_standard.debug(' ent_entity_id :'|| l_rec.ent_entity_id );
253: arp_standard.debug(' trx_event_id :'|| l_rec.trx_event_id );
254: arp_standard.debug(' trx_event_date :'|| l_rec.trx_event_date );
255: arp_standard.debug(' trx_event_status :'|| l_rec.trx_event_status );
248: arp_standard.debug(' trx_complete_flag :'|| l_rec.trx_complete_flag );
249: arp_standard.debug(' trx_trx_date :'|| l_rec.trx_trx_date );
250: arp_standard.debug(' trx_invoicing_rule_id :'|| l_rec.trx_invoicing_rule_id );
251: arp_standard.debug(' trx_post_to_gl :'|| l_rec.trx_post_to_gl );
252: arp_standard.debug(' ent_entity_id :'|| l_rec.ent_entity_id );
253: arp_standard.debug(' trx_event_id :'|| l_rec.trx_event_id );
254: arp_standard.debug(' trx_event_date :'|| l_rec.trx_event_date );
255: arp_standard.debug(' trx_event_status :'|| l_rec.trx_event_status );
256: arp_standard.debug(' trx_ev_trx_date :'|| l_rec.trx_ev_trx_date );
249: arp_standard.debug(' trx_trx_date :'|| l_rec.trx_trx_date );
250: arp_standard.debug(' trx_invoicing_rule_id :'|| l_rec.trx_invoicing_rule_id );
251: arp_standard.debug(' trx_post_to_gl :'|| l_rec.trx_post_to_gl );
252: arp_standard.debug(' ent_entity_id :'|| l_rec.ent_entity_id );
253: arp_standard.debug(' trx_event_id :'|| l_rec.trx_event_id );
254: arp_standard.debug(' trx_event_date :'|| l_rec.trx_event_date );
255: arp_standard.debug(' trx_event_status :'|| l_rec.trx_event_status );
256: arp_standard.debug(' trx_ev_trx_date :'|| l_rec.trx_ev_trx_date );
257: arp_standard.debug(' dist_event_id :'|| l_rec.dist_event_id );
250: arp_standard.debug(' trx_invoicing_rule_id :'|| l_rec.trx_invoicing_rule_id );
251: arp_standard.debug(' trx_post_to_gl :'|| l_rec.trx_post_to_gl );
252: arp_standard.debug(' ent_entity_id :'|| l_rec.ent_entity_id );
253: arp_standard.debug(' trx_event_id :'|| l_rec.trx_event_id );
254: arp_standard.debug(' trx_event_date :'|| l_rec.trx_event_date );
255: arp_standard.debug(' trx_event_status :'|| l_rec.trx_event_status );
256: arp_standard.debug(' trx_ev_trx_date :'|| l_rec.trx_ev_trx_date );
257: arp_standard.debug(' dist_event_id :'|| l_rec.dist_event_id );
258: arp_standard.debug(' dist_event_status :'|| l_rec.dist_event_status );
251: arp_standard.debug(' trx_post_to_gl :'|| l_rec.trx_post_to_gl );
252: arp_standard.debug(' ent_entity_id :'|| l_rec.ent_entity_id );
253: arp_standard.debug(' trx_event_id :'|| l_rec.trx_event_id );
254: arp_standard.debug(' trx_event_date :'|| l_rec.trx_event_date );
255: arp_standard.debug(' trx_event_status :'|| l_rec.trx_event_status );
256: arp_standard.debug(' trx_ev_trx_date :'|| l_rec.trx_ev_trx_date );
257: arp_standard.debug(' dist_event_id :'|| l_rec.dist_event_id );
258: arp_standard.debug(' dist_event_status :'|| l_rec.dist_event_status );
259: arp_standard.debug(' dist_event_date :'|| l_rec.dist_event_date );
252: arp_standard.debug(' ent_entity_id :'|| l_rec.ent_entity_id );
253: arp_standard.debug(' trx_event_id :'|| l_rec.trx_event_id );
254: arp_standard.debug(' trx_event_date :'|| l_rec.trx_event_date );
255: arp_standard.debug(' trx_event_status :'|| l_rec.trx_event_status );
256: arp_standard.debug(' trx_ev_trx_date :'|| l_rec.trx_ev_trx_date );
257: arp_standard.debug(' dist_event_id :'|| l_rec.dist_event_id );
258: arp_standard.debug(' dist_event_status :'|| l_rec.dist_event_status );
259: arp_standard.debug(' dist_event_date :'|| l_rec.dist_event_date );
260: arp_standard.debug(' dist_ev_trx_date :'|| l_rec.dist_ev_trx_date );
253: arp_standard.debug(' trx_event_id :'|| l_rec.trx_event_id );
254: arp_standard.debug(' trx_event_date :'|| l_rec.trx_event_date );
255: arp_standard.debug(' trx_event_status :'|| l_rec.trx_event_status );
256: arp_standard.debug(' trx_ev_trx_date :'|| l_rec.trx_ev_trx_date );
257: arp_standard.debug(' dist_event_id :'|| l_rec.dist_event_id );
258: arp_standard.debug(' dist_event_status :'|| l_rec.dist_event_status );
259: arp_standard.debug(' dist_event_date :'|| l_rec.dist_event_date );
260: arp_standard.debug(' dist_ev_trx_date :'|| l_rec.dist_ev_trx_date );
261:
254: arp_standard.debug(' trx_event_date :'|| l_rec.trx_event_date );
255: arp_standard.debug(' trx_event_status :'|| l_rec.trx_event_status );
256: arp_standard.debug(' trx_ev_trx_date :'|| l_rec.trx_ev_trx_date );
257: arp_standard.debug(' dist_event_id :'|| l_rec.dist_event_id );
258: arp_standard.debug(' dist_event_status :'|| l_rec.dist_event_status );
259: arp_standard.debug(' dist_event_date :'|| l_rec.dist_event_date );
260: arp_standard.debug(' dist_ev_trx_date :'|| l_rec.dist_ev_trx_date );
261:
262:
255: arp_standard.debug(' trx_event_status :'|| l_rec.trx_event_status );
256: arp_standard.debug(' trx_ev_trx_date :'|| l_rec.trx_ev_trx_date );
257: arp_standard.debug(' dist_event_id :'|| l_rec.dist_event_id );
258: arp_standard.debug(' dist_event_status :'|| l_rec.dist_event_status );
259: arp_standard.debug(' dist_event_date :'|| l_rec.dist_event_date );
260: arp_standard.debug(' dist_ev_trx_date :'|| l_rec.dist_ev_trx_date );
261:
262:
263: IF l_rec.dist_account_set_flag = 'Y' THEN
256: arp_standard.debug(' trx_ev_trx_date :'|| l_rec.trx_ev_trx_date );
257: arp_standard.debug(' dist_event_id :'|| l_rec.dist_event_id );
258: arp_standard.debug(' dist_event_status :'|| l_rec.dist_event_status );
259: arp_standard.debug(' dist_event_date :'|| l_rec.dist_event_date );
260: arp_standard.debug(' dist_ev_trx_date :'|| l_rec.dist_ev_trx_date );
261:
262:
263: IF l_rec.dist_account_set_flag = 'Y' THEN
264: --
310:
311:
312:
313: IF l_upg_trx_date <> FND_API.G_MISS_DATE OR l_upg_gl_date <> FND_API.G_MISS_DATE THEN
314: arp_standard.debug(' call update event with at transaction level');
315: xla_events_pub_pkg.update_event
316: (p_event_source_info => l_event_source_info,
317: p_event_id => l_event_id,
318: p_event_date => p_event_date,
320: p_transaction_date => p_transaction_date,
321: p_security_context => l_security);
322: END IF;
323:
324: arp_standard.debug('do_on_existing_events-');
325:
326: EXCEPTION
327: WHEN ent_ev_no_exist THEN
328: arp_standard.debug(' EXCEPTION ent_ev_no_exist - no event update required');
324: arp_standard.debug('do_on_existing_events-');
325:
326: EXCEPTION
327: WHEN ent_ev_no_exist THEN
328: arp_standard.debug(' EXCEPTION ent_ev_no_exist - no event update required');
329: WHEN no_event_found THEN
330: arp_standard.debug(' EXCEPTION no_event_found - no event update required');
331: WHEN more_than_one_event THEN
332: arp_standard.debug(' EXCEPTION more_than_one_event can not update');
326: EXCEPTION
327: WHEN ent_ev_no_exist THEN
328: arp_standard.debug(' EXCEPTION ent_ev_no_exist - no event update required');
329: WHEN no_event_found THEN
330: arp_standard.debug(' EXCEPTION no_event_found - no event update required');
331: WHEN more_than_one_event THEN
332: arp_standard.debug(' EXCEPTION more_than_one_event can not update');
333: WHEN not_suffisant_info THEN
334: arp_standard.debug(' EXCEPTION not_suffisant_info do_on_existing_events has done nothing');
328: arp_standard.debug(' EXCEPTION ent_ev_no_exist - no event update required');
329: WHEN no_event_found THEN
330: arp_standard.debug(' EXCEPTION no_event_found - no event update required');
331: WHEN more_than_one_event THEN
332: arp_standard.debug(' EXCEPTION more_than_one_event can not update');
333: WHEN not_suffisant_info THEN
334: arp_standard.debug(' EXCEPTION not_suffisant_info do_on_existing_events has done nothing');
335: WHEN done THEN
336: arp_standard.debug(' do_on_existing_events has done '||p_action);
330: arp_standard.debug(' EXCEPTION no_event_found - no event update required');
331: WHEN more_than_one_event THEN
332: arp_standard.debug(' EXCEPTION more_than_one_event can not update');
333: WHEN not_suffisant_info THEN
334: arp_standard.debug(' EXCEPTION not_suffisant_info do_on_existing_events has done nothing');
335: WHEN done THEN
336: arp_standard.debug(' do_on_existing_events has done '||p_action);
337: arp_standard.debug('do_on_existing_events has done -');
338: WHEN not_supported_action THEN
332: arp_standard.debug(' EXCEPTION more_than_one_event can not update');
333: WHEN not_suffisant_info THEN
334: arp_standard.debug(' EXCEPTION not_suffisant_info do_on_existing_events has done nothing');
335: WHEN done THEN
336: arp_standard.debug(' do_on_existing_events has done '||p_action);
337: arp_standard.debug('do_on_existing_events has done -');
338: WHEN not_supported_action THEN
339: arp_standard.debug(' EXCEPTION not_supported_action do_on_existing_events '||p_action);
340: END;
333: WHEN not_suffisant_info THEN
334: arp_standard.debug(' EXCEPTION not_suffisant_info do_on_existing_events has done nothing');
335: WHEN done THEN
336: arp_standard.debug(' do_on_existing_events has done '||p_action);
337: arp_standard.debug('do_on_existing_events has done -');
338: WHEN not_supported_action THEN
339: arp_standard.debug(' EXCEPTION not_supported_action do_on_existing_events '||p_action);
340: END;
341:
335: WHEN done THEN
336: arp_standard.debug(' do_on_existing_events has done '||p_action);
337: arp_standard.debug('do_on_existing_events has done -');
338: WHEN not_supported_action THEN
339: arp_standard.debug(' EXCEPTION not_supported_action do_on_existing_events '||p_action);
340: END;
341:
342:
343:
345: (p_entity_code IN VARCHAR2,
346: p_source_int_id IN NUMBER)
347: IS
348: BEGIN
349: arp_standard.debug('get_ar_trx_event_info +');
350: IF p_entity_code = 'TRANSACTIONS' THEN
351: --
352: -- If the transaction is rule based then no records will be inserted by
353: -- by this statement if REVREC has not run.
448: WHERE customer_trx_id = p_source_int_id;
449:
450:
451: END IF;
452: arp_standard.debug('get_ar_trx_event_info -');
453: END;
454:
455:
456:
459: (p_entity_code IN VARCHAR2,
460: p_source_int_id IN NUMBER)
461: IS
462: BEGIN
463: arp_standard.debug('get_xla_event_info +');
464: arp_standard.debug(' p_entity_code :'||p_entity_code);
465: arp_standard.debug(' p_source_int_id :'||p_source_int_id);
466:
467: INSERT INTO ar_detect_gt(gl_date ,
460: p_source_int_id IN NUMBER)
461: IS
462: BEGIN
463: arp_standard.debug('get_xla_event_info +');
464: arp_standard.debug(' p_entity_code :'||p_entity_code);
465: arp_standard.debug(' p_source_int_id :'||p_source_int_id);
466:
467: INSERT INTO ar_detect_gt(gl_date ,
468: source_int_id ,
461: IS
462: BEGIN
463: arp_standard.debug('get_xla_event_info +');
464: arp_standard.debug(' p_entity_code :'||p_entity_code);
465: arp_standard.debug(' p_source_int_id :'||p_source_int_id);
466:
467: INSERT INTO ar_detect_gt(gl_date ,
468: source_int_id ,
469: entity_code ,
482: AND nvl(t.source_id_int_1,-99) = p_source_int_id
483: AND t.entity_id = e.entity_id
484: AND e.application_id = 222;
485:
486: arp_standard.debug('get_xla_event_info -');
487: END;
488:
489:
490: PROCEDURE ar_event_existence
501: AND event_id IS NULL;
502:
503: l_date DATE;
504: BEGIN
505: arp_standard.debug('ar_event_existence +');
506: arp_standard.debug(' p_entity_code :'||p_entity_code);
507: arp_standard.debug(' p_source_int_id :'||p_source_int_id);
508: OPEN c;
509: FETCH c INTO l_date;
502:
503: l_date DATE;
504: BEGIN
505: arp_standard.debug('ar_event_existence +');
506: arp_standard.debug(' p_entity_code :'||p_entity_code);
507: arp_standard.debug(' p_source_int_id :'||p_source_int_id);
508: OPEN c;
509: FETCH c INTO l_date;
510: IF c%NOTFOUND THEN
503: l_date DATE;
504: BEGIN
505: arp_standard.debug('ar_event_existence +');
506: arp_standard.debug(' p_entity_code :'||p_entity_code);
507: arp_standard.debug(' p_source_int_id :'||p_source_int_id);
508: OPEN c;
509: FETCH c INTO l_date;
510: IF c%NOTFOUND THEN
511: x_result := 'Y';
512: ELSE
513: x_result := 'N';
514: END IF;
515: CLOSE c;
516: arp_standard.debug(' x_result :'||x_result);
517: arp_standard.debug('ar_event_existence -');
518: END;
519:
520:
513: x_result := 'N';
514: END IF;
515: CLOSE c;
516: arp_standard.debug(' x_result :'||x_result);
517: arp_standard.debug('ar_event_existence -');
518: END;
519:
520:
521:
538: AND a2.from_application = 'XLA'
539: AND a2.gl_date = a1.gl_date);
540: l_date DATE;
541: BEGIN
542: arp_standard.debug('ar_xla_all_match_exist +');
543: OPEN c;
544: FETCH c INTO l_date;
545: IF c%NOTFOUND THEN
546: x_result := 'Y';
547: ELSE
548: x_result := 'N';
549: END IF;
550: CLOSE c;
551: arp_standard.debug(' l_date :'||l_date);
552: arp_standard.debug(' x_result :'||x_result);
553: arp_standard.debug('ar_xla_all_match_exist -');
554: END;
555:
548: x_result := 'N';
549: END IF;
550: CLOSE c;
551: arp_standard.debug(' l_date :'||l_date);
552: arp_standard.debug(' x_result :'||x_result);
553: arp_standard.debug('ar_xla_all_match_exist -');
554: END;
555:
556:
549: END IF;
550: CLOSE c;
551: arp_standard.debug(' l_date :'||l_date);
552: arp_standard.debug(' x_result :'||x_result);
553: arp_standard.debug('ar_xla_all_match_exist -');
554: END;
555:
556:
557:
567: IS
568: x_result VARCHAR2(30);
569: end_execution EXCEPTION;
570: BEGIN
571: arp_standard.debug('upgrade_status_per_doc +');
572: arp_standard.debug(' p_entity_code :'||p_entity_code);
573: arp_standard.debug(' p_source_int_id:'||p_source_int_id);
574: x_return_status := fnd_api.g_ret_sts_success;
575:
568: x_result VARCHAR2(30);
569: end_execution EXCEPTION;
570: BEGIN
571: arp_standard.debug('upgrade_status_per_doc +');
572: arp_standard.debug(' p_entity_code :'||p_entity_code);
573: arp_standard.debug(' p_source_int_id:'||p_source_int_id);
574: x_return_status := fnd_api.g_ret_sts_success;
575:
576: -- initialize message list if p_init_msg_list is set to TRUE.
569: end_execution EXCEPTION;
570: BEGIN
571: arp_standard.debug('upgrade_status_per_doc +');
572: arp_standard.debug(' p_entity_code :'||p_entity_code);
573: arp_standard.debug(' p_source_int_id:'||p_source_int_id);
574: x_return_status := fnd_api.g_ret_sts_success;
575:
576: -- initialize message list if p_init_msg_list is set to TRUE.
577: IF FND_API.to_Boolean(p_init_msg_list) THEN
581: IF p_entity_code NOT IN
582: ('TRANSACTIONS','RECEIPTS',
583: 'ADJUSTMENTS', 'BILLS_RECEIVABLE')
584: THEN
585: arp_standard.debug('Value for entity code should be TRANSACTIONS RECEIPTS ADJUSTMENTS BILLS_RECEIVABLE');
586: FND_MESSAGE.SET_NAME( 'AR', 'AR_ONLY_VALUE_ALLOWED' );
587: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'ENTITY_CODE' );
588: FND_MESSAGE.SET_TOKEN( 'VALUES', 'TRANSACTIONS,RECEIPTS,ADJUSTMENTS,BILLS_RECEIVABLE');
589: FND_MSG_PUB.ADD;
627: ELSE
628: x_upgrade_status := 'N';
629: END IF;
630:
631: arp_standard.debug(' x_upgrade_status :'||x_upgrade_status);
632: arp_standard.debug('upgrade_status_per_doc -');
633: EXCEPTION
634: WHEN end_execution THEN
635: arp_standard.debug(' x_upgrade_status :'||x_upgrade_status);
628: x_upgrade_status := 'N';
629: END IF;
630:
631: arp_standard.debug(' x_upgrade_status :'||x_upgrade_status);
632: arp_standard.debug('upgrade_status_per_doc -');
633: EXCEPTION
634: WHEN end_execution THEN
635: arp_standard.debug(' x_upgrade_status :'||x_upgrade_status);
636: WHEN fnd_api.G_EXC_ERROR THEN
631: arp_standard.debug(' x_upgrade_status :'||x_upgrade_status);
632: arp_standard.debug('upgrade_status_per_doc -');
633: EXCEPTION
634: WHEN end_execution THEN
635: arp_standard.debug(' x_upgrade_status :'||x_upgrade_status);
636: WHEN fnd_api.G_EXC_ERROR THEN
637: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
638: p_count => x_msg_count,
639: p_data => x_msg_data);
637: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
638: p_count => x_msg_count,
639: p_data => x_msg_data);
640: WHEN OTHERS THEN
641: arp_standard.debug('EXCEPTION OTHERS in upgrade_status_per_doc:'||SQLERRM);
642: x_return_status := fnd_api.g_ret_sts_unexp_error;
643: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
644: fnd_message.set_token('ERROR' ,SQLERRM);
645: fnd_msg_pub.add;
1406: creation_mode EXCEPTION;
1407: no_existing_account EXCEPTION;
1408: nullify_customer EXCEPTION;
1409: BEGIN
1410: arp_standard.debug('update_cr_dist +');
1411: arp_standard.debug(' p_ledger_id :'||p_ledger_id);
1412: arp_standard.debug(' p_source_id_int_1 :'||p_source_id_int_1);
1413: arp_standard.debug(' p_original_third_party_id:'||p_original_third_party_id);
1414: arp_standard.debug(' p_original_site_id :'||p_original_site_id);
1407: no_existing_account EXCEPTION;
1408: nullify_customer EXCEPTION;
1409: BEGIN
1410: arp_standard.debug('update_cr_dist +');
1411: arp_standard.debug(' p_ledger_id :'||p_ledger_id);
1412: arp_standard.debug(' p_source_id_int_1 :'||p_source_id_int_1);
1413: arp_standard.debug(' p_original_third_party_id:'||p_original_third_party_id);
1414: arp_standard.debug(' p_original_site_id :'||p_original_site_id);
1415: arp_standard.debug(' p_new_third_party_id :'||p_new_third_party_id);
1408: nullify_customer EXCEPTION;
1409: BEGIN
1410: arp_standard.debug('update_cr_dist +');
1411: arp_standard.debug(' p_ledger_id :'||p_ledger_id);
1412: arp_standard.debug(' p_source_id_int_1 :'||p_source_id_int_1);
1413: arp_standard.debug(' p_original_third_party_id:'||p_original_third_party_id);
1414: arp_standard.debug(' p_original_site_id :'||p_original_site_id);
1415: arp_standard.debug(' p_new_third_party_id :'||p_new_third_party_id);
1416: arp_standard.debug(' p_original_site_id :'||p_original_site_id);
1409: BEGIN
1410: arp_standard.debug('update_cr_dist +');
1411: arp_standard.debug(' p_ledger_id :'||p_ledger_id);
1412: arp_standard.debug(' p_source_id_int_1 :'||p_source_id_int_1);
1413: arp_standard.debug(' p_original_third_party_id:'||p_original_third_party_id);
1414: arp_standard.debug(' p_original_site_id :'||p_original_site_id);
1415: arp_standard.debug(' p_new_third_party_id :'||p_new_third_party_id);
1416: arp_standard.debug(' p_original_site_id :'||p_original_site_id);
1417: arp_standard.debug(' p_third_party_merge_date :'||p_third_party_merge_date);
1410: arp_standard.debug('update_cr_dist +');
1411: arp_standard.debug(' p_ledger_id :'||p_ledger_id);
1412: arp_standard.debug(' p_source_id_int_1 :'||p_source_id_int_1);
1413: arp_standard.debug(' p_original_third_party_id:'||p_original_third_party_id);
1414: arp_standard.debug(' p_original_site_id :'||p_original_site_id);
1415: arp_standard.debug(' p_new_third_party_id :'||p_new_third_party_id);
1416: arp_standard.debug(' p_original_site_id :'||p_original_site_id);
1417: arp_standard.debug(' p_third_party_merge_date :'||p_third_party_merge_date);
1418: arp_standard.debug(' p_create_update :'||p_create_update);
1411: arp_standard.debug(' p_ledger_id :'||p_ledger_id);
1412: arp_standard.debug(' p_source_id_int_1 :'||p_source_id_int_1);
1413: arp_standard.debug(' p_original_third_party_id:'||p_original_third_party_id);
1414: arp_standard.debug(' p_original_site_id :'||p_original_site_id);
1415: arp_standard.debug(' p_new_third_party_id :'||p_new_third_party_id);
1416: arp_standard.debug(' p_original_site_id :'||p_original_site_id);
1417: arp_standard.debug(' p_third_party_merge_date :'||p_third_party_merge_date);
1418: arp_standard.debug(' p_create_update :'||p_create_update);
1419: arp_standard.debug(' p_entity_code :'||p_entity_code);
1412: arp_standard.debug(' p_source_id_int_1 :'||p_source_id_int_1);
1413: arp_standard.debug(' p_original_third_party_id:'||p_original_third_party_id);
1414: arp_standard.debug(' p_original_site_id :'||p_original_site_id);
1415: arp_standard.debug(' p_new_third_party_id :'||p_new_third_party_id);
1416: arp_standard.debug(' p_original_site_id :'||p_original_site_id);
1417: arp_standard.debug(' p_third_party_merge_date :'||p_third_party_merge_date);
1418: arp_standard.debug(' p_create_update :'||p_create_update);
1419: arp_standard.debug(' p_entity_code :'||p_entity_code);
1420: arp_standard.debug(' p_type_of_third_party_merge:'||p_type_of_third_party_merge);
1413: arp_standard.debug(' p_original_third_party_id:'||p_original_third_party_id);
1414: arp_standard.debug(' p_original_site_id :'||p_original_site_id);
1415: arp_standard.debug(' p_new_third_party_id :'||p_new_third_party_id);
1416: arp_standard.debug(' p_original_site_id :'||p_original_site_id);
1417: arp_standard.debug(' p_third_party_merge_date :'||p_third_party_merge_date);
1418: arp_standard.debug(' p_create_update :'||p_create_update);
1419: arp_standard.debug(' p_entity_code :'||p_entity_code);
1420: arp_standard.debug(' p_type_of_third_party_merge:'||p_type_of_third_party_merge);
1421: arp_standard.debug(' p_mapping_flag :'||p_mapping_flag);
1414: arp_standard.debug(' p_original_site_id :'||p_original_site_id);
1415: arp_standard.debug(' p_new_third_party_id :'||p_new_third_party_id);
1416: arp_standard.debug(' p_original_site_id :'||p_original_site_id);
1417: arp_standard.debug(' p_third_party_merge_date :'||p_third_party_merge_date);
1418: arp_standard.debug(' p_create_update :'||p_create_update);
1419: arp_standard.debug(' p_entity_code :'||p_entity_code);
1420: arp_standard.debug(' p_type_of_third_party_merge:'||p_type_of_third_party_merge);
1421: arp_standard.debug(' p_mapping_flag :'||p_mapping_flag);
1422: arp_standard.debug(' p_execution_mode :'||p_execution_mode);
1415: arp_standard.debug(' p_new_third_party_id :'||p_new_third_party_id);
1416: arp_standard.debug(' p_original_site_id :'||p_original_site_id);
1417: arp_standard.debug(' p_third_party_merge_date :'||p_third_party_merge_date);
1418: arp_standard.debug(' p_create_update :'||p_create_update);
1419: arp_standard.debug(' p_entity_code :'||p_entity_code);
1420: arp_standard.debug(' p_type_of_third_party_merge:'||p_type_of_third_party_merge);
1421: arp_standard.debug(' p_mapping_flag :'||p_mapping_flag);
1422: arp_standard.debug(' p_execution_mode :'||p_execution_mode);
1423: arp_standard.debug(' p_accounting_mode :'||p_accounting_mode);
1416: arp_standard.debug(' p_original_site_id :'||p_original_site_id);
1417: arp_standard.debug(' p_third_party_merge_date :'||p_third_party_merge_date);
1418: arp_standard.debug(' p_create_update :'||p_create_update);
1419: arp_standard.debug(' p_entity_code :'||p_entity_code);
1420: arp_standard.debug(' p_type_of_third_party_merge:'||p_type_of_third_party_merge);
1421: arp_standard.debug(' p_mapping_flag :'||p_mapping_flag);
1422: arp_standard.debug(' p_execution_mode :'||p_execution_mode);
1423: arp_standard.debug(' p_accounting_mode :'||p_accounting_mode);
1424: arp_standard.debug(' p_transfer_to_gl_flag :'||p_transfer_to_gl_flag);
1417: arp_standard.debug(' p_third_party_merge_date :'||p_third_party_merge_date);
1418: arp_standard.debug(' p_create_update :'||p_create_update);
1419: arp_standard.debug(' p_entity_code :'||p_entity_code);
1420: arp_standard.debug(' p_type_of_third_party_merge:'||p_type_of_third_party_merge);
1421: arp_standard.debug(' p_mapping_flag :'||p_mapping_flag);
1422: arp_standard.debug(' p_execution_mode :'||p_execution_mode);
1423: arp_standard.debug(' p_accounting_mode :'||p_accounting_mode);
1424: arp_standard.debug(' p_transfer_to_gl_flag :'||p_transfer_to_gl_flag);
1425: arp_standard.debug(' p_post_in_gl_flag :'||p_post_in_gl_flag);
1418: arp_standard.debug(' p_create_update :'||p_create_update);
1419: arp_standard.debug(' p_entity_code :'||p_entity_code);
1420: arp_standard.debug(' p_type_of_third_party_merge:'||p_type_of_third_party_merge);
1421: arp_standard.debug(' p_mapping_flag :'||p_mapping_flag);
1422: arp_standard.debug(' p_execution_mode :'||p_execution_mode);
1423: arp_standard.debug(' p_accounting_mode :'||p_accounting_mode);
1424: arp_standard.debug(' p_transfer_to_gl_flag :'||p_transfer_to_gl_flag);
1425: arp_standard.debug(' p_post_in_gl_flag :'||p_post_in_gl_flag);
1426: arp_standard.debug(' p_third_party_type :'||p_third_party_type);
1419: arp_standard.debug(' p_entity_code :'||p_entity_code);
1420: arp_standard.debug(' p_type_of_third_party_merge:'||p_type_of_third_party_merge);
1421: arp_standard.debug(' p_mapping_flag :'||p_mapping_flag);
1422: arp_standard.debug(' p_execution_mode :'||p_execution_mode);
1423: arp_standard.debug(' p_accounting_mode :'||p_accounting_mode);
1424: arp_standard.debug(' p_transfer_to_gl_flag :'||p_transfer_to_gl_flag);
1425: arp_standard.debug(' p_post_in_gl_flag :'||p_post_in_gl_flag);
1426: arp_standard.debug(' p_third_party_type :'||p_third_party_type);
1427:
1420: arp_standard.debug(' p_type_of_third_party_merge:'||p_type_of_third_party_merge);
1421: arp_standard.debug(' p_mapping_flag :'||p_mapping_flag);
1422: arp_standard.debug(' p_execution_mode :'||p_execution_mode);
1423: arp_standard.debug(' p_accounting_mode :'||p_accounting_mode);
1424: arp_standard.debug(' p_transfer_to_gl_flag :'||p_transfer_to_gl_flag);
1425: arp_standard.debug(' p_post_in_gl_flag :'||p_post_in_gl_flag);
1426: arp_standard.debug(' p_third_party_type :'||p_third_party_type);
1427:
1428: -- No need to create a merge event in creation mode
1421: arp_standard.debug(' p_mapping_flag :'||p_mapping_flag);
1422: arp_standard.debug(' p_execution_mode :'||p_execution_mode);
1423: arp_standard.debug(' p_accounting_mode :'||p_accounting_mode);
1424: arp_standard.debug(' p_transfer_to_gl_flag :'||p_transfer_to_gl_flag);
1425: arp_standard.debug(' p_post_in_gl_flag :'||p_post_in_gl_flag);
1426: arp_standard.debug(' p_third_party_type :'||p_third_party_type);
1427:
1428: -- No need to create a merge event in creation mode
1429: IF p_create_update = 'C' THEN
1422: arp_standard.debug(' p_execution_mode :'||p_execution_mode);
1423: arp_standard.debug(' p_accounting_mode :'||p_accounting_mode);
1424: arp_standard.debug(' p_transfer_to_gl_flag :'||p_transfer_to_gl_flag);
1425: arp_standard.debug(' p_post_in_gl_flag :'||p_post_in_gl_flag);
1426: arp_standard.debug(' p_third_party_type :'||p_third_party_type);
1427:
1428: -- No need to create a merge event in creation mode
1429: IF p_create_update = 'C' THEN
1430: arp_standard.debug('Creation mode');
1426: arp_standard.debug(' p_third_party_type :'||p_third_party_type);
1427:
1428: -- No need to create a merge event in creation mode
1429: IF p_create_update = 'C' THEN
1430: arp_standard.debug('Creation mode');
1431: RAISE creation_mode;
1432: END IF;
1433:
1434: -- This is when the receipt has been created a unidentified
1432: END IF;
1433:
1434: -- This is when the receipt has been created a unidentified
1435: IF p_original_third_party_id IS NULL THEN
1436: arp_standard.debug('No original account');
1437: RAISE no_existing_account;
1438: END IF;
1439:
1440: -- This is when user null out the customer on the receipt
1500: END IF;
1501:
1502: END IF;
1503:
1504: arp_standard.debug('update_cr_dist -');
1505:
1506: EXCEPTION
1507:
1508: WHEN creation_mode THEN
1505:
1506: EXCEPTION
1507:
1508: WHEN creation_mode THEN
1509: arp_standard.debug('EXCEPTION creation_mode : CREATION MODE');
1510: x_errbuf := 'CREATION MODE';
1511: x_retcode := 'S';
1512: arp_standard.debug('update_cr_dist -');
1513:
1508: WHEN creation_mode THEN
1509: arp_standard.debug('EXCEPTION creation_mode : CREATION MODE');
1510: x_errbuf := 'CREATION MODE';
1511: x_retcode := 'S';
1512: arp_standard.debug('update_cr_dist -');
1513:
1514: WHEN no_existing_account THEN
1515: arp_standard.debug('EXCEPTION no_existing_account : NO ORIGINAL CUSTOMER');
1516: x_errbuf := 'NO ORIGINAL CUSTOMER';
1511: x_retcode := 'S';
1512: arp_standard.debug('update_cr_dist -');
1513:
1514: WHEN no_existing_account THEN
1515: arp_standard.debug('EXCEPTION no_existing_account : NO ORIGINAL CUSTOMER');
1516: x_errbuf := 'NO ORIGINAL CUSTOMER';
1517: x_retcode := 'S';
1518: arp_standard.debug('update_cr_dist -');
1519:
1514: WHEN no_existing_account THEN
1515: arp_standard.debug('EXCEPTION no_existing_account : NO ORIGINAL CUSTOMER');
1516: x_errbuf := 'NO ORIGINAL CUSTOMER';
1517: x_retcode := 'S';
1518: arp_standard.debug('update_cr_dist -');
1519:
1520: WHEN OTHERS THEN
1521: arp_standard.debug('EXCEPTION OTHERS :'||SQLERRM);
1522: x_errbuf := 'SQLERRM';
1517: x_retcode := 'S';
1518: arp_standard.debug('update_cr_dist -');
1519:
1520: WHEN OTHERS THEN
1521: arp_standard.debug('EXCEPTION OTHERS :'||SQLERRM);
1522: x_errbuf := 'SQLERRM';
1523: x_retcode := 'U';
1524:
1525: END;
1551: AND glp.closing_status IN ('O','F'));
1552:
1553: l_date DATE;
1554: BEGIN
1555: arp_standard.debug('check_period_open +');
1556: x_return_status := FND_API.g_ret_sts_success;
1557:
1558: OPEN c_verif_date(p_entity_id);
1559: FETCH c_verif_date INTO l_date;
1558: OPEN c_verif_date(p_entity_id);
1559: FETCH c_verif_date INTO l_date;
1560: IF c_verif_date%FOUND THEN
1561: x_return_status := FND_API.g_ret_sts_error;
1562: arp_standard.debug(' event_date :' || l_date);
1563: FND_MESSAGE.SET_NAME('AR','AR_NOT_OPEN_PERIOD_EXISTS');
1564: FND_MSG_PUB.ADD; --BUG#5386043
1565: END IF;
1566: CLOSE c_verif_date;
1567:
1568: IF x_return_status <> FND_API.g_ret_sts_success THEN
1569: RAISE fnd_api.G_EXC_ERROR;
1570: END IF;
1571: arp_standard.debug('check_period_open -');
1572: EXCEPTION
1573: WHEN fnd_api.G_EXC_ERROR THEN
1574: arp_standard.debug('EXCEPTION G_EXC_ERROR');
1575: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1570: END IF;
1571: arp_standard.debug('check_period_open -');
1572: EXCEPTION
1573: WHEN fnd_api.G_EXC_ERROR THEN
1574: arp_standard.debug('EXCEPTION G_EXC_ERROR');
1575: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1576: p_count => x_msg_count,
1577: p_data => x_msg_data);
1578: WHEN OTHERS THEN
1575: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1576: p_count => x_msg_count,
1577: p_data => x_msg_data);
1578: WHEN OTHERS THEN
1579: arp_standard.debug('EXCEPTION OTHERS:'|| SQLERRM);
1580: x_return_status := FND_API.g_ret_sts_error;
1581: x_msg_data := SQLERRM;
1582: x_msg_count := 1;
1583: END;