Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
22 ноя 2024, 17:05

Проводка по одинаковым счетам

Автор Konstatine, 23 июн 2014, 16:38

0 Пользователей и 1 гость просматривают эту тему.

Konstatine

Добрый день, уважаемые форумчане!
Прошу помочь советом по следующему вопросу:
Имеется документ - передача остатков по кассе. Соответственно формируется документ Дт 50.01 (Субконто1 - Подразделение №1) - Кт 50.01 (Субконто1 - Подразделение №2).
При попытке посчитать остаток программа решительно пропускает проводки с одинаковыми счетами, хотя субконто1 указывается. Код запроса стандартный:
"ВЫБРАТЬ
  |   Сумма(ХозрасчетныйОстатки.СуммаОстаток) КАК СуммаОстаток
   |ИЗ
  |   РегистрБухгалтерии.Хозрасчетный.Остатки(, Счет = &Счет, , ) КАК ХозрасчетныйОстатки
  |ГДЕ
   |   ХозрасчетныйОстатки.Субконто1 = &Подразделение";
Запрос.УстановитьПараметр("Подразделение",Объект.Подразделение);
Запрос.УстановитьПараметр("Счет",ПланыСчетов.Хозрасчетный.КассаОрганизации);
Бухгалтерия 2.0, управляемое приложение.
Буду рад любому дельному совету..

Snaky

Цитата: Konstatine от 23 июн 2014, 16:38
Добрый день, уважаемые форумчане!
Прошу помочь советом по следующему вопросу:
Имеется документ - передача остатков по кассе. Соответственно формируется документ Дт 50.01 (Субконто1 - Подразделение №1) - Кт 50.01 (Субконто1 - Подразделение №2).
При попытке посчитать остаток программа решительно пропускает проводки с одинаковыми счетами, хотя субконто1 указывается. Код запроса стандартный:
"ВЫБРАТЬ
  |   Сумма(ХозрасчетныйОстатки.СуммаОстаток) КАК СуммаОстаток
   |ИЗ
  |   РегистрБухгалтерии.Хозрасчетный.Остатки(, Счет = &Счет, , ) КАК ХозрасчетныйОстатки
  |ГДЕ
   |   ХозрасчетныйОстатки.Субконто1 = &Подразделение";
Запрос.УстановитьПараметр("Подразделение",Объект.Подразделение);
Запрос.УстановитьПараметр("Счет",ПланыСчетов.Хозрасчетный.КассаОрганизации);
Бухгалтерия 2.0, управляемое приложение.
Буду рад любому дельному совету..
Если вы в рамках одного счета делаете движения, и потом получаете по нему остаток на счете по сути ничего не меняется, добавьте в запросе "Субконто1", а так не будет видно, т.к. остатки всего счета не изменились.
И еще, уберите СУММУ из поля, и субконто1 засуньте внутрь условия выборки регистра.

Konstatine

Спасибо, попробовал. Но результата нет. В если заходит и остаток = 0:
   
        Запрос = Новый Запрос;
   Запрос.Текст =
      "ВЫБРАТЬ
      |   ХозрасчетныйОстатки.СуммаОстаток КАК СуммаОстаток
               |ИЗ
        |   РегистрБухгалтерии.Хозрасчетный.Остатки(, Счет = ЗНАЧЕНИЕ(ПланСчетов.Хозрасчетный.КассаОрганизации), , Субконто1 = &Субконто1) КАК ХозрасчетныйОстатки";
   Запрос.УстановитьПараметр("Субконто1",Объект.Подразделение);
   ОстатокВКассе = Запрос.Выполнить().Выгрузить();                                                      
   Если ОстатокВКассе.Количество() > 0 Тогда
      Возврат Строка(ОстатокВКассе[0].СуммаОстаток);                 
   КонецЕсли;
Подскажите, как все-таки можно вывести остатки в разрезе подразделений (касс)? Наверняка ведь есть выход.

LexaK

ну дали же совет:
"Если вы в рамках одного счета делаете движения, и потом получаете по нему остаток на счете по сути ничего не меняется, добавьте в запросе "Субконто1", а так не будет видно, т.к. остатки всего счета не изменились.
"

надо в запрос добавить строку ХозрасчетныйОстатки.Субконто1,
см. пример.

"ВЫБРАТЬ
       |   ХозрасчетныйОстатки.Субконто1,
       |   ХозрасчетныйОстатки.СуммаОстаток
      |ИЗ
        |   РегистрБухгалтерии.Хозрасчетный.Остатки(, Счет = ЗНАЧЕНИЕ(ПланСчетов.Хозрасчетный.КассаОрганизации), , Субконто1 = &Субконто1) КАК ХозрасчетныйОстатки";
    Запрос.УстановитьПараметр("Субконто1",Объект.Подразделение);
если помогло нажмите: Спасибо!

Snaky

Цитата: Konstatine от 23 июн 2014, 18:07
Спасибо, попробовал. Но результата нет. В если заходит и остаток = 0:
   
        Запрос = Новый Запрос;
   Запрос.Текст =
      "ВЫБРАТЬ
      |   ХозрасчетныйОстатки.СуммаОстаток КАК СуммаОстаток
               |ИЗ
        |   РегистрБухгалтерии.Хозрасчетный.Остатки(, Счет = ЗНАЧЕНИЕ(ПланСчетов.Хозрасчетный.КассаОрганизации), , Субконто1 = &Субконто1) КАК ХозрасчетныйОстатки";
   Запрос.УстановитьПараметр("Субконто1",Объект.Подразделение);
   ОстатокВКассе = Запрос.Выполнить().Выгрузить();                                                      
   Если ОстатокВКассе.Количество() > 0 Тогда
      Возврат Строка(ОстатокВКассе[0].СуммаОстаток);                 
   КонецЕсли;
Подскажите, как все-таки можно вывести остатки в разрезе подразделений (касс)? Наверняка ведь есть выход.
Прошу Вас в skype: websnaky попробую помочь

Konstatine

LexaK, попробовал и так. Так в если вообще не заходит.
Snaky, не смог дозваниться до Вас в skype.
Как и прежде жду помощи!!!)

Snaky

Цитата: Konstatine от 23 июн 2014, 19:51
LexaK, попробовал и так. Так в если вообще не заходит.
Snaky, не смог дозваниться до Вас в skype.
Как и прежде жду помощи!!!)
Видимо был не в сети, ну или убогий 3G меня подставил.

Konstatine

Спасибо, все удалось! :zebzdr:
Дело было в настройках счета, стояла галка "Только обороты".

Snaky

Цитата: Konstatine от 24 июн 2014, 08:55
Спасибо, все удалось! :zebzdr:
Дело было в настройках счета, стояла галка "Только обороты".
По этому я говорю то что типовые конфы это зло :befhbt:

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск