CAS CL5000J весовой/штучный товар : CAS

СписокТоваров.ВыбратьСтроки();
Пока СписокТоваров.ПолучитьСтроку()=1 Цикл 
		
		Объект.InitData();//Очистка свойств связанных с загрузкой параметров о товаре
		
		PLUКод = СписокТоваров.PLU;
		Если ( PLUКод < 1 ) ИЛИ ( PLUКод > 6000 ) Тогда
					Сообщить( PLUКод + " PLU-код товара " + СОКРП(СписокТоваров.Товар.Наименование)
						+ " больше 6 тысяч! Товар пропущен." );
			Продолжить;
		КонецЕсли;   
		
		Если СтрДлина(СокрЛП(СписокТоваров.ШтрихКод)) > 5 Тогда
			Сообщить( "Код товара " + СОКРП(СписокТоваров.Товар.Наименование )
						+ " больше пяти символов! Товар пропущен.");
			Продолжить;
		КонецЕсли;
		
		Если СтрДлина(СокрЛП(СписокТоваров.ШтрихКод)) = 0 Тогда
			Сообщить( "У товара " + СОКРП(СписокТоваров.Товар.Наименование )
						+ " отсутствует штрихкод! Товар пропущен.");
			Продолжить;
		КонецЕсли;		
        
		Если СписокТоваров.Цена=0 Тогда
			Сообщить ("Нулевая цена товара "+ СОКРП(СписокТоваров.Товар.Наименование));
		КонецЕсли;
		                                      
		
		Состояние( "Загрузка товара с PLU-кодом " + Строка( PLUКод ) + ", " 
		+ СписокТоваров.Товар.Наименование ); 
		
		Объект.pluNumber = PLUКод;
		Объект.pluDept = 1;
		Объект.pluName1 = Лев(СокрЛП(СписокТоваров.Товар.Наименование),54);
		//Объект.pluName2 = "name1";
		Объект.pluPrice = Цел(СписокТоваров.Цена*100);
		Объект.pluType = 1;
		//Объект.pluStrLogo = "1";
		Объект.pluGroupCode = 1;
		Объект.pluItemCode = СписокТоваров.ШтрихКод;
		//Объект.pluFixedPrice = 0;
		//Объект.pluWeightTare	= 0;
		//Объект.pluDatePack = 0;
		//Объект.pluTimePack = 0;
		Объект.pluDateLife = СписокТоваров.Товар.СрокГодности;
		//Объект.pluTimeLife = 0;
		//Объект.pluNumberMsg = 1;
		//Объект.pluTextMessage = "0";
		Если Константа.ФорматЭтикеткиLC5000 > 0 Тогда
			Объект.pluNumberLabel = Константа.ФорматЭтикеткиLC5000;
		КонецЕсли;
		//Объект.pluNumberBarcode = 0;
		//Объект.pluDateCreate = 0;
		//Объект.pluTextNumber = 0;
		//
		//Объект.pluTextNumber = 0;
		//Объект.pluLP16logoNumber = 0;
		//Объект.pluSYmbol = 0;
		//Объект.pluExtPCS = 0;
		//Объект.pluExtOrigin = 0;
		//Объект.pluExtBar2 = 0;
		//Объект.pluExtFixedWeight = 0;
		
		Объект.SendPlu();
		
		Если Объект.ResultCode = 0 Тогда
			Состояние("Успешно загружен.");
		Иначе
			Сообщить("Не удалось загрузить товар " + СокрЛП(СписокТоваров.Товар.Наименование) + " " + ОписаниеОшибкиДрайвера(Объект.ResultCode));
		КонецЕсли;
	КонецЦикла;	
	Объект.Close();
	Сообщить("Все товары успешно загружены в весы!");