 |
VFP 愛用者社區
本討論區為 Visual Foxpro 愛用者經驗交流的地方, 請多多利用"搜尋"的功能, 先查看看有無前例可循, 如果還有不懂的再發問. 部份主題有附加檔案, 須先註冊成為社區居民才可以下載.
|
| 上一篇主題 :: 下一篇主題 |
| 發表人 |
內容 |
goodnight
註冊時間: 2008-10-13
文章: 473
來自: 台南市
第 1 樓
|
 發表於: 星期一 六月 29, 2009 7:23 am 文章主題: 可否求教一個程式的寫法 (BOM展階的程式) |
 |
|
各位先進
公司是用ERP, 我想自己寫一個BOM展階的程式, 來做採購單及一些報表, 因為ERP作業的報表實在不人性化
它的BOM檔結構如下
單頭
主件
A
BX
CX
順序, 主件, 下階, 下階用量
01 ,A ,AX ,1
02 ,A ,BX ,4
03 ,A ,B ,1
04 ,A ,D ,6
01 ,BX ,CX ,1
02 ,BX ,F ,4
01 ,CX ,E ,4
所有上下階都在同一個檔, 由上階去找下階, 一直往下展, 但我要怎麼判斷它有幾階呢??我分析了資料內容, 沒有註記主件的階次, 因為我無法知道要做幾次迴圈
能否指導我一些概念和方向呢, 應該是很複雜對吧
報表希望
第一階
AAAAAAAAAAAA
第二階
BBBBBBBB
第三階
BBBBBBBBB
第四階
CCCCCCCCC
第二階
第二階
第二階
第二階 |
|
| 回頂端 |
|
 |
syntech
註冊時間: 2003-05-16
文章: 4249
來自: Taipei,Taiwan
第 2 樓
|
| 發表於: 星期一 六月 29, 2009 9:10 am 文章主題: |
|
|
BOM 展開是很多軟體公司的基本技能呢!!
基於公司機密,我不能說明太多.
不過你可以使用一個變數當作階次.
有些人會使用 遞迴式展開,有些人會使用 非遞迴式,一次處理一個階次的所有展開.
這都可以利用階次變數記錄.
有點技術的公司是不會預先"猜測"要展幾階,
而是依照條件決定是否繼續展開下去
"我分析了資料內容, 沒有註記主件的階次, 因為我無法知道要做幾次迴圈",
這段話就很明顯的有問題.
你怎麼會覺得 BX 一定用在第2階,CX 一定用在第3階.
如果你不覺得BX一定用在哪一階,那麼還需要註記階次嗎?
所以關鍵就是第二段的最後一句.
這也是每一家MRP/ERP 廠商作的好不好的關鍵.
比較差的軟體公司,設計BOM,採購BOM(決定哪些該採購),生產BOM(決定工單領料內容),等等.
必須分開設定.
_________________
如果公司有下列困擾:
1. 找不到便宜,快速,簡易的 生產排程軟體
2. 不知道如何快速排定 採購計劃
3. 成本抓不準,自己算比軟體算有用
4. 想學習系統規劃,想找系統架構的顧問
請聯絡我們,也許我們幫得上忙 |
|
| 回頂端 |
|
|
green
註冊時間: 2003-09-19
文章: 137
第 3 樓
|
| 發表於: 星期一 六月 29, 2009 6:15 pm 文章主題: |
|
|
| 或許您可以找找資料結構的書來看看,裏面就有您的答案 |
|
| 回頂端 |
|
|
goodnight
註冊時間: 2008-10-13
文章: 473
來自: 台南市
第 4 樓
|
| 發表於: 星期二 六月 30, 2009 9:34 am 文章主題: |
|
|
| syntech 寫到: | BOM 展開是很多軟體公司的基本技能呢!!
基於公司機密,我不能說明太多.
不過你可以使用一個變數當作階次.
有些人會使用 遞迴式展開,有些人會使用 非遞迴式,一次處理一個階次的所有展開.
|
sy 大, 果然薑是老的辣
雖然在產品的編碼上, 假設 bx 一定是用在第二階, 但軟體並沒有這樣的限制, 您的解說真是一語點通, 看來我這個初級入門者來說, 遞迴是有點困難, 因為沒有寫過遞迴式
當初在想要怎麼利用迴圈判斷每一個主件的下階共有幾個階次, 同一階展開, 一定不會有問題, 一旦有下階, 就先展開, 再返回展同階, 只是卡在如何去不停的展階
我還是先試著用變數頂一下, 畢竟展階是很重要的, 一旦錯了就會很麻煩, 至少目前有個方向, 程式怎麼寫就自己再找資料研究了, 再次謝謝你 |
|
| 回頂端 |
|
|
syntech
註冊時間: 2003-05-16
文章: 4249
來自: Taipei,Taiwan
第 5 樓
|
| 發表於: 星期二 六月 30, 2009 10:25 am 文章主題: |
|
|
也沒那麼難啦.
| 代碼: |
func1 (LEVEL,ITEM)
{
LEVEL =LEVEL +1
SELECT FIELD1,FIELD2,..... FROM 結構 into cursor tmp WHERE FIELD1 = ?ITEM
SELECT TMP
SCAN
INSERT .......
func1 (LEVEL,FIELD2)
ENDSCAN
}
|
差不多就這樣.
(裡面陷阱超多. XD )
_________________
如果公司有下列困擾:
1. 找不到便宜,快速,簡易的 生產排程軟體
2. 不知道如何快速排定 採購計劃
3. 成本抓不準,自己算比軟體算有用
4. 想學習系統規劃,想找系統架構的顧問
請聯絡我們,也許我們幫得上忙 |
|
| 回頂端 |
|
|
|
|
您 無法 在這個版面發表文章
您 無法 在這個版面回覆文章
您 無法 在這個版面編輯文章
您 無法 在這個版面刪除文章
您 無法 在這個版面進行投票
您 無法 在這個版面附加檔案
您 無法 在這個版面下載檔案
|
|
常見問題
搜尋
會員列表
會員群組
會員註冊
個人資料
登入檢查您的私人訊息
登入
