Q&A

  • 10원 미만 절사
procedure Tprn_goji.Button1Click(Sender: TObject);

var

ms_sql : string;

begin

ms_sql := 'select '

+ 'a1 + b1 c1 ,a2 + b2 c2,'

+ 'c1 + c2 d'

+ ' from gg'

+ ' where gonum ='

+ ''''+n+'''';

prnt_grep.query2.sql.Clear;

prnt_grep.query2.sql.add(ms_sql);

prnt_grep.query2.close;

prnt_grep.query2.open;

prnt_grep.Quickrep1.print;

prnt_grep.QuickRep1.Preview;

prnt_grep.Free;



여기서 c1,c2값이 10원미만 절사 된값이어야되고 d값은 절사된 값의 합을 구한다.

+ ' (trunc((a1 + b1)/10)* 10) c1,'

+ ' (trunc((a2 + b2)/10)* 10) c2,'

+ ' (trunc((a1 + b1)/10)* 10) + (trunc((a2 + b2)/10)* 10) d'



이런 식으로 하니 에러가 나던데 방법좀 부탁합니다.



0  COMMENTS