kbmmemtable.savetodateset 出错(50)

BEGIN ADS_CLAIMDT.ParamByName('CLAIMNO').AsString := rzedtClaimNo.Text; ADS_CLAIMDT.Open; ADS_CLAIMDT.Append; J := kbmMT_ClaimDT.RecordCount; IF NOT kbmMT_CLAIMDT.Active THEN kbmMT_CLAIMDT.Active := TRUE; FOR I:=0 TO J-1 DO BEGIN with kbmMT_CLAIMDT DO BEGIN EDIT; FIELDBYNAME('CLAIMNO').AsString := rzedtClaimNo.Text; POST; NEXT; END; END; kbmMT_CLAIMDT.SaveToDataSet(ADS_CLAIMDT,[]); //此处报错 报CLAIMNO不能为空 ADS_CLAIMDT.Post;END;说明：1、ADS_CLAIMDT 中的SQL语句为‘SELECT * FROM CLAIM_DT WHERE CLAIMNO=:CLAIMNO’2、将CLAIM_DT中的CLAIMNO取消了关键字也不行3、数据库为ACCESS,报错“。。。。由于其REQUIRED属性设置为（TURE)字段‘CLAIM_DT.CLAIMNO’不能包含NULL值”