PHP BerhasilSimpan函数代码示例

function PredDel()
{
    $PredikatID = $_REQUEST['PredikatID'];
    $s = "delete from predikat where PredikatID = '{$PredikatID}' ";
    $r = _query($s);
    BerhasilSimpan("?mnux={$_SESSION['mnux']}&mk=pred&sub=", 100);
}

function AkademikSav()
{
    // Cek Kelengkapan
    $_syarat = array();
    $_syarat = $_REQUEST['PMBSyaratID'];
    $syarat = empty($_syarat) ? '' : '.' . implode('.', $_syarat) . '.';
    // Cek Kelengkapan
    $mhsw = GetFields('mhsw', 'MhswID', $_REQUEST['mhswid'], 'StatusAwalID, ProdiID, Syarat, SyaratLengkap');
    $s = "select PMBSyaratID, Nama\r\n    from pmbsyarat\r\n    where NA='N' and KodeID='{$_SESSION['KodeID']}'\r\n      and INSTR(StatusAwalID, '.{$mhsw['StatusAwalID']}.') >0\r\n      and INSTR(ProdiID, '.{$mhsw['ProdiID']}.') >0\r\n    order by PMBSyaratID";
    $r = _query($s);
    $lkp = True;
    if (!empty($_syarat)) {
        while ($w = _fetch_array($r)) {
            if (array_search($w['PMBSyaratID'], $_syarat) === false) {
                $lkp = false;
            }
        }
    } else {
        $lkp = false;
    }
    $Lengkap = $lkp == true ? 'Y' : 'N';
    // Simpan
    $TahunID = sqling($_REQUEST['TahunID']);
    $s = "update mhsw \r\n    set PenasehatAkademik='{$_REQUEST['PenasehatAkademik']}', ProgramID='{$_REQUEST['ProgramID']}',\r\n        TahunID = '{$TahunID}',\r\n        StatusAwalID='{$_REQUEST['StatusAwalID']}', StatusMhswID='{$_REQUEST['StatusMhswID']}',\r\n        Syarat='{$syarat}', SyaratLengkap='{$Lengkap}', BatasStudi='{$_REQUEST['BatasStudi']}'\r\n    where MhswID='{$_REQUEST['mhswid']}' ";
    $r = _query($s);
    BerhasilSimpan("?mnux={$_SESSION['mnux']}&submodul={$_SESSION['submodul']}", 10);
}

function KurSav()
{
    $md = $_REQUEST['md'] + 0;
    $KurikulumID = $_REQUEST['KurikulumID'];
    $KurikulumKode = $_REQUEST['KurikulumKode'];
    $Nama = sqling($_REQUEST['Nama']);
    $Sesi = sqling($_REQUEST['Sesi']);
    $JmlSesi = $_REQUEST['JmlSesi'] + 0;
    $NA = empty($_REQUEST['NA']) ? 'N' : $_REQUEST['NA'];
    // simpan
    if ($md == 0) {
        $s = "update kurikulum set KurikulumKode='{$KurikulumKode}',\r\n      Nama='{$Nama}', Sesi='{$Sesi}', JmlSesi='{$JmlSesi}', NA='{$NA}', TglEdit=now(), LoginEdit='{$_SESSION['_Login']}'\r\n      where KurikulumID='{$_REQUEST['KurikulumID']}' ";
        $r = _query($s);
        // update jika jadi aktif
    } else {
        $s = "insert into kurikulum (KurikulumKode, KodeID, ProdiID, Nama, Sesi, JmlSesi, NA, TglBuat, LoginBuat)\r\n      values('{$KurikulumKode}', '{$_REQUEST['KodeID']}', '{$_SESSION['prodi']}', '{$Nama}', '{$Sesi}', '{$JmlSesi}', '{$NA}', now(), '{$_SESSION['_Login']}')";
        $r = _query($s);
        $KurikulumID = GetLastID();
    }
    // Non aktifkan yg lain
    /* ~~~ 03/11/2008 --> supaya bisa banyak kurikulum aktif
      if ($NA == 'N') {
        $s1 = "update kurikulum set NA='Y'
          where ProdiID='$_SESSION[prodi]' and KurikulumID<>$KurikulumID";
        $r1 = _query($s1);
      }
      */
    BerhasilSimpan("?mnux={$_SESSION['mnux']}", 100);
}

function KampSav()
{
    $md = $_REQUEST['md'] + 0;
    $KampusID = $_REQUEST['KampusID'];
    $Nama = sqling($_REQUEST['Nama']);
    $Alamat = sqling($_REQUEST['Alamat']);
    $Kota = sqling($_REQUEST['Kota']);
    $Telepon = sqling($_REQUEST['Telepon']);
    $Fax = sqling($_REQUEST['Fax']);
    $NA = empty($_REQUEST['NA']) ? 'N' : $_REQUEST['NA'];
    // simpan
    if ($md == 0) {
        $s = "update kampus set Nama='{$Nama}', KodeID='" . KodeID . "',\r\n      Alamat='{$Alamat}', Kota='{$Kota}', Telepon='{$Telepon}', Fax='{$Fax}', NA='{$NA}'\r\n      where KampusID='{$KampusID}' ";
        $r = _query($s);
    } else {
        $ada = GetFields('kampus', 'KampusID', $KampusID, '*');
        if (!empty($ada)) {
            echo ErrorMsg("Gagal Simpan", "Kampus dengan kode: <b>{$KampusID}</b> telah ada dengan nama <b>{$ada['Nama']}</b>.<br>\r\n      Gunakan kode kampus lain.");
        } else {
            $s = "insert into kampus (KampusID, Nama, KodeID,\r\n        Alamat, Kota, Telepon, Fax, NA)\r\n        values ('{$KampusID}', '{$Nama}', '" . KodeID . "',\r\n        '{$Alamat}', '{$Kota}', '{$Telepon}', '{$Fax}', '{$NA}')";
            $r = _query($s);
        }
    }
    BerhasilSimpan("?mnux={$_SESSION['mnux']}", 100);
}

function SimpanPwd($_MhswID)
{
    $_MhswID = sqling($_REQUEST['_MhswID']);
    $PWD1 = sqling($_REQUEST['PWD1']);
    $PWD2 = sqling($_REQUEST['PWD2']);
    $s = "update mhsw \r\n    set `Password`=LEFT(PASSWORD('{$PWD1}'), 10) \r\n    where KodeID = '" . KodeID . "'\r\n      and MhswID = '{$_MhswID}' ";
    $r = _query($s);
    BerhasilSimpan("?mnux={$_SESSION['mnux']}&gos=&_MhswID={$_MhswID}", 1000);
}

function BankSav()
{
    $Autodebet = empty($_REQUEST['Autodebet']) ? 'N' : $_REQUEST['Autodebet'];
    $NamaBank = sqling($_REQUEST['NamaBank']);
    $NomerRekening = sqling($_REQUEST['NomerRekening']);
    $s = "update mhsw set Autodebet='{$Autodebet}',\r\n    NamaBank='{$NamaBank}', NomerRekening='{$NomerRekening}'\r\n    where MhswID='{$_REQUEST['mhswid']}' ";
    $r = _query($s);
    BerhasilSimpan("?mnux={$_SESSION['mnux']}&submodul={$_SESSION['submodul']}", 10);
}

function SimpanPwd($_DosenID)
{
    $_DosenID = sqling($_REQUEST['_DosenID']);
    $PWD1 = sqling($_REQUEST['PWD1']);
    $PWD2 = sqling($_REQUEST['PWD2']);
    $s = "update dosen\r\n    set `Password`=LEFT(PASSWORD('{$PWD1}'), 10),\r\n        LevelID = '100' \r\n    where KodeID = '" . KodeID . "'\r\n      and Login = '{$_DosenID}' ";
    $r = _query($s);
    //die("<pre>$s</pre>");
    BerhasilSimpan("?mnux={$_SESSION['mnux']}&gos=&_DosenID={$_DosenID}", 1);
}

function SekolahSav()
{
    $AsalSekolah = $_REQUEST['AsalSekolah'];
    $JurusanSekolah = $_REQUEST['JurusanSekolah'];
    $TahunLulus = $_REQUEST['TahunLulus'];
    $NilaiSekolah = $_REQUEST['NilaiSekolah'];
    $JenisSekolahID = GetaField('asalsekolah', 'SekolahID', $AsalSekolah, 'JenisSekolahID');
    // Simpan
    $s = "update mhsw set AsalSekolah='{$AsalSekolah}', JenisSekolahID='{$JenisSekolahID}',\r\n    JurusanSekolah='{$JurusanSekolah}',\r\n    TahunLulus='{$TahunLulus}', NilaiSekolah='{$NilaiSekolah}'\r\n    where MhswID='{$_REQUEST['mhswid']}' ";
    $r = _query($s);
    BerhasilSimpan("?mnux={$_SESSION['mnux']}&submodul={$_SESSION['submodul']}", 100);
}

function PTSav()
{
    $AsalPT = $_REQUEST['AsalPT'];
    $ProdiAsalPT = $_REQUEST['ProdiAsalPT'];
    // Edit: Ilham
    $LulusAsalPT = empty($_REQUEST['LulusAsalPT']) ? 'N' : $_REQUEST['LulusAsalPT'];
    $TglLulusAsalPT = "{$_REQUEST['TL_y']}-{$_REQUEST['TL_m']}-{$_REQUEST['TL_d']}";
    echo $TglLulusAsalPT;
    $IPKAsalPT = $_REQUEST['IPKAsalPT'];
    $s = "update mhsw set AsalPT='{$AsalPT}', ProdiAsalPT='{$ProdiAsalPT}', LulusAsalPT='{$LulusAsalPT}', \r\n    TglLulusAsalPT='{$TglLulusAsalPT}', IPKAsalPT='{$IPKAsalPT}'\r\n    where MhswID='{$_REQUEST['mhswid']}' ";
    $r = _query($s);
    BerhasilSimpan("?mnux={$_SESSION['mnux']}&submodul={$_SESSION['submodul']}", 100);
}

function AlamatSav()
{
    $AlamatAsal = sqling($_REQUEST['AlamatAsal']);
    $RTAsal = sqling($_REQUEST['RTAsal']);
    $RWAsal = sqling($_REQUEST['RWAsal']);
    $KotaAsal = sqling($_REQUEST['KotaAsal']);
    $KodePosAsal = sqling($_REQUEST['KodePosAsal']);
    $PropinsiAsal = sqling($_REQUEST['PropinsiAsal']);
    $NegaraAsal = sqling($_REQUEST['NegaraAsal']);
    $TeleponAsal = sqling($_REQUEST['TeleponAsal']);
    // Simpan
    $s = "update mhsw set AlamatAsal='{$AlamatAsal}',\r\n    RTAsal='{$RTAsal}', RWAsal='{$RWAsal}',\r\n    KotaAsal='{$KotaAsal}', KodePosAsal='{$KodePosAsal}',\r\n    PropinsiAsal='{$PropinsiAsal}', NegaraAsal='{$NegaraAsal}', TeleponAsal='{$TeleponAsal}'\r\n    where MhswID='{$_REQUEST['mhswid']}' ";
    $r = _query($s);
    BerhasilSimpan("?mnux={$_SESSION['mnux']}&submodul=almt&gos=", 100);
}

function KonsSav()
{
    $md = $_REQUEST['md'];
    $KonsentrasiKode = strtoupper(sqling($_REQUEST['KonsentrasiKode']));
    $Nama = sqling($_REQUEST['Nama']);
    $Keterangan = sqling($_REQUEST['Keterangan']);
    $NA = empty($_REQUEST['NA']) ? 'N' : $_REQUEST['NA'];
    if ($md == 0) {
        $s = "update konsentrasi set KonsentrasiKode='{$KonsentrasiKode}',\r\n      Nama='{$Nama}', Keterangan='{$Keterangan}', NA='{$NA}'\r\n      where KonsentrasiID='{$_REQUEST['KonsentrasiID']}' ";
    } else {
        $s = "insert into konsentrasi (KonsentrasiKode, KodeID, ProdiID, Nama, Keterangan, NA)\r\n      values('{$KonsentrasiKode}', '{$_REQUEST['KodeID']}', '{$_REQUEST['prodi']}',\r\n      '{$Nama}', '{$Keterangan}', '{$NA}')";
    }
    $r = _query($s);
    BerhasilSimpan("?mnux={$_SESSION['mnux']}&mk=Kons", 100);
}

function JenKurSav()
{
    $md = $_REQUEST['md'] + 0;
    $Singkatan = sqling($_REQUEST['Singkatan']);
    $Nama = sqling($_REQUEST['Nama']);
    $NA = empty($_REQUEST['NA']) ? 'N' : $_REQUEST['NA'];
    if ($md == 0) {
        $JenisKurikulumID = $_REQUEST['JenisKurikulumID'];
        $s = "update jeniskurikulum set Singkatan='{$Singkatan}', Nama='{$Nama}', NA='{$NA}'\r\n      where JenisKurikulumID='{$JenisKurikulumID}'";
        $r = _query($s);
    } else {
        $s = "insert into jeniskurikulum (ProdiID, KodeID, Singkatan, Nama, NA)\r\n      values ('{$_SESSION['prodi']}', '{$_SESSION['KodeID']}', '{$Singkatan}', '{$Nama}', '{$NA}')";
        $r = _query($s);
    }
    BerhasilSimpan("?mnux={$_SESSION['mnux']}&mk=JenKur", 100);
}

function HadirSKSSav()
{
    $md = $_REQUEST['md'] + 0;
    $HadirSKSID = $_REQUEST['HadirSKSID'] + 0;
    $DefKehadiran = $_REQUEST['DefKehadiran'] + 0;
    $DefMaxAbsen = $_REQUEST['DefMaxAbsen'] + 0;
    $SKS = $_REQUEST['SKS'] + 0;
    $ProdiID = $_REQUEST['prodi'];
    if ($md == 0) {
        $s = "update hadirsks \r\n      set DefKehadiran='{$DefKehadiran}', \r\n\t\t  DefMaxAbsen='{$DefMaxAbsen}', \r\n          SKS='{$SKS}',\r\n          LoginEdit = '{$_SESSION['_Login']}', TanggalEdit = now()\r\n      where HadirSKSID = {$HadirSKSID} ";
        $r = _query($s);
    } else {
        $s = "insert into hadirsks \r\n      (KodeID, ProdiID, DefKehadiran, DefMaxAbsen, SKS,\r\n      LoginBuat, TanggalBuat)\r\n      values \r\n      ('" . KodeID . "', '{$ProdiID}', '{$DefKehadiran}', '{$DefMaxAbsen}', '{$SKS}',\r\n      '{$_SESSION['_Login']}', now())";
        $r = _query($s);
    }
    BerhasilSimpan("?mnux={$_SESSION['mnux']}&mk=HadirSKS&sub=", 100);
}

function MaxSKSSav()
{
    $md = $_REQUEST['md'] + 0;
    $MaxSKSID = $_REQUEST['MaxSKSID'] + 0;
    $DariIP = $_REQUEST['DariIP'] + 0;
    $SampaiIP = $_REQUEST['SampaiIP'] + 0;
    $SKS = $_REQUEST['SKS'] + 0;
    $ProdiID = $_REQUEST['prodi'];
    if ($md == 0) {
        $s = "update maxsks \r\n      set DariIP='{$DariIP}', \r\n          SampaiIP='{$SampaiIP}', \r\n          SKS='{$SKS}',\r\n          LoginEdit = '{$_SESSION['_Login']}', TanggalEdit = now()\r\n      where MaxSKSID = {$MaxSKSID} ";
        $r = _query($s);
    } else {
        $s = "insert into maxsks \r\n      (KodeID, ProdiID, DariIP, SampaiIP, SKS,\r\n      LoginBuat, TanggalBuat)\r\n      values \r\n      ('" . KodeID . "', '{$ProdiID}', '{$DariIP}', '{$SampaiIP}', '{$SKS}',\r\n      '{$_SESSION['_Login']}', now())";
        $r = _query($s);
    }
    BerhasilSimpan("?mnux={$_SESSION['mnux']}&mk=MaxSKS&sub=", 100);
}

function JenSav()
{
    $md = $_REQUEST['md'] + 0;
    $Urutan = $_REQUEST['Urutan'] + 0;
    $JenisMKID = $_REQUEST['JenisMKID'];
    $Singkatan = $_REQUEST['Singkatan'];
    $Nama = sqling($_REQUEST['Nama']);
    $KodeID = $_REQUEST['KodeID'];
    $NA = empty($_REQUEST['NA']) ? 'N' : $_REQUEST['NA'];
    // Simpan
    if ($md == 0) {
        $s = "update jenismk set Urutan='{$Urutan}', Singkatan='{$Singkatan}', Nama='{$Nama}', ProdiID='{$_REQUEST['prodi']}', NA='{$NA}' where JenisMKID='{$JenisMKID}' ";
    } else {
        $s = "insert into jenismk (Urutan, Singkatan, Nama, KodeID, ProdiID, NA)\r\n      values('{$Urutan}', '{$Singkatan}', '{$Nama}', '{$KodeID}', '{$_REQUEST['prodi']}', '{$NA}')";
    }
    $r = _query($s);
    BerhasilSimpan("?mnux={$_SESSION['mnux']}&mk=Jen", 100);
}