为什么下列代码修改后不起作用?
下列代码修改后不起作用!不知为何?请高手赐教,万分感谢!!![修改后的代码]
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