VF处理多个文件问题之一

set safe off
close table
use AQD_200711_1
copy struct to xy


bb=1
do while bb<=30

FIA='qd_sour/200711/AQD_200711_'+ALLTRIM(STR(BB))
FIB='qd_sour/200711/BQD_200711_'+ALLTRIM(STR(BB))

insert into xy SELECT * FROM &FIa WHERE ;
alltrim(CALL_DHHM) IN('114','12580','118114','160','400-820-6666','95539','3333333','2222222','4008206666')

insert into xy SELECT * FROM &FIb WHERE ;
alltrim(CALL_DHHM) IN('114','12580','118114','160','400-820-6666','95539','3333333','2222222','4008206666')

bb=bb+1
enddo

你可能感兴趣的:(文件)