1 PRIVATE FUNCTION axmt500_update_xmdc028()
2 ###更改出货库位
3 DEFINE l_i INT
4 DEFINE l_index INT
5
6 DIALOG ATTRIBUTES(UNBUFFERED,FIELD ORDER FORM)
7 INPUT ARRAY g_xmdc2_d FROM s_detail2.*
8 ATTRIBUTE(COUNT = g_rec_b,WITHOUT DEFAULTS, #MAXCOUNT = g_max_rec,
9 INSERT ROW = FALSE,
10 DELETE ROW = FALSE,
11 APPEND ROW = FALSE)
12
13 ON ACTION controlp INFIELD xmdc028
14 INITIALIZE g_qryparam.* TO NULL
15 LET g_qryparam.state = 'i'
16 LET g_qryparam.reqry =
T100——修改单身栏位,开窗,当前行
最新推荐文章于 2025-01-09 10:48:36 发布