예제 #1
0
function manageArticles()
{
    global $tbl_1d_article, $tbl_1d_pictures;
    global $SUBS, $PARAM, $MSG, $MONTHS, $MONTHS2;
    global $articleString, $articlePage, $articleCount, $articleWhere;
    //from session
    if ($PARAM['Delete'] == '1') {
        reset($PARAM);
        $Ar = '0';
        while (list($k, $v) = each($PARAM)) {
            if (ereg('^article_([0-9]+)$', $k, $R)) {
                $Ar .= ",{$R['1']}";
            }
        }
        if ($Ar == '0') {
            $SUBS['ERROR'] = $MSG[20008];
            $SUBS['ERROR'] = fileParse('_admin_error.htmlt');
        } else {
            //iztrij kartinki;
            $query = "SELECT\t{$tbl_1d_pictures}.ID,\n\t\t\t\t\t{$tbl_1d_pictures}.URL,\n\t\t\t\t\t{$tbl_1d_pictures}.RefType,\n\t\t\t\t\t\n\t\t\t\t\ta1.ID AS thumbID,\n\t\t\t\t\ta1.URL AS thumbURL\n\n\t\t\t\tFROM {$tbl_1d_article}\n\t\t\t\tLEFT JOIN {$tbl_1d_pictures}\n\t\t\t\t\tON (\t{$tbl_1d_pictures}.RefID = {$tbl_1d_article}.ID\n\t\t\t\t\t\tAND {$tbl_1d_pictures}.RefType = 'article'\n\t\t\t\t\t\t)\n\t\t\t\tLEFT JOIN {$tbl_1d_pictures} a1\n\t\t\t\t\tON a1.RefType = 'thumb'\n\t\t\t\t\t\tAND a1.RefID = {$tbl_1d_pictures}.ID\n\t\t\t\tWHERE {$tbl_1d_article}.ID IN ({$Ar})";
            $result = runQuery($query, 'manageArticles()', 'GET_PISTURES');
            $Pics = '0';
            while ($row = db_fetch_row($result)) {
                //del pic
                if (!@unlink(getAdmSetting('UPLOAD_DIR') . $row[1])) {
                    setLogAndStatus("Erasing", getAdmSetting('UPLOAD_DIR') . $row[1], 0, "manageArticles()", 'DEL_ARTICLES_PICS');
                }
                $Pics .= ",0{$row['0']}";
                //del thumb
                if (!@unlink(getAdmSetting('UPLOAD_DIR') . $row[4])) {
                    setLogAndStatus("Erasing", getAdmSetting('UPLOAD_DIR') . $row[4], 0, "manageArticles()", 'DEL_THUMB_PICS');
                }
                $Pics .= ",0{$row['3']}";
            }
            //iztriwane na kartinkite ot db
            $query = "DELETE FROM {$tbl_1d_pictures}\n\t\t\t\tWHERE ID IN ({$Pics}) ";
            $result = runQuery($query, 'manageArticles()', 'ERASE_PISTURES');
            //iztriwane na samiyat film
            $query = "DELETE FROM {$tbl_1d_article}\n\t\t\t\tWHERE ID IN ({$Ar}) ";
            $result = runQuery($query, 'manageArticles()', 'ERASE_ARTICLES');
            $SUBS['COMMAND'] = $PARAM['cmd'] . "&err=20093";
            printPage('_admin_done.htmlt');
            return;
        }
    }
    if ($PARAM['Add'] == 1) {
        //nowo zaglavie
        $PARAM['WHEN'] = 1 + strToTime($PARAM['Day1'] . ' ' . $MONTHS2[$PARAM['Month1']] . ' ' . $PARAM['Year1']);
        $query = "UPDATE {$tbl_1d_article} SET\n\t\t\t\tPriority = " . intval($PARAM['NO']) . ",\n\t\t\t\ttsWhen = " . dbQuote($PARAM['WHEN']) . ",\n\t\t\t\ttsLast = " . time() . "\n\t\t\t\tWHERE ID = " . dbQuote($PARAM['id']);
        $result = runQuery($query, 'manageArticles()', 'SAVE_WHEN_ARTICLE');
        $SUBS['COMMAND'] = $PARAM['cmd'] . "&err=20092&offs=" . $PARAM['offs'];
        printPage('_admin_done.htmlt');
        return;
    }
    //SESSION
    if (!session_is_registered('articleString')) {
        session_register('articleString');
    }
    if (!session_is_registered('articlePage')) {
        session_register('articlePage');
        $articlePage = getAdmSetting('RESULT_PER_PAGE');
    }
    if (!$articlePage) {
        $articlePage = getAdmSetting('RESULT_PER_PAGE');
    }
    //set perpage
    if ($PARAM['SearchPage'] && $PARAM['SearchPage'] > 0) {
        $articlePage = $PARAM['SearchPage'];
    }
    if (!session_is_registered('articleCount')) {
        session_register('articleCount');
    }
    if (!session_is_registered('articleWhere')) {
        session_register('articleWhere');
        $articleWhere = '1';
    }
    if ($PARAM['Show'] == 1) {
        $articleString = $PARAM['string'];
        $articleWhere = '1';
        $string = dbQuote("%{$articleString}%");
        $articleWhere .= " AND (({$tbl_1d_article}.Title LIKE {$string}) OR ({$tbl_1d_article}.Caption LIKE {$string})) ";
    }
    //prepare sort
    switch ($PARAM['sort']) {
        case 1:
            $articleSort = ' ASC ';
            $SUBS['SORT'] = 0;
            break;
        case 0:
            $articleSort = ' DESC ';
            $SUBS['SORT'] = 1;
            break;
        default:
            $articleSort = ' DESC ';
            $SUBS['SORT'] = 0;
    }
    //prepare order
    if (!$PARAM['orderby']) {
        $PARAM['orderby'] = '2';
    }
    switch ($PARAM['orderby']) {
        case 1:
            $articleOrder = "{$tbl_1d_article}.Title";
            break;
        case 2:
            $articleOrder = "{$tbl_1d_article}.tsWhen {$articleSort}, {$tbl_1d_article}.Priority ";
            $articleSort = ' ASC ';
            break;
        case 3:
            $articleOrder = "{$tbl_1d_article}.tsLast";
            break;
        default:
            $articleOrder = "{$tbl_1d_article}.ID";
            //case 0
    }
    //pokaji statii
    $articleSelect = "SELECT\t{$tbl_1d_article}.ID,\n\t\t\t{$tbl_1d_article}.Title,\n\t\t\t{$tbl_1d_article}.tsWhen,\n\t\t\t{$tbl_1d_article}.tsLast,\n\t\t\t{$tbl_1d_article}.Priority";
    $articleFrom = "FROM {$tbl_1d_article}";
    //get search count
    if (!$articleCount || $PARAM['Show'] == 1) {
        $query = "SELECT COUNT({$tbl_1d_article}.ID) {$articleFrom} WHERE {$articleWhere}";
        $result = runQuery($query, 'manageArticles()', 'GET_ARTIFLES_COUNT');
        if ($row = db_fetch_row($result)) {
            $articleCount = $row[0];
        } else {
            $articleCount = 0;
        }
    }
    if (!$PARAM['offs']) {
        $articleStart = 0;
    } else {
        $articleStart = $PARAM['offs'];
    }
    if ($PARAM['offs'] >= $articleCount) {
        $SUBS['ERROR'] = $MSG[20047];
        //out of search limits
        $SUBS['ERROR'] = fileParse('_admin_error.htmlt');
        $articleRows = 0;
        ////----[Mrasnika's] Edition 16.10.2002
        $no = 1;
    }
    //run query
    // if ($SUBS['ERROR'] == '')
    if ($no != 1) {
        $query = "{$articleSelect} {$articleFrom} WHERE {$articleWhere} {$articleGroupBy}\n\t\t\tORDER BY {$articleOrder} {$articleSort}\n\t\t\tLIMIT {$articleStart}, {$articlePage}";
        $result = runQuery($query, 'manageArticles()', 'DO_ARTICLES_SEARCH');
        $articleRows = db_num_rows($result);
    }
    if ($PARAM['Show'] == 1) {
        $SUBS['COMMAND'] = $PARAM['cmd'];
        printPage('_admin_done.htmlt');
        return;
    }
    $SUBS['SORTED'] = (1 + $SUBS['SORT']) % 2;
    $SUBS['ORDER'] = $PARAM['orderby'];
    $SUBS['PERPAGE'] = $articlePage;
    $SUBS['START'] = $articleStart;
    while ($row = db_fetch_row($result)) {
        $SUBS['CHECK'] = $row[0];
        $SUBS['ID2'] = sprintf('%04d', $row[0]);
        $SUBS['TITLE'] = htmlEncode($row[1]);
        $SUBS['KOGA'] = $row[2];
        $SUBS['SEDMICA'] = date('d ', $row[2]) . $MONTHS[intval(date('m', $row[2]))] . date(' Y', $row[2]);
        $SUBS['NOM'] = $row[4];
        $SUBS['LAST'] = $datata = date('d ', $row[3]) . $MONTHS[intval(date('m', $row[3]))] . date(' Y H:i:s', $row[3]);
        $SUBS['ARTICLES'] .= fileParse('_admin_manage_articles_row.htmlt');
        if ($PARAM['Add'] != 1 && $PARAM['id'] == $row[0]) {
            $PARAM['WHEN'] = $row[2];
            $PARAM['NO'] = $row[4];
            $SUBS['ARTICLE'] = $SUBS['TITLE'];
        }
    }
    //navigation
    $SUBS['TOTAL'] = $articleCount;
    $template = fileToString(getAdmSetting('TEMPLATES_DIR') . '/_admin_manage_article_navigation.htmlt');
    if ($articleRows != 0) {
        $SUBS['PAGE'] = 1 + $articleStart . ' - ' . ($articleStart + $articleRows);
    } else {
        $SUBS['PAGE'] = '0 - 0';
    }
    if ($articleStart != 0) {
        $SUBS['BUTTON'] = $MSG[20060];
        //first
        $SUBS['START'] = 0;
        $SUBS['FIRST'] = strParse($template);
    } else {
        $SUBS['FIRST'] = $MSG[20060];
    }
    if ($articleStart != 0) {
        $SUBS['BUTTON'] = $MSG[20063];
        //previous
        if (($SUBS['START'] = $articleStart - $articlePage) < 0) {
            $SUBS['START'] = 0;
        }
        $SUBS['PREV'] = strParse($template);
    } else {
        $SUBS['PREV'] = $MSG[20063];
    }
    if (($SUBS['START'] = $articleStart + $articlePage) < $articleCount) {
        $SUBS['BUTTON'] = $MSG[20062];
        //next
        $SUBS['NEXT'] = strParse($template);
    } else {
        $SUBS['NEXT'] = $MSG[20062];
    }
    if ($articleStart < ($SUBS['START'] = $articleCount - $articlePage)) {
        $SUBS['BUTTON'] = $MSG[20061];
        //last
        $SUBS['LAST'] = strParse($template);
    } else {
        $SUBS['LAST'] = $MSG[20061];
    }
    $SUBS['START'] = $articleStart;
    //nameri naj-starata statiya
    $query = "SELECT MIN(tsWhen) FROM {$tbl_1d_article}";
    $result = runQuery($query, 'manageArticles()', 'GET_OLDEST_WEEK');
    if ($row = db_fetch_row($result)) {
        $span = $row[0];
    }
    //compatibility
    if (!$PARAM['WHEN']) {
        //no date applied
        if (!$PARAM['Day1'] || !$PARAM['Month1'] || !$PARAM['Year1']) {
            $PARAM['WHEN'] = getNextWeek();
            $PARAM['Year1'] = date('Y', $PARAM['WHEN']);
            $PARAM['Month1'] = date('m', $PARAM['WHEN']);
            $PARAM['Day1'] = date('d', $PARAM['WHEN']);
        } else {
            $PARAM['WHEN'] = 1 + strToTime($PARAM['Day1'] . ' ' . $MONTHS2[$PARAM['Month1']] . ' ' . $PARAM['Year1']);
        }
    } else {
        //load date form
        $PARAM['Year1'] = date('Y', $PARAM['WHEN']);
        $PARAM['Month1'] = date('m', $PARAM['WHEN']);
        $PARAM['Day1'] = date('d', $PARAM['WHEN']);
    }
    if ($span > $PARAM['WHEN']) {
        //ima data, no e po-malka ot naj-starata programa
        $SUBS['COMMAND'] = $PARAM['cmd'] . "&WHERE=" . $PARAM['WHERE'] . "&WHEN={$span}&WEEK={$span}&PLACES=" . $PARAM['PLACES'];
        printPage('_admin_done.htmlt');
        return;
    }
    $Year2 = 1 + date('Y', max($PARAM['WHEN'], time()));
    $Year1 = date('Y', $span);
    for ($i = $Year1; $i <= $Year2; $i++) {
        if ($i == $PARAM['Year1']) {
            $SUBS['YEAR1'] .= "<OPTION value=\"{$i}\" selected>{$i}";
        } else {
            $SUBS['YEAR1'] .= "<OPTION value=\"{$i}\">{$i}";
        }
    }
    for ($i = 1; $i <= 12; $i++) {
        if ($i == $PARAM['Month1']) {
            $SUBS['MONTH1'] .= "<OPTION value=\"{$i}\" selected>" . $MONTHS[$i];
        } else {
            $SUBS['MONTH1'] .= "<OPTION value=\"{$i}\">" . $MONTHS[$i];
        }
    }
    for ($i = 1; $i <= 31; $i++) {
        if ($i == $PARAM['Day1']) {
            $SUBS['DAY1'] .= "<OPTION value=\"{$i}\" selected>" . sprintf('%02d', $i);
        } else {
            $SUBS['DAY1'] .= "<OPTION value=\"{$i}\">" . sprintf('%02d', $i);
        }
    }
    if (!($SUBS['WEEK'] = $PARAM['WEEK'])) {
        $SUBS['WEEK'] = $PARAM['WHEN'];
    }
    $SUBS['DISPLAYWEEK'] = displayWeek($SUBS['WEEK']);
    $SUBS['GO'] = $PARAM['WEEK'];
    $SUBS['ID'] = $PARAM['id'];
    $SUBS['NO'] = htmlEncode($PARAM['NO']);
    $SUBS['STRING'] = htmlEncode($articleString);
    if ($PARAM['err'] != '' && $SUBS['ERROR'] == '') {
        $SUBS['ERROR'] = $MSG[$PARAM['err']];
        $SUBS['ERROR'] = fileParse('_admin_error.htmlt');
    }
    printPage('_admin_manage_articles.htmlt');
}
예제 #2
0
while ($row = db_fetch_row($result)) {
    //statii ot parwa stranica
    if ($mark == 0) {
        $mark = $row[2];
    }
    if (week($row[2]) != week($mark)) {
        break;
    }
    $SUBS['ID'] = $row[0];
    $First .= ",{$row['0']}";
    $SUBS['TITLE'] = column($row[1]);
    $SUBS['FIRST1'] .= fileParse('_index_first_row.htmlt');
}
$SUBS['FIRST'] .= fileParse('_index_first.htmlt');
//statii
$query = "SELECT\t{$tbl_1d_article}.ID,\n\t\t\t{$tbl_1d_article}.Title,\n\t\t\t{$tbl_1d_article}.tsWhen\n\t\tFROM {$tbl_1d_article}\n\t\tWHERE {$tbl_1d_article}.tsWhen <= {$today}\n\t\t\tAND {$tbl_1d_article}.ID NOT IN ({$First})\n\n\t\tORDER BY\t({$tbl_1d_article}.tsWhen >= " . week() . ") DESC,\n\t\t\t{$tbl_1d_article}.tsWhen DESC,\n\t\t\t{$tbl_1d_article}.Priority\n\t\tLIMIT 0, " . getAdmSetting('PERMANENT_LIMIT');
$result = runQuery($query, 'index.php()', 'GET_STATII');
$SUBS['CMD'] = 'namm';
$mark = 0;
while ($row = db_fetch_row($result)) {
    //novini
    if ($mark == 0) {
        $mark = $row[2];
    }
    if (week($row[2]) != week($mark)) {
        continue;
    }
    $SUBS['ID'] = $row[0];
    $SUBS['TITLE'] = column($row[1]);
    $SUBS['AKTUALNO'] .= fileParse('_index_kino.htmlt');
}
예제 #3
0
function column($a)
{
    $res = wordwrap($a, getAdmSetting('COLUMN_LEN'), "\n   ");
    $res = htmlEncode($res);
    return ereg_replace("  ", " &nbsp;", nl2br($res));
}
예제 #4
0
function showCharts()
{
    global $SUBS, $PARAM, $MSG;
    global $tbl_1d_charts, $tbl_1d_videodvd_charts, $tbl_1d_kino_charts, $tbl_1d_films, $tbl_1d_pictures;
    ////----[Mrasnika's] Edition 26.10.2002
    // proweri tipa na klasaciyata
    $query = "SELECT Type\n\t\tFROM {$tbl_1d_charts}\n\t\tWHERE ID = " . dbQuote($PARAM['id']);
    $result = runQuery($query, 'showCharts()', 'GET_CHART_TYPE');
    if ($row = db_fetch_row($result)) {
        $type = $row[0];
    }
    switch ($type) {
        case 'videodvd':
            $query = "SELECT\t{$tbl_1d_charts}.ID,\n\t\t\t\t\t{$tbl_1d_charts}.Type,\n\t\t \t\t\t{$tbl_1d_charts}.Title AS a1,\n\n\t\t \t\t\t{$tbl_1d_videodvd_charts}.No,\n\t\t \t\t\t{$tbl_1d_videodvd_charts}.Type,\n\t\t \t\t\t{$tbl_1d_videodvd_charts}.Film,\n\n\t\t \t\t\t{$tbl_1d_films}.Title AS a2,\n\t\t \t\t\t{$tbl_1d_films}.OriginalTitle,\n\t\t \t\t\t{$tbl_1d_films}.Actors,\n\n\t\t \t\t\t'',\n\t\t \t\t\t'',\n\t\t \t\t\t{$tbl_1d_videodvd_charts}.Weeks,\n\t\t \t\t\t'',\n\t\t \t\t\t{$tbl_1d_videodvd_charts}.tsWhen,\n\n\t\t \t\t\t{$tbl_1d_pictures}.URL,\n\t\t\t\t\t{$tbl_1d_pictures}.Width,\n\t\t\t\t\t{$tbl_1d_pictures}.Height,\n\n\t\t\t\t\tp1.URL,\n\t\t\t\t\tp1.Width,\n\t\t\t\t\tp1.Height\n\n\t\t \t\tFROM {$tbl_1d_charts}\n\t\t\t\tLEFT JOIN {$tbl_1d_videodvd_charts}\n\t\t\t\t\tON {$tbl_1d_videodvd_charts}.ChartID = {$tbl_1d_charts}.ID\n\t\t\t\t\t\tAND {$tbl_1d_charts}.Type = 'videodvd'\n\n\t\t\t\tLEFT JOIN {$tbl_1d_films}\n\t\t\t\t\tON {$tbl_1d_videodvd_charts}.Film = {$tbl_1d_films}.ID\n\t\t\t\t\t\tAND {$tbl_1d_videodvd_charts}.Type = 'list'\n\t\t\t\t\t\t\n\t\t\t\tLEFT JOIN {$tbl_1d_pictures}\n\t\t\t\t\tON {$tbl_1d_pictures}.RefID = {$tbl_1d_films}.ID\n\t\t\t\t\t\tAND {$tbl_1d_pictures}.RefType = 'film'\n\t\t\t\tLEFT JOIN {$tbl_1d_pictures} AS p1\n\t\t\t\t\tON {$tbl_1d_pictures}.ID = p1.RefID\n\t\t\t\t\t\tAND p1.RefType = 'thumb'\n\t\t\t\t\n\t\t\t\tWHERE\t({$tbl_1d_videodvd_charts}.ID IS NOT NULL)\n\t\t\t\t\t\tAND ({$tbl_1d_videodvd_charts}.tsWhen <= (" . week() . "+604800))\n\t\t\t\t\t\tAND {$tbl_1d_charts}.ID = " . dbQuote($PARAM['id']) . "\n\t\t\t\t\n\t\t\t\tGROUP BY {$tbl_1d_videodvd_charts}.ID\n\t\t\t\t\n\t\t\t\tORDER BY ({$tbl_1d_videodvd_charts}.tsWhen > " . week() . ") DESC,\n\t\t\t\t\t{$tbl_1d_videodvd_charts}.No,\n\t\t\t\t\t{$tbl_1d_videodvd_charts}.tsWhen DESC,\n\t\t\t\t\tRAND()";
            break;
        default:
        case 'kino':
            $query = "SELECT\t{$tbl_1d_charts}.ID,\n\t\t\t\t\t{$tbl_1d_charts}.Type,\n\t\t \t\t\t{$tbl_1d_charts}.Title AS a1,\n\n\t\t \t\t\t{$tbl_1d_kino_charts}.No,\n\t\t \t\t\t{$tbl_1d_kino_charts}.Type,\n\t\t \t\t\t{$tbl_1d_kino_charts}.Film,\n\n\t\t \t\t\t{$tbl_1d_films}.Title AS a2,\n\t\t \t\t\t{$tbl_1d_films}.OriginalTitle,\n\t\t \t\t\t{$tbl_1d_films}.Actors,\n\n\t\t \t\t\t{$tbl_1d_kino_charts}.BoxOffice,\n\t\t \t\t\t{$tbl_1d_kino_charts}.cumBoxOffice,\n\t\t \t\t\t{$tbl_1d_kino_charts}.Weeks,\n\t\t \t\t\t{$tbl_1d_kino_charts}.Screens,\n\t\t \t\t\t{$tbl_1d_kino_charts}.tsWhen,\n\n\t\t \t\t\t{$tbl_1d_pictures}.URL,\n\t\t\t\t\t{$tbl_1d_pictures}.Width,\n\t\t\t\t\t{$tbl_1d_pictures}.Height,\n\n\t\t\t\t\tp1.URL,\n\t\t\t\t\tp1.Width,\n\t\t\t\t\tp1.Height\n\n\t\t \t\tFROM {$tbl_1d_charts}\n\t\t\t\tLEFT JOIN {$tbl_1d_kino_charts}\n\t\t\t\t\tON {$tbl_1d_kino_charts}.ChartID = {$tbl_1d_charts}.ID\n\t\t\t\t\t\tAND {$tbl_1d_charts}.Type = 'kino'\n\n\t\t\t\tLEFT JOIN {$tbl_1d_films}\n\t\t\t\t\tON {$tbl_1d_kino_charts}.Film = {$tbl_1d_films}.ID\n\t\t\t\t\t\tAND {$tbl_1d_kino_charts}.Type = 'list'\n\t\t\t\t\t\t\n\t\t\t\tLEFT JOIN {$tbl_1d_pictures}\n\t\t\t\t\tON {$tbl_1d_pictures}.RefID = {$tbl_1d_films}.ID\n\t\t\t\t\t\tAND {$tbl_1d_pictures}.RefType = 'film'\n\t\t\t\tLEFT JOIN {$tbl_1d_pictures} AS p1\n\t\t\t\t\tON {$tbl_1d_pictures}.ID = p1.RefID\n\t\t\t\t\t\tAND p1.RefType = 'thumb'\n\t\t\t\t\n\t\t\t\tWHERE\t({$tbl_1d_kino_charts}.ID IS NOT NULL)\n\t\t\t\t\t\tAND ({$tbl_1d_kino_charts}.tsWhen <= (" . week() . "+604800))\n\t\t\t\t\t\tAND {$tbl_1d_charts}.ID = " . dbQuote($PARAM['id']) . "\n\t\t\t\t\n\t\t\t\tGROUP BY {$tbl_1d_kino_charts}.ID\n\t\t\t\t\n\t\t\t\tORDER BY ({$tbl_1d_kino_charts}.tsWhen > " . week() . ") DESC,\n\t\t\t\t\t{$tbl_1d_kino_charts}.No,\n\t\t\t\t\t{$tbl_1d_kino_charts}.tsWhen DESC,\n\t\t\t\t\tRAND()";
            break;
    }
    $result = runQuery($query, 'showCharts()', 'GET_CHARTS_INFO');
    $week = '0';
    $chart = '0';
    $path = getAdmSetting('UPLOAD_DIR');
    $SUBS['ALIGN'] = 'absmiddle';
    while ($row = db_fetch_row($result)) {
        switch ($row[1]) {
            case 'videodvd':
                $SUBS['CHART_TITLE'] = htmlEncode($row[2]);
                $SUBS['CHART_WEEK'] = showWeek($row[13]);
                if ($chart != $row[0]) {
                    //pechatay zaglawie
                    $SUBS['KLASACII'] .= fileParse('_index_charts_title.htmlt');
                    $chart = $row[0];
                    $week = $row[13];
                } else {
                    if (week($week) != week($row[13])) {
                        continue;
                    }
                }
                $SUBS['NO'] = sprintf('%02d', $row[3]);
                $SUBS['ACTORS'] = '';
                if ($row['4'] != 'list') {
                    $SUBS['TITLE'] = htmlEncode($row[5]);
                } else {
                    $SUBS['FILMID'] = $row[5];
                    if ($row[6]) {
                        $SUBS['TITLE'] = htmlEncode($row[6]);
                    } else {
                        $SUBS['TITLE'] = htmlEncode($row[7]);
                    }
                    $SUBS['ALT'] = $SUBS['TITLE'];
                    $SUBS['TITLE'] = fileParse('_index_charts_link.htmlt');
                    $SUBS['ACTORS'] = htmlEncode($row[8]);
                }
                $SUBS['WEEKS'] = $row[11];
                //kartinka, ako ima
                $SUBS['PIC'] = '';
                if ($row[14]) {
                    $SUBS['URL'] = $path . $row[14];
                    $SUBS['WIDTH'] = $row[15];
                    $SUBS['HEIGHT'] = $row[16];
                    $SUBS['TURL'] = $path . $row[17];
                    $SUBS['TWIDTH'] = $row[18];
                    $SUBS['THEIGHT'] = $row[19];
                    $SUBS['PIC'] = fileParse('_index_thumb.htmlt');
                }
                $SUBS['KLASACII'] .= fileParse('_index_charts_videodvd.htmlt');
                break;
            default:
            case 'kino':
                $SUBS['CHART_TITLE'] = htmlEncode($row[2]);
                $SUBS['CHART_WEEK'] = showWeek($row[13]);
                if ($chart != $row[0]) {
                    //pechatay zaglawie
                    $SUBS['KLASACII'] .= fileParse('_index_charts_title.htmlt');
                    $chart = $row[0];
                    $week = $row[13];
                } else {
                    if (week($week) != week($row[13])) {
                        continue;
                    }
                }
                $SUBS['NO'] = sprintf('%02d', $row[3]);
                $SUBS['ACTORS'] = '';
                if ($row['4'] != 'list') {
                    $SUBS['TITLE'] = htmlEncode($row[5]);
                } else {
                    $SUBS['FILMID'] = $row[5];
                    if ($row[6]) {
                        $SUBS['TITLE'] = htmlEncode($row[6]);
                    } else {
                        $SUBS['TITLE'] = htmlEncode($row[7]);
                    }
                    $SUBS['ALT'] = $SUBS['TITLE'];
                    $SUBS['TITLE'] = fileParse('_index_charts_link.htmlt');
                    $SUBS['ACTORS'] = htmlEncode($row[8]);
                }
                $SUBS['BO'] = '';
                while (ereg('([0-9]{1,3}$)', $row[9], $R)) {
                    if (strlen($R[1]) < 3) {
                        $SUBS['BO'] = "{$R['1']}" . $SUBS['BO'];
                    } else {
                        $SUBS['BO'] = ",{$R['1']}" . $SUBS['BO'];
                    }
                    $row[9] = ereg_replace('([0-9]{0,3}$)', '', $row[9]);
                }
                $SUBS['BO'] = ereg_replace('^,', '', $SUBS['BO']);
                $SUBS['CBO'] = '';
                while (ereg('([0-9]{1,3}$)', $row[10], $R)) {
                    if (strlen($R[1]) < 3) {
                        $SUBS['CBO'] = "{$R['1']}" . $SUBS['CBO'];
                    } else {
                        $SUBS['CBO'] = ",{$R['1']}" . $SUBS['CBO'];
                    }
                    $row[10] = ereg_replace('([0-9]{0,3}$)', '', $row[10]);
                }
                $SUBS['CBO'] = ereg_replace('^,', '', $SUBS['CBO']);
                $SUBS['WEEKS'] = $row[11];
                $SUBS['SCREENS'] = $row[12];
                //kartinka, ako ima
                $SUBS['PIC'] = '';
                if ($row[14]) {
                    $SUBS['URL'] = $path . $row[14];
                    $SUBS['WIDTH'] = $row[15];
                    $SUBS['HEIGHT'] = $row[16];
                    $SUBS['TURL'] = $path . $row[17];
                    $SUBS['TWIDTH'] = $row[18];
                    $SUBS['THEIGHT'] = $row[19];
                    $SUBS['PIC'] = fileParse('_index_thumb.htmlt');
                }
                $SUBS['KLASACII'] .= fileParse('_index_charts_kino.htmlt');
                break;
        }
    }
    ////----[Mrasnika's] Edition 24.10.2002
    // $SUBS['MORE'] = getBlock(1) . getBlock(2) . getBlock(3);
    if ($SUBS['KLASACII']) {
        $SUBS['MORE'] = getBlock(7);
    } else {
        $SUBS['CHARTS2'] = '<br>' . getBlock(7, 1) . '<br><br>';
        $SUBS['MORE'] = getBlock(1) . getBlock(2) . getBlock(3) . getBlock(4);
    }
    index('_index_charts.htmlt');
}