local llFirstRec
llFirstRec = .T.
SCAN FOR ins_co_nam = "A U L" AND group_code = 'A01'

	if llFirstRec
		llFirstRec = .F.
		REPLACE chkamt with THISFORM.TEXT4.VALUE, ;
			misc_amt WITH THISFORM.TEXT6.VALUE, ;
			gen_misc WITH THISFORM.TEXT7.VALUE
	endif
	REPLACE paiddate WITH THISFORM.TEXT1.VALUE,;
		fromdate WITH THISFORM.TEXT2.VALUE,;
		todate WITH THISFORM.TEXT3.VALUE,;
		chknumb with THISFORM.TEXT5.VALUE,;
		servfee WITH .69

	REPLACE balance WITH amt_pre - servfee,;
		duecompany WITH balance posted with "P"

ENDSCAN