如何将当前日期从一个UniQuery段落传递到另一个段落

Question

如何在UniQuery中将当前日期从一个PA传递到另一个PA？一位同事教我如何将cron的日期写到文件中，并使用内联提示符将其与<<F(HOLD,X.DATE.TODAY,1)>>一起读取，但这增加了可能失败的额外部分，我宁愿保持简单(也就是有一次文件没有更新，哎呀)。

我基本上需要这样的东西。

AE VOC MY.PROCESS.TODAY
001: PA
002: MY.PROCESS ?????

用现在的日期来运行我的第二个PA。

AE VOC MY.PROCESS
001: PA
002: SELECT PERSON WITH PER.CHANGE.DATE EQ <<I2,Enter Date:>>

这确实有效，MY.PROCESS <<F(HOLD,X.DATE.TODAY,1)>>，但我是否可以使用一些更可靠的东西，比如DATE()，将结果传递到第二段？

Answer 1

你可能会得到“不要在段落中这样做”的答案，在某种程度上这是正确的--除了简单的命令列表之外，任何事情都会变得复杂。

话虽如此，以下几点对我来说是可行的：

AE VOC MY.PROCESS
001: PA
002: CLEARPROMPTS
003: SELECT PERSON WITH PER.CHANGE.DATE EQ <<I2,Enter Date:>>

来自：v821.pdf

我在测试时使用I选项：“i和S选项与C选项相似。如果没有指定n，则In选项提示输入文本，而Sn选项将n的值传递给被调用的段落。”

还请阅读上面的“始终使用内联提示符提示”一节，以解释为什么需要CLEARPROMPTS。否则，如果不传递参数，它将很高兴地使用最后一个提供的参数。

编辑:提供基本的选项段落对于非常简单的事情来说是很棒的，而且可能有一种方法来完成一些简单的事情。但这是一个单行的基本程序，可以让一些东西发挥作用：

EXECUTE "MY.PROCESS ":OCONV(DATE(),"D4/")

是否有一个硬性要求MY.PROCESS.TODAY是一个段落？如果您编译并编录此单行程序为BP MY.PROCESS.TODAY，那么它将完全按照需要工作。

Answer 2

您还可以创建一个Vitrual字典项目，这是他今天的日期

埃德·迪特人

I @DATE D2/ TODAY'S DATE 10L S

然后，select语句变成：

选择具有PER.CHANGE.DATE EQ TODAYSDATE的人

诚然，这比查看存储的日期要慢，因为它是根据每个查询的记录计算的，而不是存储的。如果人员是一个大文件，这可能不是一个好主意。