Question

我需要向后端团队传递LOW-VALUES（我不太确定会是什么类型），作为副本字段的默认值。我使用wtx转换将xml转换为cobol

15 :abc       PIC X(15).

我从大型机团队那里得到了这个作为该领域的样本。

X'000000000000000000000000000000'

但是，当我使用此规则时，它会失败，因为字符数大于15.如何通过低值？

我上面的cobol字段的规则图

="X'000000000000000000000000000000'"

错误消息

Map:    Output: abc Field:123 Group:outputcbl
    Size of input item is greater than size of output item.

Answer 1

COBOL中的

LOW-VALUE是一个比喻常数。这个常数的值是在使用的整理顺序中具有最低序号位置的字符。

假设正在使用的字符集是EBCDIC（如您对另一个答案的评论中所示）并且整理顺序没有被覆盖（可能是一个很好的假设），LOW-VALUE对应于二进制零。

COBOL中的PIC X(15)数据项占用15个字节。使用转换来转换它字段为15字节的二进制零。 COBOL应用程序将看到LOW-VALUE。

注意：“大型机团队”给出的值是15字节二进制零的十六进制字符串表示。

Answer 2

低值只是所有十六进制零，所以如果你将规则图的大小调整为包含15个十六进制数字，全部为零，你应该没问题。