Coba yg ini :
dw_1.RowsCopy(1, dw_1.RowCount(), Primary!, dw_2, 1, Primary!)
----- Original Message -----
From: duniamaya
To: indoPB
Sent: Friday, February 01, 2008 8:54 AM
Subject: [indopb] Mohon saran untuk teknik copy data.
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.
-----------------------------------------------
IndoPB - Indonesia PB User Group
An Indonesian PowerBuilder User Group's Event
2nd PowerBuilder Update
Rumah Sakit Jantung Harapan Kita
26/27 August 2006
To Register :
http://groups.yahoo.com/group/indopb/database?method=addRecord&tbl=4
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/indopb/
<*> Your email settings:
Individual Email | Traditional
<*> To change settings online go to:
http://groups.yahoo.com/group/indopb/join
(Yahoo! ID required)
<*> To change settings via email:
mailto:[EMAIL PROTECTED]
mailto:[EMAIL PROTECTED]
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
