My after update has below code : (No subform)
DoCmd.SetWarnings False
DoCmd.RunSQL "DELETE [Temp-OrderHeader].* FROM [Temp-OrderHeader];"
DoCmd.RunSQL "DELETE [Temp-OrderDetail].* FROM [Temp-OrderDetail];"
DoCmd.RunSQL "INSERT INTO [Temp-OrderHeader] ( Type, ORDNO, SYSDATE, MODEL, SUBJECT, ORDDATE, ETA, REV, PACK, ETA2, REMARK1, REMARK2, REMARK3, REMARK4, REMARK5, REMARK6, Location ) SELECT OrderHeader.Type, OrderHeader.ORDNO, OrderHeader.SYSDATE, OrderHeader.MODEL, OrderHeader.SUBJECT, OrderHeader.ORDDATE, OrderHeader.ETA, OrderHeader.REV, OrderHeader.PACK, OrderHeader.ETA2, OrderHeader.REMARK1, OrderHeader.REMARK2, OrderHeader.REMARK3, OrderHeader.REMARK4, OrderHeader.REMARK5, OrderHeader.REMARK6, OrderHeader.Location FROM OrderHeader WHERE (((OrderHeader.ORDNO)=[Forms]![OrderDelete]![OrdInfo]));"
DoCmd.RunSQL "INSERT INTO [Temp-OrderDetail] ( ORDNO, LOTNO, PARTNO, CUSTPARTNO, SSNO, ESNO, SHIPQTY, HEADCODE, REMARK, REV,REASON ) SELECT OrderDetail.ORDNO, OrderDetail.LOTNO, OrderDetail.PARTNO, OrderDetail.CUSTPARTNO, OrderDetail.SSNO, OrderDetail.ESNO, OrderDetail.SHIPQTY, OrderDetail.HEADCODE, OrderDetail.REMARK, OrderDetail.REV, OrderDetail.REASON FROM OrderDetail WHERE (((OrderDetail.ORDNO)=[Forms]![OrderDelete]![OrdInfo]));"
Me.Requery
DoCmd.SetWarnings True
Me.Detail.Visible = True
Me.Type.SetFocus
Please have an advice for me to block the popup msg .... thanks.