程式開發質量檢查(十一)

在開發的一個報表轉Excel程式中,開發人員使用如下語法來設置表頭部分.

invo_excel.uf_setvalue(2,1,'供應商代號')
invo_excel.uf_setvalue(2,2,'供應商簡稱')
invo_excel.uf_setvalue(2,3,'供應商全稱')
invo_excel.uf_setvalue(2,4,'公司代號')
invo_excel.uf_setvalue(2,5,'銀行代號')
invo_excel.uf_setvalue(2,6,'銀行帳號')
invo_excel.uf_setvalue(2,7,'開戶銀行')
invo_excel.uf_setvalue(2,8,'支票抬頭')
invo_excel.uf_setvalue(2,9,'付款方式')
invo_excel.uf_setvalue(2,10,'票期(月日):')
invo_excel.uf_setvalue(2,11,'匯款手繼費')
invo_excel.uf_setvalue(2,12,'帳單幣別')
invo_excel.uf_setvalue(2,13,'貼現利率%:')
invo_excel.uf_setvalue(2,14,'付款幣別%')
invo_excel.uf_setvalue(2,15,'交易幣別')
invo_excel.uf_setvalue(2,16,' 負責人(1):')
invo_excel.uf_setvalue(2,17,'負責人(2)')
invo_excel.uf_setvalue(2,18,' 鎖檔注記:')
invo_excel.uf_setvalue(2,19,' 匯兌損益注記:')
invo_excel.uf_setvalue(2,20,'扣水款注記')
invo_excel.uf_setvalue(2,21,'市內注記')
invo_excel.uf_setvalue(2,22,'扣手續費注記')
invo_excel.uf_setvalue(2,23,'付款地點')
invo_excel.uf_setvalue(2,24,'供應商稅率%')
invo_excel.uf_setvalue(2,25,'SWIFT CODE')
invo_excel.uf_setvalue(2,26,'贊助金比率%')
invo_excel.uf_setvalue(2,27,'贊助金科目')
invo_excel.uf_setvalue(2,28,'工廠承擔貼現率%')
invo_excel.uf_setvalue(2,29,'中文收款地址')
invo_excel.uf_setvalue(2,30,'省')
invo_excel.uf_setvalue(2,31,'縣')
invo_excel.uf_setvalue(2,32,'銀行中文地址')
invo_excel.uf_setvalue(2,33,'省')
invo_excel.uf_setvalue(2,34,'縣')
invo_excel.uf_setvalue(2,35,'銀行英文地址')
invo_excel.uf_setvalue(2,36,'分行中文名稱')
invo_excel.uf_setvalue(2,37,'分行英文名稱')

 

這種設置重復內容較多,而且順序不能調整.

第二個參數是表示Excel的列,如果用戶要求在第三列插入一個值,則后面的列都要相應加1.

為了減少程式的維護難度,優化代碼撰寫,可以使用如下方法實現.

 

先定義一個數組.

<!--@page { margin: 2cm }-->

stringls_colname[]={'供應商代號','供應商簡稱','供應商全稱','公司代號','銀行代號','銀行帳號','開戶銀行',&
'支票抬頭','付款方式','票期(月日):','匯款手繼費','帳單幣別','貼現利率%:','付款幣別%','交易幣別','負責人(1):',&
'負責人(2)','鎖檔注記:','匯兌損益注記:','扣水款注記','市內注記','扣手續費注記','付款地點','供應商稅率%',&
'SWIFTCODE','贊助金比率%','贊助金科目','工廠承擔貼現率%','中文收款地址','省','縣','銀行中文地址','省',&
'縣','銀行英文地址','分行中文名稱','分行英文名稱'}

 

然后循環用此數組賦值即可.

fori=1 to upperbound(ls_colname)

   invo_excel.uf_setvalue(2,i,ls_colname[i])

next