自己建条形码字符集(CODE39)

pantierui

条形码的相关知识请参考:
http://www.n-barcode.com/china/index-cn.html
http://www.puhuagood.com/zhishi.html


下面写一下如何在AS400下编写BARCODE的字符库.
1、进入AS400后，输入STRAPW
2、选择4，进入如下画面，写上字符集文件的名字、库和字符集名字

pantierui

3、回车,进入创建字符集画面，其中当ID code length为2是可以做DBCS字符集，在这里我们用1。

pantierui

4、回车后，进入字符集编辑画面，Symbol ID为要编辑的字符，CODE39共要编辑44个字符。其中有26个字母，
10数字和8个特殊字符（+、-、*、/、$、%、.和空白）。

5、下面以字符A为例子进行下面的解说，按图填写后回车进入编辑状态，Width和Length可以根据自己的需要自己定，
在这里我们用2：1的比例。

[ 本帖最后由 pantierui 于 2008-7-2 10:39 编辑 ]

pantierui

6、一个字符共有12逻辑形态线，线的形态如图：

pantierui

7、根据字符A的线的形态，画出如下图形：

pantierui

8、因为要填充下面的其余部分，方法如下，在刚才写好的一行的@符号下填写+号，然后按SHIFT+F5进行填充如图，
填充后按F10保存，按F3退出。

pantierui

在按照CODE39表把其余的42个字符编辑好，就可以使用了，使用方法如下：
PRT文件
A          R HED10   
A            P1BCD         13A       43                     
A                                      TEXT(' バーコード ')  

APW文件
ADDAPW LINE( 4) SYMBOL(43 13 CODE39 BARCODE  PTRLIB)           
写完APW后,要做成
CRTAPW FORMD(PGMXXXA) FILE(WRKLIB/APWFORM) SRCFILE(SRCLIB/QAPWSRC) SRCMBR(
PGMXXXA) CPI(12) LPI(7.5) REPLACE(*YES)   
                                    
CL文件
* 印刷装置ファイル一時変更 */  
OVRPRTF    FILE(PGMXXXP) PAGESIZE(72  80) LPI(7.5) CPI(12)  OVRFLW(72)        
/* 作業票を実行 */   
CALL       PGM(PGMXXX)
/* 書式合成 */   
MRGAPW     FORMD(PGMXXXA) FILE(WRKLIB/APWFORM) SPLF(PGM0XXXP) JOB(*) SPLNBR(*LAST) SCHEDULE(*FILEEND)

[ 本帖最后由 pantierui 于 2008-7-2 11:10 编辑 ]

bensonbee

好东西，谢谢了

chenxiulan

各位高手：
    我刚开始学习RPG，请问有没有人有适合我这样什么都不了解的人看的中文书籍啊？
    另外、请问在网上能不能下到免费的编译器，方便学习之用。
    万分感谢！[/size]