- 博客(15)
- 资源 (9)
- 收藏
- 关注
RSS订阅原创 T100弹出是否确认窗体方式
cl_ask_confirm('aim-00108') —— 此函数会弹出是否确认窗体，点击是即true，否即false。
2023-12-18 15:20:57
460
原创 T100错误信息提示方式
LET g_errparam.popup = TRUE —— TRUE为弹出错误信息窗口提示，FALSE为在作业界面下面状态栏位置显示（红色字体错误提示）LET g_errparam.extend = "" —— 可维护中文、英文等提示，可写入提示内容；LET g_errparam.code = "-100" —— 是azzi920的错误信息代码。其次，也可直接使用 CALL cl_ask_confirm3("axm-00440","") 函数；
2023-12-18 15:20:08
726
原创 T100菜单ACTION控制栏位字段编辑，点击菜单ACTION才能编辑指定的栏位
1）在规格上增加新ACTION——action_modify_xmdaua012，修改价格清单2；#add-point:input段cancel name="input.cancel"#add-point:input段close name="input.close"#add-point:input段exit name="input.exit"目的，控制新增的栏位（价格清单2），需点击菜单栏“修改价格清单2”才能对相应的栏位进行编辑修改，并记录修改人、日期；#應用 a43 樣板自動產生(Version:4)
2023-12-18 15:19:31
1099
原创 T100之分割split函数方法、getIndexOf、subString、replace、临时表创建；
1.包括其他收支单作业anmt310，客户收款单作业anmt540，抓取的是表nmbb_t，抓取的栏位是nmbb025，#2.应付单aapt330，aapt331，aapt310，aapt301，都是应付单，抓取的表都是apde_t，#汇款单anmt460,抓取表nmck_t，抓取的栏位是nmck042，如果抓取不到则再去到下一项。#4.应收票据兑现单，抓取表nmcq_t，抓取栏位是nmcq006，如果抓取不到则再去到下一项。现：查询到临时表的时候，增加可行的筛选条件，再二次筛选临时表的数据，进行优化；
2023-12-18 15:17:09
1096
原创 T100根据单头价格清单（核价单），更新单身出货明细的单价
DEFINE n_xmdu011 LIKE xmdu_t.xmdu011 #核价单身——单价（取出单价xmdl045）DEFINE n_xmdu011 LIKE xmdu_t.xmdu011 #核价单身——单价（取出单价xmdl045）DEFINE n_xmdt008 LIKE xmdt_t.xmdt008 #核价单头——单价含税否。NEXT FIELD xmdkud004 #返回原欄位。
2023-12-18 15:16:26
495
原创 T100单身金额统计，更新显示到单头
add-point:delete_b段define(客製用) name="delete_b.define_customerization"#add-point:單身新增後 name="input.body.a_insert"#add-point:delete_b段刪除前 name="delete_b.b_delete"#add-point:delete_b段刪除中 name="delete_b.m_delete"范例（cxmt052）：当单身新增、修改、删除时，汇总单身的应付金额，更新并显示到单头上；
2023-12-18 15:15:42
454
原创 T100开窗设计器——条件，参数，返回值接收显示
DISPLAY g_qryparam.return1 TO pmdsdocno ——接收回传值，并显示到pmdsdocno上；注意WHERE条件：里面的查询条件在construct和input段都会生效，而写在里的查询条件只会在程序input段中生效。LET g_qryparam.arg1 = '6' ——传入查询参数，如有多个参数就arg2、arg3...LET g_qryparam.where = " pmdsstus ='S' " ——改写开窗查询条件。
2023-12-18 15:15:03
642
原创 T100单档——单头内容新增、修改后同步更新到其他相关数据表
xmenua007=g_xmabuc_m.xmabuc008, #联系电话。xmenua007=g_xmabuc_m.xmabuc008, #联系电话。xmenua002=g_xmabuc_m.xmabuc002, #车牌号。xmenua002=g_xmabuc_m.xmabuc002, #车牌号。xmenua004=g_xmabuc_m.xmabuc003, #车次。xmenua009=g_xmabuc_m.xmabuc013, #备注。xmenua003=l_gzcbl004, #车辆状态。
2023-12-18 15:14:03
957
原创 T100——单档——状态码显示设置，状态码更改链表更新
，状态码显示设置（某状态下不显示某些状态码，即有些状态是不可直接更改的为另一种状态的），更改完状态码后同步更新数据表的指定字段；#add-point:action控制 name="statechange.invalid"#add-point:action控制 name="statechange.factory"#add-point:action控制 name="statechange.report"#add-point:menu前 name="statechange.before_menu"
2023-12-18 15:13:21
858
原创 T100单档——控件关联查询
先在单档——车辆报道单单头的 派车单号 控件上置入程序，当派车单号开窗选择完成后，执行程序，根据派车单号获取派车单状态和车辆类型；#設定g_chkparam.*的參數前，先將其初始化，避免之前設定遺留的參數值造成影響。以上，先根据派车单号从派车单单头档获取到派车单状态码、车辆类型；），单档，通过车辆报道单单头表的派车单号，获取派车单单头表的派车单状态、车辆类型；#應用 a02 樣板自動產生(Version:2)#設定g_chkparam.*的參數。#應用 a17 樣板自動產生(Version:3)
2023-12-18 15:10:20
462
原创 T100单档——PK单号新增、修改时不允许编辑，PK单号自动生成
a表示新增， CALL cl_set_comp_entry("xmabucdocno",FALSE) 表示设定控件是否可输入；#add-point:set_no_entry段欄位控制 name="set_no_entry.field_control"#add-point:set_entry段欄位控制 name="set_entry.field_control"#add-point:Function前置處理 name="set_entry.pre_function"
2023-12-18 15:08:44
1113
原创 T100单档作业（带明细档）——项次自动自增
add-point:modify段before insert name="input.body.before_insert"cxmt052_input是资料输入时触发的事件，所以在其中的。里写入项次+1的程序即可。单档新增明细数据时，
2023-12-18 15:07:28
401
原创 T100报表查询——自动刷新数据，双击明细打开关联作业
这个2是容许误差2秒，2秒内的误差都不会触发重计倒计时，这是因为服务器有时候会很卡、停顿，尤其是网络的延迟，这些都会造成误差，如果特别卡，可以适当放大秒数误差，但是会造成必须操作X秒以上才会触发重计的现象。#DISPLAY 'cl_get_current() =',cl_get_current() 预埋调试用，可放开看时间调试。LET g_input.refresh_desc = l_hh||":"||l_mm||":"||l_ss||"已自动刷新"#交談指令共用ACTION。
2023-12-18 15:06:33
1088
原创 T100—INPUT和CONSTRUCT指令——范例报表查询，作用让用户输入数据，自动生成SQL的WHERE条件，带开窗查询
2、在cxrq005 _ui_dialog()函数中的DIALOG ATTRIBUTES(UNBUFFERED,FIELD ORDER FORM)领域下自定义INPUT；LET g_qryparam.default1 = g_input.xrsduc010 #給予default值。LET g_qryparam.default1 = g_input.xrsduc010 #給予default值。#add-point:input段落 name="ui_dialog.input"
2023-12-18 15:04:51
1121
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人