Citation :
.CommandText = Array( _
"SELECT INV.HIS, INV.PTF, INV.C_INS, INV.PAY, INV.L_PAY, INV.C_PAY, INV.L_PAY, INV.C_SEC, INV.L_SEC, INV.C_CLAS, INV.L_" _
, _
"T.V_PTF, INV.V_N" & Chr(13) & "" & Chr(10) & "FROM DBA.INV INV" & Chr(13) & "" & Chr(10) & "WHERE (INV.HIS={ts '" & varDate & " 00:00:00'}) AND (INV.PTF=" & varCode & " )" & Chr(13) & "" & Chr(10) & "ORDER BY INV.HIS, INV.CLAS, INV.L_CLAS" _
, "_ACT" )
|