Форум программистов «Весельчак У»
  *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

  • Рекомендуем проверить настройки временной зоны в вашем профиле (страница "Внешний вид форума", пункт "Часовой пояс:").
  • У нас больше нет рассылок. Если вам приходят письма от наших бывших рассылок mail.ru и subscribe.ru, то знайте, что это не мы рассылаем.
   Начало  
Наши сайты
Помощь Поиск Календарь Почта Войти Регистрация  
 
Страниц: [1]   Вниз
  Печать  
Автор Тема: Отчет (какой?)  (Прочитано 14134 раз)
0 Пользователей и 1 Гость смотрят эту тему.
ElenaR
Новенький

ru
Offline Offline

« : 30-06-2011 04:10 » 

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

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

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

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

Код:
Если Сред(Д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.... )
« Последнее редактирование: 30-06-2011 10:57 от ElenaR » Записан
Sla
Команда клуба

ua
Offline Offline
Пол: Мужской

WWW
« Ответ #1 : 30-06-2011 11:06 » 

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

зы ждем спецов Улыбаюсь
Записан

Мы все учились понемногу... Чему-нибудь и как-нибудь.
Kivals
Модератор

ca
Offline Offline
Пол: Мужской

WWW
« Ответ #2 : 30-06-2011 13:38 » new

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

Offtopic:
Sla, спецы в отпуске Улыбаюсь До следующего понедельника (11.07.11)
Записан
ElenaR
Новенький

ru
Offline Offline

« Ответ #3 : 01-07-2011 06:19 » 

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

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

Добавлено через 6 минут и 9 секунд:
А что это за функция Сред ?
А Д4.Лицо строка?

зы ждем спецов Улыбаюсь

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

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


« Последнее редактирование: 01-07-2011 06:25 от ElenaR » Записан
Sla
Команда клуба

ua
Offline Offline
Пол: Мужской

WWW
« Ответ #4 : 01-07-2011 06:31 » 

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

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

Мы все учились понемногу... Чему-нибудь и как-нибудь.
RXL
Технический
Администратор

Offline Offline
Пол: Мужской

WWW
« Ответ #5 : 01-07-2011 06:41 » 

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

... мы преодолеваем эту трудность без синтеза распределенных прототипов. (с) Жуков М.С.
Джон
просто
Администратор

de
Offline Offline
Пол: Мужской

« Ответ #6 : 01-07-2011 08:58 » 

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

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

Я вам что? Дурак? По выходным и праздникам на работе работать. По выходным и праздникам я работаю дома.
"Just because the language allows you to do something does not mean that it’s the correct thing to do." Trey Nash
"Physics is like sex: sure, it may give some practical results, but that's not why we do it." Richard P. Feynman
"All science is either physics or stamp collecting." Ernest Rutherford
"Wer will, findet Wege, wer nicht will, findet Gründe."
Sla
Команда клуба

ua
Offline Offline
Пол: Мужской

WWW
« Ответ #7 : 01-07-2011 09:02 » 

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

Мы все учились понемногу... Чему-нибудь и как-нибудь.
Kivals
Модератор

ca
Offline Offline
Пол: Мужской

WWW
« Ответ #8 : 01-07-2011 18:27 » 

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

...
Есть ли смысл писать другие вопросы..))) и какая вероятность получить на них ответы....
Я стараюсь ответить хоть что-то на большинство вопросов (процентов 95, не меньше), но далеко не всегда день в день - может и неделя пройти. А на некоторые мне нечего ответить - я тоже не все знаю и разбираться времени нет.
« Последнее редактирование: 02-07-2011 07:53 от Kivals » Записан
RXL
Технический
Администратор

Offline Offline
Пол: Мужской

WWW
« Ответ #9 : 01-07-2011 22:28 » 

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

... мы преодолеваем эту трудность без синтеза распределенных прототипов. (с) Жуков М.С.
Woodall
Интересующийся

ru
Offline Offline

« Ответ #10 : 29-07-2011 07:22 » 

ElenaR,
А еще можно сделать красивше  Улыбаюсь
Код:
Если Найти("ООО,МУП,МП ,МУ ",Лев(Д4.Лицо,3))=1 Тогда
            А1 = А1 + 1;
         Иначе А5=А5+1;
Записан
Страниц: [1]   Вверх
  Печать  
 

Powered by SMF 1.1.21 | SMF © 2015, Simple Machines