| **Navigation:**  [[introduction.htm|Language Reference]] > 13 - Built-in Functions >====== CONVERTOEMTOANSI (convert ASCII strings to ANSI) ====== | [[convertansitooem convert ansi strings to ascii .htm|{{btn_prev_n.gif|Previous page}}]][[introduction.htm|{{btn_home_n.gif|Return to chapter overview}}]][[copy copy a file .htm|{{btn_next_n.gif|Next page}}]] | | || **CONVERTOEMTOANSI(**// string //**)** {{blk2blue.jpg|blk2blue.jpg}} | **CONVERTOEMTOANSI** | Translates OEM ASCII strings to ANSI. | | //string// | The label of the string to convert. This may be a single variable or a any structure that is treated as a GROUP (RECORD, QUEUE, etc.). | The **CONVERTOEMTOANSI** statement translates either a single string or the strings within a GROUP from the the OEM character set (ASCII with extra characters defined by the active code page) into ANSI (Windows display) character set. This procedure is not required on data files if the OEM attribute is set on the file. **Example:** **Customer  FILE,DRIVER('Clarion'),PRE(Cus)  !Declare file without OEM attribute** **AcctKey    KEY(Cus:AcctNumber)** **Record      RECORD** **AcctNumber   LONG** **OrderNumber  LONG** **Name         STRING(20)** **Addr         STRING(20)** **            END** **          END** **Win WINDOW,SYSTEM** **     STRING(@s20),USE(Cus:Name)** **    END** ** CODE** ** OPEN(Customer)** ** SET(Customer)** ** NEXT(Customer)** ** ****CONVERTOEMTOANSI****(Cus:Record)              !Convert all strings from ASCII to ANSI** ** OPEN(Win)** ** ACCEPT** **  !Process window controls** ** END** ** ****CONVERTANSITOOEM****(Cus:Record)              !Convert back to ASCII from ANSI** ** PUT(Customer)** **See Also:** [[convertansitooem convert ansi strings to ascii .htm|CONVERTANSITOOEM]] [[oem set international string support .htm|OEM]]