VFP 愛用者社區

[markleong987]

請問如何把data以兩個表格格式輸出(見附件)，要一頁打印，不能分頁?
database用dbf

我只做到在報表明細段將一個表格輸出，但同一頁不知如何把兩個表格同時輸出.

[lurommou]

2個表的資料合併在一個表,井做GROUP 分2組即可

[markleong987]

那我先試試，有問題再請教， thank

[markleong987]

lurommou:你指用group分２組是不是用報表－＞數據分組功能來實現？

[syntech]

簡單的回一句"vfp6報表工具辦不到"比較快.


VFP6 的報表工具是 巢狀分組,單一detail.
所以你要想辦法做成這個形式才有機會.

[tigerlee39y]

把兩個dbf按照key值創造出一個新的dbf再來印表是否容易些

[sean27]

VFP 在同一頁是可以將兩個表格以上同時輸出的, 在第一個 表格結束後 換成第二個表格輸出就可以了
如果表格的欄位名稱都相同 格式還可以共用, 如果欄位名稱不同 或甚至格式不同 就利用 PRINT WHEN 來控制
至於如何更換到下一個表格就在 DETAIL 段的 ON EXIT 去處理

[syntech]

我習慣上會利用6樓提示的方式,
想辦法做成重組TABLE成一個列印用的CURSOR,
而不使用切換的方式,
這樣維護上比較困難.

[markleong987]

我的想法都是將兩個table的data合併為一個table，問題是A-D欄抬頭及E-H欄抬頭文字內容是不一樣。A-D欄可以在報表"頁標題段"控制文字內容及格式PRINT OUT，但至於E-H欄抬頭文字內容及格式又如何做控制print out?
看了sean27(感謝你的意見原來可以同一頁印兩個table，但第二個table欄位抬頭文字格式可否像"頁標題段"自定義?)，syntech，tigerlee39y意見，請問是否可以做到我所講的嗎?

[syntech]

[簡單的回一句"vfp6報表工具辦不到"比較快. ]


這句話絕對不是在開玩笑...... XD

[ckp6250]

遇到這種情況，我會找 Excel 幫忙。

[tigerlee39y]

我是較傾向syntech老兄的觀點,報表form不要太複雜,table或cursor比較可以隨心所欲

何況設定報表form的title很難嗎?,可以在:

1.在select時直接設定

2.報表form的title也是可以用變數的

請思考一下

[ericklin]

VFP6 沒用過 不過vfp9 可以多個detail 很簡單
A-D 一個cursor E-H 一個cursor 做兩個detail 就可以實現了

[jys]

Create Cursor mPrint (head01 C(10),Head02 C(10),Head03 C(10),Head04 C(10),A1 N(2),A2 N(2),B1 N(2),B2 N(2),;
C1 N(2),C2 N(2),D1 N(2),D2 N(2),cYear C(1),cGroup C(1),Head2_1 C(2),Head2_2 C(2),;
Head2_3 C(2),Head2_4 C(2),Head2_5 C(2),Head2_6 C(2),Head2_7 C(2),Head2_8 C(2))

Insert Into mPrint Values ( "A欄抬頭","B欄抬頭","C欄抬頭","D欄抬頭",1,2,3,4,5,6,7,8,"1","","A1","A2","B1","B2","C1","C2","D1","D2")
Insert Into mPrint Values ( "A欄抬頭","B欄抬頭","C欄抬頭","D欄抬頭",9,10,11,12,13,14,15,16,"2","","A1","A2","B1","B2","C1","C2","D1","D2")
Insert Into mPrint Values ( "A欄抬頭","B欄抬頭","C欄抬頭","D欄抬頭",17,18,19,20,21,22,23,24,"3","","A1","A2","B1","B2","C1","C2","D1","D2")
Insert Into mPrint Values ( "A欄抬頭","B欄抬頭","C欄抬頭","D欄抬頭",25,26,27,28,29,30,31,32,"4","","A1","A2","B1","B2","C1","C2","D1","D2")
Insert Into mPrint Values ( "A欄抬頭","B欄抬頭","C欄抬頭","D欄抬頭",33,34,35,36,37,38,39,40,"5","","A1","A2","B1","B2","C1","C2","D1","D2")

Insert Into mPrint Values ( "E欄抬頭","F欄抬頭","G欄抬頭","H欄抬頭",41,42,43,44,45,46,47,48,"1","1","E1","E2","F1","F2","G1","G2","H1","H2")
Insert Into mPrint Values ( "E欄抬頭","F欄抬頭","G欄抬頭","H欄抬頭",49,50,51,52,53,54,55,56,"2","1","E1","E2","F1","F2","G1","G2","H1","H2")
Insert Into mPrint Values ( "E欄抬頭","F欄抬頭","G欄抬頭","H欄抬頭",57,58,59,60,61,62,63,64,"3","1","E1","E2","F1","F2","G1","G2","H1","H2")
Insert Into mPrint Values ( "E欄抬頭","F欄抬頭","G欄抬頭","H欄抬頭",65,66,67,68,69,70,71,72,"4","1","E1","E2","F1","F2","G1","G2","H1","H2")
Insert Into mPrint Values ( "E欄抬頭","F欄抬頭","G欄抬頭","H欄抬頭",73,74,75,76,77,78,79,80,"5","1","E1","E2","F1","F2","G1","G2","H1","H2")

[syntech]

如果你的欄位結構差太多的時候,可以都用字串欄位,再用 transform() 轉換為適當的格式