Create an index on the table APDSET1
user.attributeContains('AccountingUnitControl',getDBFieldByIdx('APDISTRIB','DIS-ACCT-UNIT','APDSET1',form.DIST-COMPANY,form.DIS-ACCT-UNIT))