所以我学习 RPG IV 只是因为我想……而且我很难找到真正有意义的代码示例。现在我在书中的一个练习中,我不知道如何完成.. 任何人都可以看看并给我一些关于如何做到这一点的步骤或建议吗?
这是书中的练习:
下一个是需要在练习中使用的外部描述文件:
有人能帮忙吗?
所以我学习 RPG IV 只是因为我想……而且我很难找到真正有意义的代码示例。现在我在书中的一个练习中,我不知道如何完成.. 任何人都可以看看并给我一些关于如何做到这一点的步骤或建议吗?
这是书中的练习:
下一个是需要在练习中使用的外部描述文件:
有人能帮忙吗?
读了这本书。我知道这些书很难理解,而且永远不会包含足够的示例。
首先检查 WUEXAMP 之前的数据并查看其中的数据。这知道您是否必须操作任何数据并检查数据的验证。例如,您需要包含 999 和负值的等级。
在你知道你正在处理什么样的数据之后,创建伪代码。这将有助于避免将来出现逻辑错误。另外,这是一个很好的习惯。
幸运的是,这是一份非常简单的报告。声明所有变量。在您的基本逻辑中,这应该在循环中而不是
WRITE HEADINGS; //Excepts Defualt Headings
READ LAB05LF; //Read File
DOW NOT %EOF(WUEXAMP); // Begin Loop While not end of File of WUEXAMP
If *in10 = *on; // Over Flow Indicator = True
Write Headings; // Write Headings On Next Page
Eval *in10 = *off; // Overflow Indicator turned off
Endif;
EVAL AVGGRADE = (Exam1 + Exam2 + Exam3 + Exam4 + Exam5 ) /5;
EVAL CLASSTOT += AVGGRADE;
EVAL Count += 1;
Write Details; // Write record to output
READ WUEXAMP; //Read next Record
ENDDO;
循环后:
EVAL CLASSAVG = (CLASSTOT) / Count; // Calculate Class Average
Write GrandDTL; // GrandDTL a the record name with ClassAVG
确保拥有其余的基础知识。相应地命名事物。而不是 Write 它应该是除非您的记录在 O(output ) 规范中进行了内部描述
常见错误:
/FREE
和
/FREE-END
'/' 应该放在第 7 列。免费中的任何代码都不应位于第 8 列之前。
查看第 2 章以获取该书的完整程序示例。(Jim Buck 在 RPG IV 中编程) RPG 程序的例子并不多。
未来有用的链接。 http://www.jaymoseley.com/hercules/rpgtutor/rpg002.htm#FileDescription http://www.jaymoseley.com/hercules/rpgtutor/rpg011.htm
祝你好运,总是评论和记录你的代码。