Показать сообщение отдельно
Старый 02.06.2004, 15:08   #14  
Dmitryus is offline
Dmitryus
Участник
Аватар для Dmitryus
 
38 / 10 (1) +
Регистрация: 23.10.2002
Адрес: Мос.обл. г.Королев
Согласен.

Но работа с range сильно тормозит
а когда надо выводить отчеты с подитогами
соответственно разным объединением ячеек
по строкам,
HTML кажется более предпочтительным вариантом

а то что трудоемко это зря
вот пример кода

PHP код:
    while select  _dispatch  where        _dispatch.DispatchDate <= _to &&
                                          
_dispatch.DispatchDate >= _from
                        join _request  where _request
.RequestNumber == _dispatch.KRH000_RequestNumber &&
                                             
_request.COR_DestinationType == COR_DestinationType::Terminal
                        join _line     where _line
.RequestNumber == _request.RequestNumber &&
                                             
_line.LineNum == _dispatch.COR_RequestLineNum
    
{
    
'';
        if (
_transpart[1]) {
            
+= CHTML::Cell(_transpart[1]);
        } else {
            
+= CHTML::Cell(CHTML::FBold("Российская отгрузка"));
        }
        
+= CHTML::Cell(_request.ItemId);
        
+= CHTML::Cell(num2str(_dispatch.Qty,0,0,0,0));
        
+= CHTML::Cell(_dispatch.Dispatcher);
        
_rcontract RContractTable::find(RContractPartnerType::Cust,_request.RContractCode,_request.RContractAccount);
        
+= CHTML::Cell(_rcontract.COR_ContractWith);
        
s2 '';
        if (
export) {
            
s2 _sales.RcontractAccount;
        }
        
+= CHTML::Cell(s2);
        
HTMLstring += CHTML::Raw(s)
    }    

    if (
HTMLstring) {
        
_buffer.setText(CHTML::HTML(CHTML::BODY(CHTML::Table(HTMLstring))));
        
_doc.COR_insertText("A2",_buffer);
        
_doc.visible(true);
    } else {
        
Box::info("Отчет не содержит данных");
        
_doc.closeDocument();
    }