Бухгалтерский учет, налогообложение, отчетность, МСФО, анализ бухгалтерской информации, 1С:Бухгалтерия

Форум

Развернуть все [Прочее] Медленная переброска номенклатуры.
2L8
Пост №1
2L8
читатель
офлайн
Дата регистрации: 17.07.2003
Сообщений: 8
Пост №1
 
17.07.2003 21:36

"Уважаемый ALL!

Вознокла проблема, перебраски номенклатуры из БЭСТ-ПРО в 1С Педприятие (Торговля +Склад версия 9.2). Написал обработку по созданию новой карточки в справочнике номенклатура. Процесс переброски 34000 записе занял 1ч. 45 мин. Такая скорость подходит. А когда добал ко всему этому еще и 4 цены то процесс затянулся более чем на 10 часов. :o( А это никуда не годится.

Как можно сделать добавление цен более быстрым.



Далее представлен кос самой процедуры:



Процедура ДобавитьНом(арт,наим,полн,сгтд,сстр, отдел,еи,ц0,ц1,ц2,ц3);

//ДобавитьНом(наим, пнаим, арт, страна, сертификат, нгтд, гигсер, сербэст, оргсер, аос, регном, срокдейтв);



if (ном.НайтиПоКоду(арт,)=0) and (номрод.Найтипокоду(отдел,)=1) then

ном.Новый();

//******************************************************************************

ном.Родитель= номрод.ТекущийЭлемент();

ном.Код=арт;

ном.артикул=арт;

ном.наименование= наим;

Ном.ПолнНаименование = полн;

// Обработка ГТД            

if сгтд <>'' then

if гтд.НайтиПоНаименованию(сгтд,,)=1 тогда

Ном.НомерГТД=гтд.ТекущийЭлемент()

else                              

гтд.Новый();

гтд.Наименование=сгтд;

гтд.Комментарий=сгтд;

гтд.Записать();

гтд.НайтиПоНаименованию(сгтд,,);

Ном.НомерГТД=гтд.ТекущийЭлемент();

endif;

endif;

// завершение обработки ГТД



// Страна происхождения

if сстр <>"""" then

if Оксм.НайтиПоНаименованию(сстр,,)=1 тогда

Ном.СтранаПроисхождения=Оксм.ТекущийЭлемент()

else                              

оксм.Новый();

// оксм.Код=кодстр;

оксм.Наименование=сстр;

оксм.Записать();

оксм.НайтиПоНаименованию(сстр,,);

Ном.СтранаПроисхождения=Оксм.ТекущийЭлемент();

endif;



endif;

// завершение обработки СтранаПроисхождения



ном.Записать();





//Базовая ЕИ

if (еи<>"""") and (Океи.НайтиПоНаименованию(еи,,)=1) then

// Сообщить(еи+"|"+Океи.код ,"i");

ЕдНом.Новый();

ЕдНом.Владелец=Ном.ТекущийЭлемент();

Едном.Океи=Океи.ТекущийЭлемент();

ЕдНом.Коэффициент=1;

Едном.Записать();

endif;

ном.БазоваяЕдиница=Едном.ТекущийЭлемент();

Ном.записать();



//цена0

цена.Новый();

цена.Владелец=Ном.ТекущийЭлемент();

цена.валюта = рубль;

цена.процент = 0;

цена.ТипЦен = тц0;

цена.Записать();

цена.Единица.Установить(ТекущаяДата(),ном.БазоваяЕдиница);

Цена.цена.Установить(ТекущаяДата(),ц0);                  

цена.Записать();

//цена1

цена.Новый();

цена.Владелец=Ном.ТекущийЭлемент();

цена.валюта = рубль;

цена.процент = 0;

цена.ТипЦен = тц1;

цена.Записать();

цена.Единица.Установить(ТекущаяДата(),ном.БазоваяЕдиница);

Цена.цена.Установить(ТекущаяДата(),ц1);                  

цена.Записать();

//цена2

цена.Новый();

цена.Владелец=Ном.ТекущийЭлемент();

цена.валюта = рубль;

цена.процент = 0;

цена.ТипЦен = тц2;

цена.Записать();

цена.Единица.Установить(ТекущаяДата(),ном.БазоваяЕдиница);

Цена.цена.Установить(ТекущаяДата(),ц2);                  

цена.Записать();

//цена3

цена.Новый();

цена.Владелец=Ном.ТекущийЭлемент();

цена.валюта = рубль;

цена.процент = 0;

цена.ТипЦен = тц3;

цена.Записать();

цена.Единица.Установить(ТекущаяДата(),ном.БазоваяЕдиница);

Цена.цена.Установить(ТекущаяДата(),ц3);                  

цена.Записать();



endif;



КонецПроцедуры



Буду очень благодарен за любые мысли и предложения по этомк поводу."

 
2L8
Пост №1
17.07.2003 21:36
 

"Уважаемый ALL!

Вознокла проблема, перебраски номенклатуры из БЭСТ-ПРО в 1С Педприятие (Торговля +Склад версия 9.2). Написал обработку по созданию новой карточки в справочнике номенклатура. Процесс переброски 34000 записе занял 1ч. 45 мин. Такая скорость подходит. А когда добал ко всему этому еще и 4 цены то процесс затянулся более чем на 10 часов. :o( А это никуда не годится.

Как можно сделать добавление цен более быстрым.



Далее представлен кос самой процедуры:



Процедура ДобавитьНом(арт,наим,полн,сгтд,сстр, отдел,еи,ц0,ц1,ц2,ц3);

//ДобавитьНом(наим, пнаим, арт, страна, сертификат, нгтд, гигсер, сербэст, оргсер, аос, регном, срокдейтв);



if (ном.НайтиПоКоду(арт,)=0) and (номрод.Найтипокоду(отдел,)=1) then

ном.Новый();

//******************************************************************************

ном.Родитель= номрод.ТекущийЭлемент();

ном.Код=арт;

ном.артикул=арт;

ном.наименование= наим;

Ном.ПолнНаименование = полн;

// Обработка ГТД            

if сгтд <>'' then

if гтд.НайтиПоНаименованию(сгтд,,)=1 тогда

Ном.НомерГТД=гтд.ТекущийЭлемент()

else                              

гтд.Новый();

гтд.Наименование=сгтд;

гтд.Комментарий=сгтд;

гтд.Записать();

гтд.НайтиПоНаименованию(сгтд,,);

Ном.НомерГТД=гтд.ТекущийЭлемент();

endif;

endif;

// завершение обработки ГТД



// Страна происхождения

if сстр <>"""" then

if Оксм.НайтиПоНаименованию(сстр,,)=1 тогда

Ном.СтранаПроисхождения=Оксм.ТекущийЭлемент()

else                              

оксм.Новый();

// оксм.Код=кодстр;

оксм.Наименование=сстр;

оксм.Записать();

оксм.НайтиПоНаименованию(сстр,,);

Ном.СтранаПроисхождения=Оксм.ТекущийЭлемент();

endif;



endif;

// завершение обработки СтранаПроисхождения



ном.Записать();





//Базовая ЕИ

if (еи<>"""") and (Океи.НайтиПоНаименованию(еи,,)=1) then

// Сообщить(еи+"|"+Океи.код ,"i");

ЕдНом.Новый();

ЕдНом.Владелец=Ном.ТекущийЭлемент();

Едном.Океи=Океи.ТекущийЭлемент();

ЕдНом.Коэффициент=1;

Едном.Записать();

endif;

ном.БазоваяЕдиница=Едном.ТекущийЭлемент();

Ном.записать();



//цена0

цена.Новый();

цена.Владелец=Ном.ТекущийЭлемент();

цена.валюта = рубль;

цена.процент = 0;

цена.ТипЦен = тц0;

цена.Записать();

цена.Единица.Установить(ТекущаяДата(),ном.БазоваяЕдиница);

Цена.цена.Установить(ТекущаяДата(),ц0);                  

цена.Записать();

//цена1

цена.Новый();

цена.Владелец=Ном.ТекущийЭлемент();

цена.валюта = рубль;

цена.процент = 0;

цена.ТипЦен = тц1;

цена.Записать();

цена.Единица.Установить(ТекущаяДата(),ном.БазоваяЕдиница);

Цена.цена.Установить(ТекущаяДата(),ц1);                  

цена.Записать();

//цена2

цена.Новый();

цена.Владелец=Ном.ТекущийЭлемент();

цена.валюта = рубль;

цена.процент = 0;

цена.ТипЦен = тц2;

цена.Записать();

цена.Единица.Установить(ТекущаяДата(),ном.БазоваяЕдиница);

Цена.цена.Установить(ТекущаяДата(),ц2);                  

цена.Записать();

//цена3

цена.Новый();

цена.Владелец=Ном.ТекущийЭлемент();

цена.валюта = рубль;

цена.процент = 0;

цена.ТипЦен = тц3;

цена.Записать();

цена.Единица.Установить(ТекущаяДата(),ном.БазоваяЕдиница);

Цена.цена.Установить(ТекущаяДата(),ц3);                  

цена.Записать();



endif;



КонецПроцедуры



Буду очень благодарен за любые мысли и предложения по этомк поводу."

 
moroder
Пост №2
Поставить процесс работы со справочникам в транзак...
18.07.2003 08:39
 
 
2L8
Пост №3
"Как правильно использоватьтранзакции: -Вставить Н...
18.07.2003 14:51
 
 
2L8
Пост №4
Всё, разобрался. Спасибо за идею. Скорость замечат...
18.07.2003 16:15
 
 
moroder
Пост №5
Рад, что у вас усе получилось
18.07.2003 18:48
 

Читают тему:

1 гостей
Быстрый переход
Для технических специалистов
  • Учет, налогообложение, автоматизация
  • Книга жалоб и предложений по работе сайта
  • Для технических специалистов
  • Представление регламентированной отчетности
  • Говорильня
  • Бухгалтерский учет: обсуждаем проекты нормативных актов и рекомендаций по ведению учета от БМЦ
  • Интернет-конференция: Оформление командировок по новым правилам
  • ЕГАИС

1C:Предприятие 1С-Отчетность 1С-Такском 1С:ERP Управление предприятием 1С:Бухгалтерия 8 1С:Бухгалтерия 8 КОРП 1С:Бухгалтерия автономного учреждения 1С:Бухгалтерия государственного учреждения 1С:Бюджет муниципального образования 1С:Бюджет поселения 1С:Вещевое довольствие 1С:Деньги 1С:Документооборот 1С:Зарплата и кадры бюджетного учреждения 1С:Зарплата и кадры государственного учреждения 1С:Зарплата и управление персоналом 1С:Зарплата и управление персоналом КОРП 1С:Комплексная автоматизация 8 1С:Лекторий 1С:Предприятие 1С:Предприятие 7.7 1С:Предприятие 8 1С:Розница 1С:Управление небольшой фирмой 1С:Управление производственным предприятием 1С:Управление торговлей 1СПАРК-Риски 1СПредприятие 8 2-НДФЛ 3-НДФЛ 4-ФСС 5 минут 6-НДФЛ CRM Агентский договор. Учет административная ответственность адресный классификатор акцизы алкоголь алкогольная продукция амортизационная премия амортизация антикризисные арбитражная практика аренда недвижимости аттестация рабочих мест аудит база 1с база по страховым взносам база по налогу на прибыль банк и касса в 1с банкротство безнадежная задолженность безналичные расчеты бланки строгой отчетности больничное пособие больничный листок бухгалтер бухгалтерия автономного учреждения бухгалтерская отчетность бухгалтерские события бухгалтерский баланс бухгалтерский учет бухучет Бытовые услуги. Учет бюджет муниципального образования бюджет поселения бюджетная отчетность бюджетный учет ВАС РФ Вахтовый метод.Оплата ввоз товаров взаимозависимые_лица взноcы в ПФР взносы в ФОМС взносы в ФСС взносы на травматизм видео 1С водный налог возврат переплаты возврат товаров восстановление НДС вредные условия труда вывоз товаров выездная налоговая проверка выездная проверка выплата зарплаты выплаты иностранному работнику выплаты по ГПД выплаты работникам выплаты физическим лицам высококвалифицированные специалисты вычет на лечение вычет НДС вычеты по НДФЛ ВЭД ГК РФ госпошлина государственная регистрация государственные и муниципальные закупки государственный реестр гражданско-правовой договор графики работы двойное налогообложение дебиторка дебиторская задолженность декларация по алкоголю декларация по ЕНВД декларация по НДС декларация соответствия условий труда денежные документы День Бухгалтерии детские пособия ДиректБанк договор комиссии договор подряда договор поставки договор транспортной экспедиции договорная политика документальное оформление документооборот долговые обязательства должная осмотрительность доплата доходы организации ЕГАИС ЕГРЮЛ ежемесячная отчетность ЕНВД ЕСН ЕСХН задержка заработной платы задолженность по налогам займы закон о бухгалтерском учете закон о маркировке товаров занимательная бухгалтерия заработная плата зарплата зарплатные налоги защита персональных данных заявление о постановке на учет земельный налог изменения 2015 изменения в законодательстве изменения в законодательстве 2012 изменения в законодательстве 2013 износ основных средств имущественные вычеты индивидуальный предприниматель иностранные компании иностранный контрагент иностранный работник интернет-компании ИП ИП на ЕНВД ИП на УСН ИС 1С:ИТС исправление бухгалтерских ошибок исправление ошибок ИТС ИФНС кадастровая стоимость кадровое оформление камеральная проверка кассовая дисциплина кассовая книга кассовые операции КБК квоты на иностранных рабочих КИК ККТ КЛАДР ключевая ставка книга на УСН книга покупок книга продаж КоАП РФ командировочные расходы компенсации работникам компенсация за отпуск компенсация за проезд конкурс консервация основных средств консолидированная группа консолидированная отчетность контролируемые сделки корректировочный счет-фактура коэффициент-дефлятор крупнейшие налогоплательщики курсовые разницы лизинг лизинговое имущество ликвидация организации лицензирование малый бизнес маркировка изделий маркировка изделий из натурального меха маркировка меховых изделий маркировка товара материальная выгода материальная помощь материнский капитал миниденьги модернизация основных средств МРОТ МСФО наличные расчеты налог на игорный бизнес налог на имущество налог на имущество физических лиц налог на прибыль налоги физических лиц налоговая база по налогу на прибыль налоговая база по НДС налоговая база по ндс налоговая декларация налоговая ответственность налоговая отчетность налоговая проверка налоговое администрирование налоговые каникулы налоговые льготы налоговые риски налоговый агент налоговый агент НДФЛ налоговый агент по НДС налоговый агент по НДФЛ налоговый агент по ндфл налоговый вычет налоговый контроль налоговый мониторинг налоговый учет налогообложение доходов налогоплательщик начисление пени НДПИ НДС НДС при ввозе НДС-2015 НДФЛ НДФЛ с экономии на процентах некоммерческие организации учет неотделимые улучшения нерезиденты НИОКР НК РФ НМА новая форма декларации новости новый формат счета-фактуры нормы естественной убыли нулевая декларация нулевая ставка обзор обзор бухгалтерских событий обзор новостей обновление КЛАДР обособленное подразделение обособленные подразделения обучение 1с обязанности налогоплательщика обязательное страхование от несчастных случаев на производстве оказание услуг онлайн-ККТ онлайн-ккт освобождение от налогообложения освобождение от НДС освобождение от НДФЛ основные средства открытие расчетного счета отмена транспортного налога отпускные отходы отчетность в ПФР отчетность в Росстат отчетность организации отчетность предпринимателя оформление счета-фактуры охрана труда патентная система ПБУ 18 ПБУ 2 ПБУ 23 первичные документы переход на ЕНВД переход на УСН персонифицированный учет план счетов плата за негативное воздействие на окружающую среду плата за проезд грузовиков платежи платежное поручение платежные документы 1с платежный агент платежный терминал площадь торгового зала повышение ставок подтверждающие документы подтверждение расходов полномочия налоговых органов пониженные тарифы поправки в НК РФ поправки в ТК РФ пособие по беременности и родам пособие по временной нетрудоспособности пособие по нетрудоспособности пособие по уходу за ребенком пособия за счет ФСС посреднические договоры постановка на учет постановка на учет в налоговом органе права налогоплательщика представление сведений приказ Минфина приостановление операций по счету проверка ИНН/КПП проверка контрагентов продажа алкогольной продукции производственный календарь проф. Пятов профессиональные вычеты ПСН псн путевой лист работники-белорусы работники-иностранцы раздельный учет расходы на ГСМ расходы на рекламу расходы организации расчет больничного листа расчет ЕНВД расчет заработной платы расчет себестоимости расчетный счет расчеты с работниками регистрация ККТ регистрация недвижимости регистрация юридических лиц реконструкция основных средств ремонт основных средств реорганизация росалкогольрегулирование Росстат РСВ-1 рыночные цены самозанятые граждане свод отчетов сдача имущества в аренду сельскохозяйственный товаропроизводитель снижение ставок совместители совмещение налоговых режимов составление и сдача отчетности составление и сдача отчетности социальное страхование социальные вычеты социальный налоговый вычет спецоценка условий труда средний заработок ставка НДС Ставка НДФЛ ставка рефинансирования ставка УСН стандартные вычеты стандартный налоговый вычет стандарты бухучета статистика статистическая отчетность статотчетность страхование страховые взносы страховые взносы в ФСС судебные издержки суммовые разницы суточные счет-фактура табель учета рабочего времени такси таможенные платежи таможенный союз ТК РФ торг-12 торговый сбор транспортный налог трудовая книжка трудовая пенсия трудовой договор увольнение по инициативе руководителя увольнение по соглашению сторон уголовная ответственность удержание алиментов универсальный корректировочный документ УПД уплата госпошлины уплата налогов управленческий учет 1с УСН уставный капитал уточненка учет аренды учет в АО учет в ООО учет в сельском хозяйстве учет в строительстве учет в торговле учет дивидендов учет доходов при УСН учет запасов учет импорта учет лизинга учет МПЗ учет на производстве учет ОС учет основных средств учет премий учет расходов учет расходов при УСН учет реализации учет скидок учет спецодежды учет субсидий учет товаров учет ценных бумаг учет экспорта учетная политика учредительные документы факсимиле ФИАС финансовый анализ финансовый результат ФНС РФ фонд оплаты труда форма СЗВ-М формы документов ФСС штрафные санкции ЭДО экологические платежи экономия на процентах экспорт в страны ЕАЭС экспорт продукции экспортные операции электронная отчетность электронная подпись электронные счета-фактуры электронный документооборот электронный формат энциклопедия проверок

Все теги
X

Яндекс-виджет: Новости
Яндекс-виджет: Полезные материалы
Информеры