ACCECC导出数据到XML文件中

记录集1.打开 (sql, #SQL语句, )
sql ＝ “select count(*) as 正常数量,sum(zzsse) as 税额合计,sum(bhsj) as 未税金额 from T05FPMX where FPBZ='0' and KPRQ between ” ＋ 日期起 ＋ “ and ” ＋ 日期止
调试输出 (sql)
记录集1.打开 (sql, #SQL语句, )
记录集1.读文本 (“未税金额”, 未税金额)
记录集1.读文本 (“税额合计”, 税额合计)
' 正常数量 ＝ 到文本 (记录集1.记录数量)
记录集1.读文本 (“正常数量”, 正常数量)
sql ＝ “select count(*) as 作废数量,sum(zzsse) as 作废税额,sum(bhsj) as 作废金额 from T05FPMX where FPBZ='1' and KPRQ between ” ＋ 日期起 ＋ “ and ” ＋ 日期止 ＋ “ ”
记录集1.打开 (sql, #SQL语句, )
记录集1.读文本 (“作废数量”, 作废数量)
记录集1.读文本 (“作废税额”, 作废税额)
记录集1.读文本 (“作废金额”, 作废金额)
标签.标题 ＝ “正常发票： ” ＋ 正常数量 ＋ “ ，未税金额： ” ＋ 未税金额 ＋ “ ，税额： ” ＋ 税额合计 ＋ #换行符 ＋ “作废数量： ” ＋ 作废数量 ＋ “ ，作废金额： ” ＋ 作废金额 ＋ “ ，作废税额： ” ＋ 作废税额