Информационный поток
Задания вакансии материалы разработки сообщения форума
Форум

Обсуждение к заданию: Изменить / доработать обработку 7.7. Есть Торговля 7.7 и Штрих-м Кассир 2.9 (1с 7.7)

    • #1
    • 22.08.2013 11:19
    0
    Изменить / доработать обработку 7.7. Есть Торговля 7.7 и Штрих-м Кассир 2.9 (1с 7.7). Нужно изменить выгрузку таким образом чтобы данные записывались не в текстовый файл. А в таблицы DBF Штрих-м к...  Подробнее>>
    • #2
    • 22.08.2013 11:20
    • Отредактировано: 22.08.2013 11:20:37
    0
    Для примера:
    	DBF = СоздатьОбъект("xBase");
    	
    	DBF.ОткрытьФайл("c:\SC12.dbf",,);
    	DBF.КодоваяСтраница(0);
    ...
    
    	ФайлDBF.добавить();
    	ФайлDBF.ID		 =	_IdToStr(ПолучитьИД_Базы(Товар));
    	ФайлDBF.PARENTID =	_IdToStr(ПолучитьИД_Базы(Товар.Родитель));
    	ФайлDBF.CODE	 =	Товар.Код;
    	ФайлDBF.DESCR	 =	СокрЛП(СтрЗаменить(Товар.Наименование,";",","));
    	ФайлDBF.ISFOLDER =	0;
    	ФайлDBF.ISMARK	 =	0;
    	ФайлDBF.VERSTAMP =	0;
    	ФайлDBF.SP23	 =	СокрЛП(?  (СокрЛП(Товар.Наименование)="",СтрЗаменить(Товар.Наименование,";",","),СтрЗаменить(Товар.Наименование,";",",")));
    	ФайлDBF.SP14	 =	Цена;
    	ФайлDBF.SP22     =	Кол; 
    	ФайлDBF.SP16	 =	0;
    	ФайлDBF.SP21	 =	0;
    	ФайлDBF.SP296	 =	Секция;
    	ФайлDBF.SP394	 =	МаксПроцСкидки;
    	ФайлDBF.SP502	 =	КодГруппыНалога;
    	ФайлDBF.SP689	 =	СокрЛП(СтрЗаменить(Товар.Артикул,";",","));
    	ФайлDBF.Записать();
    ....
    
Яндекс-директ
Для участия в обсуждении Вам необходимо авторизоваться либо   зарегистрироваться