| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 593 人关注过本帖
标题:大家看看这段代码有什么问题
取消只看楼主 加入收藏
iamhyf
Rank: 1
等 级:新手上路
帖 子:69
专家分:2
注 册:2010-1-5
结帖率:91.67%
收藏
已结贴  问题点数:10 回复次数:1 
大家看看这段代码有什么问题
父表EI在程序运行中已打开
子表EI1是空的
我的目标是将父表中指定字段的数据导入子表
  SELECT 2
  USE Ei1  &&在工作区2打开子表
  nFldCount =AFIELDS(aFldList,"B")
  K=RECCOUNT()
  INDEX TO ExportID ON 姓名+身份证号
  SELECT Ei
  SET RELATION TO 姓名+身份证号 INTO B
  SCAN
    SELECT B
    IF .NOT. EOF("B")
      REPLACE &SalaryYear1 WITH Ei.年薪  && SalaryYear1是表示子表中需要导入年薪数据年度字段变量,在程序
                                            运行中进行赋值。
    ELSE
      K=K+1
      APPEND BLANK
      REPLACE 序号 WITH K,姓名 WITH Ei.姓名,身份证号 WITH Ei.身份证号,...
    ENDIF
    SELECT Ei
  ENDSCAN

主表中共有4575条记录,可导入时,总有6条记录导入不了,不知什么原因,请高手指正!!!
搜索更多相关主题的帖子: 身份证号 工作区 姓名 
2013-12-21 19:56
iamhyf
Rank: 1
等 级:新手上路
帖 子:69
专家分:2
注 册:2010-1-5
收藏
得分:0 
费了半天劲才查出问题,代码没问题,是数据库出问题了,下属报数据报重了,那6条不能导出的记录是重复的,一个人有两条记录。删除了就没事了。

2楼说是逻辑错误,不知依据是什么。
2013-12-21 21:28
快速回复:大家看看这段代码有什么问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.037343 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved