SELECT &ACTUALTABLETAHUNAN
GO bottom
thisform.txtnamapt.Value = " " +ALLTRIM(NAMAPT) + " ("+ALLTRIM(KodePt)+")"

thisform.txttglInspeksi.controlsource = FIELD(2)
thisform.txtkd_afd1.controlsource = FIELD(5)
thisform.txtkd_afd2.controlsource = FIELD(7)

thisform.txtkd_blok1.controlsource = FIELD(6)
thisform.txtkd_blok2.controlsource = FIELD(8)

thisform.txtactualtotal.ControlSource=FIELD(19)

SELECT &inspektabletahunan
thisform.txttotal.ControlSource = FIELD(21)