Aplikasi Kuitansi Update

Untuk menjawab pertanyaan saudara liem, saya revisi/update aplikasi kuitansi yang dulu pernah saya posting. Berikut Screen Shotnya. Di aplikasi yang dulu masih sangat sederhana, belum ada terbilang dari nominal secara otomatis, untuk aplikasi updatenya sudah saya sertakan. Keunggulan yang lain, di aplikasi ini report/hasil print langsung saya berikan background kuitansi, jadi tidak perlu kita beli form kuitansi, cukup pakai kertas Continue Form atau kertas F4.
sshot-1

sshot-2

sshot-3Silahkan download aplikasi ini :

  1. Versi Linux (Ubuntu)
  2. Versi Windows

Semoga bermanfaat

Jadikan kita seperti Pensil “Filosofi Pensil”

Fisolofi Pensil

“Setiap orang membuat kesalahan.

Itulah sebabnya, pada setiap pensil

ada penghapusnya”

Kali ini saya ingin menceritakan kepada Anda sebuah kisah penuh hikmah dari sebatang pensil. Dikisahkan,sebuah pensil akan segera dibungkus dan dijual kepasar. Oleh pembuatnya, pensil itu dinasihati mengenai tugas yang akan diembannya.Maka, beberapa wejangan pun diberikan kepada si pensil.Inilah yang dikatakan oleh si pembuat pensil tersebut kepada pensilnya.

“Wahai pensil, tugasmu yang pertama dan utama adalah membantu orang seingga memudahkan mereka dalam menulis.Kamu boleh melakukan fungsi apa pun, tapi tugas utamamu adalah sebagai alat penulis.Kalau kamu gagal berfungsi sebagai alat tulis.Macet, rusak, maka tugas utamamu gagal.”

“Kedua, agar dirimu bisa berfungsi dengan sempurna, kamu akan mengalami proses penajaman.Memang menyakitkan, tapi itulah yang akan membuat dirimu menjadi berguna dan berfungsi optimal”.

“Ketiga, yang penting bukanlah yang ada di luar dirimu.Yng penting yang utama dan yang paling berguna adalah yang ada di dalam dirimu. Itulah yang membuat dirimu berharga dan berguna bagi manusia”.

“Keempat, kamu tidak bisa berfungsi sendirian.Agar bisa berguna dan bermanfaat, maka kamu harus membiarkan dirimu bekerja sama dengan manusia yang menggunakanmu”.

“Kelima, disaat-saat terakhir, apa yang telah engkau hasilkan itulah yang menunjukkan seberapa hebatnya dirimu yang sesungguhnya.Bukanlah pensil utuh dianggap berhasil, melainkan pensil-pensil yang telah membantu menghasilkan karya terbaik, yang berfungsi hingga potongan terpendek.Itulah yang sebenarnya paling mencapai tujuanmu dibuat”.

Sejak itulah, pensil-pensil itupun masuk kedalam kotaknya, dibungkus, dikemas, dan dijual kepasar bagi para manusia yang membutuhkan.

Pembaca, pensil-pensil ini pun mengingatkan kita mengenai tujuan dan misi kita berada di dunia ini.Saya pun percaya bahwa bukanlah tanpa sebab kita berada dan diciptakan ataupun dilahirkan di dunia ini.Yang jelas ada sebuah purpose dalam diri kita yang perlu untuk digenapi dan diselesaikan.

Sama seperti pensil itu, begitu pulalah diri kita yang berada didunia ini.Apa profesinya, saya yakin kesadaran kita mengenai tujuan dan panggilan hidup kita, akan membuat hidup kita menjadi semakin bermakna.

Hilang arah

Tidak mengherankan jika Victor Frankl yang mempopulerkan Logoterapi, yang dia sendiri pernah disiksa oleh Nazi, mengemukakan “tujuan hidup yang jelas, membuat orang punya harapan serta tidak mengakhiri hidupnya”.Itulah sebabnya, tak mengherankan jika dikatakan bahwa salah satu penyebab terbesar dari angka bunuh diri adalah kehilangan arah ataupun tujuan hidup.Maka, dari filosofi pensil di atas kita kita belajar mengenai lima hal penting dalam kehidupan.

Pertama, hidup harus punya tujuan yang pasti.Apapun kerja ataupun peran yantg kita mainkan di dunia ini, kita harus berdaya guna.Jika tidak maka sia-sialah tujuan diri kita di ciptakan.Calakanya kita lahir tanpa sebuah instruksi ataupun buku manual yang menjelaskan untuk apakah kita hadir di dunia ini.Pencarian akan tujuan dan panggilan kita , menjadi tema penting selama kita hidup di dunia.

Yang jelas, kehidupan kita dimaknakan untuk menjadi berguna dan bermanfaat serta positif bagi orang-orang di sekitar kita, minimal untuk orang-orang terdekat.Jika tidak demikian, maka kita useless.Tidak ada gunanya.Sama seperti sebatang pensil yang tidak bisa dipakai untuk menulis, maka ia tidaklah berguna sama sekali.

Kedua, akan terjadi proses penajaman sehingga kita bisa berfungsi optimal, oleh karena itulah,sering terjadi kesulitan, hambatan atauun tantangan.Seuanya berguna dan bermanfaat sehingga kita selalu belajar darinya untuk jadi lebih baik.Ingat kembali soal Lee Iacocca, salah satu eksekutif yang justru menjadi besar dan terkenal, setelah dia di depak keluar dari mobil Ford.Pengalaman itu justru menjadi pemacu semangat baginya untuk berhasil di Chrysler.

Ingat pula Donald Trump yang sempat diguncang masalah finansial dan nyaris bangkrut.Namun, kebangkrutannya itulah yang justru menjadi pelajaan dan motivasi baginya untuk sukses lebih langgeng.Kadang penajaman itu ‘Sakit’.Namun, itulah yang justru akan memberikan kesempatan kita mengeluarkan yang terbaik.

Ketiga, bagian internal diri kitalah yang akan berperan.Saya sering menyaksikan banyak artis ataupun bintang film yang terkenal, jusru yang hebat bukanlah karena mereka paling cantik ataupun paling tampan.tetapi, kemampuan dalam diri mereka, filosofi serta semangat merekalah yang membuat mereka menjadi luar biasa.Demikan pula pada diri kita seperti karakter, kemmpuan , bakat , motivasi, semangat pola pikir itulah yang akan lebih berdampak daripada tampilan luar diri kita.

Keempat, pensil pun mengajarkan agar bisa berfungsi sempurna kita harus belajar bekerja sama dengan orang lain.Bayangkanlah seorang aktor atau aktris yang tidak mau di atur sutradaranya.Bayangkan seorang anak buah yang tidak mau diatur atasanya.Ataupun seorang service provider yang tidak mau diatur oleh pelanggannya.Mereka semua tidak akan berfungsi sempurna.Agar berhasil kita kadang kala harus belajar dari pensil untuk “tunduk” dan membiarkan diri kita berubah menjadi alat yang sempurna dengan belajar dan mendengar dari ahlinya.Itulah sebabnya, kemampuan untuk belajar bekerja sama dengan orang lain, belajar dari “guru” yang lebih tahu adalah sesuatu yang membuat kita menjadi lebih baik.

Terakhir, pensil pun mengajarkan kita meninggalkan warisan yang berharga melalui karya-karya yang kita tinggalkan.Tugas kita bukan kembali dalam kondisi utuh dan sempurna, melainkan menjadikan diri kita berarti dan berharga.Yang penting, hingga pada akhir kehidupan kita ada karya ataupun hasil berharga yang mampu kita tinggalkan.

Dikutip : Majalah Bisnis Indonesia Edisi 27 Juli 2008.

Aplikasi Sekolah Untuk Linux dengan lazarus

Kali ini saya coba membuat Aplikasi sekolah dengan Lazarus yang berjalan/di instal di Linux, Aplikasi ini saya buat dan saya Peruntukkan siystem operasi Linux, khususnya linux Ubuntu. Tidak lengkap jika aplikasi gratis berlicensi tapi harus di instal di system operasi berbayar, atau gratis tapi bajakan… Malu lah jaman sekarang pakai OS bajakan. hehehe… Sekarang saya coba buat aplikasi gratis berlicensi dan di jalankan di System Operasi gratis berlicensi Pula… sungguh  banyak  sekali penghematan yang kita dapat. Ini merupakan kelebihan dari Lazarus, kita bisa membuat aplikasi  yang bisa berjalan/diinstal dibeberapa System Operasi.

Berikut Screen Shotnya

1. Tampilan utama dari aplikasi utama

AplikasiSekolahLinux1

2. Tampilan Menu Pendaftaran Siswa Baru

AplikasisekolahLinux23. Tampilan Sub Menu Admin

AplikasiSekolahLinux AplikasiSekolah5 AplikasiSekolahLinux6

Namun aplikasi belum Selesai… Semoga dapat diselesaikan secepatnya.

Prosesor dan Kipas Prosesor Harus Menyatu Tidak bisa hidup masing-masing

Dalam perangkat keras komputer ada namanya Prosesor dan Kipas Prosesor, mereka mempunyai peran sangat penting di dalam kinerja komputer. Dan bahkan komputer  tidak akan berfungsi tanpa mereka, karena mereka bagian dari komputer. Seperti halnya mereka bagian dari pasangan suami istri.

Prosesor akan merasa kepanasan dan tidak betah hidup jika dia tidak ada sang kipas. Mereka tidak bisa dipisahkan.. Mereka harus bersatu… Tidak bisa mereka sendiri-sendiri.. Mereka tidak boleh egois.. Saling hidup sendiri..Kipas tidak ada gunanya…dan prosesor akan kepanggang matiii…. Ketika mereka berpisah komputer tiada artinya.. Memori tiada artinya, kasing tiada artinya, monitor tiada fungsinya… Komputer tidak ada artinya.

Kalian harus paham dengan mereka.. Mereka harus selalu menyatu untuk saling memberikan fungsinya di dalam komputer. Mereka harus bersatu tidak boleh saling egois untuk hidup sendiri.. walau hanya hitungan menit dan bahkan hitungan detik.. Komputer tidak akan menyala.. Kalian harus paham itu…Komputer akan mati.. hitungan detik..komputer akan mati..  jangan sampai mereka tidak saling menyatu…  Mereka akan menyatu terus dan hidup dan menghidupkan Komputer.

 

 

 

 

 

Instalasi Perangkat Di Ubuntu 12.04 Lts atau 13.10

Setelah Instalasi OS Linux Ubuntu 13.10 berhasil, masuk ke terminal dan ketikkan perintah-perintah di bawah ini :

 

Update perintah di Terminal

apt-get update

Upgrade Perintah di Terminal

apt-get upgrade

Instal Aplikasi .Deb

dpkg -i namapaket.deb

Melihat informasi daftar paket software yang terinstall

dpkg -l
Meremove paket yang sudah diinstall (tanpa meremove file konfigurasi)

dpkg -r namapaket
Mem-purge paket (meremove paket dan file konfigurasi) yang sudah diinstall

dpkg –purge namapaket

 

Install Mysql
apt-get install mysql-server mysql-client

Install apache

apt-get install apache2

Instal PHP Myadmin

apt-get install phpmyadmin

Remove Program

apt-get remove picasa

 

Instal Wireles Brodcom

lspci

sudo lshw -c network

rfkill list all

Jika belum bisa

sudo apt-get install linux-backports-modules-cw-3.6-precise-generic

 

 

Solusi Button1 Lazarus For MAs Rifki

Sedikit Perubahan program yang bercetak tebal.

procedure TForm2.Button1Click(Sender: TObject);
var
be, ts, fc, fy  :single;
ql, qd, qu, Mu, L :single;
a, C, T, d1, Mn1 :single;
Cc, Cs, d2, d3, y, Mn2 :single;
df, be1, be2, Bo :single;
b, d, tw, tf, Ab :single;
begin
fc:=StrTofloat(Edit1.Text);
fy:=StrTofloat(Edit2.Text);

ts:=StrTofloat(Edit4.Text);
ql:=StrTofloat(Edit5.Text);
qd:=StrTofloat(Edit6.Text);
L:=StrTofloat(Edit7.Text);
Bo:=StrTofloat(Edit8.Text);

d:=StrToFloat(label47.Caption);
b:=StrToFloat(label63.Caption);
tw:=StrToFloat(label64.Caption);
tf:=StrToFloat(label65.Caption);
Ab:=StrToFloat(label73.Caption);

be1:=(L/4)*1000;
be2:=Bo*1000;
if be1>be2 then
  begin
  be:=be2;
  Label81.caption:=FloatToSTr(Be);
  end
  else
  begin
  be:=be1;
  Label81.caption:=FloatToSTr(Be);
  end;

a:=(Ab*fy)/(0.85*fc*be);
Label31.Caption:=FloatToStr(a);
if a<=ts then
begin
C:=0.85*fc*a*be;
Label39.Caption:=FloatToStr(C);

T:=Ab*fy;
Label40.Caption:=FloatToStr(T);

d1:=((d/2)+ts-(a/2));
Label41.Caption:=FloatToStr(d1);

Mn1:=(C*d1)/(10000);
Label42.Caption:=FloatToStr(Mn1);

Label53.Caption:=FloatToStr(0);
Label54.Caption:=FloatToStr(0);
Label55.Caption:=FloatToStr(0);
Label56.Caption:=FloatToStr(0);
Label57.Caption:=FloatToStr(0);
Label77.Caption:=FloatToStr(0);
if Mn1>=Mu  then
begin
MessageDlg(‘Mn 1 >= Mu Penampang Aman’, mtInformation, [mbOk], 0 );
end;
if  Mn1<Mu then
begin
MessageDlg(‘Mn 1 < Mu Penampang Tidak Aman’, mtInformation, [mbOk], 0 );
end;
end;

if a>ts then
begin
Cc:=0.85*fc*be*ts;
Label53.Caption:=FloatToStr(Cc);

Cs:=((Ab*fy)-(0.85*fc*be*ts))/2;
Label54.Caption:=FloatToStr(Cs);

df:=Cs/(b*fy);
Label77.Caption:=FloatToStr(df);

if df>tf then
begin
MessageDlg(‘Coba Ganti Profil yang lain, coba input lagi’, mtInformation, [mbOk], 0 );

Label55.Caption:=FloatToStr(0);
Label56.Caption:=FloatToStr(0);
Label57.Caption:=FloatToStr(0);
Label77.Caption:=FloatToStr(0);

Label39.Caption:=FloatToStr(0);
Label40.Caption:=FloatToStr(0);
Label41.Caption:=FloatToStr(0);
Label42.Caption:=FloatToStr(0);
end;

if df<tf then
begin
y:=((Ab*(d/2))-(df*b*(d-(df/2))))/(Ab-(df*b));

d2:=d+(ts/2)-y;
Label55.Caption:=FloatToStr(d2);
d3:=d-y-(df/2);
Label56.Caption:=FloatToStr(d3);

Mn2:=((Cc*d2)+(Cs*d3))/(10000);
Label57.Caption:=FloatToStr(Mn2);

Label39.Caption:=FloatToStr(0);
Label40.Caption:=FloatToStr(0);
Label41.Caption:=FloatToStr(0);
Label42.Caption:=FloatToStr(0);
end;

if Mn2>=Mu then
begin
MessageDlg(‘Mn 2 >= Mu Penampang Aman’, mtInformation, [mbOk], 0 );
end;
if Mn2<Mu  then
begin
MessageDlg(‘Mn 2 < Mu Penampang Tidak Aman’, mtInformation, [mbOk], 0 );
end;
end;
end;

Aplikasi Kasir V.1.0

Memperbaiki dan melengkapi dari Aplikasi Kasir sederhana yang sudah saya posting, kali ini  saya sampaikan Aplikasi Kasir V.1.0 sebagai kelanjutan aplikasi kasir sederhana yang dulu saya buat. Mari langsung saja saya berikan Shot tampilannya.

1. Tampilan kasir V.1.0 saya tampilkan Kode transaksi yang terbuat otomatis berdasarkan tahun, bulan dan urutan transaksi pada bulan transaksi.  Sebelahnya tanggal transaksi. Dibawah ada total transaksi sampai dengan pengembalian.

kasir1

2. Kemudian untuk memilih barang yang akan di beli klik tanda panah di kode barang atau di nama barang, disana nanti langsung muncul Harga, isikan jumlah beli dan Diskon per barang jika ada. Dan untuk menambah barang belanja, arahkan kebawah dengan pencet tombol Panah ke bawah.

kasir2

3. Disini,  setiap item barang diinput, secara otomatis total pembelian langsung saya tampilkan dengan size yang besar, sehingga pembeli bisa melihat dan memperkirakan uang belanjanya cukup atau tidak… Hehehe.. Pengalaman pribadi.

kasir34. Setelah pembeli selesai dengan barang belanjaannya, kasir langsung menginputkan nilai uang yang diberikan oleh pembeli, tekan enter untuk melanjutkan transaksi, kembalian akan muncul sendiri dan enter sekali lagi untuk print Struk pembelian.

 

kasir4

5.  Kemudian akan diberikan Preview dari struk pembelian.

 

kasir5

 

6. Ini Master barang, yang fungsinya untuk menginput barang baru yang akan di jual. Disana mengisikan nama beserta harganya.

 

kasir6

7. Pemilik toko juga bisa menghapus barang yang sudah tidak di jual, sehingga meringankan database.

Demikian tampilan Aplikasi Kasir V.1.0 Semoga bermanfaat.