现有“开支明细表.dbf",我想根据其中的“支出明细”动态生成“开支统计表.dbf",开支统计表中的字段名由“开支明细表.dbf的“开支明细”动态生成，请各位高手不吝赐教，万分感谢！（纯属个人爱好，不喜勿喷，全当路过）


“开支统计表.dbf"样式如下：

[此贴子已经被作者于2025-10-29 12:41编辑过]

老师又出考题
这题是没有“，”也没有“,”了
其实将“元”替换为“,”就与上一题差不多了。
下一题是不是也没有“元”了？
哪来的数据这么另类

要是品名有个"状元糕"什么的.....

最后受字段个数限制，这种数据表设计的不好

谢谢,说的有道理。

如果“开支明细”中内容变为“巧克力9果汁6果冻6.5车费20”，去掉标志“元”，代码应如何写，请高手赐教，谢谢！！！

[此贴子已经被作者于2025-10-29 21:51编辑过]

DECLARE long sscanf IN msvcrt long,string,single@,long@
DECLARE long strcpy IN msvcrt string@,string
DECLARE long strcpy IN msvcrt as strcpy_ptr long,string

cBuffer = REPLICATE(0h00,256)
pBuffer = strcpy(@cBuffer, "")
getExpenditureRecord("巧克力9果汁6果冻6.5车费20")

FUNCTION getExpenditureRecord(er)
    LOCAL a as Single, n as Long, p as Long, ph as Long
    a = 0.00
    n = 0
    p = strcpy_ptr(pBuffer, er)
    ph = p
    DO WHILE SYS(2600,p,1) != 0h00
        IF sscanf(p,"%f%n",@a,@n) == 1
           ? SYS(2600,ph,p-ph), a
           p  = p+n
           ph = p
        ELSE
            p = p+1
        ENDIF
    ENDDO
ENDFUNC

[此贴子已经被作者于2025-10-29 22:33编辑过]

谢谢！如何在代码中加上表文件“开支明细表.dbf"? 盼指点！

getExpenditureRecord(er)可以取出任何一条记录的费用名称和费用金额

谢谢！我想用上表文件“开支明细表.dbf",动态生成如附件所示的“开支统计表.dbf",不知如何操作，请指点！