SystemCore.TSystemCore.FuncManager.RunFunc(Context,'',s,DataSetBrokerDOCTOR_DOCUMENT_DETAIL.DataSet.FieldByName('FILLER_CODE').AsString+'-'+DataSetBrokerDOCTOR_DOCUMENT_DETAIL.DataSet.FieldByName('PRIMARY_ID').AsString,nil,False);
换成下面的试试:
SystemCore.TSystemCore.FuncManager.RunFunc(Context.parent,'',s,DataSetBrokerDOCTOR_DOCUMENT_DETAIL.DataSet.FieldByName('FILLER_CODE').AsString+'-'+DataSetBrokerDOCTOR_DOCUMENT_DETAIL.DataSet.FieldByName('PRIMARY_ID').AsString,'',nil,False); |