4GL单身点按钮后让光标继续停在那一行
bron1984 6年前 (2019-05-09) 3737浏览
可用于某个程序在单身需要外连查询程序后光标能继续停在原来的行上,而不是回到第一行。 主要语句如下。先定义一个 全局变量 用于保存原始光标所在的行数。就是点查询按钮前,先把当前行数保留下来: LET g_ac2 = ARR_CURR() #保存当前行数...
bron1984 6年前 (2019-05-09) 3737浏览
可用于某个程序在单身需要外连查询程序后光标能继续停在原来的行上,而不是回到第一行。 主要语句如下。先定义一个 全局变量 用于保存原始光标所在的行数。就是点查询按钮前,先把当前行数保留下来: LET g_ac2 = ARR_CURR() #保存当前行数...
bron1984 6年前 (2019-05-08) 7328浏览
第一章 Informix环境变量的设定 一.环境范例: 变 量 名 称 变 量 说 明 DBDELIMITER 指定由dbload在卸出数据文件中使用的字段定界符 DBDATE 指定在DB中想要使用的日期格式(Y4MD/,MDY...
bron1984 6年前 (2019-05-08) 3218浏览
很多公司都有这样的需求,希望系统可以定时邮件发送一些统计报表给到相关人员,以便做数据分析,或者是希望做单时,发送单据内容给到相关人员提醒审核和备案,下面分享一种十分简单方便的实现方式,javamail+4gl+perl脚本实现; 1:在aooi999...
bron1984 6年前 (2019-05-07) 4611浏览
TIPTOP GP的JavaMail设定与说明 使用系统 TIPTOP GP 3.0 今天测试了一下TIPTOP GP的邮件传送功能,测试基本成功,现在将步骤设置简述如下: <1> 检查java环境设定,确定JavaMail的相关程式存放...
bron1984 6年前 (2019-05-07) 4574浏览
使用测试系统TIPTOP GP3.0 颜色的设置分为单身颜色和单头颜色的设置: 一、单身颜色: 1.首先MAIN函数之前定义一个数组 例如: DEFINE ga_color DYNAMIC ARRAY OF RECORD c01 STRING,c02...
bron1984 6年前 (2019-05-06) 3643浏览
一般的COMBOX我们一般的是直接在per里面写item属性,如下代码: COMBOBOX tc_qcjj08 = FORMONLY.tc_qcjj08,COMMENTS ='Enter 0 1 2 4 8 12 ', ITEMS=(("0","每批...
bron1984 6年前 (2019-05-06) 3063浏览
首先看张效果图:注意底色部分 实现函数代码: FUNCTION F_CONV_GB(pf_money) DEFINE pf_money DECIMAL(14,2) DEFINE ll_money INTEGER DEFINE i SMALLINT D...
bron1984 6年前 (2019-05-03) 8282浏览
前期文章中,有两三种导入方法。有的需要EXCEL处于打开状态,有的需要转成CSV。本例是最常用方法,如你想象中的样子。 。。。 FUNCTION t110_impexcel() DEFINE ls_str STRING, ls_file STRING...
bron1984 6年前 (2019-05-03) 7294浏览
这种方法适用于大数量导入,支持中文。这种方法本质上是在通过sqlldr导入文本数据,而不是EXCEL。 首先第一步,需要将EXCEL另存为CSV 然后在程序中上传这份CSV 全部程序就不帖了。关键代码如下 #....前面上传等步骤省略 #清空临时表(...
bron1984 6年前 (2019-05-02) 3058浏览
先来看一下效果图: 实现方法(估计大伙都能猜到,可能只是懒的写而已) 程序上加按钮: WHEN "in_detail" IF cl_chk_act_auth() THEN LET lt_zz01 = get_program(g_tlff_1[l_ac...