IBM大型机论坛索引
 
登录
 
IBM大型机论坛索引 大型机:搜索 IBM Mainframe论坛:常见问题解答 寄存器
 

可变记录长度(在JCL中)


IBM大型机论坛 -> JCL& VSAM
发表新话题   回复主题
查看上一个主题 :: 查看下一个主题  
作者 信息
阿南德78

新的用户


已加入:2006年3月6日
帖子:50
地点:PUNE

发布发表:2006年6月20日,星期二,上午11:36
引用回复

大家好,

谁能告诉我如何为可变记录长度指定DCB参数?

输入文件为VB
输出文件将使用FB recfm创建。

如果有人发送有关此主题的更多信息,我将更加感激。

请回答。

问候
阿南德
回到顶部
查看用户资料 发送私信
Prasanthhere

活跃用户


已加入:2005年8月3日
帖子:306

发布发表:2006年6月20日,星期二2:09 pm
引用回复

对于可变的记录长度,DCB参数可以是

RECFM = V
LRECL是逻辑记录长度
BLKSIZE等于LRECL加4。
回到顶部
查看用户资料 发送私信
shekhar1s

新的用户


已加入:2006年4月13日
帖子:14
地点:美国

发布发表:2006年6月20日,星期二,2:44 pm
引用回复

DCB用于可变长度记录。
DCB =(DSORG = PS,LRECL = 80,RECFM = VB,BLKSIZE = 800)
块大小应为记录长度的倍数。据我所知..当我们将记录格式声明为VB(可变长度)时,它会自动占用四个字节。

And About output file... u can create it in the JCLitself or using 3.2 option..

如果我错了,请告诉我。
谢谢
舍哈尔
回到顶部
查看用户资料 发送私信
鲁佩什·科塔里

本月会员


已加入:2005年4月27日
帖子:463

发布发表:2006年6月20日,星期二,7:11 pm
引用回复

嗨,阿南德,

引用:
大家好,

谁能告诉我如何为可变记录长度指定DCB参数?

输入文件为VB
输出文件将使用FB recfm创建。

如果有人发送有关此主题的更多信息,我将更加感激。

请回答。

问候
阿南德


As per your query, ur Input is VB then u can mention in JCLas SHR and no need to mention DCB parameter.

希望这可以帮助

问候
鲁皮什
回到顶部
查看用户资料 发送私信
胡斯纳

新的用户


已加入:2006年6月2日
帖子:49

发布发表:2006年6月21日星期三上午10:06
引用回复

你好

当我们将记录格式声明为VB(可变长度)时,请您告诉我四个字节的信息。它将在前四个字节的开头或后四个字节的结尾存储变量长度。
回到顶部
查看用户资料 发送私信
古普泰

主持人


已加入:2005年10月14日
帖子:1206
地点:印度班加罗尔

发布发表:2006年6月21日,星期三,12:02 pm
引用回复

它将长度存储在前4个字节中
回到顶部
查看用户资料 发送私信
sathish_seabiscuit

新的用户


已加入:2006年6月14日
帖子:4

发布发表:2006年6月21日,星期三,下午5:52
引用回复

我们可以使用ICEGENER实用程序。

在代码中
RIS&ENV..P370.UNLOAD.RECIPTSI.BSAM-可变长度文件
RIS&ENV..P370.RECIPTSI.BSAM-固定长度的文件
最后给出了RISL3701。

// ICEGEN01 EXEC PGM = ICEGENER,COND =(04,LT)
// *
// SYSUT1 DD
DSN = RIS&ENV..P370.UNLOAD.RECIPTSI.BSAM,
// DISP = SHR
// SYSUT2 DD DSN = RIS&ENV..P370.RECIPTSI.BSAM,
// DISP =(NEW,CATLG,DELETE),
// DCB =(RECFM = FB,LRECL = 173),
// SPACE =(173,&SPMED。,RLSE),
// UNIT =&UNITWRK
// SYSIN DD DSN =&QUAL..PARMLIB(RISL3701),
// DISP = SHR
// SORTMSG DD SYSOUT = *
// SYSOUT DD SYSOUT = *
// SYSPRINT DD SYSOUT = *
// SYSUDUMP DD SYSOUT = Z
// *

Parm RISL3701,

产生MAXFLDS = 1
记录字段=(173,1)
回到顶部
查看用户资料 发送私信
弗兰克·雅格

DFSORT开发人员


已加入:2005年2月15日
帖子:7129
地点:加利福尼亚州圣何塞

发布发表:2006年6月21日,星期三,晚上8:32
引用回复

引用:
当我们将记录格式声明为VB(可变长度)时,请您告诉我四个字节的信息。它将在前四个字节的开头或后四个字节的结尾存储变量长度。


每个VB记录的前四个字节是记录描述符字(RDW)。 RDW的前两个字节包含记录长度(通常为二进制),然后是两个字节的二进制零。例如,一个80字节的VB记录的RDW为X'00500000'。
回到顶部
查看用户资料 发送私信
巴拉尼达兰

新的用户


加入:2005年6月20日
帖子:86
地点:印度金奈

发布发表:2006年6月22日,星期四,12:33 pm
引用回复

坦率,
这个一直困扰着我-2字节的二进制零分别用于什么?一直有人告诉我“这是出于IBM的目的”!你能解释一下吗?
回到顶部
查看用户资料 发送私信
弗兰克·雅格

DFSORT开发人员


已加入:2005年2月15日
帖子:7129
地点:加利福尼亚州圣何塞

发布发表:2006年6月22日,星期四,8:46 pm
引用回复

对于VB文件,这两个字节什么都不用。但是对于跨度可变的(VBS,VS)文件,前四个字节是SDW(段描述符字)而不是RDW。在SDW中,前两个字节是二进制长度,但第三个字节包含段控制代码(第一,中间,最后)。有关SDW的更多信息,请参见:

publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/dgt2d440/3.1.3.2.2?SHELF=EZ2ZO10G&DT=20050602124524&CASE=
回到顶部
查看用户资料 发送私信
478

新的用户


已加入:2006年1月3日
帖子:13
地点:印度班加罗尔

发布发表:2006年6月23日,星期五,上午4:43
引用回复

你好

DCB如下所示:

// M57Tst DD DSN = input.data.set,
// DISP =(NEW,CATLG,DELETE),
// UNIT = TSODA,DATACLAS = STANDARD,
// DCB =(RECFM = VB,LRECL = 704,BLKSIZE = 0),
// EXPDT = 2007/350

您可以更改LRECL和EXPDT字段。

希望这会有所帮助。

-浦那
回到顶部
查看用户资料 发送私信
cjcpr

新的用户


已加入:2006年3月21日
帖子:21
地点:美国

发布发表:2006年7月7日,星期五10:56 pm
引用回复

简单的解决方案是使用带有CONVERT参数的OUTREC字段。
回到顶部
查看用户资料 发送私信
弗兰克·雅格

DFSORT开发人员


已加入:2005年2月15日
帖子:7129
地点:加利福尼亚州圣何塞

发布发表:2006年7月7日,星期五11:32 pm
引用回复

有关将VB转换为FB的信息,请参见以下Smart DFSORT技巧:

www.ibm.com/servers/storage/support/software/sort/mvs/tricks/srtmst01.html#t11

有关将FB转换为VB的信息,请参见以下Smart DFSORT技巧:

www.ibm.com/servers/storage/support/software/sort/mvs/tricks/srtmst03.html#t09
回到顶部
查看用户资料 发送私信
查看上一个主题 :: :: 查看下一个主题  
发表新话题   回复主题 查看书签
所有时间均为格林尼治标准时间+ 6小时
论坛索引 -> JCL& VSAM

 


类似主题
话题 论坛 回覆
没有新帖 将匹配的记录写入输出文件 DFSORT / ICETOOL 6
没有新帖 比较文件记录计数百分比... DFSORT / ICETOOL 4
没有新帖 RECFM = U磁带文件的记录数 DFSORT / ICETOOL 17
没有新帖 检查内部总计数... JCL& VSAM 5
没有新帖 文件状态-可变长度39 COBOL程式设计 2
搜索我们的论坛:

回到顶部