| Navigation: Language Reference > 13 - Built-in Functions >====== CONVERTOEMTOANSI (convert ASCII strings to ANSI) ====== |    |
CONVERTOEMTOANSI( string )
| 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: