/ КОМПЬЮТЕРЫ И ПО / Языки программирования / 1С для программиста

Выпуск № 804
от 10.07.2008, 07:35

Вопрос № 139.010

вопрос по 1с 7.7 можно ли используя журнал регистрации отследить действия пользователя над объектами, выполненные внешними обработками?

Отправлен: 04.06.2008, 14:59 Вопрос задала: Оксана/kasy (статус: Посетитель) Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Maximush Здравствуйте, Оксана/kasy! В общем случае - нет. Журнал регистрации не регистрирует события вроде Док.Записать(). В общем то оно и правильно - иначе журнал бы рос очень быстро. Однако иногда хотелось бы получить полный контроль за действиями пользователей. Я обычно делаю таким образом - четко ограничиваю какие обработки используются пользователями(и запрещаю использование остальных). В модули этих обработок , в нужных местах (например после записи документа или элемента справочника), встраиваю вызовы процедуры ЗаписьЖурналаРегистрации(....) (синтаксис в синтакс-помошнике).

Ответ отправил: Maximush (статус: 3-ий класс) Ответ отправлен: 04.06.2008, 15:17

Отвечает: Strawberry Здравствуйте, Оксана/kasy! Можно если внешняя обработка фиксирует свои действия в журнале регистрации. Например пользуйте метод ЗаписьЖурналаРегистрации(,,,,); Приложение: ЗаписьЖурналаРегистрации(<?>,,,,); Синтаксис: ЗаписьЖурналаРегистрации(<Коммент>,<ТипСобытия>,<Событие>,<Объект>,<Категория>) Назначение: Выводит строку текста в системный журнал регистрации. Параметры: <Коммент> - строковое выражение, комментарий к событию. Если этот параметр - единственный переданный при вызове метода, то тогда в журнал записывается стандартное дополнительное событие с указанным комментарием. <ТипСобытия> - необязательный параметр. Строковое выражение - тип события. По умолчанию или при пустой строке ''Дополнительные события''. <Событие> - необязательный параметр. Строковое выражение - событие. По умолчанию ''Дополнительное событие''. <Объект> - необязательный параметр. Объект события, по умолчанию отсутствует. Для переданных в функцию объектов типа Документ/ Справочник/ Счет представление объекта будет записано автоматически (это не зависит от типа события и самого события). <Категория> - необязательный параметр. Число - категория события: 1 - администрирование; 2 - изменение данных; 3 - информация; 4 - предупреждение; 5 - ошибка. Значение по умолчанию 3. Замечание: Системой зарезервирован большой перечень типов событий/события. Незарезервированные имена позволяют пользователю фактически указывать свои собственные типы событий и события. Подробнее см. в документации гл. --------- Мальчик-извращенец прочел деду Морозу с табуретки всего Пастернака!

Ответ отправил: Strawberry (статус: Студент) Ответ отправлен: 04.06.2008, 15:50

Вопрос № 139.102

Уважаемые эксперты, подскажите, что я делаю не так. Пытаюсь запросом выбрать все интересующие меня сведения из документов ПродажаВРозницу (Бухгалтерия 7.7). Есть два документа с одним и тем же товаром. Запрос возвращает только последний документ. Приложение: Процедура Сформировать() Перем Запрос, ТекстЗапроса, Таб; Если ПроверкаПериода() = 0 Тогда Возврат; КонецЕсли; //Создание объекта типа Запрос Запрос = СоздатьОбъект("Запрос"); ТекстЗапроса = "//{{ЗАПРОС(Сформировать) |Период с ВыбНачПериода по ВыбКонПериода; |Без итогов; |ПродажаВРозницу = Документ.ПродажаВРозницу.ТекущийДокумент; |МестоХранения = Документ.ПродажаВРозницу.МестоХранения; |Товар = Документ.ПродажаВРозницу.Товар; |ВидНоменклатуры = Документ.ПродажаВРозницу.Товар.ВидНоменклатуры; |Количество = Документ.ПродажаВРозницу.Количество; |Цена = Документ.ПродажаВРозницу.Цена; |Сумма = Документ.ПродажаВРозницу.Сумма; |Группировка Товар без групп; |Группировка Цена; |" ; Если выбТовары.РазмерСписка()>0 Тогда ТекстЗапроса=ТекстЗапроса+"Условие(Товар в выбТовары);"; КонецЕсли; Если СписокКатегорий.РазмерСписка()>0 Тогда ТекстЗапроса=ТекстЗапроса+"Условие(ВидНоменклатуры в СписокКатегорий);"; КонецЕсли; Если СписокСкладов.РазмерСписка()>0 Тогда ТекстЗапроса=ТекстЗапроса+"Условие(МестоХранения в СписокСкладов);"; КонецЕсли; // Если ошибка в запросе, то выход из процедуры Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда Возврат; КонецЕсли; Таб = СоздатьОбъект("Таблица"); Таб.ИсходнаяТаблица("АктРеализации"); // Заполнение полей "Заголовок" Таб.ВывестиСекцию("шапка"); Состояние("Заполнение выходной таблицы..."); Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0); // ИтогСуммаУчетн=0; ИтогСуммаРеализ=0; Пока Запрос.Группировка() = 1 Цикл Док=Запрос.ПродажаВРозницу; Товар= ЗАпрос.Товар; Количество=ЗАпрос.Количество; ЦенаРеализ =ЗАпрос.Цена; СуммаРеализ=ЗАпрос.Сумма; Опер=СоздатьОбъект("Операция"); Опер.НайтиОперацию(Док); Опер.ВЫбратьПроводки() ; Пока Опер.ПолучитьПроводку()=1 Цикл СчетДебет=Опер.Дебет.Счет; СчетКредит=Опер.Кредит.Счет; Если (СчетДебет.ПринадлежитГруппе(СчетПоКоду("90"))=1 ) и ((СчетКредит.ПринадлежитГруппе(СчетПоКоду("41"))=1) или (СчетКредит=СчетПоКоду("43"))) и (Опер.Кредит.Номенклатура=ЗАпрос.Товар) Тогда ЦенаУчетн=Опер.Сумма/Опер.Количество; СуммаУчетн=Опер.Сумма; Наценка=Формат(((СуммаРеализ-СуммаУчетн)/СуммаУчетн)*100,"Ч12.2") ; Таб.ВывестиСекцию("Строка"); ИтогСуммаУчетн=ИтогСуммаУчетн+СуммаУчетн; ИтогСуммаРеализ=ИтогСуммаРеализ+СуммаРеализ; КонецЕсли; КонецЦикла; КонецЦикла; Если (ИтогСуммаРеализ=0) и(ИтогСуммаУчетн=0) Тогда Иначе ИтогНаценка=Формат(((-ИтогСуммаУчетн)/ИтогСуммаУчетн)*100,"Ч12.2") ; КонецЕсли; Таб.ВывестиСекцию("Подвал"); Таб.ТолькоПросмотр(1); Таб.Показать("Сформировать1", ""); КонецПроцедуры

Отправлен: 05.06.2008, 08:57 Вопрос задал: KripWorland (статус: Посетитель) Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Ovr1970 Здравствуйте, KripWorland! Нужна дополнительная группировка по документам, возможно вместо цены. В противном случае при группировке теряются лишние значения

Ответ отправил: Ovr1970 (статус: Практикант) Ответ отправлен: 05.06.2008, 14:06

Отвечает: Maximush Здравствуйте, KripWorland! Проблема, на мой взгляд именно с группровками. 1. Если вы не используете группировку по ценам - зачем она там вообще? 2. Сделайте две группировки: ... |Группировка ПродажаВРозницу ; |Группировка Товар без групп; ... 3. обходите обе группировки Пока Запрос.Группировка(1) = 1 Цикл //ЗДЕСЬ МОЖНО ОБРАТИТЬСЯ К ДОКУМЕНТУ Пока Запрос.Группировка(2) = 1 Цикл //Здесь можно обратиться к товару в этом документе, ну и к самому документу тоже еще можно :) //т.е. здесь (если необходимо) и ковыряемся в операции документа КонецЦикла; КонецЦикла; либо наоборот , сначала товар, потом документ сама структура запроса кажется не очень логичной... я бы попробывал переписать запрос ориентируясь на операцию...

Ответ отправил: Maximush (статус: 3-ий класс) Ответ отправлен: 05.06.2008, 19:50

Вопрос № 139.258

Уважаемые эксперты. Помогите, пожалуйста, очень нужно. При запуске конфигуратора ЗиК Происходит сбой, и выходить сообщение «1C: V7 starter program(multi-user)-обнаружена ошибка приложение будет закрыто.» Затем выходит сообщение «Инструкция по адресу «0х00640072» обратилась к памяти по адресу «0х00640072».память не может быть «read» При запуске в режиме «Предприятия» все нормально загружается, при запуске конф-ра с другого ПК под тем же пользователем все работает нормально. Другие базы в конфиг-ре нормально грузиться. Если эту же базу восстановить в другом и месте и запустить с оттого ПК тоже все хорошо работает.

Отправлен: 06.06.2008, 05:45 Вопрос задала: Надежда (статус: Посетитель) Всего ответов: 4 Мини-форум вопроса >>> (сообщений: 1)

Отвечает: Ромашов Евгений Николаевич Здравствуйте, Надежда! а если с другого компьютера попробывать провести тестирование и исправление, если не поможет надо поробывать переустановить 1с

Ответ отправил: Ромашов Евгений Николаевич (статус: 7-ой класс) Ответ отправлен: 06.06.2008, 07:58

Отвечает: Игорь К. Здравствуйте, Надежда! Такое впечатление, что у Вас проблема не с 1С, а с диском. 1.Сделайте резервную копию. 2.Удалите каталог базы. 3.Сделайте проверку диска средствами операционной системы. Мой компьютер->Локальный Диск C:, D: (где база была)->правая кнопка мыши->Свойства->Вкладка:Сервис->Проверка тома на наличие ошибок->Кнопка:Выполнить проверку. 4.Восстановите базу из копии на прежнее место. Удачи! --------- Если хорошенько подумать, - можно разобраться в чем угодно. Даже в устройстве летающей тарелки.

Ответ отправил: Игорь К. (статус: 6-ой класс) Ответ отправлен: 06.06.2008, 08:23 Оценка за ответ: 4 Комментарий оценки: Спасибо за ответ.

Отвечает: Астафьев Александр Николаевич Здравствуйте, Надежда! Если с другого когмпьютера при обращении к указанной базе данных конфигуратор нормально загружается значить проблема не в базе а в 1С Предприятии. Переустановите 1С Предприятие . Причем удаляете Пуск - Настройки - Панель управления - Установка Удаление программ. Затем ОБЯЗАТЕЛЬНО удаляете папку BIN, если она останется, в которой лежат файлы 1С Предприятия. Потом устанавливаете программу 1С заново. Сама база может оставаться на месте.

Ответ отправил: Астафьев Александр Николаевич (статус: Студент) Ответ отправлен: 06.06.2008, 14:19 Оценка за ответ: 5 Комментарий оценки: Спасибо за ответ действительно что-то произошло с запуском . Переустанавливать базу пока не стала поступила проще, поменяла имя базы. и все заработало. Но хотелось бы знать какой файл в папке BIN отвечает за параметры запуска базы(или это прописано в реестре).

Отвечает: Глумов Владимир Здравствуйте, Надежда! Еще один совет - посмотрите сколько свободного места на диске С: - там обычно располагаются временные файлы 1С. Удалите все временные файлы, т.е. почистите диск Удачи!

Ответ отправил: Глумов Владимир (статус: 1-ый класс) Ответ отправлен: 06.06.2008, 21:27 Оценка за ответ: 4 Комментарий оценки: удаление временных файлов не помогло

Вопрос № 139.271

Уважаемые эксперты. Пожалуйста подскажите как сделать учкбную копию 1с зарплата v7. Зарание спасибо.

Отправлен: 06.06.2008, 09:06 Вопрос задал: Сергей Иванов (статус: Посетитель) Всего ответов: 3 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Ромашов Евгений Николаевич Здравствуйте, Сергей Иванов! ставишь демо версию или пустую базу

Ответ отправил: Ромашов Евгений Николаевич (статус: 7-ой класс) Ответ отправлен: 06.06.2008, 09:26

Отвечает: temniy Здравствуйте, Сергей Иванов! Если Вам необходимо сделать копию. Скопируйте каталог базы данных и подсоедините при запуске 1С эту новую базу. Кнопка добавить при запуске 1С, там выбирете путь к данному (скопированному каталогу). В общем случае при установке конфигурации. В дистрибутив конфигурации входит демонстрационная база данных. Т.Е. , если Вы устанавливаете конфигурацию с нуля демо- база установится автоматически .

Ответ отправил: temniy (статус: 6-ой класс) Ответ отправлен: 06.06.2008, 10:49

Отвечает: Кулевский Сергей Владимирович Здравствуйте, Сергей Иванов! В режиме конфигуратора: в исходной БД Администрирование -> "Сохранить данные" (если файловая БД) Администрирование -> "Выгрузить данные" (если клиент-серверная БД) в копии Администрирование -> "Восстановить данные" (если файловая БД) Администрирование -> "Загрузить данные" (если клиент-серверная БД)

Ответ отправил: Кулевский Сергей Владимирович (статус: 5-ый класс) Ответ отправлен: 06.06.2008, 16:15

Вопрос № 139.299

Здравствуйте уважаемые эксперты. Помогите, пожалуйста по 8.1 с запросом. Запрос выбирает данные из таблицы Номенклатура и из виртуальной таблицы Цены.СрезПоследних. В результате выходит следующая таблица: ТОВАР ТИПЦЕН ЦЕНА Товар1 ОптоваяЦена 5 Товар1 Розничная цена 10 Товар2 ОптоваяЦена 20 Товар2 Розничная цена 30 Как сделать, чтоб результат запроса выводился не по вертикали (по строках) а по горизонтали (по колонках), т.е. так: ТОВАР ТИПЦЕН ОптоваяЦена РозничнаяЦена Товар1 5 10 Товар2 20 30 Большое спасибо.

Отправлен: 06.06.2008, 11:41 Вопрос задал: М.Денис (статус: Посетитель) Всего ответов: 4 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Трифанюк Александр Дмитриевич Здравствуйте, М.Денис! Загоните результат запроса в таблицу значений и делайте с ним всё что угодно.

Ответ отправил: Трифанюк Александр Дмитриевич (статус: 3-ий класс) Ответ отправлен: 06.06.2008, 11:44

Отвечает: temniy Здравствуйте, М.Денис! выбрать товар, ценаоптовая, ценарозничная ( выбрать товар, цена КАК ценаоптовая из ЦеныСрезпоследних где типцен=&оптовая КАК Запрос1 полное соединение выбрать товар,цена КАК ценарозничная из ЦеныСрезпоследних где типцен=&розничные КАК Запрос2 по Запрос1.товар=Запрос2.Товар ) КАК Вложенный что то типа такого но лень расписывать главное идея

Ответ отправил: temniy (статус: 6-ой класс) Ответ отправлен: 06.06.2008, 11:56

Отвечает: Шутяев Игорь Здравствуйте, М.Денис! В этом случае надо заранее знать, какие типы цен у вас есть в регистре сведений - они будут впрямую упомянуты в запросе (можно и более общую написать обработку, которая сама определит, какие есть типы цен, но это довольно сложно, громозко, во всяком случае). Простой запрос в приложении Приложение: ВЫБРАТЬ Товар КАК Товар, Сумма(Выбор Когда ТипЦен="Оптовая" Тогда Цена Иначе 0 Конец) КАК ОптоваяЦена, Сумма(Выбор Когда ТипЦен="Розничная" Тогда Цена Иначе 0 Конец) КАК РозничнаяЦена ....... (если еще есть типы) ИЗ ....... СГРУППИРОВАТЬ ПО Товар

Ответ отправил: Шутяев Игорь (статус: 4-ый класс) Ответ отправлен: 06.06.2008, 12:23

Отвечает: Кулевский Сергей Владимирович Здравствуйте, М.Денис! Используйте лучше для этих целей компоновку данных. Там это можно реализовать стандартными средствами с помощью конструктора.

Ответ отправил: Кулевский Сергей Владимирович (статус: 5-ый класс) Ответ отправлен: 06.06.2008, 16:13

© 2001-2008, Портал RusFAQ.ru, Россия, Москва. Авторское право: ООО "Мастер-Эксперт Про" Техподдержка портала, тел.: +7 (926) 535-23-31 Хостинг: "Московский хостер" Поддержка: "Московский дизайнер" Авторские права | Реклама на портале ∙ Версия системы: 4.99 RC 5.0 от 08.07.2008
RusFAQ.ru | MosHoster.ru | MosDesigner.ru | RusIRC.ru Kalashnikoff.ru | RadioLeader.ru | RusFUCK.ru