1,添加 分录页面添加一个textbox映射 QuoteDtl.Character02 用来存版本号
2,系统管理/交易流程管理/设置/方法指令
3,方法代码定位到 Quote.Update (需要勾选搜索时返回全部)
4,新的预处理
5,条件 Q1(查询新增数据) :
for each ttQuoteDtl where ttQuoteDtl.rowmod='a' , each QuoteDtl where ttQuoteDtl.PartNum = QuoteDtl.PartNum and ttQuoteDtl.Company =QuoteDtl.Company and ttQuoteDtl.RevisionNum = QuoteDtl.RevisionNum and ttQuoteDtl.CustNum = QuoteDtl.CustNum and ttQuoteDtl.Character02 = QuoteDtl.Character02 no-lock
或者 条件 Q2 (查询修改数据):
for each ttQuoteDtl where ttQuoteDtl.rowmod='U' , each QuoteDtl where ttQuoteDtl.PartNum = QuoteDtl.PartNum and ttQuoteDtl.Company =QuoteDtl.Company and ttQuoteDtl.RevisionNum = QuoteDtl.RevisionNum and ttQuoteDtl.CustNum = QuoteDtl.CustNum and ttQuoteDtl.Character02 = QuoteDtl.Character02 and ttQuoteDtl.QuoteNum<>QuoteDtl.QuoteNum no-lock
6,行动
如果只是警告,选设计模板的提醒
如果警告并阻止保存,选设计模板的例外
2,系统管理/交易流程管理/设置/方法指令
3,方法代码定位到 Quote.Update (需要勾选搜索时返回全部)
4,新的预处理
5,条件 Q1(查询新增数据) :
for each ttQuoteDtl where ttQuoteDtl.rowmod='a' , each QuoteDtl where ttQuoteDtl.PartNum = QuoteDtl.PartNum and ttQuoteDtl.Company =QuoteDtl.Company and ttQuoteDtl.RevisionNum = QuoteDtl.RevisionNum and ttQuoteDtl.CustNum = QuoteDtl.CustNum and ttQuoteDtl.Character02 = QuoteDtl.Character02 no-lock
或者 条件 Q2 (查询修改数据):
for each ttQuoteDtl where ttQuoteDtl.rowmod='U' , each QuoteDtl where ttQuoteDtl.PartNum = QuoteDtl.PartNum and ttQuoteDtl.Company =QuoteDtl.Company and ttQuoteDtl.RevisionNum = QuoteDtl.RevisionNum and ttQuoteDtl.CustNum = QuoteDtl.CustNum and ttQuoteDtl.Character02 = QuoteDtl.Character02 and ttQuoteDtl.QuoteNum<>QuoteDtl.QuoteNum no-lock
6,行动
如果只是警告,选设计模板的提醒
如果警告并阻止保存,选设计模板的例外