Penjelasan
fungsi ini berguna membuat kontrol biasa dengan penggunaan kontrol standar dan mengikuti kaidah penamaan kontrol standar atau mengikuti ketentuan pattern yang pasti. Pattern atau pola standar ini akan mempermudah membuat prosedur penyimpanan global yang berlaku untuk semua tabel.
field type: int, integer, var char, dan lain-lain.
ctrlname: nama atau id control.
dbaction: ubah, baru,simpanbaru, browse dan lain-lain sebagai lowercase.
valinit: nilai yang ditampilkan seagai standar.
Kode Skrip PHP
function create_normal_control($fieldtype,$ctrlname,$dbaction,$valinit="", $memowidth=50){
$addval = '';
if(!($valinit=='')){
$addval = 'value = "'.$valinit.'"';
switch($fieldtype){
case "tinyblob": $addval = $valinit;break;
case "blob": $addval = $valinit;break;
case "mediumblob": $addval = $valinit;break;
case "longblob": $addval = $valinit;break;
case "tinytext": $addval = $valinit;break;
case "text": $addval = $valinit;break;
case "mediumtext": $addval = $valinit;break;
case "longtext": $addval = $valinit;break;
}
}else{
switch($fieldtype){
case "date": if(($dbaction=='baru')or($dbaction=='simpanbaru')or($dbaction=='ubah'))$addval = 'value = "'.date('Y-m-d').'"'; break;
case "time": if(($dbaction=='baru')or($dbaction=='simpanbaru')or($dbaction=='ubah'))$addval = 'value = "'.date('H:i:s').'"'; break;
case "datetime": if(($dbaction=='baru')or($dbaction=='simpanbaru')or($dbaction=='ubah'))$addval = 'value = "'.date('Y-m-d H:i:s').'"'; break;
case "tinyint":
case "bigint":
case "int": if(($dbaction=='baru')or($dbaction=='simpanbaru')or($dbaction=='ubah'))$addval = 'value = "0"'; break;
}
}
$res = '';
switch($fieldtype){
case "tinyint" : $res .= '
'; break;
case "smallint" : $res .= '
'; break;
case "mediumint": $res .= '
'; break;
case "int" : $res .= '
'; break;
case "integer" : $res .= '
'; break;
case "bigint" : $res .= '
'; break;
case "real" : $res .= '
'; break;
case "double" : $res .= '
'; break;
case "float" : $res .= '
'; break;
case "decimal" : $res .= '
'; break;
case "numeric" : $res .= '
'; break;
case "date" : $res .= '
'; break;
case "time" : $res .= '
'; break;
case "timestamp": $res .= '
'; break;
case "datetime" : $res .= '
'; break;
case "year" : $res .= '
'; break;
case "char" : $res .= '
'; break;
case "varchar" : $res .= '
'; break;
case "tinyblob" : $res .= ''.$addval.''; break;
case "mediumblob": $res .= ''.$addval.''; break;
case "blob" : $res .= ''.$addval.''; break;
case "longblob" : $res .= ''.$addval.''; break;
case "tinytext" : $res .= ''.$addval.''; break;
case "text" : $res .= ''.$addval.''; break;
case "mediumtext": $res .= ''.$addval.''; break;
case "longtext" : $res .= ''.$addval.''; break;
case "set" : $res .= '
'; break;
}
return $res;
}







































