Имя: Пароль:
1C
1C 7.7
v7: Штрих-код номенклатуры
0 Os1obos1o
 
01.08.13
08:41
Здравствуйте уважаемые, есть вопрос.

Для начала исходные данные. 1С, 7.7, 27, ТиС стандартная

Есть база с кучей позицией номенклатуры. Возникла необходимость эту номенклатуру разбить на несколько частей и выгрузить каждую часть в отдельную базу. Сказало - сделано.
С помощью обработки стороннего разработчика (нарыл в интернете) были перенесены необходимые документы ПОСТУПЛЕНИЕ ТМЦ, с созданием контрагента (поставщик), номенклатуры, цены и количества. Автору обработки отдельный респект . Есть одно но. Штрих код во всех позициях - одинаковый, т.е. везде стоит тот, который находился в первой позиции.
Подскажите, как мне заполнить номенклатуру корректным штрих кодом ? В базе родителе, естественно, все правильно.
1 Капитан О
 
01.08.13
08:43
может, запытать автора обработки?
2 Os1obos1o
 
01.08.13
08:45
К сожалению, не знаю контактов. Первым делом об этом подумал.
3 povar
 
01.08.13
08:46
много есть способов, самый надежный - позвать специалиста
4 Капитан О
 
01.08.13
08:47
(2) тогда остаётся только два варианта: править существующую или писать свою
5 Капитан О
 
01.08.13
08:48
(4) ах, да. ещё забить, конечно
6 Os1obos1o
 
01.08.13
08:54
я из города Якутск ) тут специалистов не так много, все рукой махают на 7-ку. В принципе я сам не плохо понимаю, могу повозится, только писал на ассемблере (до этого) и С++, с 1С так близко не сталкивался.
Не хотелось бы в базу грузить новые позиции, поменять только единицу измерения - Штрих код. Какие первые шаги будут правильными ? Кому что приходит на ум ?
7 Os1obos1o
 
01.08.13
08:54
забить ? болт ??? ))) или ручками править ?? более 2000 тысяч позиций
8 Os1obos1o
 
01.08.13
08:55
Ребят поможете разобраться, могу обсудить фин. сторону вопроса
9 Капитан О
 
01.08.13
08:59
(6) вариант тупой. подключиться из неправильной базы к правильной, пройтись по номенклатуре, поспрашивать ШК...
(8) этот вариант будет наиболее эффективен имхо. я не участвую
10 Os1obos1o
 
01.08.13
09:00
Ладно,все понятно. Посижу поковыряю, может что получится
11 Ёпрст
 
01.08.13
09:11
Примитив - пару строк по оле, можно и тупо update сделать в удаленной базе.
12 Lionee
 
01.08.13
09:12
(0)Universal в руки и вперед
13 Os1obos1o
 
01.08.13
09:14
Эх господа ... просто для вас. А я тут зароюсь в учебниках )))
14 Os1obos1o
 
01.08.13
09:15
Universal - это что за зверек ?
15 arsik
 
гуру
01.08.13
09:16
А если у него коды справочников в базах не совпадают
16 Lionee
 
01.08.13
09:16
17 Lionee
 
01.08.13
09:17
(15) можно все заново  быстро сделать, часик потерять
18 Lionee
 
01.08.13
09:18
19 Os1obos1o
 
01.08.13
09:27
Скачал, тыкаю, отличная вещь (Universal). но она вроде бы мне сейчас догонит кучу левой номенклатуры, сейчас по ссылкам похожу. Спасибо, не ожидал такую отзывчивость !
20 Os1obos1o
 
01.08.13
09:27
21 Ёпрст
 
01.08.13
09:52
Номенклатура синхронизировалась по коду ?
22 Os1obos1o
 
01.08.13
09:57
Код разный выгрузился. Пробую по наименованию
23 Os1obos1o
 
01.08.13
10:00
Как и говорил, добавила лишних позиций и код не поменяла. Вроде (якобы) все дела правильно (про обработку Universal)
24 Ёпрст
 
01.08.13
10:01
Еще раз, при первоночальном делении "на базы", как была перенесена номенклатура ?
Один в один со своим кодом, или как ?
25 Os1obos1o
 
01.08.13
10:04
Перенос осуществляла обработка. Нормально перенесла Артикул, Наименование. Код создала свой, с 001.
26 Ёпрст
 
01.08.13
10:09
(25) тогда на, запустишь в базе , в которой нужны штрих кода.
Выберешь путь до базы источника и нажмешь сформировать.

http://rusfolder.com/37455964

ЗЫ: должна быть установлена 1cpp.dll и vfpoledb провайдер
27 Ёпрст
 
01.08.13
10:10
28 Ёпрст
 
01.08.13
10:10
наслаждайся
29 Os1obos1o
 
01.08.13
10:16
если поможет, напиши в почту телефон кину на него тышу
30 Ёпрст
 
01.08.13
10:19
(29) смотри в личной карточке моей
31 Os1obos1o
 
01.08.13
10:19
ок, пробую
32 Ёпрст
 
01.08.13
10:19
в поделку, воткни в ПриОткрытии в начало:

    Попытка
        глОлеДБ = СоздатьОбъект("OLEDBData");
    Исключение
        Если ЗагрузитьВнешнююКомпоненту("1cpp.dll")=0 Тогда
            Предупреждение("1cpp.dll не установлена, до свидания",60);
        КонецЕсли;
    КонецПопытки;
33 Ёпрст
 
01.08.13
10:25
пока не запускай, я забыл совсем, что в ТиСе есть базовая и основная единица.. ща.
34 Ёпрст
 
01.08.13
10:25
:)
35 Os1obos1o
 
01.08.13
10:27
Ругнулась

Запрос.ВыполнитьИнструкцию(ТекстЗапроса);
{C:\USERS\АНДРЕЙ\DESKTOP\_ЗАПАРОСКВНЕШНЕЙБАЗЕ_UPDATE.ERT(118)}: FAILED! ICommandText::Execute(): Syntax error.
36 Os1obos1o
 
01.08.13
10:27
ок )))
37 Ёпрст
 
01.08.13
10:29
вот на так замени - так у базовой единицы штрих код запишет

    ТекстЗапроса = "
    |Update
    |   СпрЕдиницыНаш
    |Set
    |   $СпрЕдиницыНаш.ШтрихКод =  @СпрЕдиницы.ШтрихКод
    |
    |from $Справочник.Единицы as СпрЕдиницыНаш
    |
    |inner join $Справочник.Номенклатура as СпрНоменклатураНаш on $СпрНоменклатураНаш.БазоваяЕдиница = СпрЕдиницыНаш.id
    |inner join  База2.@Справочник.Номенклатура as СпрНоменклатура on СпрНоменклатураНаш.code = СпрНоменклатура.code
    |inner join База2.@Справочник.Единицы as СпрЕдиницы on @СпрНоменклатура.БазоваяЕдиница = СпрЕдиницы.id
    |";
38 Ёпрст
 
01.08.13
10:30
и это, запускай не монопольно базу (если не стоит залипуха от hogik)
39 Os1obos1o
 
01.08.13
10:38
залипух нету , все стандартно. ругается так же

Пользователь системы не определен!
Возврат Запрос.ВыполнитьИнструкцию(ТекстЗапроса);
{C:\USERS\АНДРЕЙ\DESKTOP\_ЗАПАРОСКВНЕШНЕЙБАЗЕ_UPDATE.ERT(111)}: FAILED! ICommandText::Execute(): Syntax error.
40 Os1obos1o
 
01.08.13
10:39
на 111 стоит     Возврат Запрос.ВыполнитьИнструкцию(ТекстЗапроса);
41 Ёпрст
 
01.08.13
10:39
(39)
vfpoledb установлен хоть ?

Путь выбран до каталога с базой источника ?
42 Ёпрст
 
01.08.13
10:40
+ текст запроса должен быть как в (37) ... и ничего больше
43 Ёпрст
 
01.08.13
10:41
+ воткни
Запрос.Отладка(1) перед
Возврат Запрос.ВыполнитьИнструкцию(ТекстЗапроса);

текст сюда
44 Os1obos1o
 
01.08.13
10:42
1cpp.dkk регать надо ?: ))) может поэтому косяки ?

vfpoledb воткнул, запускаю с базой источник
45 Ёпрст
 
01.08.13
10:42
я проверил, у меня работает всё
46 Ёпрст
 
01.08.13
10:43
??????? ??????????????????????????????(?????????2)
    ?????? = ???????.??????????????();
    ???????????? = "
    |Update
    |   ?????????????
    |Set
    |   $?????????????.???????? =  @??????????.????????
    |
    |from $??????????.??????? as ?????????????
    |
    |inner join $??????????.???????????? as ?????????????????? on $??????????????????.?????????????? = ?????????????.id
    |inner join  ????2.@??????????.???????????? as ??????????????? on ??????????????????.code = ???????????????.code
    |inner join ????2.@??????????.??????? as ?????????? on @???????????????.?????????????? = ??????????.id
    |";
    
    ??????????????????(????????????,"????2",?????????2);
    ????????????=???????????(????????????,"*",":");
    ??????? ??????.???????????????????(????????????);
????????????
47 Os1obos1o
 
01.08.13
10:43
хм...сейчас посмотрю где у меня косячит
48 Ёпрст
 
01.08.13
10:44
49 Ёпрст
 
01.08.13
10:45
на вот.. с исправлениями.

Запущать не монопольно в базе, где нужны штрихкоды.
Указать каталог до базы источника (где есть штрих кода)
50 Os1obos1o
 
01.08.13
10:48
я тебя понял правильно. сейчас ребутну систему, видно же что у меня именно код не работает.
51 Os1obos1o
 
01.08.13
10:59
черт его знает, почему ругается. может как нибудь скинуть базу ?
52 Ёпрст
 
01.08.13
10:59
дай удаленный доступ поглядеть, через тимвьювер или эмии админ
53 Os1obos1o
 
01.08.13
11:05
ок, но скорость печаль через 3g сижу, уж не ругайся )))

167 237 230

6093
54 Os1obos1o
 
01.08.13
11:09
6868
55 Ёпрст
 
01.08.13
11:09
не соединяет :(
56 Ёпрст
 
01.08.13
12:56
ну вроде заработало усё у автора..
Он просто сами единицы не перенёс вообще
:)
57 Os1obos1o
 
01.08.13
12:57
ну ты крут мужик )))
58 Ёпрст
 
01.08.13
13:00
не, на самом деле забывать всё стал, снеговик мозг разрушает.. давно ничего на 7.7 не писал
59 Os1obos1o
 
01.08.13
13:34
7.7 незаслуженно забывают по тихоньку. отправил чуток больше
60 Ёпрст
 
01.08.13
13:36
спсб
Проблемы невозможно решaть нa том же уровне компетентности, нa котором они возникaют. Альберт Эйнштейн