Return the Name of the Current Language module in USE
REQUEST HB_LANG_PT REQUEST HB_LANG_RO REQUEST HB_LANG_ES FUNCTION MAIN() HB_LANGSELECT( 'PT' ) // Default language is now Portuguese ? CDOW( DATE() ) //Segunda-feira ? 'Current language is ", HB_LANGNAME() // Portuguese ? 'Old language id selected is ", HB_LANGSELECT() // PT HB_LANGSELECT( 'RO' ) // Default language is now Romanian ? CMONTH( DATE() ) // Mai ? 'Old language id selected is ",HB_LANGSELECT() // RO HB_LANGSELECT( 'ES' ) // Default language is now Spanish ? 'Current language is ",HB_LANGNAME() // Spanish ? CMONTH( DATE() ) // Mayo ? CDOW( DATE() ) // Lunes RETURN NIL Tests See tests/langapi.prg