Neyzen,
VFPnin versiyonundan bagimsiz ufak hileli bir yontem ama biraz hazirlik gerekiyor:
Ilk tablo icin gecici bir rapor:
Visual Fox Pro
1
2
| USE customer ALIAS t1
CREATE REPORT temp1 FROM ALIAS() ALIAS FIELDS Cust_id,Company,Contact column |
-Modi report temp1
-Tum baslik ve fieldleri sec
-DblClick
-Properties
-Altta Apply these conditions ... isaretle (fieldlere tek tek yapmamak icin)
-Print only when ... kismina:
tablenumber=1
-OK
-Sakla ve kapat
Ikinci tablo gecici rapor:
Visual Fox Pro
1
2
3
| USE employee ALIAS t2
CREATE REPORT temp2 FROM ALIAS() ALIAS ;
FIELDS emp_id,First_Name,Last_Name,Birth_Date column |
(Not: Gecici raporlar sadece tablo basina rapor icerigini rahat hazirlamak icin). Ayni islemi buna yap, yalniz 'Print only ...' icin:
tablenumber=2
kullan. Gecici raporlar hazir. Ikisini birlestiren rapor:
modi report TwoTables
modi report temp1
modi report temp2
-TwoTables'a gec.
-Data grouping ekle. Expression: tablenumber
-Temp1'e gec baslik ve alanalari kopyele
-TwoTables'a yapistir (basliklar Group header'a)
-Temp2 ile aynisini yap.
Su anda Group headerda her ikisinin basliklari ustuste duruyor, detailde de alanlari. Sakla kapat. Temp1,2 ile isin bitti. Silebilirsin.
Visual Fox Pro
1
2
3
4
5
6
7
8
9
10
11
12
| CLOSE DATABASES all
LOCAL lnTable1Records
SELECT * FROM customer ORDER BY company INTO CURSOR t1 nofilter
lnTable1Records = _tally
SELECT * FROM employee ORDER BY first_Name,last_Name INTO CURSOR t2 nofilter
SELECT 1 as tablenumber FROM t1 ;
UNION ALL ;
SELECT 2 as tablenumber FROM t2 ;
INTO CURSOR crsReport
SET RELATION TO RECNO() INTO t1, RECNO()-m.lnTable1Records INTO t2
REPORT FORM twoTables preview
SET RELATION to |
Yen yaz 1907'ye yolla FB gelsin evinde yensin.
(sonra salaklar ciksin alin terine şike desin)
