Re: Форма недопоставки (Непоступившие номера журналов) TNNJW
Пользователь:
Сорокина Лариса (IP-адрес скрыт)
Дата: 19, December, 2008 13:13
iLq написал(а):
-------------------------------------------------------
> Приветствую.
> Несколько вопросов, связанных с формой
> недопоставки (TNNJW):
> 1) проверка наличия номера осуществляется по
> коду:
>
> (if v909:'^q'then if
> v909^q:&unifor('Av991^a#1')then v909^q| г.|,|
> Т.|v909^f|,|,|
> NN:|d909,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
> ,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
> if
> l('i='&unifor('Av903#1'),|/|v909^q,|/|v909^f'/1')=
> 0 then'1,'fi,,,,,,,,,,,,,,, и т.д.
>
> Вопрос - почему после 50-ого номера идет проверка
> кодом: if
> val(&unifor('Av110^X#1'),';')*val(&unifor('Av991^b
> #1'),';')>50 then if l('i='
> &unifor('Av903#1'),|/|v909^q,|/|v909^f'/11')=0
> then'51,'fi fi
>
> ? То есть поиск идет шифра 11, а не 51. И так
> далее до 80-ого номера. Как это работает?
>
> 2) Так же не понял как производится поиск номеров
> после 80-ого?
>
> 3) Как производится запись номеров вида "вып. 1",
> чтобы это учитывалось в форме недопоставки?
>
> 4) Почему не попадает валовый шифр (931^a) в
> словарь I=, который используется при поиске
> недопоставленных номеров? То есть если у журнала
> номер обозначается месяцем ("Август"), и мы
> заполняем выловый номер 931^a при регистрации, из
> которого формируется валовый шифр в номере журнала
> вида код/год/8 (для августа), то поиск
> недопоставок его не видит, как поступивший номер
> 8.
>
> С уважением, Илья
С версии 2007.2 в форме TNNJW сняты ограничения для большой периодичности. А для валового шифра надо исправить в таблице для создания словаря строку:
931 0 mhl,if v920:'NJ'then(|I=|v931^2/),(|I=|v931^3/),(|I=|v931^4/),(|I=|v904^a/),(|Y=|v931^a/) fi заменив ее на:
931 0 mhl,if v920:'NJ'then(|I=|v931^2/),(|I=|v931^3/),(|I=|v931^4/),(|I=|v904^a/),(|I=|v931^a/) fi