7.7 Печать долга контрагента(покупателя) на документе Реализация (купля-продажа)

Тема в разделе "Конфигурирование на платформе "1С:Предприятие 7.7"", создана пользователем hunter05805, 27 сен 2014.

  1. athlon64k
    Offline

    athlon64k Опытный в 1С

    Регистрация:
    26 апр 2012
    Сообщения:
    101
    Симпатии:
    0
    Баллы:
    26
    Вооот )) Спасибо. ( я не знал про ЦветТекста) А насчет выражения - или шаблона - тоже дело вкуса?
  2. Бухгалтерский угодник
    Offline

    Бухгалтерский угодник Администраторы Команда форума Администратор

    Регистрация:
    29 дек 2008
    Сообщения:
    22.628
    Симпатии:
    542
    Баллы:
    204
    не понял вашу фразу "выражения - или шаблона"
  3. athlon64k
    Offline

    athlon64k Опытный в 1С

    Регистрация:
    26 апр 2012
    Сообщения:
    101
    Симпатии:
    0
    Баллы:
    26
    Ну в печатной форме долг по контрагенту у меня реализован как шаблон ( ячейка) а при написании условия я так просматриваю в основном везде используются как выражения , или это значения не имеет можно и шаблоном и выражением ( использовать в ячейке)

    Вложения:

    • 11111.png
      11111.png
      Размер файла:
      123,7 КБ
      Просмотров:
      17
    Последнее редактирование: 18 апр 2017
  4. athlon64k
    Offline

    athlon64k Опытный в 1С

    Регистрация:
    26 апр 2012
    Сообщения:
    101
    Симпатии:
    0
    Баллы:
    26
    Ну в общем я совместил приятное с полезным. Верхняя строка у меня шаблон а нижняя выражение))). И вот условие которое я написал. Только вот я теперь задумался ))) Нулевого акта не бывает обычно))) акт на то и выписывается что там сумма указана)) и решил изменить на лимит 999. Вроде ведь все правильно? Проверял-всё работает. До 999 руб показывает синим , больше красным. Огромное Вам спасибо за подсказку методов))) Но честно скажу ооочень долго додумывался как правильно его написать. Помог код в этом же модуле
    Если Докум.УчитыватьНП = 1 Тогда
    Если Докум.СуммаВклНП = 0 Тогда
    СуммаИтог = СуммаИтог + СуммаНПИтог;
    КонецЕсли;
    ИсхТабл.ВывестиСекцию("ИтогоНП");
    КонецЕсли;
    с него брал пример и вспомнил что еще есть команда Иначе)))

    Вложения:

    • 1.png
      1.png
      Размер файла:
      326 КБ
      Просмотров:
      13
    • 2.png
      2.png
      Размер файла:
      349 КБ
      Просмотров:
      14
    Последнее редактирование: 18 апр 2017
  5. Бухгалтерский угодник
    Offline

    Бухгалтерский угодник Администраторы Команда форума Администратор

    Регистрация:
    29 дек 2008
    Сообщения:
    22.628
    Симпатии:
    542
    Баллы:
    204
    Зато в будущем трудностей в аналогичной ситуации у вас уже не возникнет
    athlon64k нравится это.
  6. athlon64k
    Offline

    athlon64k Опытный в 1С

    Регистрация:
    26 апр 2012
    Сообщения:
    101
    Симпатии:
    0
    Баллы:
    26
    Решил еще сделать кнопку Не контролировать долг (бывает что авансовая предоплата). (сначала замахнулся что бы для каждого контрагента был независимый выбор суммы ограничения лимита задолженности - переход с синего в красную надпись но передумал,решил оставить как есть до 1000 синяя после -красная) .Я так понимаю ее нужно создавать в форме элемента справочника контрагентов. Аналог флажка "не контролировать взаиморасчеты"(НеКонтролироватьКредит). Это надо писать процедуру. (допустим) ПриИзмененииКонтроляДолга(). Ее надо дописать в модуле формы элемента справочника. А как в условии процедуры дать понять что бы он ссылался на условие акта обслуживания - он то внешняя обработка(ert). Попробовал обратиться к синтаксис помощнику -результат неутешительный - похоже мне его тоже надо еще научиться понимать))).
  7. Бухгалтерский угодник
    Offline

    Бухгалтерский угодник Администраторы Команда форума Администратор

    Регистрация:
    29 дек 2008
    Сообщения:
    22.628
    Симпатии:
    542
    Баллы:
    204
    На какое условие? Ничего не понял... Его же можно продублировать или вынести в глобальный модуль
  8. athlon64k
    Offline

    athlon64k Опытный в 1С

    Регистрация:
    26 апр 2012
    Сообщения:
    101
    Симпатии:
    0
    Баллы:
    26
    Что бы при нажатии на флажок он убирал это сообщение с печатной формы.вот,
  9. Бухгалтерский угодник
    Offline

    Бухгалтерский угодник Администраторы Команда форума Администратор

    Регистрация:
    29 дек 2008
    Сообщения:
    22.628
    Симпатии:
    542
    Баллы:
    204
    так проверяйте флаг в печатной форме!
  10. athlon64k
    Offline

    athlon64k Опытный в 1С

    Регистрация:
    26 апр 2012
    Сообщения:
    101
    Симпатии:
    0
    Баллы:
    26
    А можно пример? Флажок нужен в справочнике контрагенты, он когда активный должен скрывать две (обе) секции в печатной форме (Задолж) и (Задолж0). А печатная форма- внешняя. И может посоветуйте пожалуйста что почитать про азы программирования 1с 7.7 (ну там для чайников ). Скачал одну но там нет примеров про работу с секциями в печатных формах. ( типа скрытия, преобразования в цвета и тд).
  11. Хряк
    Offline

    Хряк Профессионал в 1С

    Регистрация:
    26 сен 2007
    Сообщения:
    1.556
    Симпатии:
    59
    Баллы:
    54
    добавь реквизит в спр контрагентов, число 1,0, на форму вставь в виде флажка
    при печати проверяй этот реквизит
    если контр.МойРеквизит=1 Тогда
    иначе
    таб.вывестисекцию Задолж
    таб.вывестисекцию Задолж0
    конецесли
    athlon64k нравится это.
  12. athlon64k
    Offline

    athlon64k Опытный в 1С

    Регистрация:
    26 апр 2012
    Сообщения:
    101
    Симпатии:
    0
    Баллы:
    26
    Спасибо почти догнал, Только вот не понял "добавь реквизит в спр контрагентов, число 1,0," Флажок я создал, а вот число 1,0 - имеется ввиду длина и точность? или1,0, прописать в формуле реквизита флажка? И реквизит должен быть периодическим-верно?
    "
    если контр.МойРеквизит=1 Тогда
    иначе
    таб.вывестисекцию Задолж
    таб.вывестисекцию Задолж0
    конецесли"
    - код пишется в модуле ert (шки) или в модуле справочника?
    Последнее редактирование: 24 апр 2017
  13. athlon64k
    Offline

    athlon64k Опытный в 1С

    Регистрация:
    26 апр 2012
    Сообщения:
    101
    Симпатии:
    0
    Баллы:
    26
    вот написал условие:

    ИсхТабл.ВывестиСекцию("Задолж");
    Иначе
    ИсхТабл.ВывестиСекцию("Задолж0");

    КонецЕсли;


    //еще одно

    Если КонтДолг=1 Тогда
    Иначе
    ИсхТабл.ВывестиСекцию ("Задолж");
    ИсхТабл.ВывестиСекцию ("Задолж0");
    КонецЕсли;

    Переменная не определена (КонтДолг)

    КонтДолг это идентификатор флага в справочникеКонтрагенты, Код написал в ертшке, Я так понимаю ошибка в том что модуль ертшки не понимает что такое флаг в справочнике?*

    Вложения:

    • 15158.png
      15158.png
      Размер файла:
      123,8 КБ
      Просмотров:
      10
    Последнее редактирование: 24 апр 2017
  14. Хряк
    Offline

    Хряк Профессионал в 1С

    Регистрация:
    26 сен 2007
    Сообщения:
    1.556
    Симпатии:
    59
    Баллы:
    54
    Контрагент.КонтДолг
    или
    Докум.Контрагент.КонтДолг
  15. athlon64k
    Offline

    athlon64k Опытный в 1С

    Регистрация:
    26 апр 2012
    Сообщения:
    101
    Симпатии:
    0
    Баллы:
    26
    )))) Вот что получилось:
    Если Докум.Контрагент.КонтДолг=1 Тогда

    // ИсхТабл.ВывестиСекцию ("ЗадолжПуст")
    Иначе
    ИсхТабл.ВывестиСекцию ("Задолж");
    ИсхТабл.ВывестиСекцию ("Задолж0");
    КонецЕсли;

    Вроде уже создал в печ. форме (заремил-всеравно не работает) еще секцию (пустую)
    но все равно вот такой результат на скринах....
    Что то пропускаю в условии?

    Вложения:

    • 45455.png
      45455.png
      Размер файла:
      371,5 КБ
      Просмотров:
      9
    • 4548848.png
      4548848.png
      Размер файла:
      375,6 КБ
      Просмотров:
      9
  16. Хряк
    Offline

    Хряк Профессионал в 1С

    Регистрация:
    26 сен 2007
    Сообщения:
    1.556
    Симпатии:
    59
    Баллы:
    54
    у тебя должно быть 2 секции красная и синяя
    и если есть галка выводим красную, нет - синюю
    athlon64k нравится это.
  17. athlon64k
    Offline

    athlon64k Опытный в 1С

    Регистрация:
    26 апр 2012
    Сообщения:
    101
    Симпатии:
    0
    Баллы:
    26
    В общем создано 2 секции красная и синяя , там выше условие - если сумма долга больше999, выводить красную, если меньше синюю, а на флаг,я хотел поставить что бы он эти обе секции скрывал))) (убирал, удалял), не выводил)
    ( вот условие):
    Если глТекущийДолг(Докум.Фирма, Докум.Договор, "покупатель") >999 Тогда
    ИсхТабл.ВывестиСекцию("Задолж");
    Иначе
    ИсхТабл.ВывестиСекцию("Задолж0");

    КонецЕсли;
    Есть исправные плательщики а есть не очень, им все время надо напоминать, и вот для исправных -хотелось бы что бы он не выводил эти строки
    Последнее редактирование: 24 апр 2017
  18. Хряк
    Offline

    Хряк Профессионал в 1С

    Регистрация:
    26 сен 2007
    Сообщения:
    1.556
    Симпатии:
    59
    Баллы:
    54
    Если глТекущийДолг(Докум.Фирма, Докум.Договор, "покупатель") >999 Тогда
    если докум.контрагент.флагДолг=1 Тогда //выводим
    ИсхТабл.ВывестиСекцию("Задолж");
    КонецЕсли
    Иначе
    если докум.контрагент.флагДолг=1 Тогда //выводим
    ИсхТабл.ВывестиСекцию("Задолж0");
    КонецЕсли;
    конецесли
    athlon64k нравится это.
  19. athlon64k
    Offline

    athlon64k Опытный в 1С

    Регистрация:
    26 апр 2012
    Сообщения:
    101
    Симпатии:
    0
    Баллы:
    26
    ))))))))

    Мой код:))
    Если Докум.Контрагент.КонтДолг=1 Тогда
    ИсхТабл.ВывестиСекцию ("ЗадолжПуст");
    Если глТекущийДолг(Докум.Фирма, Докум.Договор, "покупатель") >999 Тогда
    ИсхТабл.ВывестиСекцию("Задолж");
    Иначе
    ИсхТабл.ВывестиСекцию("Задолж0");
    КонецЕсли;
    КонецЕсли;

    Логика все- таки победила))) , За полминуты до вашего кода написал - проверил - работает))). Огромное Вам спасибо!!!!

    И все-таки - порекомендуйте что почитать для начинающего.....
    Последнее редактирование: 24 апр 2017
  20. Хряк
    Offline

    Хряк Профессионал в 1С

    Регистрация:
    26 сен 2007
    Сообщения:
    1.556
    Симпатии:
    59
    Баллы:
    54
    ИсхТабл.ВывестиСекцию ("ЗадолжПуст"); вот ето ваще зачем?
    --- Объединение сообщений, 24 апр 2017 ---
    просто изучай код своей конфы, многому научишься
    athlon64k нравится это.
Похожие темы
  1. Draft
    Ответов:
    3
    Просмотров:
    1.950
  2. Skvorez
    Ответов:
    1
    Просмотров:
    1.267
  3. SerzhM
    Ответов:
    6
    Просмотров:
    1.257
  4. makksimo
    Ответов:
    1
    Просмотров:
    1.534
  5. kislak
    Ответов:
    7
    Просмотров:
    1.720
Загрузка...