Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

1С программирование - как дважды два Выпуск 09/04/2004 N3


Информационный Канал Subscribe.Ru


1С программирование
как дважды два N3

Рассылка составлена Сергеем Михайловым  www.prosto1C.by.ru


Сортировка табличной части документа
в алфавитном порядке

Если требуется перед выводом на печать отсортировать строчную часть расходной накладной в алфавитном порядке и в порядке подчинености групп, то, вы можете воспользоваться следующим кодом.

Процедура Печать()    
    Табз=СоздатьОбъект("ТаблицаЗначений");
    ВыгрузитьТабличнуюЧасть(Табз);
    Табз.НоваяКолонка("Группа");
    Табз.НоваяКолонка("КодСорт");
    Табз.ВыбратьСтроки();
    Пока Табз.ПолучитьСтроку()=1 Цикл
        Если Табз.Товар.Родитель.Родитель.Родитель.Выбран()=1 Тогда
    Табз.КодСорт=""+сокрлп(Табз.Товар.Родитель.Родитель.Родитель.КодСортировкиПечати);            
        ИначеЕсли Табз.Товар.Родитель.Родитель.Выбран()=1 Тогда
    Табз.КодСорт=""+сокрлп(Табз.Товар.Родитель.Родитель.КодСортировкиПечати);        
        ИначеЕсли Табз.Товар.Родитель.Выбран()=1 Тогда
    Табз.КодСорт=""+сокрлп(Табз.Товар.Родитель.КодСортировкиПечати);        
        КонецЕсли;
        //сообщить(""+Табз.Группа+" "+Табз.КодСорт);
    КонецЦикла;
    Табз.ВыбратьСтроки();
    Табз.Сортировать("+КодСорт,+Группа");
    ЗагрузитьТабличнуюЧасть(Табз);

...

КонецПроцедуры


www.prosto1C.by.ru Курс обучения "1С программирование - как дважды два"

www.prosto1C.by.ru/book.html Книга "1С программирование как дважды два"

www.citycat.ru/iq/ Скорочтение, память, интеллект


http://subscribe.ru/
E-mail: ask@subscribe.ru
Отписаться
Убрать рекламу


В избранное