Click Method
Object:frmordhistory.grdOrdHistory.Column5.chkPaid
Expand/Collapse source code of procedure grdOrdHistory.Column5.chkPaid.Click Source Code
IF SEEK(history.order_id,"orders","order_id")
	REPLACE orders.paid WITH THIS.value
	THISFORM.Save
	THISFORM.txtBalance.Value = THISFORM.CalcBalance()
ENDIF