ورود

View Full Version : SCAN ... ENDSCAN



Esikhoob
یک شنبه 23 دی 1386, 20:49 عصر
با سلام
دوستان آیا تا حالا دیدید که SCAN ... ENDSCAN وقتی هیچ شرطی نداشته باشد روی یک table فقط یکبار اجرلا شود و برای رکوردهای بعدی تکرار نشود ؟
لطفا این فایلهایی که فرستادم را در C:\temp\ کپی کنید و بعد فایل testscank.prg را اجرا کنید. خواهید دید که آن loop فقط یکبار اجرا می‌شود و فقط مقدار یک k چاپ می‌شود.
البته arzesh.dbf را بعد از چند بار اجرای برنامه مان بدست آوردم در حالاتهای خاصی از این DBF ، نتیجه بالا بدست می‌آید. برنامه بالا را برای شبیه سازی اشکال نوشتم .
لطفا در این مورد اگر مسئله ای را نمی‌دانم به من بگویید.
من معمولا با VFP9SP2 و VFP5 کار میکنم.
متشکرم

ALI RAFFIE
دوشنبه 24 دی 1386, 00:08 صبح
اگر به دو دستور زیر دقت کنی میفهمی اشکال کار کجاست
SET ORDER TO 1
REPLACE t_ch_date WITH p_date
در داخل حلقه عبارت تجی(Tag) رو عوض کردی که با دستور Set Order فعال شده.