restriction on imputed value in MICE

I have a question about multiple imputation in R using MICE program. How can I put a restriction on the imputed value of a variable (e.g., variable A) smaller than the value of another no missing variable (e.g., variable D)? what is the code?

More specifically, if I have a dataset (dataj), which has 6 continuous variables: A, B, C, D, E, F. Variables A, B, C have missing values and D, E, F have no missing values. If there is no restriction, the code could be like:
imp <- mice(dataj, m=5, method = 'pmm', seed = 500)

I want the imputed value of variable A smaller than the corresponding case value of variable D, and I only have this restriction.

Thanks for your help.