}
function GetArrGelombang($thn)
{
    $s = "select PMBPeriodID\r\n    from pmb\r\n    where PMBPeriodID like '{$thn}%'\r\n    group by PMBPeriodID";
    $r = _query($s);
    $a = array();
    while ($w = _fetch_array($r)) {
        $a[] = $w['PMBPeriodID'];
        //echo $w['PMBPeriodID'] . "<br>";
    }
    return $a;
}
function GetArrStatus()
{
    $s = "select StatusAwalID\r\n        from statusawal\r\n        where StatusAwalID in ('B', 'P', 'S') order by StatusAwalID";
    $r = _query($s);
    $a = array();
    while ($w = _fetch_array($r)) {
        $a[] = $w['StatusAwalID'];
    }
    return $a;
}
// *** Parameters ***
$tahun = substr(GetSetVar('tahun'), 0, 4);
$_SESSION['tahun'] = $tahun;
// *** Main ***
TampilkanJudul("Rekap Pembayaran Mahasiswa");
TampilkanTahun('keu.lap.rekapbarubayar', 'Daftar', 'keu.lap');
if (!empty($tahun)) {
    Daftar();
}
}
function GetArrGelombang($thn)
{
    $s = "select PMBPeriodID\r\n    from pmb\r\n    where PMBPeriodID like '{$thn}%'\r\n    group by PMBPeriodID";
    $r = _query($s);
    $a = array();
    while ($w = _fetch_array($r)) {
        $a[] = $w['PMBPeriodID'];
        //echo $w['PMBPeriodID'] . "<br>";
    }
    return $a;
}
function GetArrStatus()
{
    $s = "select StatusAwalID\r\n        from statusawal\r\n        where StatusAwalID in ('B', 'P', 'S') order by StatusAwalID";
    $r = _query($s);
    $a = array();
    while ($w = _fetch_array($r)) {
        $a[] = $w['StatusAwalID'];
    }
    return $a;
}
// *** Parameters ***
$tahun = substr(GetSetVar('tahun'), 0, 4);
$_SESSION['tahun'] = $tahun;
// *** Main ***
TampilkanJudul("Rekap Jumlah Calon Mahasiswa");
TampilkanTahun('keu.lap.rekapcama', 'Daftar', 'keu.lap');
if (!empty($tahun)) {
    Daftar();
}