示例#1
0
function XML_Read($Object, $Level = 1)
{
    #-----------------------------------------------------------------------------
    static $Index = 1;
    #-----------------------------------------------------------------------------
    $Md5 = Md5($Index++);
    #-----------------------------------------------------------------------------
    $Attribs = $Object->Attribs;
    #-----------------------------------------------------------------------------
    $Name = isset($Attribs['comment']) ? $Attribs['comment'] : $Object->Name;
    #-----------------------------------------------------------------------------
    $P = new Tag('P', array('class' => 'NodeName', 'onclick' => SPrintF("TreeSwitch('%s');", $Md5)), new Tag('IMG', array('align' => 'left', 'src' => 'SRC:{Images/Icons/Node.gif}')), new Tag('SPAN', $Name));
    #-----------------------------------------------------------------------------
    $Node = new Tag('DIV', array('class' => 'Node'), $P);
    #-----------------------------------------------------------------------------
    if (Count($Attribs)) {
        #---------------------------------------------------------------------------
        foreach (Array_Keys($Attribs) as $AttribID) {
            $Node->AddChild(new Tag('P', array('class' => 'NodeParam'), new Tag('SPAN', SPrintF('%s: ', $AttribID)), new Tag('SPAN', array('class' => 'NodeParam'), $Attribs[$AttribID])));
        }
    }
    #-----------------------------------------------------------------------------
    if (Count($Childs = $Object->Childs)) {
        #---------------------------------------------------------------------------
        $Content = new Tag('DIV', array('style' => 'display:none;'), array('id' => $Md5));
        #---------------------------------------------------------------------------
        foreach ($Childs as $Child) {
            $Content->AddChild(XML_Read($Child, $Level + 1));
        }
        #---------------------------------------------------------------------------
        $Node->AddChild($Content);
    }
    #-----------------------------------------------------------------------------
    return $Node;
}
示例#2
0
$Links =& Links();
#-------------------------------------------------------------------------------
$Links['DOM'] =& $DOM;
#-------------------------------------------------------------------------------
if (Is_Error($DOM->Load('Base'))) {
    return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
$DOM->AddAttribs('MenuLeft', array('args' => 'Administrator/AddIns'));
#-------------------------------------------------------------------------------
$DOM->AddText('Title', 'Дополнения → Мастера настройки → Прочее');
#-------------------------------------------------------------------------------
$NoBody = new Tag('NOBODY');
#-------------------------------------------------------------------------------
#-------------------------------------------------------------------------------
$NoBody->AddChild(new Tag('BR'));
$List = new Tag('UL', array('class' => 'Standard'));
#-------------------------------------------------------------------------------
#-------------------------------------------------------------------------------
$Menus = Styles_XML('Menus/Administrator/Masters.Other.xml');
#Debug(SPrintF("[comp/www/Administrator/SystemMaintenance]: Menus = %s",print_r($Menus,true)));
#-------------------------------------------------------------------------------
foreach ($Menus['Items'] as $Menu) {
    #-------------------------------------------------------------------------------
    $A = new Tag('A', array('class' => 'Standard', 'href' => $Menu['Href']), $Menu['Text']);
    #-------------------------------------------------------------------------------
    if (isset($Menu['Prompt'])) {
        #-------------------------------------------------------------------------------
        $LinkID = UniqID('Href');
        #-------------------------------------------------------------------------------
        $Links[$LinkID] =& $A;
示例#3
0
    return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
$Table[] = $Comp;
#-------------------------------------------------------------------------------
#-------------------------------------------------------------------------------
$Div = new Tag('DIV', array('align' => 'right'));
#-------------------------------------------------------------------------------
if ($DSSchemeID) {
    #-------------------------------------------------------------------------------
    $Comp = Comp_Load('Form/Input', array('type' => 'checkbox', 'onclick' => 'form.DSSchemeID.value = (checked?0:value);', 'value' => $DSSchemeID));
    if (Is_Error($Comp)) {
        return ERROR | @Trigger_Error(500);
    }
    #-------------------------------------------------------------------------------
    $Div->AddChild($Comp);
    #-------------------------------------------------------------------------------
    $Div->AddChild(new Tag('SPAN', array('class' => 'Comment'), 'создать новый тариф'));
    #-------------------------------------------------------------------------------
}
#-------------------------------------------------------------------------------
$Comp = Comp_Load('Form/Input', array('type' => 'button', 'onclick' => SPrintF("FormEdit('/Administrator/API/DSSchemeEdit','DSSchemeEditForm','%s');", $Title), 'value' => $DSSchemeID ? 'Сохранить' : 'Добавить'));
if (Is_Error($Comp)) {
    return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
$Div->AddChild($Comp);
#-------------------------------------------------------------------------------
$Table[] = $Div;
#-------------------------------------------------------------------------------
#-------------------------------------------------------------------------------
示例#4
0
    return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
$Comp = Comp_Load('Buttons/Panel', array('Comp' => $Comp, 'Name' => 'Новый тариф'));
if (Is_Error($Comp)) {
    return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
$NoBody = new Tag('NOBODY', $Comp);
#-------------------------------------------------------------------------------
$Comp = Comp_Load('Tables/Super', 'VPSSchemes');
if (Is_Error($Comp)) {
    return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
$NoBody->AddChild($Comp);
#-------------------------------------------------------------------------------
$Comp = Comp_Load('Tab', 'Administrator/VPS', $NoBody);
if (Is_Error($Comp)) {
    return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
$DOM->AddChild('Into', $Comp);
#-------------------------------------------------------------------------------
$Out = $DOM->Build();
#-------------------------------------------------------------------------------
if (Is_Error($Out)) {
    return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
return $Out;
             $Replacing = Array_ToLine($WorkComplite, '%');
             #-------------------------------------------------
             $Tr = new Tag('TR');
             #-------------------------------------------------
             foreach ($Childs as $Child) {
                 #-----------------------------------------------
                 $Td = clone $Child;
                 #-----------------------------------------------
                 foreach (Array_Keys($Replacing) as $Pattern) {
                     #---------------------------------------------
                     $String = $Replacing[$Pattern] ? $Replacing[$Pattern] : '-';
                     #---------------------------------------------
                     $Td->Text = Str_Replace($Pattern, $String, $Td->Text);
                 }
                 #-----------------------------------------------
                 $Tr->AddChild($Td);
             }
             #-------------------------------------------------
             $DOM->AddChild('WorksComplite', $Tr);
             break;
         default:
             return ERROR | @Trigger_Error(101);
     }
 }
 #-------------------------------------------------------
 $DOM->Delete('WorkComplite');
 #-------------------------------------------------------
 $Comp = Comp_Load('Formats/WorkComplite/Report/Number', $ContractID, $Month);
 if (Is_Error($Comp)) {
     return ERROR | @Trigger_Error(500);
 }
示例#6
0
         $Links[$LinkID] =& $Image;
         #-------------------------------------------------------------------------------
         $Comp = Comp_Load('Form/Prompt', $LinkID, $Collation['Prompt']);
         if (Is_Error($Comp)) {
             return ERROR | @Trigger_Error(500);
         }
         #-------------------------------------------------------------------------------
         unset($Links[$LinkID]);
         #-------------------------------------------------------------------------------
         $Div1 = new Tag('DIV', $Image, new Tag('DIV', array('style' => 'margin:0 0 0 3px; width:145px; white-space:nowrap; overflow:hidden;'), $Collation['Description']));
         #-------------------------------------------------------------------------------
         $List->AddChild(new Tag('LI', array('class' => 'pp-rounded-5px'), $Div1));
         #-------------------------------------------------------------------------------
     }
     #-------------------------------------------------------------------------------
     $Div->AddChild($List);
     #-------------------------------------------------------------------------------
     $Table[] = $Div;
     #-------------------------------------------------------------------------------
     #-------------------------------------------------------------------------------
     $Comp = Comp_Load('Form/Input', array('name' => 'PaymentSystemID', 'type' => 'hidden', 'value' => ''));
     if (Is_Error($Comp)) {
         return ERROR | @Trigger_Error(500);
     }
     #-------------------------------------------------------------------------------
     $Form->AddChild($Comp);
     #-------------------------------------------------------------------------------
 }
 #-------------------------------------------------------------------------------
 #-------------------------------------------------------------------------------
 $Count = DB_Count('BasketOwners', array('Where' => SPrintF('`ContractID` = %u', $Contract['ID'])));
示例#7
0
$Comp = Comp_Load('Form/Input', array('type' => 'button', 'onclick' => isset($GLOBALS['__USER']['IsEmulate']) ? "javascript:ShowConfirm('Вы действительно хотите написать в тикет от чужого имени?','TicketAddMessage();');" : 'TicketAddMessage();', 'value' => 'Добавить'));
if (Is_Error($Comp)) {
    return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
$Div = new Tag('DIV', $Comp, new Tag('SPAN', 'и'));
#-------------------------------------------------------------------------------
if ($__USER['ID'] == $Ticket['UserID']) {
    # is ordinar user
    #-------------------------------------------------------------------------------
    $Comp = Comp_Load('Form/Input', array('name' => 'Flags', 'type' => 'checkbox', 'value' => 'Closed'));
    if (Is_Error($Comp)) {
        return ERROR | @Trigger_Error(500);
    }
    #-------------------------------------------------------------------------------
    $Div->AddChild(new Tag('NOBODY', $Comp, new Tag('SPAN', array('style' => 'cursor:pointer;', 'onclick' => 'ChangeCheckBox(\'Flags\'); return false;'), 'закрыть запрос (проблема решена)')));
    #-------------------------------------------------------------------------------
} else {
    # user -> support
    #-------------------------------------------------------------------------------
    $Config = Config();
    #-------------------------------------------------------------------------------
    $Positions = $Config['Edesks']['Flags'];
    #-------------------------------------------------------------------------------
    $Comp = Comp_Load('Form/Select', array('name' => 'Flags'), $Positions, $Ticket['Flags']);
    if (Is_Error($Comp)) {
        return ERROR | @Trigger_Error(500);
    }
    #-------------------------------------------------------------------------------
    $Div->AddChild(new Tag('NOBODY', $Comp));
    #-------------------------------------------------------------------------------
示例#8
0
 $Columns = array('ID', 'Name', 'ServersGroupID', 'Comment', 'CostMonth', 'CostInstall', 'disklimit', 'ncpu', 'cpu', 'mem', '(SELECT `Name` FROM `ServersGroups` WHERE `ServersGroups`.`ID` = `ServersGroupID`) as `ServersGroupName`', '(SELECT `Comment` FROM `ServersGroups` WHERE `ServersGroups`.`ID` = `ServersGroupID`) as `ServersGroupComment`', '(SELECT `SortID` FROM `ServersGroups` WHERE `ServersGroups`.`ID` = `ServersGroupID`) as `ServersGroupSortID`');
 #-------------------------------------------------------------------------
 $VPSSchemes = DB_Select($UniqID, $Columns, array('SortOn' => array('ServersGroupSortID', 'SortID'), 'Where' => "`IsActive` = 'yes'"));
 #-------------------------------------------------------------------------
 switch (ValueOf($VPSSchemes)) {
     case 'error':
         return ERROR | @Trigger_Error(500);
     case 'exception':
         return new gException('VPS_SCHEMES_NOT_FOUND', 'Тарифные планы на виртуальные сервера не определены');
     case 'array':
         #---------------------------------------------------------------------
         $NoBody = new Tag('NOBODY');
         #---------------------------------------------------------------------
         $Tr = new Tag('TR');
         #---------------------------------------------------------------------
         $Tr->AddChild(new Tag('TD', array('class' => 'Head', 'colspan' => 2), 'Тариф'));
         $Tr->AddChild(new Tag('TD', array('class' => 'Head', 'align' => 'center'), 'Цена в мес.'));
         $Tr->AddChild(new Tag('TD', array('class' => 'Head', 'align' => 'center'), 'Цена установки'));
         #---------------------------------------------------------------------
         $Td = new Tag('TD', array('class' => 'Head', 'align' => 'center'), new Tag('SPAN', 'Место'), new Tag('SPAN', array('style' => 'font-weight:bold;font-size:14px;'), '?'));
         #---------------------------------------------------------------------
         $LinkID = UniqID('Prompt');
         #---------------------------------------------------------------------
         $Links[$LinkID] =& $Td;
         #---------------------------------------------------------------------
         $Comp = Comp_Load('Form/Prompt', $LinkID, 'Размер диска');
         if (Is_Error($Comp)) {
             return ERROR | @Trigger_Error(500);
         }
         #---------------------------------------------------------------------
         $Tr->AddChild($Td);
示例#9
0
                 #-------------------------------------------------------------------------------
             #-------------------------------------------------------------------------------
             default:
                 return ERROR | @Trigger_Error(101);
         }
         #-------------------------------------------------------------------------------
         #-------------------------------------------------------------------------------
         if ($Attrib['Type'] == 'Hidden') {
             #-------------------------------------------------------------------------------
             $Form->AddChild($Comp);
             #-------------------------------------------------------------------------------
         } else {
             #-------------------------------------------------------------------------------
             $NoBody = new Tag('NOBODY', new Tag('SPAN', isset($Attrib['CommentAttribs']) ? $Attrib['CommentAttribs'] : array(), $Attrib['Comment']));
             #-------------------------------------------------------------------------------
             $NoBody->AddChild(new Tag('BR'));
             #-------------------------------------------------------------------------------
             if (isset($Attrib['Example'])) {
                 $NoBody->AddChild(new Tag('SPAN', array('class' => 'Comment'), SPrintF('Например: %s', $Attrib['Example'])));
             }
             #-------------------------------------------------------------------------------
             $Table[] = array($NoBody, $Comp);
             #-------------------------------------------------------------------------------
         }
         #-------------------------------------------------------------------------------
     }
     #-------------------------------------------------------------------------------
 }
 #-------------------------------------------------------------------------------
 #-------------------------------------------------------------------------------
 $Table[] = 'Служба мониторинга';
示例#10
0
#-------------------------------------------------------------------------------
$Table[] = $Comp;
#-------------------------------------------------------------------------------
$Comp = Comp_Load('Edesks/Panel', array('hidden'));
if (Is_Error($Comp)) {
    return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
$Tr = new Tag('TR', $Comp);
#-------------------------------------------------------------------------------
$Comp = Comp_Load('Form/Input', array('type' => 'button', 'onclick' => "FormEdit('/API/EdeskEdit','EdeskEditForm','Добавление нового обсуждения');", 'value' => 'Добавить'));
if (Is_Error($Comp)) {
    return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
$Tr->AddChild(new Tag('TD', array('align' => 'right'), $Comp));
#-------------------------------------------------------------------------------
$Table[] = new Tag('TABLE', array('width' => '100%'), $Tr);
#-------------------------------------------------------------------------------
$Comp = Comp_Load('Tables/Standard', $Table);
if (Is_Error($Comp)) {
    return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
$DOM->AddChild('Into', new Tag('FORM', array('name' => 'EdeskEditForm', 'onsubmit' => 'return false;'), $Comp));
#-------------------------------------------------------------------------------
if (Is_Error($DOM->Build(FALSE))) {
    return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
return array('Status' => 'Ok', 'DOM' => $DOM->Object);
示例#11
0
switch (ValueOf($Images)) {
    case 'error':
        return ERROR | @Trigger_Error(500);
    case 'exception':
        return new Tag('SPAN', 'Изображений не найдено');
    case 'array':
        #---------------------------------------------------------------------------
        $Table = new Tag('TABLE', array('cellspacing' => 10));
        #---------------------------------------------------------------------------
        $Tr = new Tag('TR');
        #---------------------------------------------------------------------------
        foreach ($Images as $Image) {
            #-------------------------------------------------------------------------
            if (Count($Tr->Childs) % $Groups == 0) {
                #-----------------------------------------------------------------------
                $Table->AddChild($Tr);
                #-----------------------------------------------------------------------
                $Tr = new Tag('TR');
            }
            #-------------------------------------------------------------------------
            $Size = Image_Get_Size($Image['FileData']);
            if (Is_Error($Size)) {
                return ERROR | @Trigger_Error(500);
            }
            #-------------------------------------------------------------------------
            $Index = $Size['Height'] / $Size['Width'];
            #-------------------------------------------------------------------------
            $Height = $Width * $Index;
            #-------------------------------------------------------------------------
            $Img = new Tag('IMG', array('border' => 0, 'width' => $Width, 'height' => $Height, 'style' => 'border:1px solid #DCDCDC;cursor:pointer;', 'title' => $Image['Comment'], 'src' => SPrintF('/ClauseImage?ImageID=%u&Width=%u', $Image['ID'], $Width)));
            #-------------------------------------------------------------------------
         # если общая сумма больше нуля - добавляем строку - иначе - смысла нет
         if (IntVal($Total['Summ']) > 0) {
             #$Table[] = $TableLine;
             $Table[] = $Tr;
             CacheManager::add($CacheID1, $Tr, 24 * 3600);
         }
         #-------------------------------------------------------------------------------
     }
     #-------------------------------------------------------------------------------
 }
 #-------------------------------------------------------------------------------
 # полная статистика за год
 $Tr = new Tag('TR');
 #-------------------------------------------------------------------------------
 # ячейка с датой
 $Tr->AddChild(new Tag('TD', array('align' => 'center', 'class' => 'Standard'), 'Итого:'));
 #-------------------------------------------------------------------------------
 $TimeBegin = MkTime(0, 0, 0, 1, 1, $Year);
 $TimeEnd = MkTime(23, 59, 59, 12, 31, $Year);
 #-------------------------------------------------------------------------------
 # ячейка с общей суммой за месяц
 $Columns = array('SUM(`Summ`) AS `Summ`');
 $Where = "`StatusID` = 'Payed' AND `StatusDate` BETWEEN {$TimeBegin} AND {$TimeEnd}";
 $Total = DB_Select('Invoices', $Columns, array('UNIQ', 'Where' => $Where));
 switch (ValueOf($Total)) {
     case 'error':
         return ERROR | @Trigger_Error(500);
     case 'exception':
         return ERROR | @Trigger_Error(400);
     case 'array':
         Debug("[comp/www/Administrator/PaymentsSystemsStatistics]: общая сумма за {$Year} = " . $Total['Summ']);
示例#13
0
        }
    }
    #-----------------------------------------------------------------------------
    if (Count($Finded) < 1) {
        continue;
    }
    #-----------------------------------------------------------------------------
    $Tr = new Tag('TR');
    #-----------------------------------------------------------------------------
    foreach ($Finded as $Color) {
        #---------------------------------------------------------------------------
        if (In_Array($Color, $Colors)) {
            continue;
        }
        #---------------------------------------------------------------------------
        $Tr->AddChild(new Tag('TD', array('align' => 'center', 'bgcolor' => SPrintF('#%s', $Color), 'height' => 50, 'width' => 50), $Color));
    }
    #-----------------------------------------------------------------------------
    if (Count($Tr->Childs) < 1) {
        continue;
    }
    #-----------------------------------------------------------------------------
    $DOM->AddChild('Into', new Tag('H1', $HostsID));
    #-----------------------------------------------------------------------------
    $Table = new Tag('TABLE', array('class' => 'Standard', 'cellspacing' => 0, 'cellpadding' => 0), $Tr);
    #-----------------------------------------------------------------------------
    $DOM->AddChild('Into', $Table);
}
#-------------------------------------------------------------------------------
$Out = $DOM->Build();
#-------------------------------------------------------------------------------
示例#14
0
function String_Xml_Parse($String, $IsUseCache = TRUE)
{
    #-------------------------------------------------------------------------------
    # костыль для удаления не-UTF8 символов
    $String = iconv('UTF-8', 'UTF-8//IGNORE', $String);
    #-------------------------------------------------------------------------------
    $Length = Mb_StrLen($String);
    #-------------------------------------------------------------------------------
    $IsUseCache = $IsUseCache && $Length > 1024;
    #-------------------------------------------------------------------------------
    if ($IsUseCache) {
        #-------------------------------------------------------------------------------
        $CacheID = SPrintF('String_XML_Parse[%s]', Md5(Crc32($String)));
        #-------------------------------------------------------------------------------
        $Result = CacheManager::get($CacheID);
        if ($Result) {
            return $Result;
        }
    }
    #-------------------------------------------------------------------------------
    #-------------------------------------------------------------------------------
    Debug(SPrintF('[String_XML_Parse]: парсирование строки (%u bytes)', $Length));
    #-------------------------------------------------------------------------------
    $XmlParser = Xml_Parser_Create('UTF-8');
    #-------------------------------------------------------------------------------
    if (!Xml_Parser_Set_Option($XmlParser, XML_OPTION_CASE_FOLDING, FALSE)) {
        return ERROR | Trigger_Error('[String_Xml_Parse]: не удалось установить опцию парсирования (XML_OPTION_CASE_FOLDING)');
    }
    #-------------------------------------------------------------------------------
    if (!Xml_Parser_Set_Option($XmlParser, XML_OPTION_SKIP_WHITE, FALSE)) {
        return ERROR | Trigger_Error('[String_Xml_Parse]: не удалось установить опцию парсирования (XML_OPTION_SKIP_WHITE)');
    }
    #-------------------------------------------------------------------------------
    if (!Xml_Parse_Into_Struct($XmlParser, $String, $Nodes)) {
        #-------------------------------------------------------------------------------
        $ByteIndex = Xml_Get_Current_Byte_Index($XmlParser);
        #-------------------------------------------------------------------------------
        Debug(SPrintF('[system/libs/auto/String.php]: xml_error_string = %s', Xml_Error_String(Xml_Get_Error_Code($XmlParser))));
        #-------------------------------------------------------------------------------
        Debug(SPrintF('[system/libs/auto/String.php]: %s', Mb_SubStr($String, $ByteIndex - 100, $ByteIndex + 100)));
        #-------------------------------------------------------------------------------
        $Buffer = Mb_SubStr($String, 0, $ByteIndex);
        #-------------------------------------------------------------------------------
        $Line = Preg_Match_All("/(\r\n|\n)/sU", $Buffer, $Matches) + 1;
        #-------------------------------------------------------------------------------
        return new gException('XML_PARSE_ERROR', SPrintF('%s в линии %u', Xml_Error_String($XmlParser), $Line));
        #-------------------------------------------------------------------------------
    }
    #-------------------------------------------------------------------------------
    #-------------------------------------------------------------------------------
    #-----------------------------------------------------------------------------
    Xml_Parser_Free($XmlParser);
    #-----------------------------------------------------------------------------
    $Root = new Tag('__ROOT__');
    #-----------------------------------------------------------------------------
    $Links = array(&$Root);
    #-----------------------------------------------------------------------------
    foreach ($Nodes as $Node) {
        #---------------------------------------------------------------------------
        $Current = $Links[Count($Links) - 1];
        #---------------------------------------------------------------------------
        switch ($Node['type']) {
            case 'open':
                #-----------------------------------------------------------------------
                $Tag = new Tag($Node['tag']);
                #-----------------------------------------------------------------------
                if (isset($Node['attributes'])) {
                    $Tag->AddAttribs($Node['attributes']);
                }
                #-----------------------------------------------------------------------
                if (isset($Node['value'])) {
                    #---------------------------------------------------------------------
                    $Value = $Node['value'];
                    #---------------------------------------------------------------------
                    if (Trim($Value)) {
                        $Tag->AddChild(new Tag('CDATA', $Value));
                    }
                }
                #-----------------------------------------------------------------------
                $Current->Childs[] = $Tag;
                #-----------------------------------------------------------------------
                $Links[] =& $Current->Childs[Count($Current->Childs) - 1];
                break;
            case 'cdata':
                #-----------------------------------------------------------------------
                $Value = $Node['value'];
                #-----------------------------------------------------------------------
                if (Trim($Value)) {
                    #---------------------------------------------------------------------
                    $Tag = new Tag('CDATA', $Value);
                    #---------------------------------------------------------------------
                    $Current->Childs[] = $Tag;
                }
                break;
            case 'complete':
                #-----------------------------------------------------------------------
                $Tag = new Tag($Node['tag']);
                #-----------------------------------------------------------------------
                if (isset($Node['attributes'])) {
                    $Tag->AddAttribs($Node['attributes']);
                }
                #-----------------------------------------------------------------------
                if (isset($Node['value'])) {
                    $Tag->AddText($Node['value']);
                }
                #-----------------------------------------------------------------------
                $Current->Childs[] = $Tag;
                break;
            case 'close':
                Array_Pop($Links);
                break;
            default:
                # No more...
        }
    }
    #-----------------------------------------------------------------------------
    if ($IsUseCache) {
        CacheManager::add($CacheID, $Root);
    }
    #-----------------------------------------------------------------------------
    return $Root;
}
示例#15
0
            }
            #-------------------------------------------------------------------------------
            foreach ($Notes as $Note) {
                #-------------------------------------------------------------------------------
                $MessageID = SPrintF('note_%s_%s', $GLOBALS['__USER']['ID'], SubStr(Md5(JSON_Encode($Note)), 0, 6));
                #-------------------------------------------------------------------------------
                if (isset($_COOKIE[$MessageID])) {
                    continue;
                }
                #-------------------------------------------------------------------------------
                $Comp = Comp_Load('Information', $Note, 'Warning', $MessageID);
                if (Is_Error($Comp)) {
                    return ERROR | @Trigger_Error(500);
                }
                #-------------------------------------------------------------------------------
                $Table->AddChild(new Tag('TR', new Tag('TD', $Comp)));
                #-------------------------------------------------------------------------------
            }
            #-------------------------------------------------------------------------------
        }
        #-------------------------------------------------------------------------------
    }
    #-------------------------------------------------------------------------------
    $Table->Childs = Array_Reverse($Table->Childs);
    #-------------------------------------------------------------------------------
    $Out = Count($Table->Childs) ? $Table : new Tag('NOBODY', 'No nodes...');
    #-------------------------------------------------------------------------------
    #-------------------------------------------------------------------------------
    return $Out;
    #-------------------------------------------------------------------------------
}
示例#16
0
eval(COMP_INIT);
/******************************************************************************/
/******************************************************************************/
if (Is_Error(System_Load('libs/Artichow.php'))) {
    return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
$Result = array('Title' => 'Распределение доходов/заказов на VPS по тарифам');
#-------------------------------------------------------------------------------
if (!$IsCreate) {
    return $Result;
}
#-------------------------------------------------------------------------------
$NoBody = new Tag('NOBODY');
#-------------------------------------------------------------------------------
$NoBody->AddChild(new Tag('P', 'Данный вид статистики содержит информацию о доходности/нагрузке каждого из имеющихся тарифов VPS за 1 месяц (30 дней)'));
$NoBody->AddChild(new Tag('P', 'Суммируются цены за месяц, всех активных заказов тарифа.'));
#-------------------------------------------------------------------------------
#-------------------------------------------------------------------------------
$Graphs = array();
# для построения графиков на выхлопе
#-------------------------------------------------------------------------------
# перебираем группы серверов, ищщем те где автобалансировка не отключена
$VPSSchemes = DB_Select('VPSSchemes', array('*'), array('SortOn' => 'SortID'));
switch (ValueOf($VPSSchemes)) {
    case 'error':
        return ERROR | @Trigger_Error(500);
    case 'exception':
        Debug("[comp/Statistics/VPSSchemesIncome]: hosting shemes not found");
        break;
    case 'array':
示例#17
0
 Debug(SPrintF("[comp/www/Administrator/PersonalStatistics]: Построение данных для сотрудника #%s", $UserID));
 #-------------------------------------------------------------------------------
 $Tr = new Tag('TR');
 #-------------------------------------------------------------------------------
 $IsAdd = FALSE;
 #-------------------------------------------------------------------------------
 # Имя сотрудника / мыло сотрудника
 $Employee = DB_Select('Users', array('Name', 'Email'), array('UNIQ', 'ID' => $UserID));
 #-------------------------------------------------------------------------------
 switch (ValueOf($Employee)) {
     case 'error':
         return ERROR | @Trigger_Error(500);
     case 'exception':
         return ERROR | @Trigger_Error(400);
     case 'array':
         $Tr->AddChild(new Tag('TD', array('align' => 'left', 'class' => 'Standard', 'style' => 'background-color:#FDF6D3;'), $Employee['Name']));
         $Tr->AddChild(new Tag('TD', array('align' => 'left', 'class' => 'Standard', 'style' => 'background-color:#B9CCDF;'), $Employee['Email']));
         break;
     default:
         return ERROR | @Trigger_Error(101);
 }
 #-------------------------------------------------------------------------------
 #-------------------------------------------------------------------------------
 # число запросов по HTTP к биллингу
 $Where = array();
 $Where[] = SPrintF('`UserID` = %u', $UserID);
 $Where[] = SPrintF('`CreateDate` BETWEEN %u AND %u', $StartDate, $FinishDate);
 #-------------------------------------------------------------------------------
 $HTTPQuery = DB_Select('RequestLog', array('COUNT(*) AS Counter'), array('UNIQ', 'Where' => $Where));
 switch (ValueOf($HTTPQuery)) {
     case 'error':
示例#18
0
        break;
    default:
        return ERROR | @Trigger_Error(101);
}
#-------------------------------------------------------------------------------
#-------------------------------------------------------------------------------
foreach ($StatusesHistory as $StatusHistory) {
    #-------------------------------------------------------------------------------
    $Tr = new Tag('TR');
    #-------------------------------------------------------------------------------
    $Comp = Comp_Load('Formats/Date/Extended', $StatusHistory['StatusDate']);
    if (Is_Error($Comp)) {
        return ERROR | @Trigger_Error(500);
    }
    #-------------------------------------------------------------------------------
    $Tr->AddChild(new Tag('TD', array('class' => 'Standard'), $Comp));
    #-------------------------------------------------------------------------------
    #-------------------------------------------------------------------------------
    # для JBS-512
    $Comp = Comp_Load(SPrintF('Colors/%s', $ModeID), $StatusHistory['StatusID']);
    if (Is_Error($Comp)) {
        return ERROR | @Trigger_Error(500);
    }
    #-------------------------------------------------------------------------------
    $Style = array('class' => 'Standard', 'style' => SPrintF('background-color:%s;', $Comp['bgcolor']));
    #-------------------------------------------------------------------------------
    $Tr->AddChild(new Tag('TD', $Style, $Statuses[$StatusHistory['StatusID']]['Name']));
    #-------------------------------------------------------------------------------
    #-------------------------------------------------------------------------------
    $Initiator = $GLOBALS['__USER']['IsAdmin'] ? $StatusHistory['Initiator'] : Preg_Replace('/\\s(\\(\\H+\\))$/', '', $StatusHistory['Initiator']);
    #-------------------------------------------------------------------------------
示例#19
0
        }
        #---------------------------------------------------------------------------
        $Session['SchemeID'] = $SchemeID;
        #---------------------------------------------------------------------------
        $AddingWhere =& $Template['Source']['Adding']['Where'];
        #---------------------------------------------------------------------------
        if ($SchemeID != 'Default') {
            $AddingWhere[] = SPrintF('`SchemeID` = %u', $SchemeID);
        }
        #---------------------------------------------------------------------------
        $Comp = Comp_Load('Form/Select', array('name' => 'SchemeID', 'onchange' => 'TableSuperReload();'), $Options, $SchemeID);
        if (Is_Error($Comp)) {
            return ERROR | @Trigger_Error(500);
        }
        #---------------------------------------------------------------------------
        $Tr->AddChild(new Tag('NOBODY', new Tag('TD', array('class' => 'Comment'), 'Тарифный план'), new Tag('TD', $Comp)));
        break;
    default:
        return ERROR | @Trigger_Error(101);
}
#-------------------------------------------------------------------------------
$Servers = DB_Select('Servers', array('ID', 'Address'), array('Where' => '(SELECT `ServiceID` FROM `ServersGroups` WHERE `ServersGroups`.`ID` = `Servers`.`ServersGroupID`) = 40000', 'SortOn' => 'Address'));
#-------------------------------------------------------------------------------
switch (ValueOf($Servers)) {
    case 'error':
        return ERROR | @Trigger_Error(500);
    case 'exception':
        # No more...
        break;
    case 'array':
        #---------------------------------------------------------------------------
示例#20
0
    case 'exception':
        return new Tag('SPAN', SPrintF('Файл не найден (%s)', $FileID));
        break;
    case 'array':
        #---------------------------------------------------------------------------
        $FileName = $ClauseFile['FileName'];
        #---------------------------------------------------------------------------
        $Mime = SubStr($FileName, StrRiPos($FileName, '.') + 1);
        #---------------------------------------------------------------------------
        $Element = SPrintF('Images/Mime/%s.gif', $Mime);
        #---------------------------------------------------------------------------
        if (Is_Error(Styles_Element($Element))) {
            $Element = 'Images/Mime/unknown.gif';
        }
        #---------------------------------------------------------------------------
        $Img = new Tag('IMG', array('title' => $ClauseFile['Comment'], 'border' => 0, 'width' => 48, 'height' => 48, 'src' => SPrintF('SRC:{%s}', $Element)));
        #---------------------------------------------------------------------------
        $Table = new Tag('TABLE', new Tag('TR', new Tag('TD', array('align' => 'center'), new Tag('A', array('class' => 'Image', 'href' => SPrintF('/ClauseFileDownload?ClauseFileID=%s', $ClauseFile['ID'])), $Img))));
        #---------------------------------------------------------------------------
        $Comp = Comp_Load('Formats/String', $FileName, 10);
        if (Is_Error($Comp)) {
            return ERROR | @Trigger_Error(500);
        }
        #---------------------------------------------------------------------------
        $Table->AddChild(new Tag('TR', new Tag('TD', array('align' => 'center'), new Tag('FONT', array('size' => '1'), $Comp))));
        #---------------------------------------------------------------------------
        return $Table;
    default:
        return ERROR | @Trigger_Error(101);
}
#-------------------------------------------------------------------------------
示例#21
0
    return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
if (!$UserNotice['UserNotice']) {
    $Comp->AddAttribs(array('disabled' => 'true'));
}
#-------------------------------------------------------------------------------
$Div = new Tag('DIV', array('align' => 'right'), $Comp);
#-------------------------------------------------------------------------------
#-------------------------------------------------------------------------------
$Comp = Comp_Load('Form/Input', array('type' => 'button', 'onclick' => 'NoticeEdit();', 'value' => 'Изменить'));
if (Is_Error($Comp)) {
    return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
$Div->AddChild($Comp);
#-------------------------------------------------------------------------------
$Table[] = $Div;
#-------------------------------------------------------------------------------
#-------------------------------------------------------------------------------
$Comp = Comp_Load('Tables/Standard', $Table);
if (Is_Error($Comp)) {
    return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
$Form = new Tag('FORM', array('name' => 'NoticeEditForm', 'onsubmit' => 'return false;', 'OnKeyPress' => 'ctrlEnterEvent(event) && NoticeEdit();'), $Comp);
#-------------------------------------------------------------------------------
#-------------------------------------------------------------------------------
$Comp = Comp_Load('Form/Input', array('name' => 'TableID', 'type' => 'hidden', 'value' => $TableID));
if (Is_Error($Comp)) {
    return ERROR | @Trigger_Error(500);
示例#22
0
        #---------------------------------------------------------------------------
        $Option = new Tag('OPTION', array('value' => $OptionID), $Options[$OptionID]);
        #---------------------------------------------------------------------------
        if (!Is_Null($SelectedIDs)) {
            #-------------------------------------------------------------------------
            if (!Is_Array($SelectedIDs)) {
                $SelectedIDs = array($SelectedIDs);
            }
            #-------------------------------------------------------------------------
            if (In_Array($OptionID, $SelectedIDs)) {
                $Option->AddAttribs(array('selected' => 'true'));
            }
        }
        #---------------------------------------------------------------------------
        if (!Is_Null($DisabledIDs)) {
            #-------------------------------------------------------------------------
            if (!Is_Array($DisabledIDs)) {
                $DisabledIDs = array($DisabledIDs);
            }
            #-------------------------------------------------------------------------
            if (In_Array($OptionID, $DisabledIDs)) {
                $Option->AddAttribs(array('disabled' => 'true'));
            }
        }
    }
    #-----------------------------------------------------------------------------
    $Select->AddChild($Option);
}
#-------------------------------------------------------------------------------
return $Select;
#-------------------------------------------------------------------------------
示例#23
0
         return ERROR | @Trigger_Error(101);
 }
 #-------------------------------------------------------------------------------
 #-------------------------------------------------------------------------------
 # проверяем наличие заполненного профиля
 $Where = array('`UserID` = @local.__USER_ID', '`TypeID` != "Default"', '`StatusID` = "Complite" OR `StatusID` = "Public"');
 $Profiles = DB_Select('Contracts', array('*'), array('Where' => $Where));
 #-------------------------------------------------------------------------------
 switch (ValueOf($Profiles)) {
     case 'error':
         return ERROR | @Trigger_Error(500);
     case 'exception':
         #-------------------------------------------------------------------------------
         # нету подходящих профилей
         $NoBody->AddHTML(TemplateReplace('Notes.User.OrdersTransfer.Contracts', $Params));
         $NoBody->AddChild(new Tag('STRONG', new Tag('A', array('href' => "javascript:ShowWindow('/ContractMake');"), '[создать договор]')));
         #-------------------------------------------------------------------------------
         $Result[] = $NoBody;
         #-------------------------------------------------------------------------------
         return $Result;
         #-------------------------------------------------------------------------------
     #-------------------------------------------------------------------------------
     case 'array':
         # No more...
         break;
     default:
         return ERROR | @Trigger_Error(101);
 }
 #-------------------------------------------------------------------------------
 #-------------------------------------------------------------------------------
 $NoBody->AddHTML(TemplateReplace('Notes.User.OrdersTransfer.Message', $Params));
示例#24
0
/******************************************************************************/
/******************************************************************************/
$Table = new Tag('TABLE', array('class' => 'Standard'));
#-------------------------------------------------------------------------------
for ($i = 1; $i < Count($__args__); $i++) {
    #-----------------------------------------------------------------------------
    $__arg__ = $__args__[$i];
    #-----------------------------------------------------------------------------
    if (Is_Array($__arg__)) {
        if (Array_Key_Exists('cellspacing', $__arg__)) {
            $CellSpacing = 1;
        }
        #-----------------------------------------------------------------------------
        $Table->AddAttribs($__arg__);
    } else {
        $Table->AddChild(new Tag('CAPTION', $__arg__));
    }
}
#-------------------------------------------------------------------------------
if (!isset($CellSpacing)) {
    $Table->AddAttribs(array('cellspacing' => 5));
}
#-------------------------------------------------------------------------------
$Max = 1;
#-------------------------------------------------------------------------------
foreach ($Rows as $Row) {
    #-----------------------------------------------------------------------------
    $Count = Count($Row);
    #-----------------------------------------------------------------------------
    if ($Count > $Max) {
        $Max = $Count;
示例#25
0
    #-----------------------------------------------------------------------------
    $Comp = Comp_Load('Form/Input', array('type' => 'submit', 'value' => 'Обновить'));
    if (Is_Error($Comp)) {
        return ERROR | @Trigger_Error(500);
    }
    #-----------------------------------------------------------------------------
    $Table[] = $Comp;
    #-----------------------------------------------------------------------------
    $Comp = Comp_Load('Tables/Standard', $Table);
    if (Is_Error($Comp)) {
        return ERROR | @Trigger_Error(500);
    }
    #-----------------------------------------------------------------------------
    $Form = new Tag('FORM', array('name' => 'LogsForm', 'action' => 'LogScan', 'target' => 'LogScan', 'method' => 'POST'), $Comp);
    #-----------------------------------------------------------------------------
    $NoBody->AddChild($Form);
    #-----------------------------------------------------------------------------
    $IFrame = new Tag('IFRAME', array('name' => 'LogScan', 'src' => '/Administrator/LogScan?Log=http-send.log', 'width' => '100%', 'height' => '240px'), 'Загрузка...');
    #-----------------------------------------------------------------------------
    $NoBody->AddChild($IFrame);
} else {
    #-----------------------------------------------------------------------------
    $Comp = Comp_Load('Information', 'Логи системы пока еще не ведутся.', 'Notice');
    if (Is_Error($Comp)) {
        return ERROR | @Trigger_Error(500);
    }
    #-----------------------------------------------------------------------------
    $NoBody->AddChild($Comp);
}
#-------------------------------------------------------------------------------
#$Comp = Comp_Load('Tab','Administrator/Billing',$NoBody);
示例#26
0
/******************************************************************************/
if (Is_Error(System_Load('libs/Artichow.php'))) {
    return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
$Result = array('Title' => 'Планирование поступлений по VPS');
#-------------------------------------------------------------------------------
$MonthsNames = array('Декабрь', 'Январь', 'Февраль', 'Март', 'Апрель', 'Май', 'Июнь', 'Июль', 'Август', 'Сентябрь', 'Октябрь', 'Ноябрь', 'Декабрь');
#-------------------------------------------------------------------------------
if (!$IsCreate) {
    return $Result;
}
#-------------------------------------------------------------------------------
$NoBody = new Tag('NOBODY');
#-------------------------------------------------------------------------------
$NoBody->AddChild(new Tag('P', 'Данный вид аналитики позволяет произвести планирование будущих поступлений по заказам VPS, продление которых предполагается в будущем.'));
#-------------------------------------------------------------------------------
$Query = "CREATE TEMPORARY TABLE `%s`(\n  `ID` INT NOT NULL AUTO_INCREMENT PRIMARY KEY,\n  `OrderID`        int(11),\n  `Customer`       text,\n  `Login`          char(20),\n  `Domain`         char(100),\n  `ExpirationDate` int(11),\n  `MinDaysPay`     int(6),\n  `CostDay`        float(6,2),\n  `ContractID`     int(11),\n  `Balance`        float(7,2)\n) ENGINE=MyISAM DEFAULT CHARSET=utf8";
#-------------------------------------------------------------------------------
$UniqID = UniqID('ID');
#-------------------------------------------------------------------------------
$IsQuery = DB_Query(SPrintF($Query, $UniqID));
if (Is_Error($IsQuery)) {
    return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
$Epoches = 3;
#-------------------------------------------------------------------------------
$Incomes = array();
#-------------------------------------------------------------------------------
$Orders = DB_Select(array('VPSOrders', 'Orders', 'Contracts'), array('ContractID', 'Balance', 'OrderID', 'Customer', 'Login', 'Domain', '(UNIX_TIMESTAMP() + `DaysRemainded`*86400) as `ExpirationDate`', '(SELECT `MinDaysPay` FROM `VPSSchemes` WHERE `VPSSchemes`.`ID` = `VPSOrders`.`SchemeID`) as `MinDaysPay`', '(SELECT `CostDay` FROM `VPSSchemes` WHERE `VPSSchemes`.`ID` = `VPSOrders`.`SchemeID`) as `CostDay`'), array('Where' => SPrintF('(UNIX_TIMESTAMP() + `DaysRemainded`*86400) < %u AND `Orders`.`ID` = `VPSOrders`.`OrderID` AND `Contracts`.`ID` = `Orders`.`ContractID`', MkTime(0, 0, 1, Date('n') + $Epoches)), 'SortOn' => 'ExpirationDate'));
示例#27
0
    #-------------------------------------------------------------------------------
    $Where = SPrintF('`%s` < %u', $ColumnID, MkTime(23, 59, 59, Date('n', $Date2), Date('j', $Date2), Date('Y', $Date2)));
    #-------------------------------------------------------------------------------
    $Template['Source']['Adding']['Where'][] = $Where;
    #-------------------------------------------------------------------------------
}
#-------------------------------------------------------------------------------
#-------------------------------------------------------------------------------
$Tr = new Tag('TR', new Tag('TD', 'С даты'));
#-------------------------------------------------------------------------------
$Comp = Comp_Load('jQuery/DatePicker', SPrintF('%s1', $ColumnID), $Date1 ? $Date1 : Time() - 189216000);
if (Is_Error($Comp)) {
    return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
$Tr->AddChild(new Tag('TD', $Comp));
#-------------------------------------------------------------------------------
$Tr->AddChild(new Tag('TD', 'по дату'));
#-------------------------------------------------------------------------------
$Comp = Comp_Load('jQuery/DatePicker', SPrintF('%s2', $ColumnID), $Date2 ? $Date2 : Time());
if (Is_Error($Comp)) {
    return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
$Tr->AddChild(new Tag('TD', $Comp));
#-------------------------------------------------------------------------------
$Comp = Comp_Load('Form/Input', array('onclick' => 'TableSuperReload();', 'type' => 'button', 'value' => 'Вывести'));
if (Is_Error($Comp)) {
    return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
示例#28
0
eval(COMP_INIT);
/******************************************************************************/
/******************************************************************************/
if (Is_Error(System_Load('libs/Artichow.php'))) {
    return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
$Result = array('Title' => 'Распределение доходов по серверам');
#-------------------------------------------------------------------------------
if (!$IsCreate) {
    return $Result;
}
#-------------------------------------------------------------------------------
$NoBody = new Tag('NOBODY');
#-------------------------------------------------------------------------------
$NoBody->AddChild(new Tag('P', 'Данный вид статистики содержит информацию о доходности каждого из имеющихся серверов за 1 месяц (30 дней)'));
$NoBody->AddChild(new Tag('P', 'Суммируются цены за месяц тарифов всех активных заказов размещенных на сервере.'));
#-------------------------------------------------------------------------------
#-------------------------------------------------------------------------------
$Graphs = array();
# для построения графиков на выхлопе
#-------------------------------------------------------------------------------
# перебираем группы серверов
$ServersGroups = DB_Select('ServersGroups', array('*'), array('SortOn' => 'SortID'));
switch (ValueOf($ServersGroups)) {
    case 'error':
        return ERROR | @Trigger_Error(500);
    case 'exception':
        Debug("[comp/Statistics/ServersIncome]: no groups found");
        break;
    case 'array':
示例#29
0
}
#-------------------------------------------------------------------------------
$Comp = Comp_Load('Form/Input', array('type' => 'button', 'onclick' => 'form.submit();', 'value' => 'Сформировать'));
if (Is_Error($Comp)) {
    return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
$Table[] = $Comp;
#-------------------------------------------------------------------------------
$Table[] = new Tag('IFRAME', array('height' => 120, 'width' => '100%', 'name' => 'Statistics'), 'Загрузка...');
#-------------------------------------------------------------------------------
$Comp = Comp_Load('Tables/Standard', $Table);
if (Is_Error($Comp)) {
    return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
$Form = new Tag('FORM', array('target' => 'Statistics', 'method' => 'POST', 'onsubmit' => 'return false;'), $Comp);
#-------------------------------------------------------------------------------
$Comp = Comp_Load('Form/Input', array('type' => 'hidden', 'name' => 'IsCreate', 'value' => 'yes'));
if (Is_Error($Comp)) {
    return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
$Form->AddChild($Comp);
#-------------------------------------------------------------------------------
$DOM->AddChild('Into', $Form);
#-------------------------------------------------------------------------------
$Out = $DOM->Build();
#-------------------------------------------------------------------------------
return $Out;
#-------------------------------------------------------------------------------
示例#30
0
 case 'exception':
     # No more...
     break;
 case 'array':
     #-------------------------------------------------------------------------------
     $Table = new Tag('TABLE', array('class' => 'Standard', 'cellspacing' => 5), new Tag('CAPTION', 'Сейчас в сети'));
     #-------------------------------------------------------------------------------
     $Block = new Tag('TR');
     #-------------------------------------------------------------------------------
     foreach ($Users as $User) {
         #-------------------------------------------------------------------------------
         $Block->AddHTML(TemplateReplace('www.TicketEdit', $User));
         #-------------------------------------------------------------------------------
         if (Count($Block->Childs) % 2 == 0) {
             #-------------------------------------------------------------------------------
             $Table->AddChild($Block);
             #-------------------------------------------------------------------------------
             $Block = new Tag('TR');
             #-------------------------------------------------------------------------------
         }
         #-------------------------------------------------------------------------------
     }
     #-------------------------------------------------------------------------------
     if (Count($Block->Childs)) {
         $Table->AddChild($Block);
     }
     #-------------------------------------------------------------------------------
     $Tr->AddChild(new Tag('TD', array('valign' => 'top'), $Table));
     #-------------------------------------------------------------------------------
     break;
     #-------------------------------------------------------------------------------