Имя: Пароль:
1C
1C 7.7
v7: Выписка банковская
0 Asia2016
 
13.08.16
14:28
В банковской выписке надо сделать заполнение по плат поручениям.
Процедура ЗаполнитьПлПор()  
      ТП = СоздатьОбъект("ТаблицаЗначений");  
    ТП.НоваяКолонка("Док");
    ТП.НоваяКолонка("ВидДвижения");
    ТП.НоваяКолонка("НазначениеПлатежа");  
    ТП.НоваяКолонка("КоррСчет");
    ТП.НоваяКолонка("Расход");
        ТП.НоваяКолонка("Субконто1");
      ТП.НоваяКолонка("Субконто2");
  
      ДокПлПор = СоздатьОбъект("Документ.ПлатежноеПоручение");
    ДокПлПор.ВыбратьДокументы(ДатаДок,ДатаДок);      
    Пока ДокПлПор.ПолучитьДокумент()=1 Цикл  
        Если ПометкаУдаления() = 0 Тогда
            ТП.НоваяСтрока();              
            ТП.Док = ДокПлПор;
              ТП.ВИдДвижения = Перечисление.ВидыДвиженийПоРасчетномуСчету.Оплата;  
              ТП.НазначениеПлатежа = ДокПлПор.СодержаниеПлатежа;  
              ТП.КоррСчет = ДокПлПор.Счет;
              ТП.Расход   = ДокПлПор.Сумма;  
            ТП.Субконто1= ДокПлПор.Контрагент;
            ТП.Субконто2= ДокПлПор.Договор;  
        КонецЕсли;    
    КонецЦикла;      
    ЗагрузитьТабличнуюЧасть(ТП);    
  КонецПроцедуры  
Все срабатывает за исключением ТП.Док = ДокПлПор; т.е. в выписке в графе первичный документ не проставляет наименование документа и №.
1 Горогуля
 
13.08.16
14:29
хорошо
2 Asia2016
 
13.08.16
14:47
(1) хорошо что не срабатывает?
3 Горогуля
 
13.08.16
14:48
(2) информацию принял
4 tenikov
 
13.08.16
14:50
(0) ТП.Док = ДокПлПор.ТекущийДокумент();
5 Asia2016
 
13.08.16
14:58
(4) пробовала не получается. При отладке смотрела ТП.Док присваивает нужное значение, но при загрузке табличной части теряется
6 Горогуля
 
13.08.16
14:59
(5) специально ждала решения, чтобы подробностей подкинуть?
7 Asia2016
 
13.08.16
15:00
(6) неа, так получилось
8 Мышка
 
13.08.16
15:23
(0) "не проставляет наименование документа и №"
так может там и должно быть наименование и №, т.е. строка, а не ссылка?
9 Asia2016
 
13.08.16
15:23
Больше идей нет?
10 Asia2016
 
13.08.16
15:24
(8) не поняла
11 Горогуля
 
13.08.16
15:24
какого типа ТП.Док?
12 Asia2016
 
13.08.16
15:25
ТП = СоздатьОбъект("ТаблицаЗначений");
13 Asia2016
 
13.08.16
15:26
Док = Платежное поручение
14 Горогуля
 
13.08.16
15:27
а ТП.Док?
15 Горогуля
 
13.08.16
15:28
ну или куда там это всё грузится
16 Asia2016
 
13.08.16
15:30
В выписке есть реквизит ПервичныйДокумент тип Документ. надо чтобы грузилось в него.
При выборе пл поручения руками открывается журнал по поручений и все заполняется. но теперь хочется чтобы все и сразу заполнялось при нажатии на кнопочку заполнить
17 Злопчинский
 
13.08.16
15:31
банковская выписка вообщем-то должна заполняться по выписке банка, т.е плптежным поручениям и ПРОЧИМ ДОКУМЕНТАМ, принятым и исполненным банком, а не по мифическим накропанным неизввестно кем и когда платежным поручениям
18 Сияющий Асинхраль
 
13.08.16
15:33
(0) Вообще-то в бухгалтерии в выписке сто лет как есть кнопка "Подбор по платежным документам", которая как раз и заполняет по платежным поручениям, зачем еще раз в код лезть совершенно непонятно...
19 Asia2016
 
13.08.16
15:39
(18) подбор и у нас есть, но там по одному подбирать, а тут сразу заполняется оплата за весь день. когда очень большие обороты, то должно быть удобно. наверное. если с вашей помощи додумаем как это сделать
20 Горогуля
 
13.08.16
15:40
а как выглядит подбор одного?
21 Asia2016
 
13.08.16
15:42
Процедура ПриНачалеВыбораЗначения(ИдентЭлемДиалога, ФлагСтандОбр)
    Если ИдентЭлемДиалога = "ПервичныйДокумент" Тогда
        ОткрытьФорму("Журнал.ПлатежныеДокументы");
        ФлагСтандОбр = 0;
    КонецЕсли;
КонецПроцедуры
//_____________________________________________________________________________
Процедура ПриВыбореДокумента()  
    Если ПервичныйДокумент.Выбран()=1 Тогда
        Если ПервичныйДокумент.Вид()="ПлатежноеПоручение" ТОгда
            ВИдДвижения = Перечисление.ВидыДвиженийПоРасчетномуСчету.Оплата;
            НазначениеПлатежа = ПервичныйДокумент.СодержаниеПлатежа;
            КоррСчет = ПервичныйДокумент.Счет;
            Расход = ПервичныйДокумент.Сумма;
        КонецЕсли;        
        НазначитьТип("Субконто1", "Справочник.Контрагенты");
        НазначитьТип("Субконто2", "Справочник.Договора");        
        Субконто1 = ПервичныйДокумент.Контрагент;
        Субконто2 = ПервичныйДокумент.Договор;            
    КонецЕсли;    
КонецПроцедуры
Открываем журнал пл поручений и выбираем
22 Горогуля
 
13.08.16
15:47
а где там сама ссылка? и почему её нет?
23 Asia2016
 
13.08.16
15:52
там это где?
24 Горогуля
 
13.08.16
15:54
(23) в коде про один документ
25 Горогуля
 
13.08.16
15:54
так сложно докрутить цикл за день к типовомуц коду?
26 Asia2016
 
13.08.16
15:57
для меня видимо да.
27 Asia2016
 
13.08.16
16:02
как будто бы поняла, но делать буду в понедельник. спасибо всем. но если не получится, то я опять к вам
28 Горогуля
 
13.08.16
16:03
без фото всё равно не взлетит
29 Злопчинский
 
13.08.16
16:05
В типовой бухии семерочной привязка к плпор нужна только для зарплатных платежей всяких по перечислению налогов и взносов, ну и может быть для прочих налоговых платежей

Для остальных платежей плпор нафиг не сдались - на бу/ну никак не влияет, единственная полезность - там где раздолбаев много позволяет следить по журналу плпор - прошла платежка или нет

Мы например платежки в 1с никогда не вели, а выписки грузили автоматом полностью
30 Сияющий Асинхраль
 
13.08.16
18:38
(29) Кстати, да. Большая часть клиентов платежки вообще в 1С не ведут, тупо грузят выписки сразу из банка и все...
31 Смотрящий
 
13.08.16
18:41
ТП.НоваяКолонка("Док");
замени на
ТП.НоваяКолонка("ПервичныйДокумент");

и код поправь дальше который, тогда после
ЗагрузитьТабличнуюЧасть(ТП);
не потеряется документ
32 Asia2016
 
15.08.16
07:25
(31) получилось. СПАСИБО
33 Это_mike
 
15.08.16
07:28
(30) это проблема роста.когда 10 платежек - их проще сразу в КБ сделать, да импортнуть выписку целиком.... а когда начинаются планирования-утверждения-бюджетирования - там уже и платежки внутри базы рождаются...
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший