单档——单头内容新增修改后同步更新到其他相关数据表

Posted xiao黎

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了单档——单头内容新增修改后同步更新到其他相关数据表相关的知识,希望对你有一定的参考价值。

范例(cxmt631),在车辆报到单单头内容新增、修改后,把相关内容也更新到派车单单头档去(有派车单号的车辆报到单);

1)在单头新增后:

                  #add-point:單頭新增後 name="input.head.a_insert"
                 
                  select xmabucstus into l_xmabucstus from xmabuc_t 
                  where xmabucent = g_enterprise and xmabucdocno = g_xmabuc_m.xmabucdocno
                  if not cl_null(g_xmabuc_m.xmabuc009) then 
                    select gzcbl004 into l_gzcbl004 from gzcbl_t,gzcb_t
                        where gzcbl001=gzcb001
                        and gzcbl002=gzcb002
                        and gzcbl001=‘13‘
                        and gzcbl002=l_xmabucstus
                        and gzcbl003=g_dlang
                            update xmen_t set 
                                    xmenua001=g_xmabuc_m.xmabucdocno,
                                    xmenua002=g_xmabuc_m.xmabuc002, #车牌号
                                    xmenua003=l_gzcbl004, #车辆状态
                                    xmenua004=g_xmabuc_m.xmabuc003, #车次
                                    xmenua005=g_xmabuc_m.xmabuc006, #驾驶员
                                    xmenua006=g_xmabuc_m.xmabuc007, #驾驶证编号
                                    xmenua007=g_xmabuc_m.xmabuc008, #联系电话
                                    xmenua008=g_xmabuc_m.xmabuc005, #报到时间
                                    xmenua009=g_xmabuc_m.xmabuc013, #备注
                                    xmenua010=g_xmabuc_m.xmabuc011, #车辆类型
                                    xmenua011=g_xmabuc_m.xmabuc012  #提货方式
                                 where xmenent=g_enterprise
                                 and xmensite=g_site
                                 and xmendocno=g_xmabuc_m.xmabuc009
                  end if
                  #end add-point

  

 

2)在单头修改后:

                     #add-point:單頭修改後 name="input.head.a_update"

                  SELECT xmabucstus INTO l_xmabucstus FROM xmabuc_t 
                  WHERE xmabucent = g_enterprise AND xmabucdocno = g_xmabuc_m.xmabucdocno
                  IF NOT cl_null(g_xmabuc_m.xmabuc009) THEN 
                    SELECT gzcbl004 INTO l_gzcbl004 FROM gzcbl_t,gzcb_t
                        WHERE gzcbl001=gzcb001
                        AND gzcbl002=gzcb002
                        AND gzcbl001=‘13‘
                        AND gzcbl002=l_xmabucstus
                        AND gzcbl003=g_dlang
                            UPDATE xmen_t SET 
                                    xmenua001=g_xmabuc_m.xmabucdocno,
                                    xmenua002=g_xmabuc_m.xmabuc002, #车牌号
                                    xmenua003=l_gzcbl004, #车辆状态
                                    xmenua004=g_xmabuc_m.xmabuc003, #车次
                                    xmenua005=g_xmabuc_m.xmabuc006, #驾驶员
                                    xmenua006=g_xmabuc_m.xmabuc007, #驾驶证编号
                                    xmenua007=g_xmabuc_m.xmabuc008, #联系电话
                                    xmenua008=g_xmabuc_m.xmabuc005, #报到时间
                                    xmenua009=g_xmabuc_m.xmabuc013, #备注
                                    xmenua010=g_xmabuc_m.xmabuc011, #车辆类型
                                    xmenua011=g_xmabuc_m.xmabuc012  #提货方式
                                 WHERE xmenent=g_enterprise
                                 AND xmensite=g_site
                                 AND xmendocno=g_xmabuc_m.xmabuc009
                  END IF
                     #end add-point

  

 

以上是关于单档——单头内容新增修改后同步更新到其他相关数据表的主要内容,如果未能解决你的问题,请参考以下文章

在excel的sheet1中输入数据,怎样同步备份到sheet2中,且sheet1的数据更新时,sheet2的备份只新增而不覆盖

Canal的理解和应用

MySQL表结构同步工具 mysql-schema-sync

U盘和电脑指定目录同步,修改后可以作为几台服务器之间的文件同步

线程锁相关,锁消除,锁相关

Postgresql创建视图后修改基础表的问题