25-11-2020, Saat: 18:33
Merhabalar ;
Örnek XML Dosya
SQL içinden dosyayı okuduğumda sorun yaşamadan dosyayı okuyabiliyorum. Fakat delphi içinden bir türlü pars edemedim.
Sitede Standart XML dosyaları ile ilgili örnekler var fakat XMl dosyam çok standartlara uymadığından
bir türlü beceremedim. Bu konuda yardımlarınızı rica ediyorum.
Herkese sağlıklı ve mutlu günler diliyorum.
Örnek XML Dosya
DECLARE @sSQL NVARCHAR(MAX) DECLARE @Parametre NVARCHAR(500) DECLARE @xml XML SET @Parametre = N'@XML_OUT XML OUTPUT' SET @sSQL = N'SELECT @XML_OUT = BulkColumn FROM OPENROWSET(BULK ' + quotename(@xmldosyaadi, '''') + ', SINGLE_BLOB) ROW_SET'; EXEC sp_executesql @sSQL , @Parametre, @XML_OUT = @xml OUTPUT; Declare @hDoc AS INT EXEC sp_xml_preparedocument @hDoc OUTPUT, @XML INSERT INTO YS_tmp_customer (Id, MessageId, RestaurantName, RestaurantCatalog, RestaurantCategory, CustomerName, CustomerId, CustomerType, PaymentNote, OrderTotal, CustomerPhone, CustomerPhone2, PromoCode, City, Region, Organization, Adress, AddressDescription, AddressId, PaymentMethodId, DeliveryTime, ChangeInTotal, Currency, OrderNote ) SELECT * FROM OPENXML(@hDoc, 'order') WITH ( Id bigint '@Id', MessageId bigint '@MessageId ', RestaurantName varchar(100) '@RestaurantName', RestaurantCatalog varchar(30) '@RestaurantCatalog', RestaurantCategory varchar(50) '@RestaurantCategory', CustomerName varchar(100) '@CustomerName' , CustomerId int '@CustomerId', CustomerType smallint '@CustomerType', PaymentNote nvarchar(100) '@PaymentNote', OrderTotal float '@OrderTotal', CustomerPhone nvarchar(30) '@CustomerPhone', CustomerPhone2 nvarchar(30) '@CustomerPhone2', PromoCode nvarchar(50) '@PromoCode', City nvarchar(30) '@City', Region nvarchar(30) '@Region', Organization nvarchar(50) '@Organization', Adress nvarchar(150) '@Address', AddressDescription nvarchar(50) '@AddressDescription', AddressId nvarchar(50) '@AddressId', PaymentMethodId smallint '@PaymentMethodId', DeliveryTime datetime '@DeliveryTime', ChangeInTotal float '@ChangeInTotal', Currency nvarchar(6) '@Currency', OrderNote nvarchar(200) '@OrderNote' )
SQL içinden dosyayı okuduğumda sorun yaşamadan dosyayı okuyabiliyorum. Fakat delphi içinden bir türlü pars edemedim.
Sitede Standart XML dosyaları ile ilgili örnekler var fakat XMl dosyam çok standartlara uymadığından
bir türlü beceremedim. Bu konuda yardımlarınızı rica ediyorum.
Herkese sağlıklı ve mutlu günler diliyorum.
evet terbiyesi tamam olmuş. Uğraşırdım sizi hakkınızı helal edin. Allah gönlünüze göre versin. Herşey gönlünüzce olsun. Sağlıklı sıhhatli bir ömür nasip etsin rabbim size ve hepimize.