Имя: Пароль:
1C
1C 7.7
v7: Модуль документа Операция
0 kobzon
 
11.06.13
09:08
Бухгалтер зачем то решил делать операции вручную. Дт70Кт66.1. Якобы возмещение ущерба. Соответственно в мой регистр Зарплата эти суммы не попадают.
Можно ли как то сделать чтобы эти суммы с операции попадали в регистр? Я у документа Операция вообще не вижу не форм не модуля.
1 oslokot
 
11.06.13
09:38
дык создай документ вроде типовой бухсправки, или ее юзай
2 kobzon
 
11.06.13
09:50
Да. Спасибо! Посмотрел, абсолютно все точно также. Остается только в модуль движение прописать.
3 Dolly_EV
 
11.06.13
14:08
(2) Завтра твой бухгалтер сделает вручную еще чего-нить - тоже будешь дописывать модуль под новую проводку?))
4 kobzon
 
17.06.13
08:28
(3) Я сам никогда не видел таких наглых бухгалтеров)
Я сделал расчетные листки. И каждый раз как выдавать зарплату. она ко мне подходит и начинает говорить о том что че то не сходится. И выясняется, то она одно чего то новое придумала, то другое.
В расчетных листках все привязал к периоду. Идет перебор начислений, вычетов, выдачей и формируется остаток.
Так она начислит за май 20 а выдаст 30. А потом эти 10 начислит уже в июне..
Вот как тут работать?))
5 mikecool
 
17.06.13
08:48
(4) работай, не ной!
6 kobzon
 
17.06.13
09:01
(5) Просто в (3) спросили, я ответил) Да, буду дописывать что скажут) Мне интересно))
7 kobzon
 
04.07.13
08:32
Прописал в бухгалтерскую справку движение по регистру.
Если я делаю:
РегПок.ДвижениеРасходВыполнить();
То отчет по кредиторке работает.
Но мне нужно РегПок.ДвижениеПриходВыполнить();
И когда делаю так то в отчете получаю ошибку:
{Отчет.КредиторскаяЗадолженность.Форма.Модуль(40)}: Значение не представляет агрегатный объект (Вид)
Если глЕстьРеквизитШапки("Договор", Док.Вид())=1 Тогда
В глобальном это выглядит так:
Функция глЕстьРеквизитШапки(ИмяРеквизита, ВидДокумента) Экспорт

   Если ПустоеЗначение(ИмяРеквизита) = 1 Тогда
       Возврат 0;
   ИначеЕсли Метаданные.ОбщийРеквизитДокумента(ИмяРеквизита).Выбран() = 1 Тогда
       Возврат 1;
   ИначеЕсли ПустоеЗначение(ВидДокумента) = 1 Тогда
       Возврат 0;
   ИначеЕсли Метаданные.Документ(ВидДокумента).РеквизитШапки(ИмяРеквизита).Выбран() = 1 Тогда
       Возврат 1;
   Иначе
       Возврат 0;
   КонецЕсли;

КонецФункции // глЕстьРеквизитШапки()

Почему расход проходит нормально и двигает регистр а приход не работает?
8 1Сергей
 
04.07.13
08:34
(7) в Док у тебя что? Отладчик украли?
9 kobzon
 
04.07.13
08:38
То ли я не умею им пользоваться то ли не знаю. Отладчиком прохожу, в отчет попадают 2 поступления неоплаченных, а на справке сразу ошибка вылетает. Как вот тут посмотреть что в док?
Первые 2 Док.Вид() = "ПоступлениеТоваров"
10 aka AMIGO
 
04.07.13
08:42
(9) "как посмотреть как посмотреть.." :)
ставишь точку останова на операторе

Если глЕстьРеквизитШапки("Договор", Док.Вид())=1 Тогда

а в табло печатаешь

Док.Вид()

и запускаешь отчет :)
11 aka AMIGO
 
04.07.13
08:42
+10 и смотришь в табло, чему равно твое вид :)
12 kobzon
 
04.07.13
08:48
Ну бухсправка получается выдает: Док.Вид() = Ошибка в выражении!
Че же у документа нет вида?
Почему тогда когда РегПок.ДвижениеРасходВыполнить(); вые работает?
13 Mikeware
 
04.07.13
08:51
(12) а чего вы программиста не наймете?
14 aka AMIGO
 
04.07.13
08:52
а почему ты уверен, что этот док = бухсправка?
поставь в табло просто

Док

и посмотри
15 kobzon
 
04.07.13
08:52
(13) Дорого.
16 kobzon
 
04.07.13
08:53
(14) Ага, пусто.. Док =
17 aka AMIGO
 
04.07.13
08:54
жаль, сисадмины закрутили тимвьюер :)
велика база-то в зипе?
18 kobzon
 
04.07.13
08:57
(17) около 800 метров.
19 aka AMIGO
 
04.07.13
08:57
(16) в бухсправке документ-регистратор не записывается при движении регистра?
вот чудо-то..
20 aka AMIGO
 
04.07.13
08:58
(18) не.. велика..
какая конфа? может у нас есть..
21 kobzon
 
04.07.13
08:59
(20) ПУБ 7.70.297 весь перепиленный.
(19) Тут не понял)
22 aka AMIGO
 
04.07.13
09:02
не.. ПУБа нетути..
отчет можешь выложить?
23 aka AMIGO
 
04.07.13
09:03
в какой-нибудь файлообменник
24 kobzon
 
04.07.13
09:05
(22)http://zalil.ru/34619648
Только что даст отчет?) В бухсправке вообще регистры вроде не двигаются)
25 ТакВотЖе
 
04.07.13
09:10
в бухсправке поставил галочку "Оперативный учет"?
26 kobzon
 
04.07.13
09:10
(25) Да. Она и стояла.
27 ТакВотЖе
 
04.07.13
09:11
в типовой конфе не стояла
28 ТакВотЖе
 
04.07.13
09:13
кусок кода давай, который добавляешь
29 kobzon
 
04.07.13
09:16
Сч62 = СоздатьОбъект("Счет.Основной");
Сч62.НайтиПоКоду("62.2");
Оно62 = Сч62.ТекущийСчет();
РегПок = Регистр.РасчетыСПоставщиками;
       РегЗарп = Регистр.Зарплата;
       РегПок.Контрагент = СубконтоДт1;
   //    РегПок.Договор = СубконтоДт2;
       РегПок.Долг = Сумма;
   Если СчетДт = Оно62 Тогда          
       РегПок.ДвижениеПриходВыполнить();
   КонецЕсли;
30 aka AMIGO
 
04.07.13
09:19
(21) пропусти вот это: http://zalil.ru/34619652
в окне сообщений будет много строк, посмотри, в каких есть пустой документ
31 aka AMIGO
 
04.07.13
09:22
(29) ИМХО условие должно стоять ДО присвоения:
     
   Если СчетДт = Оно62 Тогда
       РегПок.Контрагент = СубконтоДт1;
   //    РегПок.Договор = СубконтоДт2;

       РегПок.Долг = Сумма;
         
       РегПок.ДвижениеПриходВыполнить();
   КонецЕсли;
32 kobzon
 
04.07.13
09:23
(30) зКонтрагент=Анели Зерновая компания зДоговор=Основной договор тДок.Документ=Поступление МПЗ 627 (08.04.13)
зКонтрагент=Анели Зерновая компания зДоговор=Основной договор тДок.Документ=Поступление МПЗ 688 (16.04.13) Больше ничего не выводится.
33 aka AMIGO
 
04.07.13
09:25
(32) хмык.. интересно.. счас посмотрю еще
34 aka AMIGO
 
04.07.13
09:32
(32) что сообщит этот: http://zalil.ru/34619670
35 kobzon
 
04.07.13
09:38
(34) так же 2 документа.
Толи я сделал чето. В отчет теперь не попадает сумма из справки.
Но судя по сему в регистор нужно еще записывать, для начала присвоенный вид документа. Вот формирую по регистру:
Период        Дионис    Поступление МПЗ 851 (17.05.13)    54000
Период        Ралид    Приходный кассовый ордер (расчеты) 640 (24.06.13)    15000
Период        Анжелия        200000
36 ТакВотЖе
 
04.07.13
09:42
РегПок = Регистр.РасчетыСПоставщиками;
      // РегЗарп = Регистр.Зарплата;
       РегПок.Контрагент = СубконтоДт1;  
   РегПок.Договор = СубконтоДт2;
   РегПок.КодОперации=КО.ЗачетАвансаПоставщику;
       РегПок.РасчДокумент=ТекущийДокумент();
       РегПок.Долг = Сумма;
       Если СчетДт = СчетПоКоду("62.2") Тогда          
        РегПок.ДвижениеПриходВыполнить();
   КонецЕсли;
37 ТакВотЖе
 
04.07.13
09:42
работает вроде
38 ТакВотЖе
 
04.07.13
09:43
или программера наймите или бухгалтера смените)
бухгалтера сменить будет дешевле ;)
39 aka AMIGO
 
04.07.13
09:44
(36) точно.. опередил меня немного :)

РегПок.РасчДокумент=ТекущийДокумент();
40 ТакВотЖе
 
04.07.13
09:45
(39) да без кода операции он тоже не хочет))
41 aka AMIGO
 
04.07.13
09:46
(40) а, ну да! :)
естественно, ТС, перез записью движения надо заполнять ВСЕ измерения регистра :)
42 kobzon
 
04.07.13
09:50
Теперь выдает ошибку
Возврат Док.ДатаДок+Док.Контрагент.Глубина+Док.Контрагент.ДопОтсрочка;
{Отчет.КредиторскаяЗадолженность.Форма.Модуль(42)}: Поле агрегатного объекта не обнаружено (Контрагент)
43 kobzon
 
04.07.13
09:50
В справке нет контрагента)
44 aka AMIGO
 
04.07.13
09:52
(42) или вставь в Бсправку контрагента, или измени код..
последнее будет непредсказуемо по последствиям :)
45 kobzon
 
04.07.13
09:52
(44) лучше первое)
46 ТакВотЖе
 
04.07.13
09:55
(43)ну так да, нет)
отчет нужно переписывать или в справку добавлять реквизиты)
а кто обещал что будет легко?)))
говорю же легче бухгалтера сменить)
47 aka AMIGO
 
04.07.13
09:55
Если (глЕстьРеквизитШапки("Договор", Док.Вид())=1) И (глЕстьРеквизитШапки("Контрагент",Док.Вид())=1)  Тогда          


может прокатить :)
48 aka AMIGO
 
04.07.13
09:58
+47 это оператор в
Функция ДатаОплаты(Док)
49 kobzon
 
04.07.13
09:58
Добавил реквизит, перепровел. В отчет попала справка, как поступление товаров)) И показывается как просроченное поступление)
50 aka AMIGO
 
04.07.13
10:00
(49) поменяй код в модуле документа - там у тебя не все измерения регистру присвоены
51 aka AMIGO
 
04.07.13
10:02
+50 - как в (36)
52 kobzon
 
04.07.13
10:03
(51) Так я из (36) все взял)
53 aka AMIGO
 
04.07.13
10:05
а что (34) выводит?
54 kobzon
 
04.07.13
10:10
(53)
зКонтрагент=Анели зДоговор=Основной договор ТЗ.Документ=Бухгалтерская справка 00000004 (04.07.13)
зКонтрагент=Анели зДоговор=Основной договор ТЗ.Документ=Поступление МПЗ 688 (16.04.13)
зКонтрагент=Анели зДоговор=Основной договор ТЗ.Документ=Поступление МПЗ 627 (08.04.13)
55 Salimbek
 
04.07.13
10:10
Жесть, а не тема
56 aka AMIGO
 
04.07.13
10:12
(54) вроде всё путём.. ладушки, мои варианты исчерпаны :)
последнее (вернее - первое!) средство - отладчик :)
57 kobzon
 
04.07.13
10:14
(56) Да дальше я сам чего-нибудь придумаю)
aka AMIGO и ТакВотЖе - Огромное Спасибо за помощь!!!
58 kobzon
 
04.07.13
10:20
Чувствую, бухсправку скоро будет не узнать))
Делаю это потому, что например возврат д/с от поставщика падает на счет 62.2. и увеличивает дебиторку, или есть делать по другому то на 76 вроде.