6.9. HOOKS

Perintah yang dijalankan sebelum masuk ke dalam field, sesudah masuk(saat keluar) dari field atau pada saat menekan tombol END. Perintah yang dijalankan bisa perhitungan, perintah SKIP(meloncati) field tertentu atau menjalankan perintah ap (aplikasi kecil tambahan dari ksystem)


HOOKS(master/trans/trans2)
   Cara Memakai:
      BEFORE_INPUT/AFTER_INPUT  cur_field=namaField 	DO_MAP  SHOW namaMap
      BEFORE_INPUT/AFTER_INPUT  cur_field=namaField 	DO_MAP  SHOW
		IF namaCalcs  namaMap
		ELSE
		HKCURSOR  STAY/NOSTAY/HOME/namaField
		HKMSG     pesan yang akan ditampilkan
      BEFORE_INPUT/AFTER_INPUT  cur_field=namaField  DO_LIB namaFungsiAp(parm, parm,parms);
      BEFORE_INPUT/AFTER_INPUT  cur_field=namaField  DO_LIB_IF namaCalcs namaFungsiAp (parm, parm,parms);
      BEFORE_INPUT/AFTER_INPUT  cur_field=namaField  DO_SKIP_IF namaCalcs
      BEFORE_INPUT/AFTER_INPUT  cur_field=namaField  DO_SCAN namaDbcalcs
      BEFORE_INPUT/AFTER_INPUT  cur_field=namaField  DO_SCAN F2/F3 namaDbscan 
      BEFORE_INPUT/AFTER_INPUT  cur_field=namaField  DO_SCAN_IF namaCalcs namaDbcalcs
      BEFORE_INPUT/AFTER_INPUT  cur_field=namaField  DO_NXT_POSTING nomorScreen namaNxtMap
      BEFORE_INPUT/AFTER_INPUT  cur_keybd=EN         DO_NXT_POSTING_IF namaCalc  nomorScreen namaNxtMap

      Kapan HOOKS dijalankan?
	 HOOKS dijalankan pada saat kursor masuk ke satu field, pada saat
	 keluar atau pada saat menekan tombol tertentu, misalnya tombol END.
	 HOOKS yang BEFORE_INPUT akan dijalankan pada saat masuk ke field.
	 HOOKS ini tetap dijalankan meskipun field itu sendiri di PROTECT
	 di atribut inputnya.
	 HOOKS yang AFTER_INPUT dijalankan pada saat kursor akan keluar
	 dari field tersebut tetapi sesudah EDITS dijalankan dulu. Dengan
	 kata lain, EDITS akan dijalankan SEBELUM HOOKS yang AFTER_INPUT.
	 Pada saat kursor keluar dari satu field, semua HOOKS yang AFTER_INPUT
	 untuk field itu akan dijalankan sesuai dengan urutan dari atas kebawah.
	 Bila ada satu dari HOOKS tersebut gagal (masuk ke bagian ELSE dari
	 HOOKS) maka perintah perintah HOOKS selanjutnya TIDAK dijalankan.
	 Bila tidak ada ELSE, perintah HOOKS selanjutnya tetap dijalankan.