VPF::Атрибут в XML - Форум программистов

Kamoliddin

Дата 20.4.2007, 12:42 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 35
Регистрация: 5.10.2006

Репутация: нет
Всего: нет

Привет !
У меня есть файл XML :

Код


<?xml version="1.0" standalone="yes"?>
<DATAPACKET Version="2.0">
<ROWS>
<ROW KOD="3,00" NAME="АНДИЖАНСКАЯ" K_1N="01.01.2007"/>
<ROW KOD="6,00" NAME="БУХАРСКАЯ" K_1N="01.02.2007"/>
<ROW KOD="8,00" NAME="ДЖИЗАКСКАЯ" K_1N="01.03.2007"/>
</ROWS>
</DATAPACKET>

Как видите список полей отсуствовает, и тип полей я не могу определить сразу.
Запись загружаеться в Оракл. А когда тип поля DATE то надо преоброзовать с помощью to_date(DATE,"dd.mm.yyyy").

Загрузка в Оракл :

Код


 with DM.XMLDocument1.ChildNodes.FindNode("ROWS") do
  begin
    for k:=0 to ChildNodes.Count-1 do // цикл записей
    begin
      with ChildNodes.get(k) do begin
      for i:=0 to AttributeNodes.Count - 1 do //  цикл атрибутов
       begin

       if  тип атрибута  являеться DATE то 
        q:= q + 'to_date('+QuotedStr(AttributeNodes.get(i).NodeValue)+' ,''dd.mm.yyyy'')'
       else
        q:= q + QuotedStr(AttributeNodes.get(i).NodeValue);

       if i <> AttributeNodes.Count - 1 then q:= q + ',';

       end;
     end; 

    q:= 'Insert into ' +Table_name + ' values (' + q + ' )' ;
  
    DM.Import_OQ.Close;
    DM.Import_OQ.SQL.Text:=q;
    DM.Import_OQ.ExecSQL;
    end;
  end;

А вот как узнать тип поля не могу найти ....!

aktuba

Дата 20.4.2007, 14:57 (ссылка)

(нет голосов)

Загрузка ...

Смышленный

Профиль
Группа: Завсегдатай
Сообщений: 1915
Регистрация: 24.4.2006
Где: Планета Земля

Репутация: 16
Всего: 38

Цитата

А вот как узнать тип поля не могу найти ....!

А никак!!! Это строка - распознавай в ручную и преобразовывай. Других путей тут нет...

--------------------

Insert

Дата 20.4.2007, 15:15 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 208
Регистрация: 13.4.2006

Репутация: 1
Всего: 1

Можешь в одном из аттирбутов сделать вроде искусственного типа и оттуда его брать.

--------------------

пьяный русский кодер практически непобедим

aktuba

Дата 20.4.2007, 16:30 (ссылка)

(нет голосов)

Загрузка ...

Смышленный

Профиль
Группа: Завсегдатай
Сообщений: 1915
Регистрация: 24.4.2006
Где: Планета Земля

Репутация: 16
Всего: 38

Insert, если я правильно понимаю - это не он формирует XML, а берет готовый...

--------------------

Kamoliddin

Дата 20.4.2007, 17:29 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 35
Регистрация: 5.10.2006

Репутация: нет
Всего: нет

Цитата

Insert, если я правильно понимаю - это не он формирует XML, а берет готовый...

у меня готовый файл.

Я уже решил проблему но не так как хотел.
Пришлось вручную проверять ....! Спасибо вам.

aktuba

Дата 20.4.2007, 18:24 (ссылка)

(нет голосов)

Загрузка ...

Смышленный

Профиль
Группа: Завсегдатай
Сообщений: 1915
Регистрация: 24.4.2006
Где: Планета Земля

Репутация: 16
Всего: 38

Цитата

у меня готовый файл.

Я уже решил проблему но не так как хотел.
Пришлось вручную проверять ....! Спасибо вам.

Я про то и говорил...

--------------------

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »