问题标签 [3270]

For questions regarding programming in ECMAScript (JavaScript/JS) and its various dialects/implementations (excluding ActionScript). Note JavaScript is NOT the same as Java! Please include all relevant tags on your question; e.g., [node.js], [jquery], [json], [reactjs], [angular], [ember.js], [vue.js], [typescript], [svelte], etc.

0 投票
2 回答
199 浏览

cobol - 当前显示的是哪张地图?

我刚刚进入大型机开发,所以请原谅任何无知,但是有没有办法确定正在显示或最后发送到终端的地图?

例如,我在 mapset 中有MAP1& 。地图将通过按 PF 键交替。在每张地图上,用户可以输入一个由程序评估的值。是否有适当的方法来确定从用户接收时应该评估哪个地图?MAP2MAPS(PF7/PF8)(SLCTOPTI)

这是我目前必须尝试的:

我不确定这是否有效,但我想知道是否已经有一个命令或更好的方法来做到这一点。

0 投票
1 回答
2949 浏览

excel - VB脚本按行循环Excel数据

我正在编写一个 VB 脚本,该脚本从 Excel 中获取数据并将其输入到 IBM 3270 大型机内的屏幕中。使用下面的代码,我可以打开 excel 工作簿并按单元格复制数据,然后使用我定义的 subEnterData 和 subMovecursor 过程将所选单元格中的值输入到 3270 屏幕中。它工作得很好。但正如您从下面的代码中看到的那样,我只从位于 excel 对象第 2 行的单元格中获取数据(第 1 行是标题)。我需要从每行中的每个单元格中获取数据,然后移动到下一行。所以,在第 2 行完成后,我需要移动到第 3 行,转到第 3 行中的每个单元格,从每个单元格中复制数据并将其粘贴到 3270 的屏幕上,然后与第 4 行相同,依此类推。它们大约有 50 行,但可能或多或少。

下面是代码的主体:

您可以在 subStringExcelData 中看到,我正在调用对象并获取值:

然后我使用 subDoWork,在 3270 屏幕上找到正确的位置并将值粘贴到正确的位置。它工作得很好,但我需要能够用很多行来做到这一点,而且我这样做的方式是,我目前一次只能得到一行。请帮忙!

Sub subDelpScreen 持有运行 subDoWork 的触发器。

0 投票
1 回答
825 浏览

excel - 将数据逐行写入 Excel

我目前正在运行一个脚本,该脚本逐行循环通过 Excel 电子表格,从 excel 读取数据并更新 3270 模拟器中的屏幕。使用以下过程完成循环:

我可以使用程序将循环读取的数据粘贴到 3270 屏幕中subDoWork。我在 Excel 电子表格上使用 A 到 L 列,并且subDoWork能够逐行向下移动电子表格并将 Excel 中的数据复制并粘贴到 3270 屏幕上。下面是我用来将数据从 Excel 电子表格的 B 列输入到 3270 屏幕的示例:

然后在粘贴数据后,我使用funcReadScreen3270 读取屏幕并生成一个弹出窗口,其中包含我从 Excel 的给定行收到的结果。

我要做的是使用该函数funcReadScreen将该结果写入 Excel 中的 M 列。我目前正在读取 A - L 列,并希望根据给定行中的数据将我从 funcReadScreen 收到的结果输入到 Excel 中的 M 列。

意思是,该错误应粘贴到该行的 M 列,然后转到下一行,如果通过 给出不同的结果/错误funcReadScreen,则将该结果/错误粘贴到该行的 M 列并移至下一行行直到完成。因此,如果我通过读取屏幕功能收到错误“无效号码”,我想将该结果写入该行的 M 列。

我目前正在使用以下子来尝试此操作,但它不起作用:

有人可以帮忙吗?

编辑: 似乎不起作用的是我无法“获取”它看起来的 Excel 对象。我收到错误

对象不支持此属性或方法:objExcel.ActiveWorkbook

但是,我需要它不仅将值粘贴到objExcelSht.Cells(2,13).Value(或第 2 行,M 列)中,而且随后根据我的If声明与funcReadScreen标识内容一起移动循环并始终粘贴到 M 列。

0 投票
1 回答
107 浏览

xml - 从日期输入面板格式化日期

我有一个用户界面,可以通过输入面板输入日期。我正在构建面板,如下所示。它是一个 DATEPANEL,因此它会自动添加输入掩码(正斜杠,例如 mm/dd/yyyy):

然后,我从面板中获取文本并全局定义字符串,如下所示:

接下来,我尝试将该日期以 MMDDYY 格式输入到 3270 仿真器屏幕上。日期面板的格式是 MM/DD/YYYY,我正在尝试将其格式化为 MMDDYY 格式以适应屏幕。以下是我尝试在屏幕上输入它的方式:

我正在使用 funcFormatDate 将面板中的日期从 MM/DD/YYYY 格式格式化为 MMDDYY 格式。下面是funcFormatDate:

但是,我得到的结果是“0000 //”。当我输入“08/13/2018”时,我总是得到结果“0000//”,就好像该函数正在运行一样,但我没有从面板“获取”文本。我无法从面板获取实际文本以在屏幕上写入“081318”,每次它给我“0000//”。

有人可以帮忙吗?

0 投票
1 回答
928 浏览

python-3.x - 通过通过 Host on Demand 打开的 Python 访问 3270 会话

我正在尝试通过 python 访问 3270 会话。该会话可通过主机按需访问,因此没有可供我访问的配置文件。

我尝试了类似这样的方法进入服务器位置,但它不起作用

是我得到的错误。

任何如何访问它的建议都会非常有帮助。

问候,任。

0 投票
2 回答
265 浏览

c - C 语言中 Mainframe TN3270(代码页 1047,1147,500,249)上的字符串/正则表达式字符 '[', ']', '{', '}' 替换为空格

我用 C 语言创建了一个函数,用于使用正则表达式在某些条件下识别整数。正则表达式在 UNIX 和其他平台上运行良好,但是当我在大型机 TN3270 上使用相同的代码时,字符串/正则表达式中的字符,如 '['、']'、'{'、'}' 被替换为编译期间的空格。我尝试在所有这些字符之前使用 '\' 和 regcomp 期间的 REG_EXTENDED,但结果没有变化。

对我来说 printf 返回:

并且 regexec 对于 pc_buffer 值(如(+120 或 -3.1415))也失败了。

注意:代码编译没有问题,这里我只是写了一段我的代码。这里缺少声明和所有内容,这不是问题。

任何人请建议。

0 投票
2 回答
200 浏览

emulation - 可以使用 Fiddler 来监控 PCOMM 会话或任何 3270 Emulator 会话吗?

可以使用Fiddler来监控大型机PCOMM会话吗?或者与任何3270 仿真器软件的大型机会话?如果是这样,怎么做?我查看了 Fiddler 文档,并进行了搜索,但没有提及。

最终目标是使用 Java 代码连接到大型机。我已经提供了一个 PCOMM 自动化解决方案,它可以登录、进入 CICS、执行事务、屏幕抓取屏幕并将屏幕数据放入文件。现在客户希望我在没有 PCOMM 的情况下做同样的事情。用户想要使用 Java 解决方案。我有连接到大型机的 Java 程序。但是为了“登录”到主机,并没有返回初始菜单屏幕。我看到一系列 3270 代码,例如 255 (IAC) 253 (DO) 40 (?),我回复 255, 253 (Will do) 40 (?) EOR。大型机返回 255、250 (Subnegotiate) 40 (?) 等等。我以不同的方式尝试了这样的代码,但到目前为止还没有运气。见http://www.faqs.org/rfcs/rfc1576.html有关协商会话 3270 的代码的更多信息。这是一个非常古老的文档,可能已经更新了。还有http://www.faqs.org/rfcs/rfc854.html

我的想法是监视 PCOMM 会话,发现正确的会话来协商与 3270 会话的连接。毕竟,PCOMM 正在努力使该会议发生。

谢谢,巴鲁克·阿塔

0 投票
1 回答
774 浏览

zos - 如何将计算机中的代码复制到 x3270 模拟器中?

我在 Ubuntu 16.04 上使用 x3270。zOS 没有一个好的编辑器,必须编写大量代码并修复它是一件痛苦的事情。

我想在我的电脑上编写代码并将其复制到 x3270 窗口中。

有没有办法做到这一点?

0 投票
2 回答
269 浏览

vbscript - autECLFieldList.count 返回 1 而不是屏幕上的字段数

AutEclFieldList.Count 返回 1 而不是屏幕上的字段数。这发生在同事会议上。在我自己的会话中,我收到了数字 122,这在标签和数据字段的总数上似乎是正确的。

我们都有版本 12.0 和 20170427 S - 12.0.2.0 我已经像他一样将我的 HostCodePage 设置为“500 Belgium MNCS”,但它仍然可以在我的电脑上运行。

我正在比较 2 个会话的大型机设置,但找不到有影响的东西。

0 投票
2 回答
526 浏览

mainframe - OS X 上 Host On-Demand 的 PF 键

我在我的 Mac 上运行 IBM Host On-Demand。除了通过单击应用程序中的虚拟键盘外,我还没有找到输入 PF 键的方法。其他 3270 仿真器(例如 Brown University tn3270)允许使用命令+数字键来实现 PF 键功能。Host On-Demand 上是否有类似的方法?必须使用鼠标来操作功能键真的很慢。