定制EBCDIC及GBKGB2312转换码表.docVIP

定制EBCDIC及GBKGB2312转换码表 定制EBCDIC和GBK/GB2312的转换码表 内容 提要 定制EBCDIC和GBK/GB2312的转换码表 产品：OS/400 平台：iSeries/AS400 版本：R440 正文 AS/400采用EBCDIC编码保存在QSYS.LIB中的所有中文字符，而在pc端winows 95, windows NT采用GBK内码保 存中文字符，两者之间在进行中文数据传输的时候，会遇到EBCDIC和GBK的相互转换。所以，掌握EBCDIC和GBK 的转换码表对于程序员非常重要。 1 收集GBK字符文件 首先必须根据GBK的编码原则得到GBK的汉字库。GBK的编码区间为0X8140到0XFEFE。整个码表分为5个区间，称为GBK1(A1A1-A9FE)、GBK2（B0A1-F7EE)、GBK3(8140-A0FE)、GBK4(AA40-FEA0)、GBK5(A840-A9A0).其中GBK1包括符号717个，GBK2包括GB2312汉字6763个，GBK3包括GB13000.1中的汉字6080个，GBK4包括增补的汉字8160个,GBK5包括扩充汉字符号166个。 程序1： /* file1.c */ #includestdio.h void main(void) { FILE *fp; -char ch[4],file[10],enter[2],hi,lo; long int i; enter[0]=0x0d; enter[1]=0x0a; printf(please input the file name:\n); scanf(%s,file); if((fp=fopen(file,wb))==NULL) { ------printf(cannot open %s\n,file); ------exit(0); } hi=0xa7; lo=0x40; for(i=0;i2*191;i++) { -----ch[0]=0x22; -----if(i%191==0) ----------hi=hi+1; -----ch[1]=hi; -----ch[2]=(lo+i%191); -----ch[3]=0x22; -----fwrite(ch,sizeof(char),4,fp); -----fwrite(enter,sizeof(char),2,fp); } } 程序说明： （1）.OX22是（双引号）的16进制代码，0X0D 0X0A是换行符号的16进制代码，在每一个字符的两旁增加双引号和缓行符号是为了满足CPYFRMIMPF对Import file的格式要求而特别增加的。 （2）.结果文件假设命名为GBK.TXT,文件样本见附件。 程序2：得到没有 和0X0D 0X0A的汉字字库文件 #includestdio.h void main(void) { FILE *fp; -char ch[2],file[10],hi,lo; long int i; printf(please input the file name:\n); scanf(%s,file); if((fp=fopen(file,wb))==NULL) { ------printf(cannot open %s\n,file); ------exit(0); } hi=0x80; lo=0x40; for(i=0;i126*191;i++) { -------if(i%191==0) -------------hi=hi+1; -------ch[0]=hi; -------ch[1]=(lo+i%191); -------fwrite(ch,sizeof(char),2,fp); } fclose(fp); } [注]： 假设结果文件命名为GBK_01.TXT 2.利用FTP把GBK.TXT上传到AS400的IFS的目录下，例如/home目录，注意ftp在传输双字节的时候需要制定AS400端CCSID的值。如果只传输GB2312汉字，指定CCSID=1381；如果传输GBK汉字，指定CCSID=1386. [注]： 如果传输正确，使用DSPF或EDTF可以看到正确的中文字符。 3.利用STRSQL交互式SQL生成接受GBK汉字的数据库文件 ------CREATE TABLE GBK(COL CHAR(4) CCSID 1388) 4.利用CPYFRMIMPF把流文件数据导入GBK数据库文件 -----CPYFRMIMPF FROMSTMF(/home/gbk.txt) ---------------TOFILE(GBK/QGPL) ---------------RCDDLM(*LF) 5. 利用FTP的BIN方