field tgl_stnk dan field tanggal lain di set allow null
cek semua parameter,kalau kosong ganti dengan null
baru lakukan update/insert dengan parameter yang sudah diperbaiki.
IF ISNULL(@Tgl_STNK,' ') = ' ' SET @Tgl_Stnk = NULL
IF ISNULL(@Tgl_BPKB,' ') = ' ' SET @Tgl_BPKB = NULL
IF ISNULL(@tgl_transfer_bbn,' ') = ' ' SET @tgl_transfer_bbn = NULL
IF ISNULL(@Ttd_bpkb,' ') = ' ' SET @Ttd_bpkb = NULL
IF ISNULL(@tgl_spp_bbn,' ') = ' ' SET @tgl_spp_bbn = NULL
IF ISNULL(@tgl_terbit_stnk,' ') = ' ' SET @tgl_terbit_stnk = NULL
IF @IDP>0
BEGIN
Update stnk set
No_STNK = @No_STNK,
Tgl_STNK = @Tgl_STNK,
No_BPKB = @No_BPKB,
Tgl_BPKB = @Tgl_BPKB,
tgl_transfer_bbn = @tgl_transfer_bbn,
Ttd_bpkb = @Ttd_bpkb,
No_ttd_BPKB = @No_ttd_BPKB,
tgl_spp_bbn = @tgl_spp_bbn,
bbn = @bbn,
Keterangan = @Keterangan,
tgl_terbit_stnk = @tgl_terbit_stnk,
id_birojasa = @id_birojasa
Where id_pengirim = @id_pengirim
END
ELSE
begin
--bila stnk belum dinput
insert into stnk (
id_pengirim,No_STNK,Tgl_STNK,No_BPKB,Tgl_BPKB,tgl_transfer_bbn,Ttd_bpk
b,
No_ttd_BPKB,tgl_spp_bbn,bbn,Keterangan,tgl_terbit_stnk,id_birojasa,
tgl_created)
values
(@id_pengirim,@No_STNK,@Tgl_STNK,@No_BPKB,@Tgl_BPKB,@tgl_transfer_bbn,
@Ttd_bpkb,
@No_ttd_BPKB,@tgl_spp_bbn,@bbn,@Keterangan,@tgl_terbit_stnk,@id_biroja
sa,getdate())
end
aksan kurdin
--- In [email protected], "Heri Sumanto" <[EMAIL PROTECTED]>
wrote:
>
> terima kasih atas jawaban mas aksan, saya sudah coba jawaban yang
> pertama dan sukses tapi untuk jawaban kedua tentang tanggal,
> sepertinya tidak jalan, maksudnya semua data yang diinput kosong
> tetap terisi 01/01/1900. Maaf selalu merepotkan..berikut saya
> sertakan penggalan codingnya, sbb:
>
> IF @IDP>0
> BEGIN
>
> Update stnk set
> No_STNK = @No_STNK,
> Tgl_STNK = dbo.fnGetDate(Tgl_STNK) ,
> No_BPKB = @No_BPKB,
> Tgl_BPKB = dbo.fnGetDate(@Tgl_BPKB),
> tgl_transfer_bbn = dbo.fnGetDate(@tgl_transfer_bbn),
> Ttd_bpkb = dbo.fnGetDate(@Ttd_bpkb),
> No_ttd_BPKB = @No_ttd_BPKB,
> tgl_spp_bbn = dbo.fnGetDate(@tgl_spp_bbn),
> bbn = @bbn,
> Keterangan = @Keterangan,
> tgl_terbit_stnk = dbo.fnGetDate(@tgl_terbit_stnk),
> id_birojasa = @id_birojasa
> Where id_pengirim = @id_pengirim
>
> END
> ELSE
> begin
> --bila stnk belum dinput
> insert into stnk (
>
id_pengirim,No_STNK,Tgl_STNK,No_BPKB,Tgl_BPKB,tgl_transfer_bbn,Ttd_bp
>
kb,No_ttd_BPKB,tgl_spp_bbn,bbn,Keterangan,tgl_terbit_stnk,id_birojasa
> ,tgl_created)
> values (@id_pengirim,@No_STNK,dbo.fnGetDate
> (@Tgl_STNK),@No_BPKB,dbo.fnGetDate(@Tgl_BPKB),dbo.fnGetDate
> (@tgl_transfer_bbn),dbo.fnGetDate
> (@Ttd_bpkb),@No_ttd_BPKB,dbo.fnGetDate
> (@tgl_spp_bbn),@bbn,@Keterangan,dbo.fnGetDate
> (@tgl_terbit_stnk),@id_birojasa,getdate())
>
> end
>
