仅针对特定设置将外部打印文件替换为另一个打印文件

时间:2019-01-19 01:05:05

标签: ibm-midrange

我们正在将旧的O-spec RPG程序转换为使用外部打印机文件。作为一家公司,我们有一些标准程序和过程,可用来允许用户在运行程序时通过电子邮件发送或打印特定的后台打印文件以及设置双面打印,份数等。这些过程对生成的后台打印执行各种替代操作文件以更改OUTQ,COPIES数量等。我们还将打印机文件覆盖为我们定义的标准打印文件,如下所示:

OVRPRTF FILE(MYOUTPUT) TOFILE(PRTF132);

这对于旧的O规格非常有用。但是,由于我们现在正在过渡到外部打印机文件,所以在后台打印文件生成方面遇到了问题。由于输出文件只是一团糟,因此很难描述特定的问题。行之间互相覆盖,路由数据没有按预期变化,依此类推。我已经使用TOFILE将此跟踪到批发覆盖,因为我可以像这样运行覆盖:

OVRPRTF FILE(MYOUTPUT) LPI(8) CPI(13.3) OUTQ(MYOUTQ);

当我这样做时,一切都会很好地打印出来。

最终,我希望能够仅使用PRTF132替代文件中的特定替代,例如LPI,CPI和OUTQ值。类似于以下内容:

OVRPRTF FILE(MYOUTPUT) FROMFILE(PRTF132) LPI CPI OUTQ;

我知道这不是真正的语法。我曾尝试过搜索文档和谷歌搜索,但空了。这有可能还是我需要推出其他解决方案?

1 个答案:

答案 0 :(得分:2)

  

输出文件只是一团糟。行彼此覆盖...

在行打印开始时使用的是SPACEB()还是SPACEA()?如果没有的话,那会解释写什么。

  

最终,我希望能够仅使用PRTF132中的特定替代...

我建议您

  1. 使用API​​ QDFRPRTA检索打印机文件属性。在此处查看文档:{​​{3}}
  2. 使用检索到的属性执行OVRPRTF FILE(MYOUTPUT)LPI(&LPI)CPI(&CPI)OUTQ(&MYOUTQ)

请发布您PRTF的源代码,以便我查看并在系统上进行测试。