include "../lib/sipl.php";
CheckAuthentication();
$kdunit = $_SESSION[kdunit];
$sktunit = strtolower(sktunitkerja($kdunit, $ta));
$ta = $_SESSION[ta];
$filedata = '../DataDipa/' . $sktunit . '/d_item.dbf';
if (file_exists($filedata)) {
echo 'file ' . $filedata . ' ada';
$data = dbase_open($filedata, 2);
dbase_pack($data);
$jml = dbase_numrecords($data);
$vdataawal = dbase_get_record_with_names($data, 1);
$tahun = $vdataawal["THANG"];
$kodesatker = $vdataawal["KDSATKER"];
//dbase_pack($data);
$kdsatkerunit = kdsatker($kdunit);
echo 'tahun anggaran ' . $tahun . ' satker data ' . $kodesatker;
echo 'kode unit ' . $kdunit . ' satker unit ' . $kdsatkerunit;
if ($_REQUEST['ok']) {
mysql_query("delete from d_item where ThAng='{$ta}' and kdsatker='{$kdsatkerunit}' ");
$i = 0;
$no == 0;
while ($i <= $jml) {
$vdata = dbase_get_record_with_names($data, $i);
$thang = $vdata["THANG"];
$kdsatker = $vdata["KDSATKER"];
$jumlah = $vdata['JUMLAH'];
if ($kdsatker == $kdsatkerunit and $thang == $ta) {
echo 'kode satker sesuia';
$no == $no + 1;
mysql_query("insert into d_item(ThAng,kdsatker,jumlah)\r\n values('{$ta}','{$kdsatker}','{$jumlah}')");
$kdunit_dipa = odbc_result($vdata, kdunit);
$kdprogram = odbc_result($vdata, kdprogram);
$kdgiat = odbc_result($vdata, kdgiat);
$kdoutput = odbc_result($vdata, kdoutput);
$kdsoutput = odbc_result($vdata, kdsoutput);
$kdkmpnen = odbc_result($vdata, kdkmpnen);
$kdskmpnen = odbc_result($vdata, kdskmpnen);
$kdmak = odbc_result($vdata, kdakun);
if ($thang == $ta and $kdsatker == $kdsatkerunit) {
mysql_query("insert into d_akun(THANG,KDSATKER,KDDEPT,KDUNIT,KDPROGRAM,KDGIAT,KDOUTPUT,KDSOUTPUT,KDKMPNEN,KDSKMPNEN,KDAKUN)\r\n values('{$ta}','{$kdsatker}','{$kddept}','{$kdunit_dipa}','{$kdprogram}','{$kdgiat}','{$kdoutput}','{$kdsoutput}','{$kdkmpnen}','{$kdskmpnen}','{$kdmak}')");
}
$i++;
}
#1
odbc_close_all();
$kdsatker = kdsatker($kdunit);
//---- otomatis input dtpagu_dipa
mysql_query("delete from dtpagu_dipa where TA='{$ta}' and KdSatker='{$kdsatkerunit}'");
$data_mak = mysql_query("select * from d_akun where THANG='{$ta}' and KDSATKER='{$kdsatkerunit}'");
while ($vdata_mak = mysql_fetch_array($data_mak)) {
#2
$kdsatker = $vdata_mak['KDSATKER'];
$kdunitkerja = kdunitkerja($kdsatker);
$kddept = $vdata_mak['KDDEPT'];
$kdunit_dipa = $vdata_mak['KDUNIT'];
$kdprogram = $vdata_mak['KDPROGRAM'];
$kdgiat = $vdata_mak['KDGIAT'];
$kdoutput = $vdata_mak['KDOUTPUT'];
$kdsoutput = $vdata_mak['KDSOUTPUT'];
$kdkmpnen = $vdata_mak['KDKMPNEN'];
$kdskmpnen = $vdata_mak['KDSKMPNEN'];
