关于查询并更新多张表的问题

在同一个数据库中有表A1、A2、A3、A4……类似的表名，并且这些表有相同的列数，列名也相同，我如何才能用语句让程序的动查找所有表中某一列大于0的值，并把这些值更新为0。
谢谢各位大神

update table1 set col1=0 where col1>0;