CubicPower 計算頁面:雲端計算-企業財務管理-流動性
Algo Once pseudo-code is designed to describe algorithms in local languages with VB style code.
by Chao-Yih Hsia (Mark Hsia) 2010/08/07
Sub |
MainCompute |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
[固定資產] = [無形資產] + [淨固定資產] + [長期投資] |
|
|
|
[流動資產]= [存貨] + [應收帳款] + [現金] + [雜項流動資產] |
|
|
|
[業主資金] = [資本額] + [資本公積] + [收益準備金] |
|
|
|
|
[流動負債] = [短期貸款] + [應付帳款] + [雜項流動負債] |
|
|
|
|
|
|
|
|
|
|
|
|
[總資產] = [固定資產] + [流動資產] |
|
|
|
|
|
[負債/資金] = [業主資金] + [長期貸款] + [流動負債] |
|
|
|
|
|
|
|
|
|
|
|
|
|
[息前稅前盈餘] = [銷售] - [營業成本] |
|
|
|
|
|
[稅前盈餘] = [息前稅前盈餘] - [利息] |
|
|
|
|
|
[稅後盈餘] = [稅前盈餘] - [稅金] |
|
|
|
|
|
[保留盈餘] = [稅後盈餘] - [股利] |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
If [流動負債] <> 0 Then |
|
|
|
|
|
|
|
[流動比率] = [流動資產] / [流動負債] |
|
|
|
Else |
|
|
|
|
|
|
|
|
|
{驗證結果}={驗證結果}(+)` 輸入資料錯誤! 流動負債 為 0` |
|
|
End If |
|
|
|
|
|
|
|
|
If [流動負債] <> 0 Then |
|
|
|
|
|
|
|
[速動比率] = ([流動資產]- [存貨]) / [流動負債] |
|
|
|
Else |
|
|
|
|
|
|
|
|
|
{驗證結果}={驗證結果}(+)` 輸入資料錯誤! 流動負債 為 0` |
|
|
End If |
|
|
|
|
|
|
|
|
If [銷售] <> 0 Then |
|
|
|
|
|
|
|
|
[營運資金佔銷售比率] = ([流動資產] - [流動負債]) / [銷售]* 100 |
|
Else |
|
|
|
|
|
|
|
|
|
{驗證結果}={驗證結果}(+)` 輸入資料錯誤! 銷售 為 0` |
|
|
End If |
|
|
|
|
|
|
|
End Sub |
|
|
|
|
|
|
|
|
' CopyRight (C) 2010 Chao-Yih Hsia