Отчет (какой?)

[ElenaR]

Делаю Отчет(((нужна помощь квалифицированных специалистов..))

Дело в том,  что обычно я что-то исправляла в конфигурации, а теперь мне нужно сделать свой отчет, но так как я это делаю впервые, то у меня возникли вопросы, которые спросить просто не у кого.
Очень надеюсь на Вашу помощь…

Хочу посчитать из журнала актов количество строк, которые начитаются с ООО, МУП, МУ и МП  в столбце Лицо.

Пишет вот такую ошибку:

Код:

Если Сред(Д4.Лицо,1,4)="ООО " или Сред(Д4.Лицо,1,4)<<?>>="МУП " 
{Отчет.222.Форма.Модуль(31)}: Неправильное использование арифметической или строковой операции

Вот кусочек отчета:

Код:

    Д4 = СоздатьОбъект("Документ.Акт");
    А1 = 0; А10 = 0; А5 = 0;
    Д4.ВыбратьДокументы(Д1,Д2); 
     Пока Д4.ПолучитьДокумент()>0 Цикл
         А10 = А10 + 1;          
         Если Сред(Д4.Лицо,1,4)="ООО " или Сред(Д4.Лицо,1,4)="МУП " 
            или Сред(Д4.Лицо,1,3)="МУ "   или Сред(Д4.Лицо,1,3)="МП " Тогда
            А1 = А1 + 1;
         Иначе А5=А5+1;
         КонецЕсли;       
     КонецЦикла;

Скажите в чем моя ошибка? (((

Добавлено через 3 часа, 31 минуту и 43 секунды:
Спасибо за ответ..)))
теперь уже другой ..))
ошибка A1<<?>>
 Переменная не определена (A1)
Как ее еще нужно определить... Выводиться она у меня в таблице(свойство ячейки выражение в ней стоит A1, A3.... )

[Sla]

А что это за функция Сред ?
А Д4.Лицо строка?

зы ждем спецов

[Kivals]

1. Условия в Если попробуй взять в скобки
2. В какой строке ругается на А1? может у тебя где-то А - английская попалась?

Offtopic:

Sla, спецы в отпуске До следующего понедельника (11.07.11)

[ElenaR]

Как так в отпуске что все..... или на этом форуме один человек, который за все отвечает..))))
Разве люди знающие 1с не посещают этот форум))))

В любом случае спасибо... я уже с этими вопросами справилась )))
Есть ли смысл писать другие вопросы..))) и какая вероятность получить на них ответы..... 

Добавлено через 6 минут и 9 секунд:

А что это за функция Сред ?
А Д4.Лицо строка?

зы ждем спецов

И я думаю, что я не знаю 1С программирование..)))) Похоже есть еще люди, которым я могу блестнуть своими знаниями)))
Сред(<Строка>, <Число1>, <Число2>)
Описание:
Функция Сред возвращает подстроку параметра <Строка>, начиная с сим­вола с номером <Число1> общим количеством <Число2>. Позиции в строке считаются, начиная с 1,а Д4 присвоен документ.акт с полем Лицо

в общем ищем В поле Лицо строки которые начинаються на ООО

[Sla]

ElenaR, вопрос был чисто риторический, чтоб не потерять пользователя. А kivals, да один (почти)
А люди знающие 1С если и посещают, то не регистрируются.

зы. не работаю я с 1С. А шо и спросить нельзя?

[RXL]

ElenaR, техподдержка 1С находится в другом месте и она платная. У нас же все на добровольной основе. Уважай и цени альтруистов! Их совсем мало осталось.

[Джон]

Похоже есть еще люди, которым я могу блестнуть своими знаниями)))

Дык, вот и подключайся. Будет уже два человека.

[Sla]

Вот же флудЁры. Марш все работать!
А то придет лесник и ВсЁ вычистит

[Kivals]

Как так в отпуске что все..... или на этом форуме один человек, который за все отвечает..))))

Нет, ну не совсем один - Dest и Naghual помагают, да и некоторые "вопрошающие" тоже потом присоединяются к "отвечающим", но обычно не надолго... Я же помагаю когда есть "час та натхнення"

...
Есть ли смысл писать другие вопросы..))) и какая вероятность получить на них ответы....

Я стараюсь ответить хоть что-то на большинство вопросов (процентов 95, не меньше), но далеко не всегда день в день - может и неделя пройти. А на некоторые мне нечего ответить - я тоже не все знаю и разбираться времени нет.

[RXL]

Вот я о том же: цените! Мы в топе по многим запросам по 1С не из-за раскрутки — она отсутствует как класс. Просто у нас хорошие ведущие в разделе. Я это не раз говорил. Просто надо понимать, где находишься: иметь терпение и уважать чужой труд.

[Woodall]

ElenaR,
А еще можно сделать красивше 

Код:

Если Найти("ООО,МУП,МП ,МУ ",Лев(Д4.Лицо,3))=1 Тогда
            А1 = А1 + 1;
         Иначе А5=А5+1;