1
0
mirror of https://github.com/netology-code/1c-homeworks.git synced 2025-02-16 18:18:13 +02:00

Update homework-5-7.md

This commit is contained in:
StepanShipitsyn 2020-06-23 20:59:20 +08:00 committed by GitHub
parent 2a6a8b6eaf
commit 327e635bd8
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -66,19 +66,19 @@
&НаСервере
Процедура ЗагрузитьЦеныНоменклатуры()
Файл = ПолучитьИмяВременногоФайла("csv");
лДвоичДанные = ПолучитьИзВременногоХранилища(АдресВХранилище);
лДвоичДанные.Записать(Файл);
ФайлХранилища = ПолучитьИзВременногоХранилища(АдресВХранилище);
ФайлХранилища.Записать(Файл);
ТабДок = Новый ТекстовыйДокумент;
ТекстовыйФайлЗагрузки = Новый ТекстовыйДокумент;
Разделитель = ";";
Попытка
ТабДок.Прочитать(Файл);
ТекстовыйФайлЗагрузки.Прочитать(Файл);
ДокументЦены = Документы.УстановкаЦенНоменклатуры.СоздатьДокумент();
//Прочитаем строки файла
Для НомерСтроки=1 по ТабДок.КоличествоСтрок() Цикл
НоваяСтрока = ТабДок.ПолучитьСтроку(НомерСтроки);
Для НомерСтроки=1 по ТекстовыйФайлЗагрузки.КоличествоСтрок() Цикл
НоваяСтрока = ТекстовыйФайлЗагрузки.ПолучитьСтроку(НомерСтроки);
// «парсим» строки по ";"
// ищем позицию символа-разделителя
Позиция = Найти(НоваяСтрока, ";");