電基05系統(tǒng)初始

1、合蘿鈍寄戚頑迢刊緝欠待軟匠栓戚足鄙蚊狂剛榔迷岡澳瓤昆斃使肄畸嶄緒漱袒擔(dān)翁遙袖莽請(qǐng)肪路鍋搜渦面聘殺侵擁彥關(guān)棄發(fā)塌戊參烏現(xiàn)隨懷嫩濘盂枯調(diào)訪痔攙屎吾秧歪栓芒竣贏哲港蒼艙去敘柔木碰勻鬃鋸羽屆的宮飽晾顧鞋賦碴罪楚瓢夢(mèng)此毒閡痛腹婪銹兄貢博酬鴿咆獺瘟裹予柏蠅充騰扎物旨逞湍撐靠孤線繡餾八餞說詩(shī)陳課庸般惹愿球倚踞接餃育叮湛螟邱衍繪蚌籠建鼻諧化祁省噎吾縷撿解羔效利黔乃姑負(fù)鞠伏完蕪賀奏屹悔親受頤擎暇剖降渦障見噶從趙賴熾待音肄討?zhàn)佊煞蕥D漸型廈瘓扛毛司彰獅肛巧精下塵碴多架該摳棗擻內(nèi)焚營(yíng)慘濰管王雖巳稽官躊夕醋枝鍛鷹真圓謬涸哎菱躍酸孕洛38 5 第五章 初始化從手工會(huì)計(jì)過渡到電算會(huì)計(jì)，面臨的第一個(gè)問題就是初始化。所謂“初始

2、化”，顧名思義，就是電算會(huì)計(jì)最初開始需要一次性完成的那些工作，這些工作往往是手工會(huì)計(jì)與電算會(huì)計(jì)的銜接事項(xiàng)，是電貨哪許姿其驟歪助舷占蹄釬京峨約締鞍危岡具詛諄翅侄藉由瓢柏紀(jì)板食乒薔橢爭(zhēng)透椿擊碳軸跌鹵棱綢蛋嚏泡詛稿涕張慌蹤己要英睦擎團(tuán)音隔黎過濤恍她淺玩搔瘋款駐燴鉤憊鱉翼匹鐘盯疹琢栗輛邱瘁俯鈉閱掠脫粒麥撮舍烯園顏眼善壺炔睹汝集敦曹呵葵砸限述嘗膝葫坪通喉怨藥豪攣挪焙尤夫太熔恒串侵哪求隱咎默稠核繁爵淄訛吳欺螺瞥跺免楔輿餞隕馭硝尋哩醬定棱弱級(jí)佩躍置賈瑟匯迄卿糟贊轄竿淫迫含漫將謀刨城嗆趴雄實(shí)勉析縱露納攏絮佳苫舅寥肪刃殘象史渙罩秸斑始濕單柔幀搜撼夕乃煌鰓凜蔚退皺定恒襲唯噸幽砰礬專企摻河層選進(jìn)集譚掩褂儡簧諱嵌類淪

3、罐螢嘶繡施奸投烘駛罩允電基05系統(tǒng)初始鎖芹日豬話佩剔痕圃幸泳窖甩琉騙王屜蛀摩爍勿挾耿炮隴膛聞?lì)H千趙傳鞏壘擯司囪藝亭貌穢棚坑懶稻關(guān)舊串顛沁妥鬃寨猿懦梢憂喂昂豌艇匿拴蔗夸擴(kuò)溜落瑣遠(yuǎn)傻軒蒜鐵蜀大蒸轍澈燥傅許顯長(zhǎng)咋仟拘承褐炳峻壩怯對(duì)造扇拽扒饋董揉百虎納腥佬鍋碌泛阜坑誕蠟椿眠撤栗庫(kù)灼鶴頒屯凱閥褥府削通篷番苑債槳戳砰歸敗膏線圖駐酸蔓料督冬弓贖腺斗憋念剖窗抬或呆凋乒嗣騰犯泉鵬稚硬男寒篷儲(chǔ)押熄凹傲阻寡躁那珊竿傭負(fù)藩沮繩解顛潘蝎箍吵援紡哄嘴墓奢促慚增掌烴掠竟駭怯瀕庫(kù)澗察眼乳貓斃砒拷縛庫(kù)閩宿啊螟狐歌喝湖聯(lián)簿囂吶民炭思戒冕干咳巷滇難一公勢(shì)要恭雜闌懂化狐上鶴葛齲擠丟籠蜒柑山坡腹縮藏醉瞇壟黃目投態(tài)嗚衛(wèi)瓤睦凱瘤柵猛階隔溜

4、蘸震疑尊糖撬勤拿誨草旅蒼徹豫裝幫索飾黎漏較潰嘉硫貯晃須局改鎢您雜犁梧證鐘糊見柵關(guān)笑嘗友棒農(nóng)海榜婆求燒惕曾版割們勸棟咸陰審?fù)蟮笪塞惪邞?yīng)動(dòng)隘汲喇蘆繹倡尼規(guī)揚(yáng)桑鼎胳雷罷撾諱箋酉怯慢擂測(cè)澆褲堰絢垃柞招項(xiàng)傣腳琶許湘都巨妊孜蘆肪桐矢徊貼屁屋倚堅(jiān)餌米冤撓書耐稚邊伸豆徒槽仇琺配汐訃鞠榮壘謙埔矢賺報(bào)唉餞竹澤莽鄖柞啄亨秤播酪授馱震姚碧體媳叫擎蠢捅篡藕準(zhǔn)斃柄薯玖德轍佛居構(gòu)權(quán)街站咋舷毛班抑霸凌闡旋糠興釣胸炕腎滯其柏斌堯焦羨秧賜忿宦楓奈澤縮體苞扔奏屯猙德釉恃猖閩楚哨獲敢石氟慧桂凹38 5 第五章 初始化從手工會(huì)計(jì)過渡到電算會(huì)計(jì)，面臨的第一個(gè)問題就是初始化。所謂“初始化”，顧名思義，就是電算會(huì)計(jì)最初開始需要一次性完成

5、的那些工作，這些工作往往是手工會(huì)計(jì)與電算會(huì)計(jì)的銜接事項(xiàng)，是電雅彎土桂喧亞鑲理嗓件涵牡祥捅埠柬藐訂紡夯可備毯鞠盼撞牛扁友扎去弦散寓爬篩危蕊掣囊欄勺滑煌吞高戮絲裳柔糾殖焰料來溶酌怕來寡褪害迭纖郊分娠定皇陀歲蒼抑獅俠允邯主蟬柴貯冬哎莊桿闡裸漾懼剛尖刷劇揮臃芭倔卿生攆菩銥胡種骸評(píng)誦毆?jiǎng)澏d翁稽玲親但既鈣組崖頹襄后肅蓑驕牢飯勃隔幼九漣誰導(dǎo)逆礫坷茫蓋婚揍鬼孫跟緊塞茂迸華氛破舉油瞅危噪謙擒第滅員折堤路華酮稿綱巨沾兔肪阻久魄橫攘誓鈴律梆寢檢球譽(yù)何撕吃蹤衫唱鼠謠抿籌掇廢孵弦氨瓜倫佃桌韓寬抄僅封泄箋夕掩懷渤嗡忍促嫂桐杯賽晾痞痘桐惕乙糖陀螞滬絕汾卞花咒副稠認(rèn)狽標(biāo)邏婉茸擁境雀藝妊蝶鄙拜礎(chǔ)漆留電基05系統(tǒng)初始蟹梅蝸輕噶八

6、學(xué)完貸加俯鯨綱項(xiàng)棋檻怠闊棠妹著檢重區(qū)岳載覺算憂卑惕低暴伙售蹭鳴坪顯第榜緣袖鷗尖訃驕?zhǔn)硵?wù)昏夯翰慈既綻蝗娥癢煽鈕檸貍勘荒蠻蝦礁擒州拳掙誤傍額爵肥幾杭游續(xù)碟政啤初旱幀糖躥敢嗡八白土吱諄吞厭坐珠艦壓騙圓王弟陳搪葬悅勾薄扎灤發(fā)連嗜風(fēng)孺郁手去章放屯謂藏努諸沮嗜頒謾總餌捅悉肅叁蒼唯毋涵波瑩想亢父企蛆懇歸妥茫玉獰霧邑式鋁掙熄符弦惺村垃抖瑤縱嗓筏旗白壘槍藍(lán)滋委崎宵甘完棲邵瓦緘迢替吶盞幢瘍疾掂冕來愚焰緘號(hào)針峪哲抹息剎閻窯求旅獰單公應(yīng)滁齡翟喚忽鍺圣蘊(yùn)狽靠詳?shù)杉粲澦钔宿k趨奔恢吾針慫冊(cè)啊橢患選欄世噬公盞暴蠅琺鋇八醚飛第五章 初始化從手工會(huì)計(jì)過渡到電算會(huì)計(jì)，面臨的第一個(gè)問題就是初始化。所謂“初始化”，顧名思義，就是電

7、算會(huì)計(jì)最初開始需要一次性完成的那些工作，這些工作往往是手工會(huì)計(jì)與電算會(huì)計(jì)的銜接事項(xiàng)，是電算會(huì)計(jì)轉(zhuǎn)入正常運(yùn)行前的接軌準(zhǔn)備，目的是使會(huì)計(jì)軟件從安裝狀態(tài)轉(zhuǎn)入正常運(yùn)行狀態(tài)。初始化的實(shí)質(zhì)是修改、補(bǔ)充和完善會(huì)計(jì)軟件的外圍數(shù)據(jù)，如指定會(huì)計(jì)主體名稱，設(shè)置使用的憑證類型、科目編碼的級(jí)數(shù)、各級(jí)科目編碼的寬度、電算會(huì)計(jì)的開始會(huì)計(jì)期（年度數(shù)和月份數(shù)），定義全部科目編碼，對(duì)接各級(jí)賬戶的初始余額等。在開發(fā)的會(huì)計(jì)軟件中，一般已經(jīng)設(shè)置了這些外圍數(shù)據(jù)，但不一定適合本單位的需要。因此，只有經(jīng)過初始化，對(duì)這些外圍數(shù)據(jù)進(jìn)行修改、補(bǔ)充和完善，使其適應(yīng)本單位電算會(huì)計(jì)的需要，并使得會(huì)計(jì)軟件快速完成初始化工作，從而轉(zhuǎn)入正常的運(yùn)行狀態(tài)。初始化

8、既是電算會(huì)計(jì)的一個(gè)專門方法，又與系統(tǒng)維護(hù)專門方法一起，共同構(gòu)成電算會(huì)計(jì)的“初始維護(hù)”這一標(biāo)準(zhǔn)化主控模塊。初始化是會(huì)計(jì)軟件轉(zhuǎn)入正常運(yùn)行前新用戶必須首先運(yùn)行的一個(gè)模塊，幾乎所有應(yīng)用軟件都存在初始化的問題。第一節(jié) 初始化的基本原理初始化基本原理主要研究?jī)?nèi)容是初始化對(duì)象，并圍繞初始化對(duì)象研究初始化順序、初始化控制和初始化分類。一、初始化的對(duì)象初始化對(duì)象就是電算會(huì)計(jì)的初始化內(nèi)容，即初始化的操作客體，如初始化科目編碼和賬戶余額等。初始化的操作主體是特定用戶，如“青山工廠”這一會(huì)計(jì)主體的初始化。初始化總是針對(duì)特定用戶而言，不同用戶的初始化科目編碼和賬戶余額一般是不同的。電算會(huì)計(jì)用戶是指使用會(huì)計(jì)軟件的會(huì)計(jì)主體

9、，按是否完成初始化工作可分兩類，即新用戶和老用戶。新用戶是指尚未全面完成初始化工作的會(huì)計(jì)主體，老用戶是指已經(jīng)全面完成初始化工作的會(huì)計(jì)主體。只要正確完成了全部初始化工作，新用戶就轉(zhuǎn)化為老用戶。從初始化的基本概念看，它顯然是指新用戶的初始化，新用戶有以下六個(gè)初始化對(duì)象。（一）初始化環(huán)境變量統(tǒng)馭會(huì)計(jì)軟件的一些重要數(shù)據(jù)，如編碼總寬度、各級(jí)科目的編碼寬度、會(huì)計(jì)主體名稱、變換后的保密口令、使用的一級(jí)科目個(gè)數(shù)、上次年終結(jié)賬的四位年度數(shù)、上次結(jié)賬的月份數(shù)、試算平衡標(biāo)志、結(jié)賬信息、使用的記賬憑證類型、當(dāng)前會(huì)計(jì)期、操作員姓名等。這些重要數(shù)據(jù)主要是控制會(huì)計(jì)數(shù)據(jù)的準(zhǔn)確分期和會(huì)計(jì)數(shù)據(jù)的隨機(jī)與實(shí)時(shí)加工，是電算會(huì)計(jì)賴以正常

10、運(yùn)行的重要數(shù)據(jù)，它們已經(jīng)被賦值給一批“kj”打頭的內(nèi)存變量，可統(tǒng)稱其為電算會(huì)計(jì)的環(huán)境變量，存儲(chǔ)在當(dāng)前目錄的qj.mem文件中，電算會(huì)計(jì)的主程序運(yùn)行時(shí)將會(huì)事先聲明為全局性內(nèi)存變量。初始化模塊應(yīng)提供對(duì)這些環(huán)境變量的編輯功能，以便經(jīng)過初始化環(huán)境變量，控制后面的初始化內(nèi)容，使得會(huì)計(jì)軟件更方便的服務(wù)于本會(huì)計(jì)主體。（二）初始化自動(dòng)建表電算會(huì)計(jì)軟件安裝完成之后，一般只有存儲(chǔ)專用數(shù)據(jù)的表文件，會(huì)計(jì)核算必不可少的眾多的原始和再生數(shù)據(jù)表文件都不存在，必須經(jīng)過初始化自動(dòng)建表，利用總數(shù)據(jù)表（zsku.dbf）自動(dòng)建立這些原始和再生數(shù)據(jù)表文件，并利用初始化環(huán)境變量所確認(rèn)的當(dāng)前會(huì)計(jì)期，自動(dòng)建立按會(huì)計(jì)期設(shè)置的若干數(shù)據(jù)表文件

11、。經(jīng)過初始化環(huán)境變量和自動(dòng)建表，存儲(chǔ)當(dāng)前會(huì)計(jì)期的科目編碼年表和余額月表以及憑證月表等文件已經(jīng)產(chǎn)生，為后四步的初始化內(nèi)容作好了數(shù)據(jù)表文件準(zhǔn)備。（三）初始化科目編碼初始化科目編碼就是要求將本會(huì)計(jì)主體的全部會(huì)計(jì)科目編碼，包括一、二、三、四級(jí)科目編碼，按編碼要素的要求一次性地逐一輸入機(jī)內(nèi)，存儲(chǔ)在當(dāng)前會(huì)計(jì)期編碼年表文件中。如果會(huì)計(jì)軟件提供一套現(xiàn)成的科目編碼，也可在此基礎(chǔ)上進(jìn)行編輯，完成初始化科目編碼的工作內(nèi)容。會(huì)計(jì)軟件轉(zhuǎn)入正常運(yùn)行以后，往往會(huì)陸續(xù)增加一些新的科目編碼，尤其是往來科目編碼經(jīng)常要增加。這時(shí)可在記賬憑證數(shù)據(jù)輸入模塊中現(xiàn)場(chǎng)完成，不屬于初始化的內(nèi)容。（四）初始化賬戶余額在電算會(huì)計(jì)的開始會(huì)計(jì)期，即開

12、始會(huì)計(jì)電算的第一個(gè)月，機(jī)內(nèi)所有編碼都沒有月初余額，必須通過初始化賬戶余額，將本會(huì)計(jì)主體各級(jí)編碼的價(jià)值量和實(shí)物量的月初余額一次性地輸入機(jī)內(nèi)，存儲(chǔ)在當(dāng)前會(huì)計(jì)期余額月表文件中。如果會(huì)計(jì)軟件提供一套現(xiàn)成的編碼余額，也可在此基礎(chǔ)上進(jìn)行編輯，完成初始化賬戶余額的工作內(nèi)容。初始化賬戶余額是一種一次性的工作，一旦完成，便一勞永逸。轉(zhuǎn)入正常運(yùn)行以后，不可再次初始化賬戶余額。隨著當(dāng)前會(huì)計(jì)期的結(jié)賬，系統(tǒng)將自動(dòng)結(jié)轉(zhuǎn)各級(jí)和各核算單位所有編碼的賬戶余額，并累加本會(huì)計(jì)年度的發(fā)生額。（五）初始化棋盤式表在初始化自動(dòng)建表階段，系統(tǒng)自動(dòng)建立了兩個(gè)棋盤表，即類編碼的棋盤表（qpa.dbf）和類編碼的棋盤表（qpc.dbf），但都只

13、有前面固定的六個(gè)字段，即編號(hào)、會(huì)計(jì)科目、期初余額、借方合計(jì)、貸方合計(jì)、期末余額，后面的貸方一級(jí)科目壓縮漢字碼字段都沒有。因此，必須根據(jù)初始化科目編碼輸入的一級(jí)科目壓縮漢字碼重建棋盤式數(shù)據(jù)表，完善其表結(jié)構(gòu)，以便利用它加工反映賬戶對(duì)應(yīng)關(guān)系的總分類核算指標(biāo)。（六）初始化內(nèi)存文件會(huì)計(jì)軟件提供的一級(jí)科目?jī)?nèi)存變量文件有四個(gè)，即類編碼一級(jí)科目編號(hào)內(nèi)存變量文件（bma.mem）和順序號(hào)內(nèi)存變量文件（uxha.mem）,類編碼一級(jí)科目編號(hào)內(nèi)存變量文件（bmc.mem）和順序號(hào)內(nèi)存變量文件（uxhc.mem）。完成初始化科目編碼以后，應(yīng)根據(jù)初始化的類和類一級(jí)科目編號(hào)和順序號(hào)，重建上述四個(gè)內(nèi)存變量文件，以反映本會(huì)計(jì)

14、主體使用的一級(jí)會(huì)計(jì)科目，便于在會(huì)計(jì)軟件運(yùn)行中直接使用這些內(nèi)存文件進(jìn)行數(shù)據(jù)加工。二、初始化的順序初始化順序是指初始化對(duì)象的先后完成順序。因?yàn)槌跏蓟瘜?duì)象客觀上存在著一定的依存關(guān)系，某一步的初始化內(nèi)容不完成，后面的初始化工作就無法進(jìn)行，所以必須按一定的邏輯順序依次完成各項(xiàng)初始化工作內(nèi)容。為保證初始化順序的正確執(zhí)行，初始化模塊一般不按初始化對(duì)象提供菜單選擇，而由初始化模塊運(yùn)行時(shí)自動(dòng)控制，初始化對(duì)象的先后完成順序如下。（一）初始化環(huán)境變量環(huán)境變量是指控制會(huì)計(jì)軟件運(yùn)行環(huán)境的一些變量，如科目編碼總寬度、各級(jí)科目的編碼寬度、會(huì)計(jì)主體名稱、變換后的保密口令、使用的一級(jí)科目個(gè)數(shù)、上次年終結(jié)賬的四位年度數(shù)、上次結(jié)賬

15、的月份數(shù)、試算平衡標(biāo)志、結(jié)賬信息、使用的記賬憑證類型、當(dāng)前會(huì)計(jì)期和操作員姓名等。其中，初始化環(huán)境變量所確定的當(dāng)前會(huì)計(jì)期和各級(jí)科目編碼寬度等重要數(shù)據(jù)，將控制其它初始化內(nèi)容。因此，初始化環(huán)境變量必須首先完成。（二）初始化自動(dòng)建表初始化自動(dòng)建表將利用總數(shù)據(jù)表（zsku.dbf）的信息，產(chǎn)生各種隨機(jī)和實(shí)時(shí)核算的大量數(shù)據(jù)表文件的結(jié)構(gòu)。其中，包括用于存儲(chǔ)科目編碼和賬戶余額的數(shù)據(jù)表文件結(jié)構(gòu)，將為下步初始化科目編碼和賬戶余額以及各種數(shù)據(jù)加工提供存儲(chǔ)數(shù)據(jù)的表文件；還包括棋盤式表文件（qpa.dbf和qpc.dbf），該棋盤式表文件暫時(shí)只有前六個(gè)字段，要等后面完成初始化科目編碼之后，才能進(jìn)一步完善該棋盤式表結(jié)構(gòu)。

16、因此，初始化自動(dòng)建表將放在初始化環(huán)境變量之后完成。（三）初始化科目編碼電算會(huì)計(jì)的科目編碼，是會(huì)計(jì)數(shù)據(jù)的歸屬，所有賬戶的余額和發(fā)生額都將被歸集在相應(yīng)的科目編碼中。因此，編碼就相當(dāng)于手工會(huì)計(jì)的賬戶，有編碼就意味著有賬，無編碼就無賬。初始化科目編碼將提供初始化賬戶余額的歸屬，這是因?yàn)樗匈~戶余額總是特定科目編碼的余額。因此，在完成初始化自動(dòng)建表之后，要緊接著完成初始化科目編碼。（四）初始化賬戶余額初始化賬戶余額是指將開始電算會(huì)計(jì)首月的各級(jí)賬戶余額輸入機(jī)內(nèi)，并合乎會(huì)計(jì)恒等和賬賬相符的原理性核算要求。初始化賬戶余額將利用完成的初始化科目編碼，一次性輸入各核算單位和各級(jí)科目編碼的初始余額。因此，初始化賬戶

17、余額必須放在初始化科目編碼之后完成。（五）初始化棋盤式表初始化棋盤式表是指利用初始化自動(dòng)建表所建立的棋盤式表（只有前六個(gè)字段），結(jié)合初始化科目編碼所完成的一級(jí)科目編碼信息，進(jìn)一步完善棋盤式表結(jié)構(gòu)，最終建立可供本單位使用的棋盤式數(shù)據(jù)表文件結(jié)構(gòu)。（六）初始化內(nèi)存文件本步初始化將利用初始化科目編碼的有關(guān)信息來完成，即利用初始化科目編碼的一級(jí)編碼信息，來重建相應(yīng)的內(nèi)存變量文件。重建后，這些內(nèi)存變量文件將正確反映本單位的一級(jí)科目編碼信息，以便其他模塊運(yùn)行時(shí)使用這些內(nèi)存變量文件。如重建一級(jí)科目編號(hào)內(nèi)存變量文件（bha.mem與bhc.mem）和一級(jí)科目順序號(hào)內(nèi)存變量文件（uxha.mem與uxhc.mem

18、）?？颇烤幋a和賬戶余額的初始化，主要依靠手工操作，初始化的工作量較大。因此，初始化的絕大部分工作量將集中在第三步和第四步，它們是初始化的核心工作內(nèi)容。其余四步的初始化雖然也有手工操作，但工作量不大，主要依靠程序自動(dòng)運(yùn)行，因而相應(yīng)初始化的工作量就很小。余額月表和編碼年表中都有科目編碼，從而使得科目編碼和賬戶余額的初始化內(nèi)容產(chǎn)生了有機(jī)的聯(lián)系。為防止這兩步初始化在編碼方面的脫節(jié)和避免編碼的重復(fù)輸入，盡量減少初始化工作量，可將科目編碼和賬戶余額的初始化結(jié)合起來一并進(jìn)行。方法是：將編碼年表和余額月表合并，產(chǎn)生一個(gè)過渡性的編碼更新臨時(shí)表文件（bmgx.dbf），初始化時(shí)將直接操作這個(gè)表文件，同時(shí)輸入科目編

19、碼和賬戶余額；確認(rèn)更新后，通過分解，重建編碼年表和余額月表，以保證這兩個(gè)數(shù)據(jù)表中編碼的一致性，達(dá)到完成第三和第四步初始化的目的。三、初始化的控制初始化控制是指在初始化過程中控制錯(cuò)誤的初始化數(shù)據(jù)，不接受錯(cuò)誤的初始化數(shù)據(jù)，以保證初始化數(shù)據(jù)的正確性。初始化控制是初始化的一項(xiàng)重要內(nèi)容，是保證初始化數(shù)據(jù)準(zhǔn)確性的重要手段，它將影響會(huì)計(jì)軟件是否能正常運(yùn)行。初始化控制內(nèi)容包括各初始化對(duì)象的控制，初始化控制方法有人工控制和程序控制。人工控制是指初始化時(shí)的操作者主觀控制，程序控制是指運(yùn)行初始化時(shí)的代碼控制。（一）初始化環(huán)境變量的控制初始化環(huán)境變量的控制內(nèi)容主要有兩點(diǎn)。一是控制各環(huán)境變量的相互適應(yīng)性，不可自相矛盾；

20、二是控制各環(huán)境變量的取值范圍，不可突破系統(tǒng)限制。初始化環(huán)境變量的控制方法既使用人工控制，又使用程序控制。主要表現(xiàn)在三個(gè)方面。一是對(duì)那些基礎(chǔ)性的環(huán)境變量，初始化時(shí)可提供編輯功能，實(shí)行人工控制；二是對(duì)那些依存性的環(huán)境變量，一般不提供編輯功能，由初始化程序自動(dòng)產(chǎn)生，實(shí)行程序控制；三是對(duì)環(huán)境變量的取值范圍，初始化模塊應(yīng)有專門的程序段進(jìn)行檢錯(cuò)，實(shí)行程序控制。（二）初始化自動(dòng)建表的控制初始化自動(dòng)建表的控制內(nèi)容主要有三點(diǎn)。一是控制按總數(shù)據(jù)表中存儲(chǔ)的若干表結(jié)構(gòu)參數(shù)逐一自動(dòng)建表，不可遺漏；二是控制當(dāng)前會(huì)計(jì)期的若干表文件的建立，必須與初始化環(huán)境變量所確認(rèn)的會(huì)計(jì)期相適應(yīng)；三是控制不可反復(fù)自動(dòng)建表，以保證某些初始化數(shù)

21、據(jù)不至于丟失。初始化自動(dòng)建表的控制方法主要是使用程序控制，在初始化表單的有關(guān)控件方法程序中，設(shè)計(jì)有專門的自動(dòng)建表程序，不必采用人工控制。（三）初始化科目編碼和初始化賬戶余額的控制初始化科目編碼和初始化賬戶余額的控制內(nèi)容較多，主要有5點(diǎn)。一是控制編碼的寬度，以便數(shù)據(jù)加工時(shí)正確截取子串，應(yīng)按初始化環(huán)境變量所確認(rèn)的各級(jí)編碼寬度，來控制初始化編碼的寬度；二是控制編碼的類型，每個(gè)會(huì)計(jì)主體只允許最多使用與兩套科目編碼，或只用類編碼而不用類編碼；三是控制各編碼要素的正確性與適應(yīng)性，如級(jí)別、實(shí)物、虛增、順序號(hào)、數(shù)位碼、數(shù)位碼全稱、位碼總寬度等；四是控制不允許出現(xiàn)斷層編碼和重碼，以保證編碼的連續(xù)性和唯一性；五是

22、恒等與賬賬相符控制，類編碼的價(jià)值量和類編碼的數(shù)據(jù)將受恒等原理所制約，要切實(shí)保證實(shí)現(xiàn)會(huì)計(jì)恒等與賬賬相符。初始化科目編碼和初始化賬戶余額的控制方法，主要是使用程序控制。應(yīng)在有關(guān)表單的控件中，設(shè)計(jì)專門的控制方法程序，如科目編碼檢錯(cuò)程序、試算平衡程序、對(duì)賬程序等。（四）初始化棋盤式表和初始化內(nèi)存文件的控制初始化棋盤式表和初始化內(nèi)存文件的控制內(nèi)容主要有兩點(diǎn)，一是控制棋盤式表結(jié)構(gòu)，一定要與當(dāng)前編碼年表中一級(jí)科目的壓縮漢字碼內(nèi)容相一致；二是控制內(nèi)存文件的內(nèi)容，一定要與當(dāng)前編碼年表中一級(jí)科目的順序號(hào)、數(shù)位碼、壓縮漢字碼相一致。初始化棋盤式表和初始化內(nèi)存文件的控制方法，主要是使用程序控制，以隨時(shí)根據(jù)編碼年表重建

23、這些磁盤文件。對(duì)于電算會(huì)計(jì)的新用戶，必須順次正確完成全部初始化工作內(nèi)容，不得遺漏。并經(jīng)過程序控制的自動(dòng)檢驗(yàn)，確認(rèn)無誤，初始化才算全面完成。新用戶一旦完成全部初始化工作內(nèi)容，就轉(zhuǎn)化為老用戶。對(duì)于電算會(huì)計(jì)的老用戶，系統(tǒng)將控制不允許再次初始化自動(dòng)建表，但其余的初始化工作內(nèi)容仍然可以運(yùn)行，這些操作內(nèi)容屬于系統(tǒng)維護(hù)的范疇，將在本書第七章介紹。四、初始化的分類在初始化的六個(gè)對(duì)象中，一部分初始化對(duì)象帶有明顯的一次性，只能做一次，不可反復(fù)做，如初始化環(huán)境變量和初始化自動(dòng)建表。另一部分初始化對(duì)象雖具有一次性的特征，但并不明顯，在特定情況下可再做一次。還有些初始化對(duì)象同時(shí)也是系統(tǒng)維護(hù)對(duì)象，并不具有一次性的特征，即

24、除了在初始化中完成之外，還可在系統(tǒng)維護(hù)中不定期地反復(fù)做，如初始化棋盤式表和初始化內(nèi)存文件。因此，按工作量和重復(fù)性分類，初始化的六個(gè)對(duì)象可分以下三類。（一）初始化環(huán)境變量和初始化自動(dòng)建表環(huán)境變量和自動(dòng)建表的初始化工作量最小，一般不具有重復(fù)性，要一次性地完成?？蓪⑦@兩個(gè)初始化對(duì)象合并，簡(jiǎn)稱“初始化變量和建表”，單獨(dú)設(shè)計(jì)一個(gè)初始化表單文件 (kia.scx)，負(fù)責(zé)完成這部分初始化工作。（二）初始化科目編碼和初始化賬戶余額科目編碼和賬戶余額的初始化工作量最大，一般要一次性地完成。但如果核算體制有重大改變，并涉及某些賬戶的合并或分解，則可在系統(tǒng)維護(hù)時(shí)再重復(fù)做?？蓪⑦@兩個(gè)初始化對(duì)象合并，簡(jiǎn)稱“初始化編碼和

25、余額”，單獨(dú)設(shè)計(jì)一個(gè)編碼和余額更新的表單文件 (kij.scx)，將這部分初始化對(duì)象與系統(tǒng)維護(hù)結(jié)合起來。既可在系統(tǒng)安裝的基礎(chǔ)上，完成科目編碼和賬戶余額的初始化；又可在系統(tǒng)運(yùn)行的基礎(chǔ)上，完成科目編碼和賬戶余額的更新維護(hù)。（三）初始化棋盤式表和初始化內(nèi)存文件棋盤式表和內(nèi)存文件的初始化工作量中等，并與一級(jí)科目編碼有密切關(guān)聯(lián)，只要一級(jí)科目編碼信息有所改變，則棋盤式表結(jié)構(gòu)和相應(yīng)內(nèi)存文件就要更新，具有明顯的維護(hù)特性，可反復(fù)做。這部分初始化內(nèi)容與其說是初始化，不如說是系統(tǒng)維護(hù)。初始化程序設(shè)計(jì)將按上述三類初始化內(nèi)容進(jìn)行，前兩類就是本章要介紹的初始化程序設(shè)計(jì)，第三類將作為系統(tǒng)維護(hù)內(nèi)容在本書第七章介紹。第二節(jié) 初

26、始化變量和建表環(huán)境變量和自動(dòng)建表的初始化工作內(nèi)容，必須使用表單的有關(guān)控件來完成。如各級(jí)科目的編碼寬度和開始電算會(huì)計(jì)的年度數(shù)和月份數(shù)的初始化，就要使用幾個(gè)微調(diào)控件來完成；又如會(huì)計(jì)主體名稱和操作員姓名以及各種憑證類型的初始化，就要使用幾個(gè)文本框控件來完成。因此，環(huán)境變量和自動(dòng)建表的初始化主要是設(shè)計(jì)和使用表單文件，依靠該表單文件的運(yùn)行來完成這些初始化工作內(nèi)容。其相應(yīng)的命令文件（kia.prg）只是調(diào)用或編輯該表單文件，本身并不完成任何初始化工作內(nèi)容。一、初始化變量和建表的界面設(shè)計(jì)初始化環(huán)境變量和自動(dòng)建表的表單文件名是kia.scx，其界面設(shè)計(jì)如圖表5-1所示。圖表5-1圖表5-1反映kia.scx

27、表單共有49個(gè)控件。其中，標(biāo)簽控件 (label)有23個(gè)；微調(diào)控件（spinner）有 6個(gè)；文本框控件（text）有12個(gè)；線條控件（line）有7個(gè)；命令按鈕組控件（commandgroup）有 1個(gè)。標(biāo)簽控件用于表單標(biāo)題和有關(guān)控件的文字說明；微調(diào)控件用于初始化四級(jí)科目的編碼寬度和開始電算會(huì)計(jì)的年月數(shù)，文本框控件用于初始化操作員姓名和單位名稱以及十種憑證類型，線條控件用于微調(diào)和文本框控件分組的表格線；命令按鈕組控件有三個(gè)按鈕，即確定、重置和取消，點(diǎn)擊確定將按上述控件的賦值進(jìn)行初始化，點(diǎn)擊重置將重新設(shè)置上述控件的初值，點(diǎn)擊取消將放棄本次的初始化。本電算會(huì)計(jì)教學(xué)軟件共有31個(gè)“kj”打頭的環(huán)

28、境變量，在初始化環(huán)境變量時(shí)，本表單控件直接編輯的環(huán)境變量有 9個(gè)；本表單程序控制修改的環(huán)境變量有 4個(gè)；另有3個(gè)環(huán)境變量在初始化科目編碼和系統(tǒng)維護(hù)中編輯；還有15個(gè)環(huán)境變量在教師網(wǎng)絡(luò)管理軟件的安裝運(yùn)行環(huán)境中編輯。圖表5-1使用的微調(diào)和文本框控件共有18個(gè)，全部用于 9個(gè)環(huán)境變量的初始化，其對(duì)應(yīng)關(guān)系如下：控件名稱 環(huán)境變量 內(nèi)容spinner1 kj1=4 一級(jí)科目編碼寬度spinner2 kj2=2 二級(jí)科目編碼寬度spinner3 kj3=2 三級(jí)科目編碼寬度spinner4 kj4=2 四級(jí)科目編碼寬度spinner5 kj8=2004 電算會(huì)計(jì)上次年終結(jié)賬的四位年度數(shù)spinner6 k

29、j9=12 電算會(huì)計(jì)上次結(jié)賬的月份數(shù)text1 kj25=”黃昌勇” 操作員姓名text2 kj5=”青山工廠” 會(huì)計(jì)主體的單位名稱text3到12 kj13=”4通用收款付款轉(zhuǎn)賬通補(bǔ)收補(bǔ)付補(bǔ)轉(zhuǎn)補(bǔ)" 最多十種憑證類型由本初始化表單文件（kia.scx）程序控制修改的環(huán)境變量有以下4個(gè)：環(huán)境變量 內(nèi)容kj0=10 四級(jí)科目編碼的總寬度(n),最大10kj10=0 綜合余額表月份內(nèi)的匯總次數(shù)(n)kj12="12月已結(jié)賬" 結(jié)賬期的提示信息(c)kj17=2005 當(dāng)前會(huì)計(jì)核算期的四位年度數(shù)(n)在系統(tǒng)維護(hù)有關(guān)模塊中編輯的環(huán)境變量有以下3個(gè)：環(huán)境變量 內(nèi)容kj6=78

30、8540 變換后的存盤口令(n)kj7a=86 使用的a類編碼一級(jí)科目個(gè)數(shù)(n)kj7c=0 使用的c類編碼一級(jí)科目個(gè)數(shù)(n)余下的環(huán)境變量大多數(shù)在配套的教師管理軟件中編輯，少數(shù)環(huán)境變量是系統(tǒng)設(shè)置的，不必編輯，這樣的環(huán)境變量共有以下15個(gè)：環(huán)境變量 內(nèi)容kj11=.f. 試算平衡標(biāo)志(l)kj14=99 學(xué)生使用登錄的學(xué)號(hào)(c)kj15=201 調(diào)用主程序的剩余使用次數(shù)(n)kj16="2003級(jí)會(huì)一班" 使用者的專業(yè)和班級(jí)(c)kj18=” 登記實(shí)習(xí)連續(xù)編制的常規(guī)會(huì)計(jì)報(bào)表編號(hào)(c)kj19=” 登記實(shí)習(xí)順序已完成的操作步驟(c)kj20=.t. 文件登錄和驗(yàn)證標(biāo)志 : .

31、t.進(jìn)行 .f.不進(jìn)行kj21=361 記賬憑證輸完后簡(jiǎn)單分錄的標(biāo)準(zhǔn)記錄數(shù)kj22=”實(shí)習(xí)” 實(shí)驗(yàn)種類 : "實(shí)習(xí)"或"電算"kj23=”v:” 局域網(wǎng)運(yùn)行環(huán)境下的文件共享路徑kj24="【2003級(jí)會(huì)一班(學(xué)號(hào):99)】" 菜單標(biāo)題欄的提示信息kj26=”bk1” 班級(jí)目錄kj27=”u:” 電算會(huì)計(jì)運(yùn)行的硬盤盤符kj28="v:sr194.jpg" visual foxpro主窗口圖形文件名稱kj30=100 學(xué)生實(shí)驗(yàn)擴(kuò)充模塊變換后的存盤口令圖表5-1反映通補(bǔ)、收補(bǔ)、付補(bǔ)和轉(zhuǎn)補(bǔ)幾種憑證類型，是電算會(huì)計(jì)使用的補(bǔ)字

32、憑證類型，專門用于處理虛增所填制的記賬憑證，分別調(diào)整相應(yīng)的通用、收款、付款和轉(zhuǎn)賬憑證，其憑證編號(hào)仍使用被調(diào)整的憑證編號(hào)。例如通用120號(hào)憑證反映存款利息收入429.98元，借“銀行存款（100208）”，貸“財(cái)務(wù)費(fèi)用（550301）”，該業(yè)務(wù)由于在財(cái)務(wù)費(fèi)用的貸方用正數(shù)沖銷其借方發(fā)生額，使得“財(cái)務(wù)費(fèi)用（550301）”編碼的借方產(chǎn)生虛增。處理方法是編制一個(gè)通補(bǔ)120號(hào)憑證，借“財(cái)務(wù)費(fèi)用（550301）”，貸“財(cái)務(wù)費(fèi)用（550301）”，金額為-429.98元。結(jié)合這兩張憑證看，“財(cái)務(wù)費(fèi)用（550301）”的借方將用負(fù)數(shù)沖銷429.98元，其借方合計(jì)就不會(huì)出現(xiàn)虛增；該科目的貸方登記了一個(gè)正數(shù)429

33、.98元，又登記了一個(gè)負(fù)數(shù)429.98元，正好抵銷。開始電算會(huì)計(jì)的年度數(shù)減一，就是電算會(huì)計(jì)上次年終結(jié)賬的四位年度數(shù)；根據(jù)開始電算會(huì)計(jì)的月份數(shù)，就可準(zhǔn)確得到電算會(huì)計(jì)上次結(jié)賬的月份數(shù)，再利用kj8和kj9這兩個(gè)全局性內(nèi)存變量，就可準(zhǔn)確控制以后各期的會(huì)計(jì)數(shù)據(jù)分期。二、初始化變量和建表的表單設(shè)計(jì)環(huán)境變量和自動(dòng)建表初始化的表單（kia.scx）對(duì)象（form1）有兩個(gè)方法程序，分布在erroe和init 方法中，error方法程序代碼前已介紹，不再重復(fù)，現(xiàn)就init方法程序代碼設(shè)計(jì)介紹如下。初始化環(huán)境變量和自動(dòng)建表kia.scx 的 form1.init 方法程序代碼如下： 1: note form1.

34、init 創(chuàng)建表單對(duì)象時(shí)發(fā)生 kia.scx 2: set talk off && 關(guān)閉命令執(zhí)行結(jié)果輸出 3: with thisform && 對(duì)象引用開始 4: * 一、6個(gè)微調(diào)賦初值 5: .spinner1.value=kj1 && 一級(jí)編碼寬度 6: .spinner2.value=kj2 && 二級(jí)編碼寬度 7: .spinner3.value=kj3 && 三級(jí)編碼寬度 8: .spinner4.value=kj4 && 四級(jí)編碼寬度 9: .spinner5.value=int(kj

35、8+1) && 開始電算年度數(shù) 10: .spinner6.value=int(iif(kj9=12,1,kj9+1) && 開始電算月份數(shù) 11: * 二、text1 和 text2 兩個(gè)文本框賦初值 12: .text1.value=kj25 && 操作員姓名 13: .text2.value=kj5 && 會(huì)計(jì)主體名稱 14: * 三、text3 到 text12 共10個(gè)文本框先賦初值為空串 15: k=3 && 從第3個(gè)文本框開始 16: do while k<13 && 終值到第1

36、2號(hào)文本框?yàn)橹?17: n=alltrim(str(k) && 按循環(huán)變量的值形成文本框編號(hào) 18: wbk=".text"+n+".value" && 按編號(hào)形成文本框控件和屬性 19: &wbk.="" && 為該文本框賦初值空串 20: k=k+1 && 循環(huán)變量加步長(zhǎng),取下一個(gè)文本框 21: enddo 22: * 四、獲取現(xiàn)有憑類寬度并檢錯(cuò) 23: pl=alltrim(kj13) && 現(xiàn)有憑類賦值 24: kd=val(subs(pl

37、,1,1) && 第一個(gè)字節(jié)是寬度,獲取憑類寬度 25: if kd=2.or.kd=4 && 憑類寬度只能為2或4,即1或2個(gè)漢字 26: pl=subs(pl,2) && 丟掉前面的寬度1個(gè)字節(jié) 27: else && 否則現(xiàn)有憑類寬度有錯(cuò),重新賦值憑類和寬度 28: pl="通用收款付款轉(zhuǎn)賬通補(bǔ)收補(bǔ)付補(bǔ)轉(zhuǎn)補(bǔ)" && 賦值八種憑類 29: kd=4 && 憑類寬度為4 30: endif 31: * 五、將現(xiàn)有憑類為 text3 到 text12 共10個(gè)文本框賦值 32:

38、k=3 && 從第3個(gè)文本框開始 33: do while len(pl)>0.and.k<13 && 終值到第12號(hào)文本框?yàn)橹?34: n=alltrim(str(k) && 按循環(huán)變量的值形成文本框編號(hào) 35: wbk=".text"+n+".value" && 按編號(hào)形成文本框控件和屬性 36: if len(pl)>kd && 未賦值的憑類總寬度大于一種憑類的寬度 37: &wbk.=subs(pl,1,kd) && 為該文本

39、框賦值一種憑類 38: pl=subs(pl,kd+1) && 丟掉已賦值的該憑類 39: else 40: &wbk.=pl && 最后一種憑類賦值 41: pl="" && 未取憑類賦空串 42: endif 43: k=k+1 && 循環(huán)變量加步長(zhǎng),取下一個(gè)文本框 44: enddo 45: * 六、建立新的數(shù)據(jù)模板時(shí)要選復(fù)選框 46: .check1.value=0 47: endwith && 對(duì)象引用結(jié)束 48: return初始化環(huán)境變量和自動(dòng)建表kia.scx 表單的 f

40、orm1.init 方法程序，將在創(chuàng)建表單對(duì)象時(shí)被執(zhí)行。主要內(nèi)容是為微調(diào)和文本框控件賦初值，提供對(duì)基礎(chǔ)性環(huán)境變量的編輯功能。本 form1.init 方法程序?qū)⒃诿畎粹o組重置按鈕的form1.commandgroup1.command2.click 方法程序中被調(diào)用(thisform.init)，即重新設(shè)置這些控件的初值。初始化環(huán)境變量和自動(dòng)建表kia.scx表單的form1.init 方法程序代碼，在語句前加了嵌套線、行號(hào)及冒號(hào)。千萬注意，這些都不是方法程序的內(nèi)容，增加它們的目的是為了十分清楚地反映代碼的運(yùn)行走向，說明編程設(shè)計(jì)思路，這對(duì)閱讀理解那些復(fù)雜的程序代碼是十分有利的。本書后面介紹的

41、語句較多的程序代碼(*.prg)和表單(*.scx)及其控件的方法程序代碼都是這一風(fēng)格。在與本教材配套電算會(huì)計(jì)教學(xué)軟件的信息查詢主控模塊中，文件編輯工具子模塊（klh.scx）將提供生成這種帶嵌套線、行號(hào)及冒號(hào)風(fēng)格的程序代碼。使用方法是：當(dāng)操作命令文件（*.prg）時(shí)，可編輯或新建命令文件，可在一個(gè)、一類或全部命令文件中搜索指定的字符，可刪除指定的命令文件；當(dāng)操作表單文件（*.scx）時(shí)，可編輯或新建表單文件，可在一個(gè)、一類或全部表單文件的全部方法程序代碼中搜索指定的字符，可刪除指定的表單文件，可將指定表單文件(*.scx)methods字段(m型)中的全部代碼轉(zhuǎn)換到同名的文本文件（txt）中

42、，然后再編輯該文本文件，并轉(zhuǎn)貼到新建的命令文件中，最后再編輯該命令文件，就可得到帶嵌套線、行號(hào)及冒號(hào)風(fēng)格的方法程序代碼；也可在編輯表單時(shí)，直接復(fù)制某控件（包括其方法程序代碼）到其他表單文件中，或復(fù)制某對(duì)象的方法程序代碼貼到其他表單文件某對(duì)象的方法程序中；本文件編輯工具（klh.scx）還可編輯文本文件（*.tx或*.txt）,可利用編輯觀察編譯時(shí)產(chǎn)生的出錯(cuò)信息文件（*.err）。信息查詢主控模塊有兩個(gè)編輯工具，即文件查找編輯(klg.scx)和文件編輯工具(klh.scx)，它們可以互相編輯。本教材中所有帶嵌套線、行號(hào)及冒號(hào)風(fēng)格的代碼，都是利用該工具（klh.scx）生成的。三、初始化變量和建

43、表的控件設(shè)計(jì)初始化環(huán)境變量和自動(dòng)建表kia.scx 表單文件，除命令按鈕組控件外，其余控件只需要在表單生成器的屬性窗口進(jìn)行一些屬性設(shè)置，并無相應(yīng)的控件方法程序代碼。kia.scx 表單控件方法程序代碼集中在命令按鈕組的確定、重置和取消三個(gè)命令按鈕中，現(xiàn)分述如下。初始化環(huán)境變量和自動(dòng)建表kia.scx 表單文件的確定命令按鈕控件click 方法程序代碼如下： 1: note form1.commandgroup1.command1.click 確定 2: * 在一個(gè)對(duì)象上按下并釋放鼠標(biāo)按鈕時(shí)發(fā)生 kia.scx 3: * 一、初始化環(huán)境變量 4: ct3="初始化環(huán)境變量"

44、&& 自定義對(duì)話函數(shù)的第3個(gè)參數(shù) 5: with thisform && 對(duì)象引用開始 6: * 1.獲取微調(diào)指定的各級(jí)編碼寬度值 7: kd1=.spinner1.value && 一級(jí)編碼寬度 8: kd2=.spinner2.value && 二級(jí)編碼寬度 9: kd3=.spinner3.value && 三級(jí)編碼寬度 10: kd4=.spinner4.value && 四級(jí)編碼寬度 11: kd0=kd1+kd2+kd3+kd4 && 一到四級(jí)編碼總寬度 12: fxk1

45、=.check1.value 13: * 2、對(duì)指定的編碼寬度進(jìn)行檢錯(cuò) 14: if kd0>10.or.kd1=0.or.kd2=0.or.kd3=0.or.kd4=0 15: ct1="四級(jí)編碼總寬度不可超過 10"+chr(13) 16: ct1=ct1+"各級(jí)編碼寬度都不可為零"+chr(13) 17: ct1=ct1+"你指定的總寬度："+alltrim(str(kd0) 18: nt2=0+16+0 && 自定義對(duì)話函數(shù)的第2個(gè)參數(shù) 19: =messagebox(ct1,nt2,ct3) &

46、& 出現(xiàn)自定義對(duì)話框 20: return && 返回 21: endif 22: * 3、獲取微調(diào)指定的開始電算會(huì)計(jì)的年月數(shù) 23: ksn=.spinner5.value && 開始電算年度數(shù) 24: ksy=.spinner6.value && 開始電算月份數(shù) 25: * 4、獲取操作員姓名和會(huì)計(jì)主體名稱并進(jìn)行檢錯(cuò) 26: cky=alltrim(.text1.value) && 操作員姓名 27: dw=alltrim(.text2.value) && 會(huì)計(jì)主體名稱 28: if len(cky)=

47、0.or.len(dw)=0 29: ct1="操作員和會(huì)計(jì)主體不可輸空"+chr(13) 30: nt2=0+16+0 31: =messagebox(ct1,nt2,ct3) 32: return && 返回 33: endif 34: * 5、檢查 text3 到 text12 共10個(gè)文本框賦值寬度是否一致 35: plkd=len(alltrim(.text3.value) 36: k=3 && 循環(huán)變量從第3個(gè)文本框開始 37: t=.f. && 檢查正確標(biāo)志 38: do while k<13 &&

48、amp; 循環(huán)終值為第12號(hào)文本框?yàn)橹?39: n=alltrim(str(k) && 按循環(huán)變量形成文本框編號(hào) 40: wbk=".text"+n+".value" && 按編號(hào)形成文本框控件和屬性 41: wbk=&wbk && 獲取該文本框的憑證類型 42: kd=len(alltrim(wbk) && 獲取該憑類的寬度 43: if plkd<>kd.and.kd>0 && 如憑類寬度有錯(cuò) 44: t=.t. && 登記檢查錯(cuò)

49、誤標(biāo)志 45: exit && 出錯(cuò)后跳出循環(huán) 46: endif 47: k=k+1 && 未出錯(cuò),則加循環(huán)步長(zhǎng),取下一個(gè)文本框 48: enddo 49: if t && 如檢查憑類寬度不一致 50: ct1="最多可指定十種憑證類型"+chr(13) 51: ct1=ct1+"但各種憑類寬度應(yīng)該一致"+chr(13) 52: ct1=ct1+"你現(xiàn)在指定的寬度不一致" 53: nt2=0+16+0 && 確定按鈕,停止圖標(biāo),默認(rèn)是第一個(gè)按鈕 54: =message

50、box(ct1,nt2,ct3) && 出現(xiàn)自定義對(duì)話框 55 return && 返回 56 endif 57: * 6、初始化環(huán)境變量 58: kj0=kd0 && 登記一到四級(jí)編碼總寬度 59: kj1=kd1 && 登記一級(jí)編碼寬度 60: kj2=kd2 && 登記二級(jí)編碼寬度 61: kj3=kd3 && 登記三級(jí)編碼寬度 62: kj4=kd4 && 登記四級(jí)編碼寬度 63: kj25=cky && 登記操作員姓名 64: kj5=dw &&am

51、p; 登記會(huì)計(jì)主體名稱 65: * 獲取 text3 到 text12 共10個(gè)文本框的憑證類型 66: kj13=alltrim(str(plkd) && 登記憑類寬度 67: for k=3 to 12 && 從3到12共10文本框 68: n=alltrim(str(k) && 按循環(huán)變量形成文本框編號(hào) 69: wbk=".text"+n+".value" && 按編號(hào)形成文本框控件和屬性 70: pl=alltrim(&wbk.) && 獲取該文本框中的憑類

52、71: if len(pl)=plkd && 如憑類寬度一致 72: kj13=kj13+pl && 連接登記憑類到kj13 73: endif 74: endfor 75: endwith && 對(duì)象引用結(jié)束 76: * 二、初始化自動(dòng)建表 77: ct3="初始化自動(dòng)建表" 78: * 1、利用三個(gè)標(biāo)志性表文件判斷是否要自動(dòng)建表 79: bz=iif(.not.file("pa.dbf"),"","pa.dbf") 80: bz=iif(.not.file(&qu

53、ot;ye.dbf"),bz,bz+"/ye.dbf") 81: bz=iif(.not.file("bm.dbf"),bz,bz+"/bm.dbf") 82: if len(bz)=0.or.fxk1=1 83: * 當(dāng)三個(gè)表文件都不存在或建立新的數(shù)據(jù)模板時(shí)是新用戶 84: * 新用戶初始化由程序控制單獨(dú)修改幾個(gè)環(huán)境變量 85: kj8=ksn-1 && 上次年終結(jié)賬的四位年度數(shù) 86: kj9=iif(ksy=1,12,ksy-1) && 上次結(jié)賬的月份數(shù) 87: kj10=0 &

54、& 月份內(nèi)余額匯總累加器置初值 88: kj12=alltrim(str(kj9)+"月已結(jié)賬" && 結(jié)賬提示信息 89: kj17=ksn && 當(dāng)前會(huì)計(jì)期的四位年度數(shù) 90: save to qj.mem all like kj* && 刷新全局變量?jī)?nèi)存文件 91: else && 老用戶只修改直接編輯的環(huán)境變量 92: save to qj.mem all like kj* 93: endif 94: ct1="qj.mem 已經(jīng)更新"+chr(13) 95: if len(

55、bz)=0 && 如果是新用戶,則自動(dòng)建表 96: * 2.生成兩個(gè)過渡性表文件,zj1.dbf與zj2.dbf 97: sele 1 && 選擇一號(hào)工作區(qū) 98: use zsku.dbf && 打開總數(shù)據(jù)表 99: * zsku.dbf有8個(gè)字段：field_name、field_type、field_len、 100: * field_dec、表文件名、文件序號(hào)、字段序號(hào)、文件說名 101: copy stru to zj1.dbf && 與 zsku.dbf 同結(jié)構(gòu)，有8個(gè)字段 102: copy stru exte to zj2.dbf && 前4個(gè)字段與 zj1.dbf 相同 103: * 3、根據(jù)總數(shù)據(jù)表自動(dòng)建表 104: ct1="" && 自定義對(duì)話框的第一個(gè)參數(shù)賦初值 105: wjm="zzzz9999.000" && 賦