下列代码如何简化？请高手赐教，万分感谢！！！
DO   CASE
      CASE  L_类型="N"
         REPLACE  PICTURE   WITH   IIF(L_类型="N",'"@Z"',"")  && 数值型字段空值不显示
      CASE  L_类型="D"
        REPLACE  PICTURE   WITH   IIF(L_类型="D",'"@Z"',"｛｝")  && 日期型字段空值不显示
      CASE  L_类型="L"
        REPLACE  PICTURE   WITH   IIF(L_类型="L",'"@Z"',"（..）")  && 逻辑型字段空值不显示
ENDCASE   

[此贴子已经被作者于2024-12-24 19:15编辑过]

case 条件为： L_类型="N"
然后对应的分支下又写：IIF(L_类型="N",'"@Z"',"")
这个iif()结果 永远都是 .T.，不可能是 .F.，代码有问题

代码经测试没有问题，关键是如何简化。请高手赐教！

Replace Picture with iif(L_类型="N",'"@Z"',iif(L_类型="D",'"@Z"',iif(L_类型="L",'"@Z"','')))

或者

Replace Picture with icase(L_类型="N",'"@Z"',L_类型="D",'"@Z"',L_类型="L",'"@Z"','')

看下BLANK命令对你是否有帮助

你的代码逻辑是有问题的

CASE  L_类型="N" 这里已锁定为 N 了
下一句的 IIF 是多余的
         REPLACE  PICTURE   WITH   IIF(L_类型="N",'"@Z"',"")  && 数值型字段空值不显示
只要直接 REPLACE PICTURE WITH "@Z" 就可以了

REPLACE  PICTURE   WITH   IIF(inlist(L_类型,"N","D","L"),'"@Z"',"")  && 数值型字段空值不显示

如何改写，请指点！

看下数据表及结构，才能修改代码