Заказы на доработку 1С (сервис удаленной работы)

Хранилище

База знаний
Неназначенных незавершенных заказов: 2
Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Вход | Зарегистрироваться )



> Журнал-Ордер по субконто , Переробити отчет          
SeraArej Подменю пользователя
сообщение 18.06.10, 9:26
Сообщение #1

Общительный
**
Группа: Пользователи
Сообщений: 39
Спасибо сказали: 0 раз
Рейтинг: 0

Привіт, В мене стоїть 1С предприятие 7,7 конф.-278 під СКЛ сервер, питання стоїть в тому що при створенні ЖО по субконто по горизонталі дебета и кредита викидає занадто силюну розшифровку для субщетів - типу 37рахунок/371/377/і внас є ще група субрахунків для 377 це 377,1. Як мене прописати в модулі форми ЖО, так щоб невисвічувалась хочаб допустим 37 група дуже загромаджує ЖО висвічування всіх цих груп(( Для конкретності нам необхідно щоб ЖО будувався з самих субрахунків розшифровки груп) Наперед дякую, задумку виклав словами як зміг) 31000000.gif

Vofka Подменю пользователя
сообщение 18.06.10, 13:18
Сообщение #2

У нас здесь своя атмосфера...
***********
Группа: Основатель
Сообщений: 13955
Из: Киев
Спасибо сказали: 4520 раз
Рейтинг: 3642.8

[необходимо зарегистрироваться для просмотра ссылки]
Для потрібного ефекту ставте галку "Не учитывать группы". Підходить?
ПС. Писав для ПУБа, але думаю для Бухгалтерії теж підійде

Спасибо сказали: Alan68,

Alan68 Подменю пользователя
сообщение 18.06.10, 14:14
Сообщение #3

Завсегдатай
Иконка группы
Группа: Местный
Сообщений: 146
Спасибо сказали: 218 раз
Рейтинг: 0

СПС. Малость наодо подправить: выдает сообщение
Если глПроверкаИнтервалаОтчета<<?>>(Дата1,Дата2) = 0 Тогда
{,,,,,,,,,,,,,,,,,,,,,\ЖУРНАЛОРДЕРПОСУБКОНТО.ERT(171)}: Функция не обнаружена (глПроверкаИнтервалаОтчета)
Сейчас поковыряем.

Vofka Подменю пользователя
сообщение 18.06.10, 15:35
Сообщение #4

У нас здесь своя атмосфера...
***********
Группа: Основатель
Сообщений: 13955
Из: Киев
Спасибо сказали: 4520 раз
Рейтинг: 3642.8

// ===============================
// проверка корректности заданного периода
// если БухПроверка = 1, делается проверка на выход за пределы
//    рассчитанного периода бухгалтерских итогов (только для бухгалтерских отчетов),
//    для всех остальных случаев БухПроверка = 0
Функция глПроверкаИнтервалаОтчета(ДатаНачала,ДатаКонец,БухПроверка=1) Экспорт
    Если ПустоеЗначение(ДатаНачала)=1 Тогда
        Предупреждение("Необходимо задать дату начала отчета!");
        Возврат 0;
    КонецЕсли;
    Если ПустоеЗначение(ДатаКонец)=1 Тогда
        Предупреждение("Необходимо задать дату конца отчета!");
        Возврат 0;
    КонецЕсли;
    Если ДатаКонец<ДатаНачала  Тогда
        Предупреждение("Дата начала отчета должна быть не позже даты конца отчета!");
        Возврат 0;
    КонецЕсли;
    Если БухПроверка = 1 Тогда
        Если ДатаКонец > КонецРассчитанногоПериодаБИ() Тогда
            Предупреждение("За выбранный период итоги не рассчитаны!"+РазделительСтрок+
                           "Расчет итогов выполняется в режиме"+РазделительСтрок+
                           """Операции - Управление бухгалтерскими итогами"".");
            Возврат 0;
        КонецЕсли;
    КонецЕсли;
    Возврат 1;
КонецФункции //глПроверкаИнтервалаОтчета

Спасибо сказали: Alan68,

SeraArej Подменю пользователя
сообщение 21.06.10, 7:08
Сообщение #5

Общительный
**
Группа: Пользователи
Сообщений: 39
Спасибо сказали: 0 раз
Рейтинг: 0

Цитата(Vofka @ 18.06.10, 17:35) *
// ===============================
// проверка корректности заданного периода
// если БухПроверка = 1, делается проверка на выход за пределы
//    рассчитанного периода бухгалтерских итогов (только для бухгалтерских отчетов),
//    для всех остальных случаев БухПроверка = 0
Функция глПроверкаИнтервалаОтчета(ДатаНачала,ДатаКонец,БухПроверка=1) Экспорт
    Если ПустоеЗначение(ДатаНачала)=1 Тогда
        Предупреждение("Необходимо задать дату начала отчета!");
        Возврат 0;
    КонецЕсли;
    Если ПустоеЗначение(ДатаКонец)=1 Тогда
        Предупреждение("Необходимо задать дату конца отчета!");
        Возврат 0;
    КонецЕсли;
    Если ДатаКонец<ДатаНачала  Тогда
        Предупреждение("Дата начала отчета должна быть не позже даты конца отчета!");
        Возврат 0;
    КонецЕсли;
    Если БухПроверка = 1 Тогда
        Если ДатаКонец > КонецРассчитанногоПериодаБИ() Тогда
            Предупреждение("За выбранный период итоги не рассчитаны!"+РазделительСтрок+
                           "Расчет итогов выполняется в режиме"+РазделительСтрок+
                           """Операции - Управление бухгалтерскими итогами"".");
            Возврат 0;
        КонецЕсли;
    КонецЕсли;
    Возврат 1;
КонецФункции //глПроверкаИнтервалаОтчета


Дякую за поміч, але також викидає помилку, а при внесені даних коректив їх становиться ще більше, можливо я їх не туди вношу? Якщо дивитись по файлу закидаю в 171 строку)

SeraArej Подменю пользователя
сообщение 22.06.10, 6:52
Сообщение #6

Общительный
**
Группа: Пользователи
Сообщений: 39
Спасибо сказали: 0 раз
Рейтинг: 0

Всім дякую проблемку рішив сам, правда деревяним і може довшим способом, але працює. Просто зробив виключення рахунків груп з ордера, кому буде необхідно виложив би код но чомусь його закидаэ кирилецею(((

Vofka Подменю пользователя
сообщение 22.06.10, 11:00
Сообщение #7

У нас здесь своя атмосфера...
***********
Группа: Основатель
Сообщений: 13955
Из: Киев
Спасибо сказали: 4520 раз
Рейтинг: 3642.8

Alan68, а ты разобрался, работает?

Alan68 Подменю пользователя
сообщение 22.06.10, 12:07
Сообщение #8

Завсегдатай
Иконка группы
Группа: Местный
Сообщений: 146
Спасибо сказали: 218 раз
Рейтинг: 0

Полностью не (ковырял) вникал, не было времени посидеть.
А с наскоку выдало вот такую ошибку

ИначеЕсли РазделительУчета.Выбран() = 1 Тогда
{,,,,,,,,,,,,,,,,,,,,,ЖУРНАЛОРДЕРПОСУБКОНТО.ERT(224)}: Значение не представляет агрегатный объект (Выбран)
По свободе отредактирую

MATEVI Подменю пользователя
сообщение 22.06.10, 12:48
Сообщение #9

Отдыхающий
Иконка группы
Ветеран троянской войныМодератору Про1С (за заслуги в 2011 году)
Группа: Местный
Сообщений: 2201
Из: Одесса
Спасибо сказали: 956 раз
Рейтинг: 0

Цитата(Alan68 @ 22.06.10, 14:07) *
Полностью не (ковырял) вникал, не было времени посидеть.
А с наскоку выдало вот такую ошибку

ИначеЕсли РазделительУчета.Выбран() = 1 Тогда
{,,,,,,,,,,,,,,,,,,,,,ЖУРНАЛОРДЕРПОСУБКОНТО.ERT(224)}: Значение не представляет агрегатный объект (Выбран)
По свободе отредактирую



Угадаю. РУ не включен. В бухии.
Надо Если глИспользуетсяРазделительУчета = 1 Тогда

Alan68 Подменю пользователя
сообщение 22.06.10, 13:39
Сообщение #10

Завсегдатай
Иконка группы
Группа: Местный
Сообщений: 146
Спасибо сказали: 218 раз
Рейтинг: 0

Тестил на демке, а там действительно РУ не включен.
Но при Надо Если глИспользуетсяРазделительУчета = 1 Тогда
Ошибка вот такая
Если Метаданные.РазделительУчета.Выбран = 1 Тогда
{,,,,,,,,,,,,,,,\ЖУРНАЛОРДЕРПОСУБКОНТО.ERT(869)}: Поле агрегатного объекта не обнаружено (Выбран)

На рабочей бухии все пляшет. Еще раз спасибо Vofka icon_beer17.gif

Vofka Подменю пользователя
сообщение 22.06.10, 15:03
Сообщение #11

У нас здесь своя атмосфера...
***********
Группа: Основатель
Сообщений: 13955
Из: Киев
Спасибо сказали: 4520 раз
Рейтинг: 3642.8

Цитата
Если Метаданные.РазделительУчета.Выбран = 1 Тогда

Попробуй
Если Метаданные.РазделительУчета.Выбран() = 1 Тогда


Цитата
Еще раз спасибо Vofka

Пожалуйста smile.gif . Рад помочь

Не нашли ответа на свой вопрос?
Зарегистрируйтесь и задайте новый вопрос.


Ответить Новая тема
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

RSS Текстовая версия Сейчас: 27.04.24, 10:23
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!