Пришол опрос от 1с- там такие вопросы
количество справочников
видов документов

используемых пользователями
как узнать и что написать

(0) как пришол, так и пусть ушол)

ничего не пиши. Или пусть деньги платят за информацию.

напиши - комерческая тайна

(0) спроси с какой целью интерисуются

с какого адреса хоть письмо пришло?

(0) Отвечай просто.

количество справочников - Достаточное.
количество видов документов используемых пользователями - Приемлемое.

Вроде и не послал, и послал одновременно. :)

также вопрос- сколько строк в документе в среднем

также вопрос
Среднее число строк в одном документе

не пишы им ничаго!

(8) Блин...
Сколько строк в документе - Много.

(10) или - хватает

(0)
пиши
спр 2
док 1
кряк 1 :)

(5) бгыыы с какогонить типа [email protected]

(0) "как узнать и что написать" - какой обязательный.
смс на короткие номера тоже отправляешь?

если одна строка значит 1 строка
если две тогда 2 строки
а если больше 2х строк тогда много.

(15) да только как это узнать в среднем по базе???

(0) от грамотей.
аш отвечать не хочеца

опечатка

v8: Вылетает 1С.  1 2  »

(18) в двух местах? не верю

(0) Да уж... пришол полный 1С...

Дык напиши "мы не используем ваших программ, поэтому предоставить такую информацию является невозможным"

мы их продаем (22)

Развод и провокация. Адрес то автор не пишет.

эх,так и не получилось ответ написать.Фильтр удафкома не дает!

(17) в двух местах, но одном слове

Интересно, а 1С сделает когда-нибудь по типу Майкрасофта, когда падает 1С, чтобы она пыталась отправить данные об ошибке на селезневскую))

(27) забыл добавить, что "пишишь с микравалновки"

письмо щастя :)

(28) Ага вместе с транзакт логом...

(21) +100500
спасибо, улыбнул.

(30) чя-щя пишется через Я. чЯй

(33) + чЯт

(33) ой, ща помогу тс-у :)

вот :)
Процедура КоличествоДокументовНажатие(Элемент)
   
   ТекВидДока = Этаформа.ЭлементыФормы.СписДоков.Значение;
   Запрос = Новый Запрос("ВЫБРАТЬ Сумма(1) КАК Количество    ИЗ Документ." + ТекВидДока);
   ВыборкаДетальныеЗаписи = Запрос.Выполнить().Выбрать();
   Если ВыборкаДетальныеЗаписи.Следующий() Тогда
       Сообщить("Количество документов " + ТекВидДока + ": " + ?(СокрЛП(ВыборкаДетальныеЗаписи.Количество)="", 0, ВыборкаДетальныеЗаписи.Количество));
   КонецЕсли;
   
КонецПроцедуры

Для К = 0 По Метаданные.Документы.Количество() - 1 Цикл
   Документ = Метаданные.Документы.Получить(К);
   Этаформа.ЭлементыФормы.СписДоков.СписокВыбора.Добавить(Документ.Имя);
КонецЦикла;

// СписДоков - поле выбора на форме
// КоличествоДокументов - кнопка на форме