Delphi for delphier

Web Service – Dataset – Latihan 2 Bagian 2

Tingkatan Menengah
Kategori Web Service
Sub Kategori Dataset
Judul Mengambil data XML dan membuat file transformasi
Oleh
eko-indriyawan-png.png   Nama Eko Indriyawan
Domisili Surabaya – Darmo Satelit
Delphi Delphi 2007 for Win32
YM eko_elits
Email eko_elits@yahoo.com
Telp 031 – 605 384 36
   
Referensi Program oleh Eko Indriyawan
 

Web Service dari http://www.xmethods.net

   

Tujuan

Mengajarkan kepada para Delphier tentang bagaimana cara mengambil data XML yang kemudian dilanjutkan dengan membuat file transformasi.

  spasi

Overview

Pembahasan pada artikel ini akan menjelaskan kepada para Delphier tentang teknik mengambil data XML dari server melalui web service yang kemudian dilanjutkan dengan membuat file transformasi.

Untuk melakukan proses diatas, kita akan menggunakan tools XML Mapper. Bagi anda yang belum pernah menggunakan tools ini jangan khawatir, karena didalam artikel ini akan disajikan dengan bahasa yang mudah yang dilengkapi dengan gambar yang akan mempermudah delphier dalam memahami setiap prosesnya.

Jika nanti anda sudah bisa melakukan proses koneksi ke web service, maka silahkan anda lanjutkan ke artikel bagian ketiga.

  spasi
Petunjuk :

Silahkan anda ikuti langkah – langkah berikut ini dengan pelan – pelan agar bisa berjalan dengan lancar sesuai dengan petunjuk yang sudah diberikan.

  spasi

Langkah 1

Silahkan anda buat koneksi web service seperti ditunjukkan pada bagian 1.

   

Langkah 2

Tambahkan beberapa object kedalam Form

   
  HTTPRIO1: THTTPRIO;
ClientDataSet1: TClientDataSet;
XMLTransformProvider1: TXMLTransformProvider;
Button1: TButton;
Edit1: TEdit;
Label1: TLabel;
Label2: TLabel;
Edit2: TEdit;
Bevel1: TBevel;
Bevel2: TBevel;
Label3: TLabel;
Edit3: TEdit;
Label4: TLabel;
Edit4: TEdit;
   

Langkah 3

Atur desainnya seperti berikut ditampilkan pada gambar form dibawah ini

   

menengahwebservicedataset00036.png

   

Langkah 4

Silahkan anda fokuskan perhatian anda pada object HTTPRIO1.

   

Langkah 5

Pada bagian property URL-nya, anda tentukan dengan alamat http://cc.codegear.com/ccws/cc.asmx?WSDL.

   

Langkah 6

Kemudian anda lanjutkan dengan menentukan kode program didalam event OnAfterExecutedengan kode program seperti terlihat pada potongan kode program berikut ini.

   
 

procedure TForm1.HTTPRIO1AfterExecute(const MethodName: string;SOAPResponse: TStream);
var
Temp : TStringList;
begin

Temp := TStringList.Create;

try

SOAPResponse.Position := 0;

with Temp do
begin

LoadFromStream(SOAPResponse);
Text := StringReplace(Text,’soap:Envelope’,’soap’,[rfReplaceAll]);
Text := StringReplace(Text,’soap:Body’,’soap’,[rfReplaceAll]);
SaveToFile(‘Data.xml’);

end;

finally

Temp.Free;

end;

end;

   

Langkah 7

Selanjutnya silahkan anda klik 2x pada tombol Login seperti terlihat pada potongan kode program berikut ini.

   
 

procedure TForm1.Button1Click(Sender: TObject);
begin

(HTTPRIO1 asICodeCentralWSSoap).Login(edit1.Text,Edit2.Text,”);

end;

   

Langkah 8

Setelah itu silahkan anda compile program aplikasi anda dengan menekan tombol Ctrl + F9.

   

Langkah 9

Lanjutkan dengan menekan tombol F9 hingga program aplikasi siap untuk dijalankan.

   
 

menengahwebservicedataset00038.png

   

Langkah 10

Kemudian silahkan anda tekan tombol Login.

   

Langkah 11

Jika sudah anda lakukan, maka langkah selanjutkan adalah anda tutup program aplikasi tersebut.
   

Langkah 12

Bukan menu Tools.

   

Langkah 13

Pilih item XML Mapper.Tunggu beberapa saat hingga didapatkan tampilan seperti berikut ini.

   
  menengahwebservicedataset00006.png
   

Langkah 14

Setelah itu pilih menu File.

   
Langkah 15

Lanjutkan dengan memilih sub menu Open. Tunggu beberapa saat hingga didapatkan tampilan seperti berikut ini.

   

menengahwebservicedataset00037.png

   

Langkah 16

Lanjutkan dengan menekan tombol Open hingga didapatkan tampilan seperti berikut ini.

   

menengahwebservicedataset00040.png

   

Langkah 17

Berikan tanda check pada option Data View.Untuk informasi lebih lanjut silahkan buka link ini hingga didapatkan tampilan seperti berikut ini.

   

menengahwebservicedataset00039.png

   

Langkah 18

Silahkan anda klik element Result dan Session IDdengan cara mengklik 2x.

   

Langkah 19

Untuk element Result,silahkan anda setting seperti ditunjukkan pada tampilan berikut ini.

   

menengahwebservicedataset00041.png

   

Langkah 20

Sedangkan untuk element SessionID,silahkan anda setting seperti ditunjukkan pada tampilan berikut ini.

   

menengahwebservicedataset00042.png

   

Langkah 21

Pilih menu Create.
   

Langkah 22

Lanjutkan dengan memilih Datapacket From XMLTunggu beberapa saat hingga didapatkan tampilan seperti berikut ini.

   

menengahwebservicedataset00043.png

   

Langkah 23

Kemudian, silahkan anda tekan tombol create and test transformationhingga muncul tampilan seperti berikut ini.

   

menengahwebservicedataset00044.png

   

Langkah 24

Setelah itu, silahkan anda tutup tampilan tersebut hingga kembali ke program XML Mapper lagi.

   

Langkah 25

Kemudian anda pilih menu File.

   

Langkah 26

Pilih sub menu Save

   

Langkah 27

Lanjutkan dengan memilih item Transformation

   

menengahwebservicedataset00045.png

   

Langkah 28

Selanjutkan anda tentukan dengan nama ToDp.

   

Langkah 29

Tekan tombol Simpan.

   

Langkah 30

Setelah itu, silahkan anda tutup program aplikasi anda dan lanjutkan ke bagian 3.
  spasi

Download

Mengambil data XML dan membuat file transformasi

Ada beberapa masukan dan keluhan dari teman – teman, bahwa ada beberapa program contoh tidak bisa dijalankan dari delphi 7. Hal ini dikarenakan program contoh dibuat dengan menggunakan Delphi 2007 for win32.

Apabila anda menggunakan D7, sebaiknya anda mengikuti pandauan dari langkah – langkah yang sudah diberikan.

Atas perhatiannya, saya mengucapkan banyak terimakasih.

  spasi
Link terkait
Latihan 2
   
  Web Service ICodeCentralWS
  WSDL http://cc.codegear.com/ccws/cc.asmx?WSDL
   
    Bagian 1
      Mengambil Web Service dengan WSDL
    Bagian 2
      Menambil data XML dan membuet file transformasi
    Bagian 3
      Membuat aplikasi login codegear
       
   
Disarankan baca
Latihan 1
   
  Web Service JobsWs
  WSDL http://ws.cisa.ca/WehireWS/JobsWs.asmx?WSDL
   
    Bagian 1
      Mengambil Web Service dengan WSDL
    Bagian 2
      Menambil data XML dan membuet file transformasi
    Bagian 3
      Menampilkan data lewat Dataset
    Bagian 4
      Mengimplementasikan seluruh method yang ada didalam web service
    Bagian 5
      Mengakses Web Service dan menghubungkannya dengan database MS Access
   
Buku panduan
Dasar First Step To Be A Programmer
Menengah Pemrograman Database dengan Delphi dan MS SQL Server
Menengah Membangun database MLM
 
 
 
Jika anda mau berusaha dan punya semangat, jangan biarkan waktu anda lari begitu saja. By Eko Indriyawan

1 Komentar

  1. lho? kok sama seperti import vtable sperti aplikasi COM ya? ato memang sebenarnya mirip2 spt itu?

    Komentar oleh abdellah — Februari 22, 2008 @ 5:30 pm


RSS feed for comments on this post.

Buat situs web atau blog gratis di WordPress.com.

%d blogger menyukai ini: