2

我有一个包含 50 行的 db2 表。如何在我创建的 cics 地图中显示这些数据。可能吗?如果是,如何在最多 24 行的屏幕中容纳 50 行数据。谢谢

4

3 回答 3

2

您的屏幕是 24 行 x 80 列。如果您的行包含少于 40 列数据,您可以创建两列显示。我假设您的 CICS 页面有页眉和页脚,所以无论如何您都没有全部 24 行。您必须创建多个 CICS 页面才能显示 50 个 DB2 行。

如果您可以将您的 DB2 信息放在一个 CICS 字段中,您可以这样做:

LINE  DFHMDF POS=(03,01),
             LENGTH=79,
             ATTRB=(ASKIP,NORM,PROT),
             OCCURS=20 

如果您需要多个 CICS 字段,则必须单独列出每一行。CICS 中没有组 OCCURS。

IBM CICS 手册

于 2012-04-24T18:28:07.360 回答
1

您将不得不编写自己的滚动逻辑。这个轮子已经被发明了很多次,大概已经在你自己的商店里做过了。搜索其他类似的交易和地图,并复制。有一个老笑话说只有一个原始 COBOL 程序,而其他所有程序都是从它复制而来的。从已经编写的执行相同操作的内容开始,您的任务会容易得多。

请记住,您将不得不处理向前和向后滚动(传统上是 PF7 和 PF8 键)以及表格的开头和结尾。

于 2012-04-26T22:38:06.273 回答
0

If you just want to dump the fields to a terminal, you can do an "EXEC CICS Send Text" and format the data however you want in a text string with paging supplied.

However, you say you have a map already that is constrained to a Mod-2 terminal with only 24 80 byte lines. If that is the case, your map already exists, how can you ask us how to display it? You already have the map with it's 50 fields. Populate those fields and use an "EXEC CICS Send Map".

Perhaps if you posted the map you have, or the size of the data items you wish to display, you could get a better answer...

于 2012-04-25T04:50:14.393 回答