function create_index_dashboard($p_modul, $p_table, $p_column, $p_view, $p_id)
{
$folder = str_replace("sam2_", "", $p_table);
$a = "\$";
$b = '"';
//print_r($folder);exit;
if ($p_view == "text") {
$isi_index = "<?\n\t" . $a . "p_id = '{$p_id}';\n\t" . $a . "p_column[0] = '" . $p_column[0] . "';\n\t" . $a . "p_column[1] = '" . $p_column[1] . "';\n\t" . $a . "folder = '{$folder}';\n\t" . $a . "p_modul = '{$p_modul}';\n\t" . $a . "sql = " . $b . "select * from " . $p_table . " order by (post_date or modify_date) desc limit 4" . $b . ";\n\t{$dbu->query}(" . $a . "sql," . $a . "rs['data']," . $a . "nr['data']);\t\n\t" . $a . "thumbnail = {$dbu->lookup}(" . $b . "thumbnail" . $b . "," . $b . "dashboard" . $b . "," . $b . "table_name = '" . $p_table . "'" . $b . ");\n\tinclude 'template_text.php';\n\t?>";
} elseif ($p_view == "image") {
$isi_index = "<?\n\t" . $a . "p_id = '{$p_id}';\n\t" . $a . "p_column[0] = '" . $p_column[1] . "';\n\t" . $a . "p_column[1] = '" . $p_column[0] . "';\n\t" . $a . "folder = '{$folder}';\n\t" . $a . "p_modul = '{$p_modul}';\n\t" . $a . "sql = " . $b . "select * from " . $p_table . " order by (post_date or modify_date) desc limit 4" . $b . ";\n\t{$dbu->query}(" . $a . "sql," . $a . "rs['gallery']," . $a . "nr['gallery']);\t\n\t" . $a . "thumbnail = {$dbu->lookup}(" . $b . "thumbnail" . $b . "," . $b . "dashboard" . $b . "," . $b . "table_name = '" . $p_table . "'" . $b . ");\n\tinclude 'template_image.php';\n\t?>";
} elseif ($p_view == "grid") {
$isi_index = "<?\n\t" . $a . "p_id = '{$p_id}';\n\t" . $a . "title = '" . $p_column[0] . "';\n\t" . $a . "post_date = '" . $p_column[1] . "';\n\t" . $a . "modif = '" . $p_column[2] . "';\n\t" . $a . "folder = '{$folder}';\n\t" . $a . "p_modul = '{$p_modul}';\n\t" . $a . "sql = " . $b . "select * from " . $p_table . " order by post_date desc , modify_date desc limit 4" . $b . ";\n\t{$dbu->query}(" . $a . "sql," . $a . "rs['data']," . $a . "nr['data']);\t\n\t" . $a . "thumbnail = {$dbu->lookup}(" . $b . "thumbnail" . $b . "," . $b . "dashboard" . $b . "," . $b . "table_name = '" . $p_table . "'" . $b . ");\n\tinclude 'template_grid.php';\n\t?>";
} elseif ($p_view == "chart") {
$isi_index = "<?\n\t" . $a . "axis = " . $b . "" . $b . ";\n\t" . $a . "data = " . $b . "" . $b . ";\n\t" . $a . "p_id = '{$p_id}';\n\t" . $a . "folder = '{$folder}';\n\t" . $a . "p_modul = '{$p_modul}';\n\t" . $a . "tot = {$dbu->lookup}('sum(hit)', '{$folder}', 0, 0);\n\t" . $a . "where = 'and 1=1';\n\t" . $a . "field='sum(hit)';\n\t" . $a . "rs['data'] = {$dbu->get_recordset}('{$folder}'," . $b . "published = 'active'" . $b . ");\n\twhile(" . $a . "chart = {$dbu->fetch}(" . $a . "rs['data'])):\n\t\t" . $a . "axis .= " . $b . "'" . $b . "." . $a . "chart['" . $p_column[0] . "']." . $b . "', " . $b . ";\n\t\t" . $a . "x['counter']= ({$dbu->lookup}(" . $b . "" . $a . "field" . $b . ", '{$folder}', " . $b . $p_column[0] . "='" . $b . "." . $a . "chart['" . $p_column[0] . "']." . $b . "' " . $a . "where" . $b . "));\n\t\tif(" . $a . "x['counter']==NULL){" . $a . "x['counter']=0;}\n\t\t" . $a . "data .=sprintf(" . $b . "%.2f" . $b . ", " . $a . "x['counter']/" . $a . "tot * 100)." . $b . "," . $b . ";\n\tendwhile;\t\n\t" . $a . "thumbnail = {$dbu->lookup}(" . $b . "thumbnail" . $b . "," . $b . "dashboard" . $b . "," . $b . "table_name = '" . $p_table . "'" . $b . ");\n\tinclude 'template_chart.php';\n\t?>";
}
$filename = "../{$app['pwebmin']}/modul/{$p_view}/index_" . $folder . ".php";
admlib::create_file($filename, $isi_index);
}
