col lockf new_value lockv

select &lock lockf from dual;

select
       chr(to_number(substr(ltrim(to_char(&lockv,'XXXXXXXX')),1,2),'XX')) ||
       chr(to_number(substr(ltrim(to_char(&lockv,'XXXXXXXX')),3,2),'XX')) type,
       substr(ltrim(to_char(&lockv,'XXXXXXXX')),-1,1) mod
from  dual
/