SQL语句
'for payment type
sCmd = "Select Sum(B.PaymentAmount) As SPaymentAmount, Sum(B.Changes) As SChange, "
sCmd = sCmd & " B.PaymentType from Trans A INNER JOIN TransPayment B ON A.TransID = B.TransID "
sCmd = sCmd & " Where B.BusinessDate " & sDtCr & " And "
sCmd = sCmd & " A.TransStatus In (2, 3, 4) "
sCmd = sCmd & " Group By B.PaymentType "
sCmd = sCmd & " Order By B.PaymentType"
Set oRs = oCmn.ExecRS(sCmd, SDCN)
Do While Not oRs.EOF
cTotalSales = cTotalSales + IIf(IsNull(oRs!SPaymentAmount), 0, oRs!SPaymentAmount)
If UCase(Trim(oRs!PaymentType)) = "CASH" Then
cCashInDrawer = cCashInDrawer + IIf(IsNull(oRs!SPaymentAmount), 0, oRs!SPaymentAmount)
End If
sPrnLn = Space(9) & PADR(Trim(oRs!PaymentType), 10) & ": " & PADR(oCurrency.FormatCurrency(IIf(IsNull(oRs!SPaymentAmount), 0, oRs!SPaymentAmount), , , True), 10)
AddContents sPrnLn
'P_PrintText sPrnLn, oPrn
相关问答：
我有一个表，结构是这样。
转出 单位 转入单位 笔数 金额
date(主) outid(主) inid(主) num amt
2009 1 2 1 500 为 1 单位 在2009� ......
从数据库中查询一张表的数据
select 部门,姓名 from tb
如何才能生成下面的xml格式
XML code:
<folder state="unchecked" label="全部">
<folder state="unchecked&qu ......
小弟，最近要转行去做oracle开发了，由于大学毕业时，走了个弯路，现在很小心，问下，做PL/SQL有没有前途？？？
当然我说的这个前途是指 以后要跳槽，市场对这样的人才的需求量大不大？？
3q 那看来还只能先接� ......
我是在toad中输入下段sql
declare
TYPE test_rec IS record(
code varchar(10),
name varchar(30)
);
v_book test_rec;
......
表
id bh
1 10
2 11
3 12
4 15
5 16
6 22
7 25
8 26
9 27
10 28
将bh按连续分段出来返回字符串：
10~12，15~16，22，25~28
SQL code:
declare @t tabl ......
