近期写个对账小程序，应收款数笔，实际回款数笔。
思路是由账面应收款序列，生成所有组合，和实际收款的数据序列生成的组合，进行比对。
先写了个验证小程序，统计学上课没听，害怕有误，请大师指点下。

genComb(1,0,'',10)&&10以内的非重复全部组合

Procedure genComb
    Lparameters startIndex,nSum,cStrCombination,nLen
    LOCAL i
    For i=startIndex To nLen
        Local nToal,cString
        cString=cStrCombination+','+Alltrim(Str(i))&&由哪几笔组成
        nTotal=nSum+i&&求和
        ?nTotal,cString
        If i=nlen
            RETURN
        Else
            genComb(i+1,nTotal,cString,nLen)
        Endif
    Endfor
Endproc

用递归，算量大时可能会出异常。

10个数，不重复全部组合序列有多少个，不会计算。程序跑出来是1023，不知道是否正确

通常也就20笔以内，想到可以128层嵌套，就用了递归

有无可能会是20个数任意1个、2个、3个.......19个、20个数的组合

可以通过控制excel，利用线性规划求解，速度快

现在就是生成序列N的1、2、3...N的组合，而且不重复。用小一点的数代入N，目前测得结果好像是对的。就是怕逻辑上有缺陷。

只是验证，实际操作会把应收数序列存入数组，通过数组下标来访问，实现组合

为节省时间，方便的话最好给点数据测试一下

如果有其他算法，最好不要用递归，一来不好读懂，二来也不见得高效，尤其是vfp这类解释语言，循环的嵌套层次尽量要少。