xml oluşturma.

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Cevapla
serkan
Üye
Mesajlar: 666
Kayıt: 10 Tem 2003 12:08
Konum: bursa

xml oluşturma.

Mesaj gönderen serkan »

merhaba arkadaşlar..forumda konuyla ilgili geçen topicleri okudum ama bir zerre bişey anlamadım çünkü kavramları bilmiyorum açıkcası..
şöyle sorumu kabaca anlatayım...
firebird veritabanı kullanarak yazdığım MRP programından LKS2 ye irsaliyeleri göndermem lazım tabi xml olarak.lks2 den irsaliyeleri XML'e atıyorum.notepad ile açıp irsaliye numarasını değiştirip tekrar lks ye import ettiğimde yeni kayıt olarak alıyor.şimdi ben logonun oluşturduğu XML dosyasının aynısını kendi projemdeki bilgileri aktarmam lazım ama nasıl yapacağımdan fikrim yok.dataseti veya dbgridi export eden 3.parti bileşenler var ama attığı xml dosyasının yapısı logonun attığından farklı.bunu bir döngü ile string işleme şeklinde yapıp daha sonra xml olarak kayıtmı etmek lazım.yoksa daha standart ve makul bir yolu varmı?.logonun oluşturduğu xml dosyası aşağıdaki gibi..

Kod: Tümünü seç

<?xml version="1.0" encoding="ISO-8859-9"?>
<SALES_DISPATCHES>
  <DISPATCH DBOP="INS" >
    <TYPE>8</TYPE>
    <NUMBER>IRSALIYE-4</NUMBER>
    <DATE>19.06.2006</DATE>
    <TIME>17900128</TIME>
    <ARP_CODE>120 01 001</ARP_CODE>
    <TOTAL_DISCOUNTED>10</TOTAL_DISCOUNTED>
    <TOTAL_VAT>1.8</TOTAL_VAT>
    <TOTAL_GROSS>10</TOTAL_GROSS>
    <TOTAL_NET>11.8</TOTAL_NET>
    <RC_RATE>1</RC_RATE>
    <RC_NET>11.8</RC_NET>
    <CREATED_BY>1</CREATED_BY>
    <DATE_CREATED>20.06.2006</DATE_CREATED>
    <HOUR_CREATED>1</HOUR_CREATED>
    <MIN_CREATED>18</MIN_CREATED>
    <SEC_CREATED>9</SEC_CREATED>
    <CURRSEL_TOTALS>3</CURRSEL_TOTALS>
    <DATA_REFERENCE>4</DATA_REFERENCE>
    <TRANSACTIONS>
      <TRANSACTION>
        <TYPE>0</TYPE>
        <MASTER_CODE>150 01 001</MASTER_CODE>
        <QUANTITY>10</QUANTITY>
        <PRICE>1</PRICE>
        <TOTAL>10</TOTAL>
        <TC_XRATE>1</TC_XRATE>
        <RC_XRATE>1</RC_XRATE>
        <UNIT_CODE>ADET</UNIT_CODE>
        <UNIT_CONV1>1</UNIT_CONV1>
        <UNIT_CONV2>1</UNIT_CONV2>
        <VAT_RATE>18</VAT_RATE>
        <VAT_AMOUNT>1.8</VAT_AMOUNT>
        <VAT_BASE>10</VAT_BASE>
        <TOTAL_NET>10</TOTAL_NET>
        <DATA_REFERENCE>7</DATA_REFERENCE>
        <DETAILS>
        </DETAILS>
        <CAMPAIGN_INFOS>
          <CAMPAIGN_INFO>
          </CAMPAIGN_INFO>
        </CAMPAIGN_INFOS>
        <EDT_CURR>160</EDT_CURR>
        <EDT_PRICE>1</EDT_PRICE>
      </TRANSACTION>
    </TRANSACTIONS>
    <TC_RATE>1</TC_RATE>
  </DISPATCH>
  <DISPATCH DBOP="INS" >
    <TYPE>8</TYPE>
    <NUMBER>IRSALIYE-1</NUMBER>
    <DATE>20.06.2006</DATE>
    <TIME>17900128</TIME>
    <ARP_CODE>120 01 001</ARP_CODE>
    <TOTAL_DISCOUNTED>10</TOTAL_DISCOUNTED>
    <TOTAL_VAT>1.8</TOTAL_VAT>
    <TOTAL_GROSS>10</TOTAL_GROSS>
    <TOTAL_NET>11.8</TOTAL_NET>
    <RC_RATE>1</RC_RATE>
    <RC_NET>11.8</RC_NET>
    <CREATED_BY>1</CREATED_BY>
    <DATE_CREATED>20.06.2006</DATE_CREATED>
    <HOUR_CREATED>1</HOUR_CREATED>
    <MIN_CREATED>18</MIN_CREATED>
    <SEC_CREATED>9</SEC_CREATED>
    <CURRSEL_TOTALS>3</CURRSEL_TOTALS>
    <DATA_REFERENCE>4</DATA_REFERENCE>
    <TRANSACTIONS>
      <TRANSACTION>
        <TYPE>0</TYPE>
        <MASTER_CODE>150 01 001</MASTER_CODE>
        <QUANTITY>10</QUANTITY>
        <PRICE>1</PRICE>
        <TOTAL>10</TOTAL>
        <TC_XRATE>1</TC_XRATE>
        <RC_XRATE>1</RC_XRATE>
        <UNIT_CODE>ADET</UNIT_CODE>
        <UNIT_CONV1>1</UNIT_CONV1>
        <UNIT_CONV2>1</UNIT_CONV2>
        <VAT_RATE>18</VAT_RATE>
        <VAT_AMOUNT>1.8</VAT_AMOUNT>
        <VAT_BASE>10</VAT_BASE>
        <TOTAL_NET>10</TOTAL_NET>
        <DATA_REFERENCE>7</DATA_REFERENCE>
        <DETAILS>
        </DETAILS>
        <CAMPAIGN_INFOS>
          <CAMPAIGN_INFO>
          </CAMPAIGN_INFO>
        </CAMPAIGN_INFOS>
        <EDT_CURR>160</EDT_CURR>
        <EDT_PRICE>1</EDT_PRICE>
      </TRANSACTION>
    </TRANSACTIONS>
    <TC_RATE>1</TC_RATE>
  </DISPATCH>
  <DISPATCH DBOP="INS" >
    <TYPE>8</TYPE>
    <NUMBER>IRSALIYE-3</NUMBER>
    <DATE>20.06.2006</DATE>
    <TIME>17900128</TIME>
    <ARP_CODE>120 01 001</ARP_CODE>
    <TOTAL_DISCOUNTED>10</TOTAL_DISCOUNTED>
    <TOTAL_VAT>1.8</TOTAL_VAT>
    <TOTAL_GROSS>10</TOTAL_GROSS>
    <TOTAL_NET>11.8</TOTAL_NET>
    <RC_RATE>1</RC_RATE>
    <RC_NET>11.8</RC_NET>
    <CREATED_BY>1</CREATED_BY>
    <DATE_CREATED>20.06.2006</DATE_CREATED>
    <HOUR_CREATED>1</HOUR_CREATED>
    <MIN_CREATED>18</MIN_CREATED>
    <SEC_CREATED>9</SEC_CREATED>
    <CURRSEL_TOTALS>3</CURRSEL_TOTALS>
    <DATA_REFERENCE>4</DATA_REFERENCE>
    <TRANSACTIONS>
      <TRANSACTION>
        <TYPE>0</TYPE>
        <MASTER_CODE>150 01 001</MASTER_CODE>
        <QUANTITY>10</QUANTITY>
        <PRICE>1</PRICE>
        <TOTAL>10</TOTAL>
        <TC_XRATE>1</TC_XRATE>
        <RC_XRATE>1</RC_XRATE>
        <UNIT_CODE>ADET</UNIT_CODE>
        <UNIT_CONV1>1</UNIT_CONV1>
        <UNIT_CONV2>1</UNIT_CONV2>
        <VAT_RATE>18</VAT_RATE>
        <VAT_AMOUNT>1.8</VAT_AMOUNT>
        <VAT_BASE>10</VAT_BASE>
        <TOTAL_NET>10</TOTAL_NET>
        <DATA_REFERENCE>7</DATA_REFERENCE>
        <DETAILS>
        </DETAILS>
        <CAMPAIGN_INFOS>
          <CAMPAIGN_INFO>
          </CAMPAIGN_INFO>
        </CAMPAIGN_INFOS>
        <EDT_CURR>160</EDT_CURR>
        <EDT_PRICE>1</EDT_PRICE>
      </TRANSACTION>
    </TRANSACTIONS>
    <TC_RATE>1</TC_RATE>
  </DISPATCH>
</SALES_DISPATCHES>
Başa dön
ikut

Re: xml oluşturma.

Mesaj gönderen ikut »

serkan yazdı:merhaba arkadaşlar..forumda konuyla ilgili geçen topicleri okudum ama bir zerre bişey anlamadım çünkü kavramları bilmiyorum açıkcası..
şöyle sorumu kabaca anlatayım...
firebird veritabanı kullanarak yazdığım MRP programından LKS2 ye irsaliyeleri göndermem lazım tabi xml olarak.lks2 den irsaliyeleri XML'e atıyorum.notepad ile açıp irsaliye numarasını değiştirip tekrar lks ye import ettiğimde yeni kayıt olarak alıyor.şimdi ben logonun oluşturduğu XML dosyasının aynısını kendi projemdeki bilgileri aktarmam lazım ama nasıl yapacağımdan fikrim yok.dataseti veya dbgridi export eden 3.parti bileşenler var ama attığı xml dosyasının yapısı logonun attığından farklı.bunu bir döngü ile string işleme şeklinde yapıp daha sonra xml olarak kayıtmı etmek lazım.yoksa daha standart ve makul bir yolu varmı?.logonun oluşturduğu xml dosyası aşağıdaki gibi..
naçizane görüşüm kodu elle işlemendir.

Yani çokta zor değil.

Kod: Tümünü seç

var
xmlfile:Textfile;
Begin
    //dosyası açtın rewrite ettin varsay
   Writeln(xmlfile,'xlm dosya başlığı')
   While not xxxtable.eof do
    begin
        Writeln(xmlfile,'Logonon 1.tagı', Table daki orya atılacak değer, Tag kapat logo1.tag);
       xxxtable.next;
   End,

/// xml dosya sonunu yaz ve xmlfile ı kapat. hepsi bu.
sanırım logo da bu işleri elle yapıyor yada datasetten xml'e export edecek özel bir kod unit kullanıyordur. ama gördüğüm kadarıyla logoda filan 3.parti komponent vs hiç yok gibi.
Başa dön
Kullanıcı avatarı
naile
Admin
Mesajlar: 1873
Kayıt: 11 Haz 2003 10:11

Mesaj gönderen naile »

Buna benzer bir uygulama ben de yapmıştım. VKamadan'ın makalesinde nfaydalanmıştım. Sen de inceleyerek istediğin şeyi yapabilirsin:
viewtopic.php?t=7723&highlight=xml
Başa dön
Cevapla

“Programlama” sayfasına dön