PL/I 且不在制表位上打印

Question

我有以下 PL/I 代码：

    declare 1 u union,
      2 c character(1),
      2 ci fixed binary(4) unsigned;

    ci = data_mem(data_ptr);
    put list (c);

它的作用是接受一个整数并输出它，就好像它是一个 ascii/ebcdic 值一样。所以它显示了字符。到目前为止这有效。现在的问题是每个字符以24个空格间隔打印，就好像插入了3个TAB一样。我尝试先将 c 转换为字符串，然后应用 trim() 但这没有帮助。

有任何想法吗？

Answer 1

这是 PRINT 属性文件的默认 PUT LIST 行为。来自 IBM Enterprise PL/I for z/OS Language Reference，在面向流的数据传输 -> LIST -> PUT list-directed（强调我的）下：

\n\n

\n

数据列表项的值被转换为字符表示（图形除外）并传输到数据流。空白分隔连续传输的数据值。对于 PRINT 文件，项目根据程序选项卡设置进行分隔（请参阅 \xe2\x80\x9cPRINT 属性\xe2\x80\x9d）。

\n

\n\n

手册的下一部分将讨论 PRINT 属性。在这里我们有

\n\n

\n

通过列表和数据定向数据传输传输的数据值自动在左边距和实现定义的预设制表符位置上对齐。

\n

\n\n

由于您省略了 FILE，因此您的 PUT 将转到默认 FILE(SYSPRINT)。SYSPRINT 隐式定义为 FILE ENVIRONMENT(F RECSIZE(121)) OUTPUT PRINT STREAM（请参阅语言参考中的输入和输出 -> 文件属性 -> 文件常量，以及定义和使用连续数据集 -> 将 PRINT 文件与流 I 一起使用程序员指南中的 /O）。IIRC，默认值是每 24 个，每行 5 个选项卡，与 20 世纪 60 年代末 PL/IF 早期常见的旧 120 字节打印机兼容。这可以通过声明 PLITABS 结构（在前面提到的手册部分中描述）来修改。

\n\n

LIST 和 DATA 导向的 I/O 旨在成为快速且肮脏的 I/O 接口，很少考虑输出格式（但对输入非常宽容）。EDIT 更适合格式化输出，但它确实显示了许多用于输入和输出的 FORTRAN 根源。就我个人而言，对于使用格式化输出的传统报告以及记录输入，我会使用记录 I/O，这类似于标准 COBOL I/O。

\n