PROTECTED Funtion Init _Vfp.LanguageOption = 1 Set DebugOut To ADDBS(SYS(2023)) + SYS(2015) + "Lang.Log" x=1 EndFunc