numpang nanya semuanya, klo perhitungan pinjaman dg cara pembayaran Anuitas,Sliding dan Flat yg efektif gmana ya? (rumus dr ketiganya). Apakah nilai dr pokok pinjaman hrs sampe NOL, sy buat tdk menjadi nol tetapi klo dihitung manual nilai angsurannya bener. Flat yg sy buat(potongan code):

  Angsuran := (PokokPinjaman+(PokokPinjamanBunga))/Bulan;
  AngsuranBunga := PokokPinjaman   Bunga;
  AngsuranPokok := Angsuran-AngsuranBunga;
  for a :=1 to Bulan do  begin
    bPinjamDetail.appendRecord([Kode,Nip,a,PokokPinjaman,Angsuran,
    AngsuranPokok,AngsuranBunga]);
    PokokPinjaman := PokokPinjaman - AngsuranPokok;
  end;

Bunga: merupakan var yg dihiutng dr porsentase 1tahun (jd klo 24/th, maka nilai /blnnya=2% --> 0.02)

pembayaran Anuitas,Sliding dan Flat itu mbayarnya ke siapa? ke mbak kasir atau via transfer? (hik.. hik... boro2 ngasih solusi, rumusnya aja ane ngga' tau... hik.. hik..)

hix..hix..hix.. Anuitas, Sliding & Flat itu jenis ato metode gw bingung, gmana si.. jd klo fla:, itu Total angsuran+bunga tetep, ttp pokok pinjaman yg berubah menjd turun, sedangkan Anuitas: Total angsuran tetep, ttp angsuran pokok+bunga berubah Sliding: Total angsuran berubah+bunga, ttp angsuran pokok tetep Nah, bagaimana Pokok pinjaman itu bisa jadi NOL, klo emang hrs NOL

rekan @ichan29... metode itu merupakan metode pemberian pinjaman di perbankan... jadi mungkin saran saya, kamu pelajari aja PAPI (Prosedur Akutansi Perbankan Indonesia) disitu dijelaskan mengenai perhitungan untuk metode2 itu... metode perhitungannya seperti ini.. Anuitas : Bunga dihitung dari sisa pokok kredit, dengan demikian jumlah bunga yang dibayar dari bulan ke bulan berbeda (semakin kecil) seiring dengan cicilan yang dilakukan (sisa pokok kredit yang berkurang) Sliding : Pembayaran Bunga yang umumnya diperhitungkan secara harian/bulanan sampai dengan hari bunga efektif (Sliding ini diberlakukan pada kredit dengan angsuran tidak terjadwal, seperti PRK dan Kredit Umum/Komersil) Flat : Bunga dihitung dari pokok awal kredit, dengan demikian jumlah bunga yang dibayar setiap bulan adalah sama jadi silakan dipelajari prosedurenya, kemudian dianalisis..jadi de codingnya... :) semoga bermanfaat....

bravo @jimbot! :D mungkin suatu saat berguna buat saya...

@jimbot!: thx jimbot, atas penjelasannya.. code-nya pun jg udah terpecahkan setelah duduk+makan rambutan.. kayaknya cuman laper aja kali ya.. ini potongan codenya Flat, spt posting pertama cuman ada modif sedikit:

  Angsuran := (PokokPinjaman+(PokokPinjamanBunga Bulan))/Bulan;
  AngsuranBunga := PokokPinjaman  Bunga;
  AngsuranPokok := Angsuran-AngsuranBunga;
  for a :=1 to Bulan do
  begin
    bPinjamDetail.appendRecord([Kode,Nip,a,PokokPinjaman,Angsuran,
    AngsuranPokok,AngsuranBunga]);
    PokokPinjaman := PokokPinjaman - AngsuranPokok;
  end;

Anuitas:

  Pengali := PokokPinjaman   Bunga;
  Pembagi := Power((Bunga + 1),Bulan);
  Pembagi := 1/Pembagi;
  Pembagi := 1- Pembagi;
  Angsuran := ROUND(Pengali / Pembagi);
  AngsuranBunga := PokokPinjaman  Bunga;
  AngsuranPokok := Angsuran - AngsuranBunga;
  for a :=1 to Bulan do
  begin
    bPinjamDetail.appendRecord([Kode,Nip,a,PokokPinjaman,Angsuran,
    AngsuranPokok,AngsuranBunga]);
    PokokPinjaman := ROUND(PokokPinjaman - AngsuranPokok);
    AngsuranBunga := ROUND(PokokPinjaman   Bunga);
    AngsuranPokok := ROUND(Angsuran - AngsuranBunga);
  end;

Sliding:

  AngsuranPokok := PokokPinjaman / Bulan ;
  AngsuranBunga := PokokPinjaman  Bunga;
  Angsuran := AngsuranPokok + AngsuranBunga;
  for a :=1 to Bulan do
  begin
    bPinjamDetail.appendRecord([Kode,Nip,a,PokokPinjaman,Angsuran,
    AngsuranPokok,AngsuranBunga]);
    PokokPinjaman := PokokPinjaman - AngsuranPokok;
    AngsuranBunga := PokokPinjaman   Bunga;
    Angsuran := AngsuranPokok + AngsuranBunga;
  end;

smoga bermanfaat if ada yg perlu

hak.. hak.. hak.. @ichan29 bisa aja, masa' pake menyan duduk+makan rambutan :mrgreen:

@DE:..masa' pake menyan duduk+makan rambutan xixixi.. adat tradisi jawa kuno om..

bravo @jimbot!

jadi malu ni buat pemula... :wink:

mungkin suatu saat berguna buat saya..

nanti klu buat aplikasi pinjaman..palagi core banking kasi tau yaaa...mungkin aja ada bank yang tertarik... :)

ode-nya pun jg udah terpecahkan setelah duduk+makan rambutan

xixixi....waaa...ada metode baru ni..ternyata sebelum coding..kudu duduk+makan rambutan

@DE:..masa' pake menyan duduk+makan rambutan xixixi.. adat tradisi jawa kuno om..

naaahhh CIM! nemu satu cak Ulil! ini dia klenik yang hampir punaaah! daftarin kesini http://pascal-id.org/thread/unknown/4516/view-old-thread/ ya bro @ichan29 :mrgreen:

jadi malu ni buat pemula...

ngga' usah malu, beda aliran itu biasa! buktinya anda bisa kasih pencerahan...

nanti klu buat aplikasi pinjaman..palagi core banking kasi tau yaaa...mungkin aja ada bank yang tertarik..

siap grak! yg seperti ini musti dicatat dlm database (buku catatan) saya :mrgreen: