现在有X表的数据如下：

科目    科目名称    Memo包含内容
1001    Memo        现金
        memo        
1002    Memo        银行存款
        memo

需要整理成以下样子。

科目    科目名称
1001    现金
1001    现金   
1002    银行存款   
1002    银行存款




给自己点赞，我刚才已经找到了解决方案。代码如下：

CLOSE TABLES 
USE vo 

GO 1
DO WHILE !EOF()
IF ISBLANK(科目代码) THEN 
    REPLACE 科目代码 WITH km
    replace 科目名称 WITH mc
ELSE 
    km=科目代码
    mc=科目名称
ENDIF

SKIP
ENDDO 
BROWSE 

现在需要解决两个问题：
    1.现在的代码虽然实现了要求，但是比较慢，而且每一步骤都在更新。能不能有更加好的代码批量更新。
    2.备注字段修改为字符型字段是modify stru 之后，用鼠标点击进去再修改成功的。有没有办法用代码实现。

[此贴子已经被作者于2018-5-17 16:17编辑过]

提供的文件缺少 x.fpt 文件

收到的鲜花

• hyz00001 于 2018-05-17 16:18 送鲜花  1朵   附言：感谢你，请解答另外两个问题

修改结构可用 ALTER TABLE
如：
USE x
COPY TO tmp.dbf
USE tmp
ALTER TABLE tmp ALTER COLUMN 科目代码 C(10)
ALTER TABLE tmp ALTER COLUMN 科目名称 C(30)
BROWSE
USE

太感谢了，你帮助了我很大的忙。谢谢你！