yes very well, you have an example on the attached trace.
if I execute this part only, it works fine I have the value in wd1 but not with the whole procedure
"ALLOC F(INPUT) DA(‘VBPRDK.SRC.PRD’) SHR REU"
"ALLOC F(OUTDD) NEW REU UNIT(VIO) SP(5,5) CYLINDERS"
"ALLOC F(SYSIN) NEW REU UNIT(VIO)...