Example #1
0
        fwrite($f, str_pad($n . '.', 8) . str_pad($w['BayarMhswID'], 15) . str_pad($tgl, 12) . str_pad($ID, 13) . str_pad($NAMA, 35) . str_pad($w['JML'], 15, ' ', STR_PAD_LEFT) . str_pad($w['JMLLAIN'], 15, ' ', STR_PAD_LEFT) . " " . $w['Keterangan'] . $_lf);
    }
    $_tot = number_format($tot);
    $_totlain = number_format($totlain);
    fwrite($f, $grs);
    fwrite($f, str_pad("Total : ", 60, ' ', STR_PAD_LEFT) . str_pad($_tot, 38, ' ', STR_PAD_LEFT) . str_pad($_totlain, 15, ' ', STR_PAD_LEFT) . $_lf);
    fwrite($f, $grs . str_pad("Dicetak oleh: {$_SESSION['_Login']}, {$_tgl}", $mxc / 2) . str_pad("Hal: {$hal}", $mxc / 2, ' ', STR_PAD_LEFT) . $_lf);
    fwrite($f, chr(12));
    fclose($f);
    TampilkanFileDWOPRN($nmf, 'keu.lap');
}
// *** Parameters ***
$prodi = GetSetVar('prodi');
$DariTgl_m = GetSetVar('DariTgl_m', date('m'));
$DariTgl_d = GetSetVar('DariTgl_d', date('d'));
$DariTgl_y = GetSetVar('DariTgl_y', date('Y'));
$DariTgl = "{$DariTgl_y}-{$DariTgl_m}-{$DariTgl_d}";
$_SESSION['DariTgl'] = $DariTgl;
$SampaiTgl_d = GetSetVar('SampaiTgl_d', date('d'));
$SampaiTgl_m = GetSetVar('SampaiTgl_m', date('m'));
$SampaiTgl_y = GetSetVar('SampaiTgl_y', date('Y'));
$SampaiTgl = "{$SampaiTgl_y}-{$SampaiTgl_m}-{$SampaiTgl_d}";
$_SESSION['SampaiTgl'] = $SampaiTgl;
$gos = $_REQUEST['gos'];
// *** Main ***
TampilkanJudul("Daftar Pembayaran Mahasiswa (BPM)");
TampilkanRentangTanggal('keu.lap.bpm', 'Tampilkan', 'keu.lap');
TampilkanFilterProdi();
if (!empty($gos)) {
    $gos();
}
        $Jumlah = number_format($w['Jumlah']);
        $Dipakai = number_format($w['Dipakai']);
        $Sisa = number_format($w['Sisa']);
        $Tutup = $w['Sisa'] == 0 ? chr(215) : '';
        fwrite($f, str_pad($n, 5) . str_pad($TGL, 12) . str_pad($w['MhswID'], 15) . str_pad($w['Nama'], 30) . str_pad($Jumlah, 15, ' ', STR_PAD_LEFT) . str_pad($Dipakai, 15, ' ', STR_PAD_LEFT) . str_pad($Sisa, 15, ' ', STR_PAD_LEFT) . str_pad($Tutup, 4, ' ', STR_PAD_LEFT) . $_lf);
    }
    $__Jumlah = number_format($_Jumlah);
    $__Dipakai = number_format($_Dipakai);
    $__Sisa = number_format($_Sisa);
    fwrite($f, $grs);
    fwrite($f, str_pad("Jumlah : ", 62, ' ', STR_PAD_LEFT) . str_pad($__Jumlah, 15, ' ', STR_PAD_LEFT) . str_pad($__Dipakai, 15, ' ', STR_PAD_LEFT) . str_pad($__Sisa, 15, ' ', STR_PAD_LEFT) . $_lf);
    fclose($f);
    TampilkanFileDWOPRN($nmf, 'klinik.lap');
}
// *** Parameters ***
// Dari tanggal
$DTGL_y = GetSetVar('DTGL_y', date('Y'));
$DTGL_m = GetSetVar('DTGL_m', date('m'));
$DTGL_d = GetSetVar('DTGL_d', 1);
$DTGL = "{$DTGL_y}-{$DTGL_m}-{$DTGL_d}";
$_SESSION['DTGL'] = $DTGL;
// Sampai tanggal
$STGL_y = GetSetVar('STGL_y', date('Y'));
$STGL_m = GetSetVar('STGL_m', date('m'));
$STGL_d = GetSetVar('STGL_d', 30);
$STGL = "{$STGL_y}-{$STGL_m}-{$STGL_d}";
$_SESSION['STGL'] = $STGL;
// *** Main ***
TampilkanJudul("Daftar Deposit Mahasiswa");
TampilkanRentangTanggal('klinik.lap.deposit');
TampilkanDeposit();