[Programmer-VB] Bantuindong mengenai store procedure SQL server

[<::>rima]

Dear All,   Saya punya permaslahan nech..soalnya aku punya masalah tapi ini udah pernah dibahas tapi aku kayaknya kurang agak mengerti dengan solusi yang idberikan maklumlah pemula gitu loch....he...he...     begini maslahanya: penambahan nilainya pada kolom bungadiberi sebelumnya 1200 jadi 012 pokoknya usahakan bisa input angka 0 didepan dan bungadiberi tersebut tidak digunakan untuk perhitungan hanya penulisan aja seperti text makasih banget yach.... contoh: bungadiberi            bungadiberi(yang dirubah) 1200                                01200     disini aku kasih store procedurnya...jadi aku hanya perlu modifikasi yang udah ada sehingga bisa jadi sepeti diatas.... CREATE PROCEDURE [dbo].[BI_2_ABA] @bulan char(2),@tahun char(4)  AS EXEC('  /* SANDI 900  dan Jenis 2 Digit Belakang Sandi BI            Khusus Giro, Tabungan, dan Escrow Account            cdperk = (''10501'',''10503'',''10510'')*/  DELETE FROM BI_Form2_ABA  INSERT INTO BI_Form2_ABA      (cdkec, cdbpr, cdperk, nmperk, sandi, Jenis, jw_thn,jw_bln, jw_hr,   Kolektibilitas, bungadiberi, Jumlah, bulan, tahun )  SELECT  cdkec, cdbpr,cdperk, perkiraan, ''900'' as sandi,                 right(rtrim(SandiBI),2) as Jenis, 0 ,0 ,0, ''1'' as Kolektibilitas,   1200 as bungadiberi, bln'[EMAIL PROTECTED]' AS Jumlah, '[EMAIL PROTECTED]' AS bulan, tahun   FROM  bMSperkiraan  WHERE bMSperkiraan.tahun='[EMAIL PROTECTED]' and left(bMSperkiraan.sandibi,3) = ''120'' and left(bMSperkiraan.cdperk,5) in (''10501'',''10503'',''10510'')  ORDER BY dbo.bMSperkiraan.cdperk        /* SANDI 600 dan Jenis 2 Digit Belakang Sandi BI            Khusus Deposito, Kredit, dan Pinjaman            cdperk = (''10507'',''10511'',''10509'')  */  INSERT INTO BI_Form2_ABA      (cdkec, cdbpr, cdperk,nmperk, sandi, Jenis, jw_thn,jw_bln, jw_hr, Kolektibilitas, bungadiberi, Jumlah, bulan, tahun )  SELECT  cdkec, cdbpr,cdperk,perkiraan, ''600'' as sandi,  right(rtrim(SandiBI),2) as Jenis, 0 ,0 ,0, ''1'' as Kolektibilitas,   1200 as bungadiberi, bln'[EMAIL PROTECTED]' AS Jumlah, '[EMAIL PROTECTED]' AS bulan, tahun   FROM  dbo.bMSperkiraan  WHERE dbo.bMSperkiraan.tahun='[EMAIL PROTECTED]' and left(dbo.bMSperkiraan.sandibi,3) = ''120'' and left(dbo.bMSperkiraan.cdperk,5) in (''10507'',''10509'',''10511'')   ORDER BY dbo.bMSperkiraan.cdperk /* HAPUS UNTUK ABA YANG JUMLAH = 0  */  DELETE BI_Form2_ABA   WHERE Jumlah = 0 /* BUAT PECAHAN Milyar, Jutaan dan Ribuan */      UPDATE BI_Form2_ABA Set Jumlah = Round(Jumlah * 0.001,0)       UPDATE BI_Form2_ABA      SET JmlRibu = right(str(round(Jumlah,0)),3),                       JmlJuta = substring(str(round(Jumlah,0)),len(str(round(Jumlah,0)))-5,3) ,                                  JmlMlyr = LEFT(str(round(Jumlah,0)),len(str(round(Jumlah,0)))-6)   /* BUAT Backup File History*/      DELETE FROM BI_H2_ABA Where Bulan = '[EMAIL PROTECTED]' and Tahun =  '[EMAIL PROTECTED]'       INSERT INTO BI_H2_ABA SELECT * FROM BI_Form2_ABA   ') GO   disini aku informasikan bahwa kolom ini bertype numeric...apa aku harus rubah type kolomnya gak??klo iya kebentuk apa???   klo ada yang bisa tolongin makasih banyak yach..   Rima Untuk keluar dari millis ini, kirim email kosong ke: [EMAIL PROTECTED] SPONSORED LINKS Programmer Indonesia Basic programming language Computer programming languages Programming languages Java programming language YAHOO! GROUPS LINKS  Visit your group "Programmer-VB" on the web.    To unsubscribe from this group, send an email to:  [EMAIL PROTECTED]    Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.