Модераторы: stron
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Загрузка, Торговля+Склад 
:(
    Опции темы
bucdapuswert
Дата 2.8.2007, 12:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 30
Регистрация: 14.5.2007

Репутация: нет
Всего: нет
Делаю загрузку данных из внешнего файла, и кое что не получается может кто подскажет.
Код,наименование(СпрНоменклатура),единицы изм(классификатор единиц),страну(классификатор стран),Customs(ГТД) загружает в справочники 1с,но не получается загрузка цен
в справочники ТИПЫ цен и Цены.а также загрузка ед.измерения в спр.Единицы и занос единиц в спрНоменклатура.БазоваяЕдиница.

Помогите пожалуйста!! кто может.
загрузка из файла out06.dbf будет тема ниже Админы помогите там и будет файл 

вот мой внешний отчет:
11.ert

Это сообщение отредактировал(а) bucdapuswert - 2.8.2007, 12:55

Присоединённый файл ( Кол-во скачиваний: 8 )
Присоединённый файл  11.ert 34,50 Kb
PM MAIL   Вверх
SaschaL
Дата 2.8.2007, 19:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 880
Регистрация: 13.12.2006
Где: Челябинская обл г .Нязепетровcк

Репутация: 8
Всего: 9
Добрый вечер!
Сразу вопрос выгрузка проводится одновременно в несколько файлов?
На сколько я помню 1С 7.7 может вызружать данные одновременно в один файл, все остальные в этом момент должны быть закрыты.
второй вопрос, Реквизиты которые у вас не выгружаются случано не имеют тип "Периодический", если так то для получения переиодических реквизитов используестя метод получить()
Пример:
Цитата

Цена = Спр.ЦенаТовара.Получить(ТекущаяДата());

где Цена - это получаемое значение цены из справочника
PM MAIL ICQ   Вверх
Zero
Дата 2.8.2007, 19:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2169
Регистрация: 23.10.2004
Где: Россия, г. Рязань

Репутация: 15
Всего: 24
Цитата(bucdapuswert @  2.8.2007,  12:42 Найти цитируемый пост)
не получается загрузка цен
в справочники ТИПЫ цен и Цены.а также загрузка ед.измерения в спр.Единицы и занос единиц в спрНоменклатура.БазоваяЕдиница.

Попробуй изложить свою проблему на маленьком примерчике, чтобы в нём небыло никаких лишних строк, в которых ты сам уже разобрался.
Пересматривать и разбирать весь твой исходник с парой сотен кривонаписаных строк, не у кого желания невозникнет.
А по поводу проблемы, одним из предполагаемых мной вариантов, возможно ты цены пытаешься загружать из справочников как обычные реквизиты. Но имей ввиду, цена а ткже единицы являются периодическими реквизитами и у них испольуються другие методы работы с ними.
PM MAIL ICQ   Вверх
bucdapuswert
Дата 3.8.2007, 10:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 30
Регистрация: 14.5.2007

Репутация: нет
Всего: нет
ZERO. Понимаешь у меня в справочник ОКЕИ единицы грузятся. но проблема в том что они не заносятся в номенклатуру, т.к мне нужно сначала как то занести их в Справочник Единицы, а потом из этого справочника выбрать текущую единицу.
а загрузка ведется от сюда:


Присоединённый файл ( Кол-во скачиваний: 3 )
Присоединённый файл  out06.dbf 19,50 Kb
PM MAIL   Вверх
Zero
Дата 3.8.2007, 21:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2169
Регистрация: 23.10.2004
Где: Россия, г. Рязань

Репутация: 15
Всего: 24
Вот те кусок обработки которую я писал и пользуюсь, при приходовании товара:
Код

//Добавление единиц измерения в справочник "Единицы измерения"
Е.ИспользоватьВладельца(Ном.ТекущийЭлемент());
Е.Новый();
ОКЕИ.ВыбратьЭлементы();
Пока ОКЕИ.ПолучитьЭлемент()=1 Цикл
    Если СокрЛП(Строка(ОКЕИ.ТекущийЭлемент()))="шт" Тогда
     Е.ОКЕИ = ОКЕИ.ТекущийЭлемент();
        Е.Коэффициент = 1;      
        Прервать;
    КонецЕсли;
КонецЦикла;
Е.Записать();

//Заполнение базовой единицы измерения
Ном.БазоваяЕдиница = Е.ТекущийЭлемент();
Ном.ОсновнаяЕдиница = Е.ТекущийЭлемент();
Ном.Записать();

//Заполнение справочника "Цены" 
Ц.ИспользоватьВладельца(Ном.ТекущийЭлемент());
ТипЦен.ВыбратьЭлементы();
Пока ТипЦен.ПолучитьЭлемент()=1 Цикл 
    Если Строка(ТипЦен)="Закупочные" Тогда
        Ц.Новый();
        Ц.ТипЦен = ТипЦен.ТекущийЭлемент();   
        Ц.Валюта = Константа.ВалютаУпрУчета;
        Ц.Записать();
        Ц.Цена.Установить(НачНедели(РабочаяДата()),ЦенаЗак);
        Ц.Единица.Установить(НачНедели(РабочаяДата()),Ном.БазоваяЕдиница);
        Ц.Записать();
    КонецЕсли;
    Если Строка(ТипЦен)="ОПТОВАЯ" Тогда
        Ц.Новый();
        Ц.ТипЦен = ТипЦен.ТекущийЭлемент();   
        Ц.Валюта = Константа.ВалютаУпрУчета;
        Ц.Процент = 22;
        Ц.Записать();
        Ц.Цена.Установить(НачНедели(РабочаяДата()),ЦенаОпт);
        Ц.Единица.Установить(НачНедели(РабочаяДата()),Ном.БазоваяЕдиница); 
        Ц.Записать();
    КонецЕсли;
    Если Строка(ТипЦен)="Розничная" Тогда
        Ц.Новый();
        Ц.ТипЦен = ТипЦен.ТекущийЭлемент();   
        Ц.Валюта = Константа.ВалютаУпрУчета;
        Ц.Процент = 42;
        Ц.Записать();
        Ц.Цена.Установить(НачНедели(РабочаяДата()),ЦенаРоз);
        Ц.Единица.Установить(НачНедели(РабочаяДата()),Ном.БазоваяЕдиница);
        Ц.Записать();
    КонецЕсли;
КонецЦикла;   



Это сообщение отредактировал(а) Zero - 3.8.2007, 22:01
PM MAIL ICQ   Вверх
bucdapuswert
Дата 6.8.2007, 07:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 30
Регистрация: 14.5.2007

Репутация: нет
Всего: нет
ZERO Спасибо за помощь.
PM MAIL   Вверх
bucdapuswert
Дата 8.8.2007, 15:53 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 30
Регистрация: 14.5.2007

Репутация: нет
Всего: нет
Zero, а как мне быть в случае если в справочнике типы цен всего две цены PriCEO и PRICEZ
ну и соответственно для них разные цены.
PM MAIL   Вверх
Zero
Дата 8.8.2007, 20:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2169
Регистрация: 23.10.2004
Где: Россия, г. Рязань

Репутация: 15
Всего: 24
Цитата(bucdapuswert @  8.8.2007,  15:53 Найти цитируемый пост)
как мне быть в случае если в справочнике типы цен всего две цены PriCEO и PRICEZ

Разберись в примере выше, и переделай под свой.
Получиться что-то вроде:
Код

//Заполнение справочника "Цены" 
Ц.ИспользоватьВладельца(Ном.ТекущийЭлемент());
ТипЦен.ВыбратьЭлементы();
Пока ТипЦен.ПолучитьЭлемент()=1 Цикл 
    Если Строка(ТипЦен)="PriCEO" Тогда
        Ц.Новый();
        Ц.ТипЦен = ТипЦен.ТекущийЭлемент();   
        Ц.Валюта = Константа.ВалютаУпрУчета;
        Ц.Записать();
        Ц.Цена.Установить(НачНедели(РабочаяДата()),ЦенаPriCEO);
        Ц.Единица.Установить(НачНедели(РабочаяДата()),Ном.БазоваяЕдиница);
        Ц.Записать();
    КонецЕсли;
    Если Строка(ТипЦен)="PRICEZ" Тогда
        Ц.Новый();
        Ц.ТипЦен = ТипЦен.ТекущийЭлемент();   
        Ц.Валюта = Константа.ВалютаУпрУчета;
        Ц.Процент = 22;
        Ц.Записать();
        Ц.Цена.Установить(НачНедели(РабочаяДата()),ЦенаPRICEZ);
        Ц.Единица.Установить(НачНедели(РабочаяДата()),Ном.БазоваяЕдиница); 
        Ц.Записать();
    КонецЕсли;
КонецЦикла;


Это сообщение отредактировал(а) Zero - 8.8.2007, 20:02
PM MAIL ICQ   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "1C: Предприятие, SAP, ERP и учётные системы"
stron

Запрещается!

1. Обсуждение крэков, кейгенов и других подобных программ

Пробуйте искать сами или обращайтесь в приват к участникам форума.

Темы с подобными вещами будут немедленно удаляться, а нарушители - получать предупреждения.

Также запрещается обсуждение проблем работы этих программ (что куда вписать, куда что скопировать и т.п...)

2. Давать ссылки на взломанные продукты

  • Пожалуйста, пользуйтесь поиском перед тем, как задать вопрос - возможно ответ уже есть на форуме.
  • Название темы должно отражать её суть
  • Действия модераторов можно обсудить здесь

С уважением, stron, Pegas.
 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | 1C: Предприятие, SAP, ERP и учётные системы | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0842 ]   [ Использовано запросов: 20 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.