PDA

View Full Version : حرفه ای: ليست بيماران فردا بر اساس تاريخ امروز(printnormal)



imani1983
یک شنبه 05 اردیبهشت 1389, 01:56 صبح
سلام
من برنامه كلينيك مي نويسم ،تو برنامه ام به يك مشكل بر خورده ام يك جدول دارم كه تاريخ و نام وفاميلي و شماره و... را در خود نگه مي دارد، و مي خواستم يك دستور sql براش بنويسم كه بر اساس تاريخ امروز بيمارني كه براي فردا شماره ويزيت گرفته اند ليست كند.
نام جدول paziresh_temp و از Adodataset استفاده مي كنم
ممنون مي شم كمكم كنيد.منتظرم%:قلب::بوس:

pezhvakco
یک شنبه 05 اردیبهشت 1389, 08:48 صبح
درود :

شما تاریخ فردا را بدست بیار و در بانک بر اساس اون گزارش بگیر .


Tomorrow : TDateTime;
...

Tomorrow := Now + 1;

یا


Tomorrow : string;
....
Tomorrow:=DateToStr(Date +1);

فکر خوش .

حسین شهریاری
یک شنبه 05 اردیبهشت 1389, 09:33 صبح
SHEBHE CODE:

var
strdate:string;
strdate:=copy(disp_date,1,2)+strdate+copy(disp_dat e,4,2)+strdate:=copy(disp_date,7,2);
strdate:=inttostr(sttrtoint(strdate)+1);


Select * from paziresh_temp
Where Paz_Date=Qotedstr(strdate);