Sekalian numpang nanya to all seniors..
Saya pake MS SQL Server 2000 dan PB9.
Saya ingin memanggil stored procedure 'testing' dengan parameter tanggal.
Gimana ya caranya?
Berikut saya sertakan stored procedurenya:
CREATE PROCEDURE testing @tgltr datetime AS
select tglbeli, nomerbeli
from TrBeli
where tglbeli = @tgltr
order by nomerbeli
GO
Untuk programnya:
datetime ldt_tglbeli
string ls_nobeli
date ld_tglcari
dw_19.settransobject(sqlca)
dw_19.reset()
ld_tglcari = date(2007,1,2)
declare proc procedure for testing
@tgltr = :ld_tglcari;
execute proc;
do
fetch proc
into :ldt_tglbeli, :ls_nobeli;
dw_19.scrolltorow(dw_19.insertrow(0))
dw_19.setitem(dw_19.getrow(),'tanggal',ldt_tglbeli)
dw_19.setitem(dw_19.getrow(),'nomerbeli',ls_nobeli)
loop while sqlca.sqlcode = 0
close proc;
Mohon petunjuk dimana kekurangannya.
Thanks,
Vincent.
-----Original Message-----
From: [email protected] [mailto:[EMAIL PROTECTED] On Behalf Of
h4rd3st
Sent: 25 Desember 2007 13:25
To: [email protected]
Subject: Re: [indopb] embeded sql
Tambahan :
string ls_sql, ls_nip="1005 , 1006"
ls_sql = "delete from master_employee where nip in("+ls_nip+");"
EXECUTE IMMEDIATE :ls_sql USING SQLCA;
// Tested on ASA 8
----- Original Message -----
From: "Ahmad Khaironi" <mail_roni02@ <mailto:mail_roni02%40yahoo.com>
yahoo.com>
To: <[EMAIL PROTECTED] <mailto:indopb%40yahoogroups.com> com>
Sent: Saturday, December 22, 2007 10:56 AM
Subject: Re: [indopb] embeded sql
> pk operator "LIKE"
> contoh:
> 1. DELETE FROM master_employee WHERE nip LIKE "1005%" OR nip LIKE "1006%"
(menghapus data yang berawalan 1005 dan 1006)
>
> 2. DELETE FROM master_employee WHERE nip LIKE "%1005" OR nip LIKE "%1006"
(menghapus data yang berakhiran 1005 dan 1006)
>
> 3. DELETE FROM master_employee WHERE nip LIKE "%1005%" OR nip LIKE
"%1006%" (menghapus data yang mengandung 1005 dan 1006)
>
> harry hartono <[EMAIL PROTECTED] <mailto:harry_hrt%40yahoo.com> com> wrote:
> temen2,
> mohon bantuan. saya mau delete data yang nip nya mengandung 1005 dan 1006
di table master_employee
> contonya :
>
> ls nip="1005 , 1006"
> delete from master_employee
> where nip in(:ls_nip);
>
>
> tapi kok hasilnya data yang ada di master_employee terhapus semua
>
> solusinya bagaimana ya?
