8.х Две нумерации в документе 1С 8.1

Тема в разделе "Конфигурирование на платформе "1С:Предприятие 8"", создана пользователем doomer56, 6 ноя 2012.

  1. TopicStarter Overlay
    doomer56
    Offline

    doomer56

    Регистрация:
    27 окт 2012
    Сообщения:
    28
    Симпатии:
    0
    Баллы:
    1
    Здравствуйте! Вопрос такой: как сделать две нумерации в документе. Одна стандартная - в течении года, другая ежедневно должна начинаться с единицы? Причем вторая должна начинаться не с начала суток, а с 7:30 и заканчиваться в 7:30 след суток. Посоветуйте, пожалуйста!
  2. st88
    Offline

    st88 Профессионал в 1С Команда форума

    Регистрация:
    18 окт 2012
    Сообщения:
    1.726
    Симпатии:
    28
    Баллы:
    54
    создать реквизит у документа - номер, и описать процедуру его формирования при открытии документа ...
    Процедура ПриОткрытии()

    Если ЭтоНовый() Тогда
    //// формирование вашего номера...

    конецпроцедуры
  3. TopicStarter Overlay
    doomer56
    Offline

    doomer56

    Регистрация:
    27 окт 2012
    Сообщения:
    28
    Симпатии:
    0
    Баллы:
    1
    //// формирование вашего номера...
    Что именно там должно присутствовать? Предполагаю цикл?
  4. Tiger86
    Offline

    Tiger86 Модераторы Команда форума Модератор

    Регистрация:
    24 мар 2011
    Сообщения:
    6.407
    Симпатии:
    108
    Баллы:
    104
    думаю, что не принципиально цикл. Вы разработайте алгоритм формирования вашего дополнительного номера и вместо комментария вставьте ваш код
  5. VIPOS
    Offline

    VIPOS Опытный в 1С

    Регистрация:
    12 сен 2012
    Сообщения:
    565
    Симпатии:
    1
    Баллы:
    29
    Сталкивался со схожей проблемой - делал следующим образом- значение даты и порядковый номер хранил во внешнем файле и после проверки условий делал
    изменение данных (либо порядковый номер увеличивал либо обнулял.)
  6. TopicStarter Overlay
    doomer56
    Offline

    doomer56

    Регистрация:
    27 окт 2012
    Сообщения:
    28
    Симпатии:
    0
    Баллы:
    1
    Можешь описать свою процедуру?
  7. VIPOS
    Offline

    VIPOS Опытный в 1С

    Регистрация:
    12 сен 2012
    Сообщения:
    565
    Симпатии:
    1
    Баллы:
    29
    Код:
    Эксель = Новый COMОбъект("Excel.Application");
    Книга = Эксель.WorkBooks.Open("f:\Общая папка\Настройка.xls");
    Лист = Книга.WorkSheets(1);  
    Если  СокрЛП(Лист.Cells(1,2).Value)="высшее" Тогда
    ??????????????????? ваши действия
    ИначеЕсли  СокрЛП(Лист.Cells(i,2).Value)="общее_среднее" Тогда
    ???????????????????????тоже самое
    ИначеЕсли  СокрЛП(Лист.Cells(i,2).Value)="профессионально_техническое" Тогда
    ............................ и тд...
    Эксель.Quit
    что-то вроде этого

Поделиться этой страницей