Veri Sf>Rapor Sf Koşullu aktarım ?

[hsayar]

Selam arkadaşalar bundan bir kaç yıl önce bir tüpçüde çalışıyordum o zaman diğer forumundan @ofcakfanus arkadaşım ile bir bordro tipi hazırlamıştık...
Şimdi bunlar onun yedeğinide kaydetmişler benim pcde vardı ama askerde iken oda format yemiş neyse ... El atarsanız tekrar yapalım hatırlamıyorum

Şimdi 1 günlük sayfamız var
A:E erimi dolu
A: stok tipi [12/2/24/45]
B: Fiş Türü [p/v/t]
c: Fiş No
d: Adı Soyadı
e: Tutarı

Birde Tsb Sayfamız var
buraya burdan verileri alıp dolduracağız:

d=3 to 225 (günlüğün A Sütutunu)
e=11 to 44 (tsb A Sütunu)+11 to 44 (tsb g Sütutunu)
P=11 to 44 (tsb M Sütunu)
l= 11 to 23 (tsb s sütunu)
s= 32 to 44 (tsb s sütunu)
v=11 to 44 (tsb Y Sütunu)
T=11 to 44 (tsb AE Sütunu)

Ev tüp kontrol
------------------------------------------------
Günlük!A(e) = 12 ve Günlük!B(i) = P ise
Tsb!A(e)=Günlük!C(d) (FişNo)
Tsb!B(e)=Günlük!d(d) (adı Soyadı)
Tsb!E(e)=Günlük!e(d) (tutarı)

Günlük!A(e) = 12 ve Günlük!B(i) = V ise
Tsb!A(e)=Günlük!C(d) (FişNo)
Tsb!B(e)=Günlük!d(d) (adı Soyadı)
Tsb!E(e)=Günlük!e(d) (tutarı)

Tsb!Y(v)=Günlük!C(d) (Fiş No)
Tsb!Z(v)=Günlük!d(d) (Adı soyadı)
Tsb!AC(v)=Günlük!e(d) (tutarı)
-------------------------------------------------
Piknik Tüp Kontrol
------------------------------------------------
Günlük!A(p) = 2 ve Günlük!B(i) = P ise
Tsb!M(p)=Günlük!C(d) (FişNo)
Tsb!N(p)=Günlük!d(d) (adı Soyadı)
Tsb!Q(p)=Günlük!e(d) (tutarı)

Günlük!A(p) = 2 ve Günlük!B(i) = V ise
Tsb!M(p)=Günlük!C(d) (FişNo)
Tsb!N(p)=Günlük!d(d) (adı Soyadı)
Tsb!Q(p)=Günlük!e(d) (tutarı)

Tsb!Y(v)=Günlük!C(d) (Fiş No)
Tsb!Z(v)=Günlük!d(d) (Adı soyadı)
Tsb!AC(v)=Günlük!e(d) (tutarı)
-------------------------------------------------
Lokanta Tüp Kontrol
------------------------------------------------
Günlük!A(l) = 24 ve Günlük!B(i) = P ise
Tsb!S(l)=Günlük!C(d) (FişNo)
Tsb!T(l)=Günlük!d(d) (adı Soyadı)
Tsb!W(l)=Günlük!e(d) (tutarı)

Günlük!A(l) = 24 ve Günlük!B(i) = V ise
Tsb!S(l)=Günlük!C(d) (FişNo)
Tsb!T(l)=Günlük!d(d) (adı Soyadı)
Tsb!W(l)=Günlük!e(d) (tutarı)

Tsb!Y(v)=Günlük!C(d) (Fiş No)
Tsb!Z(v)=Günlük!d(d) (Adı soyadı)
Tsb!AC(v)=Günlük!e(d) (tutarı)
-------------------------------------------------
Sanayi Tüpü Kontrol
------------------------------------------------
Günlük!A(s) = 45 ve Günlük!B(i) = P ise
Tsb!A(s)=Günlük!C(d) (FişNo)
Tsb!B(s)=Günlük!d(d) (adı Soyadı)
Tsb!E(s)=Günlük!e(d) (tutarı)

Günlük!A(s) = 45 ve Günlük!B(i) = V ise
Tsb!S(s)=Günlük!C(d) (FişNo)
Tsb!T(s)=Günlük!d(d) (adı Soyadı)
Tsb!W(s)=Günlük!e(d) (tutarı)

Tsb!Y(s)=Günlük!C(d) (Fiş No)
Tsb!Z(s)=Günlük!d(d) (Adı soyadı)
Tsb!AC(s)=Günlük!e(d) (tutarı)
-------------------------------------------------
Veresiye Kontrol
>>>>>>>>>>Zaten satış veresiye ise yazdık
----------------------------------------------
Tahsilat Kontrol
Günlük!A(t) = "" ve Günlük!B(i) = T ise
Tsb!AE(t)=Günlük!C(d) (FişNo)
Tsb!AF(t)=Günlük!d(d) (adı Soyadı)
Tsb!AI(t)=Günlük!e(d) (tutarı)

Şimdilik Lazım Olan kısım bu

 

[hsayar]

Herhalde anlatamadım;
Tsb!A(e)
Tsb! : Verilen Aktarılacağı Sayfa
A : Verilen Aktarılacağı Sütun
(e) : Verilen Aktarılacağı Satır (for next döngüsünde alınacak değer üst satırda aralıklarını yazmıştım (11 to 44) gibi

Günlük!C(d)
Günlük! : Verilen Tutulduğu Sayfa bütün girşleri buraya aypıp Tüp satış bordrosuna aktarıyorduk....
C : Verilerin Tutulduğu sayfadaki Aktarılacak Sütun
(d) : Verilerin Tutulduğu sayfadaki Aktarılacak Satır Değerini for nextten alır...

Daha evvel yaptık ama yedek bir şekilde elimizde kalmadı yardım ederseniz gerçekten çok memnun olurum...

 

[hsayar]

Lütfen yardım ediniz