I have used the following

DEFINE donor sele TYPE H* .AND. .BONDED. bynum @IN1 SHOW END