bron1984的文章

6年前 (2019-08-29) 4118浏览

范例：cxmr540_g01 ON EVERY ROW #add-point:rep.everyrow.before name="rep.everyrow.before" ####初始化 IF cl_null(g_i) THEN LET g_i=0 ...

6年前 (2019-08-28) 2278浏览

capr110_g01，按扣账日期打印排序： 在adzp188——“字段”中加入pmds001的话，产生的代码的变量是：pmds_t_pmds001 ；当在“群组”—“印出排序” 再添加pmds001 的话，产生的排序的变量是pmds001，此时会产...

6年前 (2019-08-28) 2724浏览

范例：cxrr001 效果：增加英文版报表选择     1、azzi301，复制cxrr001_g01，把样板编号改为cxrr001_g01_01；   2、下载cxrr001_g01的GR样板，把cxrr001_g01...

6年前 (2019-08-28) 4803浏览

PRIVATE FUNCTION axmt500_update_xmdc028() ###更改出货库位 DEFINE l_i INT DEFINE l_index INT DIALOG ATTRIBUTES(UNBUFFERED,FIELD ORDE...

6年前 (2019-08-27) 3359浏览

弹出File Browser窗口 PRIVATE FUNCTION cxrt020_open_file() DEFINE l_dir LIKE type_t.chr500 DEFINE r_success LIKE type_t.num5 # LET...

6年前 (2019-08-27) 2855浏览

例子可参考aooi100，上传集团logo的程序 ON ACTION btn_updatelogo #選取上傳檔案,GDC專用 LET gs_upload = NULL CALL cl_client_browse_file() RETURNING g...

6年前 (2019-08-26) 3053浏览

azzi950设置了背景定时执行，但到底没执行， 重启的命令如下。三个命令都执行一下。 指令 1： r.r azzp950 kill 指令 2： r.r azzp951 kill 指令 3： r.r azzp952 转载请注明：赫非域 »...

6年前 (2019-08-26) 3567浏览

标准签出客制后，建议到对应4gl目录，客制目录 r.c afap280_01 r.l afap280_01 ALL           常用Shell操作命令： r.c：编译程序,需在4gl路径之下执...

6年前 (2019-08-25) 3198浏览

PRIVATE FUNCTION cwssp002_process() #add-point: 服務邏輯主要處理段的ADP DEFINE l_node xml.DomNode DEFINE l_node2 xml.DomNode DEFINE l_c...

6年前 (2019-08-24) 4242浏览

IF g_bgjob <> “Y” THEN #更新交易對像信用餘額檔： LET ls_value = cl_getmsg(‘axm-00547’,g_lang),” ̶...