ช่วงนี้ขึ้นปีงบประมาณใหม่มาได้สักพัก ก็เริ่มมีรายงานภาพรวมปีงบประมาณเข้ามาเรื่อยๆ ก็เลยอยากจะแชร์ความรู้ครับ
เป็นวิธีอีกวิธีที่สามารถให้ user เลือกปีงบประมาณได้ครับ เห็นจากรายงานท่านอื่นๆ ใช้แล้วก็มีหลากหลายเลยอยากแชร์ครับ
year_list:= GetPickupList('select "2551" union select "2552" union select "2553"');
if year_text='2551' then
begin
year1 :='2007';
year2 :='2008';
end else
if year_text='2552' then
begin
year1 :='2008';
year2 :='2009';
end else
if year_text='2553' then
begin
year1 :='2009';
year2 :='2010';
end;
oct := '"'+year1+'-10-01" and "'+year1+'-10-31"';
nov := '"'+year1+'-11-01" and "'+year1+'-11-30"';
dec := '"'+year1+'-12-01" and "'+year1+'-12-31"';
jan := '"'+year2+'-01-01" and "'+year2+'-01-31"';
feb := '"'+year2+'-02-01" and "'+year2+'-02-28"';
mar := '"'+year2+'-03-01" and "'+year2+'-03-31"';
apr := '"'+year2+'-04-01" and "'+year2+'-04-30"';
may := '"'+year2+'-05-01" and "'+year2+'-05-31"';
jun := '"'+year2+'-06-01" and "'+year2+'-06-30"';
jul := '"'+year2+'-07-01" and "'+year2+'-07-31"';
aug := '"'+year2+'-08-01" and "'+year2+'-08-31"';
sep := '"'+year2+'-09-01" and "'+year2+'-09-30"';
all := '"'+year1+'-10-01" and "'+year2+'-09-30"';