= RunCmd2('notepad', 'c:\myfile.txt')

PROCEDURE RunCmd2(cApp, cParam)
	DECLARE INTEGER WinExec IN kernel32;
		STRING lpCmdLine, INTEGER nCmdShow
	LOCAL nResult
	nResult = WinExec(cApp + " " + cParam, 1)
	IF nResult <= 31
		= MessageBox('WinExec error code: ' + LTRIM(STR(nResult)))
	ENDIF