bikin laporan yang field dan kolomnya tidak selalu sama

[fansul]

Bagaimana caranya bikin design report yang field dan kolomnya tidak menentu.
klu di dos, biasanya saya pakai for next untuk kolom dan macro untuk field nya.
for x = skolom to ekolom
     xx = IIF(x < 10, "0"+str(x,1),str(x,2))
    @ PROW(),10 say field_&xx  pict "99,999,999.99"
next
klu vfp (design report) caranya bagaimana ya.
contoh misalnya mau bikin laporan penjualan tahunan, pilihan print bisa
dari jan - des (12 kolom, jual_01 s/d jual_12)
jan - juni (6 kolom, jual_01 s/d jual_06)
april - juni (3 kolom, jual_04 s/d jual_06)
jadi tidak menentu.
tks

[davidmustakim]

yang termudah adalah buat frx yang didasarkan pada cursor temporer yang berisi field2 dengan nama tetap, mis: bulansatu,bulandua,bulantiga... dst, cursor itu sendiri dibuat dengan: SELECT bulan_01 AS bulansatu,... dst...
lalu ya langsung: report form r_tes to printer prompt preview

[fansul]

arti kita harus siapkan 12 kolom (jan-des) pakai atau tidak di pakai, klu kita print jan-jun kolom yang terisi hanya jan-jun, sedangkan jul-des di biarkan kosong.
tidak bisa kah hanya yang tampil jan-jun aja.
apakah ada fungsi di frx yang bisa membalik baris menjadi kolom ya ?
tks

[davidmustakim]

daripada pusing siapkan aja lebih dari satu frx, yang model 2 kolom, 6 kolom dst
soal balik dari baris ke kolom atau sebaliknya ya balik dalam tahap cursor/tabel aja dulu
yang penting ketagih, hehehe

[foxever_fox]

kalau pake print when ??

[foxy]

@fansul:

Tinggal digabungin tuh post pak david dan pak foxever_fox; bikin cursor seperti post pak david, lalu bikin variable seperti ini:

&& assumsi: lnStartBulan dan lnEndBulan berisi nilai numerik
&&                mulai dari bulan ke-n sampai bulan ke-m
for liMonth = lnStartBulan to lnEndBulan
   lcNamaVar = "lcCaptionBulan" + Trans(liMonth)
   store cmonth(date(2010,liMonth,1)) to (lcNamaVar)
endfor

Nah, di report, Anda tinggal membuat 12 textbox sebagai header kolom dengan expression "lcCaptionBulan1" sampai dengan "lcCaptionBulan12" . Seperti post pak foxever_fox, tambahkan expression di Print When yang sesuai (silakan cari sendiri expression yang cocok - bisa pakai !empty(), atau bisa juga isnull() -- tergantung query Anda )

hth,
foxy

[davidmustakim]

kayaknya pake "print when" ga cocok darah sama thread starter karena ga suka ada space yang bolong, makanya saya usul pake 12 macam frx, ato lebih... lebih cepat kayaknya daripada 12 x posting plus coba ngerti dan test2 jawaban

[Ronald_CH]

logikanya bisa seperti ini :
  di table asli atau table transaksi pasti ada field tanggal nah dari sana kuncinya
 
  kondisikan dulu tanggal,bulan,tahun  dari transaksinya dan insert ke table cursor yang berisikan field bln01,bln02,bln03, dan seterusnya.....................................

untuk menampilkan field di report pastinya akan membuat form dan textbox yang bertype date()= thisform.text1.value=ctod("  /  /  ")

saat thisform.text1.value kehilangan focus atau lost focus()
maka
         trn_bln="bln"+right("00"+alltrim(str(month(thisform.text1.value))),2)

nah maka di report frx tambahkan lewat list properties fieldnya dengan trn_bln maka setelah report dijalankan maka isi dari trn_bln akan sesuai dengan bulan transaksi yang anda inputkan di from pada textbox tanggal tadi

[davidmustakim]

oi oi oi...  mas fansul itu maunya lebar dan letak kolom disesuaikan dengan jumlah kolom agar tampil pas serasi di cetakan.
dengan kata lain desain frx "on the fly"....  kalo bolong2 buat alergi kali

[Ronald_CH]

kalo gitu pake laporan dengan text aja dengan cara ' SET ALTE TO'

[fansul]

benar pak david itu yang saya mau, klu masalah data udah nggak masalah demikian juga klu print text aja sich emang sekarang demikian.

[armen_sakti]

@fansul,

Kalo mao hardcode, anda bisa hacking dikit file Report.FRX saat RunTime, kuncinya hanya mencopy record TextBox pada DETAIL, dan LABEL pada TITLE, dan lakukan Reposition TextBox/Label thd Ukuran Kertas kemudian Line di tambah Widtnya...

Gitu aja slama ini yg saya lakukan untuk Dynamic_ColumnCount_Report Class saya.

Silahkan..

[fansul]

Pak armen, bisa kasih bocoran kah pengenal kolom field dan kolom judul yang mana ya di file frx
atau ref nya bisa lihat di mana ya
tks

[armen_sakti]

Untuk Pengenal  anda liat field objectype, tapi saya rasa tidak penting bisa2 malah bikin kacau, baiknya gunakan field comment, anda tandai kolom field dan kolom judul saat report designer, nah cara ini paling gampang bagi sy untuk pengcopyan record saat hacking frx, setelah itu lakukan reposition (Replace HPOS) sesuai posisi yg dikendaki

hehehe...
Slamat mecoba

[~teguh~]

Kalo mao hardcode, anda bisa hacking dikit file Report.FRX saatRunTime, kuncinya hanya mencopy record TextBox pada DETAIL, dan LABELpada TITLE, dan lakukan Reposition TextBox/Label thd Ukuran Kertaskemudian Line di tambah Widtnya...

hehe.. Mas Armen ngajarin yang gak2 aja nih.... 

Asal jgn 'ngilang' aja yah sebelum pembahasan ini selesai...
Kasian Pak DEM nanti yg nerusinnya 

salam,
~teguh~