--EBS SLA凭证借贷方不一致修复
--1、查询处理异常的单据
SELECT xte.transaction_number,
xe.*
FROM xla.xla_events xe,
xla.xla_transaction_entities xte
WHERE xe.application_id = 222
AND xe.entity_id = xte.entity_id
AND xe.event_status_code = 'U'
AND xe.process_status_code <> 'P'
AND xe.event_id = 47297157
AND xte.transaction_number = '电汇手续费'
AND xe.event_date = DATE '2025-02-28';
--2、修复产生的SLA凭证行的本位币借贷方金额,按照原币的借贷方向与汇率相乘,更新到本位币字段上
SELECT ll.entered_dr, --原币借方
ll.entered_cr, --原币贷方
ll.accounted_dr, --本位币借方
ll.accounted_cr, --本位币贷方
ll.*
FROM xla.xla_ae_lines ll
WHERE ll.ae_header_id IN (29836457, 29836456)
FOR UPDATE;
--3、将SLA的事件状态修复event_status_code,处理状态process_status_code为P
SELECT xe.process_status_code, --更新为P D-草稿,E-错误,I-无效,P-已处理,R-关联事件错误,U-未处理,F-最终
xe.event_status_code,--更新为P I-未完成,N-无动作,P-已处理
xe.*
FROM xla.xla_events xe
WHERE xe.event_id = 47297157
FOR UPDATE;
--4、将SLA头表的创建会计分录标识刷为最终F,分录传总帐标识刷为N
SELECT ah.ae_header_id,
ah.accounting_entry_status_code, --创建会计分录标识刷为F。(N:不能;F:最终)
ah.gl_transfer_status_code,--分录传GL标识刷为N:(Y:已传;N:未传)
ah.*
FROM xla.xla_ae_headers ah
WHERE ah.event_id = 47297157
FOR UPDATE;
--5、更新AR核销表的 posting_control_id 值为非-3
SELECT rappl.event_id,
rappl.posting_control_id,
rappl.attribute10,
rappl.postable
FROM ar_receivable_applications_all rappl
WHERE rappl.event_id = 47297157
FOR UPDATE;
--6、在业务模块提交【将日记帐分录传送至 GL】请求进行传总帐
--7、提交【子分类帐期间关闭例外报表】报表检查是否还有影响关账的异常数据
--8、关闭期间的时候,提示异常信息【APP-AR-11332 您必须在关闭此期之前过账其中的所有事务处理】
--执行如下SQL检查是否存在异常信息
SELECT ' ' "Unposted Items in AR"
FROM dual
WHERE EXISTS
(SELECT 'Y'
FROM AR_ADJUSTMENTS_ALL
WHERE posting_control_id = -3
AND gl_date BETWEEN to_date('2025-02-01', 'YYYY-MM-DD') AND to_date('2025-02-28', 'YYYY-MM-DD')
AND NVL(postable, 'Y') = 'Y'
AND NVL(org_id, -99) = 401
AND rownum < 2
UNION
SELECT 'Y'
FROM AR_RECEIVABLE_APPLICATIONS_ALL RA
WHERE ra.posting_control_id = -3
AND ra.application_type = 'CM'
AND ra.gl_date BETWEEN to_date('2025-02-01', 'YYYY-MM-DD') AND to_date('2025-02-28', 'YYYY-MM-DD')
AND NVL(ra.postable, 'Y') = 'Y'
AND NVL(ra.org_id, -99) = 401
AND rownum < 2
UNION
SELECT 'Y'
FROM AR_CASH_RECEIPT_HISTORY_ALL a
WHERE a.posting_control_id = -3
AND a.gl_date BETWEEN to_date('2025-02-01', 'YYYY-MM-DD') AND to_date('2025-02-28', 'YYYY-MM-DD')
AND a.postable_flag = 'Y'
AND NVL(a.org_id, -99) = 401
AND rownum < 2
UNION
SELECT 'Y'
FROM RA_CUST_TRX_LINE_GL_DIST_ALL a, RA_CUSTOMER_TRX_ALL b
WHERE a.posting_control_id = -3
AND a.gl_date BETWEEN to_date('2025-02-01', 'YYYY-MM-DD') AND to_date('2025-02-28', 'YYYY-MM-DD')
AND b.complete_flag = 'Y'
AND a.account_set_flag = 'N'
AND b.customer_trx_id = a.customer_trx_id
AND NVL(a.org_id, -99) = 401
AND rownum < 2
UNION
SELECT 'Y'
FROM ar_misc_cash_distributions_all mcd
WHERE mcd.posting_control_id = -3
AND mcd.gl_date BETWEEN to_date('2025-02-01', 'YYYY-MM-DD') AND to_date('2025-02-28', 'YYYY-MM-DD')
AND mcd.org_id = 401
AND rownum < 2
UNION
SELECT 'Y'
FROM AR_RECEIVABLE_APPLICATIONS_ALL RA
WHERE ra.posting_control_id = -3
AND ra.application_type = 'CASH'
AND ra.gl_date BETWEEN to_date('2025-02-01', 'YYYY-MM-DD') AND to_date('2025-02-28', 'YYYY-MM-DD')
AND NVL(ra.postable, 'Y') = 'Y'
AND NVL(ra.org_id, -99) = 401
AND rownum < 2
UNION
SELECT 'Y'
FROM AR_TRANSACTION_HISTORY_ALL a, RA_CUSTOMER_TRX_ALL b
WHERE a.posting_control_id = -3
AND a.gl_date BETWEEN to_date('2025-02-01', 'YYYY-MM-DD') AND to_date('2025-02-28', 'YYYY-MM-DD')
AND a.postable_flag = 'Y'
AND b.customer_trx_id = a.customer_trx_id
AND NVL(a.org_id, -99) = 401
AND rownum < 2)
AND rownum < 2 ;