下列代码修改后不起作用！不知为何？请高手赐教，万分感谢！！！

[修改后的代码]
REPLACE EXPR WITH ["第"],HPOS WITH L_页面宽度-26*L_字符宽度9,WIDTH WITH 2*L_字符宽度9
REPLACE EXPR WITH ["页"],HPOS WITH L_页面宽度-18*L_字符宽度9,WIDTH WITH 2*L_字符宽度9
REPLACE HPOS WITH L_页面宽度-22*L_字符宽度9,WIDTH WITH 5*L_字符宽度9

[原代码]
*修改页注脚内容
CALCULATE MAX(HPOS) TO L_MAX FOR OBJTYPE=5 AND TOP
LOCATE FOR HPOS=L_MAX
SCATTER MEMV MEMO
REPLACE EXPR WITH ["第"],HPOS WITH L_页面宽度-10*L_字符宽度9,WIDTH WITH 2*L_字符宽度9
APPEND BLANK
GATHER MEMV MEMO
REPLACE EXPR WITH ["页"],HPOS WITH L_页面宽度-2*L_字符宽度9,WIDTH WITH 2*L_字符宽度9
LOCATE FOR EXPR=[_PAGENO] AND TOP  
REPLACE HPOS WITH L_页面宽度-9*L_字符宽度9,WIDTH WITH 5*L_字符宽度9
LOCATE FOR EXPR=[DATE()] AND TOP
REPLACE HPOS WITH HPOS+11*L_字符宽度9
APPEND BLANK
GATHER MEMV MEMO
REPLACE EXPR WITH ["打印日期："],HPOS WITH 0,WIDTH WITH 10*L_字符宽度9

如何修改？盼指点！