Здравствуйте
Мы хотим шрих-кодирование по инвентарному номеру
Скажите пожалуйста как с помощью глобальной корректировки скопировать данные из поля 910 инвентарный номер в поле 910 Штрих-код

0
IF
if (v910^H)='' then '1' else '0' fi
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
ADD
910^H
*
v910^B
XXXXXXXXXXXXXXXXXXX
FI
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX

Добрый день,
используем штрих-код с маской 670110000001, 670110000002 ...
В каталогизаторе, в 910 поле ставим статус R, чтобы автоматически размножить несколько экземпляров, но штрих-коды при таком размножении вместо 670110000001, 670110000002 получаются 000000000001, 000000000002
Видимо слишком много нулей.
Как сделать нормальную генерацию штрих-кодов?

ИРБИС 64 2009.1

Заранее, спасибо

Определила эмпирически - длина размножаемой части штрих-кода не более 9 цифр.
Попробуйте разделить постоянную и размножаемую части штрих-кода, например, так 67011-0000001.
Размножение идет нормально, но нужно еще посмотреть, не отразится ли это негативно при получении выходных таблиц типа "Листы инвентарной книги"

Но у нас штрих-коды печатаются на принтере без знака "-", а при считывании сканером в поиске он уже не ищет этот штрих-код, т.к. они получаются совсем разные 670110000001 и 67011-0000001.
Может можно как-нибудь увеличить длину размножаемой части штрих-кода?

Можно преобразовать длинный штрих-код (вставить '-') до размножения и удалить дефисы в размноженных штих-кодах - откорректировать AUTOIN.GBL, вставить операторы перед и после оператора
ADD
1000
XXXXXXXXXXXXXXXXXXX
&unifor('Z')
XXXXXXXXXXXXXXXXXXX

чтобы получилось так
REP
910^H
F
if v910^a:'R' then (if p(v910) then if v910^a:'R' then if p(v910^h) then if val(&uf('+95'v910^h))>9 then &uf('+961*9#'v910^h)'-'&uf('+961.9#'v910^h) else v910^h fi fi fi fi/) fi
XXXXXXXXXXXXXXXXXXX
ADD
1000
XXXXXXXXXXXXXXXXXXX
&unifor('Z')
XXXXXXXXXXXXXXXXXXX
CHA
910
*
'-'
''
Пояснение. В поле 910 со статусом R проверяется длина штрих-кода (>9), справа отделяется 9 символов, перед которыми вставляется "-"
Проведите предварительно отладку.

Попробывал, выявил 2 ошибки:

1) У нас используется инв. номера со знаком "-", например УК-12345, и т.д.
С этим кодом знак "-" проподает.
С этим справился извенив
&unifor('Z')
XXXXXXXXXXXXXXXXXXX
CHA
910
*
'-'
''

на

&unifor('Z')
XXXXXXXXXXXXXXXXXXX
CHA
910^H
*
'-'
''

2)При повторении этого действия 2-й раз штрих-код опять становится 000000000001,000000000002....
(см. прикрепленный файл)

Правильно сделали.

Но по второму то пункту я так и не понял:

> 2)При повторении этого действия 2-й раз штрих-код
> опять становится 000000000001,000000000002....
> (см. прикрепленный файл)

Т.е. размножил 1 раз, все нормально, начинаю размножать следующую партию, штрих-код опять становится 000000000001,000000000002....

Светлана Михайловна, и все же, помогите решить проблемку...

Serega89 написал(а):
-------------------------------------------------------
> Но по второму то пункту я так и не понял:
>
> > 2)При повторении этого действия 2-й раз
> штрих-код
> > опять становится 000000000001,000000000002....
> > (см. прикрепленный файл)
>
> Т.е. размножил 1 раз, все нормально, начинаю
> размножать следующую партию, штрих-код опять
> становится 000000000001,000000000002....

Поясните, что значит "При повторении этого действия 2-й раз".
Повторно вводите в тот же документ поле 910 со статусом "R" ?
Или речь идет о других документах?
В любом случае этого быть не должно. Покажите на картинке.

Да, я повторно ввожу в тот же документ поле 919 со статусом R.
При вводе в новый документ, первый раз вводится нормально, а при повторном вводе 910 поля опять выходят нули.

Скрины прикрепляю.

Замените в операторе REF
if v910^a:'R' then (if p(v910) then if v910^a:'R' then if p(v910^h) then if val(&uf('+95'v910^h))>9 then &uf('+961*9#'v910^h)'-'&uf('+961.9#'v910^h) else v910^h fi fi fi fi/) fi
на
if v910^a:'R' then (if p(v910) then if v910^a:'R' then if p(v910^h) then if val(&uf('+95'v910^h))>9 then &uf('+961*9#'v910^h)'-'&uf('+961.9#'v910^h) fi fi else v910^h fi fi/) fi

Спасибо, все заработало!

Здравствуйте!
Снова пишу вам с той же проблемой. При сохранении штрихкоды опять меняются на 00000000000001, 0000000000002 и т.д.
Не могу сказать после чего это произошло, т.к. год не работал. Возможно после перехода на версию 2011.1(до этого была 2009.1). autoin.gbl вродебы остался прежним. подскажите, пожалуйста, как исправить проблему?

Заранее благодарю.
ИРБИС 64, 2011.1

1.Прикрепленный Autoin.gbl не из версии 2011.
2.Покажите поле 910 со статусом R

Прикрепил файл autoin.gbl от версии 2011.1, с ним происходит точно так же.

Сама запись - запись.txt

На рисунке:
1 - В каталогизаторе;
2 - Ставлю статус R, ввожу начальный номер штрихкода;
3 - После сохранения штрихкод превращается в 0000000001, 00000000002 и т.д., но так же штрихкод вводится в первую запись нормально, хотя я туда вообще штрихкод не вводил (на рисунке запись под номером 17 поля 910);
4 - Если штрихкод меньше 6 цифр, то вводится нормально.

Замените оператор REP

if v910^a:'R' then (if p(v910) then if p(v910^h) then if v910^a:'R' then if p(v910^h) then if val(&uf('+95'v910^h))>9 then &uf('+961*9#'v910^h)'-'&uf('+961.9#'v910^h) fi fi else v910^h fi else # fi fi/) fi

Спасибо, получилось