我目前正在参加AS400(IBM I)的大学课程,直到第11章处理RDP 8.0我一直很好。无论哪种方式,我都设法完成任务,直到我需要在“INTROCLASS”库下复制一个名为“EMPPFLP”的先前制作的物理文件。
我将文件复制到“QDDSSRC”源下的个人库中,然后右键单击它(EMPPFLP)并选择Compile然后CRTPRTF,我得到了这个。
Job 942098 / DDELAP01 / QDFTJOBD提交到库中的作业队列QBATCH QGPL。
CRTPRTF SRCFILE(DDELAP01 / QDDSSRC)SRCMBR(EMPPFLP)更换(*是) 选项(* EVENTF)文件(DDELAP01 / EMPPFLP)DDS中的错误不允许与 指定的GENLVL。原因。 。 。 。 。 :要么严重性级别 DDS中发现的错误大于或等于错误生成 指定了级别(GENLVL参数)或GENLVL(0)。恢复。 。 。 :有关GENLVL值和错误,请参阅DDS源列表 消息。更正错误或更改上的GENLVL值 命令,然后再次尝试请求。文件EMPPFLP未创建 图书馆DDELAP01。原因。 。 。 。 。 :该文件未创建,因为 错误。恢复。 。 。 :请参阅先前的错误消息 上市。更正错误,然后再次尝试请求。
我会感谢任何帮助人员,不知道这里发生了什么,我已经为教授发布了问题,但我没有收到回复,我需要在上午12点前提交此作业。
答案 0 :(得分:3)
CPD5248:未找到REF或REFFLD关键字上指定的文件。
包含REFFLD语句中使用的文件EMPPFL
的库不在您的library list中。
将*LIBL
替换为包含该文件的实际库名称,或使用ADDLIBLE
命令(或适用于您的开发环境的其他方法)将其添加到库列表中。
CPD7528:十进制替换位置数无效
这是因为由于先前的错误而无法找到字段定义。
REFFLD
关键字允许您从文件(表格)中提取字段属性,而不是对每个字符串进行硬编码。
该错误表示在库列表中找不到正在引用的文件EMPPFL。库列表类似于Windows / Linux / etc中的PATH。
为了解决错误,您必须帮助系统找到EMPPFL文件。这可以通过显式指向包含文件的库或将文件包含在库列表中的库中来完成。
如果您可以提供以下命令的输出,它将有助于解决问题:
DSPLIBL OUTPUT(*PRINT)
DSPOBJD *LIBL/EMPPFL *FILE OUTPUT(*PRINT)
DSPOBJD *ALLUSR/EMPPFL *FILE OUTPUT(*PRINT)
请注意,第二个命令应返回消息“未找到* LIBL类型* FILE中的对象EMPPFL”。
答案 1 :(得分:0)
我对AS400几乎一无所知,但确实发现了一篇描述图片中显示的错误消息的文章:
<强>消息强> 十进制替换位置数无效。
<强>原因强> EDTWRD或EDTCDE关键字的十进制替换位置数必须等于字段长度。十进制替换位置的数量是空白数量和第一个停止 - 零抑制字符的总和。如果EDTWRD中的第一个字符是停止 - 零抑制字符,则可以指定一个额外的空白。
<强>恢复强> 更改字段长度或EDTWRD或EDTCDE关键字上的值,使字段长度与小数替换位置的数量相同。然后再次尝试请求。
http://www.iseriesworld.net/?messages=cl&prefix=cpd&code=7528
我希望有所帮助。祝你班上好运,欢迎来到Stack Overflow!
答案 2 :(得分:0)
这似乎是一个GENLVL错误。在编译之后,您应该看看SPLF上的哪个产品。那里应该有一些有用的信息