Re: Problem converting unicode UCS-2 to character

kristof.anthonis@xxxxxx wrote:
> 
> Thanks but how do I get the UCS-2 data I receive in a normal string, in
> the C string. For example I receive '0049006E'. How do can I tell the
> I series this is really U'0049006E'??
> 

Ah sorry, I missed the fact that you have '0049' and not x'0049'.  I
think you will have to use cvtch first to get the correct data into your
ucs-2 field.

h bnddir('QC2LE')
D cvt2to1         pr                  EXTPROC('cvtch')        
D  tgt_1byte                      *   VALUE                   
D  src_2byte                      *   VALUE options(*string)  
D  src_bytes                    10i 0 VALUE                   
                                                              
D ucs2            s              4c                           
D char            s              8a   inz('0049006E')         
 /free                                                        
       cvt2to1 (%addr(ucs2) : %addr(char) : 8);               
       dsply ucs2;