Converte uma string do formato OEM/MS-DOS Text para ANSI Text (formato do Microsoft Windows).

Sintaxe: OEMToAnsi( < cStringOEM > )

Onde: cStringOEM, Indica a string (formato OEM/MS-DOS) que será convertida.

Retorno: Retorna a string convertida (formato ANSI) para ser exibida no Microsoft Windows

Observações
Ao utilizar um programa baseado no MS-DOS para alimentar uma base de dados, os acentos e caracteres especiais são gravados como texto OEM. Porém, para visualizar esses dados, na interface do Microsoft Windows, é necessário converter a string de OEM/MS-DOS para ANSI Text.
User Function teste()
   cTexto := "Atenção"
   msginfo(cTexto)
   cTexto := OEMToANSI( cTexto ) // Resultado: "Atençäo"
   msginfo(cTexto)
Return