>LOCAL lcNomeForm >LOCAL lcChamada > >lcNomeForm = JUSTSTEM(SYS(1271, THISFORM)) >lcChamada = lcNomeForm + ".IncluiDOC()" > >ON KEY LABEL CTRL+INS &lcChamada. >>
LOCAL xForm xForm = ThisForm ON KEY LABEL CTRL+INS xForm.IncluiDOC()Assim, a gente "economiza" uma variável, duas chamadas de função (JUSTSTEM() e SYS()) e mais a macro-substituição (&). :)