Selisih Keuangan DI306

--Check DI306 yang lebih dari 1 untuk berkas yang sama
SELECT berkasid
FROM dibook
WHERE dikode = 'DI306'
AND ditanggal >= TO_DATE ('26/04/2007', 'dd/MM/yyyy')
AND ditanggal < TO_DATE ('26/04/2007', 'dd/MM/yyyy') + 1
GROUP BY berkasid
HAVING COUNT (*) > 1;
--Untuk melihat nomor DI306 untuk berkas yang sama yang lebih dari 1
select * from dibook where berkasid = '1a524acafa654590aaf808629b0f275a'
and dikode='DI306';
--Ambil berkasprosedur untuk check berkasbiaya perberkas
SELECT * FROM BERKASPROSEDUR WHERE BERKASID ='17285ee9b5b1434796e45e2c362fdaf7';

SELECT * FROM BERKASBIAYA WHERE BERKASPROSEDURID = '6da9beefcc0247f989dd12c50e5983a7';

--Bila memang ada DI306 untuk berkas yang sama lebih dari 1 tetapi hanya mempunya 1 berkasprosedur dan 1 berkasbiaya maka :

--Update dibook set ditanggal = null, digroup = ‘U’ where identseq = :ambil identseq dibook yang salah (yang double)
--Catatan :
--dibook yang double atau salah tidak dihapus karena untuk history data
--digroup di set = ‘U’ untuk tanda bahwa dibook tersebut telah di update
--ditanggal di set menjadi null karena untuk laporan di selalu mengambil tanggal yang tidak null