[易飞]自定义开窗

版权声明:本文为博主原创文章,未经博主允许不得转载。 https://blog.csdn.net/david_520042/article/details/51691014

我们有这样一个需求:质量部需要评估售后周期
售后周期的起点:开立销退单据
开立之后进入售后状态,OK之后调拨到合格品仓开立调拨单
开立调拨单作为售后的结束点。
1. 首先,要自己写的两个表是F2LINK和ADMMI:
先设置F2LINK表,如下图新增一条记录,PURMA-65是开窗的组号
文档代码:F2LINK
文件名:档案开窗检核档
类 型:7 (1.主档单头 2.主档单身 3.交易单头 4.交易单身 5.交易记录 6.月档/统计 7.系统档 8.其它)
转档完成:N

PRIMARY :LKTYPE+TBLNAME+TBLSN =============================================================================================== 序号 字段编号 字段名称 TYPE 长度 备注

0001 LKTYPE 类型 C 1 1.开窗(ADMMI) 2.检核(ADMMJ)
0002 TBLNAME 档案编号 C 10 档案编号
0003 TBLSN 序号 C 2 档案序号
0004 MKIND 开窗/检核档案 C 10 开窗/检核档案
0005 SKIND 开窗/检核组数 C 2 开窗/检核组数
0006 COMMENT 说明 V 255 说明

F2LINK:增加开窗记录:
这里写图片描述
建议:SKIND要在ADMMI中取最大值+1
然后,到ADMMI表中新增一条记录COPTJ-12:
这里写图片描述
MI003:开窗内容

-- MAINSELECT;TJ001  
Select DISTINCT TJ001,TJ002,TJ003,TJ004,TJ005,TJ006  
from $$COPTJ as COPTJ  
Where   TJ002>=:TJ002A         
-- ORDER    TJ001,TJ002,TJ003  
-- ORDER2   TJ002,TJ001,TJ003  
--SEARCH  TJ001;1;>=  --SEARCH2  TJ002;2;>=  
-- RETURN   TJ001,TJ002,TJ003  
-- DISPLAY  单别;单号;序号;品号;品名;规格

测试:
1.设计自定义画面
这里写图片描述
2.开窗测试
这里写图片描述

阅读更多

扫码向博主提问

厦门德仔

博客专家

非学,无以致疑;非问,无以广识
  • 擅长领域:
  • ERP
  • .NET
  • SQL
  • Ext.Net
  • DevExpress
去开通我的Chat快问
想对作者说点什么?

博主推荐

换一批

没有更多推荐了,返回首页