俩句中文拼接？怎么使之无缝衔接？

Question

如题：
如中文1“您好”，中文2“您也好”
如何变成“您好您也好”？
先谢谢了

Answer 1

谢谢大家。。。。

Answer 2

D WKTEMP DS
D   WTEMP1   5A
D   WTEMP2   7A
C                         MOVEL '您好'    WKTEMP1   5
C                         MOVE   '您也好' WKTEMP2   7

Answer 3

本帖最后由 q疯哥p 于 2011-02-28 08:57 编辑

办法就是把缝截取掉。。。每个中文串 前后有个标志  ‘0E' 和0F 。把前一个串的0F 去掉 拼上后一个串的去掉0E 的部分。。。OK

L1=LENGTH(STR1) L2=LENGTH(STR2)      STR=SUBSTR(STR1,1,(L1-1))+SUBSTR(STR2,2,(L2-1))

Answer 4

直接相加就可以了,例

D AB              S              3                                    
D ABC             S              3                                    
D A               S              6                                    
C                   EVAL      AB='ABC'                                 
C                   EVAL      ABC='DEF'                                
C                   EVAL      A=AB+ABC                                 
C     A             DSPLY                                             
C                   SETON                                            LR
C                   RETURN