Exemple #1
0
function TanggalSet($tanggal)
{
    $ambiltgl = Tanggal($tanggal);
    $date = explode("-", $ambiltgl);
    $tgl = $date[2];
    $bln = $date[1];
    $thn = $date[0];
    $bhsactive = BHS_ON;
    $result = $ambiltgl;
    if ($bhsactive == "en") {
        if ($date[1] == "01") {
            $bln = "Jan";
        }
        if ($date[1] == "02") {
            $bln = "Feb";
        }
        if ($date[1] == "03") {
            $bln = "Mar";
        }
        if ($date[1] == "04") {
            $bln = "Apr";
        }
        if ($date[1] == "05") {
            $bln = "May";
        }
        if ($date[1] == "06") {
            $bln = "Jun";
        }
        if ($date[1] == "07") {
            $bln = "Jul";
        }
        if ($date[1] == "08") {
            $bln = "Aug";
        }
        if ($date[1] == "09") {
            $bln = "Sep";
        }
        if ($date[1] == "10") {
            $bln = "Oct";
        }
        if ($date[1] == "11") {
            $bln = "Nov";
        }
        if ($date[1] == "12") {
            $bln = "Dec";
        }
        $result = "{$bln}/{$tgl}/{$thn}";
    }
    if ($bhsactive == "id") {
        if ($date[1] == "01") {
            $bln = "Jan";
        }
        if ($date[1] == "02") {
            $bln = "Feb";
        }
        if ($date[1] == "03") {
            $bln = "Mar";
        }
        if ($date[1] == "04") {
            $bln = "Apr";
        }
        if ($date[1] == "05") {
            $bln = "Mei";
        }
        if ($date[1] == "06") {
            $bln = "Jun";
        }
        if ($date[1] == "07") {
            $bln = "Jul";
        }
        if ($date[1] == "08") {
            $bln = "Agt";
        }
        if ($date[1] == "09") {
            $bln = "Sep";
        }
        if ($date[1] == "10") {
            $bln = "Okt";
        }
        if ($date[1] == "11") {
            $bln = "Nov";
        }
        if ($date[1] == "12") {
            $bln = "Des";
        }
        $result = "{$tgl}/{$bln}/{$thn}";
    }
    return $result;
}
Exemple #2
0
function Isinya($TahunID, $ProdiID, $ProgramID, $p)
{
    global $WarnaKuliah, $WarnaKRS, $WarnaBayar, $WarnaUTS, $WarnaUAS, $WarnaCuti, $WarnaNilai;
    $lbr = 190;
    $t = 5;
    $thn = GetFields('tahun', "TahunID='{$TahunID}' and ProdiID='{$ProdiID}' and ProgramID='{$ProgramID}' and KodeID", KodeID, '*');
    $kolom1 = 60;
    $kolomkosong = 10;
    $kolomperpanjangan = 20;
    $kolom2 = 50;
    $jeda = 4;
    $indent = 'L';
    $p->Ln($jeda);
    $p->SetFont('Helvetica', 'BI', 10);
    $p->Cell($kolom1, $t, 'Awal Semester', 'BT', 0, $indent);
    $p->Cell($kolomperpanjangan, $t, '', 'BT', 1, $indent);
    $p->SetFont('Helvetica', 'B', 10);
    $p->SetFillColor($WarnaKRS[0], $WarnaKRS[1], $WarnaKRS[2]);
    $p->Cell($t, $t, '', 1, 0, '', true);
    $p->Cell($kolom1, $t, 'Tanggal Pengambilan KRS :', 0, 1, $indent);
    $p->SetFont('Helvetica', '', 10);
    $p->Cell($kolomkosong, $t, '', 0, 0, $indent);
    $p->Cell($kolom2, $t, Tanggal($thn['TglKRSMulai']) . ' ~ ' . Tanggal($thn['TglKRSSelesai']), 0, 1, $indent);
    $p->Ln($jeda);
    $p->SetFont('Helvetica', 'B', 10);
    $p->SetFillColor($WarnaBayar[0], $WarnaBayar[1], $WarnaBayar[2]);
    $p->Cell($t, $t, '', 1, 0, '', true);
    $p->Cell($kolom1, $t, 'Tanggal Pembayaran Kuliah:', 0, 1, $indent);
    $p->SetFont('Helvetica', '', 10);
    $p->Cell($kolomkosong, $t, '', 0, 0, $indent);
    $p->Cell($kolom2, $t, Tanggal($thn['TglBayarMulai']) . ' ~ ' . Tanggal($thn['TglBayarSelesai']), 0, 1, $indent);
    $p->Ln($jeda);
    $p->Ln(2 * $jeda);
    $p->SetFont('Helvetica', 'BI', 10);
    $p->Cell($kolom1, $t, 'Perkuliahan', 'BT', 0, $indent);
    $p->Cell($kolomperpanjangan, $t, '', 'BT', 1, $indent);
    $p->SetFont('Helvetica', 'B', 10);
    $p->SetFillColor($WarnaKuliah[0], $WarnaKuliah[1], $WarnaKuliah[2]);
    $p->Cell($t, $t, '', 1, 0, '', true);
    $p->Cell($kolom1, $t, 'Tanggal Perkuliahan Berjalan :', 0, 1, $indent);
    $p->SetFont('Helvetica', '', 10);
    $p->Cell($kolomkosong, $t, '', 0, 0, $indent);
    $p->Cell($kolom2, $t, Tanggal($thn['TglKuliahMulai']) . ' ~ ' . Tanggal($thn['TglKuliahSelesai']), 0, 1, $indent);
    $p->Ln($jeda);
    $p->SetFont('Helvetica', 'B', 10);
    $p->SetFillColor($WarnaUTS[0], $WarnaUTS[1], $WarnaUTS[2]);
    $p->Cell($t, $t, '', 1, 0, '', true);
    $p->Cell($kolom1, $t, 'Tanggal Ujian Tengah Semester:', 0, 1, $indent);
    $p->SetFont('Helvetica', '', 10);
    $p->Cell($kolomkosong, $t, '', 0, 0, $indent);
    $p->Cell($kolom2, $t, Tanggal($thn['TglUTSMulai']) . ' ~ ' . Tanggal($thn['TglUTSSelesai']), 0, 1, $indent);
    $p->Ln($jeda);
    $p->SetFont('Helvetica', 'B', 10);
    $p->SetFillColor($WarnaUAS[0], $WarnaUAS[1], $WarnaUAS[2]);
    $p->Cell($t, $t, '', 1, 0, '', true);
    $p->Cell($kolom1, $t, 'Tanggal Ujian Akhir Semester :', 0, 1, $indent);
    $p->SetFont('Helvetica', '', 10);
    $p->Cell($kolomkosong, $t, '', 0, 0, $indent);
    $p->Cell($kolom2, $t, Tanggal($thn['TglUASMulai']) . ' ~ ' . Tanggal($thn['TglUASSelesai']), 0, 1, $indent);
    $p->Ln($jeda);
    $p->Ln(2 * $jeda);
    $p->SetFont('Helvetica', 'BI', 10);
    $p->Cell($kolom1, $t, 'Akhir Semester', 'BT', 0, $indent);
    $p->Cell($kolomperpanjangan, $t, '', 'BT', 1, $indent);
    $p->SetFont('Helvetica', 'B', 10);
    $p->SetFillColor($WarnaNilai[0], $WarnaNilai[1], $WarnaNilai[2]);
    $p->Cell($t, $t, '', 1, 0, '', true);
    $p->Cell($kolom1, $t, 'Tanggal Finalisasi Penilaian:', 0, 1, $indent);
    $p->SetFont('Helvetica', '', 10);
    $p->Cell($kolomkosong, $t, '', 0, 0, $indent);
    $p->Cell($kolom2, $t, Tanggal($thn['TglNilai']), 0, 1, $indent);
    $p->Ln($jeda);
    $p->SetFont('Helvetica', 'B', 10);
    $p->SetFillColor($WarnaCuti[0], $WarnaCuti[1], $WarnaCuti[2]);
    $p->Cell($t, $t, '', 1, 0, '', true);
    $p->Cell($kolom1, $t, 'Tanggal Batas Pengajuan Cuti:', 0, 1, $indent);
    $p->SetFont('Helvetica', '', 10);
    $p->Cell($kolomkosong, $t, '', 0, 0, $indent);
    $p->Cell($kolom2, $t, Tanggal($thn['TglCuti']), 0, 1, $indent);
    $p->Ln($jeda);
}