Имя: Пароль:
1C
 
Мобильное приложение. Перенос данных.
0 proglib
 
02.06.25
17:41
Сделал мобильное приложение.
Пользуюсь, данные копятся.
Поменял телефон.
Как перенести данные на новый телефон?
1 Garykom
 
гуру
02.06.25
17:42
МП по сути как обычная файловая база 1С на компе
Просто копипастить через файловый менеджер
Или выгрузить/загрузить
2 proglib
 
03.06.25
09:23
(1) Чтобы "выгрузить/загрузить" нужен конфигуратор, а его нет на телефоне.
3 timurhv
 
03.06.25
09:32
(2) Скачайте "1С:Мобильная касса", там есть. Но по сути выполняется все то же самое, что и в (1) = копирование файлов и архивация в zip.
4 proglib
 
02.06.25
18:37
(3) Странно, есть выгрузка, но нет загрузки.
5 proglib
 
02.06.25
18:44
(3) С (1) связи нет. Там товары только выгружаются.

            ТаблицаТоваров = Справочники.Номенклатура.ТаблицаКаталогаТоваровДляЭкспорта();  
            КоличествоПозиций = ТаблицаТоваров.Количество();
            
            РаботаСФайламиВызовСервера.ЗаписатьТаблицуЗначенийВCSV(ТаблицаТоваров, ПутьКФайлуЭкспорта, КодировкаФайлаВыгрузки);



Процедура ЗаписатьТаблицуЗначенийВCSV(ТаблицаДанных, ПутьКФайлу, Кодировка = Неопределено) Экспорт
    
    РазделитьДанныхВСтроке = ";";                                      
    РазделительСтрок = Символы.ПС;
    ТекстДляЗаписи = "";    
    ИменаКолонок = "";
    
    Попытка
        
        Для каждого Колонка Из ТаблицаДанных.Колонки Цикл
            
            Заголовок = ?(ПустаяСтрока(Колонка.Заголовок), Колонка.Имя, Колонка.Заголовок);
            ИменаКолонок = СтрШаблон("%1%2%3", ИменаКолонок, ?(ИменаКолонок = "", "", РазделитьДанныхВСтроке), Заголовок);
            
        КонецЦикла;
        
        ТекстДляЗаписи = СтрШаблон("%1%2", ИменаКолонок, РазделительСтрок);
                
        Для каждого СтрокаТаблицы Из ТаблицаДанных Цикл
            
            СтрокаДанных = "";
            
            Для каждого Колонка Из ТаблицаДанных.Колонки Цикл
                
                Значение = СтрокаТаблицы[Колонка.Имя];
                
                СтрокаДанных = СтрШаблон("%1%2%3", СтрокаДанных, ?(СтрокаДанных = "", "", РазделитьДанныхВСтроке), Значение);
                
            КонецЦикла;  
            
            ТекстДляЗаписи = СтрШаблон("%1%2%3", ТекстДляЗаписи, СтрокаДанных, РазделительСтрок);
            
        КонецЦикла;
        
        ЗаписатьДанныеВТекстовыйФайл(ТекстДляЗаписи, ПутьКФайлу, , Кодировка);
        
    Исключение    
                
        ТекстОшибки = нСтр("ru='Ошибка при записи данных в файл:'", "ru");
        ТекстОшибки = СтрШаблон("%1%2%3", ТекстОшибки, Символы.ПС, ОписаниеОшибки());
        
        ВызватьИсключение ТекстОшибки;

    КонецПопытки;
            
КонецПроцедуры
6 timurhv
 
02.06.25
19:05
(4) "Резервное копирование" выберите, форма "РезервноеКопирование"
7 Garykom
 
гуру
02.06.25
19:29
8 proglib
 
03.06.25
10:24
(6) (7) Спасибо!
Буду разбираться.
9 Вадя
 
03.06.25
17:13
Новый интерфейс на платформе 8.5 посмотреть не забываем
10 proglib
 
03.06.25
18:01
(6) Работает!
Загружает файл базы при работающем приложении.
Буду пользоваться.

(7) Тоже замена файла базы, но из другого приложения, а зачем, если можно из текущего.

Всем спасибо!