December 16, 2007

Hide Sidebar Menu

setelah menambahkan fitur themes, saya mencoba untuk menambahkan opsi hide sidebar menu. jadi menunya dibuat model IDE visual studio. bisa di-pin, atau auto hide. klo dalam kedaan pin, menu akan tampil terus. klo pin nya di hilangkan, menu akan auto hide. jadi menu akan tampil apabila mouse di geser ke sisi kiri dari aplikasi. skrinsyut nya begini:

MenuTampil

ini klo di pin. kemuadian klo opsi pin nya dihilangkan, akan menjadi begini:

MenuHide

yang masih mengganjal adalah opsi pin/un-pin nya masih pake check box. pengennya sih pake togle button, cuman klo di vb, harus add form 2.0 dulu. gimana menurut pendapat anda?

December 07, 2007

Themes pada pada aplikasi

ini lanjutan ngoprek user interface. sekaranh coba nambahin feature ganti tema pada aplikasi. jadi warna tema dalam aplikasi bisa dirubah2x sesuai keinginan user. skrinsyut nya ini:

menutheme

kasih komen lagi ya...hehehehe...

December 06, 2007

User Interface untuk Menu Utama

barusan nyoba ngoprek desain user interface buat menu utama dari sebuah aplikasi. hasilnya jadi seperti ini:

menu (Medium)

butuh komentar nih dari temen2x semua.
gimana menurut pendapat anda?

November 28, 2007

Test lagi pakai Windows Live Writer

Nyoba nge-blog pake windows live writer...free kok...

klo di WLWriter bisa keliatan kategori nya..klo di scribe fire, kategori/tag yg udah kita buat di blogger tidak keliatan, jadinya tiap posting harus nulis tag lagi, gak bisa milih langsung.

November 27, 2007

Resign

Yup...resign. mungkin ini salah satu keputusan besar dalam hidup saya. Per 1 Desember 2007, saya akan resign dari Lintang Kawuryan. setelah kurang lebih 8 tahun menggeluti per-rumah sakit-an dan visual basic 6.0, saya ingin mencoba sesuatu yang lain, atau malah mungkin sesuatu yang baru. berat memang, meninggalkan teman2x yang sudah sepeti keluarga sendiri. tapi keadaan yang memaksa saya harus "hijrah".
semoga di masa yang akan datang Lintang Kawuryan akan menjadi perusahaan yang besar dan sukses, dan visi Hospital Information System in every hospital bisa terwujud.
sekalian aja madhi minta maaf pada semua temen2x di Lintang Kawuryan, apabila selama bekerja bersama ada hal2x yang tidak berkenan. madhi sadar masih banyak kekurangan yang madhi miliki.
oke, maybe next time, kita masih bisa kerja sama dalam mengerjakan proyek2x IT. amin...3x.
satu "selimut penenang" sudah saya lepas...kedepan, apakah saya akan mencari "selimut penenang" yang lain atau saya bisa menyingkirkan lebih banyak "selimut penenang" yang saya miliki?
Bismillahirrahmanirrahim.


Powered by ScribeFire.

November 26, 2007

Tab atau Enter?

Untuk berpindah obyek atau control dalam sebuah aplikasi secara default (pada operating system berbasis graphic), tombol atau key yang digunakan adalah Tab. Hanya saja, operator yg terbiasa menggunakan aplikasi yang berjalan pada DOS, untuk berpindah control menggunakan enter. Kalo saya amati, aplikasi yg dibuat oleh orang luar negeri, semuanya sudah menggunakan tab. Bahkan aplikasi under web juga menggunakan tab. kalo aplikasi buatan dalam negeri, seperti Zahir, My Family Accounting dan aplikasi yang cukup populer, juga menggunakan tab. Enter digunakan untuk proses validasi atau proses penyimpanan data. dimanapun cursor berada, ketika tombol enter ditekan, maka proses (biasanya simpan data) akan dilakukan. demikian juga tombol ESC. dimanapun cursor berada, maka proses batal akan dilakukan.
sebagai pengembang software, saya selalu membuat aplikasi dengan 2 key untuk berpindah control, tab dan enter. hanya saja, ada beberapa komponen yang tidak bisa menerima perintah enter untuk berpindah ke obyek yang lain.
Nah, menurut anda, seberapa penting kita memfasilitasi enter sebagai pindah ke control yang lain? apakah operator atau pengguna komputer pada saat ini sudah paham dan mengerti bahwa fungsi tab adalah untuk berpindah control?
ditunggu comment dari rekan2x semua.

Powered by ScribeFire.

November 15, 2007

Client adalah Partner

Client atau customer atau pembeli adalah raja. jargon itu sampai sekarang masih banyak yang menganutnya. apa pun yang diinginkan client, penjual harus memenuhinya. itu kalau penjualnya bisa. klo gak bisa gimana hayo? nah makanya sekarang jargon tersebut mulai mengalami pergeseran. yang tadinya client adalah raja, sekarang client adalah partner. jadi, dalam memenuhi kebutuhan client, ada kompromi-kompromi yang dilakukan oleh ke dua belah pihak.
dalam beberpa project yang pernah saya kerjakan, saya menemui berbagai jenis client. ada client yang "nurut", ada client yang tahu apa kebutuhannya dan tahu bagaimana kebutuhan itu bisa dipenuhi, dan ada juga client yang tahu kebutuhannya, tapi tidak tahu bagaimana kebutuhan itu dipenuhi. dan masih ada beberapa jenis client yang lain. untuk jenis client yang tahu kebutuhan tapi tidak tahu bagaimana cara memenuhinya, biasanya ditawarkan untuk dilakukan evaluasi terhadap bisnis proses yang berjalan di sana. namun ada juga client yang ngotot, sesuaikan aja dengan teori yang ada atau buat aja sistem yang ideal. padahal, untuk menerapkan sebuah system berbasis komputer, butuh persiapan yang tergantung dari bidang yang client geluti. setidaknya perlu dilakukan komparasi antara kebutuhan system yang ideal dengan ketersediaan resource pada client. apabila ternyata resource nya memang kurang, maka perlu dilakukan kompromi, misalnya dengan penerapan system secara bertahap pada bidang2x yang resource nya sudah siap. dengan demikian, dari segi biaya dan operasional client tidak merasa terbebani. dari sisi pengembang, bisa menyelesaikan pekerjaan dengan cepat.
maka dari itu, para "penjual" perlu melakukan sosialisasi terhadap konsep ini, agar kedua belah pihak tidak merasa dirugikan. setiap instansi adalah unik. walaupun bergerak dalam bidang yang sama, pasti ada prosedur, aturan bahkan budaya yang berbeda apa bila dibandingkan dengan instansi lain. penjual perlu tahu hal itu, agar dalam mengembangkan system, bisa "click" dengan yang pembeli mau. apa bila ada kekurangan, kedua belah pihak bisa saling memberikan masukan.
bagaimana menurut pendapat anda?


Powered by ScribeFire.

Free Wallpaper

buat yang suka ngoleksi wallpaper, ada link bagus nih. yang menarik disini, site ini menyediakan berbagai ukuran wallpaper, baik dari yang standar sampe yang widescreen. high resolution pula. buat ipod or PSP juga ada. buat yang tertarik langsung aja kesini


Powered by ScribeFire.

Free Software

Beberapa hari ini ngikuti diskusi yang cukup hangat di milis Delphindo. diskusinya tentang berapa banyak developer delphi yang pake delphi original. delphi termasuk IDE yang cukup mahal memang. cuman sekarang sudah ada versi free dan versi murahnya.
ada sebuah quotation yang menjelaskan tentang free software. orang sering salah kaprah dengan istilah free software. quotation ini akan memberikan penjelasan tentang makna free software.
The word “free” in “free software” refers to freedom, not to price; the price paid for a copy of a free program may be zero, or small, or (rarely) quite large

selain istilah free software, juga istilah open source yang banyak mengundang perdebatan. orang akan menganggap open source = gratis. memang banyak aplikasi yang open source itu gratis, tapi tidak sedikit aplikasi open source yang tidak gratis. klo gak salah, mysql adalah salah satu contoh yang tidak gratis. mysql menerapkan dual license. gratis klo dipake untuk coba2x or dalam proses development. juga gratis klo di distribusikan dengan aplikasi open source yg gratis juga. tapi klo udah dipakai untuk operasional, ada comercial license yang harus ditanggung oleh customer, dan itu dibayar tiap tahun.
jadi bijaksanalah dalam menyikapi software yang tidak free dan tidak open source. karena hal itu memang tergantung dari pengembang, ingin menggunakan model mana dalam software yang dibuat. salah satu alasan yang masuk akal kenapa pengembang menggunakan model close source adalah agar client tidak perlu bersusah payah mengerti coding software tersebut, karena client tidak mempunyai sdm yang mengerti source code software tersebut. butuh sesuatu tinggal minta ke pengembang untuk menyediakan fasilitasnya.
bagaimana menurut pendapat anda?


Powered by ScribeFire.

November 13, 2007

Sistem Informasi VS Aplikasi Sistem Informasi

Kita sering denger istilah sistem informasi. biasanya kita langsung meng-identik-kan dengan IT. memang klo sekarang sistem informasi banyak yang menggunakan alat bantu dari bidang IT. sebagai orang yang menggeluti dunia IT, hal tersebut dapat menjadi "lahan" yang sangat menarik. hanya saja banyak juga orang melihat sistem informasi hanya dari sisi "alat bantu" tadi. orang bisa memberikan penilaian terhadap baik buruk nya alat bantu tadi dari outpu yang dihasilkan. misal output yang dihasilkan sesuai dengan kebutuhan, orang bisa bilang sistem informasi nya berjalan dengan baik. tapi misal output yang dihasilkan tidak sesuai harapan, orang bisa langsung menghukum bahwa alat bantu tadi salah. memang bisa jadi sih karena alat bantu tersebut yang salah. tapi banyak juga kasus yang menyebabkan "salah" nya alat bantu tersebut karena institusi tidak tahu apa kebutuhannya, tidak mempunyai SOP dan tidak mempunyai business rule yang kuat.
Sebagai pengembang software, apalagi pengembang software eksternal, sering juga menerima cap bahwa aplikasi yang dibuat adalah salah. dari sini timbul pertanyaan,
Apakah sebuah project sistem informasi berbasis IT juga termasuk penyusunan SOP, business rule, work flow?
Jawabannya bisa IYA dan bisa TIDAK. klo menurut saya tergantung dari lingkup project tersebut. apabila client menginginkan penyusunan, evaluasi atau dokumentasi SOP dan business rule, ya hal itu bisa kita lakukan. klo kita punya tenaga yg bidang ilmunya sesuai dengan bidang client, kita bisa langsung handle. tapi klo kita tidak punya, kita bisa menggunakan jasa tenaga dari luar. tapi yang jelas, pekerjaan tersebut menjadi komponen biaya tersendiri dalam sebuah project sistem informasi. jadi tidak serta merta masuk dalam proses SDLC.
tapi, kita sebagai pengembang software juga tidak boleh terlalu kaku. misal kita menemukan sebuah kejanggalan dalam work flow yg berjalan di client, kita bisa memberikan masukan dan saran. sekali lagi, hanya sebatas masukan dan saran. apabila diterima oleh client ya syukur, klo tidak diterima, kita bisa memberikan efek nya dikemudian hari. yang jelas keputusan tetap ditangan client. klo client merasa perlu untuk memperbaiki SOP dan business rule nya, kita bisa tawarkan jasa untuk hal tersebut.
Bagaimana menurut pendapat anda?


Powered by ScribeFire.

November 08, 2007

Fungsi Terbilang di SQL Server

reposting from my previous blog (mamadh nge-Blog)
Kemaren dapet kasus untuk menampilkan terbilang dalam bahasa indonesia di Crystal Report. klo reportnya hanya 1 halaman, bisa dengan cara diproses di vb dulu, baru di lempar ke parameter field di CR. untuk report yg lebih dari 1 halaman, dan masing2x halaman mewakili record yg berbeda, terbilangnya tidak bisa di lewatkan parameter field, sebab, klo dilewatkan parameter field, antara halaman 1 dengan yg lain, terbilangnya akan sama, walaupun nilai rupiah nya berbeda.
untuk mengatasi hal tersebut, akhirnya dibuat saja fungsi terbilang di sql server. sehingga terbilangnya akan muncul di query nya.
Fungsi terbilang ini dibuat oleh mas Arif Hidayat.

CREATE FUNCTION [DBO].[TerbilangDetil] (@Nilai as decimal)
RETURNS varchar(200) AS
BEGIN
declare @TS varchar(200), @ST varchar(200), @S integer, @p integer, @r1 integer, @Bil varchar(200), @TP varchar(200), @hasil varchar(200)
set @ST = Right(rTrim(Str(@Nilai + 1000)), 3)
set @S = cast(Right(@ST, 1) as integer)
set @p = cast(substring(@ST, 2, 1) as integer)
set @r1 = cast(Left(@ST, 1) as integer)
set @Bil = ‘Satu Dua Tiga Empat Lima ‘
set @Bil = @Bil + ‘Enam Tujuh Delapan Sembilan’

If @S = 0
set @TS = ”
Else
set @TS = rTrim(substring(@Bil, @S * 8 - 7, 8)) + ‘ ‘

If @p = 0
set @TP = @TS
Else
If @p = 1
If @S = 0
set @TP = ‘Sepuluh ‘
Else
If @S = 1
set @TP = ‘Sebelas ‘
Else
set @TP = rTrim(substring(@Bil, @S * 8 - 7, 8)) + ‘ Belas ‘
Else
set @TP = rTrim(substring(@Bil, @p * 8 - 7, 8)) + ‘ Puluh ‘ + @TS

If @r1 = 0
set @hasil = @TP
Else
If @r1 = 1
set @hasil = ‘Seratus ‘ + @TP
Else
set @hasil = rTrim(substring(@Bil, @r1 * 8 - 7, 8)) + ‘ Ratus ‘ + @TP
return @hasil
END

CREATE FUNCTION [dbo].[terbilang] (@angka as decimal(19,2))
RETURNS varchar (200) AS
BEGIN
Declare @b Decimal, @r Decimal, @J Decimal, @M Decimal, @T1 Decimal, @koma1 Decimal, @koma2 Integer, @hasil varchar(200)
Declare @s_t varchar(200), @ribu varchar(200), @Juta varchar(200), @Miliar varchar(200), @tx varchar(200), @angka1 varchar(200), @tx1 varchar(200)
set @s_t = case when Len(rTrim(cast(cast(@Angka as bigint) as varchar(20)))) < 15
then replicate(’0′,15 - Len(rTrim(cast(cast(@Angka as bigint) as varchar(20))))) + rTrim(cast(cast(@Angka as bigint) as varchar(20)))
else rTrim(cast(cast(@Angka as bigint) as varchar(20)))
end
–set @z = cast(15 - Len(rTrim(cast(cast(@Angka as integer) as varchar(20)))) as varchar(20))
–+ rTrim(cast(cast(@Angka as integer) as varchar(20)))
set @r = cast(Right(@s_t, 3) as integer)
set @b = cast(substring(@s_t, 10, 3) as integer)
set @J = cast(substring(@s_t, 7, 3) as integer)
set @M = cast(substring(@s_t, 4, 3) as integer)
set @T1 = cast(Left(@s_t, 3) as integer)
set @ribu = case when @b = 0 then ‘ ‘ else case when @b = 1 then ‘Seribu’ else [dbo].TerbilangDetil(@b) + ‘Ribu’ end end
set @Juta = case when @J = 0 then ‘ ‘ else [dbo].TerbilangDetil(@J) + ‘Juta ‘ end
set @Miliar = case when @M = 0 then ‘ ‘ else [dbo].TerbilangDetil(@M) + ‘Miliar’ end
set @tx = Case
when @Angka < 1000 –&& Ratusan
then [dbo].TerbilangDetil(@r)
when @Angka < 1000000 –&& Ribuan
then @ribu + ‘ ‘ + [dbo].TerbilangDetil(@r)
when @Angka < 1000000000 –&& Jutaan
then [dbo].TerbilangDetil(@J) + ” + rTrim(’Juta ‘ + @ribu) + ‘ ‘ + [dbo].TerbilangDetil(@r)
when @Angka < 1000000000000 –&& Miliaran
then [dbo].TerbilangDetil(@M) + ” + rTrim(’Miliar ‘ + @Juta + @ribu) + ‘ ‘ + [dbo].TerbilangDetil(@r)
when @Angka >= 1000000000000 –&& Trilliun
then [dbo].TerbilangDetil(@T1) + ” + rTrim(’Trilliun ‘ + @Miliar + @Juta + @ribu) + ‘ ‘ + [dbo].TerbilangDetil(@r)
End
set @angka1 = rTrim(cast(@Angka as varchar(20)))
set @koma1 = case when charindex(’.', @angka1) = 0 then 0 else cast(rTrim(substring(@angka1, charindex(’.',@angka1) + 1, 2)) as integer) end
set @koma2 = Len(case when charindex(’.',@angka1) = 0 then ‘0′ else rTrim(substring(@angka1, charindex(’.',@angka1) + 1, 2)) end)
If @koma1 > 0
begin
If @koma1 < 10 And @koma2 = 1
set @koma1 = @koma1 * 10
set @tx1 = [dbo].TerbilangDetil(@koma1)
set @hasil = @tx + ‘Rupiah ‘ + @tx1 + ‘Sen’
end
Else
set @hasil = @tx + ‘Rupiah’
return (@hasil)
END

Powered by ScribeFire.


November 07, 2007

Jendela rasa Aple

buat yang pengen merubah tampilan "jendela" nya menjadi MacOSX (Tiger, belum leopard), bisa download tools yg merubah tampilan menjadi mirip seperti mac, disini
udah ditest di centrino 1,8 Ghz, memory 2 GB, kinerja tidak terasa menurun, sama seperti ketika tanpa flykite.


Powered by ScribeFire.

Buat yang butuh Scribe Fire

Salah satu blogging tools yang integrated dengan browser firefox adalah scribe fire. Fungsinya sebagai blog editor yang menjadikan posting sebuag blog menjadi mudah, tanpa perlu harus terhubung dengan internet (ditulis dulu, takut keburu ilang inspirasi-nya, terus klo udah ada koneksi inet, baru deh diposting).
Buat yang mau download Scribe Fire versi 1.4.2, silahkan klik disini

Powered by ScribeFire.

I'm not geek enough...hehehehe...

Nyoba Scribe Fire ke blogger

nyoba add-on nya fire fox buat nulis blog (Scribe Fire)

Powered by ScribeFire.

nyoba blogger

akhirnya bikin blog di blogger juga hehehehe. katanya sih bisa buat MFA. mau ngoprek dulu fasilitas di blogger dulu ya...