Progress 4GL将longchar输出到屏幕，方法是将其拆分成块
Progress 4GL是一种编程语言，用于开发企业级应用程序。它具有丰富的功能和工具，可以进行前端开发、后端开发、软件测试、数据库操作等。
在Progress 4GL中，如果要将longchar输出到屏幕，可以通过将其拆分成块来实现。下面是一个示例代码：
DEFINE VARIABLE lcData AS LONGCHAR NO-UNDO.
DEFINE VARIABLE i AS INTEGER NO-UNDO.
DEFINE VARIABLE iChunkSize AS INTEGER NO-UNDO.
DEFINE VARIABLE iNumChunks AS INTEGER NO-UNDO.
/* 假设lcData是要输出的longchar数据 */
ASSIGN lcData = "这是一个很长的字符串，需要拆分成块输出到屏幕。".
ASSIGN iChunkSize = 100. /* 每个块的大小 */
ASSIGN iNumChunks = CEILING(LENGTH(lcData) / iChunkSize). /* 计算块的数量 */
DO i = 1 TO iNumChunks:
DISPLAY SUBSTRING(lcData, (i - 1) * iChunkSize + 1, iChunkSize).
END.上述代码中，我们首先定义了一个longchar变量lcData，然后指定了每个块的大小iChunkSize和块的数量iNumChunks。接下来，通过一个循环，将lcData拆分成块，并使用DISPLAY语句将每个块输出到屏幕上。
这种方法可以确保长字符串被分割成适当大小的块，并逐个输出到屏幕上，以避免一次性输出过多内容导致屏幕显示不完整。
在腾讯云的产品中，可以使用云服务器（CVM）来运行Progress 4GL应用程序，并使用云数据库MySQL（CDB）来存储和管理相关数据。此外，腾讯云还提供了云原生服务、人工智能服务、物联网服务等，可以帮助开发人员构建更强大的应用程序。
更多关于腾讯云产品的信息，请访问腾讯云官方网站：https://cloud.tencent.com/
相关·内容
4回答
使用进度4gl中的帧
progress-4gl、openedge
谁能帮助我理解如何使用Progress 4gl框架显示以下图案：
1
1 2
1 2 3
1 2 3 4
1 2 3 4 5.
我试过这样做：
DEFINE VARIABLE a AS INTEGER NO-UNDO.
DEFINE VARIABLE b AS INTEGER NO-UNDO.
DO
a =1 TO 5 WITH FRAME f:
DO
b = 1 TO a WITH FRAME f:
DISPLAY a SPACE SKIP.
PAUSE.
END.
END.
/*显示答案被覆盖，如何并排显示答案？*
浏览 1提问于2015-07-02得票数 0
2回答
Progress 4GL将longchar输出到屏幕，方法是将其拆分成块
char、output、openedge、progress-4gl
我正在使用进度，并且在数据库中有一个字段作为longchar类型。
我不能输出内容，因为输入/输出函数不允许使用longchar类型。
有没有办法将onto char拆分成块，然后我可以存储为char类型，这样我就可以将onto char的整个内容输出到屏幕上？
谢谢
浏览 11提问于2017-08-04得票数 0
回答已采纳
1回答
无法使用document-fragment Progress 4GL (Open Edge)创建xml节点
progress-4gl、openedge
我正在XML11.1中开发，可以成功地从静态数据创建OpenEdge文档，并通过SOAP连接到第三方API.
我想将现有的XML对象添加到我正在创建的新文档中，根据Progress Help，我应该能够添加一个类型为" document -FRAGMENT“的节点。当我这样做时，我的父节点是空的，并且我没有得到任何错误消息。
有没有什么特别的方法可以将对象分配给新的Node？我正在尝试一些静态数据(一个有效的XML字符串)，甚至考虑过对字符串进行编码，以防它无法处理这种格式。
之前有没有人做到了这一点，我做错了什么？
DEFINE VARIABLE hDoc AS HAN
浏览 1提问于2014-05-01得票数 2
3回答
如何在进程openedge 4gl中找到以分隔符分隔的字符串的索引？
string、indexing、progress-4gl、openedge
我想在"STS++5623+56+ 123“中找到56的索引。我写的代码给了我6(共5623个)，但我需要11个。
DEFINE var v-segment as longchar no-undo.
DEFINE VARIABLE v-element AS CHARACTER NO-UNDO.
ASSIGN v-segment = "STS++5623+56".
ASSIGN v-element = "56".
define variable v-index as integer no-undo.
v-index = index(v-segme
浏览 1提问于2016-03-25得票数 0
3回答
能否提供进度完成的估计小时或分钟？-进度4GL
openedge、progress-4gl
我正在使用以下查询的进度完成，这显示了有多少百分比是完成记录更新过程。我的问题或怀疑，这里是否可以提供估计小时/分钟，为这一进展完成？
例如，假设一个表有1000条记录，并且每个记录在更新之前进入某些验证，并且大约时间小于1秒钟(毫秒)。那么，如果一条记录在获得验证后更新不到一毫秒，那么1000条记录的估计值是多少呢？如何计算和转换成hh:mm:ss？请帮助编写示例查询。
DEFINE VARIABLE I AS INTEGER NO-UNDO.
DEFINE VARIABLE iPercentage AS INTEGER NO-UNDO.
DEFINE VARIABLE iComp
浏览 8提问于2022-05-06得票数 0
回答已采纳
1回答
如何发送进程中的SOAP头4GL
xml、soap、openedge、progress-4gl
你好，进步4GL开发人员，
我想在ABL会话中使用UPS跟踪API。
我已经为UPS运行了WSDLAnalyser，并遵循了文档。
下面是我希望发送的XML请求的一个示例(包括头)：
<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:v1="http://www.ups.com/XMLSchema/XOLTWS/UPSS/v1.0" xmlns:v2="http://www.ups.com/XMLSchema/XOLTWS/Track/
浏览 2提问于2020-06-02得票数 2
回答已采纳
2回答
如何在4gl中使用变量“group by”
openedge、progress-4gl
在4gl查询中，有没有办法根据表中的字段对记录进行分组？ 我的代码。 define variable v-invoice as inte no-undo.
define variable v-sell-price as decimal no-undo.
define variable v-cost-price as decimal no-undo.
define variable iinv as integer no-undo.
For each Order no-lock :
v-invoice = Order.tblinvoice.
浏览 39提问于2019-02-01得票数 0
回答已采纳
1回答
进度4GL -如果条件支持维度数组吗？
openedge、progress-4gl
我是新来的进步4GL语言。我编写了一个逻辑，它试图检查维度数组的<> "“值，并给出语法错误。有谁能帮我，在我犯错误的地方，我写的逻辑是否正确？
DEFINE VARIABLE anotarray AS CHARACTER NO-UNDO.
DEFINE VARIABLE barray AS CHARACTER EXTENT 3 NO-UNDO.
ASSIGN
barray[1] = "yes"
barray[2] = "no"
anotarray = ""
.
/***value can be stored randoml
浏览 6提问于2022-01-18得票数 0
回答已采纳
1回答
从web服务调用返回905 (11773)错误的进度
web-services、progress-4gl、openedge
当我试图发送一个web服务调用时，我得到了一个905 (11773)错误。我认为这与web服务所花费的时间很长有关，并且某些内部进度超时正在被触发(我不会设置任何超时)。我之所以这么想，是因为我可以向这个web服务发送小请求，它可以正常工作，但大型请求返回时会出现上述错误。有什么想法吗？有这样的暂停吗？
Error receiving Web Service Response: (11773)
An error ocurred in the process of receiving a SOAP response message.
The error details are appen
浏览 2提问于2015-11-11得票数 0
1回答
如何生成包含进程4gl中所有质数的文本文件
progress-4gl、openedge
在下面的代码中，我导入了一个数字为3到99的文本文件。
我已经编写了部分代码来从给定的数字中找出质数。
define variable a as integer.
define variable b as integer.
define variable i as integer initial 0.
INPUT FROM Value ( "C:\src\New folder\bingo.txt").
repeat :
IMPORT a.
b = a mod i.
if b=0 then
do:
浏览 0提问于2016-11-21得票数 1
2回答
如何修复进度4gl的动态查询错误？
openedge、progress-4gl
我是新来的进步4GL。我编写了缓冲区逻辑，将多个表添加到单个查询中，并使用表字段名从另一个表中查找记录。我不知道为什么我会犯错。请帮忙改变逻辑
DEFINE VARIABLE ix AS INTEGER NO-UNDO.
DEFINE VARIABLE qh AS HANDLE NO-UNDO.
DEFINE VARIABLE bh AS HANDLE NO-UNDO.
DEFINE VARIABLE fh AS HANDLE NO-UNDO EXTENT 10.
DEFINE VARIABLE cQuery AS CHARACTER NO-UNDO.
CREATE BUFFER bh
浏览 3提问于2021-08-09得票数 0
回答已采纳
2回答
如何检查XML文件中是否存在节点并在Progress4GL中检索值
xml、openedge、progress-4gl
大家好，Progress4GL开发者，
在对UPS进行成功的SOAP调用后，我将以下XML响应存储在名为cBody的longchar变量中：
<?xml version="1.0" encoding="ISO-8859-1" ?>
<trk:TrackResponse xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:trk="http://www.ups.com/XMLSchema/XOLTWS/Track/v2.0">
&
浏览 6提问于2020-06-04得票数 1
回答已采纳
2回答
如何在Openedge中使现有帧响应，进度4gl
openedge、progress-4gl
我有一个旧的桌面应用程序开发的进度4gl.There是一个包含在进度窗口中的框架，现在我的任务是使框架响应性ie根据其容器窗口的大小，框架应该调整大小dynamically.Is它可能在进行中任何变通办法将是appreciated.Thanks
浏览 0提问于2017-09-25得票数 0
3回答
如何在进程openedge 4gl中提取以分隔符分隔的字符串？
string、loops、progress-4gl、openedge
我有一根线
v-edistring = "STS++56+202:::DUE TO HOLIDAY1'STS++56+202:::DUE TO HOLIDAY2'STS++56+202:::DUE TO HOLIDAY3'"
撇号(')表示行的终止，每行都是一个段。我已经提取了每个片段，并将其分配给变量片段。
现在，对于每个段，我需要依次循环查找元素( STS，56,202，由于HOLIDAY1 )等。
DEFINE VARIABLE v-edistring AS CHARACTER NO-UNDO.
DEFINE VARIABLE v
浏览 0提问于2016-03-28得票数 1
2回答
如何获得外部库中定义为char**的C(CDELC)函数的输出值
progress-4gl、openedge
我希望能够使用在共享对象文件(lib.so)中定义的以下函数：
int encrypt_data (char* buffer_in, int size_in, char** buffer_out, int* size_out)
基本上，我希望能够将文件的内容传递给这个函数(buffer_in)，并将输出内容(buffer_out)写入另一个文件。以下是我迄今尝试过的：
PROCEDURE encrypt_data EXTERNAL "lib.so" CDECL :
DEFINE INPUT PARAMETER buffer_in AS MEMPTR.
浏览 2提问于2016-01-13得票数 0
回答已采纳
4回答
进度4gl OpenEdge解析键/值对字符串又称查询字符串
query-string、string-parsing、progress-4gl、openedge、4gl
我找不到任何关于我应该如何解析包含键/值的字符串的内容，就像这样：
FieldType="String"&FieldFormat="^[a-z0-9!#$%&'*+/=?^_`{|}~-]+$"
字段分隔符可能包含在值中，就像上面的例子一样，这不会被用作web请求参数列表。
我发现了这个：
但是entry()并不关心数据是否在一个查询中。
=编辑=
所以我找到了一个不太理想的解决方案，我希望没有人需要模仿
DO jj=1 TO NUM-ENTRIES(curr,"&"):
DEFINE V
浏览 0提问于2015-06-04得票数 2
1回答
正在进行中的活动窗口的屏幕快照-4GL
progress-4gl、openedge
我在Progress4GL中工作，在我的应用程序中，我希望在任何KeyStroke事件(如(CTRL + F9) )上拍摄活动窗口的屏幕截图，并将其保存在预先指定的文件夹中。有人能在这方面帮我吗？
浏览 0提问于2015-12-30得票数 0
1回答
查询db中所有表中记录的导出计数
openedge、progress-4gl、progress-db、4gl
我正在尝试导出excel或文本文件中所有表的计数。
if any program or any query will help me ?
我试图对每个表中可用数据的导出计数进行编码。
代码：
define stream table t1.
output stream t1 to t1.csv.
&scope-define display-fields count(*)
select count(*) from emp.
export starem t1 delimiter ",".
此代码以空值创建excel，但在屏幕上显示结
浏览 1提问于2017-10-30得票数 0
回答已采纳
3回答
如何在for each循环中导出文本文件？
openedge、progress-4gl
我写了一个导出文件到特定目录的程序，我觉得我写了一些不需要的逻辑。所以我想知道最短和最好的方法来做导出文件。让我分享我尝试过的东西 DEFINE VARIABLE cData AS CHARACTER NO-UNDO.
DEFINE VARIABLE i AS INTEGER NO-UNDO.
DEFINE VARIABLE icount AS INTEGER NO-UNDO.
DEFINE VARIABLE cName AS CHARACTER NO-UNDO.
DEFINE VARIABLE cPath AS CHARACTER NO-UNDO.
DEFINE TEMP-TAB
浏览 39提问于2019-06-05得票数 1
回答已采纳
1回答
如何在OpenEdge Progress4GL中将XML响应转换为临时表？
web-services、soap、openedge、progress-4gl
你好，Progress4GL开发人员
我试图使用进度来使用SOAP。目前，我正在使用一个名为：的开源示例SOAP服务。
下面的程序实现了一个梦想(即用户输入国家代码，例如"ESP“，并向用户显示有关西班牙的详细信息)。结果存储在temp-表1和temp-表2中：
/******* Sample Application to show Progress4GL Consuming a SOAP API *************/
/******* VARIABLES ************************************************************
浏览 1提问于2020-05-10得票数 1
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
即时通信 IM
ICP备案
对象存储
实时音视频活动推荐
腾讯云开发者
