碰到一个问题，暂时想不到解决思路，请各位大神赐教
有个40万基础表，里面有号码，地址，用户ID，在用APP，在用硬件，希望判断两个号码是否是同一个人，思路是，号码两两比较 用户ID相同，那么给个0.3系数，如果地址相同，给个0.2系数，如果在用APP相同，给个0.1系数，在用硬件相同，给个0.1系数，当所有系数加起来大于0.5，那么两个号码是同一个人，这个时候给两个号码 赋予相同的 客户编号,比如A1,后面可以通过客户编号就能筛选出哪些号码可能是同一个人，求各位大神赐教思路，最好有代码

代码，四十多万的数据，如果真的号码两两比较是不是很慢

这个方法我想过，存在问题，因为A号码可能和B号码 地址相同，和C号码 硬件相同，和D号码 软件相同，最后得到的系数是判断不了到底和哪个号码是 同一个人

* 清除之前的定义
CLEAR

* 创建一个名为 BaseTable 的表，包含号码（[color=#0000FF]Number）、地址（Address）、用户ID（UserID）、在用APP（UsingApp）、在用硬件（UsingHardware）字段[/color]
CREATE TABLE BaseTable (
    Number CHAR(10),
    Address CHAR(50),
    UserID CHAR(10),
    UsingApp LOGICAL,
    UsingHardware LOGICAL,
    CustomerID CHAR(10)
)

* 创建索引
INDEX ON UserID TAG UserID
INDEX ON Address TAG Address

* 初始化客户编号
LOCAL nBatchSize, nTotalRows, nCustomerID
nBatchSize = 1000  && 设置分批大小
nTotalRows = RECCOUNT()  && 获取总记录数
nCustomerID = 1  && 设置初始客户编号为1

* 分批处理数据
FOR i = 1 TO nTotalRows STEP nBatchSize
    SELECT BaseTable
    GO i IN 0
    SCAN WHILE NOT EOF() AND RECNO() < (i + nBatchSize)
        * 初始化系数和客户编号
        LOCAL nCoefficient
        nCoefficient = 0

        * 保存当前记录的 RECNO() 值，以便后续定位
        nCurrentRecno = RECNO()

        * 比较用户ID
        IF SEEK(BaseTable.UserID, 'UserID')
            nCoefficient = nCoefficient + 0.3
        ENDIF
            
        * 比较地址
        IF SEEK(BaseTable.Address, 'Address')
            nCoefficient = nCoefficient + 0.2
        ENDIF
            
        * 比较在用APP情况
        IF SEEK(BaseTable.UsingApp, 'UsingApp')
            nCoefficient = nCoefficient + 0.1
        ENDIF
            
        * 比较在用硬件情况
        IF SEEK(BaseTable.UsingHardware, 'UsingHardware')
            nCoefficient = nCoefficient + 0.1
        ENDIF
            
        * 如果系数总和大于0.5，则将两个号码设置为同一个客户编号
        IF nCoefficient > 0.5
            cCustomerID = "A" + LTRIM(STR(nCustomerID))  && 构造客户编号
            nCustomerID = nCustomerID + 1  && 递增客户编号
        ELSE
            cCustomerID = ""  && 如果系数总和小于等于0.5，则客户编号为空
        ENDIF
            
        * 更新客户编号
        IF nCurrentRecno > 0
            REPLACE CustomerID WITH cCustomerID FOR RECNO() = nCurrentRecno
        ENDIF
            
        * 移动到下一行
        SKIP
    ENDSCAN
ENDFOR

* 显示更新后的表
SELECT * FROM BaseTable

只会这样写代码，求大佬优化

应该会误判，只判断出现次数，得到一个系数，最后根据系数求和值判断是不是同一个人，因为各系数对应的不是同一个号码，所以最后系数求和大于0.5，也根本不知道和哪个号码设置 相同的客户编号

具体怎么实现，求教

你这个思路下我的客户编号怎么 添加呢。。。

* 比较用户ID
        IF SEEK(BaseTable.UserID, 'UserID')
            nCoefficient = nCoefficient + 0.3
        ENDIF
请教一下这里为什么提示找不到别名

判断为同一个人，客户编号就赋予同样的编号，后面通过客户编号筛选做 下一步处理，已增加测试附件

[此贴子已经被作者于2024-4-10 11:50编辑过]

论坛停了几天。。继续求教