COBOL:SYSIN JCL用于从PDS编译源代码

我刚开始COBOL，在JCL遇到了这个。。。我如何从我的PDS编译一个基本的cobol程序，我知道通过instream它将是

//SYSIN DD* 代码 /*

我试过类似的东西

//SYSIN DD DSN=the.pds.location（文件），DISP=SHR

但所有的回击都是垃圾，我想返回码是12

---

如果有人能帮忙，我将不胜感激。

根据您发布的信息，您的JCL 应该有用。也许你错过了别的东西。 下面的JCL提供了完整的作业步骤 COBOL编译：

... 你的工作卡在这里。。。
//COB EXEC PGM=IGYCRCTL
//STEPLIB DD DISP=SHR，DSN=SYSP.IGY.V3R4M1.SIGYCOMP
//SYSUT1 DD单元=SYSDA，空间=（气缸，（1,1））
//SYSUT2 DD单元=SYSDA，空间=（气缸，（1,1））
//SYSUT3 DD单元=SYSDA，空间=（气缸，（1,1））
//SYSUT4 DD单元=SYSDA，空间=（气缸，（1,1））
//SYSUT5 DD单元=SYSDA，空间=（气缸，（1,1））
//SYSUT6 DD单元=SYSDA，空间=（气缸，（1,1））
//SYSUT7 DD单元=SYSDA，空间=（气缸，（1,1））
//SYSLIN DD DSN=objectmodule，UNIT=SYSDA，
//DISP=（MOD，PASS），SPACE=（TRK，（3,3））
//SYSIN DD DSN=the.pds.location（文件），DISP=SHR

//SYSPRINT DD SYSOUT=*
... 您的链接步骤正在使用上面SYSLIN中的对象。。。

注意：您可能需要更改STEPLIB以匹配 在您的站点上运行的COBOL版本

如果您的JCL看起来与上述内容非常接近，那么接下来 签出是您的COBOL程序。进入ISPF编辑器（我想是吧 您可以访问它）并在命令行上键入PROFILE。你 应该看到类似的内容：

=PROF>…发电机（固定-80）…恢复关闭警告…关闭编号。。。。。。。。。。。。。。。。。
=PROF>…大写打开…十六进制关闭…空值打开标准…制表符关闭。。。。。。。。。。。。。。。。。。。。。。
=PROF>…自动保存打开…自动编号关闭…自动列表关闭…状态打开。。。。。。。。。。。。。。
=PROF>…配置文件解锁…IMACRO无…打包…注意。。。。。。。。。。。。。。。。
=PROF>…HILITE脱离光标查找。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。
=BNDS>
----1---+----2---+----3---+----4---+----5---+----6---+----7--

现在查看打开打包（注意上面显示的是关闭打包）。如果你发现 收拾行李这是你的问题。您需要发出打包命令 并保存数据集。请重试编译

顺便说一句。。。您可以通过在命令上键入RESET来取消配置文件显示 线路

如果这些都不能解决您的问题，您需要提供更多信息 至于问题的确切性质是什么

... your job card goes here... //COB EXEC PGM=IGYCRCTL //STEPLIB DD DISP=SHR,DSN=SYSP.IGY.V3R4M1.SIGYCOMP //SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT2 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT4 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT5 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT6 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT7 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSLIN DD DSN=objectmodule,UNIT=SYSDA, // DISP=(MOD,PASS),SPACE=(TRK,(3,3)) //SYSIN DD DSN=the.pds.location(file),DISP=SHR
//SYSPRINT DD SYSOUT=* ... your link step using object from SYSLIN above... =PROF> ....GEN (FIXED - 80)....RECOVERY OFF WARN....NUMBER OFF................. =PROF> ....CAPS ON....HEX OFF....NULLS ON STD....TABS OFF...................... =PROF> ....AUTOSAVE ON....AUTONUM OFF....AUTOLIST OFF....STATS ON.............. =PROF> ....PROFILE UNLOCK....IMACRO NONE....PACK OFF....NOTE ON................ =PROF> ....HILITE OFF CURSOR FIND.............................................. =BNDS> <
=COLS> ----+----1----+----2----+----3----+----4----+----5----+----6----+----7--