J
joelscampos
Guest
Thank you, Matt. The code got that way: &IF OPSYS = "UNIX" &THEN ON ANY-KEY OF browse-recebidas OR ANY-KEY OF tt-arquivo.nm-arquivo OR ANY-KEY OF tt-arquivo.mm-referencia OR ANY-KEY OF tt-arquivo.aa-referencia DO: /* to the right */ IF KEYFUNCTION(LAST-KEY) = "CURSOR-RIGHT" THEN DO: APPLY 'EDITOR-TAB' TO SELF. /* (CTRL + G) = "EDITOR-TAB" */ RETURN NO-APPLY. END. /* to the left */ IF KEYFUNCTION(LAST-KEY) = "CURSOR-LEFT" THEN DO: APPLY 'BACK-TAB' TO SELF. /* (CTRL + U) = "BACK-TAB" */ RETURN NO-APPLY. END. END. &ENDIF
Continue reading...
Continue reading...