如何通过REXX调用作业。

穆克什·潘迪 · 发表：2009年11月5日，星期四5:05 pm

大家好，

我们可以通过REXX调用作业（JCL）吗？目前，我已经开发了一项工作，通过提交它可以提供所需的O / P。

如果有可能，那么有什么办法可以从rexx屏幕将jcl的输入作为parm接收到。

提前致谢。

外籍人士 · 发表：2009年11月5日，星期四5:16 pm

不确定您在这里做什么....................................

您的意思是不是要通过终端在前台提交要处理的作业。

请注意，以这种方式执行该过程可能会花费更长的时间，在等待该过程结束时将锁定您的终端以防止其做任何进一步的有用工作，并且由于对TSO / ISPF会话施加的内存大小限制很可能会失败。

穆克什·潘迪 · 发表：2009年11月5日，星期四5:41 pm

外籍人士..您是正确的..我需要从三端提交工作..即rexx屏幕..工作不需要花费很多时间来完成。我正在尝试这样做，因为需要针对不同的参数运行该作业，而不是使用不同的参数多次运行该作业，更好的方法是通过提供参数值的终端运行该作业。

您能帮我热烈完成这项任务吗？

谢谢，

超级

您可以从TSO（SUBMIT命令）提交作业。您可以从ISPF（ISPF SUBMIT命令）提交作业。通过将JCL复制到Internal Reader，您可以随时随地提交作业。所以可以，您可以通过REXX提交工作。

外籍人士 · 发表：2009年11月5日，星期四6:08 pm

好的，您认为我们需要什么信息才能为您提供帮助。

穆克什·潘迪

我已经探索过通过rexx代码提交作业的热...我能知道如何将值从rexx传递给作业....它与skel概念有关....

外籍人士

我们似乎在这里朝相反的方向前进。您要从REXX提交作业还是要在终端上执行该过程。

如果要提交作业，则使用文件定制服务是对提交的JCL进行更改的最简单方法之一。

示例-您在屏幕上输入ABC的值，并且屏幕变量为PARMVAL。在骨架中

穆克什·潘迪 · 发表：2009年11月5日，星期四7:07 pm

外籍人士 .........我需要在rexx屏幕上的终端中输入值，并且该值应在作业中的符号变量中接受...这是我的要求.....

谢谢，

罗伯特·桑普

穆克什·潘迪

在工作中我们可以给像

值 =来自rexx输入的值

var =&val

但是总体情况并非如此，从rexx终端输入的值将如何在val中捕获。

穆克什·潘迪

罗伯特……你是正确的..那我将如何达到我的要求呢？

罗伯特·桑普

如果您希望更改已经执行的作业的JCL，您的解决方案是找给您要求的人，告诉他们无法完成。

否则，您将不得不想出一种更改JCL的方法之前提交作业是因为提交后，JCL不会更改。

外籍人士

我以前的答复没有给您任何线索吗？

使用REXX和ISPF的乐趣在于它们可以很好地交互。

好的，在定义ISPF面板时，将为字段指定名称。该名称完全不做任何事情，然后在调用REXX或上帝禁止的CLIST中有效，并且包含在终端上输入的内容。

现在，当我们从同一REXX调用ISPF文件定制服务时-猜猜是什么，相同的变量名仍然包含在终端输入的内容。

因此，请回到我之前的答复并查看示例，看看是否可以根据这个回复。

穆克什·潘迪

罗伯特，我不是要更改已经执行的jcl。只需从rexx终端传递值，然后执行作业即可。

罗伯特·桑普 · 发表：2009年11月5日，星期四7:31 pm

外籍人士在解释您需要做什么方面做得很好。

穆克什·潘迪

在工作中对以下代码进行编码会产生错误。

// STEPNAME EXEC PGM = program，PARM ='&PARMVAL'

外籍人士 · 发表：2009年11月5日，星期四7:55 pm

您是否使用ISPF文件定制服务来生成JCL

穆克什·潘迪 · 发表：2009年11月5日，星期四8:34 pm

解释我的代码如下

EXEC PGM = SARBCH，
PARM ='K9490P0.SAR41，&TEST'

现在如何给您提到的其他参数

// STEPNAME EXEC PGM = program，PARM ='&PARMVAL'

在编码多个参数方面需要帮助。
谢谢，

外籍人士 · 发表：2009年11月5日，星期四8:58 pm

嗯，我建议您使用ISPF文件定制服务，并举例说明FTS输入和输出。

我花了更多时间来简要说明ISPF和REXX之间的交互作用，并举例说明再次使用FTS。

您不要使用我给出的示例使用ISPF文件裁剪应该使用文件剪裁，然后您告诉我这是行不通的。当然，如果您不按照建议进行操作，它将无法正常工作。

在CLIST / REXX论坛的顶部是一个即时贴，它将为您提供REXX和ISPF处理所需的几乎所有手册。我强烈建议您花一些时间并熟悉这些手册及其内容，了解有关文件定制的知识，然后再尝试。这不是火箭科学。这不是脑外科手术。它是IBM开发的简单明了，直接的服务调用和使用，使您的生活更轻松。

是的，使用这些服务还有其他选择，包括就地构建JCL，编辑基本成员以符合您的要求，但对我而言，ISPF文件定制是最简单的方法。

穆克什·潘迪 · 发表：2009年11月5日，星期四9:06 pm

谢谢，我一定会仔细阅读手册。请纠正我，如果我在下面的错误编码中将两个parm值合并到一个parm中。

// SAREXTR EXEC PGM = SARBCH，
// PARM ='K9490P0.SAR41，&TEST'
// SYSUDUMP DD SYSOUT = *
// SYSPRINT DD SYSOUT = *
// REPORT DD DSN =&&TEMP,
// DISP =（NEW，CATLG，DELETE），SPACE =（TRK，（20,10），RLSE），
// LRECL = 133，RECFM = FBA，BLKSIZE = 27930
// SYSIN DD *
/ LIST ID =&&TEST*,GEN=0
/ *

其中test是rexx中使用的参数

穆克什·潘迪

外籍人士，我声明parm的方式无效。报告为空。

// PARM ='K9490P0.SAR41，&TEST'

请帮助我如何更正代码

提前致谢，

外籍人士

让我们在ISPSLIB中将此成员称为TEST99

穆克什·潘迪

外籍人士..，谢谢您向我们探索强大的技术思想。

请在rexx中查看下面的代码，如果我在某处出错，请告诉我。

/ * REXX * /
/ *通过REXX提交工作* /
说'输入限定符（EG：F3698）：'
拉力测试
“ ISPEXEC FTOPEN”
“ ISPEXEC FTINCL测试99”
"ISPEXEC 收盘价"
地址TSO“提交'” Z1225AN.EM“（” SAREX“）'”

职位：

// SAREXTR EXEC PGM = SARBCH，
// PARM ='K9490P0.SAR41，&TEST'
// SYSUDUMP DD SYSOUT = *
// SYSPRINT DD SYSOUT = *
// REPORT DD DSN =&&&&TEMP,
// DISP =（NEW，CATLG，DELETE），SPACE =（TRK，（20,10），RLSE），
// LRECL = 133，RECFM = FBA
// SYSIN DD *
/ LIST ID =&&TEST*,GEN=0
/ *

提前致谢。

恩里科·索里切蒂 · 发表：2009年11月6日，星期五12:45 pm

这是正确的做法...
经过测试

外籍人士

只是为了阐明为什么使用FTOPEN而不是FTOPEN TEMP的原因是我将为文件定制输出分配ISPFILE DD。

无论哪种方法都有效，这只是选择问题。

我确实建议您和任何其他不熟悉使用REXX / ISPF的产品的人，在尝试编写自己的应用程序之前，请仔细阅读本文档。