Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
29 сен 2024, 02:24

Загрузка из DBF

Автор Вожак, 03 апр 2012, 17:28

0 Пользователей и 1 гость просматривают эту тему.

Вожак

мм, а если у меня внешняя обработка идет? как я укажу свойства справочника?

Dethmontt

Так ты в какой справочник пытаешься записать???? Во внешнюю обработку что ли???
Если долго всматриваться в учебник...то в голову может прийти мысль его открыть!

Dethmontt

У справочника на вкладке "Нумерация" сними галочку контроль уникальности
И записывай туда элементы без кода
Или
НовоеФизлицо.УстановитьНовыйКод();
НовоеФизлицо.Записать();
Если долго всматриваться в учебник...то в голову может прийти мысль его открыть!

Вожак

разобрался, просто там было. Я теперь когда запускаю свою обработку, он переносит данные из dbf файлов, но вот с Фамилией, именем и отчеством он касачит, не переносит их, а в регистре сведений только одна запись на каком-то албанском. Вот  моя чатсь кода, отвечающая за это:


НаборЗаписей1 = РегистрыСведений.ФИОФизЛиц.СоздатьНаборЗаписей();
      НоваяЗапись1 = НаборЗаписей1.Добавить();
      ФИО = ОбщегоНазначения.РазложитьСтрокуВМассивПодстрок(ФизЛица.fn, " ");
      КоличествоПодстрок = ФИО.Количество();
   
   Результат = Новый Структура;
   
   Результат.Вставить("Фамилия",   ?(КоличествоПодстрок > 0,ФИО[0],""));
   Результат.Вставить("Имя",      ?(КоличествоПодстрок > 1,ФИО[1],""));
   Результат.Вставить("Отчество",   ?(КоличествоПодстрок > 2,ФИО[2],""));
      НоваяЗапись1.Фамилия = Результат.Фамилия;
      НоваяЗапись1.Имя = Результат.Имя;
      НоваяЗапись1.Отчество = Результат.Отчество;
      НоваяЗапись1.ФизЛицо = НовоеФизЛицо.Ссылка;
      НоваяЗапись1.Период = ТекущаяДата();
      НаборЗаписей1.Записать()

Вожак

НаборЗаписей1 = РегистрыСведений.ФИОФизЛиц.СоздатьНаборЗаписей();
      НоваяЗапись1 = НаборЗаписей1.Добавить();
      ФИО = ОбщегоНазначения.РазложитьСтрокуВМассивПодстрок(ФизЛица.fn, " ");
      КоличествоПодстрок = ФИО.Количество();
   
   Результат = Новый Структура;
   
   Результат.Вставить("Фамилия",   ?(КоличествоПодстрок > 0,ФИО[0],""));
   Результат.Вставить("Имя",      ?(КоличествоПодстрок > 1,ФИО[1],""));
   Результат.Вставить("Отчество",   ?(КоличествоПодстрок > 2,ФИО[2],""));
      НоваяЗапись1.Фамилия = Результат.Фамилия;
      НоваяЗапись1.Имя = Результат.Имя;
      НоваяЗапись1.Отчество = Результат.Отчество;
      НоваяЗапись1.ФизЛицо = НовоеФизЛицо.Ссылка;
      НоваяЗапись1.Период = ТекущаяДата();
      НаборЗаписей1.Записать()

Вожак

Результат.Вставить("Фамилия",   ?(КоличествоПодстрок > 0,ФИО[0],""));
   Результат.Вставить("Имя",      ?(КоличествоПодстрок > 1,ФИО[1],""));
   Результат.Вставить("Отчество",   ?(КоличествоПодстрок > 2,ФИО[2],""));

Вожак

При переносе из DBF в 1ску, возникает проблема с кодировкой, отладчиком смотрю значения какие получаются у меня, и там, где должна быть нормальная надпись, у меня пишется что то типа:
†павпК№;342АПц6†ЋР и прочая херня
как с кодировкой разобраться, чтоб не было такого? файл переименовывал из дбф3 в дбф4, в фокс про, и т.д. результат такой же

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск