» Казахстанский Бухгалтерский форум www.balans.kz

Синтактический контроль модуля(отчет по материалам)

 
Показать сообщения:
Начиная со старых .::. Начиная с новых


Автор: Банер
Добавлено: #1  Ср Июл 15, 2009 14:25:10
Заголовок сообщения: Синтактический контроль модуля(отчет по материалам)

Хотел попробовать сделать отчет ,да не могу справиться с Синтактическим контролем модуля(отчет по материалам)

Добавлено спустя 3 минуты 57 секунд:

Запрос[10] : Ошибка в выражении 'Сумма'
КОЛИЧЕСТВО<<?>>
Переменная не определена (КОЛИЧЕСТВО)
Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
{D:\1C\1C БАЗА\STD2008\ОТЧЕТ ПО МАТЕРИАЛАМ2.ERT(61)}: Функция КоличествоСумма = Сумма(Количество <<?>> );
Запрос[11] : Ошибка в выражении 'Количество'
Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
{D:\1C\1C БАЗА\STD2008\ОТЧЕТ ПО МАТЕРИАЛАМ2.ERT(61)}: Группировка Наименование <<?>> упорядочить по Наименование.Наименование без групп;
Запрос[12] : Переменная 'Наименование' не опеределена

Добавлено спустя 1 минуту 45 секунд:

внешний отчет



Автор: Семен Семеныч
Добавлено: #2  Ср Июл 15, 2009 17:33:59
Заголовок сообщения:

Кстати, о детстве. В детстве таких, как вы, я убивал на месте. Из рогатки. © О.Бендер
Только не говорите, что текст запроса был сформирован конструктором, вы его скопипастили, причем криво 8))) , в "ПоступлениеMатериалов" у Вас ошибка



Автор: Банер
Добавлено: #3  Ср Июл 15, 2009 17:39:45
Заголовок сообщения:

Семен Семеныч говорит:
Кстати, о детстве. В детстве таких, как вы, я убивал на месте. Из рогатки. © О.Бендер
Только не говорите, что текст запроса был сформирован конструктором, вы его скопипастили, причем криво 8))) , в "ПоступлениеMатериалов" у Вас ошибка
знаю что ошибка,как исправить? вот в чем вопрос


Автор: Семен Семеныч
Добавлено: #4  Ср Июл 15, 2009 17:42:30
Заголовок сообщения:

В запросе, наименование объекта метаданных "ПоступлениеMатериалов", написано с ошибкой :lol:

Добавлено спустя 1 минуту 19 секунд:

посмотрите внимательно еще раз как написано "ПоступлениеMатериалов" у Вас и как в дереве метаданных

Добавлено спустя 10 минут 59 секунд:

Смотрим внимательно на картинку 8))) с думя колонками, первая колонка это ваша писанина символ-код символа, вторая моя символ-код символа[/img]



Автор: Solitary
Добавлено: #5  Ср Июл 15, 2009 17:56:38
Заголовок сообщения:

в 12-той ячейке строчке ошибка




Автор: Банер
Добавлено: #6  Ср Июл 15, 2009 17:57:59
Заголовок сообщения:

не открывается картинка


Автор: Семен Семеныч
Добавлено: #7  Ср Июл 15, 2009 17:58:42
Заголовок сообщения:

Solitary говорит:
в 12-той ячейке ошибка

:lol: ну тогда уж строке



Автор: Solitary
Добавлено: #8  Ср Июл 15, 2009 17:59:19
Заголовок сообщения:

Семен Семеныч
исправилась)))



Автор: VFrol
Добавлено: #9  Ср Июл 15, 2009 17:59:21
Заголовок сообщения:

Семен Семеныч
Смертельный номер!
Так я еще не проверял синтаксис в 1с.



Автор: Семен Семеныч
Добавлено: #10  Ср Июл 15, 2009 18:00:27
Заголовок сообщения:

Банер говорит:
не открывается картинка

Ну тогда найдите документ в дереве метеданных, скопируйте оттуда его идентификатор и везде замените свое "ПеремещениеМатериалов" на скопированный кусок :)
у Вас буква "М" в "ПеремещениеМатериалов" ЛАТИНИЦЕЙ написана

Добавлено спустя 2 минуты 12 секунд:

VFrol говорит:
Семен Семеныч
Смертельный номер!
Так я еще не проверял синтаксис в 1с.

За десять лет и не такое можно увидеть :D



Автор: VFrol
Добавлено: #11  Ср Июл 15, 2009 18:08:11
Заголовок сообщения:

Семен Семеныч
Не все понятно , эта ошибка частенько бывает , особенно , когда шрифты типа 1251a(от 3 лиц),
но чтобы по кодам разбирать , это сильно. Обычно копируешь и голову не ломаешь.



Автор: Банер
Добавлено: #12  Ср Июл 15, 2009 18:08:14
Заголовок сообщения:

не могу понять нгдеискать эти цифры

Добавлено спустя 4 минуты 2 секунды:

|Период с ВыбНачПериода по ВыбКонПериода;
|Обрабатывать НеПомеченныеНаУдаление;
|Сумма = Документ.ПоступлениеMатериалов.Сумма;
|Контрагент = Документ.ПоступлениеMатериалов.Контрагент;
|Количество = Документ.ПоступлениеMатериалов.Количество;
|НомерСтроки = Документ.ПоступлениеMатериалов.НомерСтроки;
|Цена = Документ.ПоступлениеMатериалов.Цена;
|Наименование = Документ.ПоступлениеMатериалов.ТМЦ;----------------заменить букву ?



Автор: Семен Семеныч
Добавлено: #13  Ср Июл 15, 2009 18:18:44
Заголовок сообщения:

Делаем проще.............
копируйте отсель

Добавлено спустя 1 минуту 8 секунд:

//*******************************************
// Процедура генерации запроса Сформировать.
//
Процедура Сформировать()
Перем Запрос, ТекстЗапроса, Таб;
//Создание объекта типа Запрос
Запрос = СоздатьОбъект("Запрос");
ТекстЗапроса =
"//{{ЗАПРОС(Сформировать)
|Период с ВыбНачПериода по ВыбКонПериода;
|Обрабатывать НеПомеченныеНаУдаление;
|Сумма = Документ.ПоступлениеМатериалов.Сумма;
|Контрагент = Документ.ПоступлениеМатериалов.Контрагент;
|Количество = Документ.ПоступлениеМатериалов.Количество;
|НомерСтроки = Документ.ПоступлениеМатериалов.НомерСтроки;
|Цена = Документ.ПоступлениеМатериалов.Цена;
|Наименование = Документ.ПоступлениеМатериалов.ТМЦ;
|Функция СуммаСумма = Сумма(Сумма);
|Функция КоличествоСумма = Сумма(Количество);
|"//}}ЗАПРОС
;

Если (фДокумент=1) и (фКонтрагент=0) Тогда
ТекстЗапроса =ТекстЗапроса+"Группировка Документ;";
ТекстЗапроса =ТекстЗапроса+"Группировка СтрокаДокумента;";
ТекстЗапроса =ТекстЗапроса+"Группировка Наименование упорядочить по Наименование.Наименование без групп;";
ИначеЕсли (фКонтрагент=1) и (фДокумент=0) Тогда
ТекстЗапроса =ТекстЗапроса+"Группировка Контрагент без упорядочивания;";
ТекстЗапроса =ТекстЗапроса+"Группировка Документ;";
ТекстЗапроса =ТекстЗапроса+"Группировка СтрокаДокумента;";
ТекстЗапроса =ТекстЗапроса+"Группировка Наименование упорядочить по Наименование.Наименование без групп;";
ИначеЕсли (фКонтрагент=1) и (фДокумент=1) Тогда
ТекстЗапроса =ТекстЗапроса+"Группировка Документ;";
ТекстЗапроса =ТекстЗапроса+"Группировка СтрокаДокумента;";
ТекстЗапроса =ТекстЗапроса+"Группировка Наименование упорядочить по Наименование.Наименование без групп;";
Иначе
ТекстЗапроса =ТекстЗапроса+"Группировка Наименование упорядочить по Наименование.Наименование без групп;";
КонецЕсли;

н=0;
ТекстКонтрагент ="";


Если мКонтрагент.Выбран()=1 Тогда
Если мКонтрагент.ЭтоГруппа()=1 Тогда
ТекстЗапроса = ТекстЗапроса + "Условие(Контрагент.Родитель=мКонтрагент);";
Иначе
ТекстЗапроса =ТекстЗапроса+"Условие(Контрагент=мКонтрагент);";
ТекстКонтрагент = ТекстКонтрагент+ ", """ + мКонтрагент+"""";
КонецЕсли;
КонецЕсли;

Если мНоменклатура.Выбран()=1 Тогда
Если мНоменклатура.ЭтоГруппа()=1 Тогда
ТекстЗапроса = ТекстЗапроса + "Условие(Наименование.Родитель=мНоменклатура);";
Иначе
ТекстЗапроса = ТекстЗапроса + "Условие (Наименование = мНоменклатура);";
КонецЕсли;
КонецЕсли;

Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
Возврат;
КонецЕсли;


// Подготовка к заполнению выходных форм данными запроса
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Сформировать");
// Заполнение полей "Заголовок"
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Сформировать");
Таб.ВывестиСекцию("Заголовок");
Состояние("Заполнение выходной таблицы...");
Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);


Если (фДокумент=1) и (фКонтрагент=0) Тогда

Пока Запрос.Группировка(1) = 1 Цикл
н=н+1;
Таб.ВывестиСекцию("Документ");
Пока Запрос.Группировка(2) = 1 Цикл
Пока Запрос.Группировка(3) = 1 Цикл
Таб.ВывестиСекцию("Наименование");
КонецЦикла;
КонецЦикла;
КонецЦикла;

ИначеЕсли (фКонтрагент=1) и (фДокумент=0) Тогда

Пока Запрос.Группировка(1) = 1 Цикл
н=н+1;
Таб.ВывестиСекцию("Контрагент");
Пока Запрос.Группировка(2) = 1 Цикл
Таб.ВывестиСекцию("Документ1");

Пока Запрос.Группировка(3) = 1 Цикл
Пока Запрос.Группировка(4) = 1 Цикл

Таб.ВывестиСекцию("Наименование1");

КонецЦикла;
КонецЦикла;
КонецЦикла;
КонецЦикла;

ИначеЕсли (фКонтрагент=1) и (фДокумент=1) Тогда


Пока Запрос.Группировка(1) = 1 Цикл
н=н+1;
Таб.ВывестиСекцию("Документ");
Таб.ВывестиСекцию("Контрагент1");
Пока Запрос.Группировка(2) = 1 Цикл
Пока Запрос.Группировка(3) = 1 Цикл
Таб.ВывестиСекцию("Наименование");
КонецЦикла;
КонецЦикла;
КонецЦикла;

Иначе

Пока Запрос.Группировка(1) = 1 Цикл
// Заполнение полей Наименование
н=н+1;
Таб.ВывестиСекцию("Наименование2");
КонецЦикла;


КонецЕсли;




// Заполнение полей "Итого"
Таб.ВывестиСекцию("Итого");
// Вывод заполненной формы
Таб.ТолькоПросмотр(1);
Таб.Показать("Сформировать", "");


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

Процедура ПриОткрытии()

ВыбНачПериода = НачалоПериодаБИ();
ВыбКонПериода = КонецПериодаБИ();
КонецПроцедуры // ПриОткрытии()

Добавлено спустя 3 минуты:

VFrol говорит:

но чтобы по кодам разбирать , это сильно.

:D извращенцы обычно ставят на тексты модулей подправленный шрифт (что бы явно различалась латиница и кириллица) или цепляют плагин к телепату для раскраски текстов модулей (тогда вообще по глазам бьть будут символы отличной кодировки)



Автор: Банер
Добавлено: #14  Ср Июл 15, 2009 18:24:24
Заголовок сообщения:

Получилось после замены "М" копированием из дерева


Автор: Семен Семеныч
Добавлено: #15  Ср Июл 15, 2009 18:28:59
Заголовок сообщения:

Банер говорит:
Получилось после замены "М" копированием из дерева

Предмет моей лекции — плодотворная дебютная идея. Что такое, товарищи, дебют и что такое, товарищи, идея? Дебют, товарищи, — это «Quasi una fantasia». А что такое, товарищи, значит идея? Идея, товарищи, — это человеческая мысль, облеченная в логическую шахматную форму. © О.Бендер
На этом многие обжигались :%):



Автор: Solitary
Добавлено: #16  Ср Июл 15, 2009 18:30:15
Заголовок сообщения:

Семен Семеныч говорит:
На этом многие обжигались

главное, что есть люди, которые могут разъяснить что к чему :wink:



Автор: Семен Семеныч
Добавлено: #17  Ср Июл 15, 2009 18:37:24
Заголовок сообщения:

Solitary говорит:

главное, что есть люди, которые могут разъяснить что к чему :wink:

:oops: Что? Я просто забочусь об успехе кампании. © Конь "Алеша Попович и Тугарин Змей"



Автор: Банер
Добавлено: #18  Чт Июл 16, 2009 09:40:18
Заголовок сообщения:

Очень хорошо сказано, еще раз все спасибо. А вот тоже самое только в восьмерке можно сделать ?


Автор: Семен Семеныч
Добавлено: #19  Чт Июл 16, 2009 09:52:04
Заголовок сообщения:

Банер говорит:
Очень хорошо сказано, еще раз все спасибо. А вот тоже самое только в восьмерке можно сделать ?

Честно говоря не совсем понял что нужно в 8ке сделать, если аналог отчета что мы правили выше - то легко делается с помошью компоновки данных или конструктора выходных форм



Автор: Банер
Добавлено: #20  Чт Июл 16, 2009 10:36:18
Заголовок сообщения:

Семен Семеныч это в программе делается или в конфигураторе?Я еще все особенности восьмерки не изучил а книги все у меня только по семерке есть.


Автор: Семен Семеныч
Добавлено: #21  Чт Июл 16, 2009 10:43:25
Заголовок сообщения:

Банер говорит:
Семен Семеныч это в программе делается или в конфигураторе?Я еще все особенности восьмерки не изучил а книги все у меня только по семерке есть.

В конфигураторе, "компоновка данных" и "конструктор выходных форм" эт прибамбысы 8ки
Они облегчают создание отчетов (в том числе и очень сложных) с помощью визуальных средств
Тут мышкой кликнул, тут немного пощелкал ....... вуаля .... есть отчет (правда требует доработки напильником если нужны свои макеты, оформление и т.д. и т.п.)



Автор: банер-
Добавлено: #22  Чт Июл 16, 2009 12:37:04
Заголовок сообщения:

Семен Семеныч говорит:
Банер говорит:
Семен Семеныч это в программе делается или в конфигураторе?Я еще все особенности восьмерки не изучил а книги все у меня только по семерке есть.

В конфигураторе, "компоновка данных" и "конструктор выходных форм" эт прибамбысы 8ки
Они облегчают создание отчетов (в том числе и очень сложных) с помощью визуальных средств
Тут мышкой кликнул, тут немного пощелкал ....... вуаля .... есть отчет (правда требует доработки напильником если нужны свои макеты, оформление и т.д. и т.п.)
че та не нашел ничего подобного в конфигурвторе ,чем дальше тем интереснее ,хочется узнать больше чем нужно, интересная программа эта 1с7и 8.


Автор: Семен Семеныч
Добавлено: #23  Пт Июл 17, 2009 09:42:31
Заголовок сообщения:

банер- говорит:
че та не нашел ничего подобного в конфигурвторе ,чем дальше тем интереснее ,хочется узнать больше чем нужно, интересная программа эта 1с7и 8.

На курсы и не партесь .......
не там скали наверно .........
в конфигураторе ......
создаете новый отчет ......
а там кнопка действия/конструкторы/конструктор выходных форм
или открыть схему компоновки данных ......



Автор: Банер
Добавлено: #24  Пт Июл 17, 2009 15:16:37
Заголовок сообщения:

не создается новый отчет ,только старый можно редактировать,кнопки "добавить" и "вставить внешнюю оболочку" не активны


Автор: d.Fedor
Добавлено: #25  Пт Июл 17, 2009 15:48:22
Заголовок сообщения:

Банер
Включить возможность редактирования конфигурации в поддержке..



Автор: Cleaner
Добавлено: #26  Сб Июл 18, 2009 01:15:10
Заголовок сообщения:

d.Fedor говорит:
Включить возможность редактирования конфигурации в поддержке.

Ппц. В базовой.



Автор: d.Fedor
Добавлено: #27  Сб Июл 18, 2009 10:24:51
Заголовок сообщения:

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



Автор: Cleaner
Добавлено: #28  Сб Июл 18, 2009 11:52:13
Заголовок сообщения:

d.Fedor говорит:
купить версию для обучения програмированию... Стоит копейки а полезного много, платформа и главное книжка.

Вот это гораздо лучше. За 3000 казахских рублей огромный объем информации.



Автор: Банер
Добавлено: #29  Вс Июл 19, 2009 12:17:45
Заголовок сообщения:

d.Fedor говорит:
Cleaner
Увы не проследил за тем что у автора базовая, тады в магазин ближайшего партнера, купить версию для обучения програмированию... Стоит копейки а полезного много, платформа и главное книжка...
Если бы остальные програмисты были такие подкованые как на балансе, тогда меньше проблем было не только у бухгалтеров но и предпринммателей. Эту версию подсунул довольно опытный специалист, пришлось работать с тем что имеем , возможности не всегда совпадает с запросами.Спасибо за консультацию.


Автор: d.Fedor
Добавлено: #30  Пн Июл 20, 2009 07:25:25
Заголовок сообщения:

Банер
Не соглашусь с тем что "подсунул".. хотя конечно может быть все. Зачастую базовую покупают те кто хочет поменьше заплатить. Узнают что есть программа стоящая копейки, но позволяющая вести учет и ..покупают. Потом обвиняют продавца в том что он "не сказал ничего". Я сам продавал и сталкивался зачастую, что рассказываеш все, про отличия, предупреждаеш что нельзя будет делать, но берут что дешевле, потом приходят и мне говорят "нам при покупке не сказали", после объяснения что продавал им именно я и я не мог не сказать, пытаються замять разговор и получить скидку...



  

Служба поддержки WWW.BALANS.KZ