AC-CREAT


原始程式

原始檔-起始
/*---------( AC-CREAT.C )--------------*/
#include    "W_FSAC.H"

FSACF001_T   ACF001;
char        *pS;
/*===========================================================================*/
main()
{   FILE  *fp1,*fp2,*ndx;
    int    i,no=0;

    GET_NAME;
    system("DEL FSAC?001");
    ndx=fopen("FSACF001.NDX","w+");
    clrscr();
    fp1=fopen("AC-creat","r");
    Tx=Utx_Open(47,3,80,24,3500,8,ON);
    OPEN_ACF001;
    while(1)
    {   memset(&ACF001,NULL,sizeof(ACF001));
        if(fgets(BufS,100,fp1) == NULL) break;
        if(BufS[0]<=SPACE) continue;
        pS=strchr(BufS,'\n');     *pS=NULL;
        BufS[7]=NULL;
        sprintf(ACF001.KEY,"%s",BufS);
        BufS[35]=NULL;
        sprintf(ACF001.ACN,"%s",&BufS[8]);
        printf("\n<%s> <%s>",ACF001.KEY,ACF001.ACN);
        for(i=0;i<13;i++) ACF001.DC_NO[0][i]=ACF001.DC_NO[1][i]=0;
        ACF001.DC='C';
        if(ACF001.KEY[0]=='1') ACF001.DC='D';
        if(ACF001.KEY[0]=='5') ACF001.DC='D';
        if(ACF001.KEY[0]=='6') ACF001.DC='D';
        if(memcmp("貸",&BufS[37],2)==0) ACF001.DC='C';
        if(memcmp("借",&BufS[37],2)==0) ACF001.DC='D';
        Ufk_Write(ACF001K,&ACF001);
        USprint(BufS,"%S----- %S------------------",ACF001.KEY,ACF001.ACN);
        fwrite(BufS,NDXL,1,ndx);
        Utx_Search(Tx,BufS);
        if(Tx->FIND) UFatal("重複 (%s)",BufS);
        Utx_Ins(Tx,BufS);
        no++;
    }
    printf("\n\n共有 %d 會計科目\n",no);
    exit(0);
}
原始檔-結束

科目參考檔

/*---------( AC-CREAT )-----------------*/
會計科目第一碼之類別

1 字頭 (資產類)
2 字頭 (負債類)
3 字頭 (股東權益類)
4 字頭 (營業收入類)
5 字頭 (營業成本類)
6 字頭 (營業費用類)
7 字頭 (營業外收益及費用類)
8 字頭 (所得稅類)
===================================

注意:以下(7)項會計科目之編號及名稱
因有特殊用途,不可誰隨意變更.

1101 現金
1102 銀行存款
1141 應收票據
2141 應付票據
3250 累積盈虧
3218 上期損益
3260 本期損益


1101 現金 借
1102 銀行存款 借
1104 匯撥中現金 借
1105 零用及週轉金 借
1130 短期投資 借
1131 有價證卷 借
1135 其他短期投資 借
1141 應收票據 借
1142 貼現應收票據 借
1143 備抵呆帳─應收票據 貸
1144 應收帳款 借
1145 備抵呆帳─其他應收款 貸
1146 應收分期帳款 借
1147 備抵呆帳─應收分期帳款 貸
1148 應收退稅款 借
1150 應收收益 借
1159 其他應收款 借
1160 備抵呆帳─其他應收款 貸
1201 商品存貨 借
1205 在途商品 借
1229 在途材料 借
1230 未分配材料運雜費 借
1231 寄銷品 借
1232 備抵存貨跌價損失 借
1251 預付費用 借
1252 用品盤存 借
1256 預付貨款 借
1257 預付稅款 借
1262 短期墊款 借
1268 其他預付款 借
1271 其他流動資產 借
1301 進項稅額 借
1401 償債基金
1402 職工福利基金
1403 改良及擴充基金
1404 退修基金
1429 其他基金
1441 長期股權投資
1444 長期債卷投資
1457 其他長期投資
1461 應期應收款
1462 備抵呆帳─長期應收款
1464 長期應收票據
1465 備抵呆帳─長期應收票據
1501 土地
1502 房屋基地
1503 生產用地
1511 土地改良物
1512 備抵折舊─土地改良物
1521 天然資源 借
1522 累積折舊─天然資源 貸
1531 房屋及建築 借
1532 累積折舊─房屋及建築 貸
1541 機械設備 借
1542 累積折舊─機械設備 貸
1546 儀器設備 借
1547 累積折舊─儀器設備 貸
1548 試驗設備 借
1549 累積折舊─試驗設備 貸
1551 運輸設備 借
1552 累積折舊─運輸設備 貸
1561 辦公設備 借
1562 累積折舊─辦公設備 貸
1581 其他有形營業資產 借
1582 累積折舊─其他有形營業資產 貸
1591 未完工程
1592 預付購置設備款
1701 商標權
1702 專利權
1703 特許權
1704 典權權利
1707 商譽
1709 租賃權益
1801 閒置資產
1802 備抵折舊─閒置資產
1808 其他非營業資產
1809 備抵折舊─其他非營業資產
1811 存出保証金
1812 催收款項
1813 備抵呆帳─催收款項
1819 其他雜項資產
1821 開辦費
1825 遞延技術合作費
1826 遞延權利金
1831 債卷折價
1832 債卷發行費用
1841 未攤銷損失
1849 其他遞延費用
1853 保管品
1854 保證品
1863 應收保證票據
1864 保證證卷
1865 存出保証票據
1876 承銷品

2100 短期借款 貸
2101 銀行透支 貸
2102 銀行借款 貸
2103 應付商業本票
2104 應付商業本票折價
2109 其他短期借款
2141 應付票據 貸
2143 應付帳款 貸
2145 應付代收款 貸
2147 應付費用 貸
2148 應付所得稅 貸
2149 應付其他稅捐
2150 暫估應付機料款
2154 應付股利 貸
2156 應付獎金 貸
2179 其他應付款
2251 預收貨款
2253 預收收入 貸
2259 其他預收款
2261 其他流動負債
2301 銷項稅額 貸
2501 應付公司債卷
2502 債卷溢價
2504 長期借款
2505 長期應付款
2506 應付分期款項
2601 存入保証金 貸
2602 遞延收入
2604 土地增值稅準備
2605 換兌損失準備
2606 退休金準備 貸
2607 外銷損失準備
2853 應付保管品
2854 存入保証品
2863 存入保証票據
2864 存入保証證卷
2865 應付保証票據
2876 受託承銷品

3101 資本(股本) 貸
3109 預收股款(資本)
3111 股本溢價
3119 其他資本公積
3201 法定公積
3202 特別公積
3250 累積盈虧 貸
3218 上期損益
3260 本期損益 貸
3301 土地重估增值準備
3301 固定資產漲價補償準備
3301 資產增值準備

4101 銷貨收入 貸
4103 銷貨退回 借
4104 銷貨折讓 借
4201 勞務收入 貸
4201 加工收入 貸
4301 業務收入 貸
4302 業務折讓
4609 其他營業收入
4711 製成品
4721 副產品
4731 半製品
4741 在製品
4751 原料
4761 物料
4771 燃料

5101 銷貨成本 借
5201 進貨 借
5203 進貨退出 貸
5204 進貨折讓 貸
5301 進料 借
5303 進料退出 貸
5304 進料折讓 貸
5305 盤點轉存貨 貸
5401 製─直接人工 借
5501 製─間接人工 借
5515 製─折舊及耗竭
5516 製─各項攤銷
5520 製─研究實驗費
5522 製─職業訓練費
5523 製─勞務費
5524 製─燃料費
5525 製─團體會費
5526 製─書報雜誌費
5527 製─權利金
5529 製─間接材料
5531 製─檢驗費
5535 製─損壞品及重製費
5536 製─搬遷費
5549 製─其他製造費
5598 製─已分配製造費
5599 製─少(多)分配製造費
5601 製─勞務成本
5701 製─業務成本
5901 製─其他營業成本

6101 薪資費用 借
6102 租金費用 借
6103 文具用品 借
6104 旅費 借
6105 運費 借
6106 郵電費 借
6107 修繕費 借
6108 廣告費 借
6109 水電費 借
6110 保險費 借
6111 交際費 借
6112 捐贈 借
6113 稅捐 借
6115 折舊 借
6116 各項攤銷 借
6118 伙食費 借
6119 職工福利
6121 佣金
6122 職業訓練費
6123 勞務費
6124 燃料費
6125 團體會費
6126 書報雜誌費
6128 印刷費
6136 搬遷費
6137 會議費
6138 出口費用
6149 其他攤銷費用
6215 呆帳損失
6220 研究實驗費
6222 職業訓練費
6227 權利金
6249 其他管理及總務費用

7101 利息收益 貸
7102 兌換收益 貸
7103 租賃收益 貸
7104 佣金收益 貸
7105 投資收益 貸
7106 財產交易收益 貸
7107 盤存盈餘 貸
7109 權利金收益 貸
7121 出售下腳及廢料收益 貸
7128 整理收益 貸
7130 賠償收益 貸
7131 政府補助收益 貸
7149 其他營業外收益 貸
7301 利息費用 借
7302 兌換損失 借
7303 災害損失 借
7305 投資損失 借
7306 財產交易損失 借
7307 盤存損失 借
7308 外銷損失 借
7310 停工損失
7313 出售材料損失
7324 有價證卷跌價損失
7328 整理費用
7332 賠償損失
7340 存貨跌價損失
7348 非常損失
7349 其他營業外費用及損失
8101 預計所得稅

Z001 期初存貨 (買賣業)
Z002 進貨 (買賣業)
Z003 期末存貨 (買賣業)

Z001 期初存料 (製造業)
Z002 進料 (製造業)
Z003 期末存料 (製造業)
Z004 期初在製品盤存 (製造業)
Z005 期末在製品盤存 (製造業)
Z006 期初製成品盤存 (製造業)
Z007 期末製成品盤存 (製造業)

Byron Wey  Oct.21.1998


回首頁C之城