Вобщем у меня вот такое дело..

Я получаю Таблицу организаций.. допустим вот так

Организация1
Организация2
Организация3
Организация4
Организация5
Организация6

И мне нужно запустить цикл как бы.. чтобы у меня создались платёжки следующим образом

Первая платёжка
Организация1↓
    ↓
Организация2

Вторая платёжка
Организация2
    ↓
Организация3

ТретьяПлатёжка
Организация3
    ↓
Организация4

И т.д..

И я не знаю как сделать.. вобщем я получаю строку

Для Каждого ТекСтрока ИЗ ТаблицаОрганизаций Цикл
Ну и начинаю
Платёжка = Документы.ПлатежноеПоручение.СоздатьДокумент()
Платёжка.Организация = ТекСтрока.Организация;
Платёжка.БанковскийСчет = ТекСтрока.Организация.БанковскийСчетПоУмолчанию;

И т.д..
А вот когда дело доходит до
Платёжка.Контрагент.. О_О ?_?   Как быть то тут мне? У меня ведь он в следующей строке я его ещё не получил.. понимаю что решение простое.. и нужно просто как то сохранять строки может в переменные - ТекущийПлательщик и ТекущийПолучатель.. но что-то ума не хватает и не хочется сделать новый велосипед.. подскажите пожалуйста... Очень вас прошу.. как всегда .. ваш друг - CepeLLlka..

Ох Щит! Стрелочки не отобразились :(

Парни... ну что же вы.. подскажите пожалуйста..

> Ох Щит!

где Меч ?

(3) ЗАааааааааак.. друг мой :) Как я рад тебя читать :)

Меча нету :) Есть только Магия :)

Слушай Серёг.. я не знаю как сделать.. я сижу думаю конечно.. и почти придумал... но кажется будет так стрёмно это.. подскажи мне, а?

контрагенты где ?

(5) В смысле где? Зак.. ну ты чё..

Мне как бы нужно перевести бабло из организации 1 в организацию 6 только через несколько посредников.. вот..
И начало и конец у меня в таблице..

Детский сад "Лопушок"...

(7)

1. у тебя появился поклонник
2. конкретнее задачу

(7) А что в 1С то потянуло ? :) это "стрёмно" как-то, поверь :)

(10) хМм.. ну давай конкретней..

У меня есть ТаблицаОрганизаций...
В ней организации....
Организация1
Организация2
Организация3
Организация4
Организация5
Организация6

И мне нужно создать документы ПлатежныеПоручения таким образом чтобы деньги перечислились с Организация1 На Организация6

То есть вот так
Платёжка 1
Организация1 -> Организация2
Платёжка 2
Организация2 -> Организация3
Платёжка 3
Организация3 -> Организация4
Платёжка 4
Организация4 -> Организация5
Платёжка 5
Организация5 -> Организация6

Вот и всё..
Как я пытаюсь сделать это..
Я начинаю перебирать строки таблицы и затык в том, что не нужный мне контрагент в следующей строке.. а у меня цикл пока что ещё в этой..      Выглядит это вот так

Для Каждого ТекСтрока ИЗ ТаблицаОрганизаций Цикл
Ну и начинаю
Платёжка = Документы.ПлатежноеПоручение.СоздатьДокумент()
Платёжка.Организация = ТекСтрока.Организация;
Платёжка.БанковскийСчет = ТекСтрока.Организация.БанковскийСчетПоУмолчанию;

и что тут делать ?

Неужели кто-то платит ТС деньги за программирование. Не могу поверить в это. Даже студент знает, как перебрать строки таблицы значений в цикле.
Про уровень, когда программист знает, что "для каждого" перебирает совершенно не обязательно по порядку я молчу конечно, но цикл-то уж...

Вобщем я решил делать вот так

Для Каждого Строчка ИЗ ТаблицаПосредников Цикл
Если Строчка.Индекс = 0 Тогда
ТекПлательщик = Стр.Плательщик;
Продолжить;
КонецЕсли;

Платёжка = Документы.ПлатежноеПоручение.СоздатьДокумент()
Платёжка.Организация = ТекПлательщик;
Платёжка.БанковскийСчет = ТекПлательщик.БанковскийСчетПоУмолчанию;
Платёжка.Контрагент = Строчка.Плательщик
Платёжка.СчетКонтрагента = Строчка.Плательщик.БанковскийСчетПоУмолчанию;
И тут бла бла бла

ТекПлательщик = Строка.Плательщик..


Мне кажется плохо да?

(14) Видимо курс программирования на паскале убрали из вузов :)

(15) последний шаг цикла подумай ;)

(17)? А что не так?

странно : почему в БП нет ссылки в спр Контры на Организации ?

тебе нужна ТЗ миниму из двух колонок : организация и контрОрганизации

(14) возьми себе и научи за 100

(18) ладно ет я уже сплю ... не обращай на (17) внимание

(19) У меня тоже не было.. я добавлял новый вид операции типа и менял тип поля - Контрагент на типа - СправочникОрганизации
Вот каким-то таким способом



Если Объект.ВидОперации = ВидыОперацийПлатежноеПоручениеПеречислиениеДС Тогда
       Элементы.Контрагент.ОграничениеТипа = Новый ОписаниеТипов("СправочникСсылка.Организации");
   Иначе
       Элементы.Контрагент.ОграничениеТипа = Новый ОписаниеТипов("СправочникСсылка.Контрагенты");
   КонецЕсли;

(19) Зак.. ты лучше скажи.. я правильно поступил что так стал делать? Просто перескочив строчку? Или есть более оптимальное решение?

И может быть мне такое создание документов лучше организовать как-нибудь при помощи "ВводНаОсновании".. я правда не знаю даже где примерчик подглядеть.. может ты знаешь?

Зак.. а не подскажешь каким образом можно выводить сообщения справа снизу? Хочу чтобы там описывалось что сейчас происходит типа.. ну если мне нужно будет платёжек 200 создать к примеру.. то это займёт какое-то время я думаю.. хочу чтобы показывалось что работа идёт типа..

ты тз из двуз колонок сделал ?

(26) Да нет.. я уже всё решил.. ты просто не понял задачу видимо.. хотя я всё чётко описал..

У меня всё создаётся.. всё ок.. и быстро очень..
Я хочу просто создать полосу загрузки что ли.. вот.. не знаешь где подглядеть?

Я завтра днём ещё подниму эту тему.. когда людей побольше будет.. может кто подобрее подскажет как лучше сделать создание платёжек.. при помощи - ВводНаОсновании..

(28) Мне кажется, завтра у тебя два варианта, либо закроют ветку либо застебут. И то и другое будет правильным IMHO.

Кто=Неопределено;
Для каждого Организация из СписокОрганизаций Цикл
    Если Кто=Неопределено Тогда
       Кто=Организация;
       Продолжить;
    КонецЕсли;
    Кому=Организация;
    ЗабабахатьПлатежку(Кто,Кому,СуммаСколько);
    Кто=Кому;
КонецЦикла;

Как-то так.

(30) Смотри (15) До этого я сам допёр.. просто я думаю что я то дибил.. наверное есть более разумные решения..

СколькоСтрок=СписокОрганизаций.Количество();
СтарыйЗаголовок=ПолучитьЗаголовокПриложения();
Счетчик=1;
Для каждого... Цикл
  УстановитьЗаголовокПриложения(СтарыйЗаголовок+" Обработано "+Формат(Счетчик/СколькоСтрок,"ЧЦ=5; ЧДЦ=2; ЧРД=,")+" %");
  ...Тут работа...
КонецЦикла;
УстановитьЗаголовокПриложения(СтарыйЗаголовок);


А так обображаем прогресс в заголовке окна

....+В цикле увеличиваем Счетчик...

Счетчик=Счетчик+1;

(32) Спасибо тебе огромное .. а то что-то отзывчивых сёдня мало.. Мррр.. Спасибки ещё раз :-*

Незачто.

А зачем ВводНаОсновании?

НоваяПлатежка=Документы.ПлатежноеПоручениеИсходящее.НайтиПоНомеру("ТутНомер").Скопировать();

Или через существующее методом Скопировать().

Сохраню себе веточку, буду показывать клиентам, когда будут говорить, что я слишком дорого беру :))

(36) это сколько ?

(37) Не будем в тематической ветке офтопить :))

(0) СКД тебе в руки, с ее помощью легко и непринужденно иерархия документов делается. Книжка хрусталевой раскрывает тему довольно подробно

(39) Уважаемый ЛефМихалыч.. может смылите если у вас есть? :)

(40) говори по-русски, я не понял ни чего

(40) Я имел ввиду.. если у вас есть такая книжка.. не затруднило бы ли вас отослать мне её по электронной почте? :)

(42) Это надо же такое модератору предложить :))
https://1cers.ru/rules.php, пункт 3.

(43)Ну бань тогда.. что уж теперь.. давно ведь зуб точишь на меня :)

(44) Я? За что? :))

(45).. Да.. лучше не бань.. а помоги мне чучуть...

Я скину сюда свой код.. а ты как специалист высокого уровня дашь мне несколько советов как правильно делать, а как не правильно.. А я буду благодарен тебе.. что скажешь?

(46) Понимаешь в чем дело. Я привык людям в глаза правду-матку резать, а в данном случае случай такой запущенный, что я лучше промолчу :))

А не подскажешь можно ли в модуле сразу все переменные с одинаковым называнием переименовать? Ну по типа - НайтиИЗаменить? Нету такой функции? Я что-то поискал и не нашёл..

(48) Найти и заменить.

Да... Правка-Замена..

Кстати (32) Это работает только в На клиенте.. а у меня создание плажек то выполняется на сервере..

(49) Скажи только название медота/процедуры ну чтобы мне выводить кол-во обработанных документов справа снизу в окне сообщений.. пожалуйста..

(51) Ты о чем?

(52) Ну вот смотри.. у меня будет создаваться много платёжных поручений в одной операции как-бы.. и мне бы где-нибудь сообщать пользователю о том сколько обработанно и сколько осталось обработать.. чтобы он видел что процесс идёт, а не думал что всё повисло.. вот..

Я видел что справа снизу выводятся сообщения когда сохраняешь справочники/документы.. можно ли их как-нибудь мне использовать для вывода сообщений своих?

(53) Да

(54) Внимание вопрос..

Как? :)

Я пока решил что буду как в 77 юзать строку состояния..

(55) Внимание ответ. Ответ в СП.

ПоказатьОповещениеПользователя()

Фуухх.. сделал :) Даже картинку в УТ украл - Длительная операция.. Спасибо тебе.. что ругаешь меня :)

А можно сделать булево не заполненным?
Ну то есть у меня реквизит типа Булево.. и мне нужно чтобы вот он был не заполнен.. ПолучитьПустоеЗначение() Или что-нибудь такое? Нее?

Е.Ю.Хрусталева - Разработка сложных отчетов в 1С_Предприятии 8.pdf

(60) Да.. я скачал вчера.. Глянул мельком оглавление.. не нашёл про иерархическое создание документов..

Зак.. скажи мне следующее.. я хочу чтобы у меня один реквизит типа булево по умолчанию был не заполнен.. как сделать?

(61)

1. сделать ТЗ с двумя колонками : организация/контрагент
2. чё :?

Ладно Зак.. забей на это..

Слушай лучше другую проблему..

Я сделал так чтобы у меня по клику создавались документы..
А теперь мне нужно чтобы если ещё раз нажмёшь кнопку - "создать документы" они не создавались, а просто изменялись значения в уже созданых..  Как такое сделать? Подскажи пожалуйста..

Блин.. однако много факторов придётся учитывать..

Ладно.. а такой вопрос..

Что быстрее выполнится..

Выборка документов из базы их удаление и создание новых..

Или же выборка документов из базы и изменение данных в них?