informix - 格式化在 4gl 中不起作用 [USING 子句]

Question

我试图按如下方式格式化输出变量：

场景一：

LET msg = "Roopesh Majeti here "
           Empno Using "&&&&&"
Call Logmsg(msg)

在这种情况下，empno 被格式化为 5 位数字 [我应该说是空格] 并被显示。

场景二：

Let c_check = "&&"
Let msg ="Roopesh Majeti here"
          Empno using c_check
Call Logmsg(msg)

在这里，我的期望是，无论 c_check [say 10 &'s] 的值是多少，empno 都应该被格式化为 10 个位置/空格。

但它没有按预期工作。

我在这里错过了什么吗？

Answer 1

你不说你得到了什么，这使得很难知道它是如何不工作的。

您有一些小的语法错误，缺少常量字符串后的逗号。

您没有显示msgor的声明c_check；问题可能是消息被截断了吗？

使用时会得到什么：

DISPLAY "<<", msg CLIPPED, ">>"
DISPLAY "<<", msg,         ">>"

您应该能够向我们展示这样的完整程序及其输出：

MAIN

    DEFINE msg      CHAR(64)
    DEFINE c_check  CHAR(20)
    DEFINE empno    INTEGER

    LET empno = 12345
    LET msg = "Roopesh Majeti here ", empno Using "&&&&&"
    DISPLAY "<<", msg CLIPPED, ">>"
    DISPLAY "<<", msg,         ">>"

    LET empno = 987654321
    LET c_check = "&&"
    LET msg ="Roopesh Majeti here", empno USING c_check
    DISPLAY "<<", msg CLIPPED, ">>"
    DISPLAY "<<", msg,         ">>"

END MAIN