$datepos = system ("rexx", "fmtscan.rex", "$fn", "$datefieldname", "P")/256;