回复 楼主 榕水之滨
IMPORT FROM (GETFILE('XLS', '','', 0, '选择一个EXCEL表,然后另存为DBF表')) TYPE XL5 &&从相应的目录调入GBMB 5.0EXCEL表格
CLOSE DATABASES
*-----假设接收数据的表为sys_gzk,提供数据的表为 gbmb,
*-----两个表共同含有字段bh(编号)和 c(金额)
*GZ_K='..\Gznew\dbf\'+SUBSTR(SYS_GZK,1,8)
GZ_K=SUBSTR(SYS_GZK,1,8)
USE &gz_k IN a &&在a工作区中打开 xc202107
SELECT a &&进入a工作区
*-index on bh to bb1 &&按 bh 索引 bb1
INDEX ON 编号 TO &gz_k
USE gbmb IN b &&在b工作区中打开 bb2
SELECT b &&进入b工作区
INDEX ON A TO gbmb &&按 a 索引 gbmb
SELECT a &&进入a工作区
SET RELATION TO 编号 INTO b &&建立两个表以bh的关联
REPLACE &gz_K..绩效工资基 WITH VAL(gbmb.e),&gz_K..绩效工资部 WITH VAL(gbmb.f),&gz_k..技能工资毒 WITH VAL(gbmb.g),&gz_k..值班工资o WITH VAL(gbmb.h),&gz_k..值班工资夜 WITH VAL(gbmb.i),&gz_k..高温津贴 WITH VAL(gbmb.j) all &&将gbmb的相同编号的金额填到xc202107
REPLACE &gz_K..安全岗位 WITH VAL(gbmb.k),&gz_K..补发扣工资 WITH VAL(gbmb.l),&gz_k..考勤扣款 WITH VAL(gbmb.m),&gz_k..节假日加值 WITH VAL(gbmb.n),&gz_k..个人所得税 WITH VAL(gbmb.o) ALL &&将gbmb的相同编号的金额填到xc202107
CLOSE DATABASES
请您再帮我看一看,上面的 GBMB 是一张EXCEL表,从表中相应的字段把数据填到时 &GZ_K 中相应的字段中,但不知为什么,只更新 &GZ_K 前面360条记录,&GZ_K后面的剩下的就不更新了。谢谢!!!受累了