20.2. Membuat File Detail

Setelah kita menyelesaikan file master, maka langkah selanjutnya adalah membuat file detail. Seperti biasa kita akan membuat file detail dengan perintah SUBFILE. Kita akan menggunakan file pjd sebagai file detail trans dan pcm sebagai file detail transa. Untuk itu marilah kita ketikkan perintah di bawah ini di atas perintah END_SCREEN


/*** SUBFILE INFORMATION ***/
IMAGE(transt) {NO_CLS} {LSTFLD_ADVANCE} {FRSFLD_BACKUP} {BASE_ROW=9}
/---t----t--------------t------t---t--------t--------t-----------t---------------t-----------------\
|F/L|Type| No.Faktur    |Cabang|Div|Tgl.Fak |Tgl.Jtp |No.Rekening| Jml Bayar     |   Keterangan    |
|---|----|--------------|------|---|--------|--------|-----------|---------------|-----------------|






\---.----.--------------.------.---.--------.--------.-----------.---------------.-----------------/

IMAGE(trans) {NO_CLS} {LSTFLD_ADVANCE} {FRSFLD_BACKUP} {BASE_ROW=12}
| _ |____|______________|______|___|________|________|___________|____________.__|_________________|


FIELD(trans)
   pjdyt             NOCHANGE           	 INPUTRI     1 /* F/L */
   pjdtype           NOCHANGE            	 INPUTRI     2
   pjdnofak          ALLCAPS SCROLL      	 INPUTRI     3 /* nomor nota */
   pjdcab            ALLCAPS SCROLL            	 INPUTRI     4
   pjddvs            ALLCAPS SCROLL              INPUTRI     5
   pjdtglfak         NONE NOLIMIT {DD-MM-YY} 	 INPUTRI     6 /* tgl jatuh tempo */
   pjdtgljtp         NONE NOLIMIT {DD-MM-YY} 	 INPUTRI     7 /* tgl jatuh tempo */
   pjdnobbm          ALLCAPS SCROLL              INPUTRI     8 /* nomor nota */
   pjdjml            NUMERIC             	 INPUTRI     9 /* jumlah nota */
   pjdket            ALLWORDCAPS SCROLL     	 INPUTRI     10

DEFAULTS(trans)
pjdsts		INIT		OPEN

SUBFILE(trans)
SFL_LINES(6)
SFL_TITLE(transt)
SFL_TARGET
pjdbukurtidx   pjcnoprc

SFL_MAP
pjctgl          pjdtglbyr
pjcplg          pjdplg
pjcnoprc        pjdnobuk
pjcscr          pjdscr

Dengan mengetikkan perintah di atas kita telah menghubungkan file master pjc dengan file detail trans pjd seperti yang terlihat pada gambar di bawah ini. Tambahkan perintah HOOK, EDIT, DEFAULT, MAP, dan SCAN sesuai yang anda inginkan.


/*** SUBFILE INFORMATION ***/
IMAGE(transat) {LSTFLD_ADVANCE} {FRSFLD_BACKUP} {BASE_ROW=9}
/----t-------------t-----------t-------------t-----------t---------t---------------t------------\
|Type|No.Cek/Bukti | Kas/Bank  |  Nama Bank  | Kota Bank | Tgl Jtp | Total Kas/Cek | Keterangan |
|----|-------------|-----------|-------------|-----------|---------|---------------|------------|






\----.-------------.-----------.-------------.-----------.---------.---------------.------------/

IMAGE(transa) {NO_CLS} {LSTFLD_ADVANCE} {FRSFLD_BACKUP} {BASE_ROW=12} {COVER_MASTER}
| __ |_____________|___________| ____________|___________|_________|____________.__|____________|

FIELD(transa)
   pcmtype       NOCHANGE            INPUTRI          1 /* nomor cek */
   pcmnocek      ALLCAPS SCROLL      INPUTRI          2 /* nomor cek */
   pcmnobbm      ALLCAPS SCROLL      INPUTRI          3 /* Nama Bank */
   pcmbank       ALLCAPS SCROLL      INPUTRI          4 /* Nama Bank */
   pcmkota       ALLCAPS SCROLL      INPUTRI          5 /* Kota Bank */
   pcmtgljtp     NOLIMIT {DD-MM-YY}  INPUTRI          6 /* Tanggal jt */
   pcmdf2        NUMERIC             INPUTRI          7 /* Nilai Cek */
   pcmket        ALLCAPS SCROLL      INPUTRI          8 /* Kota Bank */

DEFAULTS(transa)
pcmsts		INIT			OPEN
pcmtype         DFALT_SCAN_BLANKS      	T "Tunai"
                                        C "Cek/Giro"
                                        M "Mutasi/Transfer Bank"
                                        K "Kredit Card "

SUBFILE(transa)
SFL_LINES(6)
SFL_TITLE(transat)

SFL_TARGET
pcmnoprcidx   pjcnoprc

SFL_MAP
     pjcnoprc           pcmnoprc
     pjcplg             pcmplg
     pjctgl             pcmtgl
     pjcscr             pcmscr
     pjcdvs             pcmdvs
     pjccab             pcmcab

Dengan demikian kita telah membuat file detail transa yang sederhana seperti yang terlihat dari gambar di bawah ini. Tambahkan perintah EDIT, DETAIL, HOOKS, SCAN sesuai yang anda inginkan.

Seperti biasa sebelum kita lanjutkan dengan membuat program POSTING, alangkah baiknya bila kita mempelajari dahulu field - field detail yang digunakan di layar ini. Kita tidak akan membahas file pcm karena sudah pernah dibahas di bab sebelumnya.


nama file	: pjd
fungsi		: menyimpan informasi penerimaan piutang per faktur. Jadi data pjd ini terbentuk pada saat anda memilih nomor faktur yang diterima piutangnya
pjdnofak	: nomor faktur yang akan diterima piutangnya
pjdtglfak	: tanggal faktur
pjdtgljtp	: tanggan jatuh tempo faktur
pjdjml		: jumlah yang akan diterima piutangnya
pjdsts		: OPEN (data belum diposting), CLSD (data sudah diposting)
pjdnobbm	: nomor rekening piutang di buku besar