zOs/SQL/DSLOCATE

set current path  = 'S100447';
select dsLocate('A540769.WK.REXX')
    from sysibm.sysDummy1