×
Показано с 1 по 9 из 9
  1. #1
    Клерк
    Регистрация
    05.08.2011
    Сообщений
    141

    1C 7.7 как сделать внешнюю печ.форму

    Научите плиз

    надо сделать копию встроенной печатной формы как внешнюю
    чтоб можно было под себя настроить
    изменять саму встроенную не хочу, т.к. нужны оба варианта
    Поделиться с друзьями

  2. #2
    Клерк Аватар для Bazil
    Регистрация
    27.01.2003
    Адрес
    Санкт-Петербург
    Сообщений
    2,629
    Это не сложно, но некоторые навыки программирования нужно иметь.
    Надо сделать копию таблицы основной формы, и сохранить её в виде файла таблицы (*.mxl) в надежном месте. Например в PrnForms Вашей базы. Редактируйте вашу внешнюю форму как нужно. В процедуре Печать нужно предусмотреть возможность выбора вашей внешней формы по каким-то признакам и прописать её имя и путь на диске. На на самой форме редактируется кнопка печати с возможностью выбора вашей формы или тупо ставится флажок, при взведении которого печать идет на Вашу внешнюю форму.
    p.s. Не путайте внешнюю печатную форму и внешний отчет. В печатной форме имеется только нужная форма таблицы, а внешний отчет(обработка), кроме таблицы (часто не одной) ещё имеет форму и исполняемый код в модуле.
    Последний раз редактировалось Bazil; 05.08.2011 в 12:08.
    С уважением, Bazil.

  3. #3
    Клерк
    Регистрация
    05.08.2011
    Сообщений
    141
    Спасибо огромное за ответ!
    Это всё-таки сложно для меня
    мало, что поняла
    Видимо, я себе польстила, что смогу сама это сделать(((

  4. #4
    Клерк Аватар для Bazil
    Регистрация
    27.01.2003
    Адрес
    Санкт-Петербург
    Сообщений
    2,629
    ЗояК, Да ерунда это справитесь.
    Вот, для примера, кусок кода процедуры Печать из Бух-528, документ "Счет":
    Таб = СоздатьОбъект("Таблица");
    ИмяФайлаПечатнойФормы = КаталогИБ()+"ExtForms\PrnForms\1cbs.mxl";
    Если ФС.СуществуетФайл(ИмяФайлаПечатнойФормы) = 1 Тогда
    Таб.ИсходнаяТаблица(ИмяФайлаПечатнойФормы);
    Иначе
    Таб.ИсходнаяТаблица("Таблица");
    КонецЕсли;

    Вы вешаете флажок с идентификатором "ПечМояФорма"
    Создаете таблицу формы под именем МояФорма.mxl. Сохраняете в PrnForms.

    После приведенного кода вписываете пару строк:
    Если ПечМояФорма =1 Тогда //взведен флажок
    ИмяФайлаПечатнойФормы = КаталогИБ()+"ExtForms\PrnForms\МояФорма.mxl";
    Таб.ИсходнаяТаблица(ИмяФайлаПечатнойФормы);
    КонецЕсли;
    С уважением, Bazil.

  5. #5
    AltG
    Гость
    Цитата Сообщение от ЗояК Посмотреть сообщение
    Спасибо огромное за ответ!
    Это всё-таки сложно для меня
    мало, что поняла
    Видимо, я себе польстила, что смогу сама это сделать(((
    Какая форма нужна?

  6. #6
    Клерк
    Регистрация
    05.08.2011
    Сообщений
    141
    ПечатьЭтикетки
    дело в том, что эта встроенная форма у меня уже переделана
    отличается от стандартной
    и мне нужна копия этой переделанной формы

  7. #7
    Клерк Аватар для Bazil
    Регистрация
    27.01.2003
    Адрес
    Санкт-Петербург
    Сообщений
    2,629
    AltG, у девушки Торговля, и скорее всего прилично переписанная.
    С уважением, Bazil.

  8. #8
    Клерк
    Регистрация
    05.08.2011
    Сообщений
    141
    Спасибо огромное за неравнодушие
    Я уже поняла, что не всё так просто, как мне казалось

  9. #9
    Клерк
    Регистрация
    14.06.2009
    Адрес
    Набережные Челны
    Сообщений
    44
    Цитата Сообщение от Bazil Посмотреть сообщение
    AltG, у девушки Торговля, и скорее всего прилично переписанная.
    Может поиск в интернете, например, на Infostart`е ей поможет?

Информация о теме

Пользователи, просматривающие эту тему

Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)