Visual FoxPro 的疑难杂症

白日梦

tstan135 于 4-10-2004 10:48 AM  说 :
把 column 的 width 弄宽过后就成这样, column 与 column 不能连接。

这就是为什么 Good Morning 早就建议你不要把 Date 做成 Title，因为不是固定的。

不要再弄了。真的做不到时，放弃这方法，你的这种瓶颈就是 钻牛角尖。

Date 拉下来， 最左的 Title 放回上面。

GoodMorning

TSTAN 的毛病在于兩點

第一點,在傳統公司工作, 公司還沒有電腦化, 所以沒有其他人的幫忙,指導. 我相信他所看過的, 是由人手制作的報表(大本的工作簿吧) 在沒有其他人的作品下,系統結構上, 他的老板就成了他的系統分析員,那麼如何寫出一的好的系統呢 !

第二點, 除了對結構不熟, 對編程語言不熟.

建議: 如果對編程真的有興趣
離開現有的公司
1. 去念一念書吧!
2. 找一間編程公司工作吧.

白日梦

第一点我看的出，他帖的图是 Excel / Lotus 电子表，
我同事会计主任要求我做酱的报表，Estate's field 放成 title 就给我骂。
公司有4个Plantation，每个Plantation有不同的field。
老板要做什么软件，编程分析全由我做主，给老板分析感觉就像牛给牵着鼻子走。

第二点，慢慢来，很少人能一步登天。

tstan 你无论如何至少也要买几本书参考。
F1 help 教你的指令用法，书教的是应用程序编法。

拿经验好过啃死书，读千卷书不如行万里路。

tstan135

白日梦 于 4-10-2004 04:25 PM  说 :
第一点我看的出，他帖的图是 Excel / Lotus 电子表，
我同事会计主任要求我做酱的报表，Estate's field 放成 title 就给我骂。
公司有4个Plantation，每个Plantation有不同的field。
老板要做什么软件，编程分 ...

不错我展示的图是用 EXECL 做的，但确实有人可以用 PROGRAM 打印成以下的报表。

我想知道要如何在 ITEM A 和 DATE 的第二行，第三行。。。不会因 OUTGOING 的记录的增加而被填满。

[ Last edited by tstan135 on 5-10-2004 at 10:04 AM ]

tstan135

enry98 于 1-10-2004 02:34 PM  说 :
我通常 都会 create 一个 temp cursor,然后把所需要的资料照 要求 排列，过滤等等 抄进去 .......来解决比较 复杂点的 报表问题...........

你 可以 试试 CREATE CURSOR Temp ;
        (GroupID N(1), cTitl ...

请问可不可以举个详细的例子？

白日梦

你要的东西已在第12页回复了，这报表是等于我给的2个报表。

你就是有先入为主的概念遭成编程瓶颈，
VFP 做不到 Excel 的报表设计模式的。
1个是 database，field & record
第2是 spread sheet，row & column
两者是不同的软件，差别和处理方法都不同。

tstan135

你采用是直列，而我要的是横列。
以上的报表确实有人可以做出，我只不过用 EXECL 把它简单展示而已。

tstan135

请问要写一个 INVENTORY 的 PROGRAM 应该如何设计？
需要注意到哪些？
谢谢！

白日梦

横列的方法你可采用 enry98 的方法，总和在另一个档案，再由那档案里印出来。

库存系统可参考 UBS Stock，简单的如下，
Items Table
Category Table (optional)
Stock In / Out Records

报表有，
Stock Movement Listing
Stock Movement Summary
Stock Balance
Stock Re-order Level

tstan135

1.Stock In / Out Records 应该用同一个 TABLE 还是分开？
2.需要一个 TABLE 来纪录 STOCK B/F 吗？

白日梦

1. 我手上出过几百套 Stock，还是共用同一个 table - io.dbf 较好。

2. 不需要，b/f figure 可以由 io.dbf 算出来放进 item.dbf 的 field 里。

GoodMorning

白日梦 于 5-10-2004 06:35 PM  说 :

2. 不需要，b/f figure 可以由 io.dbf 算出来放进 item.dbf 的 field 里。

我是用兩個table ,

2.1. io master file ,記錄每個月的 opening blance, Stock in Qty, stock out1, stock out2 好處是可以任何時侯, 都可以知道當月的 庫存量走勢,

當然,某些軟體是以十八個月, 或是廿四個月的記錄,當每一年 closing 時就 做一個 posting

GoodMorning

tstan135 于 5-10-2004 09:27 AM  说 :

不错我展示的图是用 EXECL 做的，但确实有人可以用 PROGRAM 打印成以下的报表。

我想知道要如何在 ITEM A 和 DATE 的 ...

tstan
是可以的, 不是功夫不到家, 而是沒有這個必要, 花太多時間了, 在設計在慢, 在列印是慢

橫看, 直看, 只要看得出, 整齊, 明白, 就是好的報表!

不過, 如果你的老板出的起價的話, 大把人做得到!

不是不教你, 問題是沒有效率的報表. 如果你真的要花時間去做的話, 以下你自己試試吧 !

itemno      記錄產品的代號, 做為 grouping , sorting 用途  
dispitem    記錄該行要不要列印產品代號, 如在該產品第一行列印
rowno       記錄該行的 行號 , 確保不會跳行
bfqty       上月結存
indate      進貨日期
inqty       進貨數量
outdate     出貨日期
outqty      出貨數量
cf          結存

設立以上結構后,把你的資料做一個迴路, 加入以上結構, 列印出來. 如何制作迴路, 自己來吧.

tstan135

你们的方法是不是当我输入从什么日期到什么日期，它也能计算所有的 B/F, INCOMING, OUTGOING, C/F ？

tstan135

我有两个旧的 TABLE （从前他人写的 PROGRAM 里的 DATABASE），一个记录 STOCK IN 另一个记录 STOCK OUT 。请问要如何才能在 REPORT 里算出它的 B/F, STOCK IN, STOCK OUT, C/F, ITEM TOTAL。它的 COMMNAD 应该怎样写？REPORT 又应该如何设计？

白日梦

给你做参考吧！

这个 form 是 item.dbf，浅蓝色 直栏 就是 b/f， 还有 in, out, c/f 是 隐藏的 field。


按有印表机的钮就列印以下报表


另一个是 io.dbf，最右边的3个资料栏你可以淘汰掉，它是给 estate 用的，
浅蓝色 资料栏 cost 是运算的 formula field， = Iif(Qty=0, 0, Amt/Qty)，除零会出错。
负数的 Qty 表示 出了货，少了，item.bf 也跟着减少。


按有印表机的钮就列印以下报表


现在你知道为什么你一直卡在死胡同里。

[ Last edited by 白日梦 on 6-10-2004 at 01:22 PM ]

tstan135

请问白日梦，
1.你的 ITEM.DBF 和 IO.DBF 里有哪些 FIELD？

2.你的 QTY B/F 是不是在输入 STOCK IN 和 OUT 时就要计算然后 STORE 在 DATADASE 里?

浅蓝色 资料栏 cost 是运算的 formula field， = Iif(Qty=0, 0, Amt/Qty)，

3.COST 是不是它自动计算？要如何才做的到？

4.你的 REPORT 是不是只显示 STOCK IN 和 OUT 的 TOTAL 而已，而不是它的 DETAIL？

5.假设 *.DBF 里有 1 月 至 9 月的记录，我现在要找出之前好像 3 月的 B/F, IN, OUT, C/F 可以吗？

tstan135

请问 FORM 可不可以做成 EXE FILE？
如果可以应该怎样做？因为当我 RUN 后它就马上 EXIT 了。

GoodMorning

tstan135 于 6-10-2004 12:12 PM  说 :
请问 FORM 可不可以做成 EXE FILE？
如果可以应该怎样做？因为当我 RUN 后它就马上 EXIT 了。

加入 read events 在開始時, 在退出時 加入 clear events

白日梦

1.你的 ITEM.DBF 和 IO.DBF 里有哪些 FIELD？
Item - .Item, .Description, .BQ, .BA, .IQ, .IA, .OQ, .OA
IO - .Date, .Item, .Qty, .Amt

2.你的 QTY B/F 是不是在输入 STOCK IN 和 OUT 时就要计算然后 STORE 在 DATADASE 里?
是的，当离开 IO.Qty/IO.Amt 马上做出运算放入 Item.BQ,Item.BA

3.COST 是不是它自动计算？要如何才做的到？
Cost = Iif(Qty=0, 0, Amt/Qty)

4.你的 REPORT 是不是只显示 STOCK IN 和 OUT 的 TOTAL 而已，而不是它的 DETAIL？
我弄错图片，重复了。请看回上面。

5.假设 *.DBF 里有 1 月 至 9 月的记录，我现在要找出之前好像 3 月的 B/F, IN, OUT, C/F 可以吗？
进 Stock In/Out Form 时有个小 Form 需要输入 年月份，之后 filter 所选的月份。

6.请问 FORM 可不可以做成 EXE FILE？
可以，加入这行指令 Read Events 在 Thisform.Init 及 Clear Events 在 Thisform.Release。