ungefähr so:

%dec(%char(%date(%days(%date(%char(qDatum):*cymd0) ) + 1)):8:0)