F10函数不将控制返回给程序
F10函数不将控制返回给程序
提问于 2017-04-25 09:09:50
我有一个显示文件，在这里我添加了另外两个字段，这些字段是在按f10折叠/下拉时出现的。当用户折叠记录时，页脚显示应更改为f10=。当显示展开时，显示应更改为f10 =折叠。
A***************************************************************
A* LIST OF LOADS WITH BOL SUBFILE CONTROL
A***************************************************************
A R RLG610C1 SFLCTL(RLG610S1)
A SFLSIZ(0011)
TPA01A SFLPAG(0005)
A OVERLAY
A N71 SFLDSP
A N71 SFLDSPCTL
A 71 SFLCLR
A 91 SFLEND(*MORE)
TPA01A N45 SFLDROP(CF10)
TPA01A 45 SFLFOLD(CF10)
TPA01A SFLMODE(&MODE)
A RRN 4S 0H SFLRCDNBR 页脚字段设置如下：
TPA01A 45 23 25'F10=Fold'
TPA01A COLOR(BLU)
TPA01A N45 23 25'F10=Unfold'
TPA01A COLOR(BLU) 问题是，当用户按下f10时，显示将按预期变化。但页脚要更改，则需要回车命中。
下面的代码控制基于* on 45指示器字段值的折叠/展开选项的显示。但是只有当你点击enter时，程序的控制才会到达这里，我希望这个控件只需按f10就会返回到程序中。
If Mode = '1';
*IN45 = '0';
ElseIf Mode = '0';
*IN45 = '1';
EndIf; 基本上，现在我想知道SFLFOLD和SFLDROP是否返回程序的控制。
拼命求救！
@charles，
我已经试过你提到的查尔斯了。但它不起作用
A R RLG610C1 SFLCTL(RLG610S1)
A CF10(10 'FOLD/UNFOLD')
A SFLSIZ(0011)
TPA01A SFLPAG(0005)
A OVERLAY
A N71 SFLDSP
A N71 SFLDSPCTL
A 71 SFLCLR
A 91 SFLEND(*MORE)
TPA01A N45 SFLDROP(CF10)
TPA01A 45 SFLFOLD(CF10) 在按压F10时，折叠/展开完美地工作。但是这个控件根本不属于程序。我甚至试过把这个放到文件级别上。即使在那里它也不起作用。欢迎您提出任何建议。
回答 1
Stack Overflow用户
回答已采纳
发布于 2017-04-25 14:26:44
5250设备是(相对的)智能设备，而不是哑终端。
SFLFOLD和SFLDROP是在设备上处理的，因此在按下F10时不返回对程序的控制。
只是有页脚包含
F10=Fold/Unfold如果您确实希望将控件返回到您的程序，请将F10配置为子文件控件记录中的常规CF/CA密钥。并在SFLFOLD/SFLDROP关键字中使用虚拟Fxx键.
A CF10(10 'FOLD/UNFOLD')
TPA01A N45 SFLDROP(CF24)
TPA01A 45 SFLFOLD(CF24) 因此，该控件将返回到您的程序。您必须检查是否按下了F10，而不是检查模式，因为系统没有启动交换机。
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/43606287
复制相关文章
相似问题
腾讯云开发者
