UPDATE SK_XFJLB SET JZstatus = :li_flag WHERE (XF_PH in ( :as_phlist )AND XF_JZBZ='否' ) ; IF SQLCA.SQLCODE = 0 THEN COMMIT USING SQLCA; ELSE ROLLBACK USING SQLCA; Messagebox('','失败.') END IF as_phlist 参数为(0001,0002,0003) 如果as_phlist为 0001是可以成功的, 如果是多