企業(yè)應(yīng)收款管理概述-資料下載頁(yè)
2025-06-26 05:12本頁(yè)面
【正文】 else. add tab2dmbtr to mlibum. endif. when 39。232139。. 長(zhǎng)期負(fù)債 if tab2shkzg = 39。S39。. add tab2dmbtr to mllibdnum. else. add tab2dmbtr to mllibum. endif. when 39。310539。 or 39。311139。. 所有者權(quán)益 if tab2shkzg = 39。S39。. add tab2dmbtr to mequitdnum. else. add tab2dmbtr to mequitum. endif. endcase. endloop. if massetdnum 0. 固定資產(chǎn)增加 if mllibum 0. 融資租賃固定資產(chǎn) if massetdnum mllibum. z_asset_rented = z_asset_rented + massetdnum. mllibum = mllibum massetdnum. massetdnum = 0. else. z_asset_rented = z_asset_rented + mllibum. massetdnum = massetdnum mllibum. mllibum = 0. endif. endif. endif. if massetum 0. 固定資產(chǎn)減少 if mlibdnum 0. 固定資產(chǎn)償還債務(wù)(經(jīng)營(yíng)性) if massetum mlibdnum. z_asset_debit = z_asset_debit + mlibdnum. z_debit_short = z_debit_short + mlibdnum. massetum = massetum mlibdnum. mlibdnum = 0. else. z_asset_debit = z_asset_debit + massetum. z_debit_short = z_debit_short + massetum. mlibdnum = mlibdnum massetum. massetum = 0. endif. endif. if mllibdnum 0. 固定資產(chǎn)償還債務(wù)(長(zhǎng)期) if massetum mllibdnum. z_asset_debit = z_asset_debit + mllibdnum. massetum = massetum mllibdnum. mllibdnum = 0. else. z_asset_debit = z_asset_debit + massetum. mllibdnum = mllibdnum massetum. massetum = 0. endif. endif. if minvestdnum 0. 以固定資產(chǎn)投資 if massetum minvestdnum. z_asset_invest = z_asset_invest + minvestdnum. massetum = massetum minvestdnum. minvestdnum = 0. else. z_asset_invest = z_asset_invest + massetum. minvestdnum = minvestdnum massetum. massetum = 0. endif. endif. endif. if minvestdnum 0. 投資增加 if massetum 0. 以固定資產(chǎn)投資 if massetum minvestdnum. z_asset_invest = z_asset_invest + minvestdnum. massetum = massetum minvestdnum. minvest = 0. else. z_asset_invest = z_asset_invest + massetum. minvestdnum = minvestdnum massetum. massetum = 0. endif. endif. endif. if minvestum 0. 投資減少 if mlibdnum 0. 以投資償還債務(wù)（經(jīng)營(yíng)性） if mlibdnum minvestum. z_invest_debit = z_invest_debit + minvestum. z_debit_short = z_debit_short + minvestum. mlibdnum = mlibdnum minvestum. minvestum = 0. else. z_invest_debit = z_invest_debit + mlibdnum. z_debit_short = z_debit_short + mlibdnum. minvestum = minvestum mlibdnum. mlibdnum = 0. endif. endif. if mllibdnum 0. 以投資償還債務(wù)（長(zhǎng)期） if mllibdnum minvestum. z_invest_debit = z_invest_debit + minvestum. mllibdnum = mllibdnum minvestum. minvestum = 0. else. z_invest_debit = z_invest_debit + mllibdnum. minvestum = minvestum mllibdnum. mllibdnum = 0. endif. endif. endif. if mstockum 0. 存貨減少 if mlibdnum 0. 以存貨償還債務(wù)（經(jīng)營(yíng)性） if mlibdnum mstockum. z_stock_debit = z_stock_debit + mstockum. z_debit_short = z_debit_short + mstockum. mlibdnum = mlibdnum mstockum. mstockum = 0. else. z_stock_debit = z_stock_debit + mlibdnum. z_debit_short = z_debit_short + mlibdnum. mstockum = mstockum mlibdnum. mlibdnum = 0. endif. endif. if mllibdnum 0. 以存貨償還債務(wù)（長(zhǎng)期） if mllibdnum mstockum. z_stock_debit = z_stock_debit + mstockum. mllibdnum = mllibdnum mstockum. mstockum = 0. else. z_stock_debit = z_stock_debit + mllibdnum. mstockum = mstockum mllibdnum. mllibdnum = 0. endif. endif. endif. if mequitum 0. 資本增加 if mlibdnum 0. if mlibdnum mequitum. z_debit_equit = z_debit_equit + mequitum. z_debit_short = z_debit_short + mequitum. mlibdnum = mlibdnum mequitum. mequitum = 0. else. z_debit_equit = z_debit_equit + mlibdnum. z_debit_short = z_debit_short + mlibdnum. mequitum = mequitum mlibdnum. mlibdnum = 0. endif. endif. if mllibdnum 0. if mllibdnum mequitum. z_debit_equit = z_debit_equit + mequitum. mllibdnum = mllibdnum mequitum. mequitum = 0. else. z_debit_equit = z_debit_equit + mllibdnum. mequitum = mequitum mllibdnum. mlibdnum = 0. endif. endif. endif. ENDOFDEFINITION.** * FORM cal_indirect * ** * ........ * ** * pbukrs * ** FORM cal_indirect USING pbukrs LIKE fmmpbukrs. DATA: BEGIN OF
高考資料相關(guān)推薦
鄂ICP備17016276號(hào)-1