|
查看上一个主题 :: 查看下一个主题
|
| 作者 |
信息 |
khadar78
警告：1
新的用户
已加入：2008年4月29日
帖子：16
地点：迈索尔
|
|
|
|
大家好，
我已经使用IEBPTPCH实用程序将成员从PDS复制到PS。
成功复制。
这是使用的步骤。
// STEP1 EXEC PGM = IEBPTPCH
// SYSUT1 DD DSN = abcd.pds，DISP = SHR
// SYSUT2 DD DSN = Abcd.ps，
disp =（，catlg，delete），
空格=(130,(10,20),rlse),avgrec=k,
recfm = fb，lrecl = 130
// SYSIN DD *
PUNCH TYPORG = PO
//
但是问题是PDS中的成员为150字节，并且复制到PS时，它仅复制记录直到130字节，然后跳到下一行以复制其他字段。
我尝试使用更长的记录长度..说lrecl = 200，但是它会出现无效的DCB参数和SYSIN参数问题。
谁能帮我这个？？解释一下我PUNCH TYPORG = PO会做什么吗？我需要看的东西吗？ |
|
| 回到顶部 |
|
 |
外籍人士
全球主持人
已加入：2007年3月14日
帖子：8794
地点：威尔士威尔士
|
|
|
|
khadar78
IEBPTPCH是 不 CA产品。
每页顶部都有一个标记为“ IBM手册”的按钮。请单击此按钮并查看实用程序手册，以阅读有关IEBPTPCH的所有限制。 |
|
| 回到顶部 |
|
|
罗伯特·桑普
全球主持人
已加入：2008年6月6日
帖子：8569
地点：美国爱荷华州迪比克
|
|
|
|
请单击页面顶部的手册链接，找到JCL 语言参考 手册，并仔细阅读它，直到您完全了解该语句（特别是SPACE和LRECL参数）的作用：
| 码： |
// SYSUT2 DD DSN = Abcd.ps，
显示=(,catlg,delete),
空格=(130,(10,20),rlse),avgrec=k,
recfm = fb，lrecl = 130 |
由于此JCL与您的陈述相冲突
IEBPTPCH正在精确地执行您要求的操作。如果您对工具的了解不足，请不要怪它。 |
|
| 回到顶部 |
|
|
超级
全球主持人
已加入：2004年4月26日
帖子：4650
地点：美国北卡罗来纳州罗利
|
|
|
|
| 引用： |
每次使用IEBPTPCH时都需要SYSUT2 DD语句。记录格式始终为FBA或FBM。 LRECL参数（如果未指定逻辑记录长度，则为BLKSIZE参数）指定每条印刷线或每张打孔卡要写入的字符数（此计数必须包括控制字符）。 指定的字符数必须在2到145的范围内。已编辑的输出行的默认值是每打印行121个字符，每张打孔卡81个字符。
可以通过同时指定LRECL和BLKSIZE参数来阻止SYSUT2数据集，在这种情况下，块大小必须是逻辑记录长度的倍数。
如果输入记录的逻辑记录长度足以使输出超过输出记录长度，则在标准打印输出，标准打孔输出或指定了PREFORM参数的情况下，IEBPTPCH会将记录分为多行或多张卡片。对于非标准输出，或者如果未指定PREFORM参数，则仅打印或打孔一部分输入记录（最大值取决于输出设备的特定特性）。
|
|
|
| 回到顶部 |
|
|
|
|
