727: ,p_retcode OUT NOCOPY INTEGER
728: ,p_msg_mode IN VARCHAR2 DEFAULT xla_exceptions_pkg.C_STANDARD_MESSAGE)
729: IS
730:
731: l_event_source_info xla_events_pub_pkg.t_event_source_info;
732: l_entity_id INTEGER;
733: l_closing_status VARCHAR2(30);
734: l_status_code VARCHAR2(30) := C_AE_STATUS_INCOMPLETE;
735: l_result2 INTEGER := 0;
778: l_event_source_info.legal_entity_id := p_legal_entity_id;
779: l_event_source_info.ledger_id := p_ledger_id;
780: l_event_source_info.entity_type_code := C_ENTITY_TYPE_CODE_MANUAL;
781:
782: p_event_id := xla_events_pkg.create_manual_event
783: (p_event_source_info => l_event_source_info
784: ,p_event_type_code => C_EVENT_TYPE_CODE_MANUAL
785: ,p_event_date => p_gl_date
786: ,p_event_status_code => xla_events_pub_pkg.C_EVENT_UNPROCESSED
782: p_event_id := xla_events_pkg.create_manual_event
783: (p_event_source_info => l_event_source_info
784: ,p_event_type_code => C_EVENT_TYPE_CODE_MANUAL
785: ,p_event_date => p_gl_date
786: ,p_event_status_code => xla_events_pub_pkg.C_EVENT_UNPROCESSED
787: ,p_process_status_code => xla_events_pkg.C_INTERNAL_UNPROCESSED
788: ,p_event_number => 1
789: ,p_budgetary_control_flag => p_budgetary_control_flag
790: );
783: (p_event_source_info => l_event_source_info
784: ,p_event_type_code => C_EVENT_TYPE_CODE_MANUAL
785: ,p_event_date => p_gl_date
786: ,p_event_status_code => xla_events_pub_pkg.C_EVENT_UNPROCESSED
787: ,p_process_status_code => xla_events_pkg.C_INTERNAL_UNPROCESSED
788: ,p_event_number => 1
789: ,p_budgetary_control_flag => p_budgetary_control_flag
790: );
791:
790: );
791:
792: SELECT entity_id
793: INTO l_entity_id
794: FROM xla_events
795: WHERE event_id = p_event_id;
796:
797: --
798: -- Retrieve period name
980: l_period_type VARCHAR2(30);
981:
982: l_budget_version_id INTEGER;
983:
984: l_event_source_info xla_events_pub_pkg.t_event_source_info;
985:
986: l_log_module VARCHAR2(240);
987: l_sla_manual NUMBER; -- Bug 11743330/10132068
988: BEGIN
1051: AND entity_id = l_info.entity_id;
1052: END IF;
1053:
1054: --
1055: -- Update xla_events if gl date is updated
1056: --
1057: IF (l_info.gl_date <> p_gl_date) THEN
1058: UPDATE xla_events
1059: SET event_date = p_gl_date
1054: --
1055: -- Update xla_events if gl date is updated
1056: --
1057: IF (l_info.gl_date <> p_gl_date) THEN
1058: UPDATE xla_events
1059: SET event_date = p_gl_date
1060: WHERE application_id = p_application_id
1061: AND event_id = l_info.event_id;
1062:
1153: ,p_application_id IN INTEGER
1154: ,p_mode IN VARCHAR2 DEFAULT C_DELETE_NORMAL_MODE
1155: ,p_msg_mode IN VARCHAR2 DEFAULT xla_exceptions_pkg.C_STANDARD_MESSAGE)
1156: IS
1157: l_event_source_info xla_events_pub_pkg.t_event_source_info;
1158: l_info t_je_info;
1159: l_log_module VARCHAR2(240);
1160: BEGIN
1161: IF g_log_enabled THEN
1181: l_event_source_info.ledger_id := l_info.ledger_id;
1182: l_event_source_info.entity_type_code := C_ENTITY_TYPE_CODE_MANUAL;
1183:
1184: IF (l_info.status_code = C_AE_STATUS_FINAL) THEN
1185: XLA_EVENTS_PKG.delete_processed_event
1186: (p_event_source_info => l_event_source_info
1187: ,p_event_id => l_info.event_id);
1188: ELSE
1189: XLA_EVENTS_PKG.delete_event
1185: XLA_EVENTS_PKG.delete_processed_event
1186: (p_event_source_info => l_event_source_info
1187: ,p_event_id => l_info.event_id);
1188: ELSE
1189: XLA_EVENTS_PKG.delete_event
1190: (p_event_source_info => l_event_source_info
1191: ,p_valuation_method => NULL
1192: ,p_event_id => l_info.event_id);
1193: END IF;
1498: WHERE application_id = p_application_id
1499: AND ae_header_id = p_ae_header_id;
1500:
1501: l_rounding_rule_code VARCHAR2(30);
1502: l_event_source_info xla_events_pub_pkg.t_event_source_info;
1503: l_log_module VARCHAR2(240);
1504:
1505: CURSOR cur_enc IS -- 5522973
1506: SELECT enabled_flag, encumbrance_type
1882: l_result2 INTEGER;
1883: l_date DATE;
1884: l_rounding_rule_code VARCHAR2(30);
1885:
1886: l_event_source_info xla_events_pub_pkg.t_event_source_info;
1887: l_ref_ae_header_id INTEGER;
1888: l_temp_line_num INTEGER;
1889: l_dummy INTEGER;
1890: l_log_module VARCHAR2(240);
2131: l_info t_je_info;
2132: l_bal_seg INTEGER;
2133: l_mgt_seg INTEGER;
2134: l_status_code VARCHAR2(30) := C_AE_STATUS_INCOMPLETE;
2135: l_event_source_info xla_events_pub_pkg.t_event_source_info;
2136:
2137: l_log_module VARCHAR2(240);
2138: BEGIN
2139: IF g_log_enabled THEN
2785: IF g_rev_event_id IS NOT NULL THEN
2786:
2787: SELECT event_status_code
2788: INTO l_status_code
2789: FROM xla_events
2790: WHERE event_id = g_rev_event_id
2791: AND application_id = p_application_id;
2792:
2793: IF l_status_code <>'P' THEN
3240: ,xah.attribute13
3241: ,xah.attribute14
3242: ,xah.attribute15
3243: FROM xla_ae_headers xah
3244: ,xla_events xe
3245: ,xla_transaction_entities xte
3246: WHERE xte.entity_id = xah.entity_id
3247: AND xte.application_id = xah.application_id
3248: AND xe.event_id = xah.event_id
3964: --=============================================================================
3965: PROCEDURE undo_draft_entry
3966: (p_info IN t_je_info)
3967: IS
3968: l_event_source_info xla_events_pub_pkg.t_event_source_info;
3969: l_log_module VARCHAR2(240);
3970: BEGIN
3971: IF g_log_enabled THEN
3972: l_log_module := C_DEFAULT_MODULE||'.undo_draft_entry';
4041: l_event_source_info.legal_entity_id := p_info.legal_entity_id;
4042: l_event_source_info.ledger_id := p_info.ledger_id;
4043: l_event_source_info.entity_type_code := C_ENTITY_TYPE_CODE_MANUAL;
4044:
4045: xla_events_pkg.update_manual_event
4046: (p_event_source_info => l_event_source_info
4047: ,p_event_id => p_info.event_id
4048: ,p_event_status_code => xla_events_pub_pkg.C_EVENT_UNPROCESSED
4049: ,p_process_status_code => xla_events_pkg.C_INTERNAL_UNPROCESSED);
4044:
4045: xla_events_pkg.update_manual_event
4046: (p_event_source_info => l_event_source_info
4047: ,p_event_id => p_info.event_id
4048: ,p_event_status_code => xla_events_pub_pkg.C_EVENT_UNPROCESSED
4049: ,p_process_status_code => xla_events_pkg.C_INTERNAL_UNPROCESSED);
4050: END IF;
4051:
4052: IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
4045: xla_events_pkg.update_manual_event
4046: (p_event_source_info => l_event_source_info
4047: ,p_event_id => p_info.event_id
4048: ,p_event_status_code => xla_events_pub_pkg.C_EVENT_UNPROCESSED
4049: ,p_process_status_code => xla_events_pkg.C_INTERNAL_UNPROCESSED);
4050: END IF;
4051:
4052: IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
4053: trace(p_msg => 'END of procedure undo_draft_entry',
4144: ,p_ledger_ids IN OUT NOCOPY xla_je_validation_pkg.t_array_int
4145: ,p_rev_ae_header_ids IN OUT NOCOPY xla_je_validation_pkg.t_array_int
4146: ,p_rev_status_codes IN OUT NOCOPY xla_je_validation_pkg.t_array_varchar)
4147: IS
4148: l_event_source_info xla_events_pub_pkg.t_event_source_info;
4149: l_entity_id INTEGER;
4150: l_period_name VARCHAR2(30);
4151: l_closing_status VARCHAR2(30);
4152: l_validate_period INTEGER;
4524: ,p_msg_mode IN VARCHAR2
4525: ,p_rev_header_id OUT NOCOPY INTEGER
4526: ,p_rev_event_id OUT NOCOPY INTEGER)
4527: IS
4528: l_event_source_info xla_events_pub_pkg.t_event_source_info;
4529: l_entity_id INTEGER;
4530: l_period_name VARCHAR2(30);
4531: l_closing_status VARCHAR2(30);
4532: l_validate_period INTEGER;
4576: - Checking that g_rev_event_id is not NULL to create event */
4577:
4578: IF g_rev_event_id IS NULL THEN
4579:
4580: p_rev_event_id := xla_events_pkg.create_manual_event
4581: (p_event_source_info => l_event_source_info
4582: ,p_event_type_code => C_EVENT_TYPE_CODE_MANUAL
4583: ,p_event_date => p_gl_date
4584: ,p_event_status_code => xla_events_pub_pkg.C_EVENT_UNPROCESSED
4580: p_rev_event_id := xla_events_pkg.create_manual_event
4581: (p_event_source_info => l_event_source_info
4582: ,p_event_type_code => C_EVENT_TYPE_CODE_MANUAL
4583: ,p_event_date => p_gl_date
4584: ,p_event_status_code => xla_events_pub_pkg.C_EVENT_UNPROCESSED
4585: ,p_process_status_code => xla_events_pkg.C_INTERNAL_UNPROCESSED
4586: ,p_event_number => 1
4587: ,p_budgetary_control_flag => p_info.budgetary_control_flag
4588: );
4581: (p_event_source_info => l_event_source_info
4582: ,p_event_type_code => C_EVENT_TYPE_CODE_MANUAL
4583: ,p_event_date => p_gl_date
4584: ,p_event_status_code => xla_events_pub_pkg.C_EVENT_UNPROCESSED
4585: ,p_process_status_code => xla_events_pkg.C_INTERNAL_UNPROCESSED
4586: ,p_event_number => 1
4587: ,p_budgetary_control_flag => p_info.budgetary_control_flag
4588: );
4589: g_rev_event_id := p_rev_event_id;
4589: g_rev_event_id := p_rev_event_id;
4590:
4591: SELECT entity_id
4592: INTO g_entity_id
4593: FROM xla_events
4594: WHERE event_id = p_rev_event_id;
4595:
4596: l_entity_id := g_entity_id;
4597:
6185: IS
6186: l_accounting_batch_id INTEGER;
6187: l_transfer_errbuf VARCHAR2(30);
6188: l_transfer_retcode NUMBER;
6189: l_event_source_info xla_events_pub_pkg.t_event_source_info;
6190:
6191: l_log_module VARCHAR2(240);
6192: BEGIN
6193: IF g_log_enabled THEN
6264: PROCEDURE update_event_status
6265: (p_info IN t_je_info
6266: ,p_completion_option IN VARCHAR2)
6267: IS
6268: l_event_source_info xla_events_pub_pkg.t_event_source_info;
6269: l_event_status VARCHAR2(30);
6270: l_process_status VARCHAR2(30);
6271:
6272: l_log_module VARCHAR2(240);
6289: l_event_source_info.ledger_id := p_info.ledger_id;
6290: l_event_source_info.entity_type_code := C_ENTITY_TYPE_CODE_MANUAL;
6291:
6292: IF (p_completion_option = C_COMPLETION_OPTION_DRAFT) THEN
6293: l_event_status := xla_events_pub_pkg.C_EVENT_UNPROCESSED;
6294: l_process_status := xla_events_pkg.C_INTERNAL_DRAFT;
6295: ELSE
6296: l_event_status := xla_events_pub_pkg.C_EVENT_PROCESSED;
6297: l_process_status := xla_events_pkg.C_INTERNAL_FINAL;
6290: l_event_source_info.entity_type_code := C_ENTITY_TYPE_CODE_MANUAL;
6291:
6292: IF (p_completion_option = C_COMPLETION_OPTION_DRAFT) THEN
6293: l_event_status := xla_events_pub_pkg.C_EVENT_UNPROCESSED;
6294: l_process_status := xla_events_pkg.C_INTERNAL_DRAFT;
6295: ELSE
6296: l_event_status := xla_events_pub_pkg.C_EVENT_PROCESSED;
6297: l_process_status := xla_events_pkg.C_INTERNAL_FINAL;
6298: END IF;
6292: IF (p_completion_option = C_COMPLETION_OPTION_DRAFT) THEN
6293: l_event_status := xla_events_pub_pkg.C_EVENT_UNPROCESSED;
6294: l_process_status := xla_events_pkg.C_INTERNAL_DRAFT;
6295: ELSE
6296: l_event_status := xla_events_pub_pkg.C_EVENT_PROCESSED;
6297: l_process_status := xla_events_pkg.C_INTERNAL_FINAL;
6298: END IF;
6299:
6300: xla_events_pkg.update_manual_event
6293: l_event_status := xla_events_pub_pkg.C_EVENT_UNPROCESSED;
6294: l_process_status := xla_events_pkg.C_INTERNAL_DRAFT;
6295: ELSE
6296: l_event_status := xla_events_pub_pkg.C_EVENT_PROCESSED;
6297: l_process_status := xla_events_pkg.C_INTERNAL_FINAL;
6298: END IF;
6299:
6300: xla_events_pkg.update_manual_event
6301: (p_event_source_info => l_event_source_info
6296: l_event_status := xla_events_pub_pkg.C_EVENT_PROCESSED;
6297: l_process_status := xla_events_pkg.C_INTERNAL_FINAL;
6298: END IF;
6299:
6300: xla_events_pkg.update_manual_event
6301: (p_event_source_info => l_event_source_info
6302: ,p_event_id => p_info.event_id
6303: ,p_event_status_code => l_event_status
6304: ,p_process_status_code => l_process_status);