dh PBer

Saya lagi coba meng-copy isi data antar table. Teknik yang saya gunakan open
dua data window, berikut saya lampirkan source codenya.
Mohon sarannya nya jika teknik ini kurang bagus dan sebaiknya bagaimana.
Terimakasih

fyi: dw_1 = source data
     dw_2 = target

---*w_main-open*--------------
..
..
connect;
dw_1.settransobject( sqlca)
dw_1.retrieve( )
dw_2.settransobject( sqlca)
dw_2.retrieve( )
------------------------------------

---*cb_1-clicked*---------------
integer i,li_row

for i = 1 to dw_1.rowcount( )
   li_row = dw_2.insertrow(0)
   dw_2.object.#1[li_row] = dw_1.object.#1[i]
   dw_2.object.#2[li_row] = dw_1.object.#2[i]
   dw_2.object.#3[li_row] = dw_1.object.#3[i]
   dw_2.object.#4[li_row] = dw_1.object.#4[i]
   dw_2.object.#5[li_row] = dw_1.object.#5[i]
   dw_2.object.#6[li_row] = dw_1.object.#6[i]
next

dw_2.update(true)
commit ;
dw_2.retrieve( )
-----------------------------------

Tanpa mendefinisikan masing2 kolom dengan #xx, ada ngga' perintah sekaligus
satu baris
dibaca kemudian di replace ke target.

Kirim email ke